1 /* $NetBSD: kvm_i386.c,v 1.9 1996/03/18 22:33:38 thorpej Exp $ */ 2 3 /*- 4 * Copyright (c) 1989, 1992, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * This code is derived from software developed by the Computer Systems 8 * Engineering group at Lawrence Berkeley Laboratory under DARPA contract 9 * BG 91-66 and contributed to Berkeley. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgement: 21 * This product includes software developed by the University of 22 * California, Berkeley and its contributors. 23 * 4. Neither the name of the University nor the names of its contributors 24 * may be used to endorse or promote products derived from this software 25 * without specific prior written permission. 26 * 27 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 28 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 29 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 30 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 31 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 32 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 33 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 35 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 36 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 37 * SUCH DAMAGE. 38 */ 39 40 #if defined(LIBC_SCCS) && !defined(lint) 41 #if 0 42 static char sccsid[] = "@(#)kvm_hp300.c 8.1 (Berkeley) 6/4/93"; 43 #else 44 static char *rcsid = "$NetBSD: kvm_i386.c,v 1.9 1996/03/18 22:33:38 thorpej Exp $"; 45 #endif 46 #endif /* LIBC_SCCS and not lint */ 47 48 /* 49 * i386 machine dependent routines for kvm. Hopefully, the forthcoming 50 * vm code will one day obsolete this module. 51 */ 52 53 #include <sys/param.h> 54 #include <sys/user.h> 55 #include <sys/proc.h> 56 #include <sys/stat.h> 57 #include <stdlib.h> 58 #include <unistd.h> 59 #include <nlist.h> 60 #include <kvm.h> 61 62 #include <vm/vm.h> 63 #include <vm/vm_param.h> 64 65 #include <limits.h> 66 #include <db.h> 67 68 #include "kvm_private.h" 69 70 #include <machine/pte.h> 71 72 #ifndef btop 73 #define btop(x) (((unsigned)(x)) >> PGSHIFT) /* XXX */ 74 #define ptob(x) ((caddr_t)((x) << PGSHIFT)) /* XXX */ 75 #endif 76 77 struct vmstate { 78 pd_entry_t *PTD; 79 }; 80 81 void 82 _kvm_freevtop(kd) 83 kvm_t *kd; 84 { 85 if (kd->vmst != 0) { 86 if (kd->vmst->PTD != 0) 87 free(kd->vmst->PTD); 88 89 free(kd->vmst); 90 } 91 } 92 93 int 94 _kvm_initvtop(kd) 95 kvm_t *kd; 96 { 97 struct vmstate *vm; 98 struct nlist nlist[2]; 99 u_long pa; 100 101 vm = (struct vmstate *)_kvm_malloc(kd, sizeof(*vm)); 102 if (vm == 0) 103 return (-1); 104 kd->vmst = vm; 105 106 nlist[0].n_name = "_PTDpaddr"; 107 nlist[1].n_name = 0; 108 109 if (kvm_nlist(kd, nlist) != 0) { 110 _kvm_err(kd, kd->program, "bad namelist"); 111 return (-1); 112 } 113 114 vm->PTD = 0; 115 116 if (lseek(kd->pmfd, (off_t)(nlist[0].n_value - KERNBASE), 0) == -1 && 117 errno != 0) { 118 _kvm_syserr(kd, kd->program, "kvm_lseek"); 119 goto invalid; 120 } 121 if (read(kd->pmfd, &pa, sizeof pa) != sizeof pa) { 122 _kvm_syserr(kd, kd->program, "kvm_read"); 123 goto invalid; 124 } 125 126 vm->PTD = (pd_entry_t *)_kvm_malloc(kd, NBPG); 127 128 if (lseek(kd->pmfd, (off_t)pa, 0) == -1 && errno != 0) { 129 _kvm_syserr(kd, kd->program, "kvm_lseek"); 130 goto invalid; 131 } 132 if (read(kd->pmfd, vm->PTD, NBPG) != NBPG) { 133 _kvm_syserr(kd, kd->program, "kvm_read"); 134 goto invalid; 135 } 136 137 return (0); 138 139 invalid: 140 if (vm->PTD != 0) 141 free(vm->PTD); 142 return (-1); 143 } 144 145 /* 146 * Translate a kernel virtual address to a physical address. 147 */ 148 int 149 _kvm_kvatop(kd, va, pa) 150 kvm_t *kd; 151 u_long va; 152 u_long *pa; 153 { 154 struct vmstate *vm; 155 u_long offset; 156 u_long pte_pa; 157 pt_entry_t pte; 158 159 if (ISALIVE(kd)) { 160 _kvm_err(kd, 0, "vatop called in live kernel!"); 161 return(0); 162 } 163 164 vm = kd->vmst; 165 offset = va & PGOFSET; 166 167 /* 168 * If we are initializing (kernel page table descriptor pointer 169 * not yet set) * then return pa == va to avoid infinite recursion. 170 */ 171 if (vm->PTD == 0) { 172 *pa = va; 173 return (NBPG - offset); 174 } 175 if ((vm->PTD[pdei(va)] & PG_V) == 0) 176 goto invalid; 177 178 pte_pa = (vm->PTD[pdei(va)] & PG_FRAME) + 179 (ptei(va) * sizeof(pt_entry_t)); 180 /* XXX READ PHYSICAL XXX */ 181 { 182 if (lseek(kd->pmfd, (off_t)pte_pa, 0) == -1 && errno != 0) { 183 _kvm_syserr(kd, kd->program, "kvm_lseek"); 184 goto invalid; 185 } 186 if (read(kd->pmfd, &pte, sizeof pte) != sizeof pte) { 187 _kvm_syserr(kd, kd->program, "kvm_read"); 188 goto invalid; 189 } 190 } 191 192 *pa = (pte & PG_FRAME) + offset; 193 return (NBPG - offset); 194 195 invalid: 196 _kvm_err(kd, 0, "invalid address (%x)", va); 197 return (0); 198 } 199