Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emulab
emulab-devel
Commits
49628455
Commit
49628455
authored
Sep 30, 2003
by
Leigh B. Stoller
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Commit some changes that I did last week. The plab monitord is still
awaiting word from Kirk.
parent
56ca54d1
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
22 additions
and
8 deletions
+22
-8
tbsetup/os_setup.in
tbsetup/os_setup.in
+3
-0
tbsetup/plab/plabmonitord.in
tbsetup/plab/plabmonitord.in
+4
-0
tbsetup/vnode_setup.in
tbsetup/vnode_setup.in
+15
-8
No files found.
tbsetup/os_setup.in
View file @
49628455
...
...
@@ -751,6 +751,9 @@ elsif (@vnodelist) {
# really working again.
#
MarkPhysNodeDown
(
$pnode
);
TBSetNodeLogEntry
(
$pnode
,
$dbuid
,
TB_DEFAULT_NODELOGTYPE
(),
"
Moved to hwdown;
"
.
"
plab node
$node
(
$pid
/
$eid
) failed to setup.
");
$failedplab
++
;
}
else
{
...
...
tbsetup/plab/plabmonitord.in
View file @
49628455
...
...
@@ -137,6 +137,10 @@ while (1) {
print
"
$pnode
brought back from the afterworld at
"
.
TimeStamp
()
.
"
\n
";
TBSetNodeLogEntry
(
$pnode
,
"
root
",
TB_DEFAULT_NODELOGTYPE
(),
"
Moved to
$PLABHOLDING_EID
;
"
.
"
plab node
$vnode
setup okay by monitor.
");
SENDMAIL
(
$TBOPS
,
"
$pnode
is alive
",
"
$pnode
has been brought back from the afterworld!
"
.
$TBOPS
);
...
...
tbsetup/vnode_setup.in
View file @
49628455
...
...
@@ -104,9 +104,10 @@ else {
}
#
# Verify permission to muck with this experiment.
# Verify permission to muck with this experiment. Note that this script
# is run as root from the plab monitor daemon.
#
if
(
!
TBAdmin
(
$UID
)
&&
if
(
$UID
&&
!
TBAdmin
(
$UID
)
&&
!
TBExptAccessCheck
(
$UID
,
$pid
,
$eid
,
TB_EXPT_DESTROY
))
{
die
("
*** $0:
\n
"
.
"
You do not have permission to mess with
$pid
/
$eid
!
\n
");
...
...
@@ -317,8 +318,8 @@ while (1) {
if
(
$plab
&&
$mode
eq
"
setup
")
{
if
(
system
("
$TB
/sbin/plabnode alloc
$pid
$eid
$vnode
"))
{
print
STDERR
"
*** $0:
\n
"
.
"
Plab node allocation failed
";
print
"
*** $0:
\n
"
.
"
Plab node allocation failed
\n
";
# Should check DB state instead.
exit
(
99
);
}
...
...
@@ -448,15 +449,21 @@ while (1) {
}
}
#
# In force node, do not bother with this other stuff.
#
exit
(
scalar
(
@failed_nodes
))
if
(
$force
);
#
# Send mail to testbed-ops about failed nodes
#
if
(
@failed_nodes
)
{
my
$failed_lines
=
join
("
\n
",
map
{
join
("
\t
",
@
{
$_
})
}
@failed_nodes
);
SENDMAIL
(
$TBOPS
,
"
Virtual Node failure for
$pid
/
$eid
",
"
The following virtual nodes failed:
\n
"
.
"
vnode
\t\t
pnode
\t
mode
\t
exit status
\n
"
.
$failed_lines
);
"
The following virtual nodes failed:
\n
"
.
"
vnode
\t\t
pnode
\t
mode
\t
exit status
\n
"
.
$failed_lines
);
}
if
(
$killmode
)
{
...
...
@@ -465,4 +472,4 @@ if ($killmode) {
else
{
print
STDOUT
"
Vnode setup initiated on all nodes ...
\n
";
}
exit
0
;
exit
(
0
)
;
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment