File: autoboot-helper

package info (click to toggle)
conmux 0.12.0-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 372 kB
  • sloc: exp: 1,772; perl: 1,361; python: 202; sh: 124; makefile: 52
file content (72 lines) | stat: -rwxr-xr-x 1,497 bytes parent folder | download | duplicates (5)
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
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
#! /usr/bin/expect
#
# autoboot-helper -- automatic boot helper
#
# Some machines have real issues rebooting.  This helper watches their
# console output for the telltale signs of a reboot in progress.  When
# spotted this triggers an automated 'manual' hardreset.  For use when
# machines fail to reboot at the BIOS level.
#
# (C) Copyright IBM Corp. 2004, 2005, 2006
# Author: Andy Whitcroft <andyw@uk.ibm.com>
#
# The Console Multiplexor is released under the GNU Public License V2
#
set P "autoboot-numaq"
log_user 0

if {$argc != 0} {
	puts stderr "Usage: $P"
	exit 1
}

proc note {msg} {
	global P
	puts stderr "$P: $msg"
}
proc warn {msg} {
	global P
	puts stderr "$P: $msg"
	puts "~\$msg $msg"
}

set timeout -1
set likely 0
expect_user {
	{TEST;} {
		warn "test trigger detected"
		exp_continue
	}
	{Unmounting file systems} {
		note "controlled reboot in progress ..."
		set likely [clock seconds]
		exp_continue
	}
	{Unmounting local filesystems...} {
		note "controlled reboot in progress ..."
		set likely [clock seconds]
		exp_continue
	}
	-ex {***** REBOOT LINUX *****} {
		note "fsck failure occured ..."
		set likely [clock seconds]
		exp_continue
	}
	{Restarting system.} {
		if {$likely != 0} {
			warn "shutdown complete, restart indicated"
			puts "~\$hardreset"
			set likely 0
		} else {
			warn "likely false positive"
		}
		exp_continue
	}
	"*\n" {
		if {$likely > 0 && ([clock seconds] - $likely) > 60} {
			warn "trigger timeout"
			set likely 0
		}
		exp_continue
	}
}