PageRenderTime 55ms CodeModel.GetById 20ms RepoModel.GetById 1ms app.codeStats 0ms

/thirdPartyCode/GotoBLAS-1.26/cpuid_x86.c

https://bitbucket.org/rutad/libs
C | 1163 lines | 1039 code | 103 blank | 21 comment | 193 complexity | f7107c78852ee0e980a1e5156376fffa MD5 | raw file
Possible License(s): BSD-3-Clause, MPL-2.0-no-copyleft-exception, GPL-3.0 
    

  1. /*********************************************************************/
    2. 

  2. /*                                                                   */
    3. 

  3. /*             Optimized BLAS libraries                              */
    4. 

  4. /*                     By Kazushige Goto <kgoto@tacc.utexas.edu>     */
    5. 

  5. /*                                                                   */
    6. 

  6. /* Copyright (c) The University of Texas, 2005. All rights reserved. */
    7. 

  7. /* UNIVERSITY EXPRESSLY DISCLAIMS ANY AND ALL WARRANTIES CONCERNING  */
    8. 

  8. /* THIS SOFTWARE AND DOCUMENTATION, INCLUDING ANY WARRANTIES OF      */
    9. 

  9. /* MERCHANTABILITY, FITNESS FOR ANY PARTICULAR PURPOSE,              */
    10. 

  10. /* NON-INFRINGEMENT AND WARRANTIES OF PERFORMANCE, AND ANY WARRANTY  */
    11. 

  11. /* THAT MIGHT OTHERWISE ARISE FROM COURSE OF DEALING OR USAGE OF     */
    12. 

  12. /* TRADE. NO WARRANTY IS EITHER EXPRESS OR IMPLIED WITH RESPECT TO   */
    13. 

  13. /* THE USE OF THE SOFTWARE OR DOCUMENTATION.                         */
    14. 

  14. /* Under no circumstances shall University be liable for incidental, */
    15. 

  15. /* special, indirect, direct or consequential damages or loss of     */
    16. 

  16. /* profits, interruption of business, or related expenses which may  */
    17. 

  17. /* arise from use of Software or Documentation, including but not    */
    18. 

  18. /* limited to those resulting from defects in Software and/or        */
    19. 

  19. /* Documentation, or loss or inaccuracy of data of any kind.         */
    20. 

  20. /*********************************************************************/
    21. 

  21. 

  22. #include <stdio.h>
    23. 

  23. #include <string.h>
    24. 

  24. #include "cpuid.h"
    25. 

  25. 

  26. #ifdef __APPLE__
    27. 

  27. void cpuid(int op, int *eax, int *ebx, int *ecx, int *edx);
    28. 

  28. #else
    29. 

  29. static inline void cpuid(int op, int *eax, int *ebx, int *ecx, int *edx){
    30. 

  30.   __asm__ __volatile__
    31. 

  31.     ("cpuid": "=a" (*eax), "=b" (*ebx), "=c" (*ecx), "=d" (*edx) : "a" (op) : "cc");
    32. 

  32. 

  33. }
    34. 

  34. #endif
    35. 

  35. 

  36. 

  37. static inline int have_cpuid(void){
    38. 

  38.   int eax, ebx, ecx, edx;
    39. 

  39. 

  40.   cpuid(0, &eax, &ebx, &ecx, &edx);
    41. 

  41.   return eax;
    42. 

  42. }
    43. 

  43. 

  44. static inline int have_excpuid(void){
    45. 

  45.   int eax, ebx, ecx, edx;
    46. 

  46. 

  47.   cpuid(0x80000000, &eax, &ebx, &ecx, &edx);
    48. 

  48.   return eax & 0xffff;
    49. 

  49. }
    50. 

  50. 

  51. int get_vendor(void){
    52. 

  52.   int eax, ebx, ecx, edx;
    53. 

  53.   char vendor[13];
    54. 

  54. 

  55.   cpuid(0, &eax, &ebx, &ecx, &edx);
    56. 

  56.   
    57. 

  57.   *(int *)(&vendor[0]) = ebx;
    58. 

  58.   *(int *)(&vendor[4]) = edx;
    59. 

  59.   *(int *)(&vendor[8]) = ecx;
    60. 

  60.   vendor[12] = (char)NULL;
    61. 

  61. 

  62.   if (!strcmp(vendor, "GenuineIntel")) return VENDOR_INTEL;
    63. 

  63.   if (!strcmp(vendor, " UMC UMC UMC")) return VENDOR_UMC;
    64. 

  64.   if (!strcmp(vendor, "AuthenticAMD")) return VENDOR_AMD;
    65. 

  65.   if (!strcmp(vendor, "CyrixInstead")) return VENDOR_CYRIX;
    66. 

  66.   if (!strcmp(vendor, "NexGenDriven")) return VENDOR_NEXGEN;
    67. 

  67.   if (!strcmp(vendor, "CentaurHauls")) return VENDOR_CENTAUR;
    68. 

  68.   if (!strcmp(vendor, "RiseRiseRise")) return VENDOR_RISE;
    69. 

  69.   if (!strcmp(vendor, " SiS SiS SiS")) return VENDOR_SIS;
    70. 

  70.   if (!strcmp(vendor, "GenuineTMx86")) return VENDOR_TRANSMETA;
    71. 

  71.   if (!strcmp(vendor, "Geode by NSC")) return VENDOR_NSC;
    72. 

  72. 

  73.   if ((eax == 0) || ((eax & 0x500) != 0)) return VENDOR_INTEL;
    74. 

  74. 

  75.   return VENDOR_UNKNOWN;
    76. 

  76. }
    77. 

  77.   
    78. 

  78. int get_cputype(int gettype){
    79. 

  79.   int eax, ebx, ecx, edx;
    80. 

  80.   int extend_family, family;
    81. 

  81.   int extend_model, model;
    82. 

  82.   int type, stepping;
    83. 

  83.   int feature = 0;
    84. 

  84. 

  85.   cpuid(1, &eax, &ebx, &ecx, &edx);
    86. 

  86.   
    87. 

  87.   switch (gettype) {
    88. 

  88.   case GET_EXFAMILY :
    89. 

  89.     return BITMASK(eax, 20, 0xff);
    90. 

  90.   case GET_EXMODEL :
    91. 

  91.     return BITMASK(eax, 16, 0x0f);
    92. 

  92.   case GET_TYPE :
    93. 

  93.     return BITMASK(eax, 12, 0x03);
    94. 

  94.   case GET_FAMILY :
    95. 

  95.     return BITMASK(eax,  8, 0x0f);
    96. 

  96.   case GET_MODEL :
    97. 

  97.     return BITMASK(eax,  4, 0x0f);
    98. 

  98.   case GET_APICID :
    99. 

  99.     return BITMASK(ebx, 24, 0x0f);
    100. 

  100.   case GET_LCOUNT :
    101. 

  101.     return BITMASK(ebx, 16, 0x0f);
    102. 

  102.   case GET_CHUNKS :
    103. 

  103.     return BITMASK(ebx,  8, 0x0f);
    104. 

  104.   case GET_STEPPING :
    105. 

  105.     return BITMASK(eax,  0, 0x0f);
    106. 

  106.   case GET_BLANDID :
    107. 

  107.     return BITMASK(ebx,  0, 0xff);
    108. 

  108.   case GET_NUMSHARE :
    109. 

  109.     if (have_cpuid() < 4) return 0;
    110. 

  110.     cpuid(4, &eax, &ebx, &ecx, &edx);
    111. 

  111.     return BITMASK(eax, 14, 0xfff);
    112. 

  112.   case GET_NUMCORES :
    113. 

  113.     if (have_cpuid() < 4) return 0;
    114. 

  114.     cpuid(4, &eax, &ebx, &ecx, &edx);
    115. 

  115.     return BITMASK(eax, 26, 0x3f);
    116. 

  116. 

  117.   case GET_FEATURE :
    118. 

  118.     if ((edx & (1 <<  3)) != 0) feature |= HAVE_PSE;
    119. 

  119.     if ((edx & (1 << 15)) != 0) feature |= HAVE_CMOV;
    120. 

  120.     if ((edx & (1 << 19)) != 0) feature |= HAVE_CFLUSH;
    121. 

  121.     if ((edx & (1 << 23)) != 0) feature |= HAVE_MMX;
    122. 

  122.     if ((edx & (1 << 25)) != 0) feature |= HAVE_SSE;
    123. 

  123.     if ((edx & (1 << 26)) != 0) feature |= HAVE_SSE2;
    124. 

  124.     if ((edx & (1 << 27)) != 0) {
    125. 

  125.       if (BITMASK(ebx, 16, 0x0f) > 0) feature |= HAVE_HIT;
    126. 

  126.     }
    127. 

  127.     if ((ecx & (1 <<  0)) != 0) feature |= HAVE_SSE3;
    128. 

  128.     if ((ecx & (1 <<  9)) != 0) feature |= HAVE_SSSE3;
    129. 

  129.     if ((ecx & (1 << 19)) != 0) feature |= HAVE_SSE4_1;
    130. 

  130.     if ((ecx & (1 << 20)) != 0) feature |= HAVE_SSE4_2;
    131. 

  131. 

  132.     cpuid(0x80000001, &eax, &ebx, &ecx, &edx);
    133. 

  133.     if ((ecx & (1 <<  6)) != 0) feature |= HAVE_SSE4A;
    134. 

  134.     if ((ecx & (1 <<  7)) != 0) feature |= HAVE_MISALIGNSSE;
    135. 

  135.     if ((edx & (1 << 30)) != 0) feature |= HAVE_3DNOWEX;
    136. 

  136.     if ((edx & (1 << 31)) != 0) feature |= HAVE_3DNOW;
    137. 

  137. 

  138.     if (have_excpuid() >= 0x1a) {
    139. 

  139.       cpuid(0x8000001a, &eax, &ebx, &ecx, &edx);
    140. 

  140.       if ((eax & (1 <<  0)) != 0) feature |= HAVE_128BITFPU;
    141. 

  141.       if ((eax & (1 <<  1)) != 0) feature |= HAVE_FASTMOVU;
    142. 

  142.     }
    143. 

  143.   }
    144. 

  144.   return feature;
    145. 

  145. }
    146. 

  146.   
    147. 

  147. int get_cacheinfo(int type, cache_info_t *cacheinfo){
    148. 

  148.   int eax, ebx, ecx, edx, cpuid_level;
    149. 

  149.   int info[15];
    150. 

  150.   int i;
    151. 

  151.   cache_info_t LC1, LD1, L2, L3, 
    152. 

  152.     ITB, DTB, LITB, LDTB,
    153. 

  153.     L2ITB, L2DTB, L2LITB, L2LDTB;
    154. 

  154. 

  155.   LC1.size    = 0; LC1.associative = 0; LC1.linesize = 0; LC1.shared = 0;
    156. 

  156.   LD1.size    = 0; LD1.associative    = 0; LD1.linesize    = 0; LD1.shared    = 0;
    157. 

  157.   L2.size     = 0; L2.associative     = 0; L2.linesize     = 0; L2.shared     = 0;
    158. 

  158.   L3.size     = 0; L3.associative     = 0; L3.linesize     = 0; L3.shared     = 0;
    159. 

  159.   ITB.size    = 0; ITB.associative    = 0; ITB.linesize    = 0; ITB.shared    = 0;
    160. 

  160.   DTB.size    = 0; DTB.associative    = 0; DTB.linesize    = 0; DTB.shared    = 0;
    161. 

  161.   LITB.size   = 0; LITB.associative   = 0; LITB.linesize   = 0; LITB.shared   = 0;
    162. 

  162.   LDTB.size   = 0; LDTB.associative   = 0; LDTB.linesize   = 0; LDTB.shared   = 0;
    163. 

  163.   L2ITB.size  = 0; L2ITB.associative  = 0; L2ITB.linesize  = 0; L2ITB.shared  = 0;
    164. 

  164.   L2DTB.size  = 0; L2DTB.associative  = 0; L2DTB.linesize  = 0; L2DTB.shared  = 0;
    165. 

  165.   L2LITB.size = 0; L2LITB.associative = 0; L2LITB.linesize = 0; L2LITB.shared = 0;
    166. 

  166.   L2LDTB.size = 0; L2LDTB.associative = 0; L2LDTB.linesize = 0; L2LDTB.shared = 0;
    167. 

  167. 

  168.   cpuid(0, &cpuid_level, &ebx, &ecx, &edx);
    169. 

  169. 

  170.   if (cpuid_level > 1) {
    171. 

  171. 

  172.     cpuid(2, &eax, &ebx, &ecx, &edx);
    173. 

  173. 

  174.     info[ 0] = BITMASK(eax,  8, 0xff);
    175. 

  175.     info[ 1] = BITMASK(eax, 16, 0xff);
    176. 

  176.     info[ 2] = BITMASK(eax, 24, 0xff);
    177. 

  177.     
    178. 

  178.     info[ 3] = BITMASK(ebx,  0, 0xff);
    179. 

  179.     info[ 4] = BITMASK(ebx,  8, 0xff);
    180. 

  180.     info[ 5] = BITMASK(ebx, 16, 0xff);
    181. 

  181.     info[ 6] = BITMASK(ebx, 24, 0xff);
    182. 

  182.     
    183. 

  183.     info[ 7] = BITMASK(ecx,  0, 0xff);
    184. 

  184.     info[ 8] = BITMASK(ecx,  8, 0xff);
    185. 

  185.     info[ 9] = BITMASK(ecx, 16, 0xff);
    186. 

  186.     info[10] = BITMASK(ecx, 24, 0xff);
    187. 

  187.     
    188. 

  188.     info[11] = BITMASK(edx,  0, 0xff);
    189. 

  189.     info[12] = BITMASK(edx,  8, 0xff);
    190. 

  190.     info[13] = BITMASK(edx, 16, 0xff);
    191. 

  191.     info[14] = BITMASK(edx, 24, 0xff);
    192. 

  192.     
    193. 

  193.     for (i = 0; i < 15; i++){
    194. 

  194. 

  195.       switch (info[i]){
    196. 

  196. 

  197. 	/* This table is from http://www.sandpile.org/ia32/cpuid.htm */
    198. 

  198. 

  199.       case 0x01 :
    200. 

  200. 	ITB.size        =     4;
    201. 

  201. 	ITB.associative =     4;
    202. 

  202. 	ITB.linesize     =   32;
    203. 

  203. 	break;
    204. 

  204.       case 0x02 :
    205. 

  205. 	LITB.size        = 4096;
    206. 

  206. 	LITB.associative =    0;
    207. 

  207. 	LITB.linesize    =    2;
    208. 

  208. 	break;
    209. 

  209.       case 0x03 :
    210. 

  210. 	DTB.size        =     4;
    211. 

  211. 	DTB.associative =     4;
    212. 

  212. 	DTB.linesize     =   64;
    213. 

  213. 	break;
    214. 

  214.       case 0x04 :
    215. 

  215. 	LDTB.size        = 4096;
    216. 

  216. 	LDTB.associative =    4;
    217. 

  217. 	LDTB.linesize    =    8;
    218. 

  218. 	break;
    219. 

  219.       case 0x05 :
    220. 

  220. 	LDTB.size        = 4096;
    221. 

  221. 	LDTB.associative =    4;
    222. 

  222. 	LDTB.linesize    =   32;
    223. 

  223. 	break;
    224. 

  224.       case 0x06 :
    225. 

  225. 	LC1.size        = 8;
    226. 

  226. 	LC1.associative = 4;
    227. 

  227. 	LC1.linesize    = 32;
    228. 

  228. 	break;
    229. 

  229.       case 0x08 :
    230. 

  230. 	LC1.size        = 16;
    231. 

  231. 	LC1.associative = 4;
    232. 

  232. 	LC1.linesize    = 32;
    233. 

  233. 	break;
    234. 

  234.       case 0x0a :
    235. 

  235. 	LD1.size        = 8;
    236. 

  236. 	LD1.associative = 2;
    237. 

  237. 	LD1.linesize    = 32;
    238. 

  238. 	break;
    239. 

  239.       case 0x0c :
    240. 

  240. 	LD1.size        = 16;
    241. 

  241. 	LD1.associative = 4;
    242. 

  242. 	LD1.linesize    = 32;
    243. 

  243. 	break;
    244. 

  244.       case 0x10 :
    245. 

  245. 	LD1.size        = 16;
    246. 

  246. 	LD1.associative = 4;
    247. 

  247. 	LD1.linesize    = 32;
    248. 

  248. 	break;
    249. 

  249.       case 0x15 :
    250. 

  250. 	LC1.size        = 16;
    251. 

  251. 	LC1.associative = 4;
    252. 

  252. 	LC1.linesize    = 32;
    253. 

  253. 	break;
    254. 

  254.       case 0x1a :
    255. 

  255. 	L2.size         = 96;
    256. 

  256. 	L2.associative  = 6;
    257. 

  257. 	L2.linesize     = 64;
    258. 

  258. 	break;
    259. 

  259.       case 0x22 :
    260. 

  260. 	L3.size         = 512;
    261. 

  261. 	L3.associative  = 4;
    262. 

  262. 	L3.linesize     = 64;
    263. 

  263. 	break;
    264. 

  264.       case 0x23 :
    265. 

  265. 	L3.size         = 1024;
    266. 

  266. 	L3.associative  = 8;
    267. 

  267. 	L3.linesize     = 64;
    268. 

  268. 	break;
    269. 

  269.       case 0x25 :
    270. 

  270. 	L3.size         = 2048;
    271. 

  271. 	L3.associative  = 8;
    272. 

  272. 	L3.linesize     = 64;
    273. 

  273. 	break;
    274. 

  274.       case 0x29 :
    275. 

  275. 	L3.size         = 4096;
    276. 

  276. 	L3.associative  = 8;
    277. 

  277. 	L3.linesize     = 64;
    278. 

  278. 	break;
    279. 

  279.       case 0x2c :
    280. 

  280. 	LD1.size        = 32;
    281. 

  281. 	LD1.associative = 8;
    282. 

  282. 	LD1.linesize    = 64;
    283. 

  283. 	break;
    284. 

  284.       case 0x30 :
    285. 

  285. 	LC1.size        = 32;
    286. 

  286. 	LC1.associative = 8;
    287. 

  287. 	LC1.linesize    = 64;
    288. 

  288. 	break;
    289. 

  289.       case 0x39 :
    290. 

  290. 	L2.size         = 128;
    291. 

  291. 	L2.associative  = 4;
    292. 

  292. 	L2.linesize     = 64;
    293. 

  293. 	break;
    294. 

  294.       case 0x3a :
    295. 

  295. 	L2.size         = 192;
    296. 

  296. 	L2.associative  = 6;
    297. 

  297. 	L2.linesize     = 64;
    298. 

  298. 	break;
    299. 

  299.       case 0x3b :
    300. 

  300. 	L2.size         = 128;
    301. 

  301. 	L2.associative  = 2;
    302. 

  302. 	L2.linesize     = 64;
    303. 

  303. 	break;
    304. 

  304.       case 0x3c :
    305. 

  305. 	L2.size         = 256;
    306. 

  306. 	L2.associative  = 4;
    307. 

  307. 	L2.linesize     = 64;
    308. 

  308. 	break;
    309. 

  309.       case 0x3d :
    310. 

  310. 	L2.size         = 384;
    311. 

  311. 	L2.associative  = 6;
    312. 

  312. 	L2.linesize     = 64;
    313. 

  313. 	break;
    314. 

  314.       case 0x3e :
    315. 

  315. 	L2.size         = 512;
    316. 

  316. 	L2.associative  = 4;
    317. 

  317. 	L2.linesize     = 64;
    318. 

  318. 	break;
    319. 

  319.       case 0x41 :
    320. 

  320. 	L2.size         = 128;
    321. 

  321. 	L2.associative  = 4;
    322. 

  322. 	L2.linesize     = 32;
    323. 

  323. 	break;
    324. 

  324.       case 0x42 :
    325. 

  325. 	L2.size         = 256;
    326. 

  326. 	L2.associative  = 4;
    327. 

  327. 	L2.linesize     = 32;
    328. 

  328. 	break;
    329. 

  329.       case 0x43 :
    330. 

  330. 	L2.size         = 512;
    331. 

  331. 	L2.associative  = 4;
    332. 

  332. 	L2.linesize     = 32;
    333. 

  333. 	break;
    334. 

  334.       case 0x44 :
    335. 

  335. 	L2.size         = 1024;
    336. 

  336. 	L2.associative  = 4;
    337. 

  337. 	L2.linesize     = 32;
    338. 

  338. 	break;
    339. 

  339.       case 0x45 :
    340. 

  340. 	L2.size         = 2048;
    341. 

  341. 	L2.associative  = 4;
    342. 

  342. 	L2.linesize     = 32;
    343. 

  343. 	break;
    344. 

  344.       case 0x46 :
    345. 

  345. 	L3.size         = 4096;
    346. 

  346. 	L3.associative  = 4;
    347. 

  347. 	L3.linesize     = 64;
    348. 

  348. 	break;
    349. 

  349.       case 0x47 :
    350. 

  350. 	L3.size         = 8192;
    351. 

  351. 	L3.associative  = 8;
    352. 

  352. 	L3.linesize     = 64;
    353. 

  353. 	break;
    354. 

  354.       case 0x49 :
    355. 

  355. 	L2.size         = 4096;
    356. 

  356. 	L2.associative  = 16;
    357. 

  357. 	L2.linesize     = 64;
    358. 

  358. 	break;
    359. 

  359.       case 0x4a :
    360. 

  360. 	L3.size         = 6144;
    361. 

  361. 	L3.associative  = 12;
    362. 

  362. 	L3.linesize     = 64;
    363. 

  363. 	break;
    364. 

  364.       case 0x4b :
    365. 

  365. 	L3.size         = 8192;
    366. 

  366. 	L3.associative  = 16;
    367. 

  367. 	L3.linesize     = 64;
    368. 

  368. 	break;
    369. 

  369.       case 0x4c :
    370. 

  370. 	L3.size         = 12280;
    371. 

  371. 	L3.associative  = 12;
    372. 

  372. 	L3.linesize     = 64;
    373. 

  373. 	break;
    374. 

  374.       case 0x4d :
    375. 

  375. 	L3.size         = 16384;
    376. 

  376. 	L3.associative  = 16;
    377. 

  377. 	L3.linesize     = 64;
    378. 

  378. 	break;
    379. 

  379.       case 0x4e :
    380. 

  380. 	L2.size         = 6144;
    381. 

  381. 	L2.associative  = 24;
    382. 

  382. 	L2.linesize     = 64;
    383. 

  383. 	break;
    384. 

  384.       case 0x50 :
    385. 

  385. 	ITB.size         = 4;
    386. 

  386. 	ITB.associative  = 0;
    387. 

  387. 	ITB.linesize     = 64;
    388. 

  388. 	LITB.size        = 4096;
    389. 

  389. 	LITB.associative = 0;
    390. 

  390. 	LITB.linesize    = 64;
    391. 

  391. 	LITB.shared      = 1;
    392. 

  392. 	break;
    393. 

  393.       case 0x51 :
    394. 

  394. 	ITB.size        = 4;
    395. 

  395. 	ITB.associative = 0;
    396. 

  396. 	ITB.linesize     = 128;
    397. 

  397. 	LITB.size        = 4096;
    398. 

  398. 	LITB.associative = 0;
    399. 

  399. 	LITB.linesize    = 128;
    400. 

  400. 	LITB.shared      = 1;
    401. 

  401. 	break;
    402. 

  402.       case 0x52 :
    403. 

  403. 	ITB.size         = 4;
    404. 

  404. 	ITB.associative  = 0;
    405. 

  405. 	ITB.linesize     = 256;
    406. 

  406. 	LITB.size        = 4096;
    407. 

  407. 	LITB.associative = 0;
    408. 

  408. 	LITB.linesize    = 256;
    409. 

  409. 	LITB.shared      = 1;
    410. 

  410. 	break;
    411. 

  411.       case 0x56 :
    412. 

  412. 	LDTB.size        = 4096;
    413. 

  413. 	LDTB.associative = 4;
    414. 

  414. 	LDTB.linesize    = 16;
    415. 

  415. 	break;
    416. 

  416.       case 0x57 :
    417. 

  417. 	LDTB.size        = 4096;
    418. 

  418. 	LDTB.associative = 4;
    419. 

  419. 	LDTB.linesize    = 16;
    420. 

  420. 	break;
    421. 

  421.       case 0x5b :
    422. 

  422. 	DTB.size         = 4;
    423. 

  423. 	DTB.associative  = 0;
    424. 

  424. 	DTB.linesize     = 64;
    425. 

  425. 	LDTB.size        = 4096;
    426. 

  426. 	LDTB.associative = 0;
    427. 

  427. 	LDTB.linesize    = 64;
    428. 

  428. 	LDTB.shared      = 1;
    429. 

  429. 	break;
    430. 

  430.       case 0x5c :
    431. 

  431. 	DTB.size         = 4;
    432. 

  432. 	DTB.associative  = 0;
    433. 

  433. 	DTB.linesize     = 128;
    434. 

  434. 	LDTB.size        = 4096;
    435. 

  435. 	LDTB.associative = 0;
    436. 

  436. 	LDTB.linesize    = 128;
    437. 

  437. 	LDTB.shared      = 1;
    438. 

  438. 	break;
    439. 

  439.       case 0x5d :
    440. 

  440. 	DTB.size         = 4;
    441. 

  441. 	DTB.associative  = 0;
    442. 

  442. 	DTB.linesize     = 256;
    443. 

  443. 	LDTB.size        = 4096;
    444. 

  444. 	LDTB.associative = 0;
    445. 

  445. 	LDTB.linesize    = 256;
    446. 

  446. 	LDTB.shared      = 1;
    447. 

  447. 	break;
    448. 

  448.       case 0x60 :
    449. 

  449. 	LD1.size        = 16;
    450. 

  450. 	LD1.associative = 8;
    451. 

  451. 	LD1.linesize    = 64;
    452. 

  452. 	break;
    453. 

  453.       case 0x66 :
    454. 

  454. 	LD1.size        = 8;
    455. 

  455. 	LD1.associative = 4;
    456. 

  456. 	LD1.linesize    = 64;
    457. 

  457. 	break;
    458. 

  458.       case 0x67 :
    459. 

  459. 	LD1.size        = 16;
    460. 

  460. 	LD1.associative = 4;
    461. 

  461. 	LD1.linesize    = 64;
    462. 

  462. 	break;
    463. 

  463.       case 0x68 :
    464. 

  464. 	LD1.size        = 32;
    465. 

  465. 	LD1.associative = 4;
    466. 

  466. 	LD1.linesize    = 64;
    467. 

  467. 	break;
    468. 

  468.       case 0x70 :
    469. 

  469. 	LC1.size        = 12;
    470. 

  470. 	LC1.associative = 8;
    471. 

  471. 	break;
    472. 

  472.       case 0x71 :
    473. 

  473. 	LC1.size        = 16;
    474. 

  474. 	LC1.associative = 8;
    475. 

  475. 	break;
    476. 

  476.       case 0x72 :
    477. 

  477. 	LC1.size        = 32;
    478. 

  478. 	LC1.associative = 8;
    479. 

  479. 	break;
    480. 

  480.       case 0x73 :
    481. 

  481. 	LC1.size        = 64;
    482. 

  482. 	LC1.associative = 8;
    483. 

  483. 	break;
    484. 

  484.       case 0x77 :
    485. 

  485. 	LC1.size        = 16;
    486. 

  486. 	LC1.associative = 4;
    487. 

  487. 	LC1.linesize    = 64;
    488. 

  488. 	break;
    489. 

  489.       case 0x78 :
    490. 

  490. 	L2.size        = 1024;
    491. 

  491. 	L2.associative = 4;
    492. 

  492. 	L2.linesize    = 64;
    493. 

  493. 	break;
    494. 

  494.       case 0x79 :
    495. 

  495. 	L2.size         = 128;
    496. 

  496. 	L2.associative  = 8;
    497. 

  497. 	L2.linesize     = 64;
    498. 

  498. 	break;
    499. 

  499.       case 0x7a :
    500. 

  500. 	L2.size         = 256;
    501. 

  501. 	L2.associative  = 8;
    502. 

  502. 	L2.linesize     = 64;
    503. 

  503. 	break;
    504. 

  504.       case 0x7b :
    505. 

  505. 	L2.size         = 512;
    506. 

  506. 	L2.associative  = 8;
    507. 

  507. 	L2.linesize     = 64;
    508. 

  508. 	break;
    509. 

  509.       case 0x7c :
    510. 

  510. 	L2.size         = 1024;
    511. 

  511. 	L2.associative  = 8;
    512. 

  512. 	L2.linesize     = 64;
    513. 

  513. 	break;
    514. 

  514.       case 0x7d :
    515. 

  515. 	L2.size         = 2048;
    516. 

  516. 	L2.associative  = 8;
    517. 

  517. 	L2.linesize     = 64;
    518. 

  518. 	break;
    519. 

  519.       case 0x7e :
    520. 

  520. 	L2.size         = 256;
    521. 

  521. 	L2.associative  = 8;
    522. 

  522. 	L2.linesize     = 128;
    523. 

  523. 	break;
    524. 

  524.       case 0x7f :
    525. 

  525. 	L2.size         = 512;
    526. 

  526. 	L2.associative  = 2;
    527. 

  527. 	L2.linesize     = 64;
    528. 

  528. 	break;
    529. 

  529.       case 0x81 :
    530. 

  530. 	L2.size         = 128;
    531. 

  531. 	L2.associative  = 8;
    532. 

  532. 	L2.linesize     = 32;
    533. 

  533. 	break;
    534. 

  534.       case 0x82 :
    535. 

  535. 	L2.size         = 256;
    536. 

  536. 	L2.associative  = 8;
    537. 

  537. 	L2.linesize     = 32;
    538. 

  538. 	break;
    539. 

  539.       case 0x83 :
    540. 

  540. 	L2.size         = 512;
    541. 

  541. 	L2.associative  = 8;
    542. 

  542. 	L2.linesize     = 32;
    543. 

  543. 	break;
    544. 

  544.       case 0x84 :
    545. 

  545. 	L2.size         = 1024;
    546. 

  546. 	L2.associative  = 8;
    547. 

  547. 	L2.linesize     = 32;
    548. 

  548. 	break;
    549. 

  549.       case 0x85 :
    550. 

  550. 	L2.size         = 2048;
    551. 

  551. 	L2.associative  = 8;
    552. 

  552. 	L2.linesize     = 32;
    553. 

  553. 	break;
    554. 

  554.       case 0x86 :
    555. 

  555. 	L2.size         = 512;
    556. 

  556. 	L2.associative  = 4;
    557. 

  557. 	L2.linesize     = 64;
    558. 

  558. 	break;
    559. 

  559.       case 0x87 :
    560. 

  560. 	L2.size         = 1024;
    561. 

  561. 	L2.associative  = 8;
    562. 

  562. 	L2.linesize     = 64;
    563. 

  563. 	break;
    564. 

  564.       case 0x88 :
    565. 

  565. 	L3.size         = 2048;
    566. 

  566. 	L3.associative  = 4;
    567. 

  567. 	L3.linesize     = 64;
    568. 

  568. 	break;
    569. 

  569.       case 0x89 :
    570. 

  570. 	L3.size         = 4096;
    571. 

  571. 	L3.associative  = 4;
    572. 

  572. 	L3.linesize     = 64;
    573. 

  573. 	break;
    574. 

  574.       case 0x8a :
    575. 

  575. 	L3.size         = 8192;
    576. 

  576. 	L3.associative  = 4;
    577. 

  577. 	L3.linesize     = 64;
    578. 

  578. 	break;
    579. 

  579.       case 0x8d :
    580. 

  580. 	L3.size         = 3096;
    581. 

  581. 	L3.associative  = 12;
    582. 

  582. 	L3.linesize     = 128;
    583. 

  583. 	break;
    584. 

  584.       case 0x90 :
    585. 

  585. 	ITB.size        = 4;
    586. 

  586. 	ITB.associative = 0;
    587. 

  587. 	ITB.linesize    = 64;
    588. 

  588. 	break;
    589. 

  589.       case 0x96 :
    590. 

  590. 	DTB.size        = 4;
    591. 

  591. 	DTB.associative = 0;
    592. 

  592. 	DTB.linesize    = 32;
    593. 

  593. 	break;
    594. 

  594.       case 0x9b :
    595. 

  595. 	L2DTB.size        = 4;
    596. 

  596. 	L2DTB.associative = 0;
    597. 

  597. 	L2DTB.linesize    = 96;
    598. 

  598. 	break;
    599. 

  599.       case 0xb0 :
    600. 

  600. 	ITB.size        = 4;
    601. 

  601. 	ITB.associative = 4;
    602. 

  602. 	ITB.linesize    = 128;
    603. 

  603. 	break;
    604. 

  604.       case 0xb1 :
    605. 

  605. 	LITB.size        = 4096;
    606. 

  606. 	LITB.associative = 4;
    607. 

  607. 	LITB.linesize    = 4;
    608. 

  608. 	break;
    609. 

  609.       case 0xb3 :
    610. 

  610. 	DTB.size        = 4;
    611. 

  611. 	DTB.associative = 4;
    612. 

  612. 	DTB.linesize    = 128;
    613. 

  613. 	break;
    614. 

  614.       case 0xb4 :
    615. 

  615. 	DTB.size        = 4;
    616. 

  616. 	DTB.associative = 4;
    617. 

  617. 	DTB.linesize    = 256;
    618. 

  618. 	break;
    619. 

  619.       }
    620. 

  620.     }
    621. 

  621.   }
    622. 

  622. 

  623.   if (get_vendor() == VENDOR_INTEL) {
    624. 

  624.     cpuid(0x80000000, &cpuid_level, &ebx, &ecx, &edx);
    625. 

  625.     if (cpuid_level >= 0x80000006) {
    626. 

  626.       cpuid(0x80000006, &eax, &ebx, &ecx, &edx);
    627. 

  627. 

  628.       L2.size         = BITMASK(ecx, 16, 0xffff);
    629. 

  629.       L2.associative  = BITMASK(ecx, 12, 0x0f);
    630. 

  630.       L2.linesize     = BITMASK(ecx,  0, 0xff);
    631. 

  631.     }
    632. 

  632.   }
    633. 

  633. 

  634.   if ((get_vendor() == VENDOR_AMD) || (get_vendor() == VENDOR_CENTAUR)) {
    635. 

  635.     cpuid(0x80000005, &eax, &ebx, &ecx, &edx);
    636. 

  636. 

  637.     LDTB.size        = 4096;
    638. 

  638.     LDTB.associative = BITMASK(eax, 24, 0xff);
    639. 

  639.     if (LDTB.associative == 0xff) LDTB.associative = 0;
    640. 

  640.     LDTB.linesize    = BITMASK(eax, 16, 0xff);
    641. 

  641. 

  642.     LITB.size        = 4096;
    643. 

  643.     LITB.associative = BITMASK(eax,  8, 0xff);
    644. 

  644.     if (LITB.associative == 0xff) LITB.associative = 0;
    645. 

  645.     LITB.linesize    = BITMASK(eax,  0, 0xff);
    646. 

  646.     
    647. 

  647.     DTB.size        = 4;
    648. 

  648.     DTB.associative = BITMASK(ebx, 24, 0xff);
    649. 

  649.     if (DTB.associative == 0xff) DTB.associative = 0;
    650. 

  650.     DTB.linesize    = BITMASK(ebx, 16, 0xff);
    651. 

  651. 

  652.     ITB.size        = 4;
    653. 

  653.     ITB.associative = BITMASK(ebx,  8, 0xff);
    654. 

  654.     if (ITB.associative == 0xff) ITB.associative = 0;
    655. 

  655.     ITB.linesize    = BITMASK(ebx,  0, 0xff);
    656. 

  656. 

  657.     LD1.size        = BITMASK(ecx, 24, 0xff);
    658. 

  658.     LD1.associative = BITMASK(ecx, 16, 0xff);
    659. 

  659.     if (LD1.associative == 0xff) LD1.associative = 0;
    660. 

  660.     LD1.linesize    = BITMASK(ecx,  0, 0xff);
    661. 

  661. 

  662.     LC1.size        = BITMASK(ecx, 24, 0xff);
    663. 

  663.     LC1.associative = BITMASK(ecx, 16, 0xff);
    664. 

  664.     if (LC1.associative == 0xff) LC1.associative = 0;
    665. 

  665.     LC1.linesize    = BITMASK(ecx,  0, 0xff);
    666. 

  666. 

  667.     cpuid(0x80000006, &eax, &ebx, &ecx, &edx);
    668. 

  668. 

  669.     L2LDTB.size        = 4096;
    670. 

  670.     L2LDTB.associative = BITMASK(eax, 24, 0xff);
    671. 

  671.     if (L2LDTB.associative == 0xff) L2LDTB.associative = 0;
    672. 

  672.     L2LDTB.linesize    = BITMASK(eax, 16, 0xff);
    673. 

  673. 

  674.     L2LITB.size        = 4096;
    675. 

  675.     L2LITB.associative = BITMASK(eax,  8, 0xff);
    676. 

  676.     if (L2LITB.associative == 0xff) L2LITB.associative = 0;
    677. 

  677.     L2LITB.linesize    = BITMASK(eax,  0, 0xff);
    678. 

  678.     
    679. 

  679.     L2DTB.size        = 4;
    680. 

  680.     L2DTB.associative = BITMASK(ebx, 24, 0xff);
    681. 

  681.     if (L2DTB.associative == 0xff) L2DTB.associative = 0;
    682. 

  682.     L2DTB.linesize    = BITMASK(ebx, 16, 0xff);
    683. 

  683. 

  684.     L2ITB.size        = 4;
    685. 

  685.     L2ITB.associative = BITMASK(ebx,  8, 0xff);
    686. 

  686.     if (L2ITB.associative == 0xff) L2ITB.associative = 0;
    687. 

  687.     L2ITB.linesize    = BITMASK(ebx,  0, 0xff);
    688. 

  688. 

  689.     L2.size        = BITMASK(ecx, 16, 0xffff);
    690. 

  690.     L2.associative = BITMASK(ecx, 12, 0xf);
    691. 

  691.     if (L2.associative == 0xff) L2.associative = 0;
    692. 

  692.     L2.linesize    = BITMASK(ecx,  0, 0xff);
    693. 

  693.   }
    694. 

  694. 

  695.     switch (type) {
    696. 

  696.       
    697. 

  697.     case CACHE_INFO_L1_I :
    698. 

  698.       *cacheinfo = LC1;
    699. 

  699.       break;
    700. 

  700.     case CACHE_INFO_L1_D :
    701. 

  701.       *cacheinfo = LD1;
    702. 

  702.       break;
    703. 

  703.     case CACHE_INFO_L2 :
    704. 

  704.       *cacheinfo = L2;
    705. 

  705.       break;
    706. 

  706.     case CACHE_INFO_L3 :
    707. 

  707.       *cacheinfo = L3;
    708. 

  708.       break;
    709. 

  709.     case CACHE_INFO_L1_DTB :
    710. 

  710.       *cacheinfo = DTB;
    711. 

  711.       break;
    712. 

  712.     case CACHE_INFO_L1_ITB :
    713. 

  713.       *cacheinfo = ITB;
    714. 

  714.       break;
    715. 

  715.     case CACHE_INFO_L1_LDTB :
    716. 

  716.       *cacheinfo = LDTB;
    717. 

  717.       break;
    718. 

  718.     case CACHE_INFO_L1_LITB :
    719. 

  719.       *cacheinfo = LITB;
    720. 

  720.       break;
    721. 

  721.     case CACHE_INFO_L2_DTB :
    722. 

  722.       *cacheinfo = L2DTB;
    723. 

  723.       break;
    724. 

  724.     case CACHE_INFO_L2_ITB :
    725. 

  725.       *cacheinfo = L2ITB;
    726. 

  726.       break;
    727. 

  727.     case CACHE_INFO_L2_LDTB :
    728. 

  728.       *cacheinfo = L2LDTB;
    729. 

  729.       break;
    730. 

  730.     case CACHE_INFO_L2_LITB :
    731. 

  731.       *cacheinfo = L2LITB;
    732. 

  732.       break;
    733. 

  733.     }
    734. 

  734.   return 0;
    735. 

  735. }
    736. 

  736. 

  737. int get_cpuname(void){
    738. 

  738. 

  739.   int family, exfamily, model, vendor, exmodel;
    740. 

  740. 

  741.   if (!have_cpuid()) return CPUTYPE_80386;
    742. 

  742. 

  743.   family   = get_cputype(GET_FAMILY);
    744. 

  744.   exfamily = get_cputype(GET_EXFAMILY);
    745. 

  745.   model    = get_cputype(GET_MODEL);
    746. 

  746.   exmodel  = get_cputype(GET_EXMODEL);
    747. 

  747. 

  748.   vendor = get_vendor();
    749. 

  749. 

  750.   if (vendor == VENDOR_INTEL){
    751. 

  751.     switch (family) {
    752. 

  752.     case 0x4:
    753. 

  753.       return CPUTYPE_80486;
    754. 

  754.     case 0x5:
    755. 

  755.       return CPUTYPE_PENTIUM;
    756. 

  756.     case 0x6:
    757. 

  757.       switch (exmodel) {
    758. 

  758.       case 0: 
    759. 

  759. 	if ((model >= 3) && (model <= 6)) return CPUTYPE_PENTIUM2;
    760. 

  760. 	if (((model >=  7) && (model <= 8)) ||
    761. 

  761. 	    ((model >= 10) && (model <= 11))) return CPUTYPE_PENTIUM3;
    762. 

  762. 	if ((model == 9) || 
    763. 

  763. 	    ((model >= 13) && (model <= 14))) return CPUTYPE_PENTIUMM;
    764. 

  764. 	if (model == 15) return CPUTYPE_CORE2;
    765. 

  765. 	break;
    766. 

  766.       case 1:
    767. 

  767. 	if (model == 6) return  CPUTYPE_CORE2;
    768. 

  768. 	if (model == 7) return  CPUTYPE_PENRYN;
    769. 

  769. 	break;
    770. 

  770.       }
    771. 

  771.       break;
    772. 

  772.     case 0x7:
    773. 

  773.       return CPUTYPE_ITANIUM;
    774. 

  774.     case 0xf:
    775. 

  775.       switch (exfamily) {
    776. 

  776.       case 0 :
    777. 

  777. 	return CPUTYPE_PENTIUM4;
    778. 

  778.       case 1 :
    779. 

  779. 	return CPUTYPE_ITANIUM;
    780. 

  780.       }
    781. 

  781.       break;
    782. 

  782.     }
    783. 

  783.     return CPUTYPE_INTEL_UNKNOWN;
    784. 

  784.   }
    785. 

  785. 

  786.   if (vendor == VENDOR_AMD){
    787. 

  787.     switch (family) {
    788. 

  788.     case 0x4:
    789. 

  789.       return CPUTYPE_AMD5X86;
    790. 

  790.     case 0x5:
    791. 

  791.       return CPUTYPE_AMDK6;
    792. 

  792.     case 0x6:
    793. 

  793.       return CPUTYPE_ATHLON;
    794. 

  794.     case 0xf:
    795. 

  795.       switch (exfamily) {
    796. 

  796.       case 0 :
    797. 

  797. 	return CPUTYPE_OPTERON;
    798. 

  798.       case 1 :
    799. 

  799. 	return CPUTYPE_BARCELONA;
    800. 

  800.       }
    801. 

  801.       break;
    802. 

  802.     }
    803. 

  803.     return CPUTYPE_AMD_UNKNOWN;
    804. 

  804.   }
    805. 

  805. 

  806.   if (vendor == VENDOR_CYRIX){
    807. 

  807.     switch (family) {
    808. 

  808.     case 0x4:
    809. 

  809.       return CPUTYPE_CYRIX5X86;
    810. 

  810.     case 0x5:
    811. 

  811.       return CPUTYPE_CYRIXM1;
    812. 

  812.     case 0x6:
    813. 

  813.       return CPUTYPE_CYRIXM2;
    814. 

  814.     }
    815. 

  815.     return CPUTYPE_CYRIX_UNKNOWN;
    816. 

  816.   }
    817. 

  817. 

  818.   if (vendor == VENDOR_NEXGEN){
    819. 

  819.     switch (family) {
    820. 

  820.     case 0x5:
    821. 

  821.       return CPUTYPE_NEXGENNX586;
    822. 

  822.     }
    823. 

  823.     return CPUTYPE_NEXGEN_UNKNOWN;
    824. 

  824.   }
    825. 

  825. 

  826.   if (vendor == VENDOR_CENTAUR){
    827. 

  827.     switch (family) {
    828. 

  828.     case 0x5:
    829. 

  829.       return CPUTYPE_CENTAURC6;
    830. 

  830.     }
    831. 

  831.     return CPUTYPE_VIAC3;
    832. 

  832.   }
    833. 

  833. 

  834.   if (vendor == VENDOR_RISE){
    835. 

  835.     switch (family) {
    836. 

  836.     case 0x5:
    837. 

  837.       return CPUTYPE_RISEMP6;
    838. 

  838.     }
    839. 

  839.     return CPUTYPE_RISE_UNKNOWN;
    840. 

  840.   }
    841. 

  841. 

  842.   if (vendor == VENDOR_SIS){
    843. 

  843.     switch (family) {
    844. 

  844.     case 0x5:
    845. 

  845.       return CPUTYPE_SYS55X;
    846. 

  846.     }
    847. 

  847.     return CPUTYPE_SIS_UNKNOWN;
    848. 

  848.   }
    849. 

  849. 

  850.   if (vendor == VENDOR_TRANSMETA){
    851. 

  851.     switch (family) {
    852. 

  852.     case 0x5:
    853. 

  853.       return CPUTYPE_CRUSOETM3X;
    854. 

  854.     }
    855. 

  855.     return CPUTYPE_TRANSMETA_UNKNOWN;
    856. 

  856.   }
    857. 

  857. 

  858.   if (vendor == VENDOR_NSC){
    859. 

  859.     switch (family) {
    860. 

  860.     case 0x5:
    861. 

  861.       return CPUTYPE_NSGEODE;
    862. 

  862.     }
    863. 

  863.     return CPUTYPE_NSC_UNKNOWN;
    864. 

  864.   }
    865. 

  865. 

  866.   return CPUTYPE_UNKNOWN;
    867. 

  867. }
    868. 

  868. 

  869. static char *cpuname[] = {
    870. 

  870.   "UNKNOWN",
    871. 

  871.   "INTEL_UNKNOWN",
    872. 

  872.   "UMC_UNKNOWN",
    873. 

  873.   "AMD_UNKNOWN",
    874. 

  874.   "CYRIX_UNKNOWN",
    875. 

  875.   "NEXGEN_UNKNOWN",
    876. 

  876.   "CENTAUR_UNKNOWN",
    877. 

  877.   "RISE_UNKNOWN",
    878. 

  878.   "SIS_UNKNOWN",
    879. 

  879.   "TRANSMETA_UNKNOWN",
    880. 

  880.   "NSC_UNKNOWN",
    881. 

  881.   "80386",
    882. 

  882.   "80486",
    883. 

  883.   "PENTIUM",
    884. 

  884.   "PENTIUM2",
    885. 

  885.   "PENTIUM3",
    886. 

  886.   "PENTIUMM",
    887. 

  887.   "PENTIUM4",
    888. 

  888.   "CORE2",
    889. 

  889.   "PENRYN",
    890. 

  890.   "ITANIUM",
    891. 

  891.   "ITANIUM2",
    892. 

  892.   "5X86",
    893. 

  893.   "K6",
    894. 

  894.   "ATHLON",
    895. 

  895.   "DURON",
    896. 

  896.   "OPTERON",
    897. 

  897.   "BARCELONA",
    898. 

  898.   "CYRIX5X86",
    899. 

  899.   "CYRIXM1",
    900. 

  900.   "CYRIXM2",
    901. 

  901.   "NEXGENNX586",
    902. 

  902.   "CENTAURC6",
    903. 

  903.   "RISEMP6",
    904. 

  904.   "SYS55X",
    905. 

  905.   "TM3X00",
    906. 

  906.   "NSGEODE",
    907. 

  907.   "VIAC3",
    908. 

  908. };
    909. 

  909. 

  910. static char *lowercpuname[] = {
    911. 

  911.   "unknown",
    912. 

  912.   "intel_unknown",
    913. 

  913.   "umc_unknown",
    914. 

  914.   "amd_unknown",
    915. 

  915.   "cyrix_unknown",
    916. 

  916.   "nexgen_unknown",
    917. 

  917.   "centaur_unknown",
    918. 

  918.   "rise_unknown",
    919. 

  919.   "sis_unknown",
    920. 

  920.   "transmeta_unknown",
    921. 

  921.   "nsc_unknown",
    922. 

  922.   "80386",
    923. 

  923.   "80486",
    924. 

  924.   "pentium",
    925. 

  925.   "pentium2",
    926. 

  926.   "pentium3",
    927. 

  927.   "pentiumm",
    928. 

  928.   "pentium4",
    929. 

  929.   "core2",
    930. 

  930.   "penryn",
    931. 

  931.   "itanium",
    932. 

  932.   "itanium2",
    933. 

  933.   "5x86",
    934. 

  934.   "k6",
    935. 

  935.   "athlon",
    936. 

  936.   "duron",
    937. 

  937.   "opteron",
    938. 

  938.   "barcelona",
    939. 

  939.   "cyrix5x86",
    940. 

  940.   "cyrixm1",
    941. 

  941.   "cyrixm2",
    942. 

  942.   "nexgennx586",
    943. 

  943.   "centaurc6",
    944. 

  944.   "risemp6",
    945. 

  945.   "sys55x",
    946. 

  946.   "tms3x00",
    947. 

  947.   "nsgeode",
    948. 

  948. };
    949. 

  949. 

  950. static char *corename[] = {
    951. 

  951.   "UNKOWN",
    952. 

  952.   "80486", 
    953. 

  953.   "P5",
    954. 

  954.   "KATMAI",
    955. 

  955.   "COPPERMINE",
    956. 

  956.   "NORTHWOOD",
    957. 

  957.   "PRESCOTT",
    958. 

  958.   "BANIAS",
    959. 

  959.   "ATHLON",
    960. 

  960.   "OPTERON",
    961. 

  961.   "BARCELONA",
    962. 

  962.   "VIAC3",
    963. 

  963.   "YONAH",
    964. 

  964.   "CORE2",
    965. 

  965.   "PENRYN",
    966. 

  966. };
    967. 

  967. 

  968. static char *corename_lower[] = {
    969. 

  969.   "unknown",
    970. 

  970.   "80486", 
    971. 

  971.   "p5",
    972. 

  972.   "katmai",
    973. 

  973.   "coppermine",
    974. 

  974.   "northwood",
    975. 

  975.   "prescott",
    976. 

  976.   "banias",
    977. 

  977.   "athlon",
    978. 

  978.   "opteron",
    979. 

  979.   "barcelona",
    980. 

  980.   "viac3",
    981. 

  981.   "yonah",
    982. 

  982.   "core2",
    983. 

  983.   "penryn",
    984. 

  984. };
    985. 

  985. 

  986. 

  987. char *get_cpunamechar(void){
    988. 

  988.   return cpuname[get_cpuname()];
    989. 

  989. }
    990. 

  990. 

  991. char *get_lower_cpunamechar(void){
    992. 

  992.   return lowercpuname[get_cpuname()];
    993. 

  993. }
    994. 

  994. 

  995. 

  996. int get_coretype(void){
    997. 

  997. 

  998.   int family, exfamily, model, exmodel, vendor;
    999. 

  999. 

  1000.   if (!have_cpuid()) return CORE_80486;
    1001. 

  1001. 

  1002.   family   = get_cputype(GET_FAMILY);
    1003. 

  1003.   exfamily = get_cputype(GET_EXFAMILY);
    1004. 

  1004.   model    = get_cputype(GET_MODEL);
    1005. 

  1005.   exmodel  = get_cputype(GET_EXMODEL);
    1006. 

  1006. 

  1007.   vendor = get_vendor();
    1008. 

  1008. 

  1009.   if (vendor == VENDOR_INTEL){
    1010. 

  1010.     switch (family) {
    1011. 

  1011.     case 0x4:
    1012. 

  1012.       return CORE_80486;
    1013. 

  1013.     case 0x5:
    1014. 

  1014.       return CORE_P5;
    1015. 

  1015.     case 0x6:
    1016. 

  1016.       switch (exmodel) {
    1017. 

  1017.       case 0:
    1018. 

  1018. 	if (model <= 0x7) return CORE_KATMAI;
    1019. 

  1019. 	if ((model == 0x8) || (model == 0xa) || (model == 0xb)) return CORE_COPPERMINE;
    1020. 

  1020. 	if ((model == 0x9) || (model == 0xd)) return CORE_BANIAS;
    1021. 

  1021. #if 0
    1022. 

  1022. 	if (model == 14) return CORE_YONAH;
    1023. 

  1023. #else
    1024. 

  1024. 	if (model == 14) return CORE_BANIAS;
    1025. 

  1025. #endif
    1026. 

  1026. 	if (model == 15) return CORE_CORE2;
    1027. 

  1027. 	return CORE_UNKNOWN;
    1028. 

  1028.       case 1:
    1029. 

  1029. 	if (model == 6) return CORE_CORE2;
    1030. 

  1030. 	if (model == 7) return CORE_PENRYN;
    1031. 

  1031. 	return CORE_UNKNOWN;
    1032. 

  1032.       }
    1033. 

  1033.       case 0xf:
    1034. 

  1034.       if (model <= 0x2) return CORE_NORTHWOOD;
    1035. 

  1035.       return CORE_PRESCOTT;
    1036. 

  1036.     }
    1037. 

  1037.   }
    1038. 

  1038. 

  1039.   if (vendor == VENDOR_AMD){
    1040. 

  1040.     if (family <= 0x5) return CORE_80486;
    1041. 

  1041.     if (family <= 0xe) return CORE_ATHLON;
    1042. 

  1042.     if (family <= 0xf){
    1043. 

  1043.       if (exfamily == 0) return CORE_OPTERON; else return CORE_BARCELONA;
    1044. 

  1044.     }
    1045. 

  1045.   }
    1046. 

  1046. 

  1047.   if (vendor == VENDOR_CENTAUR) return CORE_VIAC3;
    1048. 

  1048. 

  1049.   return CORE_UNKNOWN;
    1050. 

  1050. }
    1051. 

  1051. 

  1052. void get_cpuconfig(void){
    1053. 

  1053. 

  1054.   cache_info_t info;
    1055. 

  1055.   int features;
    1056. 

  1056. 

  1057. #ifndef __64BIT__
    1058. 

  1058.   printf("-DARCH_X86 ");
    1059. 

  1059. #else
    1060. 

  1060.   printf("-DARCH_X86_64 ");
    1061. 

  1061. #endif
    1062. 

  1062. 

  1063.   printf("-D%s ", cpuname[get_cpuname()]);
    1064. 

  1064. 

  1065.   get_cacheinfo(CACHE_INFO_L1_I, &info);
    1066. 

  1066.   if (info.size > 0) {
    1067. 

  1067.     printf("-DL1_CODE_SIZE=%d ", info.size * 1024);
    1068. 

  1068.     printf("-DL1_CODE_ASSOCIATIVE=%d ", info.associative);
    1069. 

  1069.     printf("-DL1_CODE_LINESIZE=%d ", info.linesize);
    1070. 

  1070.   }
    1071. 

  1071. 

  1072.   get_cacheinfo(CACHE_INFO_L1_D, &info);
    1073. 

  1073.   if (info.size > 0) {
    1074. 

  1074.     printf("-DL1_DATA_SIZE=%d ", info.size * 1024);
    1075. 

  1075.     printf("-DL1_DATA_ASSOCIATIVE=%d ", info.associative);
    1076. 

  1076.     printf("-DL1_DATA_LINESIZE=%d ", info.linesize);
    1077. 

  1077.   }
    1078. 

  1078. 

  1079.   get_cacheinfo(CACHE_INFO_L2, &info);
    1080. 

  1080.   if (info.size > 0) {
    1081. 

  1081.     printf("-DL2_SIZE=%d ", info.size * 1024);
    1082. 

  1082.     printf("-DL2_ASSOCIATIVE=%d ", info.associative);
    1083. 

  1083.     printf("-DL2_LINESIZE=%d ", info.linesize);
    1084. 

  1084.   }
    1085. 

  1085. 

  1086.   get_cacheinfo(CACHE_INFO_L3, &info);
    1087. 

  1087.   if (info.size > 0) {
    1088. 

  1088.     printf("-DL3_SIZE=%d ", info.size * 1024);
    1089. 

  1089.     printf("-DL3_ASSOCIATIVE=%d ", info.associative);
    1090. 

  1090.     printf("-DL3_LINESIZE=%d ", info.linesize);
    1091. 

  1091.   }
    1092. 

  1092. 

  1093.   get_cacheinfo(CACHE_INFO_L1_ITB, &info);
    1094. 

  1094.   if (info.size > 0) {
    1095. 

  1095.     printf("-DITB_SIZE=%d ", info.size * 1024);
    1096. 

  1096.     printf("-DITB_ASSOCIATIVE=%d ", info.associative);
    1097. 

  1097.     printf("-DITB_ENTRIES=%d ", info.linesize);
    1098. 

  1098.   }
    1099. 

  1099. 

  1100.   get_cacheinfo(CACHE_INFO_L1_DTB, &info);
    1101. 

  1101.   if (info.size > 0) {
    1102. 

  1102.     printf("-DDTB_SIZE=%d ", info.size * 1024);
    1103. 

  1103.     printf("-DDTB_ASSOCIATIVE=%d ", info.associative);
    1104. 

  1104.     printf("-DDTB_ENTRIES=%d ", info.linesize);
    1105. 

  1105.   }
    1106. 

  1106.   
    1107. 

  1107.   features = get_cputype(GET_FEATURE);
    1108. 

  1108. 

  1109.   if (features & HAVE_CMOV )   printf("-DHAVE_CMOV ");
    1110. 

  1110.   if (features & HAVE_MMX  )   printf("-DHAVE_MMX ");
    1111. 

  1111.   if (features & HAVE_SSE  )   printf("-DHAVE_SSE ");
    1112. 

  1112.   if (features & HAVE_SSE2 )   printf("-DHAVE_SSE2 ");
    1113. 

  1113.   if (features & HAVE_SSE3 )   printf("-DHAVE_SSE3 ");
    1114. 

  1114.   if (features & HAVE_SSSE3)   printf("-DHAVE_SSSE3 ");
    1115. 

  1115.   if (features & HAVE_SSE4_1)   printf("-DHAVE_SSE4_1 ");
    1116. 

  1116.   if (features & HAVE_SSE4_2)   printf("-DHAVE_SSE4_2 ");
    1117. 

  1117.   if (features & HAVE_SSE4A)   printf("-DHAVE_SSE4A ");
    1118. 

  1118.   if (features & HAVE_SSE5 )   printf("-DHAVE_SSSE5 ");
    1119. 

  1119.   if (features & HAVE_3DNOWEX) printf("-DHAVE_3DNOWEX ");
    1120. 

  1120.   if (features & HAVE_3DNOW)   printf("-DHAVE_3DNOW ");
    1121. 

  1121.   if (features & HAVE_CFLUSH)  printf("-DHAVE_CFLUSH ");
    1122. 

  1122.   if (features & HAVE_HIT)     printf("-DHAVE_HIT=1 ");
    1123. 

  1123.   if (features & HAVE_MISALIGNSSE) printf("-DHAVE_MISALIGNSSE ");
    1124. 

  1124.   if (features & HAVE_128BITFPU)   printf("-DHAVE_128BITFPU ");
    1125. 

  1125.   if (features & HAVE_FASTMOVU)    printf("-DHAVE_FASTMOVU ");
    1126. 

  1126. 

  1127.   printf("-DNUM_SHAREDCACHE=%d ", get_cputype(GET_NUMSHARE) + 1);
    1128. 

  1128.   printf("-DNUM_CORES=%d ", get_cputype(GET_NUMCORES) + 1);
    1129. 

  1129. 

  1130.   features = get_coretype();
    1131. 

  1131.   if (features > 0) printf("-DCORE_%s ", corename[features]);
    1132. 

  1132. 

  1133.   printf("\n");
    1134. 

  1134. }
    1135. 

  1135. 

  1136. void get_architecture(void){
    1137. 

  1137. #ifndef __64BIT__
    1138. 

  1138.     printf("X86");
    1139. 

  1139. #else
    1140. 

  1140.     printf("X86_64");
    1141. 

  1141. #endif
    1142. 

  1142. }
    1143. 

  1143. 

  1144. void get_subarchitecture(void){
    1145. 

  1145.     printf("%s", get_cpunamechar());
    1146. 

  1146. }
    1147. 

  1147. 

  1148. void get_subdirname(void){
    1149. 

  1149. #ifndef __64BIT__
    1150. 

  1150.     printf("x86");
    1151. 

  1151. #else
    1152. 

  1152.     printf("x86_64");
    1153. 

  1153. #endif
    1154. 

  1154. }
    1155. 

  1155. 

  1156. char *get_corename(void){
    1157. 

  1157.   return corename[get_coretype()];
    1158. 

  1158. }
    1159. 

  1159. 

  1160. void get_libname(void){
    1161. 

  1161.   printf("%s",   corename_lower[get_coretype()]);
    1162. 

  1162. }
    1163. 

  1163. 

  1164.