arch/parisc/kernel/pdc_chassis.c

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