1 /*- 2 * Copyright (c) 2005, Joseph Koshy 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 */ 27 28 #include <sys/cdefs.h> 29 __FBSDID("$FreeBSD$"); 30 31 #include <sys/param.h> 32 #include <sys/pmc.h> 33 #include <sys/proc.h> 34 #include <sys/systm.h> 35 36 #include <machine/cpu.h> 37 #include <machine/md_var.h> 38 #include <machine/pmc_mdep.h> 39 40 #include <vm/vm.h> 41 #include <vm/vm_param.h> 42 #include <vm/pmap.h> 43 44 struct pmc_mdep * 45 pmc_md_initialize() 46 { 47 #ifdef CPU_XSCALE_IXP425 48 if (cpu_class == CPU_CLASS_XSCALE) 49 return pmc_xscale_initialize(); 50 else 51 #endif 52 return NULL; 53 } 54 55 void 56 pmc_md_finalize(struct pmc_mdep *md) 57 { 58 #ifdef CPU_XSCALE_IXP425 59 if (cpu_class == CPU_CLASS_XSCALE) 60 pmc_xscale_finalize(md); 61 else 62 KASSERT(0, ("[arm,%d] Unknown CPU Class 0x%x", __LINE__, 63 cpu_class)); 64 #endif 65 } 66 67 int 68 pmc_save_kernel_callchain(uintptr_t *cc, int maxsamples, 69 struct trapframe *tf) 70 { 71 uintptr_t pc, r, stackstart, stackend, fp; 72 struct thread *td; 73 int count; 74 75 KASSERT(TRAPF_USERMODE(tf) == 0,("[arm,%d] not a kernel backtrace", 76 __LINE__)); 77 78 td = curthread; 79 pc = PMC_TRAPFRAME_TO_PC(tf); 80 *cc++ = pc; 81 82 if (maxsamples <= 1) 83 return (1); 84 85 stackstart = (uintptr_t) td->td_kstack; 86 stackend = (uintptr_t) td->td_kstack + td->td_kstack_pages * PAGE_SIZE; 87 fp = PMC_TRAPFRAME_TO_FP(tf); 88 89 if (!PMC_IN_KERNEL(pc) || 90 !PMC_IN_KERNEL_STACK(fp, stackstart, stackend)) 91 return (1); 92 93 for (count = 1; count < maxsamples; count++) { 94 /* Use saved lr as pc. */ 95 r = fp - sizeof(uintptr_t); 96 if (!PMC_IN_KERNEL_STACK(r, stackstart, stackend)) 97 break; 98 pc = *(uintptr_t *)r; 99 if (!PMC_IN_KERNEL(pc)) 100 break; 101 102 *cc++ = pc; 103 104 /* Switch to next frame up */ 105 r = fp - 3 * sizeof(uintptr_t); 106 if (!PMC_IN_KERNEL_STACK(r, stackstart, stackend)) 107 break; 108 fp = *(uintptr_t *)r; 109 if (!PMC_IN_KERNEL_STACK(fp, stackstart, stackend)) 110 break; 111 } 112 113 return (count); 114 } 115 116 int 117 pmc_save_user_callchain(uintptr_t *cc, int maxsamples, 118 struct trapframe *tf) 119 { 120 uintptr_t pc, r, oldfp, fp; 121 struct thread *td; 122 int count; 123 124 KASSERT(TRAPF_USERMODE(tf), ("[x86,%d] Not a user trap frame tf=%p", 125 __LINE__, (void *) tf)); 126 127 td = curthread; 128 pc = PMC_TRAPFRAME_TO_PC(tf); 129 *cc++ = pc; 130 131 if (maxsamples <= 1) 132 return (1); 133 134 oldfp = fp = PMC_TRAPFRAME_TO_FP(tf); 135 136 if (!PMC_IN_USERSPACE(pc) || 137 !PMC_IN_USERSPACE(fp)) 138 return (1); 139 140 for (count = 1; count < maxsamples; count++) { 141 /* Use saved lr as pc. */ 142 r = fp - sizeof(uintptr_t); 143 if (copyin((void *)r, &pc, sizeof(pc)) != 0) 144 break; 145 if (!PMC_IN_USERSPACE(pc)) 146 break; 147 148 *cc++ = pc; 149 150 /* Switch to next frame up */ 151 oldfp = fp; 152 r = fp - 3 * sizeof(uintptr_t); 153 if (copyin((void *)r, &fp, sizeof(fp)) != 0) 154 break; 155 if (fp < oldfp || !PMC_IN_USERSPACE(fp)) 156 break; 157 } 158 159 return (count); 160 } 161