Changeset 593 for trunk/technical/common


Ignore:
Timestamp:
Sep 4, 2002, 1:36:19 PM (22 years ago)
Author:
pstorz
Message:

Abfrage geändert

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/technical/common/build/buildall.pl

    r589 r593  
    22# automatisches buildskript fuer smartclient
    33# liest die konfiguration aus der mit -b übergebenen Datei
    4 # $Id: buildall.pl,v 1.1 2002/09/03 14:13:10 pstorz Exp $
     4# $Id: buildall.pl,v 1.2 2002/09/04 11:36:19 pstorz Exp $
    55use Getopt::Std;
    66
     
    1313getopts('b:');
    1414
     15if (!$opt_b)
     16{die "usage: buildall.pl -b buildlist\n";
     17};
     18
    1519(open(BUILDLIST,$opt_b)) || die "Die Buildlist $opt_b  konnte nicht gefunden werden";
    1620
     
    1923  {
    2024    next if (/^\#.*$/);
    21     if (/([\w\/]+)\s*:([\/\w\-\+\.]+)\s+:?((\s*\-\-\w*)*)$/)
     25#    if (/([\w\/]+)\s*:([\/\w\-\+\.]+)\s+:((\s*\-\-\w*)*)$/)
     26    if (/(\S+)\s*:(\S+)\s*:(\S+)\s*$/)
    2227      {
    2328        ($dir, $arch, $opt) = ($1, $2, $3);
     
    2833  }
    2934
     35
     36
     37print "What will be done:\n";
     38print "Path\tDistribution\tBuildoptions\n";
    3039for $i (0 .. $#ArrayofBuilds)
    3140  {
    32   print("$ArrayofBuilds[$i][0]\t$ArrayofBuilds[$i][1]\t$ArrayofBuilds[$i][2]\n");
     41    print("$ArrayofBuilds[$i][0]\t\t$ArrayofBuilds[$i][1]\t\t$ArrayofBuilds[$i][2]\n");
     42  }
     43print "\n\n\n ATTENTION: the srpms from the directory external/SuSE  must be built before!\n";
     44print "to build srpms, goto dir external/SuSE, execute build_srpms.sh script!\n\n\n";
     45print 'Are the srpms built and all options OK? (y/n)';
     46
     47$answer =<STDIN>;
     48chomp ($answer);
     49if ($answer ne "y") {die("canceled")};
     50
     51for $i (0 .. $#ArrayofBuilds)
     52  {
     53  print("$ArrayofBuilds[$i][0]\t\t$ArrayofBuilds[$i][1]\t\t$ArrayofBuilds[$i][2]\n");
    3354  $mypath = $smartclient_root.$ArrayofBuilds[$i][0];
    3455
     
    4263    }
    4364  $ENV{'BUILD_DIST'}=$ArrayofBuilds[$i][1];
     65  $ENV{'BUILD_DIST'}=$ArrayofBuilds[$i][1];
     66 
    4467#  system "./test.sh";
    4568  $_=$ArrayofBuilds[$i][0];
    4669  print "$_ \n";
    4770  tr/\//\_/;
    48   $logfilename = $_.".log";
     71  $logfilename = $_.".$ArrayofBuilds[$i][1].log";
    4972  print "++++++++++++++++++++++++++++++++++++++++++\n";
    5073  print "executing command: cd $mypath; $build 2>&1 |tee $logfilename\n";
    5174  print "BUILD_DIST ist $ENV{'BUILD_DIST'}\n";
    5275  print "BUILD_MODE ist $ENV{'BUILD_MODE'}\n";
    53 
     76 
    5477  print "writing logfile to $logfilename \n";
    5578  print "++++++++++++++++++++++++++++++++++++++++++\n";
Note: See TracChangeset for help on using the changeset viewer.