Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: orxonox.OLD/branches/hud/scripts/tardis-scratch-checkout.pl @ 10647

Last change on this file since 10647 was 8518, checked in by bensch, 18 years ago

merged the gui back to the trunk

  • Property svn:executable set to *
File size: 1.2 KB
Line 
1#!/usr/bin/perl
2
3
4
5$source = @ARGV[0];
6if ($source eq "help" || $source eq "h"){
7    print "ORXONOX checkout script for Tardis:\n usage:\n tardis-scratch-checkout.pl [branche]\n";
8    exit;
9  }
10if ($source eq "") {
11    $source = "trunk";
12  }
13
14$username = `whoami`;
15chomp $username;
16
17
18$URL = "https://svn.orxonox.net/orxonox/$source";
19$destination = "/scratch/$username\/orxonox/$source";
20
21  mkdir ("/scratch/$username");
22  mkdir ("/scratch/$username\/orxonox");
23
24  print("Checking out ORXONOX from '$URL' to '$destination'\n");
25
26  if (-e $destination)
27  {
28   open(SVN_UP, "svn up $destination |");
29   while(<SVN_UP>) {
30   print $_;
31   }
32  }
33  else
34  {
35   open(SVN_CO, "svn co $URL $destination |");
36   while(<SVN_CO>){
37    print $_;
38   }
39  }
40  chdir("$destination");
41
42
43  print "executing autogen.sh\n";
44  open( AUTOGEN , "./autogen.sh |");
45  while(<AUTOGEN>){
46   print $_;
47  }
48
49  print "executing configure for tardis\n";
50  open(CONFIGURE, "./configure --with-tardis |");
51  while(<CONFIGURE>){
52    printf $_;
53  }
54
55  print ("Executing make with opts -j3\n");
56  open(MAKE, "make -j3|");
57  while(<MAKE>) {
58    print $_;
59  }
60  printf("Finished checking out '$URL' to '$destination'\n");
61
Note: See TracBrowser for help on using the repository browser.