1 /* $NetBSD: db_write_cmd.c,v 1.8 1997/02/04 00:32:09 cgd Exp $ */ 2 3 /* 4 * Mach Operating System 5 * Copyright (c) 1991,1990 Carnegie Mellon University 6 * All Rights Reserved. 7 * 8 * Permission to use, copy, modify and distribute this software and its 9 * documentation is hereby granted, provided that both the copyright 10 * notice and this permission notice appear in all copies of the 11 * software, derivative works or modified versions, and any portions 12 * thereof, and that both notices appear in supporting documentation. 13 * 14 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS 15 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR 16 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 17 * 18 * Carnegie Mellon requests users of this software to return to 19 * 20 * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU 21 * School of Computer Science 22 * Carnegie Mellon University 23 * Pittsburgh PA 15213-3890 24 * 25 * any improvements or extensions that they make and grant Carnegie the 26 * rights to redistribute these changes. 27 * 28 * Author: David B. Golub, Carnegie Mellon University 29 * Date: 7/90 30 */ 31 32 #include <sys/param.h> 33 #include <sys/proc.h> 34 35 #include <machine/db_machdep.h> 36 37 #include <ddb/db_lex.h> 38 #include <ddb/db_access.h> 39 #include <ddb/db_command.h> 40 #include <ddb/db_sym.h> 41 #include <ddb/db_extern.h> 42 #include <ddb/db_output.h> 43 44 /* 45 * Write to file. 46 */ 47 /*ARGSUSED*/ 48 void 49 db_write_cmd(address, have_addr, count, modif) 50 db_expr_t address; 51 boolean_t have_addr; 52 db_expr_t count; 53 char * modif; 54 { 55 register 56 db_addr_t addr; 57 register 58 db_expr_t old_value; 59 db_expr_t new_value; 60 register int size; 61 boolean_t wrote_one = FALSE; 62 63 addr = (db_addr_t) address; 64 65 switch (modif[0]) { 66 case 'b': 67 size = 1; 68 break; 69 case 'h': 70 size = 2; 71 break; 72 case 'l': 73 case '\0': 74 size = 4; 75 break; 76 default: 77 size = -1; 78 db_error("Unknown size\n"); 79 /*NOTREACHED*/ 80 } 81 82 while (db_expression(&new_value)) { 83 old_value = db_get_value(addr, size, FALSE); 84 db_printsym(addr, DB_STGY_ANY); 85 db_printf("\t\t%#*ln = %#*ln\n", (sizeof (old_value) * 2) + 2, 86 old_value, (sizeof (new_value) * 2) + 2, new_value); 87 db_put_value(addr, size, new_value); 88 addr += size; 89 90 wrote_one = TRUE; 91 } 92 93 if (!wrote_one) { 94 db_error("Nothing written.\n"); 95 /*NOTREACHED*/ 96 } 97 98 db_next = addr; 99 db_prev = addr - size; 100 101 db_skip_to_eol(); 102 } 103 104