HG_REPOSITORIES/LPP/INSTRUMENTATION/USERS/JEANDET/qtcharts Files · test/scripts/build.pl

First draft of new (universal) build script(s) for bamboo

Jani Honkonen - - Load All Authors

File last commit:

r1132:f8e33580b2a2


                r1132:f8e33580b2a2

Download file

             build.pl
        
                    47 lines
            
             | 1.3 KiB
            
                | text/plain
            
             |
                PerlLexer
            
             / test / scripts / build.pl
          
                    History
                
                 |
                  Annotation
                 | Raw
                 |Copy content
                 |Copy permalink

      use lib 'test/scripts'; # for IniFiles

      use File::Basename;

      use IniFiles;

      use feature "switch";

      # read command line params

      my $jobname = shift;

      # read ini file

      my $scriptdir = File::Basename::dirname($0);

      my $inifile = $scriptdir . "/jobs.ini";

      my %cfg;

      tie %cfg, 'Config::IniFiles', ( -file => $inifile );

      # get section from ini by jobname

      my %build = %{$cfg{$jobname}};

      # print out the ini settings

      print "\n\n$jobname\n";

      print "**********\n";

      foreach (keys %build) {

      	print $_ . " : " . $build{$_} . "\n";

      }

      # examine the platform

      given ($build{'Platform'}) {

      	when ("Win7") {

      		# construct a build command	

      		my @cmd;

      		if ($build{'ToolChain'} eq "mingw") {

      			@cmd = ($scriptdir . "\\build_win_mingw.bat", $build{'QtDir'}, $build{'Config'}, $build{'MinGWDir'});

      		}

      		if ($build{'ToolChain'} eq "vs2005") {

      			@cmd = ($scriptdir . "\\build_win_vs2005.bat", $build{'QtDir'}, $build{'Config'});

      		}

      		if ($build{'ToolChain'} eq "vs2008") {

      			@cmd = ($scriptdir . "\\build_win_vs2008.bat", $build{'QtDir'}, $build{'Config'});

      		}

      		if ($build{'ToolChain'} eq "vs2010") {

      			@cmd = ($scriptdir . "\\build_win_vs2010.bat", $build{'QtDir'}, $build{'Config'});

      		}

      		# run the build command

      		system (@cmd) == 0 or die "system @cmd failed: $?";

      	}

      	default {

      		die "Unknown platform " . $build{'Platform'};

      	}

      }

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

				use lib 'test/scripts'; # for IniFiles
				use File::Basename;
				use IniFiles;
				use feature "switch";

				# read command line params
				my $jobname = shift;

				# read ini file
				my $scriptdir = File::Basename::dirname($0);
				my $inifile = $scriptdir . "/jobs.ini";
				my %cfg;
				tie %cfg, 'Config::IniFiles', ( -file => $inifile );

				# get section from ini by jobname
				my %build = %{$cfg{$jobname}};

				# print out the ini settings
				print "\n\n$jobname\n";
				print "**********\n";
				foreach (keys %build) {
				print $_ . " : " . $build{$_} . "\n";
				}

				# examine the platform
				given ($build{'Platform'}) {
				when ("Win7") {
				# construct a build command
				my @cmd;
				if ($build{'ToolChain'} eq "mingw") {
				@cmd = ($scriptdir . "\\build_win_mingw.bat", $build{'QtDir'}, $build{'Config'}, $build{'MinGWDir'});
				}
				if ($build{'ToolChain'} eq "vs2005") {
				@cmd = ($scriptdir . "\\build_win_vs2005.bat", $build{'QtDir'}, $build{'Config'});
				}
				if ($build{'ToolChain'} eq "vs2008") {
				@cmd = ($scriptdir . "\\build_win_vs2008.bat", $build{'QtDir'}, $build{'Config'});
				}
				if ($build{'ToolChain'} eq "vs2010") {
				@cmd = ($scriptdir . "\\build_win_vs2010.bat", $build{'QtDir'}, $build{'Config'});
				}
				# run the build command
				system (@cmd) == 0 or die "system @cmd failed: $?";
				}
				default {
				die "Unknown platform " . $build{'Platform'};
				}
				}