Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/kyle/parisc-2.6
[linux-2.6] / drivers / watchdog / ar7_wdt.c
1 /*
2  * drivers/watchdog/ar7_wdt.c
3  *
4  * Copyright (C) 2007 Nicolas Thill <nico@openwrt.org>
5  * Copyright (c) 2005 Enrik Berkhan <Enrik.Berkhan@akk.org>
6  *
7  * Some code taken from:
8  * National Semiconductor SCx200 Watchdog support
9  * Copyright (c) 2001,2002 Christer Weinigel <wingel@nano-system.com>
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
24  */
25
26 #include <linux/module.h>
27 #include <linux/moduleparam.h>
28 #include <linux/errno.h>
29 #include <linux/init.h>
30 #include <linux/miscdevice.h>
31 #include <linux/watchdog.h>
32 #include <linux/notifier.h>
33 #include <linux/reboot.h>
34 #include <linux/fs.h>
35 #include <linux/ioport.h>
36 #include <linux/io.h>
37 #include <linux/uaccess.h>
38
39 #include <asm/addrspace.h>
40 #include <asm/ar7/ar7.h>
41
42 #define DRVNAME "ar7_wdt"
43 #define LONGNAME "TI AR7 Watchdog Timer"
44
45 MODULE_AUTHOR("Nicolas Thill <nico@openwrt.org>");
46 MODULE_DESCRIPTION(LONGNAME);
47 MODULE_LICENSE("GPL");
48 MODULE_ALIAS_MISCDEV(WATCHDOG_MINOR);
49
50 static int margin = 60;
51 module_param(margin, int, 0);
52 MODULE_PARM_DESC(margin, "Watchdog margin in seconds");
53
54 static int nowayout = WATCHDOG_NOWAYOUT;
55 module_param(nowayout, int, 0);
56 MODULE_PARM_DESC(nowayout, "Disable watchdog shutdown on close");
57
58 #define READ_REG(x) readl((void __iomem *)&(x))
59 #define WRITE_REG(x, v) writel((v), (void __iomem *)&(x))
60
61 struct ar7_wdt {
62         u32 kick_lock;
63         u32 kick;
64         u32 change_lock;
65         u32 change;
66         u32 disable_lock;
67         u32 disable;
68         u32 prescale_lock;
69         u32 prescale;
70 };
71
72 static unsigned long wdt_is_open;
73 static spinlock_t wdt_lock;
74 static unsigned expect_close;
75
76 /* XXX currently fixed, allows max margin ~68.72 secs */
77 #define prescale_value 0xffff
78
79 /* Offset of the WDT registers */
80 static unsigned long ar7_regs_wdt;
81 /* Pointer to the remapped WDT IO space */
82 static struct ar7_wdt *ar7_wdt;
83 static void ar7_wdt_get_regs(void)
84 {
85         u16 chip_id = ar7_chip_id();
86         switch (chip_id) {
87         case AR7_CHIP_7100:
88         case AR7_CHIP_7200:
89                 ar7_regs_wdt = AR7_REGS_WDT;
90                 break;
91         default:
92                 ar7_regs_wdt = UR8_REGS_WDT;
93                 break;
94         }
95 }
96
97
98 static void ar7_wdt_kick(u32 value)
99 {
100         WRITE_REG(ar7_wdt->kick_lock, 0x5555);
101         if ((READ_REG(ar7_wdt->kick_lock) & 3) == 1) {
102                 WRITE_REG(ar7_wdt->kick_lock, 0xaaaa);
103                 if ((READ_REG(ar7_wdt->kick_lock) & 3) == 3) {
104                         WRITE_REG(ar7_wdt->kick, value);
105                         return;
106                 }
107         }
108         printk(KERN_ERR DRVNAME ": failed to unlock WDT kick reg\n");
109 }
110
111 static void ar7_wdt_prescale(u32 value)
112 {
113         WRITE_REG(ar7_wdt->prescale_lock, 0x5a5a);
114         if ((READ_REG(ar7_wdt->prescale_lock) & 3) == 1) {
115                 WRITE_REG(ar7_wdt->prescale_lock, 0xa5a5);
116                 if ((READ_REG(ar7_wdt->prescale_lock) & 3) == 3) {
117                         WRITE_REG(ar7_wdt->prescale, value);
118                         return;
119                 }
120         }
121         printk(KERN_ERR DRVNAME ": failed to unlock WDT prescale reg\n");
122 }
123
124 static void ar7_wdt_change(u32 value)
125 {
126         WRITE_REG(ar7_wdt->change_lock, 0x6666);
127         if ((READ_REG(ar7_wdt->change_lock) & 3) == 1) {
128                 WRITE_REG(ar7_wdt->change_lock, 0xbbbb);
129                 if ((READ_REG(ar7_wdt->change_lock) & 3) == 3) {
130                         WRITE_REG(ar7_wdt->change, value);
131                         return;
132                 }
133         }
134         printk(KERN_ERR DRVNAME ": failed to unlock WDT change reg\n");
135 }
136
137 static void ar7_wdt_disable(u32 value)
138 {
139         WRITE_REG(ar7_wdt->disable_lock, 0x7777);
140         if ((READ_REG(ar7_wdt->disable_lock) & 3) == 1) {
141                 WRITE_REG(ar7_wdt->disable_lock, 0xcccc);
142                 if ((READ_REG(ar7_wdt->disable_lock) & 3) == 2) {
143                         WRITE_REG(ar7_wdt->disable_lock, 0xdddd);
144                         if ((READ_REG(ar7_wdt->disable_lock) & 3) == 3) {
145                                 WRITE_REG(ar7_wdt->disable, value);
146                                 return;
147                         }
148                 }
149         }
150         printk(KERN_ERR DRVNAME ": failed to unlock WDT disable reg\n");
151 }
152
153 static void ar7_wdt_update_margin(int new_margin)
154 {
155         u32 change;
156
157         change = new_margin * (ar7_vbus_freq() / prescale_value);
158         if (change < 1)
159                 change = 1;
160         if (change > 0xffff)
161                 change = 0xffff;
162         ar7_wdt_change(change);
163         margin = change * prescale_value / ar7_vbus_freq();
164         printk(KERN_INFO DRVNAME
165                ": timer margin %d seconds (prescale %d, change %d, freq %d)\n",
166                margin, prescale_value, change, ar7_vbus_freq());
167 }
168
169 static void ar7_wdt_enable_wdt(void)
170 {
171         printk(KERN_DEBUG DRVNAME ": enabling watchdog timer\n");
172         ar7_wdt_disable(1);
173         ar7_wdt_kick(1);
174 }
175
176 static void ar7_wdt_disable_wdt(void)
177 {
178         printk(KERN_DEBUG DRVNAME ": disabling watchdog timer\n");
179         ar7_wdt_disable(0);
180 }
181
182 static int ar7_wdt_open(struct inode *inode, struct file *file)
183 {
184         /* only allow one at a time */
185         if (test_and_set_bit(0, &wdt_is_open))
186                 return -EBUSY;
187         ar7_wdt_enable_wdt();
188         expect_close = 0;
189
190         return nonseekable_open(inode, file);
191 }
192
193 static int ar7_wdt_release(struct inode *inode, struct file *file)
194 {
195         if (!expect_close)
196                 printk(KERN_WARNING DRVNAME
197                 ": watchdog device closed unexpectedly,"
198                 "will not disable the watchdog timer\n");
199         else if (!nowayout)
200                 ar7_wdt_disable_wdt();
201         clear_bit(0, &wdt_is_open);
202         return 0;
203 }
204
205 static int ar7_wdt_notify_sys(struct notifier_block *this,
206                               unsigned long code, void *unused)
207 {
208         if (code == SYS_HALT || code == SYS_POWER_OFF)
209                 if (!nowayout)
210                         ar7_wdt_disable_wdt();
211
212         return NOTIFY_DONE;
213 }
214
215 static struct notifier_block ar7_wdt_notifier = {
216         .notifier_call = ar7_wdt_notify_sys,
217 };
218
219 static ssize_t ar7_wdt_write(struct file *file, const char *data,
220                              size_t len, loff_t *ppos)
221 {
222         /* check for a magic close character */
223         if (len) {
224                 size_t i;
225
226                 spin_lock(&wdt_lock);
227                 ar7_wdt_kick(1);
228                 spin_unlock(&wdt_lock);
229
230                 expect_close = 0;
231                 for (i = 0; i < len; ++i) {
232                         char c;
233                         if (get_user(c, data + i))
234                                 return -EFAULT;
235                         if (c == 'V')
236                                 expect_close = 1;
237                 }
238
239         }
240         return len;
241 }
242
243 static long ar7_wdt_ioctl(struct file *file,
244                                         unsigned int cmd, unsigned long arg)
245 {
246         static struct watchdog_info ident = {
247                 .identity = LONGNAME,
248                 .firmware_version = 1,
249                 .options = (WDIOF_SETTIMEOUT | WDIOF_KEEPALIVEPING |
250                                                 WDIOF_MAGICCLOSE),
251         };
252         int new_margin;
253
254         switch (cmd) {
255         case WDIOC_GETSUPPORT:
256                 if (copy_to_user((struct watchdog_info *)arg, &ident,
257                                 sizeof(ident)))
258                         return -EFAULT;
259                 return 0;
260         case WDIOC_GETSTATUS:
261         case WDIOC_GETBOOTSTATUS:
262                 if (put_user(0, (int *)arg))
263                         return -EFAULT;
264                 return 0;
265         case WDIOC_KEEPALIVE:
266                 ar7_wdt_kick(1);
267                 return 0;
268         case WDIOC_SETTIMEOUT:
269                 if (get_user(new_margin, (int *)arg))
270                         return -EFAULT;
271                 if (new_margin < 1)
272                         return -EINVAL;
273
274                 spin_lock(&wdt_lock);
275                 ar7_wdt_update_margin(new_margin);
276                 ar7_wdt_kick(1);
277                 spin_unlock(&wdt_lock);
278
279         case WDIOC_GETTIMEOUT:
280                 if (put_user(margin, (int *)arg))
281                         return -EFAULT;
282                 return 0;
283         default:
284                 return -ENOTTY;
285         }
286 }
287
288 static const struct file_operations ar7_wdt_fops = {
289         .owner          = THIS_MODULE,
290         .write          = ar7_wdt_write,
291         .unlocked_ioctl = ar7_wdt_ioctl,
292         .open           = ar7_wdt_open,
293         .release        = ar7_wdt_release,
294 };
295
296 static struct miscdevice ar7_wdt_miscdev = {
297         .minor          = WATCHDOG_MINOR,
298         .name           = "watchdog",
299         .fops           = &ar7_wdt_fops,
300 };
301
302 static int __init ar7_wdt_init(void)
303 {
304         int rc;
305
306         spin_lock_init(&wdt_lock);
307
308         ar7_wdt_get_regs();
309
310         if (!request_mem_region(ar7_regs_wdt, sizeof(struct ar7_wdt),
311                                                         LONGNAME)) {
312                 printk(KERN_WARNING DRVNAME ": watchdog I/O region busy\n");
313                 return -EBUSY;
314         }
315
316         ar7_wdt = (struct ar7_wdt *)
317                         ioremap(ar7_regs_wdt, sizeof(struct ar7_wdt));
318
319         ar7_wdt_disable_wdt();
320         ar7_wdt_prescale(prescale_value);
321         ar7_wdt_update_margin(margin);
322
323         rc = register_reboot_notifier(&ar7_wdt_notifier);
324         if (rc) {
325                 printk(KERN_ERR DRVNAME
326                         ": unable to register reboot notifier\n");
327                 goto out_alloc;
328         }
329
330         rc = misc_register(&ar7_wdt_miscdev);
331         if (rc) {
332                 printk(KERN_ERR DRVNAME ": unable to register misc device\n");
333                 goto out_register;
334         }
335         goto out;
336
337 out_register:
338         unregister_reboot_notifier(&ar7_wdt_notifier);
339 out_alloc:
340         iounmap(ar7_wdt);
341         release_mem_region(ar7_regs_wdt, sizeof(struct ar7_wdt));
342 out:
343         return rc;
344 }
345
346 static void __exit ar7_wdt_cleanup(void)
347 {
348         misc_deregister(&ar7_wdt_miscdev);
349         unregister_reboot_notifier(&ar7_wdt_notifier);
350         iounmap(ar7_wdt);
351         release_mem_region(ar7_regs_wdt, sizeof(struct ar7_wdt));
352 }
353
354 module_init(ar7_wdt_init);
355 module_exit(ar7_wdt_cleanup);