Home | History | Annotate | Line # | Download | only in libkvm
kvm_alpha.c revision 1.20
      1 /* $NetBSD: kvm_alpha.c,v 1.20 2001/08/05 17:51:40 matt Exp $ */
      2 
      3 /*
      4  * Copyright (c) 1994, 1995 Carnegie-Mellon University.
      5  * All rights reserved.
      6  *
      7  * Author: Chris G. Demetriou
      8  *
      9  * Permission to use, copy, modify and distribute this software and
     10  * its documentation is hereby granted, provided that both the copyright
     11  * notice and this permission notice appear in all copies of the
     12  * software, derivative works or modified versions, and any portions
     13  * thereof, and that both notices appear in supporting documentation.
     14  *
     15  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     16  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
     17  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     18  *
     19  * Carnegie Mellon requests users of this software to return to
     20  *
     21  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     22  *  School of Computer Science
     23  *  Carnegie Mellon University
     24  *  Pittsburgh PA 15213-3890
     25  *
     26  * any improvements or extensions that they make and grant Carnegie the
     27  * rights to redistribute these changes.
     28  */
     29 
     30 #define	__KVM_ALPHA_PRIVATE		/* see <machine/pte.h> */
     31 
     32 #include <sys/param.h>
     33 #include <sys/user.h>
     34 #include <sys/proc.h>
     35 #include <sys/stat.h>
     36 #include <sys/kcore.h>
     37 #include <machine/kcore.h>
     38 #include <unistd.h>
     39 #include <nlist.h>
     40 #include <kvm.h>
     41 
     42 #include <uvm/uvm_extern.h>
     43 #include <machine/pmap.h>
     44 #include <machine/vmparam.h>
     45 
     46 #include <limits.h>
     47 #include <db.h>
     48 #include <stdlib.h>
     49 
     50 #include "kvm_private.h"
     51 
     52 struct vmstate {
     53 	vsize_t		page_shift;
     54 };
     55 
     56 void
     57 _kvm_freevtop(kd)
     58 	kvm_t *kd;
     59 {
     60 
     61 	if (kd->vmst != 0)
     62 		free(kd->vmst);
     63 }
     64 
     65 int
     66 _kvm_initvtop(kd)
     67 	kvm_t *kd;
     68 {
     69 	cpu_kcore_hdr_t *cpu_kh;
     70 	struct vmstate *vm;
     71 
     72 	vm = (struct vmstate *)_kvm_malloc(kd, sizeof(*vm));
     73 	if (vm == NULL)
     74 		return (-1);
     75 
     76 	cpu_kh = kd->cpu_data;
     77 
     78 	/* Compute page_shift. */
     79 	for (vm->page_shift = 0; (1L << vm->page_shift) < cpu_kh->page_size;
     80 	     vm->page_shift++)
     81 		/* nothing */ ;
     82 	if ((1L << vm->page_shift) != cpu_kh->page_size) {
     83 		free(vm);
     84 		return (-1);
     85 	}
     86 
     87 	kd->vmst = vm;
     88 	return (0);
     89 }
     90 
     91 int
     92 _kvm_kvatop(kd, va, pa)
     93 	kvm_t *kd;
     94 	u_long va;
     95 	u_long *pa;
     96 {
     97 	cpu_kcore_hdr_t *cpu_kh;
     98 	struct vmstate *vm;
     99 	alpha_pt_entry_t pte;
    100 	u_long pteoff, page_off;
    101 	int rv;
    102 
    103         if (ISALIVE(kd)) {
    104                 _kvm_err(kd, 0, "vatop called in live kernel!");
    105                 return(0);
    106         }
    107 
    108 	cpu_kh = kd->cpu_data;
    109 	vm = kd->vmst;
    110 	page_off = va & (cpu_kh->page_size - 1);
    111 
    112 #define	PAGE_SHIFT	vm->page_shift
    113 
    114 	if (va >= ALPHA_K0SEG_BASE && va <= ALPHA_K0SEG_END) {
    115 		/*
    116 		 * Direct-mapped address: just convert it.
    117 		 */
    118 
    119 		*pa = ALPHA_K0SEG_TO_PHYS(va);
    120 		rv = cpu_kh->page_size - page_off;
    121 	} else if (va >= ALPHA_K1SEG_BASE && va <= ALPHA_K1SEG_END) {
    122 		/*
    123 		 * Real kernel virtual address: do the translation.
    124 		 */
    125 
    126 		/* Find and read the L1 PTE. */
    127 		pteoff = cpu_kh->lev1map_pa +
    128 		    l1pte_index(va) * sizeof(alpha_pt_entry_t);
    129 		if (pread(kd->pmfd, &pte, sizeof(pte),
    130 		    _kvm_pa2off(kd, pteoff)) != sizeof(pte)) {
    131 			_kvm_syserr(kd, 0, "could not read L1 PTE");
    132 			goto lose;
    133 		}
    134 
    135 		/* Find and read the L2 PTE. */
    136 		if ((pte & ALPHA_PTE_VALID) == 0) {
    137 			_kvm_err(kd, 0, "invalid translation (invalid L1 PTE)");
    138 			goto lose;
    139 		}
    140 		pteoff = ALPHA_PTE_TO_PFN(pte) * cpu_kh->page_size +
    141 		    l2pte_index(va) * sizeof(alpha_pt_entry_t);
    142 		if (pread(kd->pmfd, &pte, sizeof(pte),
    143 		    _kvm_pa2off(kd, pteoff)) != sizeof(pte)) {
    144 			_kvm_syserr(kd, 0, "could not read L2 PTE");
    145 			goto lose;
    146 		}
    147 
    148 		/* Find and read the L3 PTE. */
    149 		if ((pte & ALPHA_PTE_VALID) == 0) {
    150 			_kvm_err(kd, 0, "invalid translation (invalid L2 PTE)");
    151 			goto lose;
    152 		}
    153 		pteoff = ALPHA_PTE_TO_PFN(pte) * cpu_kh->page_size +
    154 		    l3pte_index(va) * sizeof(alpha_pt_entry_t);
    155 		if (pread(kd->pmfd, &pte, sizeof(pte),
    156 		    _kvm_pa2off(kd, pteoff)) != sizeof(pte)) {
    157 			_kvm_syserr(kd, 0, "could not read L3 PTE");
    158 			goto lose;
    159 		}
    160 
    161 		/* Fill in the PA. */
    162 		if ((pte & ALPHA_PTE_VALID) == 0) {
    163 			_kvm_err(kd, 0, "invalid translation (invalid L3 PTE)");
    164 			goto lose;
    165 		}
    166 		*pa = ALPHA_PTE_TO_PFN(pte) * cpu_kh->page_size + page_off;
    167 		rv = cpu_kh->page_size - page_off;
    168 	} else {
    169 		/*
    170 		 * Bogus address (not in KV space): punt.
    171 		 */
    172 
    173 		_kvm_err(kd, 0, "invalid kernel virtual address");
    174 lose:
    175 		*pa = -1;
    176 		rv = 0;
    177 	}
    178 
    179 #undef PAGE_SHIFT
    180 
    181 	return (rv);
    182 }
    183 
    184 /*
    185  * Translate a physical address to a file-offset in the crash-dump.
    186  */
    187 off_t
    188 _kvm_pa2off(kd, pa)
    189 	kvm_t *kd;
    190 	u_long pa;
    191 {
    192 	cpu_kcore_hdr_t *cpu_kh;
    193 	phys_ram_seg_t *ramsegs;
    194 	off_t off;
    195 	int i;
    196 
    197 	cpu_kh = kd->cpu_data;
    198 	ramsegs = (phys_ram_seg_t *)((char *)cpu_kh + ALIGN(sizeof *cpu_kh));
    199 
    200 	off = 0;
    201 	for (i = 0; i < cpu_kh->nmemsegs; i++) {
    202 		if (pa >= ramsegs[i].start &&
    203 		    (pa - ramsegs[i].start) < ramsegs[i].size) {
    204 			off += (pa - ramsegs[i].start);
    205 			break;
    206 		}
    207 		off += ramsegs[i].size;
    208 	}
    209 
    210 	return (kd->dump_off + off);
    211 }
    212 
    213 /*
    214  * Machine-dependent initialization for ALL open kvm descriptors,
    215  * not just those for a kernel crash dump.  Some architectures
    216  * have to deal with these NOT being constants!  (i.e. m68k)
    217  */
    218 int
    219 _kvm_mdopen(kd)
    220 	kvm_t	*kd;
    221 {
    222 
    223 	kd->usrstack = USRSTACK;
    224 	kd->min_uva = VM_MIN_ADDRESS;
    225 	kd->max_uva = VM_MAXUSER_ADDRESS;
    226 
    227 	return (0);
    228 }
    229