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 */
291