hwpmc_intel.c revision 185585
1/*- 2 * Copyright (c) 2008 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 * Common code for handling Intel CPUs. 29 */ 30 31#include <sys/cdefs.h> 32__FBSDID("$FreeBSD: head/sys/dev/hwpmc/hwpmc_intel.c 185585 2008-12-03 17:30:36Z jkoshy $"); 33 34#include <sys/param.h> 35#include <sys/pmc.h> 36#include <sys/pmckern.h> 37#include <sys/systm.h> 38 39#include <machine/cpu.h> 40#include <machine/cputypes.h> 41#include <machine/md_var.h> 42#include <machine/specialreg.h> 43 44static int 45intel_switch_in(struct pmc_cpu *pc, struct pmc_process *pp) 46{ 47 (void) pc; 48 49 PMCDBG(MDP,SWI,1, "pc=%p pp=%p enable-msr=%d", pc, pp, 50 pp->pp_flags & PMC_PP_ENABLE_MSR_ACCESS); 51 52 /* allow the RDPMC instruction if needed */ 53 if (pp->pp_flags & PMC_PP_ENABLE_MSR_ACCESS) 54 load_cr4(rcr4() | CR4_PCE); 55 56 PMCDBG(MDP,SWI,1, "cr4=0x%jx", (uintmax_t) rcr4()); 57 58 return 0; 59} 60 61static int 62intel_switch_out(struct pmc_cpu *pc, struct pmc_process *pp) 63{ 64 (void) pc; 65 (void) pp; /* can be NULL */ 66 67 PMCDBG(MDP,SWO,1, "pc=%p pp=%p cr4=0x%jx", pc, pp, 68 (uintmax_t) rcr4()); 69 70 /* always turn off the RDPMC instruction */ 71 load_cr4(rcr4() & ~CR4_PCE); 72 73 return 0; 74} 75 76struct pmc_mdep * 77pmc_intel_initialize(void) 78{ 79 struct pmc_mdep *pmc_mdep; 80 enum pmc_cputype cputype; 81 int error, model, nclasses, ncpus; 82 83 KASSERT(cpu_vendor_id == CPU_VENDOR_INTEL, 84 ("[intel,%d] Initializing non-intel processor", __LINE__)); 85 86 PMCDBG(MDP,INI,0, "intel-initialize cpuid=0x%x", cpu_id); 87 88 cputype = -1; 89 nclasses = 2; 90 91 model = ((cpu_id & 0xF0000) >> 12) | ((cpu_id & 0xF0) >> 4); 92 93 switch (cpu_id & 0xF00) { 94#if defined(__i386__) 95 case 0x500: /* Pentium family processors */ 96 cputype = PMC_CPU_INTEL_P5; 97 break; 98#endif 99 case 0x600: /* Pentium Pro, Celeron, Pentium II & III */ 100 switch (model) { 101#if defined(__i386__) 102 case 0x1: 103 cputype = PMC_CPU_INTEL_P6; 104 break; 105 case 0x3: case 0x5: 106 cputype = PMC_CPU_INTEL_PII; 107 break; 108 case 0x6: case 0x16: 109 cputype = PMC_CPU_INTEL_CL; 110 break; 111 case 0x7: case 0x8: case 0xA: case 0xB: 112 cputype = PMC_CPU_INTEL_PIII; 113 break; 114 case 0x9: case 0xD: 115 cputype = PMC_CPU_INTEL_PM; 116 break; 117#endif 118 case 0xE: 119 cputype = PMC_CPU_INTEL_CORE; 120 break; 121 case 0xF: 122 cputype = PMC_CPU_INTEL_CORE2; 123 nclasses = 3; 124 break; 125 case 0x17: 126 cputype = PMC_CPU_INTEL_CORE2EXTREME; 127 nclasses = 3; 128 break; 129 case 0x1C: /* Per Intel document 320047-002. */ 130 cputype = PMC_CPU_INTEL_ATOM; 131 nclasses = 3; 132 break; 133 } 134 break; 135#if defined(__i386__) || defined(__amd64__) 136 case 0xF00: /* P4 */ 137 if (model >= 0 && model <= 6) /* known models */ 138 cputype = PMC_CPU_INTEL_PIV; 139 break; 140 } 141#endif 142 143 if ((int) cputype == -1) { 144 printf("pmc: Unknown Intel CPU.\n"); 145 return (NULL); 146 } 147 148 pmc_mdep = malloc(sizeof(struct pmc_mdep) + nclasses * 149 sizeof(struct pmc_classdep), M_PMC, M_WAITOK|M_ZERO); 150 151 pmc_mdep->pmd_cputype = cputype; 152 pmc_mdep->pmd_nclass = nclasses; 153 154 pmc_mdep->pmd_switch_in = intel_switch_in; 155 pmc_mdep->pmd_switch_out = intel_switch_out; 156 157 ncpus = pmc_cpu_max(); 158 159 error = pmc_tsc_initialize(pmc_mdep, ncpus); 160 if (error) 161 goto error; 162 163 switch (cputype) { 164#if defined(__i386__) || defined(__amd64__) 165 /* 166 * Intel Core, Core 2 and Atom processors. 167 */ 168 case PMC_CPU_INTEL_ATOM: 169 case PMC_CPU_INTEL_CORE: 170 case PMC_CPU_INTEL_CORE2: 171 case PMC_CPU_INTEL_CORE2EXTREME: 172 error = pmc_core_initialize(pmc_mdep, ncpus); 173 break; 174 175 /* 176 * Intel Pentium 4 Processors, and P4/EMT64 processors. 177 */ 178 179 case PMC_CPU_INTEL_PIV: 180 error = pmc_p4_initialize(pmc_mdep, ncpus); 181 182 KASSERT(pmc_mdep->pmd_npmc == TSC_NPMCS + P4_NPMCS, 183 ("[intel,%d] incorrect npmc count %d", __LINE__, 184 pmc_mdep->pmd_npmc)); 185 break; 186#endif 187 188#if defined(__i386__) 189 /* 190 * P6 Family Processors 191 */ 192 193 case PMC_CPU_INTEL_P6: 194 case PMC_CPU_INTEL_CL: 195 case PMC_CPU_INTEL_PII: 196 case PMC_CPU_INTEL_PIII: 197 case PMC_CPU_INTEL_PM: 198 error = pmc_p6_initialize(pmc_mdep, ncpus); 199 200 KASSERT(pmc_mdep->pmd_npmc == TSC_NPMCS + P6_NPMCS, 201 ("[intel,%d] incorrect npmc count %d", __LINE__, 202 pmc_mdep->pmd_npmc)); 203 break; 204 205 /* 206 * Intel Pentium PMCs. 207 */ 208 209 case PMC_CPU_INTEL_P5: 210 error = pmc_p5_initialize(pmc_mdep, ncpus); 211 212 KASSERT(pmc_mdep->pmd_npmc == TSC_NPMCS + PENTIUM_NPMCS, 213 ("[intel,%d] incorrect npmc count %d", __LINE__, 214 pmc_mdep->pmd_npmc)); 215 break; 216#endif 217 218 default: 219 KASSERT(0, ("[intel,%d] Unknown CPU type", __LINE__)); 220 } 221 222 223 error: 224 if (error) { 225 free(pmc_mdep, M_PMC); 226 pmc_mdep = NULL; 227 } 228 229 return (pmc_mdep); 230} 231 232void 233pmc_intel_finalize(struct pmc_mdep *md) 234{ 235 pmc_tsc_finalize(md); 236 237 switch (md->pmd_cputype) { 238#if defined(__i386__) || defined(__amd64__) 239 case PMC_CPU_INTEL_ATOM: 240 case PMC_CPU_INTEL_CORE: 241 case PMC_CPU_INTEL_CORE2: 242 case PMC_CPU_INTEL_CORE2EXTREME: 243 pmc_core_finalize(md); 244 break; 245 246 case PMC_CPU_INTEL_PIV: 247 pmc_p4_finalize(md); 248 break; 249#endif 250#if defined(__i386__) 251 case PMC_CPU_INTEL_P6: 252 case PMC_CPU_INTEL_CL: 253 case PMC_CPU_INTEL_PII: 254 case PMC_CPU_INTEL_PIII: 255 case PMC_CPU_INTEL_PM: 256 pmc_p6_finalize(md); 257 break; 258 case PMC_CPU_INTEL_P5: 259 pmc_p5_finalize(md); 260 break; 261#endif 262 default: 263 KASSERT(0, ("[intel,%d] unknown CPU type", __LINE__)); 264 } 265} 266