1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40#include <linux/interrupt.h>
41#include <linux/module.h>
42#include <linux/moduleparam.h>
43#include <linux/types.h>
44#include <linux/miscdevice.h>
45#include <linux/watchdog.h>
46#include <linux/ioport.h>
47#include <linux/delay.h>
48#include <linux/notifier.h>
49#include <linux/reboot.h>
50#include <linux/init.h>
51#include <linux/fs.h>
52#include <linux/pci.h>
53#include <linux/io.h>
54#include <linux/uaccess.h>
55
56#include <asm/system.h>
57
58#define WDT_IS_PCI
59#include "wd501p.h"
60
61#define PFX "wdt_pci: "
62
63
64
65
66
67
68
69#ifndef PCI_VENDOR_ID_ACCESSIO
70#define PCI_VENDOR_ID_ACCESSIO 0x494f
71#endif
72#ifndef PCI_DEVICE_ID_WDG_CSM
73#define PCI_DEVICE_ID_WDG_CSM 0x22c0
74#endif
75
76
77static int dev_count;
78
79static unsigned long open_lock;
80static DEFINE_SPINLOCK(wdtpci_lock);
81static char expect_close;
82
83static int io;
84static int irq;
85
86
87#define WD_TIMO 60
88
89static int heartbeat = WD_TIMO;
90static int wd_heartbeat;
91module_param(heartbeat, int, 0);
92MODULE_PARM_DESC(heartbeat,
93 "Watchdog heartbeat in seconds. (0<heartbeat<65536, default="
94 __MODULE_STRING(WD_TIMO) ")");
95
96static int nowayout = WATCHDOG_NOWAYOUT;
97module_param(nowayout, int, 0);
98MODULE_PARM_DESC(nowayout,
99 "Watchdog cannot be stopped once started (default="
100 __MODULE_STRING(WATCHDOG_NOWAYOUT) ")");
101
102#ifdef CONFIG_WDT_501_PCI
103
104static int tachometer;
105
106module_param(tachometer, int, 0);
107MODULE_PARM_DESC(tachometer,
108 "PCI-WDT501 Fan Tachometer support (0=disable, default=0)");
109#endif
110
111
112
113
114
115static void wdtpci_ctr_mode(int ctr, int mode)
116{
117 ctr <<= 6;
118 ctr |= 0x30;
119 ctr |= (mode << 1);
120 outb(ctr, WDT_CR);
121 udelay(8);
122}
123
124static void wdtpci_ctr_load(int ctr, int val)
125{
126 outb(val & 0xFF, WDT_COUNT0 + ctr);
127 udelay(8);
128 outb(val >> 8, WDT_COUNT0 + ctr);
129 udelay(8);
130}
131
132
133
134
135
136
137
138static int wdtpci_start(void)
139{
140 unsigned long flags;
141
142 spin_lock_irqsave(&wdtpci_lock, flags);
143
144
145
146
147
148 inb(WDT_DC);
149 udelay(8);
150 wdtpci_ctr_mode(2, 0);
151
152 outb(0, WDT_DC);
153 udelay(8);
154 inb(WDT_DC);
155 udelay(8);
156 outb(0, WDT_CLOCK);
157 udelay(8);
158 inb(WDT_BUZZER);
159 udelay(8);
160 inb(WDT_OPTONOTRST);
161 udelay(8);
162 inb(WDT_OPTORST);
163 udelay(8);
164 inb(WDT_PROGOUT);
165 udelay(8);
166 wdtpci_ctr_mode(0, 3);
167
168 wdtpci_ctr_mode(1, 2);
169
170 wdtpci_ctr_mode(2, 1);
171
172 wdtpci_ctr_load(0, 20833);
173 wdtpci_ctr_load(1, wd_heartbeat);
174
175 outb(0, WDT_DC);
176 udelay(8);
177
178 spin_unlock_irqrestore(&wdtpci_lock, flags);
179 return 0;
180}
181
182
183
184
185
186
187
188static int wdtpci_stop(void)
189{
190 unsigned long flags;
191
192
193 spin_lock_irqsave(&wdtpci_lock, flags);
194 inb(WDT_DC);
195 udelay(8);
196 wdtpci_ctr_load(2, 0);
197 spin_unlock_irqrestore(&wdtpci_lock, flags);
198 return 0;
199}
200
201
202
203
204
205
206
207
208static int wdtpci_ping(void)
209{
210 unsigned long flags;
211
212 spin_lock_irqsave(&wdtpci_lock, flags);
213
214 inb(WDT_DC);
215 udelay(8);
216 wdtpci_ctr_mode(1, 2);
217
218 wdtpci_ctr_load(1, wd_heartbeat);
219 outb(0, WDT_DC);
220 udelay(8);
221 spin_unlock_irqrestore(&wdtpci_lock, flags);
222 return 0;
223}
224
225
226
227
228
229
230
231
232
233static int wdtpci_set_heartbeat(int t)
234{
235
236 if (t < 1 || t > 65535)
237 return -EINVAL;
238
239 heartbeat = t;
240 wd_heartbeat = t * 100;
241 return 0;
242}
243
244
245
246
247
248
249
250
251
252
253
254
255static int wdtpci_get_status(int *status)
256{
257 unsigned char new_status;
258 unsigned long flags;
259
260 spin_lock_irqsave(&wdtpci_lock, flags);
261 new_status = inb(WDT_SR);
262 spin_unlock_irqrestore(&wdtpci_lock, flags);
263
264 *status = 0;
265 if (new_status & WDC_SR_ISOI0)
266 *status |= WDIOF_EXTERN1;
267 if (new_status & WDC_SR_ISII1)
268 *status |= WDIOF_EXTERN2;
269#ifdef CONFIG_WDT_501_PCI
270 if (!(new_status & WDC_SR_TGOOD))
271 *status |= WDIOF_OVERHEAT;
272 if (!(new_status & WDC_SR_PSUOVER))
273 *status |= WDIOF_POWEROVER;
274 if (!(new_status & WDC_SR_PSUUNDR))
275 *status |= WDIOF_POWERUNDER;
276 if (tachometer) {
277 if (!(new_status & WDC_SR_FANGOOD))
278 *status |= WDIOF_FANFAULT;
279 }
280#endif
281 return 0;
282}
283
284#ifdef CONFIG_WDT_501_PCI
285
286
287
288
289
290
291
292static int wdtpci_get_temperature(int *temperature)
293{
294 unsigned short c;
295 unsigned long flags;
296 spin_lock_irqsave(&wdtpci_lock, flags);
297 c = inb(WDT_RT);
298 udelay(8);
299 spin_unlock_irqrestore(&wdtpci_lock, flags);
300 *temperature = (c * 11 / 15) + 7;
301 return 0;
302}
303#endif
304
305
306
307
308
309
310
311
312
313
314
315static irqreturn_t wdtpci_interrupt(int irq, void *dev_id)
316{
317
318
319
320
321 unsigned char status;
322
323 spin_lock(&wdtpci_lock);
324
325 status = inb(WDT_SR);
326 udelay(8);
327
328 printk(KERN_CRIT PFX "status %d\n", status);
329
330#ifdef CONFIG_WDT_501_PCI
331 if (!(status & WDC_SR_TGOOD)) {
332 u8 alarm = inb(WDT_RT);
333 printk(KERN_CRIT PFX "Overheat alarm.(%d)\n", alarm);
334 udelay(8);
335 }
336 if (!(status & WDC_SR_PSUOVER))
337 printk(KERN_CRIT PFX "PSU over voltage.\n");
338 if (!(status & WDC_SR_PSUUNDR))
339 printk(KERN_CRIT PFX "PSU under voltage.\n");
340 if (tachometer) {
341 if (!(status & WDC_SR_FANGOOD))
342 printk(KERN_CRIT PFX "Possible fan fault.\n");
343 }
344#endif
345 if (!(status&WDC_SR_WCCR)) {
346#ifdef SOFTWARE_REBOOT
347#ifdef ONLY_TESTING
348 printk(KERN_CRIT PFX "Would Reboot.\n");
349#else
350 printk(KERN_CRIT PFX "Initiating system reboot.\n");
351 emergency_restart(NULL);
352#endif
353#else
354 printk(KERN_CRIT PFX "Reset in 5ms.\n");
355#endif
356 }
357 spin_unlock(&wdtpci_lock);
358 return IRQ_HANDLED;
359}
360
361
362
363
364
365
366
367
368
369
370
371
372
373static ssize_t wdtpci_write(struct file *file, const char __user *buf,
374 size_t count, loff_t *ppos)
375{
376 if (count) {
377 if (!nowayout) {
378 size_t i;
379
380 expect_close = 0;
381
382 for (i = 0; i != count; i++) {
383 char c;
384 if (get_user(c, buf + i))
385 return -EFAULT;
386 if (c == 'V')
387 expect_close = 42;
388 }
389 }
390 wdtpci_ping();
391 }
392 return count;
393}
394
395
396
397
398
399
400
401
402
403
404
405
406static long wdtpci_ioctl(struct file *file, unsigned int cmd,
407 unsigned long arg)
408{
409 int new_heartbeat;
410 int status;
411 void __user *argp = (void __user *)arg;
412 int __user *p = argp;
413
414 static struct watchdog_info ident = {
415 .options = WDIOF_SETTIMEOUT|
416 WDIOF_MAGICCLOSE|
417 WDIOF_KEEPALIVEPING,
418 .firmware_version = 1,
419 .identity = "PCI-WDT500/501",
420 };
421
422
423 ident.options |= (WDIOF_EXTERN1|WDIOF_EXTERN2);
424#ifdef CONFIG_WDT_501_PCI
425 ident.options |= (WDIOF_OVERHEAT|WDIOF_POWERUNDER|WDIOF_POWEROVER);
426 if (tachometer)
427 ident.options |= WDIOF_FANFAULT;
428#endif
429
430 switch (cmd) {
431 case WDIOC_GETSUPPORT:
432 return copy_to_user(argp, &ident, sizeof(ident)) ? -EFAULT : 0;
433 case WDIOC_GETSTATUS:
434 wdtpci_get_status(&status);
435 return put_user(status, p);
436 case WDIOC_GETBOOTSTATUS:
437 return put_user(0, p);
438 case WDIOC_KEEPALIVE:
439 wdtpci_ping();
440 return 0;
441 case WDIOC_SETTIMEOUT:
442 if (get_user(new_heartbeat, p))
443 return -EFAULT;
444 if (wdtpci_set_heartbeat(new_heartbeat))
445 return -EINVAL;
446 wdtpci_ping();
447
448 case WDIOC_GETTIMEOUT:
449 return put_user(heartbeat, p);
450 default:
451 return -ENOTTY;
452 }
453}
454
455
456
457
458
459
460
461
462
463
464
465
466
467static int wdtpci_open(struct inode *inode, struct file *file)
468{
469 if (test_and_set_bit(0, &open_lock))
470 return -EBUSY;
471
472 if (nowayout)
473 __module_get(THIS_MODULE);
474
475
476
477 wdtpci_start();
478 return nonseekable_open(inode, file);
479}
480
481
482
483
484
485
486
487
488
489
490
491
492
493static int wdtpci_release(struct inode *inode, struct file *file)
494{
495 if (expect_close == 42) {
496 wdtpci_stop();
497 } else {
498 printk(KERN_CRIT PFX "Unexpected close, not stopping timer!");
499 wdtpci_ping();
500 }
501 expect_close = 0;
502 clear_bit(0, &open_lock);
503 return 0;
504}
505
506#ifdef CONFIG_WDT_501_PCI
507
508
509
510
511
512
513
514
515
516
517
518static ssize_t wdtpci_temp_read(struct file *file, char __user *buf,
519 size_t count, loff_t *ptr)
520{
521 int temperature;
522
523 if (wdtpci_get_temperature(&temperature))
524 return -EFAULT;
525
526 if (copy_to_user(buf, &temperature, 1))
527 return -EFAULT;
528
529 return 1;
530}
531
532
533
534
535
536
537
538
539
540static int wdtpci_temp_open(struct inode *inode, struct file *file)
541{
542 return nonseekable_open(inode, file);
543}
544
545
546
547
548
549
550
551
552
553static int wdtpci_temp_release(struct inode *inode, struct file *file)
554{
555 return 0;
556}
557#endif
558
559
560
561
562
563
564
565
566
567
568
569
570
571static int wdtpci_notify_sys(struct notifier_block *this, unsigned long code,
572 void *unused)
573{
574 if (code == SYS_DOWN || code == SYS_HALT)
575 wdtpci_stop();
576 return NOTIFY_DONE;
577}
578
579
580
581
582
583
584static const struct file_operations wdtpci_fops = {
585 .owner = THIS_MODULE,
586 .llseek = no_llseek,
587 .write = wdtpci_write,
588 .unlocked_ioctl = wdtpci_ioctl,
589 .open = wdtpci_open,
590 .release = wdtpci_release,
591};
592
593static struct miscdevice wdtpci_miscdev = {
594 .minor = WATCHDOG_MINOR,
595 .name = "watchdog",
596 .fops = &wdtpci_fops,
597};
598
599#ifdef CONFIG_WDT_501_PCI
600static const struct file_operations wdtpci_temp_fops = {
601 .owner = THIS_MODULE,
602 .llseek = no_llseek,
603 .read = wdtpci_temp_read,
604 .open = wdtpci_temp_open,
605 .release = wdtpci_temp_release,
606};
607
608static struct miscdevice temp_miscdev = {
609 .minor = TEMP_MINOR,
610 .name = "temperature",
611 .fops = &wdtpci_temp_fops,
612};
613#endif
614
615
616
617
618
619
620static struct notifier_block wdtpci_notifier = {
621 .notifier_call = wdtpci_notify_sys,
622};
623
624
625static int __devinit wdtpci_init_one(struct pci_dev *dev,
626 const struct pci_device_id *ent)
627{
628 int ret = -EIO;
629
630 dev_count++;
631 if (dev_count > 1) {
632 printk(KERN_ERR PFX "This driver only supports one device\n");
633 return -ENODEV;
634 }
635
636 if (pci_enable_device(dev)) {
637 printk(KERN_ERR PFX "Not possible to enable PCI Device\n");
638 return -ENODEV;
639 }
640
641 if (pci_resource_start(dev, 2) == 0x0000) {
642 printk(KERN_ERR PFX "No I/O-Address for card detected\n");
643 ret = -ENODEV;
644 goto out_pci;
645 }
646
647 irq = dev->irq;
648 io = pci_resource_start(dev, 2);
649
650 if (request_region(io, 16, "wdt_pci") == NULL) {
651 printk(KERN_ERR PFX "I/O address 0x%04x already in use\n", io);
652 goto out_pci;
653 }
654
655 if (request_irq(irq, wdtpci_interrupt, IRQF_DISABLED | IRQF_SHARED,
656 "wdt_pci", &wdtpci_miscdev)) {
657 printk(KERN_ERR PFX "IRQ %d is not free\n", irq);
658 goto out_reg;
659 }
660
661 printk(KERN_INFO
662 "PCI-WDT500/501 (PCI-WDG-CSM) driver 0.10 at 0x%04x (Interrupt %d)\n",
663 io, irq);
664
665
666
667 if (wdtpci_set_heartbeat(heartbeat)) {
668 wdtpci_set_heartbeat(WD_TIMO);
669 printk(KERN_INFO PFX
670 "heartbeat value must be 0 < heartbeat < 65536, using %d\n",
671 WD_TIMO);
672 }
673
674 ret = register_reboot_notifier(&wdtpci_notifier);
675 if (ret) {
676 printk(KERN_ERR PFX
677 "cannot register reboot notifier (err=%d)\n", ret);
678 goto out_irq;
679 }
680
681#ifdef CONFIG_WDT_501_PCI
682 ret = misc_register(&temp_miscdev);
683 if (ret) {
684 printk(KERN_ERR PFX
685 "cannot register miscdev on minor=%d (err=%d)\n",
686 TEMP_MINOR, ret);
687 goto out_rbt;
688 }
689#endif
690
691 ret = misc_register(&wdtpci_miscdev);
692 if (ret) {
693 printk(KERN_ERR PFX
694 "cannot register miscdev on minor=%d (err=%d)\n",
695 WATCHDOG_MINOR, ret);
696 goto out_misc;
697 }
698
699 printk(KERN_INFO PFX "initialized. heartbeat=%d sec (nowayout=%d)\n",
700 heartbeat, nowayout);
701#ifdef CONFIG_WDT_501_PCI
702 printk(KERN_INFO "wdt: Fan Tachometer is %s\n",
703 (tachometer ? "Enabled" : "Disabled"));
704#endif
705
706 ret = 0;
707out:
708 return ret;
709
710out_misc:
711#ifdef CONFIG_WDT_501_PCI
712 misc_deregister(&temp_miscdev);
713out_rbt:
714#endif
715 unregister_reboot_notifier(&wdtpci_notifier);
716out_irq:
717 free_irq(irq, &wdtpci_miscdev);
718out_reg:
719 release_region(io, 16);
720out_pci:
721 pci_disable_device(dev);
722 goto out;
723}
724
725
726static void __devexit wdtpci_remove_one(struct pci_dev *pdev)
727{
728
729
730 misc_deregister(&wdtpci_miscdev);
731#ifdef CONFIG_WDT_501_PCI
732 misc_deregister(&temp_miscdev);
733#endif
734 unregister_reboot_notifier(&wdtpci_notifier);
735 free_irq(irq, &wdtpci_miscdev);
736 release_region(io, 16);
737 pci_disable_device(pdev);
738 dev_count--;
739}
740
741
742static struct pci_device_id wdtpci_pci_tbl[] = {
743 {
744 .vendor = PCI_VENDOR_ID_ACCESSIO,
745 .device = PCI_DEVICE_ID_WDG_CSM,
746 .subvendor = PCI_ANY_ID,
747 .subdevice = PCI_ANY_ID,
748 },
749 { 0, },
750};
751MODULE_DEVICE_TABLE(pci, wdtpci_pci_tbl);
752
753
754static struct pci_driver wdtpci_driver = {
755 .name = "wdt_pci",
756 .id_table = wdtpci_pci_tbl,
757 .probe = wdtpci_init_one,
758 .remove = __devexit_p(wdtpci_remove_one),
759};
760
761
762
763
764
765
766
767
768
769
770
771
772static void __exit wdtpci_cleanup(void)
773{
774 pci_unregister_driver(&wdtpci_driver);
775}
776
777
778
779
780
781
782
783
784
785
786static int __init wdtpci_init(void)
787{
788 return pci_register_driver(&wdtpci_driver);
789}
790
791
792module_init(wdtpci_init);
793module_exit(wdtpci_cleanup);
794
795MODULE_AUTHOR("JP Nollmann, Alan Cox");
796MODULE_DESCRIPTION("Driver for the ICS PCI-WDT500/501 watchdog cards");
797MODULE_LICENSE("GPL");
798MODULE_ALIAS_MISCDEV(WATCHDOG_MINOR);
799MODULE_ALIAS_MISCDEV(TEMP_MINOR);
800