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