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$"); 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 44 static int 45 intel_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 61 static int 62 intel_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 76 struct pmc_mdep * 77 pmc_intel_initialize(void) 78 { 79 struct pmc_mdep *pmc_mdep; 80 enum pmc_cputype cputype; 81 int error, model, nclasses, ncpus, stepping, verov; 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 error = 0; 91 verov = 0; 92 model = ((cpu_id & 0xF0000) >> 12) | ((cpu_id & 0xF0) >> 4); 93 stepping = cpu_id & 0xF; 94 95 switch (cpu_id & 0xF00) { 96 #if defined(__i386__) 97 case 0x500: /* Pentium family processors */ 98 cputype = PMC_CPU_INTEL_P5; 99 break; 100 #endif 101 case 0x600: /* Pentium Pro, Celeron, Pentium II & III */ 102 switch (model) { 103 #if defined(__i386__) 104 case 0x1: 105 cputype = PMC_CPU_INTEL_P6; 106 break; 107 case 0x3: case 0x5: 108 cputype = PMC_CPU_INTEL_PII; 109 break; 110 case 0x6: case 0x16: 111 cputype = PMC_CPU_INTEL_CL; 112 break; 113 case 0x7: case 0x8: case 0xA: case 0xB: 114 cputype = PMC_CPU_INTEL_PIII; 115 break; 116 case 0x9: case 0xD: 117 cputype = PMC_CPU_INTEL_PM; 118 break; 119 #endif 120 case 0xE: 121 cputype = PMC_CPU_INTEL_CORE; 122 break; 123 case 0xF: 124 /* Per Intel document 315338-020. */ 125 if (stepping == 0x7) { 126 cputype = PMC_CPU_INTEL_CORE; 127 verov = 1; 128 } else { 129 cputype = PMC_CPU_INTEL_CORE2; 130 nclasses = 3; 131 } 132 break; 133 case 0x17: 134 cputype = PMC_CPU_INTEL_CORE2EXTREME; 135 nclasses = 3; 136 break; 137 case 0x1C: /* Per Intel document 320047-002. */ 138 cputype = PMC_CPU_INTEL_ATOM; 139 nclasses = 3; 140 break; 141 case 0x1A: 142 case 0x1E: /* 143 * Per Intel document 253669-032 9/2009, 144 * pages A-2 and A-57 145 */ 146 case 0x1F: /* 147 * Per Intel document 253669-032 9/2009, 148 * pages A-2 and A-57 149 */ 150 cputype = PMC_CPU_INTEL_COREI7; 151 nclasses = 5; 152 break; 153 case 0x2E: 154 cputype = PMC_CPU_INTEL_NEHALEM_EX; 155 nclasses = 3; 156 break; 157 case 0x25: /* Per Intel document 253669-033US 12/2009. */ 158 case 0x2C: /* Per Intel document 253669-033US 12/2009. */ 159 cputype = PMC_CPU_INTEL_WESTMERE; 160 nclasses = 5; 161 break; 162 case 0x2F: /* Westmere-EX, seen in wild */ 163 cputype = PMC_CPU_INTEL_WESTMERE_EX; 164 nclasses = 3; 165 break; 166 case 0x2A: /* Per Intel document 253669-039US 05/2011. */ 167 cputype = PMC_CPU_INTEL_SANDYBRIDGE; 168 nclasses = 5; 169 break; 170 case 0x2D: /* Per Intel document 253669-044US 08/2012. */ 171 cputype = PMC_CPU_INTEL_SANDYBRIDGE_XEON; 172 nclasses = 3; 173 break; 174 case 0x3A: /* Per Intel document 253669-043US 05/2012. */ 175 cputype = PMC_CPU_INTEL_IVYBRIDGE; 176 nclasses = 3; 177 break; 178 case 0x3E: /* Per Intel document 325462-045US 01/2013. */ 179 cputype = PMC_CPU_INTEL_IVYBRIDGE_XEON; 180 nclasses = 3; 181 break; 182 case 0x3F: /* Per Intel document 325462-045US 09/2014. */ 183 case 0x46: /* Per Intel document 325462-045US 09/2014. */ 184 /* Should 46 be XEON. probably its own? */ 185 cputype = PMC_CPU_INTEL_HASWELL_XEON; 186 nclasses = 3; 187 break; 188 case 0x3C: /* Per Intel document 325462-045US 01/2013. */ 189 case 0x45: /* Per Intel document 325462-045US 09/2014. */ 190 cputype = PMC_CPU_INTEL_HASWELL; 191 nclasses = 5; 192 break; 193 case 0x4D: /* Per Intel document 330061-001 01/2014. */ 194 cputype = PMC_CPU_INTEL_ATOM_SILVERMONT; 195 nclasses = 3; 196 break; 197 } 198 break; 199 #if defined(__i386__) || defined(__amd64__) 200 case 0xF00: /* P4 */ 201 if (model >= 0 && model <= 6) /* known models */ 202 cputype = PMC_CPU_INTEL_PIV; 203 break; 204 } 205 #endif 206 207 if ((int) cputype == -1) { 208 printf("pmc: Unknown Intel CPU.\n"); 209 return (NULL); 210 } 211 212 /* Allocate base class and initialize machine dependent struct */ 213 pmc_mdep = pmc_mdep_alloc(nclasses); 214 215 pmc_mdep->pmd_cputype = cputype; 216 pmc_mdep->pmd_switch_in = intel_switch_in; 217 pmc_mdep->pmd_switch_out = intel_switch_out; 218 219 ncpus = pmc_cpu_max(); 220 error = pmc_tsc_initialize(pmc_mdep, ncpus); 221 if (error) 222 goto error; 223 switch (cputype) { 224 #if defined(__i386__) || defined(__amd64__) 225 /* 226 * Intel Core, Core 2 and Atom processors. 227 */ 228 case PMC_CPU_INTEL_ATOM: 229 case PMC_CPU_INTEL_ATOM_SILVERMONT: 230 case PMC_CPU_INTEL_CORE: 231 case PMC_CPU_INTEL_CORE2: 232 case PMC_CPU_INTEL_CORE2EXTREME: 233 case PMC_CPU_INTEL_COREI7: 234 case PMC_CPU_INTEL_NEHALEM_EX: 235 case PMC_CPU_INTEL_IVYBRIDGE: 236 case PMC_CPU_INTEL_SANDYBRIDGE: 237 case PMC_CPU_INTEL_WESTMERE: 238 case PMC_CPU_INTEL_WESTMERE_EX: 239 case PMC_CPU_INTEL_SANDYBRIDGE_XEON: 240 case PMC_CPU_INTEL_IVYBRIDGE_XEON: 241 case PMC_CPU_INTEL_HASWELL: 242 case PMC_CPU_INTEL_HASWELL_XEON: 243 error = pmc_core_initialize(pmc_mdep, ncpus, verov); 244 break; 245 246 /* 247 * Intel Pentium 4 Processors, and P4/EMT64 processors. 248 */ 249 250 case PMC_CPU_INTEL_PIV: 251 error = pmc_p4_initialize(pmc_mdep, ncpus); 252 break; 253 #endif 254 255 #if defined(__i386__) 256 /* 257 * P6 Family Processors 258 */ 259 260 case PMC_CPU_INTEL_P6: 261 case PMC_CPU_INTEL_CL: 262 case PMC_CPU_INTEL_PII: 263 case PMC_CPU_INTEL_PIII: 264 case PMC_CPU_INTEL_PM: 265 error = pmc_p6_initialize(pmc_mdep, ncpus); 266 break; 267 268 /* 269 * Intel Pentium PMCs. 270 */ 271 272 case PMC_CPU_INTEL_P5: 273 error = pmc_p5_initialize(pmc_mdep, ncpus); 274 break; 275 #endif 276 277 default: 278 KASSERT(0, ("[intel,%d] Unknown CPU type", __LINE__)); 279 } 280 281 if (error) { 282 pmc_tsc_finalize(pmc_mdep); 283 goto error; 284 } 285 286 /* 287 * Init the uncore class. 288 */ 289 #if defined(__i386__) || defined(__amd64__) 290 switch (cputype) { 291 /* 292 * Intel Corei7 and Westmere processors. 293 */ 294 case PMC_CPU_INTEL_COREI7: 295 case PMC_CPU_INTEL_HASWELL: 296 case PMC_CPU_INTEL_SANDYBRIDGE: 297 case PMC_CPU_INTEL_WESTMERE: 298 error = pmc_uncore_initialize(pmc_mdep, ncpus); 299 break; 300 default: 301 break; 302 } 303 #endif 304 error: 305 if (error) { 306 pmc_mdep_free(pmc_mdep); 307 pmc_mdep = NULL; 308 } 309 310 return (pmc_mdep); 311 } 312 313 void 314 pmc_intel_finalize(struct pmc_mdep *md) 315 { 316 pmc_tsc_finalize(md); 317 318 switch (md->pmd_cputype) { 319 #if defined(__i386__) || defined(__amd64__) 320 case PMC_CPU_INTEL_ATOM: 321 case PMC_CPU_INTEL_ATOM_SILVERMONT: 322 case PMC_CPU_INTEL_CORE: 323 case PMC_CPU_INTEL_CORE2: 324 case PMC_CPU_INTEL_CORE2EXTREME: 325 case PMC_CPU_INTEL_COREI7: 326 case PMC_CPU_INTEL_NEHALEM_EX: 327 case PMC_CPU_INTEL_HASWELL: 328 case PMC_CPU_INTEL_HASWELL_XEON: 329 case PMC_CPU_INTEL_IVYBRIDGE: 330 case PMC_CPU_INTEL_SANDYBRIDGE: 331 case PMC_CPU_INTEL_WESTMERE: 332 case PMC_CPU_INTEL_WESTMERE_EX: 333 case PMC_CPU_INTEL_SANDYBRIDGE_XEON: 334 case PMC_CPU_INTEL_IVYBRIDGE_XEON: 335 pmc_core_finalize(md); 336 break; 337 338 case PMC_CPU_INTEL_PIV: 339 pmc_p4_finalize(md); 340 break; 341 #endif 342 #if defined(__i386__) 343 case PMC_CPU_INTEL_P6: 344 case PMC_CPU_INTEL_CL: 345 case PMC_CPU_INTEL_PII: 346 case PMC_CPU_INTEL_PIII: 347 case PMC_CPU_INTEL_PM: 348 pmc_p6_finalize(md); 349 break; 350 case PMC_CPU_INTEL_P5: 351 pmc_p5_finalize(md); 352 break; 353 #endif 354 default: 355 KASSERT(0, ("[intel,%d] unknown CPU type", __LINE__)); 356 } 357 358 /* 359 * Uncore. 360 */ 361 #if defined(__i386__) || defined(__amd64__) 362 switch (md->pmd_cputype) { 363 case PMC_CPU_INTEL_COREI7: 364 case PMC_CPU_INTEL_HASWELL: 365 case PMC_CPU_INTEL_SANDYBRIDGE: 366 case PMC_CPU_INTEL_WESTMERE: 367 pmc_uncore_finalize(md); 368 break; 369 default: 370 break; 371 } 372 #endif 373 } 374