2 * Copyright (c) 1989, 1992, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software developed by the Computer Systems
6 * Engineering group at Lawrence Berkeley Laboratory under DARPA contract
7 * BG 91-66 and contributed to Berkeley.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * from: FreeBSD: src/lib/libkvm/kvm_i386.c,v 1.15 2001/10/10 17:48:43
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
39 #if defined(LIBC_SCCS) && !defined(lint)
41 static char sccsid[] = "@(#)kvm_hp300.c 8.1 (Berkeley) 6/4/93";
43 #endif /* LIBC_SCCS and not lint */
46 * sparc64 machine dependent routines for kvm.
49 #include <sys/param.h>
59 #include <vm/vm_param.h>
61 #include <machine/kerneldump.h>
62 #include <machine/tte.h>
63 #include <machine/tlb.h>
64 #include <machine/tsb.h>
68 #include "kvm_private.h"
71 #define btop(x) (sparc64_btop(x))
72 #define ptob(x) (sparc64_ptob(x))
77 vm_size_t vm_tsb_mask;
79 struct sparc64_dump_reg *vm_regions;
83 _kvm_freevtop(kvm_t *kd)
86 free(kd->vmst->vm_regions);
92 _kvm_read_phys(kvm_t *kd, off_t pos, void *buf, size_t size)
95 /* XXX This has to be a raw file read, kvm_read is virtual. */
96 if (lseek(kd->pmfd, pos, SEEK_SET) == -1) {
97 _kvm_syserr(kd, kd->program, "_kvm_read_phys: lseek");
100 if (read(kd->pmfd, buf, size) != size) {
101 _kvm_syserr(kd, kd->program, "_kvm_read_phys: read");
108 _kvm_reg_cmp(const void *a, const void *b)
110 const struct sparc64_dump_reg *ra, *rb;
114 if (ra->dr_pa < rb->dr_pa)
116 else if (ra->dr_pa >= rb->dr_pa + rb->dr_size)
122 #define KVM_OFF_NOTFOUND 0
125 _kvm_find_off(struct vmstate *vm, vm_offset_t pa, vm_size_t size)
127 struct sparc64_dump_reg *reg, key;
131 reg = bsearch(&key, vm->vm_regions, vm->vm_nregions,
132 sizeof(*vm->vm_regions), _kvm_reg_cmp);
134 return (KVM_OFF_NOTFOUND);
136 if (o + size > reg->dr_size)
137 return (KVM_OFF_NOTFOUND);
138 return (reg->dr_offs + o);
142 _kvm_initvtop(kvm_t *kd)
144 struct sparc64_dump_hdr hdr;
145 struct sparc64_dump_reg *regs;
151 vm = (struct vmstate *)_kvm_malloc(kd, sizeof(*vm));
153 _kvm_err(kd, kd->program, "cannot allocate vm");
158 if (!_kvm_read_phys(kd, 0, &hdr, sizeof(hdr)))
162 regsz = hdr.dh_nregions * sizeof(*regs);
163 regs = _kvm_malloc(kd, regsz);
165 _kvm_err(kd, kd->program, "cannot allocate regions");
168 if (!_kvm_read_phys(kd, sizeof(hdr), regs, regsz))
170 qsort(regs, hdr.dh_nregions, sizeof(*regs), _kvm_reg_cmp);
172 vm->vm_tsb_mask = hdr.dh_tsb_mask;
173 vm->vm_regions = regs;
174 vm->vm_nregions = hdr.dh_nregions;
175 vm->vm_tsb_off = _kvm_find_off(vm, hdr.dh_tsb_pa, hdr.dh_tsb_size);
176 if (vm->vm_tsb_off == KVM_OFF_NOTFOUND) {
177 _kvm_err(kd, kd->program, "tsb not found in dump");
190 _kvm_kvatop(kvm_t *kd, u_long va, off_t *pa)
196 off_t tte_off, pa_off;
200 pg_off = va & PAGE_MASK;
201 if (va >= VM_MIN_DIRECT_ADDRESS)
202 pa_off = TLB_DIRECT_TO_PHYS(va) & ~PAGE_MASK;
206 tte_off = kd->vmst->vm_tsb_off +
207 ((vpn & kd->vmst->vm_tsb_mask) << TTE_SHIFT);
208 if (!_kvm_read_phys(kd, tte_off, &tte, sizeof(tte)))
210 if (!tte_match(&tte, va))
212 pa_off = TTE_GET_PA(&tte);
215 rest = PAGE_SIZE - pg_off;
216 pa_off = _kvm_find_off(kd->vmst, pa_off, rest);
217 if (pa_off == KVM_OFF_NOTFOUND)
219 *pa = pa_off + pg_off;
223 _kvm_err(kd, 0, "invalid address (%x)", va);