[Fai-commit] r5512 - in trunk: bin debian

[Thomas Lange]

Author: lange
Date: 2009-09-23 12:23:11 +0000 (Wed, 23 Sep 2009)
New Revision: 5512

Modified:
   trunk/bin/install_packages
   trunk/debian/changelog
Log:
  fix code that sets action if smarti is used, minor code cleanup,
  download Debian source packages into $FAI_DEBSOUCRESDIR if defined

Modified: trunk/bin/install_packages
===================================================================
--- trunk/bin/install_packages	2009-09-23 11:45:19 UTC (rev 5511)
+++ trunk/bin/install_packages	2009-09-23 12:23:11 UTC (rev 5512)
@@ -28,7 +28,7 @@
 # MA 02111-1307, USA.
 #*********************************************************************
 
-my $version = "Version 4.1.9, 23-september-2009";
+my $version = "Version 4.2, 23-september-2009";
 $0=~ s#.+/##; # remove path from program name
 
 # import variables: $verbose, $MAXPACKAGES, $classes, $FAI, $FAI_ROOT
@@ -63,6 +63,7 @@
 my $use_aptpkg=0;
 my $aptopt='-y -o Dpkg::Options::="--force-confdef" -o Dpkg::Options::="--force-confold"';
 my $downloaddir="/var/cache/apt/archives/partial/"; # where to download packages that gets only unpacked
+my $debsourcesdir='/var/tmp';
 
 $| = 1;
 
@@ -461,6 +462,10 @@
   print LIST "# List of all packages that will be installed\n";
   for (@known) { print LIST "$_\n"; }
   close(LIST);
+
+  # download debian source packages if $ENV{'FAI_DEBSOURCESDIR'} is defined
+  execute("$rootcmd (cd $debsourcesdir ; apt-get sources @known)");
+  execute("mv $FAI_ROOT/$debsourcesdir/*.deb $ENV{'FAI_DEBSOURCESDIR'}");
 }
 # - - - - - - - - - - - - - - - - - - - - - - - - - - -
 sub usage {

Modified: trunk/debian/changelog
===================================================================
--- trunk/debian/changelog	2009-09-23 11:45:19 UTC (rev 5511)
+++ trunk/debian/changelog	2009-09-23 12:23:11 UTC (rev 5512)
@@ -57,7 +57,8 @@
     Michael, that skip somme commands on softupdate
   * install_packages: do not call AptPkg function when -N was given
     write list of all packages to packages.list
-    fix code that sets action if smarti is used, minor code cleanup
+    fix code that sets action if smarti is used, minor code cleanup,
+    download Debian source packages into $FAI_DEBSOUCRESDIR if defined
   * 10-base-classes: replace --print-installation-architecture by
     --print-architecture
   * make-fai-nfsroot, DEMO/10-misc,FAIBASE/10-misc: chpasswd does not