[deliverable/linux.git] / arch / mips / sgi-ip32 / ip32-reset.c

/*
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file "COPYING" in the main directory of this archive
 * for more details.
 *
 * Copyright (C) 2001 Keith M Wesolowski
 * Copyright (C) 2001 Paul Mundt
 * Copyright (C) 2003 Guido Guenther <agx@sigxcpu.org>
 */

#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/notifier.h>
#include <linux/delay.h>
#include <linux/ds17287rtc.h>
#include <linux/interrupt.h>
#include <linux/pm.h>

#include <asm/addrspace.h>
#include <asm/irq.h>
#include <asm/reboot.h>
#include <asm/system.h>
#include <asm/wbflush.h>
#include <asm/ip32/mace.h>
#include <asm/ip32/crime.h>
#include <asm/ip32/ip32_ints.h>

#define POWERDOWN_TIMEOUT	120
/*
 * Blink frequency during reboot grace period and when panicked.
 */
#define POWERDOWN_FREQ		(HZ / 4)
#define PANIC_FREQ		(HZ / 8)

static struct timer_list power_timer, blink_timer, debounce_timer;
static int has_panicked, shuting_down;

static void ip32_machine_restart(char *command) __attribute__((noreturn));
static void ip32_machine_halt(void) __attribute__((noreturn));
static void ip32_machine_power_off(void) __attribute__((noreturn));

static void ip32_machine_restart(char *cmd)
{
	crime->control = CRIME_CONTROL_HARD_RESET;
	while (1);
}

static inline void ip32_machine_halt(void)
{
	ip32_machine_power_off();
}

static void ip32_machine_power_off(void)
{
	unsigned char reg_a, xctrl_a, xctrl_b;

	disable_irq(MACEISA_RTC_IRQ);
	reg_a = CMOS_READ(RTC_REG_A);

	/* setup for kickstart & wake-up (DS12287 Ref. Man. p. 19) */
	reg_a &= ~DS_REGA_DV2;
	reg_a |= DS_REGA_DV1;

	CMOS_WRITE(reg_a | DS_REGA_DV0, RTC_REG_A);
	wbflush();
	xctrl_b = CMOS_READ(DS_B1_XCTRL4B)
		   | DS_XCTRL4B_ABE | DS_XCTRL4B_KFE;
	CMOS_WRITE(xctrl_b, DS_B1_XCTRL4B);
	xctrl_a = CMOS_READ(DS_B1_XCTRL4A) & ~DS_XCTRL4A_IFS;
	CMOS_WRITE(xctrl_a, DS_B1_XCTRL4A);
	wbflush();
	/* adios amigos... */
	CMOS_WRITE(xctrl_a | DS_XCTRL4A_PAB, DS_B1_XCTRL4A);
	CMOS_WRITE(reg_a, RTC_REG_A);
	wbflush();
	while (1);
}

static void power_timeout(unsigned long data)
{
	ip32_machine_power_off();
}

static void blink_timeout(unsigned long data)
{
	unsigned long led = mace->perif.ctrl.misc ^ MACEISA_LED_RED;
	mace->perif.ctrl.misc = led;
	mod_timer(&blink_timer, jiffies + data);
}

static void debounce(unsigned long data)
{
	unsigned char reg_a, reg_c, xctrl_a;

	reg_c = CMOS_READ(RTC_INTR_FLAGS);
	reg_a = CMOS_READ(RTC_REG_A);
	CMOS_WRITE(reg_a | DS_REGA_DV0, RTC_REG_A);
	wbflush();
	xctrl_a = CMOS_READ(DS_B1_XCTRL4A);
	if ((xctrl_a & DS_XCTRL4A_IFS) || (reg_c & RTC_IRQF )) {
		/* Interrupt still being sent. */
		debounce_timer.expires = jiffies + 50;
		add_timer(&debounce_timer);

		/* clear interrupt source */
		CMOS_WRITE(xctrl_a & ~DS_XCTRL4A_IFS, DS_B1_XCTRL4A);
		CMOS_WRITE(reg_a & ~DS_REGA_DV0, RTC_REG_A);
		return;
	}
	CMOS_WRITE(reg_a & ~DS_REGA_DV0, RTC_REG_A);

	if (has_panicked)
		ip32_machine_restart(NULL);

	enable_irq(MACEISA_RTC_IRQ);
}

static inline void ip32_power_button(void)
{
	if (has_panicked)
		return;

	if (shuting_down || kill_cad_pid(SIGINT, 1)) {
		/* No init process or button pressed twice.  */
		ip32_machine_power_off();
	}

	shuting_down = 1;
	blink_timer.data = POWERDOWN_FREQ;
	blink_timeout(POWERDOWN_FREQ);

	init_timer(&power_timer);
	power_timer.function = power_timeout;
	power_timer.expires = jiffies + POWERDOWN_TIMEOUT * HZ;
	add_timer(&power_timer);
}

static irqreturn_t ip32_rtc_int(int irq, void *dev_id)
{
	unsigned char reg_c;

	reg_c = CMOS_READ(RTC_INTR_FLAGS);
	if (!(reg_c & RTC_IRQF)) {
		printk(KERN_WARNING
			"%s: RTC IRQ without RTC_IRQF\n", __func__);
	}
	/* Wait until interrupt goes away */
	disable_irq_nosync(MACEISA_RTC_IRQ);
	init_timer(&debounce_timer);
	debounce_timer.function = debounce;
	debounce_timer.expires = jiffies + 50;
	add_timer(&debounce_timer);

	printk(KERN_DEBUG "Power button pressed\n");
	ip32_power_button();
	return IRQ_HANDLED;
}

static int panic_event(struct notifier_block *this, unsigned long event,
		       void *ptr)
{
	unsigned long led;

	if (has_panicked)
		return NOTIFY_DONE;
	has_panicked = 1;

	/* turn off the green LED */
	led = mace->perif.ctrl.misc | MACEISA_LED_GREEN;
	mace->perif.ctrl.misc = led;

	blink_timer.data = PANIC_FREQ;
	blink_timeout(PANIC_FREQ);

	return NOTIFY_DONE;
}

static struct notifier_block panic_block = {
	.notifier_call = panic_event,
};

static __init int ip32_reboot_setup(void)
{
	/* turn on the green led only */
	unsigned long led = mace->perif.ctrl.misc;
	led |= MACEISA_LED_RED;
	led &= ~MACEISA_LED_GREEN;
	mace->perif.ctrl.misc = led;

	_machine_restart = ip32_machine_restart;
	_machine_halt = ip32_machine_halt;
	pm_power_off = ip32_machine_power_off;

	init_timer(&blink_timer);
	blink_timer.function = blink_timeout;
	atomic_notifier_chain_register(&panic_notifier_list, &panic_block);

	if (request_irq(MACEISA_RTC_IRQ, ip32_rtc_int, 0, "rtc", NULL))
		panic("Can't allocate MACEISA RTC IRQ");

	return 0;
}

subsys_initcall(ip32_reboot_setup);
Commit	Line	Data
1da177e4 LT	1	/*
	2	* This file is subject to the terms and conditions of the GNU General Public
	3	* License. See the file "COPYING" in the main directory of this archive
	4	* for more details.
	5	*
	6	* Copyright (C) 2001 Keith M Wesolowski
	7	* Copyright (C) 2001 Paul Mundt
	8	* Copyright (C) 2003 Guido Guenther <agx@sigxcpu.org>
	9	*/
	10
	11	#include <linux/init.h>
	12	#include <linux/kernel.h>
	13	#include <linux/sched.h>
	14	#include <linux/notifier.h>
	15	#include <linux/delay.h>
	16	#include <linux/ds17287rtc.h>
	17	#include <linux/interrupt.h>
fcdb27ad	18	#include <linux/pm.h>
1da177e4 LT	19
	20	#include <asm/addrspace.h>
	21	#include <asm/irq.h>
	22	#include <asm/reboot.h>
	23	#include <asm/system.h>
	24	#include <asm/wbflush.h>
	25	#include <asm/ip32/mace.h>
	26	#include <asm/ip32/crime.h>
	27	#include <asm/ip32/ip32_ints.h>
	28
	29	#define POWERDOWN_TIMEOUT 120
	30	/*
f18190bd	31	* Blink frequency during reboot grace period and when panicked.
1da177e4 LT	32	*/
	33	#define POWERDOWN_FREQ (HZ / 4)
	34	#define PANIC_FREQ (HZ / 8)
	35
	36	static struct timer_list power_timer, blink_timer, debounce_timer;
f18190bd	37	static int has_panicked, shuting_down;
1da177e4 LT	38
	39	static void ip32_machine_restart(char *command) __attribute__((noreturn));
	40	static void ip32_machine_halt(void) __attribute__((noreturn));
	41	static void ip32_machine_power_off(void) __attribute__((noreturn));
	42
	43	static void ip32_machine_restart(char *cmd)
	44	{
	45	crime->control = CRIME_CONTROL_HARD_RESET;
	46	while (1);
	47	}
	48
	49	static inline void ip32_machine_halt(void)
	50	{
	51	ip32_machine_power_off();
	52	}
	53
	54	static void ip32_machine_power_off(void)
	55	{
d2f82c2f	56	unsigned char reg_a, xctrl_a, xctrl_b;
1da177e4 LT	57
	58	disable_irq(MACEISA_RTC_IRQ);
	59	reg_a = CMOS_READ(RTC_REG_A);
	60
	61	/* setup for kickstart & wake-up (DS12287 Ref. Man. p. 19) */
	62	reg_a &= ~DS_REGA_DV2;
	63	reg_a \|= DS_REGA_DV1;
	64
	65	CMOS_WRITE(reg_a \| DS_REGA_DV0, RTC_REG_A);
	66	wbflush();
	67	xctrl_b = CMOS_READ(DS_B1_XCTRL4B)
	68	\| DS_XCTRL4B_ABE \| DS_XCTRL4B_KFE;
	69	CMOS_WRITE(xctrl_b, DS_B1_XCTRL4B);
	70	xctrl_a = CMOS_READ(DS_B1_XCTRL4A) & ~DS_XCTRL4A_IFS;
	71	CMOS_WRITE(xctrl_a, DS_B1_XCTRL4A);
	72	wbflush();
	73	/* adios amigos... */
	74	CMOS_WRITE(xctrl_a \| DS_XCTRL4A_PAB, DS_B1_XCTRL4A);
	75	CMOS_WRITE(reg_a, RTC_REG_A);
	76	wbflush();
	77	while (1);
	78	}
	79
	80	static void power_timeout(unsigned long data)
	81	{
	82	ip32_machine_power_off();
	83	}
	84
	85	static void blink_timeout(unsigned long data)
	86	{
	87	unsigned long led = mace->perif.ctrl.misc ^ MACEISA_LED_RED;
	88	mace->perif.ctrl.misc = led;
	89	mod_timer(&blink_timer, jiffies + data);
	90	}
	91
	92	static void debounce(unsigned long data)
	93	{
d2f82c2f	94	unsigned char reg_a, reg_c, xctrl_a;
1da177e4 LT	95
1da177e4 LT	96	reg_c = CMOS_READ(RTC_INTR_FLAGS);
63c901c7	97	reg_a = CMOS_READ(RTC_REG_A);
1da177e4 LT	98	CMOS_WRITE(reg_a \| DS_REGA_DV0, RTC_REG_A);
	99	wbflush();
	100	xctrl_a = CMOS_READ(DS_B1_XCTRL4A);
	101	if ((xctrl_a & DS_XCTRL4A_IFS) \|\| (reg_c & RTC_IRQF )) {
	102	/* Interrupt still being sent. */
	103	debounce_timer.expires = jiffies + 50;
	104	add_timer(&debounce_timer);
	105
	106	/* clear interrupt source */
	107	CMOS_WRITE(xctrl_a & ~DS_XCTRL4A_IFS, DS_B1_XCTRL4A);
	108	CMOS_WRITE(reg_a & ~DS_REGA_DV0, RTC_REG_A);
	109	return;
	110	}
	111	CMOS_WRITE(reg_a & ~DS_REGA_DV0, RTC_REG_A);
	112
f18190bd	113	if (has_panicked)
1da177e4 LT	114	ip32_machine_restart(NULL);
	115
	116	enable_irq(MACEISA_RTC_IRQ);
	117	}
	118
	119	static inline void ip32_power_button(void)
	120	{
f18190bd	121	if (has_panicked)
1da177e4 LT	122	return;
1da177e4 LT	123
9ec52099	124	if (shuting_down \|\| kill_cad_pid(SIGINT, 1)) {
1da177e4 LT	125	/* No init process or button pressed twice. */
	126	ip32_machine_power_off();
	127	}
	128
	129	shuting_down = 1;
	130	blink_timer.data = POWERDOWN_FREQ;
	131	blink_timeout(POWERDOWN_FREQ);
	132
	133	init_timer(&power_timer);
	134	power_timer.function = power_timeout;
	135	power_timer.expires = jiffies + POWERDOWN_TIMEOUT * HZ;
	136	add_timer(&power_timer);
	137	}
	138
36d98e79	139	static irqreturn_t ip32_rtc_int(int irq, void *dev_id)
1da177e4	140	{
d2f82c2f	141	unsigned char reg_c;
1da177e4 LT	142
	143	reg_c = CMOS_READ(RTC_INTR_FLAGS);
	144	if (!(reg_c & RTC_IRQF)) {
42a3b4f2	145	printk(KERN_WARNING
bb09a954	146	"%s: RTC IRQ without RTC_IRQF\n", __func__);
1da177e4 LT	147	}
1da177e4 LT	148	/* Wait until interrupt goes away */
950312ce	149	disable_irq_nosync(MACEISA_RTC_IRQ);
1da177e4 LT	150	init_timer(&debounce_timer);
	151	debounce_timer.function = debounce;
	152	debounce_timer.expires = jiffies + 50;
	153	add_timer(&debounce_timer);
	154
	155	printk(KERN_DEBUG "Power button pressed\n");
	156	ip32_power_button();
	157	return IRQ_HANDLED;
	158	}
	159
	160	static int panic_event(struct notifier_block *this, unsigned long event,
	161	void *ptr)
	162	{
	163	unsigned long led;
	164
f18190bd	165	if (has_panicked)
1da177e4	166	return NOTIFY_DONE;
f18190bd	167	has_panicked = 1;
1da177e4 LT	168
	169	/* turn off the green LED */
	170	led = mace->perif.ctrl.misc \| MACEISA_LED_GREEN;
	171	mace->perif.ctrl.misc = led;
	172
	173	blink_timer.data = PANIC_FREQ;
	174	blink_timeout(PANIC_FREQ);
	175
	176	return NOTIFY_DONE;
	177	}
	178
	179	static struct notifier_block panic_block = {
	180	.notifier_call = panic_event,
	181	};
	182
	183	static __init int ip32_reboot_setup(void)
	184	{
	185	/* turn on the green led only */
	186	unsigned long led = mace->perif.ctrl.misc;
	187	led \|= MACEISA_LED_RED;
	188	led &= ~MACEISA_LED_GREEN;
	189	mace->perif.ctrl.misc = led;
	190
	191	_machine_restart = ip32_machine_restart;
	192	_machine_halt = ip32_machine_halt;
fcdb27ad	193	pm_power_off = ip32_machine_power_off;
1da177e4 LT	194
	195	init_timer(&blink_timer);
	196	blink_timer.function = blink_timeout;
e041c683	197	atomic_notifier_chain_register(&panic_notifier_list, &panic_block);
1da177e4	198
c3dd8cdf RB	199	if (request_irq(MACEISA_RTC_IRQ, ip32_rtc_int, 0, "rtc", NULL))
c3dd8cdf RB	200	panic("Can't allocate MACEISA RTC IRQ");
1da177e4 LT	201
	202	return 0;
	203	}
	204
	205	subsys_initcall(ip32_reboot_setup);