Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emulab
emulab-devel
Commits
e6934d6c
Commit
e6934d6c
authored
Apr 09, 2010
by
Leigh B Stoller
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Minor tweaks to deal with slots that defined but set to ''
parent
7a872e3d
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
12 additions
and
7 deletions
+12
-7
utils/dumpdescriptor.in
utils/dumpdescriptor.in
+12
-7
No files found.
utils/dumpdescriptor.in
View file @
e6934d6c
...
@@ -106,8 +106,9 @@ sub DumpImage($)
...
@@ -106,8 +106,9 @@ sub DumpImage($)
$xmlfields
{"
loadpart
"}
=
$image
->
loadpart
();
$xmlfields
{"
loadpart
"}
=
$image
->
loadpart
();
$xmlfields
{"
global
"}
=
$image
->
global
();
$xmlfields
{"
global
"}
=
$image
->
global
();
$xmlfields
{"
shared
"}
=
$image
->
shared
();
$xmlfields
{"
shared
"}
=
$image
->
shared
();
$xmlfields
{"
path
"}
=
$image
->
path
();
$xmlfields
{"
path
"}
=
$image
->
path
()
#$xmlfields{"mbr_version"} = $image->mbr_version();
if
(
defined
(
$image
->
path
())
&&
$image
->
path
()
ne
"");
$xmlfields
{"
mbr_version
"}
=
$image
->
mbr_version
();
sub
MapOS
($)
{
sub
MapOS
($)
{
my
(
$osid
)
=
@_
;
my
(
$osid
)
=
@_
;
...
@@ -135,9 +136,11 @@ sub DumpImage($)
...
@@ -135,9 +136,11 @@ sub DumpImage($)
fatal
("
Could not find osid for
$image
");
fatal
("
Could not find osid for
$image
");
}
}
$xmlfields
{"
OS
"}
=
$osinfo
->
OS
();
$xmlfields
{"
OS
"}
=
$osinfo
->
OS
();
$xmlfields
{"
version
"}
=
$osinfo
->
version
();
$xmlfields
{"
version
"}
=
$osinfo
->
version
()
if
(
defined
(
$osinfo
->
version
())
&&
$osinfo
->
version
()
ne
"");
$xmlfields
{"
op_mode
"}
=
$osinfo
->
op_mode
();
$xmlfields
{"
op_mode
"}
=
$osinfo
->
op_mode
();
$xmlfields
{"
osfeatures
"}
=
$osinfo
->
osfeatures
();
$xmlfields
{"
osfeatures
"}
=
$osinfo
->
osfeatures
()
if
(
defined
(
$osinfo
->
osfeatures
())
&&
$osinfo
->
osfeatures
()
ne
"");
$xmlfields
{"
reboot_waittime
"}
=
$osinfo
->
reboot_waittime
()
$xmlfields
{"
reboot_waittime
"}
=
$osinfo
->
reboot_waittime
()
if
(
defined
(
$osinfo
->
reboot_waittime
()));
if
(
defined
(
$osinfo
->
reboot_waittime
()));
}
}
...
@@ -165,13 +168,15 @@ sub DumpOS($)
...
@@ -165,13 +168,15 @@ sub DumpOS($)
$xmlfields
{"
osname
"}
=
$osinfo
->
osname
();
$xmlfields
{"
osname
"}
=
$osinfo
->
osname
();
$xmlfields
{"
pid
"}
=
$osinfo
->
pid
();
$xmlfields
{"
pid
"}
=
$osinfo
->
pid
();
$xmlfields
{"
OS
"}
=
$osinfo
->
OS
();
$xmlfields
{"
OS
"}
=
$osinfo
->
OS
();
$xmlfields
{"
version
"}
=
$osinfo
->
version
();
$xmlfields
{"
version
"}
=
$osinfo
->
version
()
if
(
defined
(
$osinfo
->
version
())
&&
$osinfo
->
version
()
ne
"");
$xmlfields
{"
path
"}
=
$osinfo
->
path
()
$xmlfields
{"
path
"}
=
$osinfo
->
path
()
if
(
defined
(
$osinfo
->
path
()));
if
(
defined
(
$osinfo
->
path
())
&&
$osinfo
->
path
()
ne
""
);
$xmlfields
{"
magic
"}
=
$osinfo
->
magic
()
$xmlfields
{"
magic
"}
=
$osinfo
->
magic
()
if
(
defined
(
$osinfo
->
magic
()));
if
(
defined
(
$osinfo
->
magic
()));
$xmlfields
{"
op_mode
"}
=
$osinfo
->
op_mode
();
$xmlfields
{"
op_mode
"}
=
$osinfo
->
op_mode
();
$xmlfields
{"
features
"}
=
$osinfo
->
osfeatures
();
$xmlfields
{"
features
"}
=
$osinfo
->
osfeatures
()
if
(
defined
(
$osinfo
->
osfeatures
())
&&
$osinfo
->
osfeatures
()
ne
"");
$xmlfields
{"
shared
"}
=
$osinfo
->
shared
();
$xmlfields
{"
shared
"}
=
$osinfo
->
shared
();
$xmlfields
{"
mustclean
"}
=
$osinfo
->
mustclean
();
$xmlfields
{"
mustclean
"}
=
$osinfo
->
mustclean
();
$xmlfields
{"
reboot_waittime
"}
=
$osinfo
->
reboot_waittime
()
$xmlfields
{"
reboot_waittime
"}
=
$osinfo
->
reboot_waittime
()
...
...
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