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