Home | History | Annotate | Line # | Download | only in ddb
db_write_cmd.c revision 1.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.1  cgd  * HISTORY
     28  1.1  cgd  * $Log: db_write_cmd.c,v $
     29  1.1  cgd  * Revision 1.1  1993/03/21 09:45:37  cgd
     30  1.1  cgd  * Initial revision
     31  1.1  cgd  *
     32  1.1  cgd  * Revision 1.1  1992/03/25  21:45:42  pace
     33  1.1  cgd  * Initial revision
     34  1.1  cgd  *
     35  1.1  cgd  * Revision 2.4  91/02/05  17:07:35  mrt
     36  1.1  cgd  * 	Changed to new Mach copyright
     37  1.1  cgd  * 	[91/01/31  16:20:19  mrt]
     38  1.1  cgd  *
     39  1.1  cgd  * Revision 2.3  90/10/25  14:44:26  rwd
     40  1.1  cgd  * 	Changed db_write_cmd to print unsigned.
     41  1.1  cgd  * 	[90/10/19            rpd]
     42  1.1  cgd  *
     43  1.1  cgd  * Revision 2.2  90/08/27  21:53:54  dbg
     44  1.1  cgd  * 	Set db_prev and db_next instead of explicitly advancing dot.
     45  1.1  cgd  * 	[90/08/22            dbg]
     46  1.1  cgd  * 	Reflected changes in db_printsym()'s calling seq.
     47  1.1  cgd  * 	[90/08/20            af]
     48  1.1  cgd  * 	Warn user if nothing was written.
     49  1.1  cgd  * 	[90/08/07            dbg]
     50  1.1  cgd  * 	Created.
     51  1.1  cgd  * 	[90/07/25            dbg]
     52  1.1  cgd  *
     53  1.1  cgd  */
     54  1.1  cgd /*
     55  1.1  cgd  *	Author: David B. Golub,  Carnegie Mellon University
     56  1.1  cgd  *	Date:	7/90
     57  1.1  cgd  */
     58  1.1  cgd 
     59  1.1  cgd #include "param.h"
     60  1.1  cgd #include "proc.h"
     61  1.1  cgd #include <machine/db_machdep.h>
     62  1.1  cgd 
     63  1.1  cgd #include <ddb/db_lex.h>
     64  1.1  cgd #include <ddb/db_access.h>
     65  1.1  cgd #include <ddb/db_command.h>
     66  1.1  cgd #include <ddb/db_sym.h>
     67  1.1  cgd 
     68  1.1  cgd /*
     69  1.1  cgd  * Write to file.
     70  1.1  cgd  */
     71  1.1  cgd /*ARGSUSED*/
     72  1.1  cgd void
     73  1.1  cgd db_write_cmd(address, have_addr, count, modif)
     74  1.1  cgd 	db_expr_t	address;
     75  1.1  cgd 	boolean_t	have_addr;
     76  1.1  cgd 	db_expr_t	count;
     77  1.1  cgd 	char *		modif;
     78  1.1  cgd {
     79  1.1  cgd 	register
     80  1.1  cgd 	db_addr_t	addr;
     81  1.1  cgd 	register
     82  1.1  cgd 	db_expr_t	old_value;
     83  1.1  cgd 	db_expr_t	new_value;
     84  1.1  cgd 	register int	size;
     85  1.1  cgd 	boolean_t	wrote_one = FALSE;
     86  1.1  cgd 
     87  1.1  cgd 	addr = (db_addr_t) address;
     88  1.1  cgd 
     89  1.1  cgd 	switch (modif[0]) {
     90  1.1  cgd 	    case 'b':
     91  1.1  cgd 		size = 1;
     92  1.1  cgd 		break;
     93  1.1  cgd 	    case 'h':
     94  1.1  cgd 		size = 2;
     95  1.1  cgd 		break;
     96  1.1  cgd 	    case 'l':
     97  1.1  cgd 	    case '\0':
     98  1.1  cgd 		size = 4;
     99  1.1  cgd 		break;
    100  1.1  cgd 	    default:
    101  1.1  cgd 		db_error("Unknown size\n");
    102  1.1  cgd 		return;
    103  1.1  cgd 	}
    104  1.1  cgd 
    105  1.1  cgd 	while (db_expression(&new_value)) {
    106  1.1  cgd 	    old_value = db_get_value(addr, size, FALSE);
    107  1.1  cgd 	    db_printsym(addr, DB_STGY_ANY);
    108  1.1  cgd 	    db_printf("\t\t%#8n\t=\t%#8n\n", old_value, new_value);
    109  1.1  cgd 	    db_put_value(addr, size, new_value);
    110  1.1  cgd 	    addr += size;
    111  1.1  cgd 
    112  1.1  cgd 	    wrote_one = TRUE;
    113  1.1  cgd 	}
    114  1.1  cgd 
    115  1.1  cgd 	if (!wrote_one)
    116  1.1  cgd 	    db_error("Nothing written.\n");
    117  1.1  cgd 
    118  1.1  cgd 	db_next = addr;
    119  1.1  cgd 	db_prev = addr - size;
    120  1.1  cgd 
    121           	db_skip_to_eol();
    122           }
    123           
    124