1 1.21 christos /* $NetBSD: kvm_vax.c,v 1.21 2022/01/10 19:51:30 christos Exp $ */ 2 1.3 thorpej 3 1.1 ragge /*- 4 1.1 ragge * Copyright (c) 1992, 1993 5 1.1 ragge * The Regents of the University of California. All rights reserved. 6 1.1 ragge * 7 1.1 ragge * This code is derived from software developed by the Computer Systems 8 1.1 ragge * Engineering group at Lawrence Berkeley Laboratory under DARPA contract 9 1.1 ragge * BG 91-66 and contributed to Berkeley. 10 1.1 ragge * 11 1.1 ragge * Redistribution and use in source and binary forms, with or without 12 1.1 ragge * modification, are permitted provided that the following conditions 13 1.1 ragge * are met: 14 1.1 ragge * 1. Redistributions of source code must retain the above copyright 15 1.1 ragge * notice, this list of conditions and the following disclaimer. 16 1.1 ragge * 2. Redistributions in binary form must reproduce the above copyright 17 1.1 ragge * notice, this list of conditions and the following disclaimer in the 18 1.1 ragge * documentation and/or other materials provided with the distribution. 19 1.16 agc * 3. Neither the name of the University nor the names of its contributors 20 1.1 ragge * may be used to endorse or promote products derived from this software 21 1.1 ragge * without specific prior written permission. 22 1.1 ragge * 23 1.1 ragge * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 1.1 ragge * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 1.1 ragge * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 1.1 ragge * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 1.1 ragge * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 1.1 ragge * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 1.1 ragge * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 1.1 ragge * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 1.1 ragge * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 1.1 ragge * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 1.1 ragge * SUCH DAMAGE. 34 1.1 ragge */ 35 1.1 ragge 36 1.1 ragge /* 37 1.1 ragge * VAX machine dependent routines for kvm. Hopefully, the forthcoming 38 1.1 ragge * vm code will one day obsolete this module. Furthermore, I hope it 39 1.1 ragge * gets here soon, because this basically is an error stub! (sorry) 40 1.1 ragge * This code may not work anyway. 41 1.1 ragge */ 42 1.1 ragge 43 1.1 ragge #include <sys/param.h> 44 1.1 ragge #include <sys/proc.h> 45 1.1 ragge #include <sys/stat.h> 46 1.18 jym #include <sys/types.h> 47 1.18 jym 48 1.1 ragge #include <unistd.h> 49 1.1 ragge #include <nlist.h> 50 1.6 ragge #include <stdlib.h> 51 1.1 ragge #include <kvm.h> 52 1.1 ragge 53 1.10 mrg #include <uvm/uvm_extern.h> 54 1.1 ragge 55 1.13 chuck #include <machine/vmparam.h> 56 1.13 chuck 57 1.1 ragge #include <limits.h> 58 1.1 ragge #include <db.h> 59 1.1 ragge 60 1.1 ragge #include "kvm_private.h" 61 1.13 chuck 62 1.21 christos __RCSID("$NetBSD: kvm_vax.c,v 1.21 2022/01/10 19:51:30 christos Exp $"); 63 1.1 ragge 64 1.1 ragge struct vmstate { 65 1.1 ragge u_long end; 66 1.1 ragge }; 67 1.1 ragge 68 1.1 ragge void 69 1.17 jym _kvm_freevtop(kvm_t *kd) 70 1.1 ragge { 71 1.1 ragge if (kd->vmst != 0) 72 1.1 ragge free(kd->vmst); 73 1.1 ragge } 74 1.1 ragge 75 1.1 ragge int 76 1.17 jym _kvm_initvtop(kvm_t *kd) 77 1.1 ragge { 78 1.7 perry struct vmstate *vm; 79 1.1 ragge struct stat st; 80 1.14 thorpej struct nlist nl[2]; 81 1.1 ragge 82 1.1 ragge vm = (struct vmstate *)_kvm_malloc(kd, sizeof(*vm)); 83 1.1 ragge if (vm == 0) 84 1.1 ragge return (-1); 85 1.1 ragge 86 1.1 ragge kd->vmst = vm; 87 1.1 ragge 88 1.1 ragge if (fstat(kd->pmfd, &st) < 0) 89 1.1 ragge return (-1); 90 1.1 ragge 91 1.1 ragge /* Get end of kernel address */ 92 1.14 thorpej nl[0].n_name = "_end"; 93 1.14 thorpej nl[1].n_name = 0; 94 1.14 thorpej if (kvm_nlist(kd, nl) != 0) { 95 1.1 ragge _kvm_err(kd, kd->program, "pmap_stod: no such symbol"); 96 1.1 ragge return (-1); 97 1.1 ragge } 98 1.14 thorpej vm->end = (u_long)nl[0].n_value; 99 1.1 ragge 100 1.1 ragge return (0); 101 1.1 ragge } 102 1.1 ragge 103 1.1 ragge #define VA_OFF(va) (va & (NBPG - 1)) 104 1.1 ragge 105 1.1 ragge /* 106 1.1 ragge * Translate a kernel virtual address to a physical address using the 107 1.1 ragge * mapping information in kd->vm. Returns the result in pa, and returns 108 1.8 simonb * the number of bytes that are contiguously available from this 109 1.15 wiz * physical address. This routine is used only for crash dumps. 110 1.1 ragge */ 111 1.1 ragge int 112 1.18 jym _kvm_kvatop(kvm_t *kd, vaddr_t va, paddr_t *pa) 113 1.1 ragge { 114 1.12 matt u_long end; 115 1.1 ragge 116 1.12 matt if (va < (u_long) KERNBASE) { 117 1.18 jym _kvm_err(kd, 0, "invalid address (%#"PRIxVADDR"<%lx)", va, 118 1.18 jym (u_long)KERNBASE); 119 1.1 ragge return (0); 120 1.1 ragge } 121 1.1 ragge 122 1.1 ragge end = kd->vmst->end; 123 1.1 ragge if (va >= end) { 124 1.18 jym _kvm_err(kd, 0, "invalid address (%#"PRIxVADDR"<%lx)", va, 125 1.18 jym end); 126 1.1 ragge return (0); 127 1.1 ragge } 128 1.1 ragge 129 1.12 matt *pa = (va - (u_long) KERNBASE); 130 1.1 ragge return (end - va); 131 1.1 ragge } 132 1.4 ragge 133 1.8 simonb /* 134 1.15 wiz * Translate a physical address to a file-offset in the crash dump. 135 1.15 wiz * XXX - crash dump doesn't work anyway. 136 1.4 ragge */ 137 1.4 ragge off_t 138 1.18 jym _kvm_pa2off(kvm_t *kd, paddr_t pa) 139 1.4 ragge { 140 1.4 ragge return(kd->dump_off + pa); 141 1.4 ragge } 142 1.4 ragge 143 1.5 gwr 144 1.5 gwr /* 145 1.5 gwr * Machine-dependent initialization for ALL open kvm descriptors, 146 1.5 gwr * not just those for a kernel crash dump. Some architectures 147 1.5 gwr * have to deal with these NOT being constants! (i.e. m68k) 148 1.5 gwr */ 149 1.5 gwr int 150 1.17 jym _kvm_mdopen(kvm_t *kd) 151 1.5 gwr { 152 1.5 gwr 153 1.5 gwr kd->min_uva = VM_MIN_ADDRESS; 154 1.5 gwr kd->max_uva = VM_MAXUSER_ADDRESS; 155 1.5 gwr 156 1.5 gwr return (0); 157 1.5 gwr } 158