1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
|
/*
* util - Utility function library
*
* General architecture helpers
*
* Copyright IBM Corp. 2021
*
* s390-tools is free software; you can redistribute it and/or modify
* it under the terms of the MIT license. See LICENSE for details.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "lib/util_arch.h"
#define PROC_SYSINFO "/proc/sysinfo"
#define PROC_SYSINFO_TYPE "Type:"
#define HSA_SIZE_32M (32 * 1024 * 1024)
#define HSA_SIZE_512M (512 * 1024 * 1024)
/**
* Get the type of the underlying architecture.
*
* @returns Type of the underlying architecture
*/
int util_arch_machine_type(void)
{
int type = UTIL_ARCH_MACHINE_TYPE_UNKNOWN;
char *line = NULL;
FILE *fp;
fp = fopen(PROC_SYSINFO, "r");
if (!fp)
return type;
while (fscanf(fp, "%m[^\n]\n", &line) == 1) {
int n = sscanf(line, PROC_SYSINFO_TYPE "%d", &type);
free(line);
if (n == 1)
break;
}
fclose(fp);
return type;
}
/**
* Returns a human-readable string of the current machine type.
*
* @returns Pointer to a read-only string corresponding to the current machine
* type
*/
const char *util_arch_machine_type_str(void)
{
return util_arch_machine_type_to_str(util_arch_machine_type());
}
/**
* Convert a machine type to a human-readable string.
*
* @param[in] type Type of the underlying architecture
*
* @returns Pointer to a read-only string corresponding to the given machine
* type
*/
const char *util_arch_machine_type_to_str(int type)
{
switch (type) {
case UTIL_ARCH_MACHINE_TYPE_Z10_EC:
return "IBM System z10 EC";
case UTIL_ARCH_MACHINE_TYPE_Z10_BC:
return "IBM System z10 BC";
case UTIL_ARCH_MACHINE_TYPE_ZE_196:
return "IBM zEnterprise 196";
case UTIL_ARCH_MACHINE_TYPE_ZE_114:
return "IBM zEnterprise 114";
case UTIL_ARCH_MACHINE_TYPE_ZE_EC12:
return "IBM zEnterprise EC12";
case UTIL_ARCH_MACHINE_TYPE_ZE_BC12:
return "IBM zEnterprise BC12";
case UTIL_ARCH_MACHINE_TYPE_Z13:
return "IBM z13";
case UTIL_ARCH_MACHINE_TYPE_Z13_S:
return "IBM z13s";
case UTIL_ARCH_MACHINE_TYPE_Z14:
return "IBM z14";
case UTIL_ARCH_MACHINE_TYPE_Z14_ZR1:
return "IBM z14 ZR1";
case UTIL_ARCH_MACHINE_TYPE_Z15:
case UTIL_ARCH_MACHINE_TYPE_Z15_T02:
return "IBM z15";
case UTIL_ARCH_MACHINE_TYPE_Z16:
case UTIL_ARCH_MACHINE_TYPE_Z16_A02:
return "IBM z16";
default:
return "Unknown machine type";
}
}
/**
* Returns the maximum size of HSA memory in bytes on this architecture.
*
* @returns Maximum HSA size in bytes
*/
unsigned long util_arch_hsa_maxsize(void)
{
switch (util_arch_machine_type()) {
case UTIL_ARCH_MACHINE_TYPE_Z15:
case UTIL_ARCH_MACHINE_TYPE_Z15_T02:
case UTIL_ARCH_MACHINE_TYPE_Z16:
case UTIL_ARCH_MACHINE_TYPE_Z16_A02:
return HSA_SIZE_512M;
default:
return HSA_SIZE_32M;
}
}
|