| 1 | /* $NetBSD: db_access.c,v 1.22 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_access.c,v 1.22 2015/06/06 22:06:05 matt Exp $" ); |
| 34 | |
| 35 | #if defined(_KERNEL_OPT) |
| 36 | #include "opt_kgdb.h" |
| 37 | #endif |
| 38 | |
| 39 | #include <sys/param.h> |
| 40 | #include <sys/proc.h> |
| 41 | #include <sys/endian.h> |
| 42 | |
| 43 | #include <ddb/ddb.h> |
| 44 | |
| 45 | /* |
| 46 | * Access unaligned data items on aligned (longword) |
| 47 | * boundaries. |
| 48 | * |
| 49 | * This file is shared by ddb, kgdb and crash(8). |
| 50 | */ |
| 51 | |
| 52 | #if defined(DDB) || !defined(DDB) && !defined(KGDB) |
| 53 | #define _COMPILE_THIS |
| 54 | #endif |
| 55 | |
| 56 | #if defined(_COMPILE_THIS) || defined(KGDB) && defined(SOFTWARE_SSTEP) |
| 57 | |
| 58 | db_expr_t |
| 59 | db_get_value(db_addr_t addr, size_t size, bool is_signed) |
| 60 | { |
| 61 | char data[sizeof(db_expr_t)] __aligned(sizeof(db_expr_t)); |
| 62 | db_expr_t value; |
| 63 | size_t i; |
| 64 | |
| 65 | db_read_bytes(addr, size, data); |
| 66 | |
| 67 | value = 0; |
| 68 | #if BYTE_ORDER == LITTLE_ENDIAN |
| 69 | for (i = size; i-- > 0;) |
| 70 | #else /* BYTE_ORDER == BIG_ENDIAN */ |
| 71 | for (i = 0; i < size; i++) |
| 72 | #endif /* BYTE_ORDER */ |
| 73 | value = (value << 8) + (data[i] & 0xFF); |
| 74 | |
| 75 | if (size < sizeof(db_expr_t) && is_signed |
| 76 | && (value & ((db_expr_t)1 << (8*size - 1)))) { |
| 77 | value |= ~(db_expr_t)0 << (8*size - 1); |
| 78 | } |
| 79 | return (value); |
| 80 | } |
| 81 | |
| 82 | void |
| 83 | db_put_value(db_addr_t addr, size_t size, db_expr_t value) |
| 84 | { |
| 85 | char data[sizeof(db_expr_t)] __aligned(sizeof(db_expr_t)); |
| 86 | size_t i; |
| 87 | |
| 88 | #if BYTE_ORDER == LITTLE_ENDIAN |
| 89 | for (i = 0; i < size; i++) |
| 90 | #else /* BYTE_ORDER == BIG_ENDIAN */ |
| 91 | for (i = size; i-- > 0;) |
| 92 | #endif /* BYTE_ORDER */ |
| 93 | { |
| 94 | data[i] = value & 0xFF; |
| 95 | value >>= 8; |
| 96 | } |
| 97 | |
| 98 | db_write_bytes(addr, size, data); |
| 99 | } |
| 100 | |
| 101 | #endif /* _COMPILE_THIS || KGDB && SOFTWARE_SSTEP */ |
| 102 | |
| 103 | #ifdef _COMPILE_THIS |
| 104 | |
| 105 | void * |
| 106 | db_read_ptr(const char *name) |
| 107 | { |
| 108 | db_expr_t val; |
| 109 | void *p; |
| 110 | |
| 111 | if (!db_value_of_name(name, &val)) { |
| 112 | db_printf("db_read_ptr: cannot find `%s'\n" , name); |
| 113 | db_error(NULL); |
| 114 | /* NOTREACHED */ |
| 115 | } |
| 116 | db_read_bytes((db_addr_t)val, sizeof(p), (char *)&p); |
| 117 | return p; |
| 118 | } |
| 119 | |
| 120 | int |
| 121 | db_read_int(const char *name) |
| 122 | { |
| 123 | db_expr_t val; |
| 124 | int p; |
| 125 | |
| 126 | if (!db_value_of_name(name, &val)) { |
| 127 | db_printf("db_read_int: cannot find `%s'\n" , name); |
| 128 | db_error(NULL); |
| 129 | /* NOTREACHED */ |
| 130 | } |
| 131 | db_read_bytes((db_addr_t)val, sizeof(p), (char *)&p); |
| 132 | return p; |
| 133 | } |
| 134 | |
| 135 | #endif /* _COMPILE_THIS */ |
| 136 | |