Skip to content
GitLab
Menu
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
b46303fa
Commit
b46303fa
authored
Oct 24, 2008
by
Jonathon Duerig
Browse files
Added a fetch for uuid to widearea nodes.
parent
a749a951
Changes
1
Hide whitespace changes
Inline
Side-by-side
tbsetup/ptopgen.in
View file @
b46303fa
...
...
@@ -704,7 +704,7 @@ if ($widearea) {
#
$result
=
DBQueryFatal
("
select n.node_id,nt.type,ns.status,r.pid,r.eid,wn.site,
"
.
"
i.iface,wn.bwlimit
"
.
"
i.iface,wn.bwlimit
,n.uuid
"
.
"
from nodes as n
"
.
"
left join node_types as nt on nt.type=n.type
"
.
"
left join reserved as r on r.node_id=n.node_id
"
.
...
...
@@ -724,7 +724,7 @@ if ($widearea) {
"
nt.isvirtnode=0 and
"
.
"
dedicated_wa_types.attrvalue is NULL)
");
while
((
$physnode
,
$ptype
,
$status
,
$mpid
,
$meid
,
$site
,
$iface
,
$bwlimit
)
while
((
$physnode
,
$ptype
,
$status
,
$mpid
,
$meid
,
$site
,
$iface
,
$bwlimit
,
$uuid
)
=
$result
->
fetchrow_array
)
{
my
$class
=
$typemap
{
$ptype
}
->
{'
CLASS
'};
my
@types
;
...
...
@@ -812,7 +812,7 @@ if ($widearea) {
}
if
(
$do_xml
)
{
print
"
<node name=
\"
$physnode
\"
>
\n
";
print
"
<node name=
\"
$physnode
\"
uuid=
\"
$uuid
\"
>
\n
";
print_node_types
(
@types
);
print_node_flags
(
@flags
);
print_node_features
(
@features
);
...
...
Write
Preview
Supports
Markdown
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