floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix reading of CPU name from prtconf output on AIX

This commit is contained in:
Martin Kroeker 2020-06-25 12:55:10 +02:00 committed by GitHub
parent 3446e58daf
commit 72a0ec8e75
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 15 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
cpuid_power.c
View File

@ -57,7 +57,6 @@
#define CPUTYPE_PPCG4 7 #define CPUTYPE_PPCG4 7
#define CPUTYPE_POWER8 8 #define CPUTYPE_POWER8 8
#define CPUTYPE_POWER9 9 #define CPUTYPE_POWER9 9
#define CPUTYPE_POWER10 10
char *cpuname[] = { char *cpuname[] = {
"UNKNOWN", "UNKNOWN",
@ -83,8 +82,8 @@ char *lowercpuname[] = {
"cell", "cell",
"ppcg4", "ppcg4",
"power8", "power8",
"power9", "power9",
"power10" "power10"
}; };
char *corename[] = { char *corename[] = {
@ -97,8 +96,8 @@ char *corename[] = {
"CELL", "CELL",
"PPCG4", "PPCG4",
"POWER8", "POWER8",
"POWER9", "POWER9",
"POWER10" "POWER10"
}; };
int detect(void){ int detect(void){
@ -154,17 +153,17 @@ int detect(void){
pclose(infile); pclose(infile);
if (!strncasecmp(p, "POWER3", 6)) return CPUTYPE_POWER3; if (strstr(p, "POWER3")) return CPUTYPE_POWER3;
if (!strncasecmp(p, "POWER4", 6)) return CPUTYPE_POWER4; if (strstr(p, "POWER4")) return CPUTYPE_POWER4;
if (!strncasecmp(p, "PPC970", 6)) return CPUTYPE_PPC970; if (strstr(p, "PPC970")) return CPUTYPE_PPC970;
if (!strncasecmp(p, "POWER5", 6)) return CPUTYPE_POWER5; if (strstr(p, "POWER5")) return CPUTYPE_POWER5;
if (!strncasecmp(p, "POWER6", 6)) return CPUTYPE_POWER6; if (strstr(p, "POWER6")) return CPUTYPE_POWER6;
if (!strncasecmp(p, "POWER7", 6)) return CPUTYPE_POWER6; if (strstr(p, "POWER7")) return CPUTYPE_POWER6;
if (!strncasecmp(p, "POWER8", 6)) return CPUTYPE_POWER8; if (strstr(p, "POWER8")) return CPUTYPE_POWER8;
if (!strncasecmp(p, "POWER9", 6)) return CPUTYPE_POWER9; if (strstr(p, "POWER9")) return CPUTYPE_POWER9;
if (!strncasecmp(p, "POWER10", 7)) return CPUTYPE_POWER10; if (strstr(p, "POWER10")) return CPUTYPE_POWER10;
if (!strncasecmp(p, "Cell", 4)) return CPUTYPE_CELL; if (strstr(p, "Cell")) return CPUTYPE_CELL;
if (!strncasecmp(p, "7447", 4)) return CPUTYPE_PPCG4; if (strstr(p, "7447")) return CPUTYPE_PPCG4;
return CPUTYPE_POWER5; return CPUTYPE_POWER5;
#endif #endif