Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-devel
Commits
e0aff8cb
Commit
e0aff8cb
authored
Mar 22, 2001
by
Leigh B. Stoller
Browse files
Hacky fix for sharks, but what about the sharks isn't hacky?
parent
c93ce461
Changes
1
Hide whitespace changes
Inline
Side-by-side
tbsetup/console_setup.in
View file @
e0aff8cb
...
...
@@ -53,18 +53,33 @@ foreach my $node (@nodes) {
if
(
$node
=~
/^([-\@\w.]+)$/
)
{
$node
=
$
1
;
}
else
{
die
("
Tainted node name:
$node
");
}
#
# Need the project for the node since that is the group.
#
$db_result
=
$DB
->
query
("
select pid from reserved where node_id='
$node
'
");
if
(
$db_result
->
numrows
==
1
)
{
#
# HACK! If its a shark shelf, then need a wildcard query so we can
# the nodes.
#
if
(
$node
=~
/sh\d+/
)
{
$db_result
=
$DB
->
query
("
select pid from reserved where node_id like '
$node
%'
");
}
else
{
$db_result
=
$DB
->
query
("
select pid from reserved where node_id='
$node
'
");
}
if
(
$db_result
->
numrows
>
0
)
{
@row
=
$db_result
->
fetchrow_array
();
$pid
=
$row
[
0
];
}
else
{
$pid
=
$TBPID
;
}
$cmdargs
=
"
$cmdargs
$node
$pid
";
}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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