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