Changeset 596
- Timestamp:
- Sep 4, 2002, 4:43:59 PM (22 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/technical/common/build/buildall.pl
r594 r596 2 2 # automatisches buildskript fuer smartclient 3 3 # liest die konfiguration aus der mit -b übergebenen Datei 4 # $Id: buildall.pl,v 1. 3 2002/09/04 12:44:47pstorz Exp $4 # $Id: buildall.pl,v 1.4 2002/09/04 14:43:59 pstorz Exp $ 5 5 use Getopt::Std; 6 6 … … 63 63 } 64 64 $ENV{'BUILD_DIST'}=$ArrayofBuilds[$i][1]; 65 $ENV{'BUILD_DIST'}=$ArrayofBuilds[$i][1]; 65 66 66 67 67 # system "./test.sh"; … … 71 71 $logfilename = $_.".$ArrayofBuilds[$i][1].log"; 72 72 print "++++++++++++++++++++++++++++++++++++++++++\n"; 73 print "executing command: cd $mypath; $build 2>&1 |tee$logfilename\n";73 print "executing command: cd $mypath; $build 2>&1 > $logfilename\n"; 74 74 print "BUILD_DIST ist $ENV{'BUILD_DIST'}\n"; 75 75 print "BUILD_MODE ist $ENV{'BUILD_MODE'}\n"; 76 76 77 print "writing logfile to $logfilename \n"; 77 print "writing logfile to $logfilename \n\n\n"; 78 print "you can watch building with following command: \n"; 79 $workdir=`pwd`; 80 chomp $workdir; 81 print "less +F $workdir/$mypath/$logfilename\n"; 82 system "xterm -T \"build log for PACKET: $mypath ARCH:$ArrayofBuilds[$i][1] \" -e less +F $workdir/$mypath/$logfilename &"; 78 83 print "++++++++++++++++++++++++++++++++++++++++++\n"; 79 # system "cd $mypath; $build 2>&1 > $logfilename;" 80 system "cd $mypath; $build 2>&1 |tee $logfilename;" 84 $retval = system "cd $mypath; $build >$logfilename 2>&1;"; 85 # $retval = system "./exit.sh 2>&1 > $logfilename;"; 86 87 88 if ($retval == 0) 89 { 90 $ArrayofBuilds[$i][3]= "building of $ArrayofBuilds[$i][0] SUCCESSFULL:"; 91 print"****** ******\n"; 92 print"****** building of $ArrayofBuilds[$i][0] SUCCESSFULL: \n" ; 93 print"****** ******\n"; 94 } 95 else 96 { 97 $ArrayofBuilds[$i][3]="ERROR: building of $ArrayofBuilds[$i][0] UNSUCCESSDULL:\n"; 98 print"****** ******\n"; 99 print"\n\n\nERROR: building of $ArrayofBuilds[$i][0] UNSUCCESSFULL \n"; 100 print"****** ******\n"; 101 } 102 81 103 } 104 105 print "Building results:\n"; 106 107 for $i (0 .. $#ArrayofBuilds) 108 { 109 print("$ArrayofBuilds[$i][0]:Result: $ArrayofBuilds[$i][3]"); 110 } 111 112 113 82 114 83 115 print "buildall.pl terminated\n";
Note:
See TracChangeset
for help on using the changeset viewer.