xref: /linux/drivers/char/ipmi/ipmi_watchdog.c (revision 54a8a2220c936a47840c9a3d74910c5a56fae2ed)
1 /*
2  * ipmi_watchdog.c
3  *
4  * A watchdog timer based upon the IPMI interface.
5  *
6  * Author: MontaVista Software, Inc.
7  *         Corey Minyard <minyard@mvista.com>
8  *         source@mvista.com
9  *
10  * Copyright 2002 MontaVista Software Inc.
11  *
12  *  This program is free software; you can redistribute it and/or modify it
13  *  under the terms of the GNU General Public License as published by the
14  *  Free Software Foundation; either version 2 of the License, or (at your
15  *  option) any later version.
16  *
17  *
18  *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
19  *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
20  *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  *  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
23  *  BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
24  *  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
25  *  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
26  *  TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
27  *  USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  *
29  *  You should have received a copy of the GNU General Public License along
30  *  with this program; if not, write to the Free Software Foundation, Inc.,
31  *  675 Mass Ave, Cambridge, MA 02139, USA.
32  */
33 
34 #include <linux/config.h>
35 #include <linux/module.h>
36 #include <linux/moduleparam.h>
37 #include <linux/ipmi.h>
38 #include <linux/ipmi_smi.h>
39 #include <linux/watchdog.h>
40 #include <linux/miscdevice.h>
41 #include <linux/init.h>
42 #include <linux/rwsem.h>
43 #include <linux/errno.h>
44 #include <asm/uaccess.h>
45 #include <linux/notifier.h>
46 #include <linux/nmi.h>
47 #include <linux/reboot.h>
48 #include <linux/wait.h>
49 #include <linux/poll.h>
50 #ifdef CONFIG_X86_LOCAL_APIC
51 #include <asm/apic.h>
52 #endif
53 
54 #define	PFX "IPMI Watchdog: "
55 
56 /*
57  * The IPMI command/response information for the watchdog timer.
58  */
59 
60 /* values for byte 1 of the set command, byte 2 of the get response. */
61 #define WDOG_DONT_LOG		(1 << 7)
62 #define WDOG_DONT_STOP_ON_SET	(1 << 6)
63 #define WDOG_SET_TIMER_USE(byte, use) \
64 	byte = ((byte) & 0xf8) | ((use) & 0x7)
65 #define WDOG_GET_TIMER_USE(byte) ((byte) & 0x7)
66 #define WDOG_TIMER_USE_BIOS_FRB2	1
67 #define WDOG_TIMER_USE_BIOS_POST	2
68 #define WDOG_TIMER_USE_OS_LOAD		3
69 #define WDOG_TIMER_USE_SMS_OS		4
70 #define WDOG_TIMER_USE_OEM		5
71 
72 /* values for byte 2 of the set command, byte 3 of the get response. */
73 #define WDOG_SET_PRETIMEOUT_ACT(byte, use) \
74 	byte = ((byte) & 0x8f) | (((use) & 0x7) << 4)
75 #define WDOG_GET_PRETIMEOUT_ACT(byte) (((byte) >> 4) & 0x7)
76 #define WDOG_PRETIMEOUT_NONE		0
77 #define WDOG_PRETIMEOUT_SMI		1
78 #define WDOG_PRETIMEOUT_NMI		2
79 #define WDOG_PRETIMEOUT_MSG_INT		3
80 
81 /* Operations that can be performed on a pretimout. */
82 #define WDOG_PREOP_NONE		0
83 #define WDOG_PREOP_PANIC	1
84 #define WDOG_PREOP_GIVE_DATA	2 /* Cause data to be available to
85                                      read.  Doesn't work in NMI
86                                      mode. */
87 
88 /* Actions to perform on a full timeout. */
89 #define WDOG_SET_TIMEOUT_ACT(byte, use) \
90 	byte = ((byte) & 0xf8) | ((use) & 0x7)
91 #define WDOG_GET_TIMEOUT_ACT(byte) ((byte) & 0x7)
92 #define WDOG_TIMEOUT_NONE		0
93 #define WDOG_TIMEOUT_RESET		1
94 #define WDOG_TIMEOUT_POWER_DOWN		2
95 #define WDOG_TIMEOUT_POWER_CYCLE	3
96 
97 /* Byte 3 of the get command, byte 4 of the get response is the
98    pre-timeout in seconds. */
99 
100 /* Bits for setting byte 4 of the set command, byte 5 of the get response. */
101 #define WDOG_EXPIRE_CLEAR_BIOS_FRB2	(1 << 1)
102 #define WDOG_EXPIRE_CLEAR_BIOS_POST	(1 << 2)
103 #define WDOG_EXPIRE_CLEAR_OS_LOAD	(1 << 3)
104 #define WDOG_EXPIRE_CLEAR_SMS_OS	(1 << 4)
105 #define WDOG_EXPIRE_CLEAR_OEM		(1 << 5)
106 
107 /* Setting/getting the watchdog timer value.  This is for bytes 5 and
108    6 (the timeout time) of the set command, and bytes 6 and 7 (the
109    timeout time) and 8 and 9 (the current countdown value) of the
110    response.  The timeout value is given in seconds (in the command it
111    is 100ms intervals). */
112 #define WDOG_SET_TIMEOUT(byte1, byte2, val) \
113 	(byte1) = (((val) * 10) & 0xff), (byte2) = (((val) * 10) >> 8)
114 #define WDOG_GET_TIMEOUT(byte1, byte2) \
115 	(((byte1) | ((byte2) << 8)) / 10)
116 
117 #define IPMI_WDOG_RESET_TIMER		0x22
118 #define IPMI_WDOG_SET_TIMER		0x24
119 #define IPMI_WDOG_GET_TIMER		0x25
120 
121 /* These are here until the real ones get into the watchdog.h interface. */
122 #ifndef WDIOC_GETTIMEOUT
123 #define	WDIOC_GETTIMEOUT        _IOW(WATCHDOG_IOCTL_BASE, 20, int)
124 #endif
125 #ifndef WDIOC_SET_PRETIMEOUT
126 #define	WDIOC_SET_PRETIMEOUT     _IOW(WATCHDOG_IOCTL_BASE, 21, int)
127 #endif
128 #ifndef WDIOC_GET_PRETIMEOUT
129 #define	WDIOC_GET_PRETIMEOUT     _IOW(WATCHDOG_IOCTL_BASE, 22, int)
130 #endif
131 
132 static int nowayout = WATCHDOG_NOWAYOUT;
133 
134 static ipmi_user_t watchdog_user = NULL;
135 
136 /* Default the timeout to 10 seconds. */
137 static int timeout = 10;
138 
139 /* The pre-timeout is disabled by default. */
140 static int pretimeout = 0;
141 
142 /* Default action is to reset the board on a timeout. */
143 static unsigned char action_val = WDOG_TIMEOUT_RESET;
144 
145 static char action[16] = "reset";
146 
147 static unsigned char preaction_val = WDOG_PRETIMEOUT_NONE;
148 
149 static char preaction[16] = "pre_none";
150 
151 static unsigned char preop_val = WDOG_PREOP_NONE;
152 
153 static char preop[16] = "preop_none";
154 static DEFINE_SPINLOCK(ipmi_read_lock);
155 static char data_to_read = 0;
156 static DECLARE_WAIT_QUEUE_HEAD(read_q);
157 static struct fasync_struct *fasync_q = NULL;
158 static char pretimeout_since_last_heartbeat = 0;
159 static char expect_close;
160 
161 /* If true, the driver will start running as soon as it is configured
162    and ready. */
163 static int start_now = 0;
164 
165 module_param(timeout, int, 0);
166 MODULE_PARM_DESC(timeout, "Timeout value in seconds.");
167 module_param(pretimeout, int, 0);
168 MODULE_PARM_DESC(pretimeout, "Pretimeout value in seconds.");
169 module_param_string(action, action, sizeof(action), 0);
170 MODULE_PARM_DESC(action, "Timeout action. One of: "
171 		 "reset, none, power_cycle, power_off.");
172 module_param_string(preaction, preaction, sizeof(preaction), 0);
173 MODULE_PARM_DESC(preaction, "Pretimeout action.  One of: "
174 		 "pre_none, pre_smi, pre_nmi, pre_int.");
175 module_param_string(preop, preop, sizeof(preop), 0);
176 MODULE_PARM_DESC(preop, "Pretimeout driver operation.  One of: "
177 		 "preop_none, preop_panic, preop_give_data.");
178 module_param(start_now, int, 0);
179 MODULE_PARM_DESC(start_now, "Set to 1 to start the watchdog as"
180 		 "soon as the driver is loaded.");
181 module_param(nowayout, int, 0);
182 MODULE_PARM_DESC(nowayout, "Watchdog cannot be stopped once started (default=CONFIG_WATCHDOG_NOWAYOUT)");
183 
184 /* Default state of the timer. */
185 static unsigned char ipmi_watchdog_state = WDOG_TIMEOUT_NONE;
186 
187 /* If shutting down via IPMI, we ignore the heartbeat. */
188 static int ipmi_ignore_heartbeat = 0;
189 
190 /* Is someone using the watchdog?  Only one user is allowed. */
191 static unsigned long ipmi_wdog_open = 0;
192 
193 /* If set to 1, the heartbeat command will set the state to reset and
194    start the timer.  The timer doesn't normally run when the driver is
195    first opened until the heartbeat is set the first time, this
196    variable is used to accomplish this. */
197 static int ipmi_start_timer_on_heartbeat = 0;
198 
199 /* IPMI version of the BMC. */
200 static unsigned char ipmi_version_major;
201 static unsigned char ipmi_version_minor;
202 
203 
204 static int ipmi_heartbeat(void);
205 static void panic_halt_ipmi_heartbeat(void);
206 
207 
208 /* We use a semaphore to make sure that only one thing can send a set
209    timeout at one time, because we only have one copy of the data.
210    The semaphore is claimed when the set_timeout is sent and freed
211    when both messages are free. */
212 static atomic_t set_timeout_tofree = ATOMIC_INIT(0);
213 static DECLARE_MUTEX(set_timeout_lock);
214 static void set_timeout_free_smi(struct ipmi_smi_msg *msg)
215 {
216     if (atomic_dec_and_test(&set_timeout_tofree))
217 	    up(&set_timeout_lock);
218 }
219 static void set_timeout_free_recv(struct ipmi_recv_msg *msg)
220 {
221     if (atomic_dec_and_test(&set_timeout_tofree))
222 	    up(&set_timeout_lock);
223 }
224 static struct ipmi_smi_msg set_timeout_smi_msg =
225 {
226 	.done = set_timeout_free_smi
227 };
228 static struct ipmi_recv_msg set_timeout_recv_msg =
229 {
230 	.done = set_timeout_free_recv
231 };
232 
233 static int i_ipmi_set_timeout(struct ipmi_smi_msg  *smi_msg,
234 			      struct ipmi_recv_msg *recv_msg,
235 			      int                  *send_heartbeat_now)
236 {
237 	struct kernel_ipmi_msg            msg;
238 	unsigned char                     data[6];
239 	int                               rv;
240 	struct ipmi_system_interface_addr addr;
241 	int                               hbnow = 0;
242 
243 
244 	data[0] = 0;
245 	WDOG_SET_TIMER_USE(data[0], WDOG_TIMER_USE_SMS_OS);
246 
247 	if ((ipmi_version_major > 1)
248 	    || ((ipmi_version_major == 1) && (ipmi_version_minor >= 5)))
249 	{
250 		/* This is an IPMI 1.5-only feature. */
251 		data[0] |= WDOG_DONT_STOP_ON_SET;
252 	} else if (ipmi_watchdog_state != WDOG_TIMEOUT_NONE) {
253 		/* In ipmi 1.0, setting the timer stops the watchdog, we
254 		   need to start it back up again. */
255 		hbnow = 1;
256 	}
257 
258 	data[1] = 0;
259 	WDOG_SET_TIMEOUT_ACT(data[1], ipmi_watchdog_state);
260 	if ((pretimeout > 0) && (ipmi_watchdog_state != WDOG_TIMEOUT_NONE)) {
261 	    WDOG_SET_PRETIMEOUT_ACT(data[1], preaction_val);
262 	    data[2] = pretimeout;
263 	} else {
264 	    WDOG_SET_PRETIMEOUT_ACT(data[1], WDOG_PRETIMEOUT_NONE);
265 	    data[2] = 0; /* No pretimeout. */
266 	}
267 	data[3] = 0;
268 	WDOG_SET_TIMEOUT(data[4], data[5], timeout);
269 
270 	addr.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
271 	addr.channel = IPMI_BMC_CHANNEL;
272 	addr.lun = 0;
273 
274 	msg.netfn = 0x06;
275 	msg.cmd = IPMI_WDOG_SET_TIMER;
276 	msg.data = data;
277 	msg.data_len = sizeof(data);
278 	rv = ipmi_request_supply_msgs(watchdog_user,
279 				      (struct ipmi_addr *) &addr,
280 				      0,
281 				      &msg,
282 				      NULL,
283 				      smi_msg,
284 				      recv_msg,
285 				      1);
286 	if (rv) {
287 		printk(KERN_WARNING PFX "set timeout error: %d\n",
288 		       rv);
289 	}
290 
291 	if (send_heartbeat_now)
292 	    *send_heartbeat_now = hbnow;
293 
294 	return rv;
295 }
296 
297 /* Parameters to ipmi_set_timeout */
298 #define IPMI_SET_TIMEOUT_NO_HB			0
299 #define IPMI_SET_TIMEOUT_HB_IF_NECESSARY	1
300 #define IPMI_SET_TIMEOUT_FORCE_HB		2
301 
302 static int ipmi_set_timeout(int do_heartbeat)
303 {
304 	int send_heartbeat_now;
305 	int rv;
306 
307 
308 	/* We can only send one of these at a time. */
309 	down(&set_timeout_lock);
310 
311 	atomic_set(&set_timeout_tofree, 2);
312 
313 	rv = i_ipmi_set_timeout(&set_timeout_smi_msg,
314 				&set_timeout_recv_msg,
315 				&send_heartbeat_now);
316 	if (rv) {
317 		up(&set_timeout_lock);
318 	} else {
319 		if ((do_heartbeat == IPMI_SET_TIMEOUT_FORCE_HB)
320 		    || ((send_heartbeat_now)
321 			&& (do_heartbeat == IPMI_SET_TIMEOUT_HB_IF_NECESSARY)))
322 		{
323 			rv = ipmi_heartbeat();
324 		}
325 	}
326 
327 	return rv;
328 }
329 
330 static void dummy_smi_free(struct ipmi_smi_msg *msg)
331 {
332 }
333 static void dummy_recv_free(struct ipmi_recv_msg *msg)
334 {
335 }
336 static struct ipmi_smi_msg panic_halt_smi_msg =
337 {
338 	.done = dummy_smi_free
339 };
340 static struct ipmi_recv_msg panic_halt_recv_msg =
341 {
342 	.done = dummy_recv_free
343 };
344 
345 /* Special call, doesn't claim any locks.  This is only to be called
346    at panic or halt time, in run-to-completion mode, when the caller
347    is the only CPU and the only thing that will be going is these IPMI
348    calls. */
349 static void panic_halt_ipmi_set_timeout(void)
350 {
351 	int send_heartbeat_now;
352 	int rv;
353 
354 	rv = i_ipmi_set_timeout(&panic_halt_smi_msg,
355 				&panic_halt_recv_msg,
356 				&send_heartbeat_now);
357 	if (!rv) {
358 		if (send_heartbeat_now)
359 			panic_halt_ipmi_heartbeat();
360 	}
361 }
362 
363 /* We use a semaphore to make sure that only one thing can send a
364    heartbeat at one time, because we only have one copy of the data.
365    The semaphore is claimed when the set_timeout is sent and freed
366    when both messages are free. */
367 static atomic_t heartbeat_tofree = ATOMIC_INIT(0);
368 static DECLARE_MUTEX(heartbeat_lock);
369 static DECLARE_MUTEX_LOCKED(heartbeat_wait_lock);
370 static void heartbeat_free_smi(struct ipmi_smi_msg *msg)
371 {
372     if (atomic_dec_and_test(&heartbeat_tofree))
373 	    up(&heartbeat_wait_lock);
374 }
375 static void heartbeat_free_recv(struct ipmi_recv_msg *msg)
376 {
377     if (atomic_dec_and_test(&heartbeat_tofree))
378 	    up(&heartbeat_wait_lock);
379 }
380 static struct ipmi_smi_msg heartbeat_smi_msg =
381 {
382 	.done = heartbeat_free_smi
383 };
384 static struct ipmi_recv_msg heartbeat_recv_msg =
385 {
386 	.done = heartbeat_free_recv
387 };
388 
389 static struct ipmi_smi_msg panic_halt_heartbeat_smi_msg =
390 {
391 	.done = dummy_smi_free
392 };
393 static struct ipmi_recv_msg panic_halt_heartbeat_recv_msg =
394 {
395 	.done = dummy_recv_free
396 };
397 
398 static int ipmi_heartbeat(void)
399 {
400 	struct kernel_ipmi_msg            msg;
401 	int                               rv;
402 	struct ipmi_system_interface_addr addr;
403 
404 	if (ipmi_ignore_heartbeat) {
405 		return 0;
406 	}
407 
408 	if (ipmi_start_timer_on_heartbeat) {
409 		ipmi_start_timer_on_heartbeat = 0;
410 		ipmi_watchdog_state = action_val;
411 		return ipmi_set_timeout(IPMI_SET_TIMEOUT_FORCE_HB);
412 	} else if (pretimeout_since_last_heartbeat) {
413 		/* A pretimeout occurred, make sure we set the timeout.
414 		   We don't want to set the action, though, we want to
415 		   leave that alone (thus it can't be combined with the
416 		   above operation. */
417 		pretimeout_since_last_heartbeat = 0;
418 		return ipmi_set_timeout(IPMI_SET_TIMEOUT_HB_IF_NECESSARY);
419 	}
420 
421 	down(&heartbeat_lock);
422 
423 	atomic_set(&heartbeat_tofree, 2);
424 
425 	/* Don't reset the timer if we have the timer turned off, that
426            re-enables the watchdog. */
427 	if (ipmi_watchdog_state == WDOG_TIMEOUT_NONE) {
428 		up(&heartbeat_lock);
429 		return 0;
430 	}
431 
432 	addr.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
433 	addr.channel = IPMI_BMC_CHANNEL;
434 	addr.lun = 0;
435 
436 	msg.netfn = 0x06;
437 	msg.cmd = IPMI_WDOG_RESET_TIMER;
438 	msg.data = NULL;
439 	msg.data_len = 0;
440 	rv = ipmi_request_supply_msgs(watchdog_user,
441 				      (struct ipmi_addr *) &addr,
442 				      0,
443 				      &msg,
444 				      NULL,
445 				      &heartbeat_smi_msg,
446 				      &heartbeat_recv_msg,
447 				      1);
448 	if (rv) {
449 		up(&heartbeat_lock);
450 		printk(KERN_WARNING PFX "heartbeat failure: %d\n",
451 		       rv);
452 		return rv;
453 	}
454 
455 	/* Wait for the heartbeat to be sent. */
456 	down(&heartbeat_wait_lock);
457 
458 	if (heartbeat_recv_msg.msg.data[0] != 0) {
459 	    /* Got an error in the heartbeat response.  It was already
460 	       reported in ipmi_wdog_msg_handler, but we should return
461 	       an error here. */
462 	    rv = -EINVAL;
463 	}
464 
465 	up(&heartbeat_lock);
466 
467 	return rv;
468 }
469 
470 static void panic_halt_ipmi_heartbeat(void)
471 {
472 	struct kernel_ipmi_msg             msg;
473 	struct ipmi_system_interface_addr addr;
474 
475 
476 	/* Don't reset the timer if we have the timer turned off, that
477            re-enables the watchdog. */
478 	if (ipmi_watchdog_state == WDOG_TIMEOUT_NONE)
479 		return;
480 
481 	addr.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
482 	addr.channel = IPMI_BMC_CHANNEL;
483 	addr.lun = 0;
484 
485 	msg.netfn = 0x06;
486 	msg.cmd = IPMI_WDOG_RESET_TIMER;
487 	msg.data = NULL;
488 	msg.data_len = 0;
489 	ipmi_request_supply_msgs(watchdog_user,
490 				 (struct ipmi_addr *) &addr,
491 				 0,
492 				 &msg,
493 				 NULL,
494 				 &panic_halt_heartbeat_smi_msg,
495 				 &panic_halt_heartbeat_recv_msg,
496 				 1);
497 }
498 
499 static struct watchdog_info ident=
500 {
501 	.options	= 0,	/* WDIOF_SETTIMEOUT, */
502 	.firmware_version = 1,
503 	.identity	= "IPMI"
504 };
505 
506 static int ipmi_ioctl(struct inode *inode, struct file *file,
507 		      unsigned int cmd, unsigned long arg)
508 {
509 	void __user *argp = (void __user *)arg;
510 	int i;
511 	int val;
512 
513 	switch(cmd) {
514 	case WDIOC_GETSUPPORT:
515 		i = copy_to_user(argp, &ident, sizeof(ident));
516 		return i ? -EFAULT : 0;
517 
518 	case WDIOC_SETTIMEOUT:
519 		i = copy_from_user(&val, argp, sizeof(int));
520 		if (i)
521 			return -EFAULT;
522 		timeout = val;
523 		return ipmi_set_timeout(IPMI_SET_TIMEOUT_HB_IF_NECESSARY);
524 
525 	case WDIOC_GETTIMEOUT:
526 		i = copy_to_user(argp, &timeout, sizeof(timeout));
527 		if (i)
528 			return -EFAULT;
529 		return 0;
530 
531 	case WDIOC_SET_PRETIMEOUT:
532 		i = copy_from_user(&val, argp, sizeof(int));
533 		if (i)
534 			return -EFAULT;
535 		pretimeout = val;
536 		return ipmi_set_timeout(IPMI_SET_TIMEOUT_HB_IF_NECESSARY);
537 
538 	case WDIOC_GET_PRETIMEOUT:
539 		i = copy_to_user(argp, &pretimeout, sizeof(pretimeout));
540 		if (i)
541 			return -EFAULT;
542 		return 0;
543 
544 	case WDIOC_KEEPALIVE:
545 		return ipmi_heartbeat();
546 
547 	case WDIOC_SETOPTIONS:
548 		i = copy_from_user(&val, argp, sizeof(int));
549 		if (i)
550 			return -EFAULT;
551 		if (val & WDIOS_DISABLECARD)
552 		{
553 			ipmi_watchdog_state = WDOG_TIMEOUT_NONE;
554 			ipmi_set_timeout(IPMI_SET_TIMEOUT_NO_HB);
555 			ipmi_start_timer_on_heartbeat = 0;
556 		}
557 
558 		if (val & WDIOS_ENABLECARD)
559 		{
560 			ipmi_watchdog_state = action_val;
561 			ipmi_set_timeout(IPMI_SET_TIMEOUT_FORCE_HB);
562 		}
563 		return 0;
564 
565 	case WDIOC_GETSTATUS:
566 		val = 0;
567 		i = copy_to_user(argp, &val, sizeof(val));
568 		if (i)
569 			return -EFAULT;
570 		return 0;
571 
572 	default:
573 		return -ENOIOCTLCMD;
574 	}
575 }
576 
577 static ssize_t ipmi_write(struct file *file,
578 			  const char  __user *buf,
579 			  size_t      len,
580 			  loff_t      *ppos)
581 {
582 	int rv;
583 
584 	if (len) {
585 	    	if (!nowayout) {
586 		    	size_t i;
587 
588 			/* In case it was set long ago */
589 			expect_close = 0;
590 
591     			for (i = 0; i != len; i++) {
592 				char c;
593 
594 				if (get_user(c, buf + i))
595 					return -EFAULT;
596 				if (c == 'V')
597 					expect_close = 42;
598 			}
599 		}
600 		rv = ipmi_heartbeat();
601 		if (rv)
602 			return rv;
603 		return 1;
604 	}
605 	return 0;
606 }
607 
608 static ssize_t ipmi_read(struct file *file,
609 			 char        __user *buf,
610 			 size_t      count,
611 			 loff_t      *ppos)
612 {
613 	int          rv = 0;
614 	wait_queue_t wait;
615 
616 	if (count <= 0)
617 		return 0;
618 
619 	/* Reading returns if the pretimeout has gone off, and it only does
620 	   it once per pretimeout. */
621 	spin_lock(&ipmi_read_lock);
622 	if (!data_to_read) {
623 		if (file->f_flags & O_NONBLOCK) {
624 			rv = -EAGAIN;
625 			goto out;
626 		}
627 
628 		init_waitqueue_entry(&wait, current);
629 		add_wait_queue(&read_q, &wait);
630 		while (!data_to_read) {
631 			set_current_state(TASK_INTERRUPTIBLE);
632 			spin_unlock(&ipmi_read_lock);
633 			schedule();
634 			spin_lock(&ipmi_read_lock);
635 		}
636 		remove_wait_queue(&read_q, &wait);
637 
638 		if (signal_pending(current)) {
639 			rv = -ERESTARTSYS;
640 			goto out;
641 		}
642 	}
643 	data_to_read = 0;
644 
645  out:
646 	spin_unlock(&ipmi_read_lock);
647 
648 	if (rv == 0) {
649 		if (copy_to_user(buf, &data_to_read, 1))
650 			rv = -EFAULT;
651 		else
652 			rv = 1;
653 	}
654 
655 	return rv;
656 }
657 
658 static int ipmi_open(struct inode *ino, struct file *filep)
659 {
660         switch (iminor(ino)) {
661         case WATCHDOG_MINOR:
662 		if (test_and_set_bit(0, &ipmi_wdog_open))
663                         return -EBUSY;
664 
665 		/* Don't start the timer now, let it start on the
666 		   first heartbeat. */
667 		ipmi_start_timer_on_heartbeat = 1;
668 		return nonseekable_open(ino, filep);
669 
670 	default:
671 		return (-ENODEV);
672         }
673 }
674 
675 static unsigned int ipmi_poll(struct file *file, poll_table *wait)
676 {
677 	unsigned int mask = 0;
678 
679 	poll_wait(file, &read_q, wait);
680 
681 	spin_lock(&ipmi_read_lock);
682 	if (data_to_read)
683 		mask |= (POLLIN | POLLRDNORM);
684 	spin_unlock(&ipmi_read_lock);
685 
686 	return mask;
687 }
688 
689 static int ipmi_fasync(int fd, struct file *file, int on)
690 {
691 	int result;
692 
693 	result = fasync_helper(fd, file, on, &fasync_q);
694 
695 	return (result);
696 }
697 
698 static int ipmi_close(struct inode *ino, struct file *filep)
699 {
700 	if (iminor(ino)==WATCHDOG_MINOR)
701 	{
702 		if (expect_close == 42) {
703 			ipmi_watchdog_state = WDOG_TIMEOUT_NONE;
704 			ipmi_set_timeout(IPMI_SET_TIMEOUT_NO_HB);
705 		} else {
706 			printk(KERN_CRIT PFX "Unexpected close, not stopping watchdog!\n");
707 			ipmi_heartbeat();
708 		}
709 		clear_bit(0, &ipmi_wdog_open);
710 	}
711 
712 	ipmi_fasync (-1, filep, 0);
713 	expect_close = 0;
714 
715 	return 0;
716 }
717 
718 static struct file_operations ipmi_wdog_fops = {
719 	.owner   = THIS_MODULE,
720 	.read    = ipmi_read,
721 	.poll    = ipmi_poll,
722 	.write   = ipmi_write,
723 	.ioctl   = ipmi_ioctl,
724 	.open    = ipmi_open,
725 	.release = ipmi_close,
726 	.fasync  = ipmi_fasync,
727 };
728 
729 static struct miscdevice ipmi_wdog_miscdev = {
730 	.minor		= WATCHDOG_MINOR,
731 	.name		= "watchdog",
732 	.fops		= &ipmi_wdog_fops
733 };
734 
735 static DECLARE_RWSEM(register_sem);
736 
737 static void ipmi_wdog_msg_handler(struct ipmi_recv_msg *msg,
738 				  void                 *handler_data)
739 {
740 	if (msg->msg.data[0] != 0) {
741 		printk(KERN_ERR PFX "response: Error %x on cmd %x\n",
742 		       msg->msg.data[0],
743 		       msg->msg.cmd);
744 	}
745 
746 	ipmi_free_recv_msg(msg);
747 }
748 
749 static void ipmi_wdog_pretimeout_handler(void *handler_data)
750 {
751 	if (preaction_val != WDOG_PRETIMEOUT_NONE) {
752 		if (preop_val == WDOG_PREOP_PANIC)
753 			panic("Watchdog pre-timeout");
754 		else if (preop_val == WDOG_PREOP_GIVE_DATA) {
755 			spin_lock(&ipmi_read_lock);
756 			data_to_read = 1;
757 			wake_up_interruptible(&read_q);
758 			kill_fasync(&fasync_q, SIGIO, POLL_IN);
759 
760 			spin_unlock(&ipmi_read_lock);
761 		}
762 	}
763 
764 	/* On some machines, the heartbeat will give
765 	   an error and not work unless we re-enable
766 	   the timer.   So do so. */
767 	pretimeout_since_last_heartbeat = 1;
768 }
769 
770 static struct ipmi_user_hndl ipmi_hndlrs =
771 {
772 	.ipmi_recv_hndl           = ipmi_wdog_msg_handler,
773 	.ipmi_watchdog_pretimeout = ipmi_wdog_pretimeout_handler
774 };
775 
776 static void ipmi_register_watchdog(int ipmi_intf)
777 {
778 	int rv = -EBUSY;
779 
780 	down_write(&register_sem);
781 	if (watchdog_user)
782 		goto out;
783 
784 	rv = ipmi_create_user(ipmi_intf, &ipmi_hndlrs, NULL, &watchdog_user);
785 	if (rv < 0) {
786 		printk(KERN_CRIT PFX "Unable to register with ipmi\n");
787 		goto out;
788 	}
789 
790 	ipmi_get_version(watchdog_user,
791 			 &ipmi_version_major,
792 			 &ipmi_version_minor);
793 
794 	rv = misc_register(&ipmi_wdog_miscdev);
795 	if (rv < 0) {
796 		ipmi_destroy_user(watchdog_user);
797 		watchdog_user = NULL;
798 		printk(KERN_CRIT PFX "Unable to register misc device\n");
799 	}
800 
801  out:
802 	up_write(&register_sem);
803 
804 	if ((start_now) && (rv == 0)) {
805 		/* Run from startup, so start the timer now. */
806 		start_now = 0; /* Disable this function after first startup. */
807 		ipmi_watchdog_state = action_val;
808 		ipmi_set_timeout(IPMI_SET_TIMEOUT_FORCE_HB);
809 		printk(KERN_INFO PFX "Starting now!\n");
810 	}
811 }
812 
813 #ifdef HAVE_NMI_HANDLER
814 static int
815 ipmi_nmi(void *dev_id, struct pt_regs *regs, int cpu, int handled)
816 {
817         /* If we are not expecting a timeout, ignore it. */
818 	if (ipmi_watchdog_state == WDOG_TIMEOUT_NONE)
819 		return NOTIFY_DONE;
820 
821 	/* If no one else handled the NMI, we assume it was the IPMI
822            watchdog. */
823 	if ((!handled) && (preop_val == WDOG_PREOP_PANIC)) {
824 		/* On some machines, the heartbeat will give
825 		   an error and not work unless we re-enable
826 		   the timer.   So do so. */
827 		pretimeout_since_last_heartbeat = 1;
828 		panic(PFX "pre-timeout");
829 	}
830 
831 	return NOTIFY_DONE;
832 }
833 
834 static struct nmi_handler ipmi_nmi_handler =
835 {
836 	.link     = LIST_HEAD_INIT(ipmi_nmi_handler.link),
837 	.dev_name = "ipmi_watchdog",
838 	.dev_id   = NULL,
839 	.handler  = ipmi_nmi,
840 	.priority = 0, /* Call us last. */
841 };
842 #endif
843 
844 static int wdog_reboot_handler(struct notifier_block *this,
845 			       unsigned long         code,
846 			       void                  *unused)
847 {
848 	static int reboot_event_handled = 0;
849 
850 	if ((watchdog_user) && (!reboot_event_handled)) {
851 		/* Make sure we only do this once. */
852 		reboot_event_handled = 1;
853 
854 		if (code == SYS_DOWN || code == SYS_HALT) {
855 			/* Disable the WDT if we are shutting down. */
856 			ipmi_watchdog_state = WDOG_TIMEOUT_NONE;
857 			panic_halt_ipmi_set_timeout();
858 		} else {
859 			/* Set a long timer to let the reboot happens, but
860 			   reboot if it hangs. */
861 			timeout = 120;
862 			pretimeout = 0;
863 			ipmi_watchdog_state = WDOG_TIMEOUT_RESET;
864 			panic_halt_ipmi_set_timeout();
865 		}
866 	}
867 	return NOTIFY_OK;
868 }
869 
870 static struct notifier_block wdog_reboot_notifier = {
871 	.notifier_call	= wdog_reboot_handler,
872 	.next		= NULL,
873 	.priority	= 0
874 };
875 
876 static int wdog_panic_handler(struct notifier_block *this,
877 			      unsigned long         event,
878 			      void                  *unused)
879 {
880 	static int panic_event_handled = 0;
881 
882 	/* On a panic, if we have a panic timeout, make sure that the thing
883 	   reboots, even if it hangs during that panic. */
884 	if (watchdog_user && !panic_event_handled) {
885 		/* Make sure the panic doesn't hang, and make sure we
886 		   do this only once. */
887 		panic_event_handled = 1;
888 
889 		timeout = 255;
890 		pretimeout = 0;
891 		ipmi_watchdog_state = WDOG_TIMEOUT_RESET;
892 		panic_halt_ipmi_set_timeout();
893 	}
894 
895 	return NOTIFY_OK;
896 }
897 
898 static struct notifier_block wdog_panic_notifier = {
899 	.notifier_call	= wdog_panic_handler,
900 	.next		= NULL,
901 	.priority	= 150	/* priority: INT_MAX >= x >= 0 */
902 };
903 
904 
905 static void ipmi_new_smi(int if_num)
906 {
907 	ipmi_register_watchdog(if_num);
908 }
909 
910 static void ipmi_smi_gone(int if_num)
911 {
912 	/* This can never be called, because once the watchdog is
913 	   registered, the interface can't go away until the watchdog
914 	   is unregistered. */
915 }
916 
917 static struct ipmi_smi_watcher smi_watcher =
918 {
919 	.owner    = THIS_MODULE,
920 	.new_smi  = ipmi_new_smi,
921 	.smi_gone = ipmi_smi_gone
922 };
923 
924 static int __init ipmi_wdog_init(void)
925 {
926 	int rv;
927 
928 	if (strcmp(action, "reset") == 0) {
929 		action_val = WDOG_TIMEOUT_RESET;
930 	} else if (strcmp(action, "none") == 0) {
931 		action_val = WDOG_TIMEOUT_NONE;
932 	} else if (strcmp(action, "power_cycle") == 0) {
933 		action_val = WDOG_TIMEOUT_POWER_CYCLE;
934 	} else if (strcmp(action, "power_off") == 0) {
935 		action_val = WDOG_TIMEOUT_POWER_DOWN;
936 	} else {
937 		action_val = WDOG_TIMEOUT_RESET;
938 		printk(KERN_INFO PFX "Unknown action '%s', defaulting to"
939 		       " reset\n", action);
940 	}
941 
942 	if (strcmp(preaction, "pre_none") == 0) {
943 		preaction_val = WDOG_PRETIMEOUT_NONE;
944 	} else if (strcmp(preaction, "pre_smi") == 0) {
945 		preaction_val = WDOG_PRETIMEOUT_SMI;
946 #ifdef HAVE_NMI_HANDLER
947 	} else if (strcmp(preaction, "pre_nmi") == 0) {
948 		preaction_val = WDOG_PRETIMEOUT_NMI;
949 #endif
950 	} else if (strcmp(preaction, "pre_int") == 0) {
951 		preaction_val = WDOG_PRETIMEOUT_MSG_INT;
952 	} else {
953 		preaction_val = WDOG_PRETIMEOUT_NONE;
954 		printk(KERN_INFO PFX "Unknown preaction '%s', defaulting to"
955 		       " none\n", preaction);
956 	}
957 
958 	if (strcmp(preop, "preop_none") == 0) {
959 		preop_val = WDOG_PREOP_NONE;
960 	} else if (strcmp(preop, "preop_panic") == 0) {
961 		preop_val = WDOG_PREOP_PANIC;
962 	} else if (strcmp(preop, "preop_give_data") == 0) {
963 		preop_val = WDOG_PREOP_GIVE_DATA;
964 	} else {
965 		preop_val = WDOG_PREOP_NONE;
966 		printk(KERN_INFO PFX "Unknown preop '%s', defaulting to"
967 		       " none\n", preop);
968 	}
969 
970 #ifdef HAVE_NMI_HANDLER
971 	if (preaction_val == WDOG_PRETIMEOUT_NMI) {
972 		if (preop_val == WDOG_PREOP_GIVE_DATA) {
973 			printk(KERN_WARNING PFX "Pretimeout op is to give data"
974 			       " but NMI pretimeout is enabled, setting"
975 			       " pretimeout op to none\n");
976 			preop_val = WDOG_PREOP_NONE;
977 		}
978 #ifdef CONFIG_X86_LOCAL_APIC
979 		if (nmi_watchdog == NMI_IO_APIC) {
980 			printk(KERN_WARNING PFX "nmi_watchdog is set to IO APIC"
981 			       " mode (value is %d), that is incompatible"
982 			       " with using NMI in the IPMI watchdog."
983 			       " Disabling IPMI nmi pretimeout.\n",
984 			       nmi_watchdog);
985 			preaction_val = WDOG_PRETIMEOUT_NONE;
986 		} else {
987 #endif
988 		rv = request_nmi(&ipmi_nmi_handler);
989 		if (rv) {
990 			printk(KERN_WARNING PFX "Can't register nmi handler\n");
991 			return rv;
992 		}
993 #ifdef CONFIG_X86_LOCAL_APIC
994 		}
995 #endif
996 	}
997 #endif
998 
999 	rv = ipmi_smi_watcher_register(&smi_watcher);
1000 	if (rv) {
1001 #ifdef HAVE_NMI_HANDLER
1002 		if (preaction_val == WDOG_PRETIMEOUT_NMI)
1003 			release_nmi(&ipmi_nmi_handler);
1004 #endif
1005 		printk(KERN_WARNING PFX "can't register smi watcher\n");
1006 		return rv;
1007 	}
1008 
1009 	register_reboot_notifier(&wdog_reboot_notifier);
1010 	notifier_chain_register(&panic_notifier_list, &wdog_panic_notifier);
1011 
1012 	printk(KERN_INFO PFX "driver initialized\n");
1013 
1014 	return 0;
1015 }
1016 
1017 static __exit void ipmi_unregister_watchdog(void)
1018 {
1019 	int rv;
1020 
1021 	down_write(&register_sem);
1022 
1023 #ifdef HAVE_NMI_HANDLER
1024 	if (preaction_val == WDOG_PRETIMEOUT_NMI)
1025 		release_nmi(&ipmi_nmi_handler);
1026 #endif
1027 
1028 	notifier_chain_unregister(&panic_notifier_list, &wdog_panic_notifier);
1029 	unregister_reboot_notifier(&wdog_reboot_notifier);
1030 
1031 	if (! watchdog_user)
1032 		goto out;
1033 
1034 	/* Make sure no one can call us any more. */
1035 	misc_deregister(&ipmi_wdog_miscdev);
1036 
1037 	/* Wait to make sure the message makes it out.  The lower layer has
1038 	   pointers to our buffers, we want to make sure they are done before
1039 	   we release our memory. */
1040 	while (atomic_read(&set_timeout_tofree))
1041 		schedule_timeout_uninterruptible(1);
1042 
1043 	/* Disconnect from IPMI. */
1044 	rv = ipmi_destroy_user(watchdog_user);
1045 	if (rv) {
1046 		printk(KERN_WARNING PFX "error unlinking from IPMI: %d\n",
1047 		       rv);
1048 	}
1049 	watchdog_user = NULL;
1050 
1051  out:
1052 	up_write(&register_sem);
1053 }
1054 
1055 static void __exit ipmi_wdog_exit(void)
1056 {
1057 	ipmi_smi_watcher_unregister(&smi_watcher);
1058 	ipmi_unregister_watchdog();
1059 }
1060 module_exit(ipmi_wdog_exit);
1061 module_init(ipmi_wdog_init);
1062 MODULE_LICENSE("GPL");
1063 MODULE_AUTHOR("Corey Minyard <minyard@mvista.com>");
1064 MODULE_DESCRIPTION("watchdog timer based upon the IPMI interface.");
1065