[WATCHDOG] hpwdt.c: Add new HP BMC controller.
[linux-2.6] / drivers / watchdog / smsc37b787_wdt.c
1 /*
2  *      SMsC 37B787 Watchdog Timer driver for Linux 2.6.x.x
3  *
4  *      Based on acquirewdt.c by Alan Cox <alan@lxorguk.ukuu.org.uk>
5  *       and some other existing drivers
6  *
7  *      This program is free software; you can redistribute it and/or
8  *      modify it under the terms of the GNU General Public License
9  *      as published by the Free Software Foundation; either version
10  *      2 of the License, or (at your option) any later version.
11  *
12  *      The authors do NOT admit liability nor provide warranty for
13  *      any of this software. This material is provided "AS-IS" in
14  *      the hope that it may be useful for others.
15  *
16  *      (C) Copyright 2003-2006  Sven Anders <anders@anduras.de>
17  *
18  *  History:
19  *      2003 - Created version 1.0 for Linux 2.4.x.
20  *      2006 - Ported to Linux 2.6, added nowayout and MAGICCLOSE
21  *             features. Released version 1.1
22  *
23  *  Theory of operation:
24  *
25  *      A Watchdog Timer (WDT) is a hardware circuit that can
26  *      reset the computer system in case of a software fault.
27  *      You probably knew that already.
28  *
29  *      Usually a userspace daemon will notify the kernel WDT driver
30  *      via the /dev/watchdog special device file that userspace is
31  *      still alive, at regular intervals.  When such a notification
32  *      occurs, the driver will usually tell the hardware watchdog
33  *      that everything is in order, and that the watchdog should wait
34  *      for yet another little while to reset the system.
35  *      If userspace fails (RAM error, kernel bug, whatever), the
36  *      notifications cease to occur, and the hardware watchdog will
37  *      reset the system (causing a reboot) after the timeout occurs.
38  *
39  * Create device with:
40  *  mknod /dev/watchdog c 10 130
41  *
42  * For an example userspace keep-alive daemon, see:
43  *   Documentation/watchdog/watchdog.txt
44  */
45
46 #include <linux/module.h>
47 #include <linux/moduleparam.h>
48 #include <linux/types.h>
49 #include <linux/miscdevice.h>
50 #include <linux/watchdog.h>
51 #include <linux/delay.h>
52 #include <linux/fs.h>
53 #include <linux/ioport.h>
54 #include <linux/notifier.h>
55 #include <linux/reboot.h>
56 #include <linux/init.h>
57 #include <linux/spinlock.h>
58 #include <linux/io.h>
59 #include <linux/uaccess.h>
60
61 #include <asm/system.h>
62
63 /* enable support for minutes as units? */
64 /* (does not always work correctly, so disabled by default!) */
65 #define SMSC_SUPPORT_MINUTES
66 #undef SMSC_SUPPORT_MINUTES
67
68 #define MAX_TIMEOUT     255
69
70 #define UNIT_SECOND     0
71 #define UNIT_MINUTE     1
72
73 #define MODNAME         "smsc37b787_wdt: "
74 #define VERSION         "1.1"
75
76 #define IOPORT          0x3F0
77 #define IOPORT_SIZE     2
78 #define IODEV_NO        8
79
80 static int unit = UNIT_SECOND;  /* timer's unit */
81 static int timeout = 60;        /* timeout value: default is 60 "units" */
82 static unsigned long timer_enabled;   /* is the timer enabled? */
83
84 static char expect_close;       /* is the close expected? */
85
86 static DEFINE_SPINLOCK(io_lock);/* to guard the watchdog from io races */
87
88 static int nowayout = WATCHDOG_NOWAYOUT;
89
90 /* -- Low level function ----------------------------------------*/
91
92 /* unlock the IO chip */
93
94 static inline void open_io_config(void)
95 {
96         outb(0x55, IOPORT);
97         mdelay(1);
98         outb(0x55, IOPORT);
99 }
100
101 /* lock the IO chip */
102 static inline void close_io_config(void)
103 {
104         outb(0xAA, IOPORT);
105 }
106
107 /* select the IO device */
108 static inline void select_io_device(unsigned char devno)
109 {
110         outb(0x07, IOPORT);
111         outb(devno, IOPORT+1);
112 }
113
114 /* write to the control register */
115 static inline void write_io_cr(unsigned char reg, unsigned char data)
116 {
117         outb(reg, IOPORT);
118         outb(data, IOPORT+1);
119 }
120
121 /* read from the control register */
122 static inline char read_io_cr(unsigned char reg)
123 {
124         outb(reg, IOPORT);
125         return inb(IOPORT+1);
126 }
127
128 /* -- Medium level functions ------------------------------------*/
129
130 static inline void gpio_bit12(unsigned char reg)
131 {
132         /* -- General Purpose I/O Bit 1.2 --
133          * Bit 0,   In/Out: 0 = Output, 1 = Input
134          * Bit 1,   Polarity: 0 = No Invert, 1 = Invert
135          * Bit 2,   Group Enable Intr.: 0 = Disable, 1 = Enable
136          * Bit 3/4, Function select: 00 = GPI/O, 01 = WDT, 10 = P17,
137          *                           11 = Either Edge Triggered Intr. 2
138          * Bit 5/6  (Reserved)
139          * Bit 7,   Output Type: 0 = Push Pull Bit, 1 = Open Drain
140          */
141         write_io_cr(0xE2, reg);
142 }
143
144 static inline void gpio_bit13(unsigned char reg)
145 {
146         /* -- General Purpose I/O Bit 1.3 --
147          * Bit 0,  In/Out: 0 = Output, 1 = Input
148          * Bit 1,  Polarity: 0 = No Invert, 1 = Invert
149          * Bit 2,  Group Enable Intr.: 0 = Disable, 1 = Enable
150          * Bit 3,  Function select: 0 = GPI/O, 1 = LED
151          * Bit 4-6 (Reserved)
152          * Bit 7,  Output Type: 0 = Push Pull Bit, 1 = Open Drain
153          */
154         write_io_cr(0xE3, reg);
155 }
156
157 static inline void wdt_timer_units(unsigned char new_units)
158 {
159         /* -- Watchdog timer units --
160          * Bit 0-6 (Reserved)
161          * Bit 7,  WDT Time-out Value Units Select
162          *         (0 = Minutes, 1 = Seconds)
163          */
164         write_io_cr(0xF1, new_units);
165 }
166
167 static inline void wdt_timeout_value(unsigned char new_timeout)
168 {
169         /* -- Watchdog Timer Time-out Value --
170          * Bit 0-7 Binary coded units (0=Disabled, 1..255)
171          */
172         write_io_cr(0xF2, new_timeout);
173 }
174
175 static inline void wdt_timer_conf(unsigned char conf)
176 {
177         /* -- Watchdog timer configuration --
178          * Bit 0   Joystick enable: 0* = No Reset, 1 = Reset WDT upon
179          *                                                      Gameport I/O
180          * Bit 1   Keyboard enable: 0* = No Reset, 1 = Reset WDT upon KBD Intr.
181          * Bit 2   Mouse enable: 0* = No Reset, 1 = Reset WDT upon Mouse Intr
182          * Bit 3   Reset the timer
183          *         (Wrong in SMsC documentation? Given as: PowerLED Timout
184          *                                                      Enabled)
185          * Bit 4-7 WDT Interrupt Mapping: (0000* = Disabled,
186          *            0001=IRQ1, 0010=(Invalid), 0011=IRQ3 to 1111=IRQ15)
187          */
188         write_io_cr(0xF3, conf);
189 }
190
191 static inline void wdt_timer_ctrl(unsigned char reg)
192 {
193         /* -- Watchdog timer control --
194          * Bit 0   Status Bit: 0 = Timer counting, 1 = Timeout occured
195          * Bit 1   Power LED Toggle: 0 = Disable Toggle, 1 = Toggle at 1 Hz
196          * Bit 2   Force Timeout: 1 = Forces WD timeout event (self-cleaning)
197          * Bit 3   P20 Force Timeout enabled:
198          *          0 = P20 activity does not generate the WD timeout event
199          *          1 = P20 Allows rising edge of P20, from the keyboard
200          *              controller, to force the WD timeout event.
201          * Bit 4   (Reserved)
202          * -- Soft power management --
203          * Bit 5   Stop Counter: 1 = Stop software power down counter
204          *            set via register 0xB8, (self-cleaning)
205          *            (Upon read: 0 = Counter running, 1 = Counter stopped)
206          * Bit 6   Restart Counter: 1 = Restart software power down counter
207          *            set via register 0xB8, (self-cleaning)
208          * Bit 7   SPOFF: 1 = Force software power down (self-cleaning)
209          */
210         write_io_cr(0xF4, reg);
211 }
212
213 /* -- Higher level functions ------------------------------------*/
214
215 /* initialize watchdog */
216
217 static void wb_smsc_wdt_initialize(void)
218 {
219         unsigned char old;
220
221         spin_lock(&io_lock);
222         open_io_config();
223         select_io_device(IODEV_NO);
224
225         /* enable the watchdog */
226         gpio_bit13(0x08);  /* Select pin 80 = LED not GPIO */
227         gpio_bit12(0x0A);  /* Set pin 79 = WDT not
228                               GPIO/Output/Polarity=Invert */
229         /* disable the timeout */
230         wdt_timeout_value(0);
231
232         /* reset control register */
233         wdt_timer_ctrl(0x00);
234
235         /* reset configuration register */
236         wdt_timer_conf(0x00);
237
238         /* read old (timer units) register */
239         old = read_io_cr(0xF1) & 0x7F;
240         if (unit == UNIT_SECOND)
241                 old |= 0x80;    /* set to seconds */
242
243         /* set the watchdog timer units */
244         wdt_timer_units(old);
245
246         close_io_config();
247         spin_unlock(&io_lock);
248 }
249
250 /* shutdown the watchdog */
251
252 static void wb_smsc_wdt_shutdown(void)
253 {
254         spin_lock(&io_lock);
255         open_io_config();
256         select_io_device(IODEV_NO);
257
258         /* disable the watchdog */
259         gpio_bit13(0x09);
260         gpio_bit12(0x09);
261
262         /* reset watchdog config register */
263         wdt_timer_conf(0x00);
264
265         /* reset watchdog control register */
266         wdt_timer_ctrl(0x00);
267
268         /* disable timeout */
269         wdt_timeout_value(0x00);
270
271         close_io_config();
272         spin_unlock(&io_lock);
273 }
274
275 /* set timeout => enable watchdog */
276
277 static void wb_smsc_wdt_set_timeout(unsigned char new_timeout)
278 {
279         spin_lock(&io_lock);
280         open_io_config();
281         select_io_device(IODEV_NO);
282
283         /* set Power LED to blink, if we enable the timeout */
284         wdt_timer_ctrl((new_timeout == 0) ? 0x00 : 0x02);
285
286         /* set timeout value */
287         wdt_timeout_value(new_timeout);
288
289         close_io_config();
290         spin_unlock(&io_lock);
291 }
292
293 /* get timeout */
294
295 static unsigned char wb_smsc_wdt_get_timeout(void)
296 {
297         unsigned char set_timeout;
298
299         spin_lock(&io_lock);
300         open_io_config();
301         select_io_device(IODEV_NO);
302         set_timeout = read_io_cr(0xF2);
303         close_io_config();
304         spin_unlock(&io_lock);
305
306         return set_timeout;
307 }
308
309 /* disable watchdog */
310
311 static void wb_smsc_wdt_disable(void)
312 {
313         /* set the timeout to 0 to disable the watchdog */
314         wb_smsc_wdt_set_timeout(0);
315 }
316
317 /* enable watchdog by setting the current timeout */
318
319 static void wb_smsc_wdt_enable(void)
320 {
321         /* set the current timeout... */
322         wb_smsc_wdt_set_timeout(timeout);
323 }
324
325 /* reset the timer */
326
327 static void wb_smsc_wdt_reset_timer(void)
328 {
329         spin_lock(&io_lock);
330         open_io_config();
331         select_io_device(IODEV_NO);
332
333         /* reset the timer */
334         wdt_timeout_value(timeout);
335         wdt_timer_conf(0x08);
336
337         close_io_config();
338         spin_unlock(&io_lock);
339 }
340
341 /* return, if the watchdog is enabled (timeout is set...) */
342
343 static int wb_smsc_wdt_status(void)
344 {
345         return (wb_smsc_wdt_get_timeout() == 0) ? 0 : WDIOF_KEEPALIVEPING;
346 }
347
348
349 /* -- File operations -------------------------------------------*/
350
351 /* open => enable watchdog and set initial timeout */
352
353 static int wb_smsc_wdt_open(struct inode *inode, struct file *file)
354 {
355         /* /dev/watchdog can only be opened once */
356
357         if (test_and_set_bit(0, &timer_enabled))
358                 return -EBUSY;
359
360         if (nowayout)
361                 __module_get(THIS_MODULE);
362
363         /* Reload and activate timer */
364         wb_smsc_wdt_enable();
365
366         printk(KERN_INFO MODNAME
367                 "Watchdog enabled. Timeout set to %d %s.\n",
368                 timeout, (unit == UNIT_SECOND) ? "second(s)" : "minute(s)");
369
370         return nonseekable_open(inode, file);
371 }
372
373 /* close => shut off the timer */
374
375 static int wb_smsc_wdt_release(struct inode *inode, struct file *file)
376 {
377         /* Shut off the timer. */
378
379         if (expect_close == 42) {
380                 wb_smsc_wdt_disable();
381                 printk(KERN_INFO MODNAME
382                                 "Watchdog disabled, sleeping again...\n");
383         } else {
384                 printk(KERN_CRIT MODNAME
385                                 "Unexpected close, not stopping watchdog!\n");
386                 wb_smsc_wdt_reset_timer();
387         }
388
389         clear_bit(0, &timer_enabled);
390         expect_close = 0;
391         return 0;
392 }
393
394 /* write => update the timer to keep the machine alive */
395
396 static ssize_t wb_smsc_wdt_write(struct file *file, const char __user *data,
397                                  size_t len, loff_t *ppos)
398 {
399         /* See if we got the magic character 'V' and reload the timer */
400         if (len) {
401                 if (!nowayout) {
402                         size_t i;
403
404                         /* reset expect flag */
405                         expect_close = 0;
406
407                         /* scan to see whether or not we got the
408                            magic character */
409                         for (i = 0; i != len; i++) {
410                                 char c;
411                                 if (get_user(c, data + i))
412                                         return -EFAULT;
413                                 if (c == 'V')
414                                         expect_close = 42;
415                         }
416                 }
417
418                 /* someone wrote to us, we should reload the timer */
419                 wb_smsc_wdt_reset_timer();
420         }
421         return len;
422 }
423
424 /* ioctl => control interface */
425
426 static long wb_smsc_wdt_ioctl(struct file *file,
427                                         unsigned int cmd, unsigned long arg)
428 {
429         int new_timeout;
430
431         union {
432                 struct watchdog_info __user *ident;
433                 int __user *i;
434         } uarg;
435
436         static const struct watchdog_info ident = {
437                 .options =              WDIOF_KEEPALIVEPING |
438                                         WDIOF_SETTIMEOUT |
439                                         WDIOF_MAGICCLOSE,
440                 .firmware_version =     0,
441                 .identity =             "SMsC 37B787 Watchdog",
442         };
443
444         uarg.i = (int __user *)arg;
445
446         switch (cmd) {
447         case WDIOC_GETSUPPORT:
448                 return copy_to_user(uarg.ident, &ident, sizeof(ident))
449                                                                 ? -EFAULT : 0;
450         case WDIOC_GETSTATUS:
451                 return put_user(wb_smsc_wdt_status(), uarg.i);
452         case WDIOC_GETBOOTSTATUS:
453                 return put_user(0, uarg.i);
454         case WDIOC_SETOPTIONS:
455         {
456                 int options, retval = -EINVAL;
457
458                 if (get_user(options, uarg.i))
459                         return -EFAULT;
460
461                 if (options & WDIOS_DISABLECARD) {
462                         wb_smsc_wdt_disable();
463                         retval = 0;
464                 }
465                 if (options & WDIOS_ENABLECARD) {
466                         wb_smsc_wdt_enable();
467                         retval = 0;
468                 }
469                 return retval;
470         }
471         case WDIOC_KEEPALIVE:
472                 wb_smsc_wdt_reset_timer();
473                 return 0;
474         case WDIOC_SETTIMEOUT:
475                 if (get_user(new_timeout, uarg.i))
476                         return -EFAULT;
477                 /* the API states this is given in secs */
478                 if (unit == UNIT_MINUTE)
479                         new_timeout /= 60;
480                 if (new_timeout < 0 || new_timeout > MAX_TIMEOUT)
481                         return -EINVAL;
482                 timeout = new_timeout;
483                 wb_smsc_wdt_set_timeout(timeout);
484                 /* fall through and return the new timeout... */
485         case WDIOC_GETTIMEOUT:
486                 new_timeout = timeout;
487                 if (unit == UNIT_MINUTE)
488                           new_timeout *= 60;
489                 return put_user(new_timeout, uarg.i);
490         default:
491                 return -ENOTTY;
492         }
493 }
494
495 /* -- Notifier funtions -----------------------------------------*/
496
497 static int wb_smsc_wdt_notify_sys(struct notifier_block *this,
498                                         unsigned long code, void *unused)
499 {
500         if (code == SYS_DOWN || code == SYS_HALT) {
501                 /* set timeout to 0, to avoid possible race-condition */
502                 timeout = 0;
503                 wb_smsc_wdt_disable();
504         }
505         return NOTIFY_DONE;
506 }
507
508 /* -- Module's structures ---------------------------------------*/
509
510 static const struct file_operations wb_smsc_wdt_fops = {
511         .owner    = THIS_MODULE,
512         .llseek         = no_llseek,
513         .write          = wb_smsc_wdt_write,
514         .unlocked_ioctl = wb_smsc_wdt_ioctl,
515         .open           = wb_smsc_wdt_open,
516         .release        = wb_smsc_wdt_release,
517 };
518
519 static struct notifier_block wb_smsc_wdt_notifier = {
520         .notifier_call  = wb_smsc_wdt_notify_sys,
521 };
522
523 static struct miscdevice wb_smsc_wdt_miscdev = {
524         .minor          = WATCHDOG_MINOR,
525         .name           = "watchdog",
526         .fops           = &wb_smsc_wdt_fops,
527 };
528
529 /* -- Module init functions -------------------------------------*/
530
531 /* module's "constructor" */
532
533 static int __init wb_smsc_wdt_init(void)
534 {
535         int ret;
536
537         printk(KERN_INFO "SMsC 37B787 watchdog component driver "
538                                         VERSION " initialising...\n");
539
540         if (!request_region(IOPORT, IOPORT_SIZE, "SMsC 37B787 watchdog")) {
541                 printk(KERN_ERR MODNAME "Unable to register IO port %#x\n",
542                                                                 IOPORT);
543                 ret = -EBUSY;
544                 goto out_pnp;
545         }
546
547         /* set new maximum, if it's too big */
548         if (timeout > MAX_TIMEOUT)
549                 timeout = MAX_TIMEOUT;
550
551         /* init the watchdog timer */
552         wb_smsc_wdt_initialize();
553
554         ret = register_reboot_notifier(&wb_smsc_wdt_notifier);
555         if (ret) {
556                 printk(KERN_ERR MODNAME
557                         "Unable to register reboot notifier err = %d\n", ret);
558                 goto out_io;
559         }
560
561         ret = misc_register(&wb_smsc_wdt_miscdev);
562         if (ret) {
563                 printk(KERN_ERR MODNAME
564                         "Unable to register miscdev on minor %d\n",
565                                                         WATCHDOG_MINOR);
566                 goto out_rbt;
567         }
568
569         /* output info */
570         printk(KERN_INFO MODNAME "Timeout set to %d %s.\n",
571                 timeout, (unit == UNIT_SECOND) ? "second(s)" : "minute(s)");
572         printk(KERN_INFO MODNAME
573                 "Watchdog initialized and sleeping (nowayout=%d)...\n",
574                                                                 nowayout);
575 out_clean:
576         return ret;
577
578 out_rbt:
579         unregister_reboot_notifier(&wb_smsc_wdt_notifier);
580
581 out_io:
582         release_region(IOPORT, IOPORT_SIZE);
583
584 out_pnp:
585         goto out_clean;
586 }
587
588 /* module's "destructor" */
589
590 static void __exit wb_smsc_wdt_exit(void)
591 {
592         /* Stop the timer before we leave */
593         if (!nowayout) {
594                 wb_smsc_wdt_shutdown();
595                 printk(KERN_INFO MODNAME "Watchdog disabled.\n");
596         }
597
598         misc_deregister(&wb_smsc_wdt_miscdev);
599         unregister_reboot_notifier(&wb_smsc_wdt_notifier);
600         release_region(IOPORT, IOPORT_SIZE);
601
602         printk(KERN_INFO "SMsC 37B787 watchdog component driver removed.\n");
603 }
604
605 module_init(wb_smsc_wdt_init);
606 module_exit(wb_smsc_wdt_exit);
607
608 MODULE_AUTHOR("Sven Anders <anders@anduras.de>");
609 MODULE_DESCRIPTION("Driver for SMsC 37B787 watchdog component (Version "
610                                                                 VERSION ")");
611 MODULE_LICENSE("GPL");
612
613 MODULE_ALIAS_MISCDEV(WATCHDOG_MINOR);
614
615 #ifdef SMSC_SUPPORT_MINUTES
616 module_param(unit, int, 0);
617 MODULE_PARM_DESC(unit,
618                 "set unit to use, 0=seconds or 1=minutes, default is 0");
619 #endif
620
621 module_param(timeout, int, 0);
622 MODULE_PARM_DESC(timeout, "range is 1-255 units, default is 60");
623
624 module_param(nowayout, int, 0);
625 MODULE_PARM_DESC(nowayout,
626                 "Watchdog cannot be stopped once started (default="
627                                 __MODULE_STRING(WATCHDOG_NOWAYOUT) ")");