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
a47aa7fe
Commit
a47aa7fe
authored
Nov 27, 2013
by
Mike Hibler
Browse files
Taint check some args.
parent
780d4c63
Changes
1
Hide whitespace changes
Inline
Side-by-side
tbsetup/bscontrol.in
View file @
a47aa7fe
...
...
@@ -163,7 +163,9 @@ if (defined($options{P})) {
}
}
if
(
defined
(
$options
{
s})) {
$size = $options{s};
if ($options{s} =~ /^(\d+)$/) {
$size = $1;
}
}
if
(
defined
(
$options
{
t
}))
{
$type
=
$options
{
t
};
...
...
@@ -591,8 +593,10 @@ sub bs_create($$$@)
if
(
!
defined
(
$size
))
{
fatal
("
create: must specify a size in MiB (-s)
");
}
if
(
!
defined
(
$name
)
||
$name
!~
/^[-\w]+$/
)
{
fatal
("
create: must specify a valid name
");
if
(
defined
(
$name
)
&&
$name
=~
/^([-\w]+)$/
)
{
$name
=
$
1
;
}
else
{
fatal
("
create: must specify a valid volume name
");
}
if
(
$leaseidx
!~
/^\d+$/
)
{
...
...
@@ -710,8 +714,10 @@ sub bs_destroy($$$@)
{
my
(
$srv
,
$pool
,
$size
,
$name
)
=
@_
;
if
(
!
defined
(
$name
)
||
$name
!~
/^[-\w]+$/
)
{
fatal
("
destroy: must specify a valid name
");
if
(
defined
(
$name
)
&&
$name
=~
/^([-\w]+)$/
)
{
$name
=
$
1
;
}
else
{
fatal
("
create: must specify a valid volume name
");
}
#
...
...
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