1 | // SPDX-License-Identifier: GPL-2.0-only |
2 | /* |
3 | * interfaces to Chassis Codes via PDC (firmware) |
4 | * |
5 | * Copyright (C) 2002 Laurent Canet <canetl@esiee.fr> |
6 | * Copyright (C) 2002-2006 Thibaut VARENE <varenet@parisc-linux.org> |
7 | * |
8 | * TODO: poll chassis warns, trigger (configurable) machine shutdown when |
9 | * needed. |
10 | * Find out how to get Chassis warnings out of PAT boxes? |
11 | */ |
12 | |
13 | #undef PDC_CHASSIS_DEBUG |
14 | #ifdef PDC_CHASSIS_DEBUG |
15 | #define DPRINTK(fmt, args...) printk(fmt, ## args) |
16 | #else |
17 | #define DPRINTK(fmt, args...) |
18 | #endif |
19 | |
20 | #include <linux/init.h> |
21 | #include <linux/module.h> |
22 | #include <linux/kernel.h> |
23 | #include <linux/panic_notifier.h> |
24 | #include <linux/reboot.h> |
25 | #include <linux/notifier.h> |
26 | #include <linux/cache.h> |
27 | #include <linux/proc_fs.h> |
28 | #include <linux/seq_file.h> |
29 | |
30 | #include <asm/pdc_chassis.h> |
31 | #include <asm/processor.h> |
32 | #include <asm/pdc.h> |
33 | #include <asm/pdcpat.h> |
34 | #include <asm/led.h> |
35 | |
36 | #define PDC_CHASSIS_VER "0.05" |
37 | |
38 | #ifdef CONFIG_PDC_CHASSIS |
39 | static unsigned int pdc_chassis_enabled __read_mostly = 1; |
40 | |
41 | |
42 | /** |
43 | * pdc_chassis_setup() - Enable/disable pdc_chassis code at boot time. |
44 | * @str: configuration param: 0 to disable chassis log |
45 | * @return 1 |
46 | */ |
47 | |
48 | static int __init pdc_chassis_setup(char *str) |
49 | { |
50 | /*panic_timeout = simple_strtoul(str, NULL, 0);*/ |
51 | get_option(&str, &pdc_chassis_enabled); |
52 | return 1; |
53 | } |
54 | __setup("pdcchassis=" , pdc_chassis_setup); |
55 | |
56 | |
57 | /** |
58 | * pdc_chassis_checkold() - Checks for old PDC_CHASSIS compatibility |
59 | * |
60 | * Currently, only E class and A180 are known to work with this. |
61 | * Inspired by Christoph Plattner |
62 | */ |
63 | #if 0 |
64 | static void __init pdc_chassis_checkold(void) |
65 | { |
66 | switch(CPU_HVERSION) { |
67 | case 0x480: /* E25 */ |
68 | case 0x481: /* E35 */ |
69 | case 0x482: /* E45 */ |
70 | case 0x483: /* E55 */ |
71 | case 0x516: /* A180 */ |
72 | break; |
73 | |
74 | default: |
75 | break; |
76 | } |
77 | DPRINTK(KERN_DEBUG "%s: pdc_chassis_checkold(); pdc_chassis_old = %d\n" , __FILE__, pdc_chassis_old); |
78 | } |
79 | #endif |
80 | |
81 | /** |
82 | * pdc_chassis_panic_event() - Called by the panic handler. |
83 | * @this: unused |
84 | * @event: unused |
85 | * @ptr: unused |
86 | * |
87 | * As soon as a panic occurs, we should inform the PDC. |
88 | */ |
89 | |
90 | static int pdc_chassis_panic_event(struct notifier_block *this, |
91 | unsigned long event, void *ptr) |
92 | { |
93 | pdc_chassis_send_status(PDC_CHASSIS_DIRECT_PANIC); |
94 | return NOTIFY_DONE; |
95 | } |
96 | |
97 | |
98 | static struct notifier_block pdc_chassis_panic_block = { |
99 | .notifier_call = pdc_chassis_panic_event, |
100 | .priority = INT_MAX, |
101 | }; |
102 | |
103 | |
104 | /** |
105 | * pdc_chassis_reboot_event() - Called by the reboot handler. |
106 | * @this: unused |
107 | * @event: unused |
108 | * @ptr: unused |
109 | * |
110 | * As soon as a reboot occurs, we should inform the PDC. |
111 | */ |
112 | |
113 | static int pdc_chassis_reboot_event(struct notifier_block *this, |
114 | unsigned long event, void *ptr) |
115 | { |
116 | pdc_chassis_send_status(PDC_CHASSIS_DIRECT_SHUTDOWN); |
117 | return NOTIFY_DONE; |
118 | } |
119 | |
120 | |
121 | static struct notifier_block pdc_chassis_reboot_block = { |
122 | .notifier_call = pdc_chassis_reboot_event, |
123 | .priority = INT_MAX, |
124 | }; |
125 | #endif /* CONFIG_PDC_CHASSIS */ |
126 | |
127 | |
128 | /** |
129 | * parisc_pdc_chassis_init() - Called at boot time. |
130 | */ |
131 | |
132 | void __init parisc_pdc_chassis_init(void) |
133 | { |
134 | #ifdef CONFIG_PDC_CHASSIS |
135 | if (likely(pdc_chassis_enabled)) { |
136 | DPRINTK(KERN_DEBUG "%s: parisc_pdc_chassis_init()\n" , __FILE__); |
137 | |
138 | /* Let see if we have something to handle... */ |
139 | printk(KERN_INFO "Enabling %s chassis codes support v%s\n" , |
140 | is_pdc_pat() ? "PDC_PAT" : "regular" , |
141 | PDC_CHASSIS_VER); |
142 | |
143 | /* initialize panic notifier chain */ |
144 | atomic_notifier_chain_register(&panic_notifier_list, |
145 | &pdc_chassis_panic_block); |
146 | |
147 | /* initialize reboot notifier chain */ |
148 | register_reboot_notifier(&pdc_chassis_reboot_block); |
149 | } |
150 | #endif /* CONFIG_PDC_CHASSIS */ |
151 | } |
152 | |
153 | |
154 | /** |
155 | * pdc_chassis_send_status() - Sends a predefined message to the chassis, |
156 | * and changes the front panel LEDs according to the new system state |
157 | * @message: Type of message, one of PDC_CHASSIS_DIRECT_* values. |
158 | * |
159 | * Only machines with 64 bits PDC PAT and those reported in |
160 | * pdc_chassis_checkold() are supported atm. |
161 | * |
162 | * returns 0 if no error, -1 if no supported PDC is present or invalid message, |
163 | * else returns the appropriate PDC error code. |
164 | * |
165 | * For a list of predefined messages, see asm-parisc/pdc_chassis.h |
166 | */ |
167 | |
168 | int pdc_chassis_send_status(int message) |
169 | { |
170 | /* Maybe we should do that in an other way ? */ |
171 | int retval = 0; |
172 | #ifdef CONFIG_PDC_CHASSIS |
173 | if (likely(pdc_chassis_enabled)) { |
174 | |
175 | DPRINTK(KERN_DEBUG "%s: pdc_chassis_send_status(%d)\n" , __FILE__, message); |
176 | |
177 | #ifdef CONFIG_64BIT |
178 | if (is_pdc_pat()) { |
179 | switch(message) { |
180 | case PDC_CHASSIS_DIRECT_BSTART: |
181 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BSTART, PDC_CHASSIS_LSTATE_RUN_NORMAL); |
182 | break; |
183 | |
184 | case PDC_CHASSIS_DIRECT_BCOMPLETE: |
185 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BCOMPLETE, PDC_CHASSIS_LSTATE_RUN_NORMAL); |
186 | break; |
187 | |
188 | case PDC_CHASSIS_DIRECT_SHUTDOWN: |
189 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_SHUTDOWN, PDC_CHASSIS_LSTATE_NONOS); |
190 | break; |
191 | |
192 | case PDC_CHASSIS_DIRECT_PANIC: |
193 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_PANIC, PDC_CHASSIS_LSTATE_RUN_CRASHREC); |
194 | break; |
195 | |
196 | case PDC_CHASSIS_DIRECT_LPMC: |
197 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_LPMC, PDC_CHASSIS_LSTATE_RUN_SYSINT); |
198 | break; |
199 | |
200 | case PDC_CHASSIS_DIRECT_HPMC: |
201 | retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_HPMC, PDC_CHASSIS_LSTATE_RUN_NCRIT); |
202 | break; |
203 | |
204 | default: |
205 | retval = -1; |
206 | } |
207 | } else retval = -1; |
208 | #else |
209 | if (1) { |
210 | switch (message) { |
211 | case PDC_CHASSIS_DIRECT_BSTART: |
212 | retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_INIT)); |
213 | break; |
214 | |
215 | case PDC_CHASSIS_DIRECT_BCOMPLETE: |
216 | retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_RUN)); |
217 | break; |
218 | |
219 | case PDC_CHASSIS_DIRECT_SHUTDOWN: |
220 | retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_SHUT)); |
221 | break; |
222 | |
223 | case PDC_CHASSIS_DIRECT_HPMC: |
224 | case PDC_CHASSIS_DIRECT_PANIC: |
225 | retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_FLT)); |
226 | break; |
227 | |
228 | case PDC_CHASSIS_DIRECT_LPMC: |
229 | retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_WARN)); |
230 | break; |
231 | |
232 | default: |
233 | retval = -1; |
234 | } |
235 | } else retval = -1; |
236 | #endif /* CONFIG_64BIT */ |
237 | } /* if (pdc_chassis_enabled) */ |
238 | |
239 | /* if system has LCD display, update current string */ |
240 | if (retval != -1 && IS_ENABLED(CONFIG_CHASSIS_LCD_LED)) |
241 | lcd_print(NULL); |
242 | |
243 | #endif /* CONFIG_PDC_CHASSIS */ |
244 | return retval; |
245 | } |
246 | |
247 | #ifdef CONFIG_PDC_CHASSIS_WARN |
248 | #ifdef CONFIG_PROC_FS |
249 | static int pdc_chassis_warn_show(struct seq_file *m, void *v) |
250 | { |
251 | unsigned long warn; |
252 | u32 warnreg; |
253 | |
254 | if (pdc_chassis_warn(&warn) != PDC_OK) |
255 | return -EIO; |
256 | |
257 | warnreg = (warn & 0xFFFFFFFF); |
258 | |
259 | if ((warnreg >> 24) & 0xFF) |
260 | seq_printf(m, "Chassis component failure! (eg fan or PSU): 0x%.2x\n" , |
261 | (warnreg >> 24) & 0xFF); |
262 | |
263 | seq_printf(m, "Battery: %s\n" , (warnreg & 0x04) ? "Low!" : "OK" ); |
264 | seq_printf(m, "Temp low: %s\n" , (warnreg & 0x02) ? "Exceeded!" : "OK" ); |
265 | seq_printf(m, "Temp mid: %s\n" , (warnreg & 0x01) ? "Exceeded!" : "OK" ); |
266 | return 0; |
267 | } |
268 | |
269 | static int __init pdc_chassis_create_procfs(void) |
270 | { |
271 | unsigned long test; |
272 | int ret; |
273 | |
274 | ret = pdc_chassis_warn(&test); |
275 | if ((ret == PDC_BAD_PROC) || (ret == PDC_BAD_OPTION)) { |
276 | /* seems that some boxes (eg L1000) do not implement this */ |
277 | printk(KERN_INFO "Chassis warnings not supported.\n" ); |
278 | return 0; |
279 | } |
280 | |
281 | printk(KERN_INFO "Enabling PDC chassis warnings support v%s\n" , |
282 | PDC_CHASSIS_VER); |
283 | proc_create_single("chassis" , 0400, NULL, pdc_chassis_warn_show); |
284 | return 0; |
285 | } |
286 | |
287 | __initcall(pdc_chassis_create_procfs); |
288 | |
289 | #endif /* CONFIG_PROC_FS */ |
290 | #endif /* CONFIG_PDC_CHASSIS_WARN */ |
291 | |