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
09bc1be6
Commit
09bc1be6
authored
Apr 02, 2015
by
Jonathon Duerig
Browse files
Add restricted tag to shared vlans.
parent
beda9f97
Changes
1
Hide whitespace changes
Inline
Side-by-side
tbsetup/ptopgen.in
View file @
09bc1be6
...
...
@@ -2277,12 +2277,17 @@ sub print_header {
"
\"
/>
\n
";
}
}
my
$result
=
DBQueryFatal
("
select token from shared_vlans
"
.
"
where open=1
");
my
$result
=
DBQueryFatal
("
select token,open from shared_vlans
");
if
(
$result
->
rows
>
0
)
{
print
"
<rspec_shared_vlan xmlns=
\"
"
.
$sharedns
.
"
\"
>
\n
";
while
((
$token
)
=
$result
->
fetchrow_array
)
{
print
"
<available name=
\"
"
.
$token
.
"
\"
/>
\n
";
while
((
$token
,
$open
)
=
$result
->
fetchrow_array
)
{
print
"
<available name=
\"
"
.
$token
.
"
\"
";
my
$restricted
=
"
true
";
if
(
$open
)
{
$restricted
=
"
false
"
}
print
"
restricted=
\"
$restricted
\"
";
print
"
/>
\n
";
}
print
"
</rspec_shared_vlan>
\n
";
}
...
...
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