Merge branch 'timers/for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[linux-2.6] / arch / parisc / kernel / pdc_chassis.c
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
47 static 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  
56 static 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
73 static 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
96 static 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
104 static 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
116 static 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
124 static 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
135 void __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
171 int 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
247 static 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
279 static 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 */