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