Update packages after creating chroot

This is useful when building for updates_testing or with additional
media as basesystem/urpmi/... were installed without those media.

2 files changed, 26 insertions, 0 deletions

diff --git a/lib/Iurt/Chroot.pm b/lib/Iurt/Chroot.pm
index 85b06c4..f0cf512 100644
--- a/lib/Iurt/Chroot.pm
+++ b/lib/Iurt/Chroot.pm
@@ -102,6 +102,11 @@ sub clean_and_build_chroot {
 	}
     }
 
+    # We may have media not used to create the chroot (when building for updates_testing
+    # or if using additional_media) so need to update basesystem packages.
+    my $urpmi = $run->{urpmi};
+    $urpmi->update($chroot);
+
     1;
 }
 
diff --git a/lib/Iurt/Urpmi.pm b/lib/Iurt/Urpmi.pm
index 7ac6a74..0430fd0 100644
--- a/lib/Iurt/Urpmi.pm
+++ b/lib/Iurt/Urpmi.pm
@@ -208,6 +208,27 @@ sub add_media {
     1;
 }
 
+sub update {
+    my ($self, $chroot) = @_;
+    my $run = $self->{run};
+    my $config = $self->{config};
+
+    plog('INFO', "updating packages in $chroot");
+
+    my $cmd = "chroot $chroot urpmi --auto-update --auto";
+    if ($run->{chrooted_urpmi}) {
+	$cmd = "urpmi --urpmi-root $chroot --auto-update --auto";
+    }
+    perform_command($cmd,
+		$run, $config,
+		mail => $config->{admin},
+		retry => 2,
+		use_iurt_root_command => 1,
+		debug_mail => $run->{debug})
+	or return;
+    1;
+}
+
 sub get_local_provides {
     my ($self) = @_;
     my $run = $self->{run};