1 | /* $NetBSD: db_write_cmd.c,v 1.27 2015/06/06 22:06:05 matt 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 "AS IS" |
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/cdefs.h> |
33 | __KERNEL_RCSID(0, "$NetBSD: db_write_cmd.c,v 1.27 2015/06/06 22:06:05 matt Exp $" ); |
34 | |
35 | #include <sys/param.h> |
36 | #include <sys/proc.h> |
37 | |
38 | #include <ddb/ddb.h> |
39 | |
40 | /* |
41 | * Write to file. |
42 | */ |
43 | /*ARGSUSED*/ |
44 | void |
45 | db_write_cmd(db_expr_t address, bool have_addr, |
46 | db_expr_t count, const char *modif) |
47 | { |
48 | db_addr_t addr; |
49 | db_expr_t old_value; |
50 | db_expr_t new_value; |
51 | int size; |
52 | bool wrote_one; |
53 | bool show_old_val; |
54 | |
55 | addr = (db_addr_t) address; |
56 | wrote_one = false; |
57 | show_old_val = islower((unsigned char)modif[0]); |
58 | |
59 | switch (tolower((unsigned char)modif[0])) { |
60 | case 'b': |
61 | size = 1; |
62 | break; |
63 | case 'h': |
64 | size = 2; |
65 | break; |
66 | case 'l': |
67 | case '\0': |
68 | size = 4; |
69 | break; |
70 | case 'q': |
71 | if (sizeof(db_expr_t) != sizeof(uint64_t)) { |
72 | size = -1; |
73 | db_error("q not supported\n" ); |
74 | /*NOTREACHED*/ |
75 | } |
76 | case 'L': |
77 | size = sizeof(db_expr_t); |
78 | break; |
79 | default: |
80 | size = -1; |
81 | db_error("Unknown size\n" ); |
82 | /*NOTREACHED*/ |
83 | } |
84 | |
85 | while (db_expression(&new_value)) { |
86 | db_printsym(addr, DB_STGY_ANY, db_printf); |
87 | if (show_old_val) { |
88 | old_value = db_get_value(addr, size, false); |
89 | db_printf("\t\t%s = " , db_num_to_str(old_value)); |
90 | db_printf("%s\n" , db_num_to_str(new_value)); |
91 | } |
92 | else |
93 | db_printf("\t\t= %s\n" , db_num_to_str(new_value)); |
94 | db_put_value(addr, size, new_value); |
95 | addr += size; |
96 | |
97 | wrote_one = true; |
98 | } |
99 | |
100 | if (!wrote_one) { |
101 | db_error("Nothing written.\n" ); |
102 | /*NOTREACHED*/ |
103 | } |
104 | |
105 | db_next = addr; |
106 | db_prev = addr - size; |
107 | |
108 | db_skip_to_eol(); |
109 | } |
110 | |