Home | History | Annotate | Line # | Download | only in ddb
db_write_cmd.c revision 1.2.4.1
      1      1.1      cgd /*
      2      1.1      cgd  * Mach Operating System
      3      1.1      cgd  * Copyright (c) 1991,1990 Carnegie Mellon University
      4      1.1      cgd  * All Rights Reserved.
      5      1.1      cgd  *
      6      1.1      cgd  * Permission to use, copy, modify and distribute this software and its
      7      1.1      cgd  * documentation is hereby granted, provided that both the copyright
      8      1.1      cgd  * notice and this permission notice appear in all copies of the
      9      1.1      cgd  * software, derivative works or modified versions, and any portions
     10      1.1      cgd  * thereof, and that both notices appear in supporting documentation.
     11      1.1      cgd  *
     12      1.1      cgd  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS
     13      1.1      cgd  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
     14      1.1      cgd  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     15      1.1      cgd  *
     16      1.1      cgd  * Carnegie Mellon requests users of this software to return to
     17      1.1      cgd  *
     18      1.1      cgd  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     19      1.1      cgd  *  School of Computer Science
     20      1.1      cgd  *  Carnegie Mellon University
     21      1.1      cgd  *  Pittsburgh PA 15213-3890
     22      1.1      cgd  *
     23      1.1      cgd  * any improvements or extensions that they make and grant Carnegie the
     24      1.1      cgd  * rights to redistribute these changes.
     25      1.1      cgd  */
     26      1.1      cgd /*
     27  1.2.4.1  mycroft  * $Id: db_write_cmd.c,v 1.2.4.1 1993/11/14 22:48:50 mycroft Exp $
     28      1.2      cgd  *
     29      1.1      cgd  * HISTORY
     30      1.1      cgd  * $Log: db_write_cmd.c,v $
     31  1.2.4.1  mycroft  * Revision 1.2.4.1  1993/11/14 22:48:50  mycroft
     32  1.2.4.1  mycroft  * Canonicalize all #includes.
     33  1.2.4.1  mycroft  *
     34      1.2      cgd  * Revision 1.2  1993/05/20  03:39:40  cgd
     35      1.2      cgd  * add explicit rcs id
     36      1.2      cgd  *
     37      1.1      cgd  * Revision 1.1.1.1  1993/03/21  09:46:27  cgd
     38      1.1      cgd  * initial import of 386bsd-0.1 sources
     39      1.1      cgd  *
     40      1.1      cgd  * Revision 1.1  1992/03/25  21:45:42  pace
     41      1.1      cgd  * Initial revision
     42      1.1      cgd  *
     43      1.1      cgd  * Revision 2.4  91/02/05  17:07:35  mrt
     44      1.1      cgd  * 	Changed to new Mach copyright
     45      1.1      cgd  * 	[91/01/31  16:20:19  mrt]
     46      1.1      cgd  *
     47      1.1      cgd  * Revision 2.3  90/10/25  14:44:26  rwd
     48      1.1      cgd  * 	Changed db_write_cmd to print unsigned.
     49      1.1      cgd  * 	[90/10/19            rpd]
     50      1.1      cgd  *
     51      1.1      cgd  * Revision 2.2  90/08/27  21:53:54  dbg
     52      1.1      cgd  * 	Set db_prev and db_next instead of explicitly advancing dot.
     53      1.1      cgd  * 	[90/08/22            dbg]
     54      1.1      cgd  * 	Reflected changes in db_printsym()'s calling seq.
     55      1.1      cgd  * 	[90/08/20            af]
     56      1.1      cgd  * 	Warn user if nothing was written.
     57      1.1      cgd  * 	[90/08/07            dbg]
     58      1.1      cgd  * 	Created.
     59      1.1      cgd  * 	[90/07/25            dbg]
     60      1.1      cgd  *
     61      1.1      cgd  */
     62      1.1      cgd /*
     63      1.1      cgd  *	Author: David B. Golub,  Carnegie Mellon University
     64  1.2.4.1  mycroft  *	Date:	7/90
     65  1.2.4.1  mycroft  */
     66      1.1      cgd 
     67      1.1      cgd #include <sys/param.h>
     68      1.1      cgd #include <sys/proc.h>
     69      1.1      cgd #include <machine/db_machdep.h>
     70      1.1      cgd 
     71      1.1      cgd #include <ddb/db_lex.h>
     72      1.1      cgd #include <ddb/db_access.h>
     73      1.1      cgd #include <ddb/db_command.h>
     74      1.1      cgd #include <ddb/db_sym.h>
     75      1.1      cgd 
     76      1.1      cgd /*
     77      1.1      cgd  * Write to file.
     78      1.1      cgd  */
     79      1.1      cgd /*ARGSUSED*/
     80      1.1      cgd void
     81      1.1      cgd db_write_cmd(address, have_addr, count, modif)
     82      1.1      cgd 	db_expr_t	address;
     83      1.1      cgd 	boolean_t	have_addr;
     84      1.1      cgd 	db_expr_t	count;
     85      1.1      cgd 	char *		modif;
     86      1.1      cgd {
     87      1.1      cgd 	register
     88      1.1      cgd 	db_addr_t	addr;
     89      1.1      cgd 	register
     90      1.1      cgd 	db_expr_t	old_value;
     91      1.1      cgd 	db_expr_t	new_value;
     92      1.1      cgd 	register int	size;
     93      1.1      cgd 	boolean_t	wrote_one = FALSE;
     94      1.1      cgd 
     95      1.1      cgd 	addr = (db_addr_t) address;
     96      1.1      cgd 
     97      1.1      cgd 	switch (modif[0]) {
     98      1.1      cgd 	    case 'b':
     99      1.1      cgd 		size = 1;
    100      1.1      cgd 		break;
    101      1.1      cgd 	    case 'h':
    102      1.1      cgd 		size = 2;
    103      1.1      cgd 		break;
    104      1.1      cgd 	    case 'l':
    105      1.1      cgd 	    case '\0':
    106      1.1      cgd 		size = 4;
    107      1.1      cgd 		break;
    108      1.1      cgd 	    default:
    109      1.1      cgd 		db_error("Unknown size\n");
    110      1.1      cgd 		return;
    111      1.1      cgd 	}
    112      1.1      cgd 
    113      1.1      cgd 	while (db_expression(&new_value)) {
    114      1.1      cgd 	    old_value = db_get_value(addr, size, FALSE);
    115      1.1      cgd 	    db_printsym(addr, DB_STGY_ANY);
    116      1.1      cgd 	    db_printf("\t\t%#8n\t=\t%#8n\n", old_value, new_value);
    117      1.1      cgd 	    db_put_value(addr, size, new_value);
    118      1.1      cgd 	    addr += size;
    119      1.1      cgd 
    120      1.1      cgd 	    wrote_one = TRUE;
    121      1.1      cgd 	}
    122      1.1      cgd 
    123      1.1      cgd 	if (!wrote_one)
    124      1.1      cgd 	    db_error("Nothing written.\n");
    125      1.1      cgd 
    126      1.1      cgd 	db_next = addr;
    127      1.1      cgd 	db_prev = addr - size;
    128      1.1      cgd 
    129                   	db_skip_to_eol();
    130                   }
    131                   
    132