diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-06-29 03:12:42 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-06-29 03:12:42 +0000 |
commit | 597568d4296cd255a3cfcf49ef24da3f8d7d7a25 (patch) | |
tree | 018bf311d7f96bda7d67dcef4d43f7cda9324750 | |
parent | 5341c5d48c20d41301a0c167006ed05564e3b68d (diff) | |
download | urpmi-597568d4296cd255a3cfcf49ef24da3f8d7d7a25.tar urpmi-597568d4296cd255a3cfcf49ef24da3f8d7d7a25.tar.gz urpmi-597568d4296cd255a3cfcf49ef24da3f8d7d7a25.tar.bz2 urpmi-597568d4296cd255a3cfcf49ef24da3f8d7d7a25.tar.xz urpmi-597568d4296cd255a3cfcf49ef24da3f8d7d7a25.zip |
Untaint rurpmi arguments
-rw-r--r-- | rurpmi | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -2,6 +2,7 @@ use strict; use urpm::msg; +use urpm::util qw(untaint); if ($< != 0) { print STDERR N("Only superuser is allowed to install packages"), "\n"; @@ -12,4 +13,4 @@ $ENV{PATH} = "/sbin:/usr/sbin:/bin:/usr/bin:/usr/X11R6/bin"; delete @ENV{qw(ENV BASH_ENV IFS CDPATH PERLLIB PERL5LIB PERL5OPT PERLIO PERLIO_DEBUG PERL5DB PERL_ENCODING PERL_HASH_SEED PERL_SIGNALS PERL_UNICODE)}; print STDERR N("Running urpmi in restricted mode..."), "\n"; -exec '/usr/bin/perl', '/usr/sbin/urpmi', '--restricted', @ARGV; +exec '/usr/bin/perl', '/usr/sbin/urpmi', '--restricted', map { untaint $_ } @ARGV; |