[linux-block.git] / arch / parisc / kernel / pdc_chassis.c

/* 
 *    interfaces to Chassis Codes via PDC (firmware)
 *
 *    Copyright (C) 2002 Laurent Canet <canetl@esiee.fr>
 *    Copyright (C) 2002-2006 Thibaut VARENE <varenet@parisc-linux.org>
 *
 *    This program is free software; you can redistribute it and/or modify
 *    it under the terms of the GNU General Public License, version 2, as
 *    published by the Free Software Foundation.
 *
 *    This program is distributed in the hope that it will be useful,
 *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *    GNU General Public License for more details.
 *
 *    You should have received a copy of the GNU General Public License
 *    along with this program; if not, write to the Free Software
 *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *    TODO: poll chassis warns, trigger (configurable) machine shutdown when
 *    		needed.
 *    	    Find out how to get Chassis warnings out of PAT boxes?
 */

#undef PDC_CHASSIS_DEBUG
#ifdef PDC_CHASSIS_DEBUG
#define DPRINTK(fmt, args...)	printk(fmt, ## args)
#else
#define DPRINTK(fmt, args...)
#endif

#include <linux/init.h>
#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/reboot.h>
#include <linux/notifier.h>
#include <linux/cache.h>
#include <linux/proc_fs.h>
#include <linux/seq_file.h>

#include <asm/pdc_chassis.h>
#include <asm/processor.h>
#include <asm/pdc.h>
#include <asm/pdcpat.h>

#define PDC_CHASSIS_VER	"0.05"

#ifdef CONFIG_PDC_CHASSIS
static unsigned int pdc_chassis_enabled __read_mostly = 1;


/**
 * pdc_chassis_setup() - Enable/disable pdc_chassis code at boot time.
 * @str configuration param: 0 to disable chassis log
 * @return 1
 */
 
static int __init pdc_chassis_setup(char *str)
{
	/*panic_timeout = simple_strtoul(str, NULL, 0);*/
	get_option(&str, &pdc_chassis_enabled);
	return 1;
}
__setup("pdcchassis=", pdc_chassis_setup);


/** 
 * pdc_chassis_checkold() - Checks for old PDC_CHASSIS compatibility
 * @pdc_chassis_old: 1 if old pdc chassis style
 * 
 * Currently, only E class and A180 are known to work with this.
 * Inspired by Christoph Plattner
 */
#if 0
static void __init pdc_chassis_checkold(void)
{
	switch(CPU_HVERSION) {
		case 0x480:		/* E25 */
		case 0x481:		/* E35 */
		case 0x482:		/* E45 */
		case 0x483:		/* E55 */
		case 0x516:		/* A180 */
			break;

		default:
			break;
	}
	DPRINTK(KERN_DEBUG "%s: pdc_chassis_checkold(); pdc_chassis_old = %d\n", __FILE__, pdc_chassis_old);
}
#endif

/**
 * pdc_chassis_panic_event() - Called by the panic handler.
 *
 * As soon as a panic occurs, we should inform the PDC.
 */

static int pdc_chassis_panic_event(struct notifier_block *this,
		        unsigned long event, void *ptr)
{
	pdc_chassis_send_status(PDC_CHASSIS_DIRECT_PANIC);
		return NOTIFY_DONE;
}   


static struct notifier_block pdc_chassis_panic_block = {
	.notifier_call = pdc_chassis_panic_event,
	.priority = INT_MAX,
};


/**
 * parisc_reboot_event() - Called by the reboot handler.
 *
 * As soon as a reboot occurs, we should inform the PDC.
 */

static int pdc_chassis_reboot_event(struct notifier_block *this,
		        unsigned long event, void *ptr)
{
	pdc_chassis_send_status(PDC_CHASSIS_DIRECT_SHUTDOWN);
		return NOTIFY_DONE;
}   


static struct notifier_block pdc_chassis_reboot_block = {
	.notifier_call = pdc_chassis_reboot_event,
	.priority = INT_MAX,
};
#endif /* CONFIG_PDC_CHASSIS */


/**
 * parisc_pdc_chassis_init() - Called at boot time.
 */

void __init parisc_pdc_chassis_init(void)
{
#ifdef CONFIG_PDC_CHASSIS
	if (likely(pdc_chassis_enabled)) {
		DPRINTK(KERN_DEBUG "%s: parisc_pdc_chassis_init()\n", __FILE__);

		/* Let see if we have something to handle... */
		printk(KERN_INFO "Enabling %s chassis codes support v%s\n",
				is_pdc_pat() ? "PDC_PAT" : "regular",
				PDC_CHASSIS_VER);

		/* initialize panic notifier chain */
		atomic_notifier_chain_register(&panic_notifier_list,
				&pdc_chassis_panic_block);

		/* initialize reboot notifier chain */
		register_reboot_notifier(&pdc_chassis_reboot_block);
	}
#endif /* CONFIG_PDC_CHASSIS */
}


/** 
 * pdc_chassis_send_status() - Sends a predefined message to the chassis,
 * and changes the front panel LEDs according to the new system state
 * @retval: PDC call return value.
 *
 * Only machines with 64 bits PDC PAT and those reported in
 * pdc_chassis_checkold() are supported atm.
 * 
 * returns 0 if no error, -1 if no supported PDC is present or invalid message,
 * else returns the appropriate PDC error code.
 * 
 * For a list of predefined messages, see asm-parisc/pdc_chassis.h
 */

int pdc_chassis_send_status(int message)
{
	/* Maybe we should do that in an other way ? */
	int retval = 0;
#ifdef CONFIG_PDC_CHASSIS
	if (likely(pdc_chassis_enabled)) {

		DPRINTK(KERN_DEBUG "%s: pdc_chassis_send_status(%d)\n", __FILE__, message);

#ifdef CONFIG_64BIT
		if (is_pdc_pat()) {
			switch(message) {
				case PDC_CHASSIS_DIRECT_BSTART:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BSTART, PDC_CHASSIS_LSTATE_RUN_NORMAL);
					break;

				case PDC_CHASSIS_DIRECT_BCOMPLETE:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BCOMPLETE, PDC_CHASSIS_LSTATE_RUN_NORMAL);
					break;

				case PDC_CHASSIS_DIRECT_SHUTDOWN:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_SHUTDOWN, PDC_CHASSIS_LSTATE_NONOS);
					break;

				case PDC_CHASSIS_DIRECT_PANIC:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_PANIC, PDC_CHASSIS_LSTATE_RUN_CRASHREC);
					break;

				case PDC_CHASSIS_DIRECT_LPMC:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_LPMC, PDC_CHASSIS_LSTATE_RUN_SYSINT);
					break;

				case PDC_CHASSIS_DIRECT_HPMC:
					retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_HPMC, PDC_CHASSIS_LSTATE_RUN_NCRIT);
					break;

				default:
					retval = -1;
			}
		} else retval = -1;
#else
		if (1) {
			switch (message) {
				case PDC_CHASSIS_DIRECT_BSTART:
					retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_INIT));
					break;

				case PDC_CHASSIS_DIRECT_BCOMPLETE:
					retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_RUN));
					break;

				case PDC_CHASSIS_DIRECT_SHUTDOWN:
					retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_SHUT));
					break;

				case PDC_CHASSIS_DIRECT_HPMC:
				case PDC_CHASSIS_DIRECT_PANIC:
					retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_FLT));
					break;

				case PDC_CHASSIS_DIRECT_LPMC:
					retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_WARN));
					break;

				default:
					retval = -1;
			}
		} else retval = -1;
#endif /* CONFIG_64BIT */
	}	/* if (pdc_chassis_enabled) */
#endif /* CONFIG_PDC_CHASSIS */
	return retval;
}

#ifdef CONFIG_PDC_CHASSIS_WARN
#ifdef CONFIG_PROC_FS
static int pdc_chassis_warn_show(struct seq_file *m, void *v)
{
	unsigned long warn;
	u32 warnreg;

	if (pdc_chassis_warn(&warn) != PDC_OK)
		return -EIO;

	warnreg = (warn & 0xFFFFFFFF);

	if ((warnreg >> 24) & 0xFF)
		seq_printf(m, "Chassis component failure! (eg fan or PSU): 0x%.2x\n",
			   (warnreg >> 24) & 0xFF);

	seq_printf(m, "Battery: %s\n", (warnreg & 0x04) ? "Low!" : "OK");
	seq_printf(m, "Temp low: %s\n", (warnreg & 0x02) ? "Exceeded!" : "OK");
	seq_printf(m, "Temp mid: %s\n", (warnreg & 0x01) ? "Exceeded!" : "OK");
	return 0;
}

static int __init pdc_chassis_create_procfs(void)
{
	unsigned long test;
	int ret;

	ret = pdc_chassis_warn(&test);
	if ((ret == PDC_BAD_PROC) || (ret == PDC_BAD_OPTION)) {
		/* seems that some boxes (eg L1000) do not implement this */
		printk(KERN_INFO "Chassis warnings not supported.\n");
		return 0;
	}

	printk(KERN_INFO "Enabling PDC chassis warnings support v%s\n",
			PDC_CHASSIS_VER);
	proc_create_single("chassis", 0400, NULL, pdc_chassis_warn_show);
	return 0;
}

__initcall(pdc_chassis_create_procfs);

#endif /* CONFIG_PROC_FS */
#endif /* CONFIG_PDC_CHASSIS_WARN */
Commit	Line	Data
1da177e4	1	/*
8ffaeaf4	2	* interfaces to Chassis Codes via PDC (firmware)
1da177e4 LT	3	*
1da177e4 LT	4	* Copyright (C) 2002 Laurent Canet <canetl@esiee.fr>
8ffaeaf4	5	* Copyright (C) 2002-2006 Thibaut VARENE <varenet@parisc-linux.org>
1da177e4 LT	6	*
1da177e4 LT	7	* This program is free software; you can redistribute it and/or modify
a81dd18e TV	8	* it under the terms of the GNU General Public License, version 2, as
a81dd18e TV	9	* published by the Free Software Foundation.
1da177e4 LT	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
8ffaeaf4 TV	19	*
	20	* TODO: poll chassis warns, trigger (configurable) machine shutdown when
	21	* needed.
9b0703fe	22	* Find out how to get Chassis warnings out of PAT boxes?
1da177e4 LT	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>
28ff1188	33	#include <linux/module.h>
1da177e4 LT	34	#include <linux/kernel.h>
	35	#include <linux/reboot.h>
	36	#include <linux/notifier.h>
8039de10	37	#include <linux/cache.h>
8ffaeaf4	38	#include <linux/proc_fs.h>
28ff1188	39	#include <linux/seq_file.h>
1da177e4 LT	40
	41	#include <asm/pdc_chassis.h>
	42	#include <asm/processor.h>
	43	#include <asm/pdc.h>
	44	#include <asm/pdcpat.h>
	45
9b0703fe	46	#define PDC_CHASSIS_VER "0.05"
1da177e4 LT	47
1da177e4 LT	48	#ifdef CONFIG_PDC_CHASSIS
8039de10	49	static unsigned int pdc_chassis_enabled __read_mostly = 1;
1da177e4 LT	50
	51
	52	/**
	53	* pdc_chassis_setup() - Enable/disable pdc_chassis code at boot time.
	54	* @str configuration param: 0 to disable chassis log
	55	* @return 1
	56	*/
	57
	58	static int __init pdc_chassis_setup(char *str)
	59	{
	60	/panic_timeout = simple_strtoul(str, NULL, 0);/
	61	get_option(&str, &pdc_chassis_enabled);
	62	return 1;
	63	}
	64	__setup("pdcchassis=", pdc_chassis_setup);
	65
	66
	67	/**
	68	* pdc_chassis_checkold() - Checks for old PDC_CHASSIS compatibility
	69	* @pdc_chassis_old: 1 if old pdc chassis style
	70	*
	71	* Currently, only E class and A180 are known to work with this.
	72	* Inspired by Christoph Plattner
	73	*/
8ffaeaf4	74	#if 0
1da177e4 LT	75	static void __init pdc_chassis_checkold(void)
	76	{
	77	switch(CPU_HVERSION) {
	78	case 0x480: /* E25 */
	79	case 0x481: /* E35 */
	80	case 0x482: /* E45 */
	81	case 0x483: /* E55 */
	82	case 0x516: /* A180 */
1da177e4 LT	83	break;
	84
	85	default:
	86	break;
	87	}
	88	DPRINTK(KERN_DEBUG "%s: pdc_chassis_checkold(); pdc_chassis_old = %d\n", __FILE__, pdc_chassis_old);
	89	}
8ffaeaf4	90	#endif
1da177e4 LT	91
	92	/**
	93	* pdc_chassis_panic_event() - Called by the panic handler.
	94	*
	95	* As soon as a panic occurs, we should inform the PDC.
	96	*/
	97
	98	static int pdc_chassis_panic_event(struct notifier_block *this,
	99	unsigned long event, void *ptr)
	100	{
	101	pdc_chassis_send_status(PDC_CHASSIS_DIRECT_PANIC);
	102	return NOTIFY_DONE;
	103	}
	104
	105
	106	static struct notifier_block pdc_chassis_panic_block = {
	107	.notifier_call = pdc_chassis_panic_event,
	108	.priority = INT_MAX,
	109	};
	110
	111
	112	/**
	113	* parisc_reboot_event() - Called by the reboot handler.
	114	*
	115	* As soon as a reboot occurs, we should inform the PDC.
	116	*/
	117
	118	static int pdc_chassis_reboot_event(struct notifier_block *this,
	119	unsigned long event, void *ptr)
	120	{
	121	pdc_chassis_send_status(PDC_CHASSIS_DIRECT_SHUTDOWN);
	122	return NOTIFY_DONE;
	123	}
	124
	125
	126	static struct notifier_block pdc_chassis_reboot_block = {
	127	.notifier_call = pdc_chassis_reboot_event,
	128	.priority = INT_MAX,
	129	};
	130	#endif /* CONFIG_PDC_CHASSIS */
	131
	132
	133	/**
	134	* parisc_pdc_chassis_init() - Called at boot time.
	135	*/
	136
	137	void __init parisc_pdc_chassis_init(void)
	138	{
	139	#ifdef CONFIG_PDC_CHASSIS
8039de10	140	if (likely(pdc_chassis_enabled)) {
1da177e4 LT	141	DPRINTK(KERN_DEBUG "%s: parisc_pdc_chassis_init()\n", __FILE__);
	142
	143	/* Let see if we have something to handle... */
9b0703fe TV	144	printk(KERN_INFO "Enabling %s chassis codes support v%s\n",
	145	is_pdc_pat() ? "PDC_PAT" : "regular",
	146	PDC_CHASSIS_VER);
	147
	148	/* initialize panic notifier chain */
	149	atomic_notifier_chain_register(&panic_notifier_list,
	150	&pdc_chassis_panic_block);
	151
	152	/* initialize reboot notifier chain */
	153	register_reboot_notifier(&pdc_chassis_reboot_block);
1da177e4 LT	154	}
	155	#endif /* CONFIG_PDC_CHASSIS */
	156	}
	157
	158
	159	/**
	160	* pdc_chassis_send_status() - Sends a predefined message to the chassis,
	161	* and changes the front panel LEDs according to the new system state
	162	* @retval: PDC call return value.
	163	*
	164	* Only machines with 64 bits PDC PAT and those reported in
	165	* pdc_chassis_checkold() are supported atm.
	166	*
	167	* returns 0 if no error, -1 if no supported PDC is present or invalid message,
	168	* else returns the appropriate PDC error code.
	169	*
	170	* For a list of predefined messages, see asm-parisc/pdc_chassis.h
	171	*/
	172
	173	int pdc_chassis_send_status(int message)
	174	{
	175	/* Maybe we should do that in an other way ? */
	176	int retval = 0;
	177	#ifdef CONFIG_PDC_CHASSIS
8039de10	178	if (likely(pdc_chassis_enabled)) {
1da177e4 LT	179
	180	DPRINTK(KERN_DEBUG "%s: pdc_chassis_send_status(%d)\n", __FILE__, message);
	181
	182	#ifdef CONFIG_64BIT
	183	if (is_pdc_pat()) {
	184	switch(message) {
	185	case PDC_CHASSIS_DIRECT_BSTART:
	186	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BSTART, PDC_CHASSIS_LSTATE_RUN_NORMAL);
	187	break;
	188
	189	case PDC_CHASSIS_DIRECT_BCOMPLETE:
	190	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_BCOMPLETE, PDC_CHASSIS_LSTATE_RUN_NORMAL);
	191	break;
	192
	193	case PDC_CHASSIS_DIRECT_SHUTDOWN:
	194	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_SHUTDOWN, PDC_CHASSIS_LSTATE_NONOS);
	195	break;
	196
	197	case PDC_CHASSIS_DIRECT_PANIC:
	198	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_PANIC, PDC_CHASSIS_LSTATE_RUN_CRASHREC);
	199	break;
	200
	201	case PDC_CHASSIS_DIRECT_LPMC:
	202	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_LPMC, PDC_CHASSIS_LSTATE_RUN_SYSINT);
	203	break;
	204
	205	case PDC_CHASSIS_DIRECT_HPMC:
	206	retval = pdc_pat_chassis_send_log(PDC_CHASSIS_PMSG_HPMC, PDC_CHASSIS_LSTATE_RUN_NCRIT);
	207	break;
	208
	209	default:
	210	retval = -1;
	211	}
	212	} else retval = -1;
	213	#else
8ffaeaf4	214	if (1) {
1da177e4 LT	215	switch (message) {
1da177e4 LT	216	case PDC_CHASSIS_DIRECT_BSTART:
8ffaeaf4 TV	217	retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_INIT));
	218	break;
	219
1da177e4 LT	220	case PDC_CHASSIS_DIRECT_BCOMPLETE:
	221	retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_RUN));
	222	break;
	223
	224	case PDC_CHASSIS_DIRECT_SHUTDOWN:
	225	retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_SHUT));
	226	break;
	227
	228	case PDC_CHASSIS_DIRECT_HPMC:
	229	case PDC_CHASSIS_DIRECT_PANIC:
	230	retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_FLT));
	231	break;
	232
	233	case PDC_CHASSIS_DIRECT_LPMC:
	234	retval = pdc_chassis_disp(PDC_CHASSIS_DISP_DATA(OSTAT_WARN));
	235	break;
	236
	237	default:
	238	retval = -1;
	239	}
	240	} else retval = -1;
	241	#endif /* CONFIG_64BIT */
	242	} /* if (pdc_chassis_enabled) */
	243	#endif /* CONFIG_PDC_CHASSIS */
	244	return retval;
	245	}
8ffaeaf4 TV	246
	247	#ifdef CONFIG_PDC_CHASSIS_WARN
	248	#ifdef CONFIG_PROC_FS
28ff1188	249	static int pdc_chassis_warn_show(struct seq_file m, void v)
8ffaeaf4	250	{
8ffaeaf4 TV	251	unsigned long warn;
	252	u32 warnreg;
	253
28ff1188	254	if (pdc_chassis_warn(&warn) != PDC_OK)
8ffaeaf4 TV	255	return -EIO;
	256
	257	warnreg = (warn & 0xFFFFFFFF);
	258
	259	if ((warnreg >> 24) & 0xFF)
28ff1188 DH	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
8ffaeaf4 TV	269	static int __init pdc_chassis_create_procfs(void)
8ffaeaf4 TV	270	{
9b0703fe TV	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);
3f3942ac	283	proc_create_single("chassis", 0400, NULL, pdc_chassis_warn_show);
8ffaeaf4 TV	284	return 0;
	285	}
	286
	287	__initcall(pdc_chassis_create_procfs);
	288
	289	#endif /* CONFIG_PROC_FS */
	290	#endif /* CONFIG_PDC_CHASSIS_WARN */