From 5341c5d48c20d41301a0c167006ed05564e3b68d Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Wed, 29 Jun 2005 03:00:46 +0000 Subject: Add rurpmi --- rurpmi | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 rurpmi (limited to 'rurpmi') diff --git a/rurpmi b/rurpmi new file mode 100644 index 00000000..21a9c0ba --- /dev/null +++ b/rurpmi @@ -0,0 +1,15 @@ +#!/usr/bin/perl -T + +use strict; +use urpm::msg; + +if ($< != 0) { + print STDERR N("Only superuser is allowed to install packages"), "\n"; + exit 1; +} + +$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; -- cgit v1.2.1