Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
emulab-devel
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Labels
Merge Requests
0
Merge Requests
0
Analytics
Analytics
Repository
Value Stream
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Commits
Open sidebar
Elijah Grubb
emulab-devel
Commits
1da13062
Commit
1da13062
authored
Dec 07, 2010
by
Leigh B Stoller
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Minor tweaks.
parent
940c886b
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
17 deletions
+5
-17
db/geni_control.in
db/geni_control.in
+5
-17
No files found.
db/geni_control.in
View file @
1da13062
...
...
@@ -43,6 +43,7 @@ use Node;
use
libGeni
;
use
GeniResource
;
use
GeniHRN
;
use
GeniXML
;
sub
fatal
($);
sub
AllocNodes
();
...
...
@@ -51,7 +52,6 @@ sub Register();
sub
UnRegister
();
sub
ClearAll
();
sub
StartAll
();
sub
RestartAll
();
sub
StopAll
();
sub
WaitAll
();
sub
PurgeAll
();
...
...
@@ -90,7 +90,7 @@ my $eid = shift;
my
$action
=
shift
;
if
(
$action
=~
/^(alloc|free|clear|wait|purge|start|
restart|
mapnodes|status|stop|register|unregister||manifests|renew)$/
)
{
/^(alloc|free|clear|wait|purge|start|mapnodes|status|stop|register|unregister||manifests|renew)$/
)
{
$action
=
$
1
;
}
else
{
...
...
@@ -176,10 +176,6 @@ SWITCH: for ($action) {
StartAll
();
last
SWITCH
;
};
/^restart$/
&&
do
{
RestartAll
();
last
SWITCH
;
};
/^stop$/
&&
do
{
StopAll
();
last
SWITCH
;
...
...
@@ -280,18 +276,10 @@ sub PurgeAll()
sub
StartAll
()
{
libGeni::
StartSlivers
(
$experiment
,
$this_user
,
0
,
$debug
)
==
0
or
libGeni::
StartSlivers
(
$experiment
,
$this_user
,
$debug
)
==
0
or
fatal
("
Cannot start slivers!
\n
");
}
sub
RestartAll
()
{
libGeni::
StartSlivers
(
$experiment
,
$this_user
,
1
,
$debug
)
==
0
or
fatal
("
Cannot restart slivers!
\n
");
return
0
;
}
sub
StopAll
()
{
my
@resources
=
GeniResource
->
LookupAll
(
$experiment
);
...
...
@@ -354,7 +342,7 @@ sub GetManifests()
next
;
}
print
STDERR
Dumper
(
$manifest
);
print
STDERR
Dumper
(
GeniXML::
Serialize
(
$manifest
,
1
)
);
}
return
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