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