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
3f18341f
Commit
3f18341f
authored
Aug 01, 2017
by
Leigh B Stoller
Browse files
Add sorting on protolans dump for easier debugging.
parent
afc2ce96
Changes
1
Hide whitespace changes
Inline
Side-by-side
db/Lan.pm.in
View file @
3f18341f
...
...
@@ -2217,7 +2217,7 @@ sub Dump($)
"(" . $self->{'
LINK
'}->vname() . ") " : "");
my $string = "ProtoLan: $vname $type,$link";
foreach my $key (keys(%{ $self->{"ATTRS"} })) {
foreach my $key
(sort
(keys(%{ $self->{"ATTRS"} }))
)
{
my $pattr = $self->{"ATTRS"}->{$key};
my $val = $pattr->{'
attrvalue
'};
...
...
@@ -2225,7 +2225,7 @@ sub Dump($)
}
$string .= ", ";
foreach my $key (keys(%{ $self->{"MEMBERS"} })) {
foreach my $key
(sort
(keys(%{ $self->{"MEMBERS"} }))
)
{
my $member = $self->{"MEMBERS"}->{$key};
my $nodeid = $member->{'
node
'}->node_id();
my $iface = $member->{'
iface
'};
...
...
@@ -2233,7 +2233,7 @@ sub Dump($)
$string .= "$nodeid:$iface, ";
}
foreach my $key (keys(%{ $self->{"IFACES"} })) {
foreach my $key
(sort
(keys(%{ $self->{"IFACES"} }))
)
{
my $interface = $self->{"IFACES"}->{$key};
my $nodeid = $interface->{'
node
'}->node_id();
my $vnode = $interface->{'
vnode
'};
...
...
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