Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * drivers/s390/sysinfo.c | |
3 | * | |
4 | * Copyright (C) 2001 IBM Deutschland Entwicklung GmbH, IBM Corporation | |
5 | * Author(s): Ulrich Weigand (Ulrich.Weigand@de.ibm.com) | |
6 | */ | |
7 | ||
1da177e4 LT |
8 | #include <linux/kernel.h> |
9 | #include <linux/mm.h> | |
10 | #include <linux/proc_fs.h> | |
11 | #include <linux/init.h> | |
31ee4b2f | 12 | #include <linux/delay.h> |
1da177e4 LT |
13 | #include <asm/ebcdic.h> |
14 | ||
31ee4b2f MS |
15 | /* Sigh, math-emu. Don't ask. */ |
16 | #include <asm/sfp-util.h> | |
17 | #include <math-emu/soft-fp.h> | |
18 | #include <math-emu/single.h> | |
19 | ||
0fee644a | 20 | struct sysinfo_1_1_1 { |
1da177e4 LT |
21 | char reserved_0[32]; |
22 | char manufacturer[16]; | |
23 | char type[4]; | |
24 | char reserved_1[12]; | |
0fee644a | 25 | char model_capacity[16]; |
1da177e4 LT |
26 | char sequence[16]; |
27 | char plant[4]; | |
0fee644a | 28 | char model[16]; |
1da177e4 LT |
29 | }; |
30 | ||
0fee644a | 31 | struct sysinfo_1_2_1 { |
1da177e4 LT |
32 | char reserved_0[80]; |
33 | char sequence[16]; | |
34 | char plant[4]; | |
35 | char reserved_1[2]; | |
36 | unsigned short cpu_address; | |
37 | }; | |
38 | ||
0fee644a MS |
39 | struct sysinfo_1_2_2 { |
40 | char format; | |
41 | char reserved_0[1]; | |
42 | unsigned short acc_offset; | |
43 | char reserved_1[24]; | |
44 | unsigned int secondary_capability; | |
1da177e4 LT |
45 | unsigned int capability; |
46 | unsigned short cpus_total; | |
47 | unsigned short cpus_configured; | |
48 | unsigned short cpus_standby; | |
49 | unsigned short cpus_reserved; | |
50 | unsigned short adjustment[0]; | |
51 | }; | |
52 | ||
0fee644a MS |
53 | struct sysinfo_1_2_2_extension { |
54 | unsigned int alt_capability; | |
55 | unsigned short alt_adjustment[0]; | |
56 | }; | |
57 | ||
58 | struct sysinfo_2_2_1 { | |
1da177e4 LT |
59 | char reserved_0[80]; |
60 | char sequence[16]; | |
61 | char plant[4]; | |
62 | unsigned short cpu_id; | |
63 | unsigned short cpu_address; | |
64 | }; | |
65 | ||
0fee644a | 66 | struct sysinfo_2_2_2 { |
1da177e4 LT |
67 | char reserved_0[32]; |
68 | unsigned short lpar_number; | |
69 | char reserved_1; | |
70 | unsigned char characteristics; | |
1da177e4 LT |
71 | unsigned short cpus_total; |
72 | unsigned short cpus_configured; | |
73 | unsigned short cpus_standby; | |
74 | unsigned short cpus_reserved; | |
75 | char name[8]; | |
76 | unsigned int caf; | |
77 | char reserved_2[16]; | |
78 | unsigned short cpus_dedicated; | |
79 | unsigned short cpus_shared; | |
80 | }; | |
81 | ||
0fee644a MS |
82 | #define LPAR_CHAR_DEDICATED (1 << 7) |
83 | #define LPAR_CHAR_SHARED (1 << 6) | |
84 | #define LPAR_CHAR_LIMITED (1 << 5) | |
85 | ||
86 | struct sysinfo_3_2_2 { | |
1da177e4 LT |
87 | char reserved_0[31]; |
88 | unsigned char count; | |
0fee644a | 89 | struct { |
1da177e4 LT |
90 | char reserved_0[4]; |
91 | unsigned short cpus_total; | |
92 | unsigned short cpus_configured; | |
93 | unsigned short cpus_standby; | |
94 | unsigned short cpus_reserved; | |
95 | char name[8]; | |
96 | unsigned int caf; | |
97 | char cpi[16]; | |
98 | char reserved_1[24]; | |
99 | ||
100 | } vm[8]; | |
101 | }; | |
102 | ||
0fee644a | 103 | static inline int stsi(void *sysinfo, int fc, int sel1, int sel2) |
1da177e4 | 104 | { |
0fee644a MS |
105 | register int r0 asm("0") = (fc << 28) | sel1; |
106 | register int r1 asm("1") = sel2; | |
107 | ||
108 | asm volatile( | |
109 | " stsi 0(%2)\n" | |
110 | "0: jz 2f\n" | |
111 | "1: lhi %0,%3\n" | |
112 | "2:\n" | |
113 | EX_TABLE(0b,1b) | |
114 | : "+d" (r0) : "d" (r1), "a" (sysinfo), "K" (-ENOSYS) | |
115 | : "cc", "memory" ); | |
116 | return r0; | |
1da177e4 LT |
117 | } |
118 | ||
0fee644a | 119 | static inline int stsi_0(void) |
1da177e4 LT |
120 | { |
121 | int rc = stsi (NULL, 0, 0, 0); | |
0fee644a | 122 | return rc == -ENOSYS ? rc : (((unsigned int) rc) >> 28); |
1da177e4 LT |
123 | } |
124 | ||
0fee644a | 125 | static int stsi_1_1_1(struct sysinfo_1_1_1 *info, char *page, int len) |
1da177e4 | 126 | { |
0fee644a MS |
127 | if (stsi(info, 1, 1, 1) == -ENOSYS) |
128 | return len; | |
129 | ||
130 | EBCASC(info->manufacturer, sizeof(info->manufacturer)); | |
131 | EBCASC(info->type, sizeof(info->type)); | |
132 | EBCASC(info->model, sizeof(info->model)); | |
133 | EBCASC(info->sequence, sizeof(info->sequence)); | |
134 | EBCASC(info->plant, sizeof(info->plant)); | |
135 | EBCASC(info->model_capacity, sizeof(info->model_capacity)); | |
136 | len += sprintf(page + len, "Manufacturer: %-16.16s\n", | |
137 | info->manufacturer); | |
138 | len += sprintf(page + len, "Type: %-4.4s\n", | |
139 | info->type); | |
140 | if (info->model[0] != '\0') | |
141 | /* | |
142 | * Sigh: the model field has been renamed with System z9 | |
143 | * to model_capacity and a new model field has been added | |
144 | * after the plant field. To avoid confusing older programs | |
145 | * the "Model:" prints "model_capacity model" or just | |
146 | * "model_capacity" if the model string is empty . | |
147 | */ | |
148 | len += sprintf(page + len, | |
149 | "Model: %-16.16s %-16.16s\n", | |
150 | info->model_capacity, info->model); | |
151 | else | |
152 | len += sprintf(page + len, "Model: %-16.16s\n", | |
153 | info->model_capacity); | |
154 | len += sprintf(page + len, "Sequence Code: %-16.16s\n", | |
155 | info->sequence); | |
156 | len += sprintf(page + len, "Plant: %-4.4s\n", | |
157 | info->plant); | |
158 | len += sprintf(page + len, "Model Capacity: %-16.16s\n", | |
159 | info->model_capacity); | |
160 | return len; | |
1da177e4 LT |
161 | } |
162 | ||
0fee644a MS |
163 | #if 0 /* Currently unused */ |
164 | static int stsi_1_2_1(struct sysinfo_1_2_1 *info, char *page, int len) | |
1da177e4 | 165 | { |
0fee644a MS |
166 | if (stsi(info, 1, 2, 1) == -ENOSYS) |
167 | return len; | |
168 | ||
169 | len += sprintf(page + len, "\n"); | |
170 | EBCASC(info->sequence, sizeof(info->sequence)); | |
171 | EBCASC(info->plant, sizeof(info->plant)); | |
172 | len += sprintf(page + len, "Sequence Code of CPU: %-16.16s\n", | |
173 | info->sequence); | |
174 | len += sprintf(page + len, "Plant of CPU: %-16.16s\n", | |
175 | info->plant); | |
176 | return len; | |
1da177e4 | 177 | } |
0fee644a | 178 | #endif |
1da177e4 | 179 | |
0fee644a | 180 | static int stsi_1_2_2(struct sysinfo_1_2_2 *info, char *page, int len) |
1da177e4 | 181 | { |
0fee644a MS |
182 | struct sysinfo_1_2_2_extension *ext; |
183 | int i; | |
184 | ||
185 | if (stsi(info, 1, 2, 2) == -ENOSYS) | |
186 | return len; | |
187 | ext = (struct sysinfo_1_2_2_extension *) | |
188 | ((unsigned long) info + info->acc_offset); | |
189 | ||
190 | len += sprintf(page + len, "\n"); | |
191 | len += sprintf(page + len, "CPUs Total: %d\n", | |
192 | info->cpus_total); | |
193 | len += sprintf(page + len, "CPUs Configured: %d\n", | |
194 | info->cpus_configured); | |
195 | len += sprintf(page + len, "CPUs Standby: %d\n", | |
196 | info->cpus_standby); | |
197 | len += sprintf(page + len, "CPUs Reserved: %d\n", | |
198 | info->cpus_reserved); | |
199 | ||
200 | if (info->format == 1) { | |
201 | /* | |
202 | * Sigh 2. According to the specification the alternate | |
203 | * capability field is a 32 bit floating point number | |
204 | * if the higher order 8 bits are not zero. Printing | |
205 | * a floating point number in the kernel is a no-no, | |
206 | * always print the number as 32 bit unsigned integer. | |
31ee4b2f | 207 | * The user-space needs to know about the strange |
0fee644a MS |
208 | * encoding of the alternate cpu capability. |
209 | */ | |
210 | len += sprintf(page + len, "Capability: %u %u\n", | |
211 | info->capability, ext->alt_capability); | |
212 | for (i = 2; i <= info->cpus_total; i++) | |
213 | len += sprintf(page + len, | |
214 | "Adjustment %02d-way: %u %u\n", | |
215 | i, info->adjustment[i-2], | |
216 | ext->alt_adjustment[i-2]); | |
217 | ||
218 | } else { | |
219 | len += sprintf(page + len, "Capability: %u\n", | |
220 | info->capability); | |
221 | for (i = 2; i <= info->cpus_total; i++) | |
222 | len += sprintf(page + len, | |
223 | "Adjustment %02d-way: %u\n", | |
224 | i, info->adjustment[i-2]); | |
225 | } | |
226 | ||
227 | if (info->secondary_capability != 0) | |
228 | len += sprintf(page + len, "Secondary Capability: %d\n", | |
229 | info->secondary_capability); | |
230 | ||
231 | return len; | |
1da177e4 LT |
232 | } |
233 | ||
0fee644a MS |
234 | #if 0 /* Currently unused */ |
235 | static int stsi_2_2_1(struct sysinfo_2_2_1 *info, char *page, int len) | |
1da177e4 | 236 | { |
0fee644a MS |
237 | if (stsi(info, 2, 2, 1) == -ENOSYS) |
238 | return len; | |
239 | ||
240 | len += sprintf(page + len, "\n"); | |
241 | EBCASC (info->sequence, sizeof(info->sequence)); | |
242 | EBCASC (info->plant, sizeof(info->plant)); | |
243 | len += sprintf(page + len, "Sequence Code of logical CPU: %-16.16s\n", | |
244 | info->sequence); | |
245 | len += sprintf(page + len, "Plant of logical CPU: %-16.16s\n", | |
246 | info->plant); | |
247 | return len; | |
1da177e4 | 248 | } |
0fee644a | 249 | #endif |
1da177e4 | 250 | |
0fee644a | 251 | static int stsi_2_2_2(struct sysinfo_2_2_2 *info, char *page, int len) |
1da177e4 | 252 | { |
0fee644a MS |
253 | if (stsi(info, 2, 2, 2) == -ENOSYS) |
254 | return len; | |
255 | ||
256 | EBCASC (info->name, sizeof(info->name)); | |
257 | ||
258 | len += sprintf(page + len, "\n"); | |
259 | len += sprintf(page + len, "LPAR Number: %d\n", | |
260 | info->lpar_number); | |
261 | ||
262 | len += sprintf(page + len, "LPAR Characteristics: "); | |
263 | if (info->characteristics & LPAR_CHAR_DEDICATED) | |
264 | len += sprintf(page + len, "Dedicated "); | |
265 | if (info->characteristics & LPAR_CHAR_SHARED) | |
266 | len += sprintf(page + len, "Shared "); | |
267 | if (info->characteristics & LPAR_CHAR_LIMITED) | |
268 | len += sprintf(page + len, "Limited "); | |
269 | len += sprintf(page + len, "\n"); | |
270 | ||
271 | len += sprintf(page + len, "LPAR Name: %-8.8s\n", | |
272 | info->name); | |
273 | ||
274 | len += sprintf(page + len, "LPAR Adjustment: %d\n", | |
275 | info->caf); | |
276 | ||
277 | len += sprintf(page + len, "LPAR CPUs Total: %d\n", | |
278 | info->cpus_total); | |
279 | len += sprintf(page + len, "LPAR CPUs Configured: %d\n", | |
280 | info->cpus_configured); | |
281 | len += sprintf(page + len, "LPAR CPUs Standby: %d\n", | |
282 | info->cpus_standby); | |
283 | len += sprintf(page + len, "LPAR CPUs Reserved: %d\n", | |
284 | info->cpus_reserved); | |
285 | len += sprintf(page + len, "LPAR CPUs Dedicated: %d\n", | |
286 | info->cpus_dedicated); | |
287 | len += sprintf(page + len, "LPAR CPUs Shared: %d\n", | |
288 | info->cpus_shared); | |
289 | return len; | |
1da177e4 LT |
290 | } |
291 | ||
0fee644a | 292 | static int stsi_3_2_2(struct sysinfo_3_2_2 *info, char *page, int len) |
1da177e4 | 293 | { |
0fee644a MS |
294 | int i; |
295 | ||
296 | if (stsi(info, 3, 2, 2) == -ENOSYS) | |
297 | return len; | |
298 | for (i = 0; i < info->count; i++) { | |
299 | EBCASC (info->vm[i].name, sizeof(info->vm[i].name)); | |
300 | EBCASC (info->vm[i].cpi, sizeof(info->vm[i].cpi)); | |
301 | len += sprintf(page + len, "\n"); | |
302 | len += sprintf(page + len, "VM%02d Name: %-8.8s\n", | |
303 | i, info->vm[i].name); | |
304 | len += sprintf(page + len, "VM%02d Control Program: %-16.16s\n", | |
305 | i, info->vm[i].cpi); | |
306 | ||
307 | len += sprintf(page + len, "VM%02d Adjustment: %d\n", | |
308 | i, info->vm[i].caf); | |
309 | ||
310 | len += sprintf(page + len, "VM%02d CPUs Total: %d\n", | |
311 | i, info->vm[i].cpus_total); | |
312 | len += sprintf(page + len, "VM%02d CPUs Configured: %d\n", | |
313 | i, info->vm[i].cpus_configured); | |
314 | len += sprintf(page + len, "VM%02d CPUs Standby: %d\n", | |
315 | i, info->vm[i].cpus_standby); | |
316 | len += sprintf(page + len, "VM%02d CPUs Reserved: %d\n", | |
317 | i, info->vm[i].cpus_reserved); | |
1da177e4 | 318 | } |
0fee644a | 319 | return len; |
1da177e4 LT |
320 | } |
321 | ||
322 | ||
323 | static int proc_read_sysinfo(char *page, char **start, | |
324 | off_t off, int count, | |
325 | int *eof, void *data) | |
326 | { | |
0fee644a MS |
327 | unsigned long info = get_zeroed_page (GFP_KERNEL); |
328 | int level, len; | |
1da177e4 LT |
329 | |
330 | if (!info) | |
331 | return 0; | |
332 | ||
0fee644a MS |
333 | len = 0; |
334 | level = stsi_0(); | |
335 | if (level >= 1) | |
336 | len = stsi_1_1_1((struct sysinfo_1_1_1 *) info, page, len); | |
1da177e4 | 337 | |
0fee644a MS |
338 | if (level >= 1) |
339 | len = stsi_1_2_2((struct sysinfo_1_2_2 *) info, page, len); | |
1da177e4 | 340 | |
0fee644a MS |
341 | if (level >= 2) |
342 | len = stsi_2_2_2((struct sysinfo_2_2_2 *) info, page, len); | |
1da177e4 | 343 | |
0fee644a MS |
344 | if (level >= 3) |
345 | len = stsi_3_2_2((struct sysinfo_3_2_2 *) info, page, len); | |
1da177e4 | 346 | |
0fee644a | 347 | free_page (info); |
1da177e4 LT |
348 | return len; |
349 | } | |
350 | ||
351 | static __init int create_proc_sysinfo(void) | |
352 | { | |
0fee644a MS |
353 | create_proc_read_entry("sysinfo", 0444, NULL, |
354 | proc_read_sysinfo, NULL); | |
1da177e4 LT |
355 | return 0; |
356 | } | |
357 | ||
358 | __initcall(create_proc_sysinfo); | |
359 | ||
2fc2d1e9 HC |
360 | int get_cpu_capability(unsigned int *capability) |
361 | { | |
362 | struct sysinfo_1_2_2 *info; | |
363 | int rc; | |
364 | ||
365 | info = (void *) get_zeroed_page(GFP_KERNEL); | |
366 | if (!info) | |
367 | return -ENOMEM; | |
368 | rc = stsi(info, 1, 2, 2); | |
369 | if (rc == -ENOSYS) | |
370 | goto out; | |
371 | rc = 0; | |
372 | *capability = info->capability; | |
373 | out: | |
374 | free_page((unsigned long) info); | |
375 | return rc; | |
376 | } | |
377 | ||
31ee4b2f MS |
378 | /* |
379 | * CPU capability might have changed. Therefore recalculate loops_per_jiffy. | |
380 | */ | |
381 | void s390_adjust_jiffies(void) | |
382 | { | |
383 | struct sysinfo_1_2_2 *info; | |
384 | const unsigned int fmil = 0x4b189680; /* 1e7 as 32-bit float. */ | |
385 | FP_DECL_S(SA); FP_DECL_S(SB); FP_DECL_S(SR); | |
386 | FP_DECL_EX; | |
387 | unsigned int capability; | |
388 | ||
389 | info = (void *) get_zeroed_page(GFP_KERNEL); | |
390 | if (!info) | |
391 | return; | |
392 | ||
393 | if (stsi(info, 1, 2, 2) != -ENOSYS) { | |
394 | /* | |
395 | * Major sigh. The cpu capability encoding is "special". | |
396 | * If the first 9 bits of info->capability are 0 then it | |
397 | * is a 32 bit unsigned integer in the range 0 .. 2^23. | |
398 | * If the first 9 bits are != 0 then it is a 32 bit float. | |
399 | * In addition a lower value indicates a proportionally | |
400 | * higher cpu capacity. Bogomips are the other way round. | |
401 | * To get to a halfway suitable number we divide 1e7 | |
402 | * by the cpu capability number. Yes, that means a floating | |
403 | * point division .. math-emu here we come :-) | |
404 | */ | |
405 | FP_UNPACK_SP(SA, &fmil); | |
406 | if ((info->capability >> 23) == 0) | |
407 | FP_FROM_INT_S(SB, info->capability, 32, int); | |
408 | else | |
409 | FP_UNPACK_SP(SB, &info->capability); | |
410 | FP_DIV_S(SR, SA, SB); | |
411 | FP_TO_INT_S(capability, SR, 32, 0); | |
412 | } else | |
413 | /* | |
414 | * Really old machine without stsi block for basic | |
415 | * cpu information. Report 42.0 bogomips. | |
416 | */ | |
417 | capability = 42; | |
418 | loops_per_jiffy = capability * (500000/HZ); | |
419 | free_page((unsigned long) info); | |
420 | } | |
421 | ||
422 | /* | |
423 | * calibrate the delay loop | |
424 | */ | |
6c81c32f | 425 | void __cpuinit calibrate_delay(void) |
31ee4b2f MS |
426 | { |
427 | s390_adjust_jiffies(); | |
428 | /* Print the good old Bogomips line .. */ | |
429 | printk(KERN_DEBUG "Calibrating delay loop (skipped)... " | |
430 | "%lu.%02lu BogoMIPS preset\n", loops_per_jiffy/(500000/HZ), | |
431 | (loops_per_jiffy/(5000/HZ)) % 100); | |
432 | } |