Loading...
1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * Industrial Computer Source WDT501 driver
4 *
5 * (c) Copyright 1996-1997 Alan Cox <alan@lxorguk.ukuu.org.uk>,
6 * All Rights Reserved.
7 *
8 * Neither Alan Cox nor CymruNet Ltd. admit liability nor provide
9 * warranty for any of this software. This material is provided
10 * "AS-IS" and at no charge.
11 *
12 * (c) Copyright 1995 Alan Cox <alan@lxorguk.ukuu.org.uk>
13 *
14 * Release 0.10.
15 *
16 * Fixes
17 * Dave Gregorich : Modularisation and minor bugs
18 * Alan Cox : Added the watchdog ioctl() stuff
19 * Alan Cox : Fixed the reboot problem (as noted by
20 * Matt Crocker).
21 * Alan Cox : Added wdt= boot option
22 * Alan Cox : Cleaned up copy/user stuff
23 * Tim Hockin : Added insmod parameters, comment
24 * cleanup, parameterized timeout
25 * Tigran Aivazian : Restructured wdt_init() to handle
26 * failures
27 * Joel Becker : Added WDIOC_GET/SETTIMEOUT
28 * Matt Domsch : Added nowayout module option
29 */
30
31#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
32
33#include <linux/interrupt.h>
34#include <linux/module.h>
35#include <linux/moduleparam.h>
36#include <linux/types.h>
37#include <linux/miscdevice.h>
38#include <linux/watchdog.h>
39#include <linux/fs.h>
40#include <linux/ioport.h>
41#include <linux/notifier.h>
42#include <linux/reboot.h>
43#include <linux/init.h>
44#include <linux/io.h>
45#include <linux/uaccess.h>
46
47#include "wd501p.h"
48
49static unsigned long wdt_is_open;
50static char expect_close;
51
52/*
53 * Module parameters
54 */
55
56#define WD_TIMO 60 /* Default heartbeat = 60 seconds */
57
58static int heartbeat = WD_TIMO;
59static int wd_heartbeat;
60module_param(heartbeat, int, 0);
61MODULE_PARM_DESC(heartbeat,
62 "Watchdog heartbeat in seconds. (0 < heartbeat < 65536, default="
63 __MODULE_STRING(WD_TIMO) ")");
64
65static bool nowayout = WATCHDOG_NOWAYOUT;
66module_param(nowayout, bool, 0);
67MODULE_PARM_DESC(nowayout,
68 "Watchdog cannot be stopped once started (default="
69 __MODULE_STRING(WATCHDOG_NOWAYOUT) ")");
70
71/* You must set these - there is no sane way to probe for this board. */
72static int io = 0x240;
73static int irq = 11;
74
75static DEFINE_SPINLOCK(wdt_lock);
76
77module_param_hw(io, int, ioport, 0);
78MODULE_PARM_DESC(io, "WDT io port (default=0x240)");
79module_param_hw(irq, int, irq, 0);
80MODULE_PARM_DESC(irq, "WDT irq (default=11)");
81
82/* Support for the Fan Tachometer on the WDT501-P */
83static int tachometer;
84module_param(tachometer, int, 0);
85MODULE_PARM_DESC(tachometer,
86 "WDT501-P Fan Tachometer support (0=disable, default=0)");
87
88static int type = 500;
89module_param(type, int, 0);
90MODULE_PARM_DESC(type,
91 "WDT501-P Card type (500 or 501, default=500)");
92
93/*
94 * Programming support
95 */
96
97static void wdt_ctr_mode(int ctr, int mode)
98{
99 ctr <<= 6;
100 ctr |= 0x30;
101 ctr |= (mode << 1);
102 outb_p(ctr, WDT_CR);
103}
104
105static void wdt_ctr_load(int ctr, int val)
106{
107 outb_p(val&0xFF, WDT_COUNT0+ctr);
108 outb_p(val>>8, WDT_COUNT0+ctr);
109}
110
111/**
112 * wdt_start:
113 *
114 * Start the watchdog driver.
115 */
116
117static int wdt_start(void)
118{
119 unsigned long flags;
120 spin_lock_irqsave(&wdt_lock, flags);
121 inb_p(WDT_DC); /* Disable watchdog */
122 wdt_ctr_mode(0, 3); /* Program CTR0 for Mode 3:
123 Square Wave Generator */
124 wdt_ctr_mode(1, 2); /* Program CTR1 for Mode 2:
125 Rate Generator */
126 wdt_ctr_mode(2, 0); /* Program CTR2 for Mode 0:
127 Pulse on Terminal Count */
128 wdt_ctr_load(0, 8948); /* Count at 100Hz */
129 wdt_ctr_load(1, wd_heartbeat); /* Heartbeat */
130 wdt_ctr_load(2, 65535); /* Length of reset pulse */
131 outb_p(0, WDT_DC); /* Enable watchdog */
132 spin_unlock_irqrestore(&wdt_lock, flags);
133 return 0;
134}
135
136/**
137 * wdt_stop:
138 *
139 * Stop the watchdog driver.
140 */
141
142static int wdt_stop(void)
143{
144 unsigned long flags;
145 spin_lock_irqsave(&wdt_lock, flags);
146 /* Turn the card off */
147 inb_p(WDT_DC); /* Disable watchdog */
148 wdt_ctr_load(2, 0); /* 0 length reset pulses now */
149 spin_unlock_irqrestore(&wdt_lock, flags);
150 return 0;
151}
152
153/**
154 * wdt_ping:
155 *
156 * Reload counter one with the watchdog heartbeat. We don't bother
157 * reloading the cascade counter.
158 */
159
160static void wdt_ping(void)
161{
162 unsigned long flags;
163 spin_lock_irqsave(&wdt_lock, flags);
164 /* Write a watchdog value */
165 inb_p(WDT_DC); /* Disable watchdog */
166 wdt_ctr_mode(1, 2); /* Re-Program CTR1 for Mode 2:
167 Rate Generator */
168 wdt_ctr_load(1, wd_heartbeat); /* Heartbeat */
169 outb_p(0, WDT_DC); /* Enable watchdog */
170 spin_unlock_irqrestore(&wdt_lock, flags);
171}
172
173/**
174 * wdt_set_heartbeat:
175 * @t: the new heartbeat value that needs to be set.
176 *
177 * Set a new heartbeat value for the watchdog device. If the heartbeat
178 * value is incorrect we keep the old value and return -EINVAL. If
179 * successful we return 0.
180 */
181
182static int wdt_set_heartbeat(int t)
183{
184 if (t < 1 || t > 65535)
185 return -EINVAL;
186
187 heartbeat = t;
188 wd_heartbeat = t * 100;
189 return 0;
190}
191
192/**
193 * wdt_get_status:
194 *
195 * Extract the status information from a WDT watchdog device. There are
196 * several board variants so we have to know which bits are valid. Some
197 * bits default to one and some to zero in order to be maximally painful.
198 *
199 * we then map the bits onto the status ioctl flags.
200 */
201
202static int wdt_get_status(void)
203{
204 unsigned char new_status;
205 int status = 0;
206 unsigned long flags;
207
208 spin_lock_irqsave(&wdt_lock, flags);
209 new_status = inb_p(WDT_SR);
210 spin_unlock_irqrestore(&wdt_lock, flags);
211
212 if (new_status & WDC_SR_ISOI0)
213 status |= WDIOF_EXTERN1;
214 if (new_status & WDC_SR_ISII1)
215 status |= WDIOF_EXTERN2;
216 if (type == 501) {
217 if (!(new_status & WDC_SR_TGOOD))
218 status |= WDIOF_OVERHEAT;
219 if (!(new_status & WDC_SR_PSUOVER))
220 status |= WDIOF_POWEROVER;
221 if (!(new_status & WDC_SR_PSUUNDR))
222 status |= WDIOF_POWERUNDER;
223 if (tachometer) {
224 if (!(new_status & WDC_SR_FANGOOD))
225 status |= WDIOF_FANFAULT;
226 }
227 }
228 return status;
229}
230
231/**
232 * wdt_get_temperature:
233 *
234 * Reports the temperature in degrees Fahrenheit. The API is in
235 * farenheit. It was designed by an imperial measurement luddite.
236 */
237
238static int wdt_get_temperature(void)
239{
240 unsigned short c;
241 unsigned long flags;
242
243 spin_lock_irqsave(&wdt_lock, flags);
244 c = inb_p(WDT_RT);
245 spin_unlock_irqrestore(&wdt_lock, flags);
246 return (c * 11 / 15) + 7;
247}
248
249static void wdt_decode_501(int status)
250{
251 if (!(status & WDC_SR_TGOOD))
252 pr_crit("Overheat alarm (%d)\n", inb_p(WDT_RT));
253 if (!(status & WDC_SR_PSUOVER))
254 pr_crit("PSU over voltage\n");
255 if (!(status & WDC_SR_PSUUNDR))
256 pr_crit("PSU under voltage\n");
257}
258
259/**
260 * wdt_interrupt:
261 * @irq: Interrupt number
262 * @dev_id: Unused as we don't allow multiple devices.
263 *
264 * Handle an interrupt from the board. These are raised when the status
265 * map changes in what the board considers an interesting way. That means
266 * a failure condition occurring.
267 */
268
269static irqreturn_t wdt_interrupt(int irq, void *dev_id)
270{
271 /*
272 * Read the status register see what is up and
273 * then printk it.
274 */
275 unsigned char status;
276
277 spin_lock(&wdt_lock);
278 status = inb_p(WDT_SR);
279
280 pr_crit("WDT status %d\n", status);
281
282 if (type == 501) {
283 wdt_decode_501(status);
284 if (tachometer) {
285 if (!(status & WDC_SR_FANGOOD))
286 pr_crit("Possible fan fault\n");
287 }
288 }
289 if (!(status & WDC_SR_WCCR)) {
290#ifdef SOFTWARE_REBOOT
291#ifdef ONLY_TESTING
292 pr_crit("Would Reboot\n");
293#else
294 pr_crit("Initiating system reboot\n");
295 emergency_restart();
296#endif
297#else
298 pr_crit("Reset in 5ms\n");
299#endif
300 }
301 spin_unlock(&wdt_lock);
302 return IRQ_HANDLED;
303}
304
305
306/**
307 * wdt_write:
308 * @file: file handle to the watchdog
309 * @buf: buffer to write (unused as data does not matter here
310 * @count: count of bytes
311 * @ppos: pointer to the position to write. No seeks allowed
312 *
313 * A write to a watchdog device is defined as a keepalive signal. Any
314 * write of data will do, as we we don't define content meaning.
315 */
316
317static ssize_t wdt_write(struct file *file, const char __user *buf,
318 size_t count, loff_t *ppos)
319{
320 if (count) {
321 if (!nowayout) {
322 size_t i;
323
324 /* In case it was set long ago */
325 expect_close = 0;
326
327 for (i = 0; i != count; i++) {
328 char c;
329 if (get_user(c, buf + i))
330 return -EFAULT;
331 if (c == 'V')
332 expect_close = 42;
333 }
334 }
335 wdt_ping();
336 }
337 return count;
338}
339
340/**
341 * wdt_ioctl:
342 * @file: file handle to the device
343 * @cmd: watchdog command
344 * @arg: argument pointer
345 *
346 * The watchdog API defines a common set of functions for all watchdogs
347 * according to their available features. We only actually usefully support
348 * querying capabilities and current status.
349 */
350
351static long wdt_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
352{
353 void __user *argp = (void __user *)arg;
354 int __user *p = argp;
355 int new_heartbeat;
356 int status;
357
358 struct watchdog_info ident = {
359 .options = WDIOF_SETTIMEOUT|
360 WDIOF_MAGICCLOSE|
361 WDIOF_KEEPALIVEPING,
362 .firmware_version = 1,
363 .identity = "WDT500/501",
364 };
365
366 /* Add options according to the card we have */
367 ident.options |= (WDIOF_EXTERN1|WDIOF_EXTERN2);
368 if (type == 501) {
369 ident.options |= (WDIOF_OVERHEAT|WDIOF_POWERUNDER|
370 WDIOF_POWEROVER);
371 if (tachometer)
372 ident.options |= WDIOF_FANFAULT;
373 }
374
375 switch (cmd) {
376 case WDIOC_GETSUPPORT:
377 return copy_to_user(argp, &ident, sizeof(ident)) ? -EFAULT : 0;
378 case WDIOC_GETSTATUS:
379 status = wdt_get_status();
380 return put_user(status, p);
381 case WDIOC_GETBOOTSTATUS:
382 return put_user(0, p);
383 case WDIOC_KEEPALIVE:
384 wdt_ping();
385 return 0;
386 case WDIOC_SETTIMEOUT:
387 if (get_user(new_heartbeat, p))
388 return -EFAULT;
389 if (wdt_set_heartbeat(new_heartbeat))
390 return -EINVAL;
391 wdt_ping();
392 fallthrough;
393 case WDIOC_GETTIMEOUT:
394 return put_user(heartbeat, p);
395 default:
396 return -ENOTTY;
397 }
398}
399
400/**
401 * wdt_open:
402 * @inode: inode of device
403 * @file: file handle to device
404 *
405 * The watchdog device has been opened. The watchdog device is single
406 * open and on opening we load the counters. Counter zero is a 100Hz
407 * cascade, into counter 1 which downcounts to reboot. When the counter
408 * triggers counter 2 downcounts the length of the reset pulse which
409 * set set to be as long as possible.
410 */
411
412static int wdt_open(struct inode *inode, struct file *file)
413{
414 if (test_and_set_bit(0, &wdt_is_open))
415 return -EBUSY;
416 /*
417 * Activate
418 */
419 wdt_start();
420 return stream_open(inode, file);
421}
422
423/**
424 * wdt_release:
425 * @inode: inode to board
426 * @file: file handle to board
427 *
428 * The watchdog has a configurable API. There is a religious dispute
429 * between people who want their watchdog to be able to shut down and
430 * those who want to be sure if the watchdog manager dies the machine
431 * reboots. In the former case we disable the counters, in the latter
432 * case you have to open it again very soon.
433 */
434
435static int wdt_release(struct inode *inode, struct file *file)
436{
437 if (expect_close == 42) {
438 wdt_stop();
439 clear_bit(0, &wdt_is_open);
440 } else {
441 pr_crit("WDT device closed unexpectedly. WDT will not stop!\n");
442 wdt_ping();
443 }
444 expect_close = 0;
445 return 0;
446}
447
448/**
449 * wdt_temp_read:
450 * @file: file handle to the watchdog board
451 * @buf: buffer to write 1 byte into
452 * @count: length of buffer
453 * @ptr: offset (no seek allowed)
454 *
455 * Temp_read reports the temperature in degrees Fahrenheit. The API is in
456 * farenheit. It was designed by an imperial measurement luddite.
457 */
458
459static ssize_t wdt_temp_read(struct file *file, char __user *buf,
460 size_t count, loff_t *ptr)
461{
462 int temperature = wdt_get_temperature();
463
464 if (copy_to_user(buf, &temperature, 1))
465 return -EFAULT;
466
467 return 1;
468}
469
470/**
471 * wdt_temp_open:
472 * @inode: inode of device
473 * @file: file handle to device
474 *
475 * The temperature device has been opened.
476 */
477
478static int wdt_temp_open(struct inode *inode, struct file *file)
479{
480 return stream_open(inode, file);
481}
482
483/**
484 * wdt_temp_release:
485 * @inode: inode to board
486 * @file: file handle to board
487 *
488 * The temperature device has been closed.
489 */
490
491static int wdt_temp_release(struct inode *inode, struct file *file)
492{
493 return 0;
494}
495
496/**
497 * wdt_notify_sys:
498 * @this: our notifier block
499 * @code: the event being reported
500 * @unused: unused
501 *
502 * Our notifier is called on system shutdowns. We want to turn the card
503 * off at reboot otherwise the machine will reboot again during memory
504 * test or worse yet during the following fsck. This would suck, in fact
505 * trust me - if it happens it does suck.
506 */
507
508static int wdt_notify_sys(struct notifier_block *this, unsigned long code,
509 void *unused)
510{
511 if (code == SYS_DOWN || code == SYS_HALT)
512 wdt_stop();
513 return NOTIFY_DONE;
514}
515
516/*
517 * Kernel Interfaces
518 */
519
520
521static const struct file_operations wdt_fops = {
522 .owner = THIS_MODULE,
523 .llseek = no_llseek,
524 .write = wdt_write,
525 .unlocked_ioctl = wdt_ioctl,
526 .compat_ioctl = compat_ptr_ioctl,
527 .open = wdt_open,
528 .release = wdt_release,
529};
530
531static struct miscdevice wdt_miscdev = {
532 .minor = WATCHDOG_MINOR,
533 .name = "watchdog",
534 .fops = &wdt_fops,
535};
536
537static const struct file_operations wdt_temp_fops = {
538 .owner = THIS_MODULE,
539 .llseek = no_llseek,
540 .read = wdt_temp_read,
541 .open = wdt_temp_open,
542 .release = wdt_temp_release,
543};
544
545static struct miscdevice temp_miscdev = {
546 .minor = TEMP_MINOR,
547 .name = "temperature",
548 .fops = &wdt_temp_fops,
549};
550
551/*
552 * The WDT card needs to learn about soft shutdowns in order to
553 * turn the timebomb registers off.
554 */
555
556static struct notifier_block wdt_notifier = {
557 .notifier_call = wdt_notify_sys,
558};
559
560/**
561 * wdt_exit:
562 *
563 * Unload the watchdog. You cannot do this with any file handles open.
564 * If your watchdog is set to continue ticking on close and you unload
565 * it, well it keeps ticking. We won't get the interrupt but the board
566 * will not touch PC memory so all is fine. You just have to load a new
567 * module in 60 seconds or reboot.
568 */
569
570static void __exit wdt_exit(void)
571{
572 misc_deregister(&wdt_miscdev);
573 if (type == 501)
574 misc_deregister(&temp_miscdev);
575 unregister_reboot_notifier(&wdt_notifier);
576 free_irq(irq, NULL);
577 release_region(io, 8);
578}
579
580/**
581 * wdt_init:
582 *
583 * Set up the WDT watchdog board. All we have to do is grab the
584 * resources we require and bitch if anyone beat us to them.
585 * The open() function will actually kick the board off.
586 */
587
588static int __init wdt_init(void)
589{
590 int ret;
591
592 if (type != 500 && type != 501) {
593 pr_err("unknown card type '%d'\n", type);
594 return -ENODEV;
595 }
596
597 /* Check that the heartbeat value is within it's range;
598 if not reset to the default */
599 if (wdt_set_heartbeat(heartbeat)) {
600 wdt_set_heartbeat(WD_TIMO);
601 pr_info("heartbeat value must be 0 < heartbeat < 65536, using %d\n",
602 WD_TIMO);
603 }
604
605 if (!request_region(io, 8, "wdt501p")) {
606 pr_err("I/O address 0x%04x already in use\n", io);
607 ret = -EBUSY;
608 goto out;
609 }
610
611 ret = request_irq(irq, wdt_interrupt, 0, "wdt501p", NULL);
612 if (ret) {
613 pr_err("IRQ %d is not free\n", irq);
614 goto outreg;
615 }
616
617 ret = register_reboot_notifier(&wdt_notifier);
618 if (ret) {
619 pr_err("cannot register reboot notifier (err=%d)\n", ret);
620 goto outirq;
621 }
622
623 if (type == 501) {
624 ret = misc_register(&temp_miscdev);
625 if (ret) {
626 pr_err("cannot register miscdev on minor=%d (err=%d)\n",
627 TEMP_MINOR, ret);
628 goto outrbt;
629 }
630 }
631
632 ret = misc_register(&wdt_miscdev);
633 if (ret) {
634 pr_err("cannot register miscdev on minor=%d (err=%d)\n",
635 WATCHDOG_MINOR, ret);
636 goto outmisc;
637 }
638
639 pr_info("WDT500/501-P driver 0.10 at 0x%04x (Interrupt %d). heartbeat=%d sec (nowayout=%d)\n",
640 io, irq, heartbeat, nowayout);
641 if (type == 501)
642 pr_info("Fan Tachometer is %s\n",
643 tachometer ? "Enabled" : "Disabled");
644 return 0;
645
646outmisc:
647 if (type == 501)
648 misc_deregister(&temp_miscdev);
649outrbt:
650 unregister_reboot_notifier(&wdt_notifier);
651outirq:
652 free_irq(irq, NULL);
653outreg:
654 release_region(io, 8);
655out:
656 return ret;
657}
658
659module_init(wdt_init);
660module_exit(wdt_exit);
661
662MODULE_AUTHOR("Alan Cox");
663MODULE_DESCRIPTION("Driver for ISA ICS watchdog cards (WDT500/501)");
664MODULE_LICENSE("GPL");
1/*
2 * Industrial Computer Source WDT501 driver
3 *
4 * (c) Copyright 1996-1997 Alan Cox <alan@lxorguk.ukuu.org.uk>,
5 * All Rights Reserved.
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 * Neither Alan Cox nor CymruNet Ltd. admit liability nor provide
13 * warranty for any of this software. This material is provided
14 * "AS-IS" and at no charge.
15 *
16 * (c) Copyright 1995 Alan Cox <alan@lxorguk.ukuu.org.uk>
17 *
18 * Release 0.10.
19 *
20 * Fixes
21 * Dave Gregorich : Modularisation and minor bugs
22 * Alan Cox : Added the watchdog ioctl() stuff
23 * Alan Cox : Fixed the reboot problem (as noted by
24 * Matt Crocker).
25 * Alan Cox : Added wdt= boot option
26 * Alan Cox : Cleaned up copy/user stuff
27 * Tim Hockin : Added insmod parameters, comment
28 * cleanup, parameterized timeout
29 * Tigran Aivazian : Restructured wdt_init() to handle
30 * failures
31 * Joel Becker : Added WDIOC_GET/SETTIMEOUT
32 * Matt Domsch : Added nowayout module option
33 */
34
35#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
36
37#include <linux/interrupt.h>
38#include <linux/module.h>
39#include <linux/moduleparam.h>
40#include <linux/types.h>
41#include <linux/miscdevice.h>
42#include <linux/watchdog.h>
43#include <linux/fs.h>
44#include <linux/ioport.h>
45#include <linux/notifier.h>
46#include <linux/reboot.h>
47#include <linux/init.h>
48#include <linux/io.h>
49#include <linux/uaccess.h>
50
51#include "wd501p.h"
52
53static unsigned long wdt_is_open;
54static char expect_close;
55
56/*
57 * Module parameters
58 */
59
60#define WD_TIMO 60 /* Default heartbeat = 60 seconds */
61
62static int heartbeat = WD_TIMO;
63static int wd_heartbeat;
64module_param(heartbeat, int, 0);
65MODULE_PARM_DESC(heartbeat,
66 "Watchdog heartbeat in seconds. (0 < heartbeat < 65536, default="
67 __MODULE_STRING(WD_TIMO) ")");
68
69static bool nowayout = WATCHDOG_NOWAYOUT;
70module_param(nowayout, bool, 0);
71MODULE_PARM_DESC(nowayout,
72 "Watchdog cannot be stopped once started (default="
73 __MODULE_STRING(WATCHDOG_NOWAYOUT) ")");
74
75/* You must set these - there is no sane way to probe for this board. */
76static int io = 0x240;
77static int irq = 11;
78
79static DEFINE_SPINLOCK(wdt_lock);
80
81module_param(io, int, 0);
82MODULE_PARM_DESC(io, "WDT io port (default=0x240)");
83module_param(irq, int, 0);
84MODULE_PARM_DESC(irq, "WDT irq (default=11)");
85
86/* Support for the Fan Tachometer on the WDT501-P */
87static int tachometer;
88module_param(tachometer, int, 0);
89MODULE_PARM_DESC(tachometer,
90 "WDT501-P Fan Tachometer support (0=disable, default=0)");
91
92static int type = 500;
93module_param(type, int, 0);
94MODULE_PARM_DESC(type,
95 "WDT501-P Card type (500 or 501, default=500)");
96
97/*
98 * Programming support
99 */
100
101static void wdt_ctr_mode(int ctr, int mode)
102{
103 ctr <<= 6;
104 ctr |= 0x30;
105 ctr |= (mode << 1);
106 outb_p(ctr, WDT_CR);
107}
108
109static void wdt_ctr_load(int ctr, int val)
110{
111 outb_p(val&0xFF, WDT_COUNT0+ctr);
112 outb_p(val>>8, WDT_COUNT0+ctr);
113}
114
115/**
116 * wdt_start:
117 *
118 * Start the watchdog driver.
119 */
120
121static int wdt_start(void)
122{
123 unsigned long flags;
124 spin_lock_irqsave(&wdt_lock, flags);
125 inb_p(WDT_DC); /* Disable watchdog */
126 wdt_ctr_mode(0, 3); /* Program CTR0 for Mode 3:
127 Square Wave Generator */
128 wdt_ctr_mode(1, 2); /* Program CTR1 for Mode 2:
129 Rate Generator */
130 wdt_ctr_mode(2, 0); /* Program CTR2 for Mode 0:
131 Pulse on Terminal Count */
132 wdt_ctr_load(0, 8948); /* Count at 100Hz */
133 wdt_ctr_load(1, wd_heartbeat); /* Heartbeat */
134 wdt_ctr_load(2, 65535); /* Length of reset pulse */
135 outb_p(0, WDT_DC); /* Enable watchdog */
136 spin_unlock_irqrestore(&wdt_lock, flags);
137 return 0;
138}
139
140/**
141 * wdt_stop:
142 *
143 * Stop the watchdog driver.
144 */
145
146static int wdt_stop(void)
147{
148 unsigned long flags;
149 spin_lock_irqsave(&wdt_lock, flags);
150 /* Turn the card off */
151 inb_p(WDT_DC); /* Disable watchdog */
152 wdt_ctr_load(2, 0); /* 0 length reset pulses now */
153 spin_unlock_irqrestore(&wdt_lock, flags);
154 return 0;
155}
156
157/**
158 * wdt_ping:
159 *
160 * Reload counter one with the watchdog heartbeat. We don't bother
161 * reloading the cascade counter.
162 */
163
164static void wdt_ping(void)
165{
166 unsigned long flags;
167 spin_lock_irqsave(&wdt_lock, flags);
168 /* Write a watchdog value */
169 inb_p(WDT_DC); /* Disable watchdog */
170 wdt_ctr_mode(1, 2); /* Re-Program CTR1 for Mode 2:
171 Rate Generator */
172 wdt_ctr_load(1, wd_heartbeat); /* Heartbeat */
173 outb_p(0, WDT_DC); /* Enable watchdog */
174 spin_unlock_irqrestore(&wdt_lock, flags);
175}
176
177/**
178 * wdt_set_heartbeat:
179 * @t: the new heartbeat value that needs to be set.
180 *
181 * Set a new heartbeat value for the watchdog device. If the heartbeat
182 * value is incorrect we keep the old value and return -EINVAL. If
183 * successful we return 0.
184 */
185
186static int wdt_set_heartbeat(int t)
187{
188 if (t < 1 || t > 65535)
189 return -EINVAL;
190
191 heartbeat = t;
192 wd_heartbeat = t * 100;
193 return 0;
194}
195
196/**
197 * wdt_get_status:
198 *
199 * Extract the status information from a WDT watchdog device. There are
200 * several board variants so we have to know which bits are valid. Some
201 * bits default to one and some to zero in order to be maximally painful.
202 *
203 * we then map the bits onto the status ioctl flags.
204 */
205
206static int wdt_get_status(void)
207{
208 unsigned char new_status;
209 int status = 0;
210 unsigned long flags;
211
212 spin_lock_irqsave(&wdt_lock, flags);
213 new_status = inb_p(WDT_SR);
214 spin_unlock_irqrestore(&wdt_lock, flags);
215
216 if (new_status & WDC_SR_ISOI0)
217 status |= WDIOF_EXTERN1;
218 if (new_status & WDC_SR_ISII1)
219 status |= WDIOF_EXTERN2;
220 if (type == 501) {
221 if (!(new_status & WDC_SR_TGOOD))
222 status |= WDIOF_OVERHEAT;
223 if (!(new_status & WDC_SR_PSUOVER))
224 status |= WDIOF_POWEROVER;
225 if (!(new_status & WDC_SR_PSUUNDR))
226 status |= WDIOF_POWERUNDER;
227 if (tachometer) {
228 if (!(new_status & WDC_SR_FANGOOD))
229 status |= WDIOF_FANFAULT;
230 }
231 }
232 return status;
233}
234
235/**
236 * wdt_get_temperature:
237 *
238 * Reports the temperature in degrees Fahrenheit. The API is in
239 * farenheit. It was designed by an imperial measurement luddite.
240 */
241
242static int wdt_get_temperature(void)
243{
244 unsigned short c;
245 unsigned long flags;
246
247 spin_lock_irqsave(&wdt_lock, flags);
248 c = inb_p(WDT_RT);
249 spin_unlock_irqrestore(&wdt_lock, flags);
250 return (c * 11 / 15) + 7;
251}
252
253static void wdt_decode_501(int status)
254{
255 if (!(status & WDC_SR_TGOOD))
256 pr_crit("Overheat alarm (%d)\n", inb_p(WDT_RT));
257 if (!(status & WDC_SR_PSUOVER))
258 pr_crit("PSU over voltage\n");
259 if (!(status & WDC_SR_PSUUNDR))
260 pr_crit("PSU under voltage\n");
261}
262
263/**
264 * wdt_interrupt:
265 * @irq: Interrupt number
266 * @dev_id: Unused as we don't allow multiple devices.
267 *
268 * Handle an interrupt from the board. These are raised when the status
269 * map changes in what the board considers an interesting way. That means
270 * a failure condition occurring.
271 */
272
273static irqreturn_t wdt_interrupt(int irq, void *dev_id)
274{
275 /*
276 * Read the status register see what is up and
277 * then printk it.
278 */
279 unsigned char status;
280
281 spin_lock(&wdt_lock);
282 status = inb_p(WDT_SR);
283
284 pr_crit("WDT status %d\n", status);
285
286 if (type == 501) {
287 wdt_decode_501(status);
288 if (tachometer) {
289 if (!(status & WDC_SR_FANGOOD))
290 pr_crit("Possible fan fault\n");
291 }
292 }
293 if (!(status & WDC_SR_WCCR)) {
294#ifdef SOFTWARE_REBOOT
295#ifdef ONLY_TESTING
296 pr_crit("Would Reboot\n");
297#else
298 pr_crit("Initiating system reboot\n");
299 emergency_restart();
300#endif
301#else
302 pr_crit("Reset in 5ms\n");
303#endif
304 }
305 spin_unlock(&wdt_lock);
306 return IRQ_HANDLED;
307}
308
309
310/**
311 * wdt_write:
312 * @file: file handle to the watchdog
313 * @buf: buffer to write (unused as data does not matter here
314 * @count: count of bytes
315 * @ppos: pointer to the position to write. No seeks allowed
316 *
317 * A write to a watchdog device is defined as a keepalive signal. Any
318 * write of data will do, as we we don't define content meaning.
319 */
320
321static ssize_t wdt_write(struct file *file, const char __user *buf,
322 size_t count, loff_t *ppos)
323{
324 if (count) {
325 if (!nowayout) {
326 size_t i;
327
328 /* In case it was set long ago */
329 expect_close = 0;
330
331 for (i = 0; i != count; i++) {
332 char c;
333 if (get_user(c, buf + i))
334 return -EFAULT;
335 if (c == 'V')
336 expect_close = 42;
337 }
338 }
339 wdt_ping();
340 }
341 return count;
342}
343
344/**
345 * wdt_ioctl:
346 * @file: file handle to the device
347 * @cmd: watchdog command
348 * @arg: argument pointer
349 *
350 * The watchdog API defines a common set of functions for all watchdogs
351 * according to their available features. We only actually usefully support
352 * querying capabilities and current status.
353 */
354
355static long wdt_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
356{
357 void __user *argp = (void __user *)arg;
358 int __user *p = argp;
359 int new_heartbeat;
360 int status;
361
362 struct watchdog_info ident = {
363 .options = WDIOF_SETTIMEOUT|
364 WDIOF_MAGICCLOSE|
365 WDIOF_KEEPALIVEPING,
366 .firmware_version = 1,
367 .identity = "WDT500/501",
368 };
369
370 /* Add options according to the card we have */
371 ident.options |= (WDIOF_EXTERN1|WDIOF_EXTERN2);
372 if (type == 501) {
373 ident.options |= (WDIOF_OVERHEAT|WDIOF_POWERUNDER|
374 WDIOF_POWEROVER);
375 if (tachometer)
376 ident.options |= WDIOF_FANFAULT;
377 }
378
379 switch (cmd) {
380 case WDIOC_GETSUPPORT:
381 return copy_to_user(argp, &ident, sizeof(ident)) ? -EFAULT : 0;
382 case WDIOC_GETSTATUS:
383 status = wdt_get_status();
384 return put_user(status, p);
385 case WDIOC_GETBOOTSTATUS:
386 return put_user(0, p);
387 case WDIOC_KEEPALIVE:
388 wdt_ping();
389 return 0;
390 case WDIOC_SETTIMEOUT:
391 if (get_user(new_heartbeat, p))
392 return -EFAULT;
393 if (wdt_set_heartbeat(new_heartbeat))
394 return -EINVAL;
395 wdt_ping();
396 /* Fall */
397 case WDIOC_GETTIMEOUT:
398 return put_user(heartbeat, p);
399 default:
400 return -ENOTTY;
401 }
402}
403
404/**
405 * wdt_open:
406 * @inode: inode of device
407 * @file: file handle to device
408 *
409 * The watchdog device has been opened. The watchdog device is single
410 * open and on opening we load the counters. Counter zero is a 100Hz
411 * cascade, into counter 1 which downcounts to reboot. When the counter
412 * triggers counter 2 downcounts the length of the reset pulse which
413 * set set to be as long as possible.
414 */
415
416static int wdt_open(struct inode *inode, struct file *file)
417{
418 if (test_and_set_bit(0, &wdt_is_open))
419 return -EBUSY;
420 /*
421 * Activate
422 */
423 wdt_start();
424 return nonseekable_open(inode, file);
425}
426
427/**
428 * wdt_release:
429 * @inode: inode to board
430 * @file: file handle to board
431 *
432 * The watchdog has a configurable API. There is a religious dispute
433 * between people who want their watchdog to be able to shut down and
434 * those who want to be sure if the watchdog manager dies the machine
435 * reboots. In the former case we disable the counters, in the latter
436 * case you have to open it again very soon.
437 */
438
439static int wdt_release(struct inode *inode, struct file *file)
440{
441 if (expect_close == 42) {
442 wdt_stop();
443 clear_bit(0, &wdt_is_open);
444 } else {
445 pr_crit("WDT device closed unexpectedly. WDT will not stop!\n");
446 wdt_ping();
447 }
448 expect_close = 0;
449 return 0;
450}
451
452/**
453 * wdt_temp_read:
454 * @file: file handle to the watchdog board
455 * @buf: buffer to write 1 byte into
456 * @count: length of buffer
457 * @ptr: offset (no seek allowed)
458 *
459 * Temp_read reports the temperature in degrees Fahrenheit. The API is in
460 * farenheit. It was designed by an imperial measurement luddite.
461 */
462
463static ssize_t wdt_temp_read(struct file *file, char __user *buf,
464 size_t count, loff_t *ptr)
465{
466 int temperature = wdt_get_temperature();
467
468 if (copy_to_user(buf, &temperature, 1))
469 return -EFAULT;
470
471 return 1;
472}
473
474/**
475 * wdt_temp_open:
476 * @inode: inode of device
477 * @file: file handle to device
478 *
479 * The temperature device has been opened.
480 */
481
482static int wdt_temp_open(struct inode *inode, struct file *file)
483{
484 return nonseekable_open(inode, file);
485}
486
487/**
488 * wdt_temp_release:
489 * @inode: inode to board
490 * @file: file handle to board
491 *
492 * The temperature device has been closed.
493 */
494
495static int wdt_temp_release(struct inode *inode, struct file *file)
496{
497 return 0;
498}
499
500/**
501 * notify_sys:
502 * @this: our notifier block
503 * @code: the event being reported
504 * @unused: unused
505 *
506 * Our notifier is called on system shutdowns. We want to turn the card
507 * off at reboot otherwise the machine will reboot again during memory
508 * test or worse yet during the following fsck. This would suck, in fact
509 * trust me - if it happens it does suck.
510 */
511
512static int wdt_notify_sys(struct notifier_block *this, unsigned long code,
513 void *unused)
514{
515 if (code == SYS_DOWN || code == SYS_HALT)
516 wdt_stop();
517 return NOTIFY_DONE;
518}
519
520/*
521 * Kernel Interfaces
522 */
523
524
525static const struct file_operations wdt_fops = {
526 .owner = THIS_MODULE,
527 .llseek = no_llseek,
528 .write = wdt_write,
529 .unlocked_ioctl = wdt_ioctl,
530 .open = wdt_open,
531 .release = wdt_release,
532};
533
534static struct miscdevice wdt_miscdev = {
535 .minor = WATCHDOG_MINOR,
536 .name = "watchdog",
537 .fops = &wdt_fops,
538};
539
540static const struct file_operations wdt_temp_fops = {
541 .owner = THIS_MODULE,
542 .llseek = no_llseek,
543 .read = wdt_temp_read,
544 .open = wdt_temp_open,
545 .release = wdt_temp_release,
546};
547
548static struct miscdevice temp_miscdev = {
549 .minor = TEMP_MINOR,
550 .name = "temperature",
551 .fops = &wdt_temp_fops,
552};
553
554/*
555 * The WDT card needs to learn about soft shutdowns in order to
556 * turn the timebomb registers off.
557 */
558
559static struct notifier_block wdt_notifier = {
560 .notifier_call = wdt_notify_sys,
561};
562
563/**
564 * cleanup_module:
565 *
566 * Unload the watchdog. You cannot do this with any file handles open.
567 * If your watchdog is set to continue ticking on close and you unload
568 * it, well it keeps ticking. We won't get the interrupt but the board
569 * will not touch PC memory so all is fine. You just have to load a new
570 * module in 60 seconds or reboot.
571 */
572
573static void __exit wdt_exit(void)
574{
575 misc_deregister(&wdt_miscdev);
576 if (type == 501)
577 misc_deregister(&temp_miscdev);
578 unregister_reboot_notifier(&wdt_notifier);
579 free_irq(irq, NULL);
580 release_region(io, 8);
581}
582
583/**
584 * wdt_init:
585 *
586 * Set up the WDT watchdog board. All we have to do is grab the
587 * resources we require and bitch if anyone beat us to them.
588 * The open() function will actually kick the board off.
589 */
590
591static int __init wdt_init(void)
592{
593 int ret;
594
595 if (type != 500 && type != 501) {
596 pr_err("unknown card type '%d'\n", type);
597 return -ENODEV;
598 }
599
600 /* Check that the heartbeat value is within it's range;
601 if not reset to the default */
602 if (wdt_set_heartbeat(heartbeat)) {
603 wdt_set_heartbeat(WD_TIMO);
604 pr_info("heartbeat value must be 0 < heartbeat < 65536, using %d\n",
605 WD_TIMO);
606 }
607
608 if (!request_region(io, 8, "wdt501p")) {
609 pr_err("I/O address 0x%04x already in use\n", io);
610 ret = -EBUSY;
611 goto out;
612 }
613
614 ret = request_irq(irq, wdt_interrupt, 0, "wdt501p", NULL);
615 if (ret) {
616 pr_err("IRQ %d is not free\n", irq);
617 goto outreg;
618 }
619
620 ret = register_reboot_notifier(&wdt_notifier);
621 if (ret) {
622 pr_err("cannot register reboot notifier (err=%d)\n", ret);
623 goto outirq;
624 }
625
626 if (type == 501) {
627 ret = misc_register(&temp_miscdev);
628 if (ret) {
629 pr_err("cannot register miscdev on minor=%d (err=%d)\n",
630 TEMP_MINOR, ret);
631 goto outrbt;
632 }
633 }
634
635 ret = misc_register(&wdt_miscdev);
636 if (ret) {
637 pr_err("cannot register miscdev on minor=%d (err=%d)\n",
638 WATCHDOG_MINOR, ret);
639 goto outmisc;
640 }
641
642 pr_info("WDT500/501-P driver 0.10 at 0x%04x (Interrupt %d). heartbeat=%d sec (nowayout=%d)\n",
643 io, irq, heartbeat, nowayout);
644 if (type == 501)
645 pr_info("Fan Tachometer is %s\n",
646 tachometer ? "Enabled" : "Disabled");
647 return 0;
648
649outmisc:
650 if (type == 501)
651 misc_deregister(&temp_miscdev);
652outrbt:
653 unregister_reboot_notifier(&wdt_notifier);
654outirq:
655 free_irq(irq, NULL);
656outreg:
657 release_region(io, 8);
658out:
659 return ret;
660}
661
662module_init(wdt_init);
663module_exit(wdt_exit);
664
665MODULE_AUTHOR("Alan Cox");
666MODULE_DESCRIPTION("Driver for ISA ICS watchdog cards (WDT500/501)");
667MODULE_LICENSE("GPL");