1 /* cpwd.c - driver implementation for hardware watchdog
2 * timers found on Sun Microsystems CP1400 and CP1500 boards.
4 * This device supports both the generic Linux watchdog
5 * interface and Solaris-compatible ioctls as best it is
8 * NOTE: CP1400 systems appear to have a defective intr_mask
9 * register on the PLD, preventing the disabling of
10 * timer interrupts. We use a timer to periodically
11 * reset 'stopped' watchdogs on affected platforms.
13 * Copyright (c) 2000 Eric Brower (ebrower@usa.net)
14 * Copyright (C) 2008 David S. Miller <davem@davemloft.net>
17 #include <linux/kernel.h>
18 #include <linux/module.h>
20 #include <linux/errno.h>
21 #include <linux/major.h>
22 #include <linux/init.h>
23 #include <linux/miscdevice.h>
24 #include <linux/interrupt.h>
25 #include <linux/ioport.h>
26 #include <linux/timer.h>
27 #include <linux/slab.h>
28 #include <linux/smp_lock.h>
31 #include <linux/of_device.h>
32 #include <linux/uaccess.h>
35 #include <asm/watchdog.h>
37 #define DRIVER_NAME "cpwd"
38 #define PFX DRIVER_NAME ": "
40 #define WD_OBPNAME "watchdog"
41 #define WD_BADMODEL "SUNW,501-5336"
42 #define WD_BTIMEOUT (jiffies + (HZ * 1000))
43 #define WD_BLIMIT 0xFFFF
49 /* Internal driver definitions. */
58 #define WD_STAT_INIT 0x01 /* Watchdog timer is initialized */
59 #define WD_STAT_BSTOP 0x02 /* Watchdog timer is brokenstopped */
60 #define WD_STAT_SVCD 0x04 /* Watchdog interrupt occurred */
62 /* Register value definitions
64 #define WD0_INTR_MASK 0x01 /* Watchdog device interrupt masks */
65 #define WD1_INTR_MASK 0x02
66 #define WD2_INTR_MASK 0x04
68 #define WD_S_RUNNING 0x01 /* Watchdog device status running */
69 #define WD_S_EXPIRED 0x02 /* Watchdog device status expired */
77 unsigned long timeout
;
84 struct miscdevice misc
;
92 static struct cpwd
*cpwd_device
;
94 /* Sun uses Altera PLD EPF8820ATC144-4
95 * providing three hardware watchdogs:
97 * 1) RIC - sends an interrupt when triggered
98 * 2) XIR - asserts XIR_B_RESET when triggered, resets CPU
99 * 3) POR - asserts POR_B_RESET when triggered, resets CPU, backplane, board
101 *** Timer register block definition (struct wd_timer_regblk)
103 * dcntr and limit registers (halfword access):
104 * -------------------
105 * | 15 | ...| 1 | 0 |
106 * -------------------
108 * -------------------
109 * dcntr - Current 16-bit downcounter value.
110 * When downcounter reaches '0' watchdog expires.
111 * Reading this register resets downcounter with
113 * limit - 16-bit countdown value in 1/10th second increments.
114 * Writing this register begins countdown with input value.
115 * Reading from this register does not affect counter.
116 * NOTES: After watchdog reset, dcntr and limit contain '1'
118 * status register (byte access):
119 * ---------------------------
120 * | 7 | ... | 2 | 1 | 0 |
121 * --------------+------------
122 * |- UNUSED -| EXP | RUN |
123 * ---------------------------
124 * status- Bit 0 - Watchdog is running
125 * Bit 1 - Watchdog has expired
127 *** PLD register block definition (struct wd_pld_regblk)
129 * intr_mask register (byte access):
130 * ---------------------------------
131 * | 7 | ... | 3 | 2 | 1 | 0 |
132 * +-------------+------------------
133 * |- UNUSED -| WD3 | WD2 | WD1 |
134 * ---------------------------------
135 * WD3 - 1 == Interrupt disabled for watchdog 3
136 * WD2 - 1 == Interrupt disabled for watchdog 2
137 * WD1 - 1 == Interrupt disabled for watchdog 1
139 * pld_status register (byte access):
140 * UNKNOWN, MAGICAL MYSTERY REGISTER
143 #define WD_TIMER_REGSZ 16
145 #define WD1_OFF (WD_TIMER_REGSZ * 1)
146 #define WD2_OFF (WD_TIMER_REGSZ * 2)
147 #define PLD_OFF (WD_TIMER_REGSZ * 3)
149 #define WD_DCNTR 0x00
150 #define WD_LIMIT 0x04
151 #define WD_STATUS 0x08
153 #define PLD_IMASK (PLD_OFF + 0x00)
154 #define PLD_STATUS (PLD_OFF + 0x04)
156 static struct timer_list cpwd_timer
;
158 static int wd0_timeout
;
159 static int wd1_timeout
;
160 static int wd2_timeout
;
162 module_param(wd0_timeout
, int, 0);
163 MODULE_PARM_DESC(wd0_timeout
, "Default watchdog0 timeout in 1/10secs");
164 module_param(wd1_timeout
, int, 0);
165 MODULE_PARM_DESC(wd1_timeout
, "Default watchdog1 timeout in 1/10secs");
166 module_param(wd2_timeout
, int, 0);
167 MODULE_PARM_DESC(wd2_timeout
, "Default watchdog2 timeout in 1/10secs");
169 MODULE_AUTHOR("Eric Brower <ebrower@usa.net>");
170 MODULE_DESCRIPTION("Hardware watchdog driver for Sun Microsystems CP1400/1500");
171 MODULE_LICENSE("GPL");
172 MODULE_SUPPORTED_DEVICE("watchdog");
174 static void cpwd_writew(u16 val
, void __iomem
*addr
)
176 writew(cpu_to_le16(val
), addr
);
178 static u16
cpwd_readw(void __iomem
*addr
)
180 u16 val
= readw(addr
);
182 return le16_to_cpu(val
);
185 static void cpwd_writeb(u8 val
, void __iomem
*addr
)
190 static u8
cpwd_readb(void __iomem
*addr
)
195 /* Enable or disable watchdog interrupts
196 * Because of the CP1400 defect this should only be
197 * called during initialzation or by wd_[start|stop]timer()
199 * index - sub-device index, or -1 for 'all'
200 * enable - non-zero to enable interrupts, zero to disable
202 static void cpwd_toggleintr(struct cpwd
*p
, int index
, int enable
)
204 unsigned char curregs
= cpwd_readb(p
->regs
+ PLD_IMASK
);
205 unsigned char setregs
=
207 (WD0_INTR_MASK
| WD1_INTR_MASK
| WD2_INTR_MASK
) :
208 (p
->devs
[index
].intr_mask
);
210 if (enable
== WD_INTR_ON
)
215 cpwd_writeb(curregs
, p
->regs
+ PLD_IMASK
);
218 /* Restarts timer with maximum limit value and
219 * does not unset 'brokenstop' value.
221 static void cpwd_resetbrokentimer(struct cpwd
*p
, int index
)
223 cpwd_toggleintr(p
, index
, WD_INTR_ON
);
224 cpwd_writew(WD_BLIMIT
, p
->devs
[index
].regs
+ WD_LIMIT
);
227 /* Timer method called to reset stopped watchdogs--
228 * because of the PLD bug on CP1400, we cannot mask
229 * interrupts within the PLD so me must continually
230 * reset the timers ad infinitum.
232 static void cpwd_brokentimer(unsigned long data
)
234 struct cpwd
*p
= (struct cpwd
*) data
;
237 /* kill a running timer instance, in case we
238 * were called directly instead of by kernel timer
240 if (timer_pending(&cpwd_timer
))
241 del_timer(&cpwd_timer
);
243 for (id
= 0; id
< WD_NUMDEVS
; id
++) {
244 if (p
->devs
[id
].runstatus
& WD_STAT_BSTOP
) {
246 cpwd_resetbrokentimer(p
, id
);
251 /* there is at least one timer brokenstopped-- reschedule */
252 cpwd_timer
.expires
= WD_BTIMEOUT
;
253 add_timer(&cpwd_timer
);
257 /* Reset countdown timer with 'limit' value and continue countdown.
258 * This will not start a stopped timer.
260 static void cpwd_pingtimer(struct cpwd
*p
, int index
)
262 if (cpwd_readb(p
->devs
[index
].regs
+ WD_STATUS
) & WD_S_RUNNING
)
263 cpwd_readw(p
->devs
[index
].regs
+ WD_DCNTR
);
266 /* Stop a running watchdog timer-- the timer actually keeps
267 * running, but the interrupt is masked so that no action is
268 * taken upon expiration.
270 static void cpwd_stoptimer(struct cpwd
*p
, int index
)
272 if (cpwd_readb(p
->devs
[index
].regs
+ WD_STATUS
) & WD_S_RUNNING
) {
273 cpwd_toggleintr(p
, index
, WD_INTR_OFF
);
276 p
->devs
[index
].runstatus
|= WD_STAT_BSTOP
;
277 cpwd_brokentimer((unsigned long) p
);
282 /* Start a watchdog timer with the specified limit value
283 * If the watchdog is running, it will be restarted with
284 * the provided limit value.
286 * This function will enable interrupts on the specified
289 static void cpwd_starttimer(struct cpwd
*p
, int index
)
292 p
->devs
[index
].runstatus
&= ~WD_STAT_BSTOP
;
294 p
->devs
[index
].runstatus
&= ~WD_STAT_SVCD
;
296 cpwd_writew(p
->devs
[index
].timeout
, p
->devs
[index
].regs
+ WD_LIMIT
);
297 cpwd_toggleintr(p
, index
, WD_INTR_ON
);
300 static int cpwd_getstatus(struct cpwd
*p
, int index
)
302 unsigned char stat
= cpwd_readb(p
->devs
[index
].regs
+ WD_STATUS
);
303 unsigned char intr
= cpwd_readb(p
->devs
[index
].regs
+ PLD_IMASK
);
304 unsigned char ret
= WD_STOPPED
;
306 /* determine STOPPED */
310 /* determine EXPIRED vs FREERUN vs RUNNING */
311 else if (WD_S_EXPIRED
& stat
) {
313 } else if (WD_S_RUNNING
& stat
) {
314 if (intr
& p
->devs
[index
].intr_mask
) {
317 /* Fudge WD_EXPIRED status for defective CP1400--
318 * IF timer is running
319 * AND brokenstop is set
320 * AND an interrupt has been serviced
323 * IF timer is running
324 * AND brokenstop is set
325 * AND no interrupt has been serviced
329 (p
->devs
[index
].runstatus
& WD_STAT_BSTOP
)) {
330 if (p
->devs
[index
].runstatus
& WD_STAT_SVCD
) {
333 /* we could as well pretend
343 /* determine SERVICED */
344 if (p
->devs
[index
].runstatus
& WD_STAT_SVCD
)
350 static irqreturn_t
cpwd_interrupt(int irq
, void *dev_id
)
352 struct cpwd
*p
= dev_id
;
354 /* Only WD0 will interrupt-- others are NMI and we won't
357 spin_lock_irq(&p
->lock
);
359 cpwd_stoptimer(p
, WD0_ID
);
360 p
->devs
[WD0_ID
].runstatus
|= WD_STAT_SVCD
;
362 spin_unlock_irq(&p
->lock
);
367 static int cpwd_open(struct inode
*inode
, struct file
*f
)
369 struct cpwd
*p
= cpwd_device
;
372 switch (iminor(inode
)) {
383 /* Register IRQ on first open of device */
384 if (!p
->initialized
) {
385 if (request_irq(p
->irq
, &cpwd_interrupt
,
386 IRQF_SHARED
, DRIVER_NAME
, p
)) {
387 printk(KERN_ERR PFX
"Cannot register IRQ %d\n",
392 p
->initialized
= true;
397 return nonseekable_open(inode
, f
);
400 static int cpwd_release(struct inode
*inode
, struct file
*file
)
405 static long cpwd_ioctl(struct file
*file
, unsigned int cmd
, unsigned long arg
)
407 static const struct watchdog_info info
= {
408 .options
= WDIOF_SETTIMEOUT
,
409 .firmware_version
= 1,
410 .identity
= DRIVER_NAME
,
412 void __user
*argp
= (void __user
*)arg
;
413 struct inode
*inode
= file
->f_path
.dentry
->d_inode
;
414 int index
= iminor(inode
) - WD0_MINOR
;
415 struct cpwd
*p
= cpwd_device
;
419 /* Generic Linux IOCTLs */
420 case WDIOC_GETSUPPORT
:
421 if (copy_to_user(argp
, &info
, sizeof(struct watchdog_info
)))
425 case WDIOC_GETSTATUS
:
426 case WDIOC_GETBOOTSTATUS
:
427 if (put_user(0, (int __user
*)argp
))
431 case WDIOC_KEEPALIVE
:
432 cpwd_pingtimer(p
, index
);
435 case WDIOC_SETOPTIONS
:
436 if (copy_from_user(&setopt
, argp
, sizeof(unsigned int)))
439 if (setopt
& WDIOS_DISABLECARD
) {
442 cpwd_stoptimer(p
, index
);
443 } else if (setopt
& WDIOS_ENABLECARD
) {
444 cpwd_starttimer(p
, index
);
450 /* Solaris-compatible IOCTLs */
452 setopt
= cpwd_getstatus(p
, index
);
453 if (copy_to_user(argp
, &setopt
, sizeof(unsigned int)))
458 cpwd_starttimer(p
, index
);
465 cpwd_stoptimer(p
, index
);
475 static long cpwd_compat_ioctl(struct file
*file
, unsigned int cmd
,
478 int rval
= -ENOIOCTLCMD
;
481 /* solaris ioctls are specific to this driver */
486 rval
= cpwd_ioctl(file
, cmd
, arg
);
490 /* everything else is handled by the generic compat layer */
498 static ssize_t
cpwd_write(struct file
*file
, const char __user
*buf
,
499 size_t count
, loff_t
*ppos
)
501 struct inode
*inode
= file
->f_path
.dentry
->d_inode
;
502 struct cpwd
*p
= cpwd_device
;
503 int index
= iminor(inode
);
506 cpwd_pingtimer(p
, index
);
513 static ssize_t
cpwd_read(struct file
*file
, char __user
*buffer
,
514 size_t count
, loff_t
*ppos
)
519 static const struct file_operations cpwd_fops
= {
520 .owner
= THIS_MODULE
,
521 .unlocked_ioctl
= cpwd_ioctl
,
522 .compat_ioctl
= cpwd_compat_ioctl
,
526 .release
= cpwd_release
,
529 static int __devinit
cpwd_probe(struct of_device
*op
,
530 const struct of_device_id
*match
)
532 struct device_node
*options
;
533 const char *str_prop
;
534 const void *prop_val
;
535 int i
, err
= -EINVAL
;
541 p
= kzalloc(sizeof(*p
), GFP_KERNEL
);
544 printk(KERN_ERR PFX
"Unable to allocate struct cpwd.\n");
548 p
->irq
= op
->irqs
[0];
550 spin_lock_init(&p
->lock
);
552 p
->regs
= of_ioremap(&op
->resource
[0], 0,
553 4 * WD_TIMER_REGSZ
, DRIVER_NAME
);
555 printk(KERN_ERR PFX
"Unable to map registers.\n");
559 options
= of_find_node_by_path("/options");
562 printk(KERN_ERR PFX
"Unable to find /options node.\n");
566 prop_val
= of_get_property(options
, "watchdog-enable?", NULL
);
567 p
->enabled
= (prop_val
? true : false);
569 prop_val
= of_get_property(options
, "watchdog-reboot?", NULL
);
570 p
->reboot
= (prop_val
? true : false);
572 str_prop
= of_get_property(options
, "watchdog-timeout", NULL
);
574 p
->timeout
= simple_strtoul(str_prop
, NULL
, 10);
576 /* CP1400s seem to have broken PLD implementations-- the
577 * interrupt_mask register cannot be written, so no timer
578 * interrupts can be masked within the PLD.
580 str_prop
= of_get_property(op
->node
, "model", NULL
);
581 p
->broken
= (str_prop
&& !strcmp(str_prop
, WD_BADMODEL
));
584 cpwd_toggleintr(p
, -1, WD_INTR_OFF
);
586 for (i
= 0; i
< WD_NUMDEVS
; i
++) {
587 static const char *cpwd_names
[] = { "RIC", "XIR", "POR" };
588 static int *parms
[] = { &wd0_timeout
,
591 struct miscdevice
*mp
= &p
->devs
[i
].misc
;
593 mp
->minor
= WD0_MINOR
+ i
;
594 mp
->name
= cpwd_names
[i
];
595 mp
->fops
= &cpwd_fops
;
597 p
->devs
[i
].regs
= p
->regs
+ (i
* WD_TIMER_REGSZ
);
598 p
->devs
[i
].intr_mask
= (WD0_INTR_MASK
<< i
);
599 p
->devs
[i
].runstatus
&= ~WD_STAT_BSTOP
;
600 p
->devs
[i
].runstatus
|= WD_STAT_INIT
;
601 p
->devs
[i
].timeout
= p
->timeout
;
603 p
->devs
[i
].timeout
= *parms
[i
];
605 err
= misc_register(&p
->devs
[i
].misc
);
607 printk(KERN_ERR
"Could not register misc device for "
614 init_timer(&cpwd_timer
);
615 cpwd_timer
.function
= cpwd_brokentimer
;
616 cpwd_timer
.data
= (unsigned long) p
;
617 cpwd_timer
.expires
= WD_BTIMEOUT
;
619 printk(KERN_INFO PFX
"PLD defect workaround enabled for "
620 "model " WD_BADMODEL
".\n");
623 dev_set_drvdata(&op
->dev
, p
);
631 for (i
--; i
>= 0; i
--)
632 misc_deregister(&p
->devs
[i
].misc
);
635 of_iounmap(&op
->resource
[0], p
->regs
, 4 * WD_TIMER_REGSZ
);
642 static int __devexit
cpwd_remove(struct of_device
*op
)
644 struct cpwd
*p
= dev_get_drvdata(&op
->dev
);
647 for (i
= 0; i
< 4; i
++) {
648 misc_deregister(&p
->devs
[i
].misc
);
651 cpwd_stoptimer(p
, i
);
652 if (p
->devs
[i
].runstatus
& WD_STAT_BSTOP
)
653 cpwd_resetbrokentimer(p
, i
);
658 del_timer_sync(&cpwd_timer
);
663 of_iounmap(&op
->resource
[0], p
->regs
, 4 * WD_TIMER_REGSZ
);
671 static const struct of_device_id cpwd_match
[] = {
677 MODULE_DEVICE_TABLE(of
, cpwd_match
);
679 static struct of_platform_driver cpwd_driver
= {
681 .match_table
= cpwd_match
,
683 .remove
= __devexit_p(cpwd_remove
),
686 static int __init
cpwd_init(void)
688 return of_register_driver(&cpwd_driver
, &of_bus_type
);
691 static void __exit
cpwd_exit(void)
693 of_unregister_driver(&cpwd_driver
);
696 module_init(cpwd_init
);
697 module_exit(cpwd_exit
);