1 // SPDX-License-Identifier: GPL-2.0
3 * Copyright (C) 2000 Tilmann Bitterberg
4 * (tilmann@bitterberg.de)
6 * RTAS (Runtime Abstraction Services) stuff
7 * Intention is to provide a clean user interface
11 * Split off a header file and maybe move it to a different
12 * location. Write Documentation on what the /proc/rtas/ entries
16 #include <linux/errno.h>
17 #include <linux/sched.h>
18 #include <linux/proc_fs.h>
19 #include <linux/stat.h>
20 #include <linux/ctype.h>
21 #include <linux/time.h>
22 #include <linux/string.h>
23 #include <linux/init.h>
24 #include <linux/seq_file.h>
25 #include <linux/bitops.h>
26 #include <linux/rtc.h>
28 #include <linux/uaccess.h>
29 #include <asm/processor.h>
33 #include <asm/machdep.h> /* for ppc_md */
36 /* Token for Sensors */
37 #define KEY_SWITCH 0x0001
38 #define ENCLOSURE_SWITCH 0x0002
39 #define THERMAL_SENSOR 0x0003
40 #define LID_STATUS 0x0004
41 #define POWER_SOURCE 0x0005
42 #define BATTERY_VOLTAGE 0x0006
43 #define BATTERY_REMAINING 0x0007
44 #define BATTERY_PERCENTAGE 0x0008
45 #define EPOW_SENSOR 0x0009
46 #define BATTERY_CYCLESTATE 0x000a
47 #define BATTERY_CHARGING 0x000b
49 /* IBM specific sensors */
50 #define IBM_SURVEILLANCE 0x2328 /* 9000 */
51 #define IBM_FANRPM 0x2329 /* 9001 */
52 #define IBM_VOLTAGE 0x232a /* 9002 */
53 #define IBM_DRCONNECTOR 0x232b /* 9003 */
54 #define IBM_POWERSUPPLY 0x232c /* 9004 */
56 /* Status return values */
57 #define SENSOR_CRITICAL_HIGH 13
58 #define SENSOR_WARNING_HIGH 12
59 #define SENSOR_NORMAL 11
60 #define SENSOR_WARNING_LOW 10
61 #define SENSOR_CRITICAL_LOW 9
62 #define SENSOR_SUCCESS 0
63 #define SENSOR_HW_ERROR -1
64 #define SENSOR_BUSY -2
65 #define SENSOR_NOT_EXIST -3
66 #define SENSOR_DR_ENTITY -9000
69 #define LOC_SCSI_DEV_ADDR 'A'
70 #define LOC_SCSI_DEV_LOC 'B'
72 #define LOC_DISKETTE 'D'
73 #define LOC_ETHERNET 'E'
75 #define LOC_GRAPHICS 'G'
76 /* reserved / not used 'H' */
77 #define LOC_IO_ADAPTER 'I'
78 /* reserved / not used 'J' */
79 #define LOC_KEYBOARD 'K'
81 #define LOC_MEMORY 'M'
82 #define LOC_NV_MEMORY 'N'
84 #define LOC_PLANAR 'P'
85 #define LOC_OTHER_IO 'Q'
86 #define LOC_PARALLEL 'R'
87 #define LOC_SERIAL 'S'
88 #define LOC_DEAD_RING 'T'
89 #define LOC_RACKMOUNTED 'U' /* for _u_nit is rack mounted */
90 #define LOC_VOLTAGE 'V'
91 #define LOC_SWITCH_ADAPTER 'W'
93 #define LOC_FIRMWARE 'Y'
96 /* Tokens for indicators */
97 #define TONE_FREQUENCY 0x0001 /* 0 - 1000 (HZ)*/
98 #define TONE_VOLUME 0x0002 /* 0 - 100 (%) */
99 #define SYSTEM_POWER_STATE 0x0003
100 #define WARNING_LIGHT 0x0004
101 #define DISK_ACTIVITY_LIGHT 0x0005
102 #define HEX_DISPLAY_UNIT 0x0006
103 #define BATTERY_WARNING_TIME 0x0007
104 #define CONDITION_CYCLE_REQUEST 0x0008
105 #define SURVEILLANCE_INDICATOR 0x2328 /* 9000 */
106 #define DR_ACTION 0x2329 /* 9001 */
107 #define DR_INDICATOR 0x232a /* 9002 */
108 /* 9003 - 9004: Vendor specific */
109 /* 9006 - 9999: Vendor specific */
112 #define MAX_SENSORS 17 /* I only know of 17 sensors */
113 #define MAX_LINELENGTH 256
114 #define SENSOR_PREFIX "ibm,sensor-"
115 #define cel_to_fahr(x) ((x*9/5)+32)
117 struct individual_sensor
{
122 struct rtas_sensors
{
123 struct individual_sensor sensor
[MAX_SENSORS
];
128 static struct rtas_sensors sensors
;
129 static struct device_node
*rtas_node
= NULL
;
130 static unsigned long power_on_time
= 0; /* Save the time the user set */
131 static char progress_led
[MAX_LINELENGTH
];
133 static unsigned long rtas_tone_frequency
= 1000;
134 static unsigned long rtas_tone_volume
= 0;
136 /* ****************************************************************** */
138 static int ppc_rtas_sensors_show(struct seq_file
*m
, void *v
);
139 static int ppc_rtas_clock_show(struct seq_file
*m
, void *v
);
140 static ssize_t
ppc_rtas_clock_write(struct file
*file
,
141 const char __user
*buf
, size_t count
, loff_t
*ppos
);
142 static int ppc_rtas_progress_show(struct seq_file
*m
, void *v
);
143 static ssize_t
ppc_rtas_progress_write(struct file
*file
,
144 const char __user
*buf
, size_t count
, loff_t
*ppos
);
145 static int ppc_rtas_poweron_show(struct seq_file
*m
, void *v
);
146 static ssize_t
ppc_rtas_poweron_write(struct file
*file
,
147 const char __user
*buf
, size_t count
, loff_t
*ppos
);
149 static ssize_t
ppc_rtas_tone_freq_write(struct file
*file
,
150 const char __user
*buf
, size_t count
, loff_t
*ppos
);
151 static int ppc_rtas_tone_freq_show(struct seq_file
*m
, void *v
);
152 static ssize_t
ppc_rtas_tone_volume_write(struct file
*file
,
153 const char __user
*buf
, size_t count
, loff_t
*ppos
);
154 static int ppc_rtas_tone_volume_show(struct seq_file
*m
, void *v
);
155 static int ppc_rtas_rmo_buf_show(struct seq_file
*m
, void *v
);
157 static int poweron_open(struct inode
*inode
, struct file
*file
)
159 return single_open(file
, ppc_rtas_poweron_show
, NULL
);
162 static const struct proc_ops ppc_rtas_poweron_proc_ops
= {
163 .proc_open
= poweron_open
,
164 .proc_read
= seq_read
,
165 .proc_lseek
= seq_lseek
,
166 .proc_write
= ppc_rtas_poweron_write
,
167 .proc_release
= single_release
,
170 static int progress_open(struct inode
*inode
, struct file
*file
)
172 return single_open(file
, ppc_rtas_progress_show
, NULL
);
175 static const struct proc_ops ppc_rtas_progress_proc_ops
= {
176 .proc_open
= progress_open
,
177 .proc_read
= seq_read
,
178 .proc_lseek
= seq_lseek
,
179 .proc_write
= ppc_rtas_progress_write
,
180 .proc_release
= single_release
,
183 static int clock_open(struct inode
*inode
, struct file
*file
)
185 return single_open(file
, ppc_rtas_clock_show
, NULL
);
188 static const struct proc_ops ppc_rtas_clock_proc_ops
= {
189 .proc_open
= clock_open
,
190 .proc_read
= seq_read
,
191 .proc_lseek
= seq_lseek
,
192 .proc_write
= ppc_rtas_clock_write
,
193 .proc_release
= single_release
,
196 static int tone_freq_open(struct inode
*inode
, struct file
*file
)
198 return single_open(file
, ppc_rtas_tone_freq_show
, NULL
);
201 static const struct proc_ops ppc_rtas_tone_freq_proc_ops
= {
202 .proc_open
= tone_freq_open
,
203 .proc_read
= seq_read
,
204 .proc_lseek
= seq_lseek
,
205 .proc_write
= ppc_rtas_tone_freq_write
,
206 .proc_release
= single_release
,
209 static int tone_volume_open(struct inode
*inode
, struct file
*file
)
211 return single_open(file
, ppc_rtas_tone_volume_show
, NULL
);
214 static const struct proc_ops ppc_rtas_tone_volume_proc_ops
= {
215 .proc_open
= tone_volume_open
,
216 .proc_read
= seq_read
,
217 .proc_lseek
= seq_lseek
,
218 .proc_write
= ppc_rtas_tone_volume_write
,
219 .proc_release
= single_release
,
222 static int ppc_rtas_find_all_sensors(void);
223 static void ppc_rtas_process_sensor(struct seq_file
*m
,
224 struct individual_sensor
*s
, int state
, int error
, const char *loc
);
225 static char *ppc_rtas_process_error(int error
);
226 static void get_location_code(struct seq_file
*m
,
227 struct individual_sensor
*s
, const char *loc
);
228 static void check_location_string(struct seq_file
*m
, const char *c
);
229 static void check_location(struct seq_file
*m
, const char *c
);
231 static int __init
proc_rtas_init(void)
233 if (!machine_is(pseries
))
236 rtas_node
= of_find_node_by_name(NULL
, "rtas");
237 if (rtas_node
== NULL
)
240 proc_create("powerpc/rtas/progress", 0644, NULL
,
241 &ppc_rtas_progress_proc_ops
);
242 proc_create("powerpc/rtas/clock", 0644, NULL
,
243 &ppc_rtas_clock_proc_ops
);
244 proc_create("powerpc/rtas/poweron", 0644, NULL
,
245 &ppc_rtas_poweron_proc_ops
);
246 proc_create_single("powerpc/rtas/sensors", 0444, NULL
,
247 ppc_rtas_sensors_show
);
248 proc_create("powerpc/rtas/frequency", 0644, NULL
,
249 &ppc_rtas_tone_freq_proc_ops
);
250 proc_create("powerpc/rtas/volume", 0644, NULL
,
251 &ppc_rtas_tone_volume_proc_ops
);
252 proc_create_single("powerpc/rtas/rmo_buffer", 0400, NULL
,
253 ppc_rtas_rmo_buf_show
);
257 __initcall(proc_rtas_init
);
259 static int parse_number(const char __user
*p
, size_t count
, u64
*val
)
267 if (copy_from_user(buf
, p
, count
))
272 *val
= simple_strtoull(buf
, &end
, 10);
273 if (*end
&& *end
!= '\n')
279 /* ****************************************************************** */
281 /* ****************************************************************** */
282 static ssize_t
ppc_rtas_poweron_write(struct file
*file
,
283 const char __user
*buf
, size_t count
, loff_t
*ppos
)
287 int error
= parse_number(buf
, count
, &nowtime
);
291 power_on_time
= nowtime
; /* save the time */
293 rtc_time64_to_tm(nowtime
, &tm
);
295 error
= rtas_call(rtas_token("set-time-for-power-on"), 7, 1, NULL
,
296 tm
.tm_year
+ 1900, tm
.tm_mon
+ 1, tm
.tm_mday
,
297 tm
.tm_hour
, tm
.tm_min
, tm
.tm_sec
, 0 /* nano */);
299 printk(KERN_WARNING
"error: setting poweron time returned: %s\n",
300 ppc_rtas_process_error(error
));
303 /* ****************************************************************** */
304 static int ppc_rtas_poweron_show(struct seq_file
*m
, void *v
)
306 if (power_on_time
== 0)
307 seq_printf(m
, "Power on time not set\n");
309 seq_printf(m
, "%lu\n",power_on_time
);
313 /* ****************************************************************** */
315 /* ****************************************************************** */
316 static ssize_t
ppc_rtas_progress_write(struct file
*file
,
317 const char __user
*buf
, size_t count
, loff_t
*ppos
)
321 if (count
>= MAX_LINELENGTH
)
322 count
= MAX_LINELENGTH
-1;
323 if (copy_from_user(progress_led
, buf
, count
)) { /* save the string */
326 progress_led
[count
] = 0;
328 /* Lets see if the user passed hexdigits */
329 hex
= simple_strtoul(progress_led
, NULL
, 10);
331 rtas_progress ((char *)progress_led
, hex
);
335 /* rtas_progress(" ", 0xffff);*/
337 /* ****************************************************************** */
338 static int ppc_rtas_progress_show(struct seq_file
*m
, void *v
)
341 seq_printf(m
, "%s\n", progress_led
);
345 /* ****************************************************************** */
347 /* ****************************************************************** */
348 static ssize_t
ppc_rtas_clock_write(struct file
*file
,
349 const char __user
*buf
, size_t count
, loff_t
*ppos
)
353 int error
= parse_number(buf
, count
, &nowtime
);
357 rtc_time64_to_tm(nowtime
, &tm
);
358 error
= rtas_call(rtas_token("set-time-of-day"), 7, 1, NULL
,
359 tm
.tm_year
+ 1900, tm
.tm_mon
+ 1, tm
.tm_mday
,
360 tm
.tm_hour
, tm
.tm_min
, tm
.tm_sec
, 0);
362 printk(KERN_WARNING
"error: setting the clock returned: %s\n",
363 ppc_rtas_process_error(error
));
366 /* ****************************************************************** */
367 static int ppc_rtas_clock_show(struct seq_file
*m
, void *v
)
370 int error
= rtas_call(rtas_token("get-time-of-day"), 0, 8, ret
);
373 printk(KERN_WARNING
"error: reading the clock returned: %s\n",
374 ppc_rtas_process_error(error
));
377 unsigned int year
, mon
, day
, hour
, min
, sec
;
378 year
= ret
[0]; mon
= ret
[1]; day
= ret
[2];
379 hour
= ret
[3]; min
= ret
[4]; sec
= ret
[5];
380 seq_printf(m
, "%lld\n",
381 mktime64(year
, mon
, day
, hour
, min
, sec
));
386 /* ****************************************************************** */
388 /* ****************************************************************** */
389 static int ppc_rtas_sensors_show(struct seq_file
*m
, void *v
)
393 int get_sensor_state
= rtas_token("get-sensor-state");
395 seq_printf(m
, "RTAS (RunTime Abstraction Services) Sensor Information\n");
396 seq_printf(m
, "Sensor\t\tValue\t\tCondition\tLocation\n");
397 seq_printf(m
, "********************************************************\n");
399 if (ppc_rtas_find_all_sensors() != 0) {
400 seq_printf(m
, "\nNo sensors are available\n");
404 for (i
=0; i
<sensors
.quant
; i
++) {
405 struct individual_sensor
*p
= &sensors
.sensor
[i
];
410 sprintf (rstr
, SENSOR_PREFIX
"%04d", p
->token
);
411 loc
= of_get_property(rtas_node
, rstr
, &llen
);
413 /* A sensor may have multiple instances */
414 for (j
= 0, offs
= 0; j
<= p
->quant
; j
++) {
415 error
= rtas_call(get_sensor_state
, 2, 2, &state
,
418 ppc_rtas_process_sensor(m
, p
, state
, error
, loc
);
421 offs
+= strlen(loc
) + 1;
422 loc
+= strlen(loc
) + 1;
431 /* ****************************************************************** */
433 static int ppc_rtas_find_all_sensors(void)
435 const unsigned int *utmp
;
438 utmp
= of_get_property(rtas_node
, "rtas-sensors", &len
);
440 printk (KERN_ERR
"error: could not get rtas-sensors\n");
444 sensors
.quant
= len
/ 8; /* int + int */
446 for (i
=0; i
<sensors
.quant
; i
++) {
447 sensors
.sensor
[i
].token
= *utmp
++;
448 sensors
.sensor
[i
].quant
= *utmp
++;
453 /* ****************************************************************** */
455 * Builds a string of what rtas returned
457 static char *ppc_rtas_process_error(int error
)
460 case SENSOR_CRITICAL_HIGH
:
461 return "(critical high)";
462 case SENSOR_WARNING_HIGH
:
463 return "(warning high)";
466 case SENSOR_WARNING_LOW
:
467 return "(warning low)";
468 case SENSOR_CRITICAL_LOW
:
469 return "(critical low)";
472 case SENSOR_HW_ERROR
:
473 return "(hardware error)";
476 case SENSOR_NOT_EXIST
:
477 return "(non existent)";
478 case SENSOR_DR_ENTITY
:
479 return "(dr entity removed)";
485 /* ****************************************************************** */
487 * Builds a string out of what the sensor said
490 static void ppc_rtas_process_sensor(struct seq_file
*m
,
491 struct individual_sensor
*s
, int state
, int error
, const char *loc
)
493 /* Defined return vales */
494 const char * key_switch
[] = { "Off\t", "Normal\t", "Secure\t",
496 const char * enclosure_switch
[] = { "Closed", "Open" };
497 const char * lid_status
[] = { " ", "Open", "Closed" };
498 const char * power_source
[] = { "AC\t", "Battery",
500 const char * battery_remaining
[] = { "Very Low", "Low", "Mid", "High" };
501 const char * epow_sensor
[] = {
502 "EPOW Reset", "Cooling warning", "Power warning",
503 "System shutdown", "System halt", "EPOW main enclosure",
505 const char * battery_cyclestate
[] = { "None", "In progress",
507 const char * battery_charging
[] = { "Charging", "Discharging",
509 const char * ibm_drconnector
[] = { "Empty", "Present", "Unusable",
512 int have_strings
= 0;
517 /* What kind of sensor do we have here? */
521 seq_printf(m
, "Key switch:\t");
522 num_states
= sizeof(key_switch
) / sizeof(char *);
523 if (state
< num_states
) {
524 seq_printf(m
, "%s\t", key_switch
[state
]);
528 case ENCLOSURE_SWITCH
:
529 seq_printf(m
, "Enclosure switch:\t");
530 num_states
= sizeof(enclosure_switch
) / sizeof(char *);
531 if (state
< num_states
) {
532 seq_printf(m
, "%s\t",
533 enclosure_switch
[state
]);
538 seq_printf(m
, "Temp. (C/F):\t");
542 seq_printf(m
, "Lid status:\t");
543 num_states
= sizeof(lid_status
) / sizeof(char *);
544 if (state
< num_states
) {
545 seq_printf(m
, "%s\t", lid_status
[state
]);
550 seq_printf(m
, "Power source:\t");
551 num_states
= sizeof(power_source
) / sizeof(char *);
552 if (state
< num_states
) {
553 seq_printf(m
, "%s\t",
554 power_source
[state
]);
558 case BATTERY_VOLTAGE
:
559 seq_printf(m
, "Battery voltage:\t");
561 case BATTERY_REMAINING
:
562 seq_printf(m
, "Battery remaining:\t");
563 num_states
= sizeof(battery_remaining
) / sizeof(char *);
564 if (state
< num_states
)
566 seq_printf(m
, "%s\t",
567 battery_remaining
[state
]);
571 case BATTERY_PERCENTAGE
:
572 seq_printf(m
, "Battery percentage:\t");
575 seq_printf(m
, "EPOW Sensor:\t");
576 num_states
= sizeof(epow_sensor
) / sizeof(char *);
577 if (state
< num_states
) {
578 seq_printf(m
, "%s\t", epow_sensor
[state
]);
582 case BATTERY_CYCLESTATE
:
583 seq_printf(m
, "Battery cyclestate:\t");
584 num_states
= sizeof(battery_cyclestate
) /
586 if (state
< num_states
) {
587 seq_printf(m
, "%s\t",
588 battery_cyclestate
[state
]);
592 case BATTERY_CHARGING
:
593 seq_printf(m
, "Battery Charging:\t");
594 num_states
= sizeof(battery_charging
) / sizeof(char *);
595 if (state
< num_states
) {
596 seq_printf(m
, "%s\t",
597 battery_charging
[state
]);
601 case IBM_SURVEILLANCE
:
602 seq_printf(m
, "Surveillance:\t");
605 seq_printf(m
, "Fan (rpm):\t");
608 seq_printf(m
, "Voltage (mv):\t");
610 case IBM_DRCONNECTOR
:
611 seq_printf(m
, "DR connector:\t");
612 num_states
= sizeof(ibm_drconnector
) / sizeof(char *);
613 if (state
< num_states
) {
614 seq_printf(m
, "%s\t",
615 ibm_drconnector
[state
]);
619 case IBM_POWERSUPPLY
:
620 seq_printf(m
, "Powersupply:\t");
623 seq_printf(m
, "Unknown sensor (type %d), ignoring it\n",
629 if (have_strings
== 0) {
631 seq_printf(m
, "%4d /%4d\t", state
, cel_to_fahr(state
));
633 seq_printf(m
, "%10d\t", state
);
636 seq_printf(m
, "%s\t", ppc_rtas_process_error(error
));
637 get_location_code(m
, s
, loc
);
641 /* ****************************************************************** */
643 static void check_location(struct seq_file
*m
, const char *c
)
647 seq_printf(m
, "Planar #%c", c
[1]);
650 seq_printf(m
, "CPU #%c", c
[1]);
653 seq_printf(m
, "Fan #%c", c
[1]);
655 case LOC_RACKMOUNTED
:
656 seq_printf(m
, "Rack #%c", c
[1]);
659 seq_printf(m
, "Voltage #%c", c
[1]);
662 seq_printf(m
, "LCD #%c", c
[1]);
665 seq_printf(m
, "- %c", c
[1]);
668 seq_printf(m
, "Unknown location");
674 /* ****************************************************************** */
677 * ${LETTER}${NUMBER}[[-/]${LETTER}${NUMBER} [ ... ] ]
678 * the '.' may be an abbreviation
680 static void check_location_string(struct seq_file
*m
, const char *c
)
683 if (isalpha(*c
) || *c
== '.')
684 check_location(m
, c
);
685 else if (*c
== '/' || *c
== '-')
686 seq_printf(m
, " at ");
692 /* ****************************************************************** */
694 static void get_location_code(struct seq_file
*m
, struct individual_sensor
*s
,
698 seq_printf(m
, "---");/* does not have a location */
700 check_location_string(m
, loc
);
704 /* ****************************************************************** */
705 /* INDICATORS - Tone Frequency */
706 /* ****************************************************************** */
707 static ssize_t
ppc_rtas_tone_freq_write(struct file
*file
,
708 const char __user
*buf
, size_t count
, loff_t
*ppos
)
711 int error
= parse_number(buf
, count
, &freq
);
715 rtas_tone_frequency
= freq
; /* save it for later */
716 error
= rtas_call(rtas_token("set-indicator"), 3, 1, NULL
,
717 TONE_FREQUENCY
, 0, freq
);
719 printk(KERN_WARNING
"error: setting tone frequency returned: %s\n",
720 ppc_rtas_process_error(error
));
723 /* ****************************************************************** */
724 static int ppc_rtas_tone_freq_show(struct seq_file
*m
, void *v
)
726 seq_printf(m
, "%lu\n", rtas_tone_frequency
);
729 /* ****************************************************************** */
730 /* INDICATORS - Tone Volume */
731 /* ****************************************************************** */
732 static ssize_t
ppc_rtas_tone_volume_write(struct file
*file
,
733 const char __user
*buf
, size_t count
, loff_t
*ppos
)
736 int error
= parse_number(buf
, count
, &volume
);
743 rtas_tone_volume
= volume
; /* save it for later */
744 error
= rtas_call(rtas_token("set-indicator"), 3, 1, NULL
,
745 TONE_VOLUME
, 0, volume
);
747 printk(KERN_WARNING
"error: setting tone volume returned: %s\n",
748 ppc_rtas_process_error(error
));
751 /* ****************************************************************** */
752 static int ppc_rtas_tone_volume_show(struct seq_file
*m
, void *v
)
754 seq_printf(m
, "%lu\n", rtas_tone_volume
);
758 #define RMO_READ_BUF_MAX 30
760 /* RTAS Userspace access */
761 static int ppc_rtas_rmo_buf_show(struct seq_file
*m
, void *v
)
763 seq_printf(m
, "%016lx %x\n", rtas_rmo_buf
, RTAS_RMOBUF_MAX
);