diff options
author | Angelo Naselli <anaselli@linux.it> | 2015-06-27 00:00:29 +0200 |
---|---|---|
committer | Angelo Naselli <anaselli@linux.it> | 2015-06-27 00:00:29 +0200 |
commit | 5fa88cfef5cd638f897c1b73cc1f41ca602089b2 (patch) | |
tree | 4a5c5531162bab823cb0271586e03aeb1cd422a0 /lib/ManaTools | |
parent | 2484be8a4b62f59b2b88d1d06a7767a9e99d1a41 (diff) | |
download | manatools-5fa88cfef5cd638f897c1b73cc1f41ca602089b2.tar manatools-5fa88cfef5cd638f897c1b73cc1f41ca602089b2.tar.gz manatools-5fa88cfef5cd638f897c1b73cc1f41ca602089b2.tar.bz2 manatools-5fa88cfef5cd638f897c1b73cc1f41ca602089b2.tar.xz manatools-5fa88cfef5cd638f897c1b73cc1f41ca602089b2.zip |
added some more options
Diffstat (limited to 'lib/ManaTools')
-rw-r--r-- | lib/ManaTools/Shared/urpmi_backend/DB.pm | 109 |
1 files changed, 107 insertions, 2 deletions
diff --git a/lib/ManaTools/Shared/urpmi_backend/DB.pm b/lib/ManaTools/Shared/urpmi_backend/DB.pm index e646d8e6..d4baa24d 100644 --- a/lib/ManaTools/Shared/urpmi_backend/DB.pm +++ b/lib/ManaTools/Shared/urpmi_backend/DB.pm @@ -59,10 +59,11 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. use Moose; -use MDK::Common::File qw(cat_ mkdir_p); +use MDK::Common::File qw(cat_); use MDK::Common::Func qw(if_); use urpm; +use urpm::args; use urpm::media; use urpm::select; use urpm::mirrors; @@ -108,6 +109,103 @@ has 'rpm_root' => ( isa => 'Str' ); +#============================================================= + +=head2 new - optional parameters + +=head3 debug + + optional parameter - urpm debug option, + default value is undef + +=cut + +#============================================================= +has 'debug' => ( + is => 'rw', +); + +#============================================================= + +=head2 new - optional parameters + +=head3 wait_lock + + optional parameter - urpm wait_lock option, + default value is undef + +=cut + +#============================================================= +has 'wait_lock' => ( + is => 'rw', +); + +#============================================================= + +=head2 new - optional parameters + +=head3 verify_rpm + + optional parameter - urpm verify_rpm option, + default value is undef + +=cut + +#============================================================= +has 'verify_rpm' => ( + is => 'rw', +); + +#============================================================= + +=head2 new - optional parameters + +=head3 auto + + optional parameter - urpm auto option, + default value is undef + +=cut + +#============================================================= +has 'auto' => ( + is => 'rw', +); + +#============================================================= + +=head2 new - optional parameters + +=head3 set_verbosity + + optional parameter - urpm set_verbosity option, + default value is undef + +=cut + +#============================================================= +has 'set_verbosity' => ( + is => 'rw', +); + +#============================================================= + +=head2 new - optional parameters + +=head3 justdb + + optional parameter - urpm justdb option, + default value is undef + +=cut + +#============================================================= +has 'justdb' => ( + is => 'rw', +); + + # product_id contains the product id file pathname has 'product_id' => ( is => 'ro', @@ -129,7 +227,7 @@ sub _product_id_init { =head3 OUTPUT -URPM::DB: an URPM opened dataase + URPM::DB: an URPM opened dataase =head3 DESCRIPTION @@ -167,8 +265,15 @@ sub fast_open_urpmi_db { urpm::set_files($urpm, $self->urpmi_root()) if $self->urpmi_root(); my $rpm_root = $self->rpm_root() || $self->urpmi_root(); urpm::args::set_root($urpm, $rpm_root) if $rpm_root; + urpm::args::set_debug($urpm) if $self->debug(); $urpm->get_global_options; + $urpm->{options}{wait_lock} = $self->wait_lock() if $self->wait_lock(); + $urpm->{options}{'verify-rpm'} = $self->verify_rpm() if $self->verify_rpm(); + $urpm->{options}{auto} = $self->auto() if $self->auto(); + urpm::args::set_verbosity() if $self->set_verbosity(); + $urpm::args::options{justdb} = $self->justdb() if $self->justdb(); + urpm::media::read_config($urpm); $urpm; } |