db_access.c revision 1.18.42.2 1 1.18.42.2 yamt /* $NetBSD: db_access.c,v 1.18.42.2 2010/03/11 15:03:20 yamt Exp $ */
2 1.5 cgd
3 1.17 simonb /*
4 1.1 cgd * Mach Operating System
5 1.1 cgd * Copyright (c) 1991,1990 Carnegie Mellon University
6 1.1 cgd * All Rights Reserved.
7 1.17 simonb *
8 1.1 cgd * Permission to use, copy, modify and distribute this software and its
9 1.1 cgd * documentation is hereby granted, provided that both the copyright
10 1.1 cgd * notice and this permission notice appear in all copies of the
11 1.1 cgd * software, derivative works or modified versions, and any portions
12 1.1 cgd * thereof, and that both notices appear in supporting documentation.
13 1.17 simonb *
14 1.13 pk * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
15 1.1 cgd * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
16 1.1 cgd * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
17 1.17 simonb *
18 1.1 cgd * Carnegie Mellon requests users of this software to return to
19 1.17 simonb *
20 1.1 cgd * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
21 1.1 cgd * School of Computer Science
22 1.1 cgd * Carnegie Mellon University
23 1.1 cgd * Pittsburgh PA 15213-3890
24 1.17 simonb *
25 1.1 cgd * any improvements or extensions that they make and grant Carnegie the
26 1.1 cgd * rights to redistribute these changes.
27 1.2 cgd *
28 1.1 cgd * Author: David B. Golub, Carnegie Mellon University
29 1.1 cgd * Date: 7/90
30 1.1 cgd */
31 1.16 lukem
32 1.16 lukem #include <sys/cdefs.h>
33 1.18.42.2 yamt __KERNEL_RCSID(0, "$NetBSD: db_access.c,v 1.18.42.2 2010/03/11 15:03:20 yamt Exp $");
34 1.18.42.2 yamt
35 1.18.42.2 yamt #if defined(_KERNEL_OPT)
36 1.18.42.2 yamt #include "opt_kgdb.h"
37 1.18.42.2 yamt #endif
38 1.3 mycroft
39 1.3 mycroft #include <sys/param.h>
40 1.3 mycroft #include <sys/proc.h>
41 1.18.42.1 yamt #include <sys/endian.h>
42 1.3 mycroft
43 1.18.42.1 yamt #include <ddb/ddb.h>
44 1.7 mycroft
45 1.1 cgd /*
46 1.1 cgd * Access unaligned data items on aligned (longword)
47 1.1 cgd * boundaries.
48 1.18.42.2 yamt *
49 1.18.42.2 yamt * This file is shared by ddb, kgdb and crash(8).
50 1.1 cgd */
51 1.1 cgd
52 1.18.42.2 yamt #if defined(DDB) || !defined(DDB) && !defined(KGDB)
53 1.18.42.2 yamt #define _COMPILE_THIS
54 1.18.42.2 yamt #endif
55 1.18.42.2 yamt
56 1.18.42.2 yamt #if defined(_COMPILE_THIS) || defined(KGDB) && defined(SOFTWARE_SSTEP)
57 1.18.42.2 yamt
58 1.15 jdolecek const int db_extend[] = { /* table for sign-extending */
59 1.1 cgd 0,
60 1.1 cgd 0xFFFFFF80,
61 1.1 cgd 0xFFFF8000,
62 1.1 cgd 0xFF800000
63 1.1 cgd };
64 1.1 cgd
65 1.1 cgd db_expr_t
66 1.18 thorpej db_get_value(db_addr_t addr, size_t size, bool is_signed)
67 1.1 cgd {
68 1.9 thorpej char data[sizeof(db_expr_t)];
69 1.14 augustss db_expr_t value;
70 1.14 augustss size_t i;
71 1.1 cgd
72 1.1 cgd db_read_bytes(addr, size, data);
73 1.1 cgd
74 1.1 cgd value = 0;
75 1.8 mycroft #if BYTE_ORDER == LITTLE_ENDIAN
76 1.11 pk for (i = size; i-- > 0;)
77 1.8 mycroft #else /* BYTE_ORDER == BIG_ENDIAN */
78 1.1 cgd for (i = 0; i < size; i++)
79 1.8 mycroft #endif /* BYTE_ORDER */
80 1.8 mycroft value = (value << 8) + (data[i] & 0xFF);
81 1.17 simonb
82 1.8 mycroft if (size < 4 && is_signed && (value & db_extend[size]) != 0)
83 1.1 cgd value |= db_extend[size];
84 1.1 cgd return (value);
85 1.1 cgd }
86 1.1 cgd
87 1.1 cgd void
88 1.17 simonb db_put_value(db_addr_t addr, size_t size, db_expr_t value)
89 1.1 cgd {
90 1.9 thorpej char data[sizeof(db_expr_t)];
91 1.14 augustss size_t i;
92 1.1 cgd
93 1.8 mycroft #if BYTE_ORDER == LITTLE_ENDIAN
94 1.8 mycroft for (i = 0; i < size; i++)
95 1.8 mycroft #else /* BYTE_ORDER == BIG_ENDIAN */
96 1.11 pk for (i = size; i-- > 0;)
97 1.8 mycroft #endif /* BYTE_ORDER */
98 1.1 cgd {
99 1.8 mycroft data[i] = value & 0xFF;
100 1.8 mycroft value >>= 8;
101 1.1 cgd }
102 1.1 cgd
103 1.1 cgd db_write_bytes(addr, size, data);
104 1.1 cgd }
105 1.18.42.1 yamt
106 1.18.42.2 yamt #endif /* _COMPILE_THIS || KGDB && SOFTWARE_SSTEP */
107 1.18.42.2 yamt
108 1.18.42.2 yamt #ifdef _COMPILE_THIS
109 1.18.42.2 yamt
110 1.18.42.1 yamt void *
111 1.18.42.1 yamt db_read_ptr(const char *name)
112 1.18.42.1 yamt {
113 1.18.42.1 yamt db_expr_t val;
114 1.18.42.1 yamt void *p;
115 1.18.42.1 yamt
116 1.18.42.1 yamt if (!db_value_of_name(name, &val)) {
117 1.18.42.1 yamt db_printf("db_read_ptr: cannot find `%s'\n", name);
118 1.18.42.1 yamt db_error(NULL);
119 1.18.42.1 yamt /* NOTREACHED */
120 1.18.42.1 yamt }
121 1.18.42.1 yamt db_read_bytes((db_addr_t)val, sizeof(p), (char *)&p);
122 1.18.42.1 yamt return p;
123 1.18.42.1 yamt }
124 1.18.42.1 yamt
125 1.18.42.1 yamt int
126 1.18.42.1 yamt db_read_int(const char *name)
127 1.18.42.1 yamt {
128 1.18.42.1 yamt db_expr_t val;
129 1.18.42.1 yamt int p;
130 1.18.42.1 yamt
131 1.18.42.1 yamt if (!db_value_of_name(name, &val)) {
132 1.18.42.1 yamt db_printf("db_read_int: cannot find `%s'\n", name);
133 1.18.42.1 yamt db_error(NULL);
134 1.18.42.1 yamt /* NOTREACHED */
135 1.18.42.1 yamt }
136 1.18.42.1 yamt db_read_bytes((db_addr_t)val, sizeof(p), (char *)&p);
137 1.18.42.1 yamt return p;
138 1.18.42.1 yamt }
139 1.18.42.2 yamt
140 1.18.42.2 yamt #endif /* _COMPILE_THIS */
141