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/reboot.h>
  24 #include <linux/notifier.h>
  25 #include <linux/cache.h>
  26 #include <linux/proc_fs.h>
  27 #include <linux/seq_file.h>
  28
  29 #include <asm/pdc_chassis.h>
  30 #include <asm/processor.h>
  31 #include <asm/pdc.h>
  32 #include <asm/pdcpat.h>
  33
  34 #define PDC_CHASSIS_VER "0.05"
  35
  36 #ifdef CONFIG_PDC_CHASSIS
  37 static unsigned int pdc_chassis_enabled __read_mostly = 1;
  38
  39
  40 /**
  41  * pdc_chassis_setup() - Enable/disable pdc_chassis code at boot time.
  42  * @str configuration param: 0 to disable chassis log
  43  * @return 1
  44  */
  45
  46 static int __init pdc_chassis_setup(char *str)
  47 {
  48         /*panic_timeout = simple_strtoul(str, NULL, 0);*/
  49         get_option(&str, &pdc_chassis_enabled);
  50         return 1;
  51 }
  52 __setup("pdcchassis=", pdc_chassis_setup);
  53
  54
  55 /**
  56  * pdc_chassis_checkold() - Checks for old PDC_CHASSIS compatibility
  57  * @pdc_chassis_old: 1 if old pdc chassis style
  58  *
  59  * Currently, only E class and A180 are known to work with this.
  60  * Inspired by Christoph Plattner
  61  */
  62 #if 0
  63 static void __init pdc_chassis_checkold(void)
  64 {
  65         switch(CPU_HVERSION) {
  66                 case 0x480:             /* E25 */
  67                 case 0x481:             /* E35 */
  68                 case 0x482:             /* E45 */
  69                 case 0x483:             /* E55 */
  70                 case 0x516:             /* A180 */
  71                         break;
  72
  73                 default:
  74                         break;
  75         }
  76         DPRINTK(KERN_DEBUG "%s: pdc_chassis_checkold(); pdc_chassis_old = %d\n", __FILE__, pdc_chassis_old);
  77 }
  78 #endif
  79
  80 /**
  81  * pdc_chassis_panic_event() - Called by the panic handler.
  82  *
  83  * As soon as a panic occurs, we should inform the PDC.
  84  */
  85
  86 static int pdc_chassis_panic_event(struct notifier_block *this,
  87                         unsigned long event, void *ptr)
  88 {
  89         pdc_chassis_send_status(PDC_CHASSIS_DIRECT_PANIC);
  90                 return NOTIFY_DONE;
  91 }
  92
  93
  94 static struct notifier_block pdc_chassis_panic_block = {
  95         .notifier_call = pdc_chassis_panic_event,
  96         .priority = INT_MAX,
  97 };
  98
  99
 100 /**
 101  * parisc_reboot_event() - Called by the reboot handler.
 102  *
 103  * As soon as a reboot occurs, we should inform the PDC.
 104  */
 105
 106 static int pdc_chassis_reboot_event(struct notifier_block *this,
 107                         unsigned long event, void *ptr)
 108 {
 109         pdc_chassis_send_status(PDC_CHASSIS_DIRECT_SHUTDOWN);
 110                 return NOTIFY_DONE;
 111 }
 112
 113
 114 static struct notifier_block pdc_chassis_reboot_block = {
 115         .notifier_call = pdc_chassis_reboot_event,
 116         .priority = INT_MAX,
 117 };
 118 #endif /* CONFIG_PDC_CHASSIS */
 119
 120
 121 /**
 122  * parisc_pdc_chassis_init() - Called at boot time.
 123  */
 124
 125 void __init parisc_pdc_chassis_init(void)
 126 {
 127 #ifdef CONFIG_PDC_CHASSIS
 128         if (likely(pdc_chassis_enabled)) {
 129                 DPRINTK(KERN_DEBUG "%s: parisc_pdc_chassis_init()\n", __FILE__);
 130
 131                 /* Let see if we have something to handle... */
 132                 printk(KERN_INFO "Enabling %s chassis codes support v%s\n",
 133                                 is_pdc_pat() ? "PDC_PAT" : "regular",
 134                                 PDC_CHASSIS_VER);
 135
 136                 /* initialize panic notifier chain */
 137                 atomic_notifier_chain_register(&panic_notifier_list,
 138                                 &pdc_chassis_panic_block);
 139
 140                 /* initialize reboot notifier chain */
 141                 register_reboot_notifier(&pdc_chassis_reboot_block);
 142         }
 143 #endif /* CONFIG_PDC_CHASSIS */
 144 }
 145
 146
 147 /**
 148  * pdc_chassis_send_status() - Sends a predefined message to the chassis,
 149  * and changes the front panel LEDs according to the new system state
 150  * @retval: PDC call return value.
 151  *
 152  * Only machines with 64 bits PDC PAT and those reported in
 153  * pdc_chassis_checkold() are supported atm.
 154  *
 155  * returns 0 if no error, -1 if no supported PDC is present or invalid message,
 156  * else returns the appropriate PDC error code.
 157  *
 158  * For a list of predefined messages, see asm-parisc/pdc_chassis.h
 159  */
 160
 161 int pdc_chassis_send_status(int message)
 162 {
 163         /* Maybe we should do that in an other way ? */
 164         int retval = 0;
 165 #ifdef CONFIG_PDC_CHASSIS
 166         if (likely(pdc_chassis_enabled)) {
 167
 168                 DPRINTK(KERN_DEBUG "%s: pdc_chassis_send_status(%d)\n", __FILE__, message);
 169
 170 #ifdef CONFIG_64BIT
 171                 if (is_pdc_pat()) {
 172                         switch(message) {
 173                                 case PDC_CHASSIS_DIRECT_BSTART:
 174                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BSTART, PDC_CHASSIS_LSTATE_RUN_NORMAL);
 175                                         break;
 176
 177                                 case PDC_CHASSIS_DIRECT_BCOMPLETE:
 178                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BCOMPLETE, PDC_CHASSIS_LSTATE_RUN_NORMAL);
 179                                         break;
 180
 181                                 case PDC_CHASSIS_DIRECT_SHUTDOWN:
 182                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_SHUTDOWN, PDC_CHASSIS_LSTATE_NONOS);
 183                                         break;
 184
 185                                 case PDC_CHASSIS_DIRECT_PANIC:
 186                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_PANIC, PDC_CHASSIS_LSTATE_RUN_CRASHREC);
 187                                         break;
 188
 189                                 case PDC_CHASSIS_DIRECT_LPMC:
 190                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_LPMC, PDC_CHASSIS_LSTATE_RUN_SYSINT);
 191                                         break;
 192
 193                                 case PDC_CHASSIS_DIRECT_HPMC:
 194                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_HPMC, PDC_CHASSIS_LSTATE_RUN_NCRIT);
 195                                         break;
 196
 197                                 default:
 198                                         retval = -1;
 199                         }
 200                 } else retval = -1;
 201 #else
 202                 if (1) {
 203                         switch (message) {
 204                                 case PDC_CHASSIS_DIRECT_BSTART:
 205                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_INIT));
 206                                         break;
 207
 208                                 case PDC_CHASSIS_DIRECT_BCOMPLETE:
 209                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_RUN));
 210                                         break;
 211
 212                                 case PDC_CHASSIS_DIRECT_SHUTDOWN:
 213                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_SHUT));
 214                                         break;
 215
 216                                 case PDC_CHASSIS_DIRECT_HPMC:
 217                                 case PDC_CHASSIS_DIRECT_PANIC:
 218                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_FLT));
 219                                         break;
 220
 221                                 case PDC_CHASSIS_DIRECT_LPMC:
 222                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_WARN));
 223                                         break;
 224
 225                                 default:
 226                                         retval = -1;
 227                         }
 228                 } else retval = -1;
 229 #endif /* CONFIG_64BIT */
 230         }       /* if (pdc_chassis_enabled) */
 231 #endif /* CONFIG_PDC_CHASSIS */
 232         return retval;
 233 }
 234
 235 #ifdef CONFIG_PDC_CHASSIS_WARN
 236 #ifdef CONFIG_PROC_FS
 237 static int pdc_chassis_warn_show(struct seq_file *m, void *v)
 238 {
 239         unsigned long warn;
 240         u32 warnreg;
 241
 242         if (pdc_chassis_warn(&warn) != PDC_OK)
 243                 return -EIO;
 244
 245         warnreg = (warn & 0xFFFFFFFF);
 246
 247         if ((warnreg >> 24) & 0xFF)
 248                 seq_printf(m, "Chassis component failure! (eg fan or PSU): 0x%.2x\n",
 249                            (warnreg >> 24) & 0xFF);
 250
 251         seq_printf(m, "Battery: %s\n", (warnreg & 0x04) ? "Low!" : "OK");
 252         seq_printf(m, "Temp low: %s\n", (warnreg & 0x02) ? "Exceeded!" : "OK");
 253         seq_printf(m, "Temp mid: %s\n", (warnreg & 0x01) ? "Exceeded!" : "OK");
 254         return 0;
 255 }
 256
 257 static int __init pdc_chassis_create_procfs(void)
 258 {
 259         unsigned long test;
 260         int ret;
 261
 262         ret = pdc_chassis_warn(&test);
 263         if ((ret == PDC_BAD_PROC) || (ret == PDC_BAD_OPTION)) {
 264                 /* seems that some boxes (eg L1000) do not implement this */
 265                 printk(KERN_INFO "Chassis warnings not supported.\n");
 266                 return 0;
 267         }
 268
 269         printk(KERN_INFO "Enabling PDC chassis warnings support v%s\n",
 270                         PDC_CHASSIS_VER);
 271         proc_create_single("chassis", 0400, NULL, pdc_chassis_warn_show);
 272         return 0;
 273 }
 274
 275 __initcall(pdc_chassis_create_procfs);
 276
 277 #endif /* CONFIG_PROC_FS */
 278 #endif /* CONFIG_PDC_CHASSIS_WARN */