Linux Audio

Check our new training course

Loading...
v6.8
  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");
v3.1
 
  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#include <linux/interrupt.h>
 36#include <linux/module.h>
 37#include <linux/moduleparam.h>
 38#include <linux/types.h>
 39#include <linux/miscdevice.h>
 40#include <linux/watchdog.h>
 41#include <linux/fs.h>
 42#include <linux/ioport.h>
 43#include <linux/notifier.h>
 44#include <linux/reboot.h>
 45#include <linux/init.h>
 46#include <linux/io.h>
 47#include <linux/uaccess.h>
 48
 49#include <asm/system.h>
 50#include "wd501p.h"
 51
 52static unsigned long wdt_is_open;
 53static char expect_close;
 54
 55/*
 56 *	Module parameters
 57 */
 58
 59#define WD_TIMO 60			/* Default heartbeat = 60 seconds */
 60
 61static int heartbeat = WD_TIMO;
 62static int wd_heartbeat;
 63module_param(heartbeat, int, 0);
 64MODULE_PARM_DESC(heartbeat,
 65	"Watchdog heartbeat in seconds. (0 < heartbeat < 65536, default="
 66				__MODULE_STRING(WD_TIMO) ")");
 67
 68static int nowayout = WATCHDOG_NOWAYOUT;
 69module_param(nowayout, int, 0);
 70MODULE_PARM_DESC(nowayout,
 71	"Watchdog cannot be stopped once started (default="
 72				__MODULE_STRING(WATCHDOG_NOWAYOUT) ")");
 73
 74/* You must set these - there is no sane way to probe for this board. */
 75static int io = 0x240;
 76static int irq = 11;
 77
 78static DEFINE_SPINLOCK(wdt_lock);
 79
 80module_param(io, int, 0);
 81MODULE_PARM_DESC(io, "WDT io port (default=0x240)");
 82module_param(irq, int, 0);
 83MODULE_PARM_DESC(irq, "WDT irq (default=11)");
 84
 85/* Support for the Fan Tachometer on the WDT501-P */
 86static int tachometer;
 87module_param(tachometer, int, 0);
 88MODULE_PARM_DESC(tachometer,
 89		"WDT501-P Fan Tachometer support (0=disable, default=0)");
 90
 91static int type = 500;
 92module_param(type, int, 0);
 93MODULE_PARM_DESC(type,
 94		"WDT501-P Card type (500 or 501, default=500)");
 95
 96/*
 97 *	Programming support
 98 */
 99
100static void wdt_ctr_mode(int ctr, int mode)
101{
102	ctr <<= 6;
103	ctr |= 0x30;
104	ctr |= (mode << 1);
105	outb_p(ctr, WDT_CR);
106}
107
108static void wdt_ctr_load(int ctr, int val)
109{
110	outb_p(val&0xFF, WDT_COUNT0+ctr);
111	outb_p(val>>8, WDT_COUNT0+ctr);
112}
113
114/**
115 *	wdt_start:
116 *
117 *	Start the watchdog driver.
118 */
119
120static int wdt_start(void)
121{
122	unsigned long flags;
123	spin_lock_irqsave(&wdt_lock, flags);
124	inb_p(WDT_DC);			/* Disable watchdog */
125	wdt_ctr_mode(0, 3);		/* Program CTR0 for Mode 3:
126						Square Wave Generator */
127	wdt_ctr_mode(1, 2);		/* Program CTR1 for Mode 2:
128						Rate Generator */
129	wdt_ctr_mode(2, 0);		/* Program CTR2 for Mode 0:
130						Pulse on Terminal Count */
131	wdt_ctr_load(0, 8948);		/* Count at 100Hz */
132	wdt_ctr_load(1, wd_heartbeat);	/* Heartbeat */
133	wdt_ctr_load(2, 65535);		/* Length of reset pulse */
134	outb_p(0, WDT_DC);		/* Enable watchdog */
135	spin_unlock_irqrestore(&wdt_lock, flags);
136	return 0;
137}
138
139/**
140 *	wdt_stop:
141 *
142 *	Stop the watchdog driver.
143 */
144
145static int wdt_stop(void)
146{
147	unsigned long flags;
148	spin_lock_irqsave(&wdt_lock, flags);
149	/* Turn the card off */
150	inb_p(WDT_DC);			/* Disable watchdog */
151	wdt_ctr_load(2, 0);		/* 0 length reset pulses now */
152	spin_unlock_irqrestore(&wdt_lock, flags);
153	return 0;
154}
155
156/**
157 *	wdt_ping:
158 *
159 *	Reload counter one with the watchdog heartbeat. We don't bother
160 *	reloading the cascade counter.
161 */
162
163static void wdt_ping(void)
164{
165	unsigned long flags;
166	spin_lock_irqsave(&wdt_lock, flags);
167	/* Write a watchdog value */
168	inb_p(WDT_DC);			/* Disable watchdog */
169	wdt_ctr_mode(1, 2);		/* Re-Program CTR1 for Mode 2:
170							Rate Generator */
171	wdt_ctr_load(1, wd_heartbeat);	/* Heartbeat */
172	outb_p(0, WDT_DC);		/* Enable watchdog */
173	spin_unlock_irqrestore(&wdt_lock, flags);
174}
175
176/**
177 *	wdt_set_heartbeat:
178 *	@t:		the new heartbeat value that needs to be set.
179 *
180 *	Set a new heartbeat value for the watchdog device. If the heartbeat
181 *	value is incorrect we keep the old value and return -EINVAL. If
182 *	successful we return 0.
183 */
184
185static int wdt_set_heartbeat(int t)
186{
187	if (t < 1 || t > 65535)
188		return -EINVAL;
189
190	heartbeat = t;
191	wd_heartbeat = t * 100;
192	return 0;
193}
194
195/**
196 *	wdt_get_status:
197 *
198 *	Extract the status information from a WDT watchdog device. There are
199 *	several board variants so we have to know which bits are valid. Some
200 *	bits default to one and some to zero in order to be maximally painful.
201 *
202 *	we then map the bits onto the status ioctl flags.
203 */
204
205static int wdt_get_status(void)
206{
207	unsigned char new_status;
208	int status = 0;
209	unsigned long flags;
210
211	spin_lock_irqsave(&wdt_lock, flags);
212	new_status = inb_p(WDT_SR);
213	spin_unlock_irqrestore(&wdt_lock, flags);
214
215	if (new_status & WDC_SR_ISOI0)
216		status |= WDIOF_EXTERN1;
217	if (new_status & WDC_SR_ISII1)
218		status |= WDIOF_EXTERN2;
219	if (type == 501) {
220		if (!(new_status & WDC_SR_TGOOD))
221			status |= WDIOF_OVERHEAT;
222		if (!(new_status & WDC_SR_PSUOVER))
223			status |= WDIOF_POWEROVER;
224		if (!(new_status & WDC_SR_PSUUNDR))
225			status |= WDIOF_POWERUNDER;
226		if (tachometer) {
227			if (!(new_status & WDC_SR_FANGOOD))
228				status |= WDIOF_FANFAULT;
229		}
230	}
231	return status;
232}
233
234/**
235 *	wdt_get_temperature:
236 *
237 *	Reports the temperature in degrees Fahrenheit. The API is in
238 *	farenheit. It was designed by an imperial measurement luddite.
239 */
240
241static int wdt_get_temperature(void)
242{
243	unsigned short c;
244	unsigned long flags;
245
246	spin_lock_irqsave(&wdt_lock, flags);
247	c = inb_p(WDT_RT);
248	spin_unlock_irqrestore(&wdt_lock, flags);
249	return (c * 11 / 15) + 7;
250}
251
252static void wdt_decode_501(int status)
253{
254	if (!(status & WDC_SR_TGOOD))
255		printk(KERN_CRIT "Overheat alarm.(%d)\n", inb_p(WDT_RT));
256	if (!(status & WDC_SR_PSUOVER))
257		printk(KERN_CRIT "PSU over voltage.\n");
258	if (!(status & WDC_SR_PSUUNDR))
259		printk(KERN_CRIT "PSU under voltage.\n");
260}
261
262/**
263 *	wdt_interrupt:
264 *	@irq:		Interrupt number
265 *	@dev_id:	Unused as we don't allow multiple devices.
266 *
267 *	Handle an interrupt from the board. These are raised when the status
268 *	map changes in what the board considers an interesting way. That means
269 *	a failure condition occurring.
270 */
271
272static irqreturn_t wdt_interrupt(int irq, void *dev_id)
273{
274	/*
275	 *	Read the status register see what is up and
276	 *	then printk it.
277	 */
278	unsigned char status;
279
280	spin_lock(&wdt_lock);
281	status = inb_p(WDT_SR);
282
283	printk(KERN_CRIT "WDT status %d\n", status);
284
285	if (type == 501) {
286		wdt_decode_501(status);
287		if (tachometer) {
288			if (!(status & WDC_SR_FANGOOD))
289				printk(KERN_CRIT "Possible fan fault.\n");
290		}
291	}
292	if (!(status & WDC_SR_WCCR)) {
293#ifdef SOFTWARE_REBOOT
294#ifdef ONLY_TESTING
295		printk(KERN_CRIT "Would Reboot.\n");
296#else
297		printk(KERN_CRIT "Initiating system reboot.\n");
298		emergency_restart();
299#endif
300#else
301		printk(KERN_CRIT "Reset in 5ms.\n");
302#endif
303	}
304	spin_unlock(&wdt_lock);
305	return IRQ_HANDLED;
306}
307
308
309/**
310 *	wdt_write:
311 *	@file: file handle to the watchdog
312 *	@buf: buffer to write (unused as data does not matter here
313 *	@count: count of bytes
314 *	@ppos: pointer to the position to write. No seeks allowed
315 *
316 *	A write to a watchdog device is defined as a keepalive signal. Any
317 *	write of data will do, as we we don't define content meaning.
318 */
319
320static ssize_t wdt_write(struct file *file, const char __user *buf,
321						size_t count, loff_t *ppos)
322{
323	if (count) {
324		if (!nowayout) {
325			size_t i;
326
327			/* In case it was set long ago */
328			expect_close = 0;
329
330			for (i = 0; i != count; i++) {
331				char c;
332				if (get_user(c, buf + i))
333					return -EFAULT;
334				if (c == 'V')
335					expect_close = 42;
336			}
337		}
338		wdt_ping();
339	}
340	return count;
341}
342
343/**
344 *	wdt_ioctl:
345 *	@file: file handle to the device
346 *	@cmd: watchdog command
347 *	@arg: argument pointer
348 *
349 *	The watchdog API defines a common set of functions for all watchdogs
350 *	according to their available features. We only actually usefully support
351 *	querying capabilities and current status.
352 */
353
354static long wdt_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
355{
356	void __user *argp = (void __user *)arg;
357	int __user *p = argp;
358	int new_heartbeat;
359	int status;
360
361	struct watchdog_info ident = {
362		.options =		WDIOF_SETTIMEOUT|
363					WDIOF_MAGICCLOSE|
364					WDIOF_KEEPALIVEPING,
365		.firmware_version =	1,
366		.identity =		"WDT500/501",
367	};
368
369	/* Add options according to the card we have */
370	ident.options |= (WDIOF_EXTERN1|WDIOF_EXTERN2);
371	if (type == 501) {
372		ident.options |= (WDIOF_OVERHEAT|WDIOF_POWERUNDER|
373							WDIOF_POWEROVER);
374		if (tachometer)
375			ident.options |= WDIOF_FANFAULT;
376	}
377
378	switch (cmd) {
379	case WDIOC_GETSUPPORT:
380		return copy_to_user(argp, &ident, sizeof(ident)) ? -EFAULT : 0;
381	case WDIOC_GETSTATUS:
382		status = wdt_get_status();
383		return put_user(status, p);
384	case WDIOC_GETBOOTSTATUS:
385		return put_user(0, p);
386	case WDIOC_KEEPALIVE:
387		wdt_ping();
388		return 0;
389	case WDIOC_SETTIMEOUT:
390		if (get_user(new_heartbeat, p))
391			return -EFAULT;
392		if (wdt_set_heartbeat(new_heartbeat))
393			return -EINVAL;
394		wdt_ping();
395		/* Fall */
396	case WDIOC_GETTIMEOUT:
397		return put_user(heartbeat, p);
398	default:
399		return -ENOTTY;
400	}
401}
402
403/**
404 *	wdt_open:
405 *	@inode: inode of device
406 *	@file: file handle to device
407 *
408 *	The watchdog device has been opened. The watchdog device is single
409 *	open and on opening we load the counters. Counter zero is a 100Hz
410 *	cascade, into counter 1 which downcounts to reboot. When the counter
411 *	triggers counter 2 downcounts the length of the reset pulse which
412 *	set set to be as long as possible.
413 */
414
415static int wdt_open(struct inode *inode, struct file *file)
416{
417	if (test_and_set_bit(0, &wdt_is_open))
418		return -EBUSY;
419	/*
420	 *	Activate
421	 */
422	wdt_start();
423	return nonseekable_open(inode, file);
424}
425
426/**
427 *	wdt_release:
428 *	@inode: inode to board
429 *	@file: file handle to board
430 *
431 *	The watchdog has a configurable API. There is a religious dispute
432 *	between people who want their watchdog to be able to shut down and
433 *	those who want to be sure if the watchdog manager dies the machine
434 *	reboots. In the former case we disable the counters, in the latter
435 *	case you have to open it again very soon.
436 */
437
438static int wdt_release(struct inode *inode, struct file *file)
439{
440	if (expect_close == 42) {
441		wdt_stop();
442		clear_bit(0, &wdt_is_open);
443	} else {
444		printk(KERN_CRIT
445		 "wdt: 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		printk(KERN_ERR "wdt: 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		printk(KERN_INFO "wdt: heartbeat value must be "
605			"0 < heartbeat < 65536, using %d\n", WD_TIMO);
606	}
607
608	if (!request_region(io, 8, "wdt501p")) {
609		printk(KERN_ERR
610			"wdt: I/O address 0x%04x already in use\n", io);
611		ret = -EBUSY;
612		goto out;
613	}
614
615	ret = request_irq(irq, wdt_interrupt, IRQF_DISABLED, "wdt501p", NULL);
616	if (ret) {
617		printk(KERN_ERR "wdt: IRQ %d is not free.\n", irq);
618		goto outreg;
619	}
620
621	ret = register_reboot_notifier(&wdt_notifier);
622	if (ret) {
623		printk(KERN_ERR
624		      "wdt: cannot register reboot notifier (err=%d)\n", ret);
625		goto outirq;
626	}
627
628	if (type == 501) {
629		ret = misc_register(&temp_miscdev);
630		if (ret) {
631			printk(KERN_ERR "wdt: cannot register miscdev "
632				"on minor=%d (err=%d)\n", TEMP_MINOR, ret);
633			goto outrbt;
634		}
635	}
636
637	ret = misc_register(&wdt_miscdev);
638	if (ret) {
639		printk(KERN_ERR
640			"wdt: cannot register miscdev on minor=%d (err=%d)\n",
641							WATCHDOG_MINOR, ret);
642		goto outmisc;
643	}
644
645	printk(KERN_INFO "WDT500/501-P driver 0.10 "
646		"at 0x%04x (Interrupt %d). heartbeat=%d sec (nowayout=%d)\n",
647		io, irq, heartbeat, nowayout);
648	if (type == 501)
649		printk(KERN_INFO "wdt: Fan Tachometer is %s\n",
650				(tachometer ? "Enabled" : "Disabled"));
651	return 0;
652
653outmisc:
654	if (type == 501)
655		misc_deregister(&temp_miscdev);
656outrbt:
657	unregister_reboot_notifier(&wdt_notifier);
658outirq:
659	free_irq(irq, NULL);
660outreg:
661	release_region(io, 8);
662out:
663	return ret;
664}
665
666module_init(wdt_init);
667module_exit(wdt_exit);
668
669MODULE_AUTHOR("Alan Cox");
670MODULE_DESCRIPTION("Driver for ISA ICS watchdog cards (WDT500/501)");
671MODULE_ALIAS_MISCDEV(WATCHDOG_MINOR);
672MODULE_ALIAS_MISCDEV(TEMP_MINOR);
673MODULE_LICENSE("GPL");