arch/parisc/kernel/pdc_chassis.c

   1 /*
   2  *    interfaces to log Chassis Codes via PDC (firmware)
   3  *
   4  *    Copyright (C) 2002 Laurent Canet <canetl@esiee.fr>
   5  *    Copyright (C) 2002-2004 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 as published by
   9  *    the Free Software Foundation; either version 2 of the License, or
  10  *    (at your option) any later version.
  11  *
  12  *    This program is distributed in the hope that it will be useful,
  13  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *    GNU General Public License for more details.
  16  *
  17  *    You should have received a copy of the GNU General Public License
  18  *    along with this program; if not, write to the Free Software
  19  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #undef PDC_CHASSIS_DEBUG
  23 #ifdef PDC_CHASSIS_DEBUG
  24 #define DPRINTK(fmt, args...)   printk(fmt, ## args)
  25 #else
  26 #define DPRINTK(fmt, args...)
  27 #endif
  28
  29 #include <linux/init.h>
  30 #include <linux/kernel.h>
  31 #include <linux/reboot.h>
  32 #include <linux/notifier.h>
  33 #include <linux/cache.h>
  34
  35 #include <asm/pdc_chassis.h>
  36 #include <asm/processor.h>
  37 #include <asm/pdc.h>
  38 #include <asm/pdcpat.h>
  39
  40
  41 #ifdef CONFIG_PDC_CHASSIS
  42 static int pdc_chassis_old __read_mostly = 0;
  43 static unsigned int pdc_chassis_enabled __read_mostly = 1;
  44
  45
  46 /**
  47  * pdc_chassis_setup() - Enable/disable pdc_chassis code at boot time.
  48  * @str configuration param: 0 to disable chassis log
  49  * @return 1
  50  */
  51
  52 static int __init pdc_chassis_setup(char *str)
  53 {
  54         /*panic_timeout = simple_strtoul(str, NULL, 0);*/
  55         get_option(&str, &pdc_chassis_enabled);
  56         return 1;
  57 }
  58 __setup("pdcchassis=", pdc_chassis_setup);
  59
  60
  61 /**
  62  * pdc_chassis_checkold() - Checks for old PDC_CHASSIS compatibility
  63  * @pdc_chassis_old: 1 if old pdc chassis style
  64  *
  65  * Currently, only E class and A180 are known to work with this.
  66  * Inspired by Christoph Plattner
  67  */
  68
  69 static void __init pdc_chassis_checkold(void)
  70 {
  71         switch(CPU_HVERSION) {
  72                 case 0x480:             /* E25 */
  73                 case 0x481:             /* E35 */
  74                 case 0x482:             /* E45 */
  75                 case 0x483:             /* E55 */
  76                 case 0x516:             /* A180 */
  77                         pdc_chassis_old = 1;
  78                         break;
  79
  80                 default:
  81                         break;
  82         }
  83         DPRINTK(KERN_DEBUG "%s: pdc_chassis_checkold(); pdc_chassis_old = %d\n", __FILE__, pdc_chassis_old);
  84 }
  85
  86
  87 /**
  88  * pdc_chassis_panic_event() - Called by the panic handler.
  89  *
  90  * As soon as a panic occurs, we should inform the PDC.
  91  */
  92
  93 static int pdc_chassis_panic_event(struct notifier_block *this,
  94                         unsigned long event, void *ptr)
  95 {
  96         pdc_chassis_send_status(PDC_CHASSIS_DIRECT_PANIC);
  97                 return NOTIFY_DONE;
  98 }
  99
 100
 101 static struct notifier_block pdc_chassis_panic_block = {
 102         .notifier_call = pdc_chassis_panic_event,
 103         .priority = INT_MAX,
 104 };
 105
 106
 107 /**
 108  * parisc_reboot_event() - Called by the reboot handler.
 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         int handle = 0;
 136         if (likely(pdc_chassis_enabled)) {
 137                 DPRINTK(KERN_DEBUG "%s: parisc_pdc_chassis_init()\n", __FILE__);
 138
 139                 /* Let see if we have something to handle... */
 140                 /* Check for PDC_PAT or old LED Panel */
 141                 pdc_chassis_checkold();
 142                 if (is_pdc_pat()) {
 143                         printk(KERN_INFO "Enabling PDC_PAT chassis codes support.\n");
 144                         handle = 1;
 145                 }
 146                 else if (unlikely(pdc_chassis_old)) {
 147                         printk(KERN_INFO "Enabling old style chassis LED panel support.\n");
 148                         handle = 1;
 149                 }
 150
 151                 if (handle) {
 152                         /* initialize panic notifier chain */
 153                         notifier_chain_register(&panic_notifier_list, &pdc_chassis_panic_block);
 154
 155                         /* initialize reboot notifier chain */
 156                         register_reboot_notifier(&pdc_chassis_reboot_block);
 157                 }
 158         }
 159 #endif /* CONFIG_PDC_CHASSIS */
 160 }
 161
 162
 163 /**
 164  * pdc_chassis_send_status() - Sends a predefined message to the chassis,
 165  * and changes the front panel LEDs according to the new system state
 166  * @retval: PDC call return value.
 167  *
 168  * Only machines with 64 bits PDC PAT and those reported in
 169  * pdc_chassis_checkold() are supported atm.
 170  *
 171  * returns 0 if no error, -1 if no supported PDC is present or invalid message,
 172  * else returns the appropriate PDC error code.
 173  *
 174  * For a list of predefined messages, see asm-parisc/pdc_chassis.h
 175  */
 176
 177 int pdc_chassis_send_status(int message)
 178 {
 179         /* Maybe we should do that in an other way ? */
 180         int retval = 0;
 181 #ifdef CONFIG_PDC_CHASSIS
 182         if (likely(pdc_chassis_enabled)) {
 183
 184                 DPRINTK(KERN_DEBUG "%s: pdc_chassis_send_status(%d)\n", __FILE__, message);
 185
 186 #ifdef CONFIG_64BIT
 187                 if (is_pdc_pat()) {
 188                         switch(message) {
 189                                 case PDC_CHASSIS_DIRECT_BSTART:
 190                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BSTART, PDC_CHASSIS_LSTATE_RUN_NORMAL);
 191                                         break;
 192
 193                                 case PDC_CHASSIS_DIRECT_BCOMPLETE:
 194                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BCOMPLETE, PDC_CHASSIS_LSTATE_RUN_NORMAL);
 195                                         break;
 196
 197                                 case PDC_CHASSIS_DIRECT_SHUTDOWN:
 198                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_SHUTDOWN, PDC_CHASSIS_LSTATE_NONOS);
 199                                         break;
 200
 201                                 case PDC_CHASSIS_DIRECT_PANIC:
 202                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_PANIC, PDC_CHASSIS_LSTATE_RUN_CRASHREC);
 203                                         break;
 204
 205                                 case PDC_CHASSIS_DIRECT_LPMC:
 206                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_LPMC, PDC_CHASSIS_LSTATE_RUN_SYSINT);
 207                                         break;
 208
 209                                 case PDC_CHASSIS_DIRECT_HPMC:
 210                                         retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_HPMC, PDC_CHASSIS_LSTATE_RUN_NCRIT);
 211                                         break;
 212
 213                                 default:
 214                                         retval = -1;
 215                         }
 216                 } else retval = -1;
 217 #else
 218                 if (unlikely(pdc_chassis_old)) {
 219                         switch (message) {
 220                                 case PDC_CHASSIS_DIRECT_BSTART:
 221                                 case PDC_CHASSIS_DIRECT_BCOMPLETE:
 222                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_RUN));
 223                                         break;
 224
 225                                 case PDC_CHASSIS_DIRECT_SHUTDOWN:
 226                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_SHUT));
 227                                         break;
 228
 229                                 case PDC_CHASSIS_DIRECT_HPMC:
 230                                 case PDC_CHASSIS_DIRECT_PANIC:
 231                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_FLT));
 232                                         break;
 233
 234                                 case PDC_CHASSIS_DIRECT_LPMC:
 235                                         retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_WARN));
 236                                         break;
 237
 238                                 default:
 239                                         retval = -1;
 240                         }
 241                 } else retval = -1;
 242 #endif /* CONFIG_64BIT */
 243         }       /* if (pdc_chassis_enabled) */
 244 #endif /* CONFIG_PDC_CHASSIS */
 245         return retval;
 246 }