blob: 9b95d80ebc6e8150f0a24dd125127e72efed26dd [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
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>
Ralf Baechlefcdb27a2006-01-18 17:37:07 +000018#include <linux/pm.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070019
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/*
Lee Revellf18190b2006-06-26 18:30:00 +020031 * Blink frequency during reboot grace period and when panicked.
Linus Torvalds1da177e2005-04-16 15:20:36 -070032 */
33#define POWERDOWN_FREQ (HZ / 4)
34#define PANIC_FREQ (HZ / 8)
35
36static struct timer_list power_timer, blink_timer, debounce_timer;
Lee Revellf18190b2006-06-26 18:30:00 +020037static int has_panicked, shuting_down;
Linus Torvalds1da177e2005-04-16 15:20:36 -070038
39static void ip32_machine_restart(char *command) __attribute__((noreturn));
40static void ip32_machine_halt(void) __attribute__((noreturn));
41static void ip32_machine_power_off(void) __attribute__((noreturn));
42
43static void ip32_machine_restart(char *cmd)
44{
45 crime->control = CRIME_CONTROL_HARD_RESET;
46 while (1);
47}
48
49static inline void ip32_machine_halt(void)
50{
51 ip32_machine_power_off();
52}
53
54static void ip32_machine_power_off(void)
55{
Ralf Baechled2f82c22009-05-22 10:58:43 +010056 unsigned char reg_a, xctrl_a, xctrl_b;
Linus Torvalds1da177e2005-04-16 15:20:36 -070057
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
80static void power_timeout(unsigned long data)
81{
82 ip32_machine_power_off();
83}
84
85static 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
92static void debounce(unsigned long data)
93{
Ralf Baechled2f82c22009-05-22 10:58:43 +010094 unsigned char reg_a, reg_c, xctrl_a;
Linus Torvalds1da177e2005-04-16 15:20:36 -070095
96 reg_c = CMOS_READ(RTC_INTR_FLAGS);
Ralf Baechle63c901c2009-05-22 10:48:17 +010097 reg_a = CMOS_READ(RTC_REG_A);
Linus Torvalds1da177e2005-04-16 15:20:36 -070098 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
Lee Revellf18190b2006-06-26 18:30:00 +0200113 if (has_panicked)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700114 ip32_machine_restart(NULL);
115
116 enable_irq(MACEISA_RTC_IRQ);
117}
118
119static inline void ip32_power_button(void)
120{
Lee Revellf18190b2006-06-26 18:30:00 +0200121 if (has_panicked)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700122 return;
123
Cedric Le Goater9ec52092006-10-02 02:19:00 -0700124 if (shuting_down || kill_cad_pid(SIGINT, 1)) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700125 /* 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
Ralf Baechle36d98e72006-10-15 09:19:58 +0100139static irqreturn_t ip32_rtc_int(int irq, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700140{
Ralf Baechled2f82c22009-05-22 10:58:43 +0100141 unsigned char reg_c;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700142
143 reg_c = CMOS_READ(RTC_INTR_FLAGS);
144 if (!(reg_c & RTC_IRQF)) {
Ralf Baechle42a3b4f2005-09-03 15:56:17 -0700145 printk(KERN_WARNING
Harvey Harrisonbb09a952008-03-28 14:34:39 -0700146 "%s: RTC IRQ without RTC_IRQF\n", __func__);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700147 }
148 /* Wait until interrupt goes away */
Andrew Randrianasulu950312c2009-05-14 11:29:27 -0700149 disable_irq_nosync(MACEISA_RTC_IRQ);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700150 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
160static int panic_event(struct notifier_block *this, unsigned long event,
161 void *ptr)
162{
163 unsigned long led;
164
Lee Revellf18190b2006-06-26 18:30:00 +0200165 if (has_panicked)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700166 return NOTIFY_DONE;
Lee Revellf18190b2006-06-26 18:30:00 +0200167 has_panicked = 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700168
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
179static struct notifier_block panic_block = {
180 .notifier_call = panic_event,
181};
182
183static __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;
Ralf Baechlefcdb27a2006-01-18 17:37:07 +0000193 pm_power_off = ip32_machine_power_off;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700194
195 init_timer(&blink_timer);
196 blink_timer.function = blink_timeout;
Alan Sterne041c682006-03-27 01:16:30 -0800197 atomic_notifier_chain_register(&panic_notifier_list, &panic_block);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700198
Ralf Baechlec3dd8cd2007-07-29 00:16:34 +0100199 if (request_irq(MACEISA_RTC_IRQ, ip32_rtc_int, 0, "rtc", NULL))
200 panic("Can't allocate MACEISA RTC IRQ");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700201
202 return 0;
203}
204
205subsys_initcall(ip32_reboot_setup);