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