Flummi/amxmodx
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Update the rest of the buildbot scripts for AMBuild.

Browse Source 
Former-commit-id: ef3e192105c8c7f3905a2ceb82df4751d51cc013
This commit is contained in:
David Anderson
2014-02-08 21:45:40 -08:00
parent 426771deda
commit e56cd58d70
4 changed files with 48 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
support/buildbot/package.pl
View File

@@ -1,4 +1,5 @@
#!/usr/bin/perl
# vim: set ts=4 sts=4 sw=4 tw=99 noet:
use strict;
use Cwd;
@@ -28,7 +29,7 @@ require 'helpers.pm';
my ($version);
$version = Build::ProductVersion(Build::PathFormat('../../product.version'));
$version .= '-hg' . Build::HgRevNum('.');
$version .= '-git' . Build::GitRevNum('.');
#Switch to the output folder.
chdir(Build::PathFormat('../../../OUTPUT'));
@@ -38,9 +39,33 @@ my (@packages,@mac_exclude);
@mac_exclude = ('esf', 'ns', 'ts');
my ($major,$minor) = ($version =~ /^(\d+)\.(\d+)/);
$ftp_path .= "/$major.$minor";
my ($i);
for ($i = 0; $i <= $#packages; $i++) {
my ($filename);
next if (($^O eq "darwin") && ($packages[$i] ~~ @mac_exclude));
if ($^O eq "linux") {
$filename = "amxmodx-$version-" . $packages[$i] . "-linux.tar.gz";
} elsif ($^O eq "darwin") {
$filename = "amxmodx-$version-" . $packages[$i] . "-mac.zip";
} else {
$filename = "amxmodx-$version-" . $packages[$i] . "-windows.zip";
}
unlink($filename);
chdir(Build::PathFormat("packages/" . $packages[$i]));
if ($^O eq "linux") {
Build::Command("tar zcvf $filename addons");
} else {
Build::Command("zip -r $filename addons");
}
Build::Move($filename, Build::PathFormat('../../'));
chdir(Build::PathFormat('../..'));
}
my ($ftp);
$ftp_path .= "/$major.$minor";
$ftp = Net::FTP->new($ftp_host, Debug => 0, Passive => 0)
or die "Cannot connect to host $ftp_host: $@";
@@ -51,11 +76,10 @@ $ftp->login($ftp_user, $ftp_pass)
if ($ftp_path ne '')
{
$ftp->cwd($ftp_path)
or die "Cannot change to folder $ftp_path: " . $ftp->message . "\n";
or die "Cannot change to folder $ftp_path: " . $ftp->message . "\n";
}
$ftp->binary();
my ($i);
for ($i = 0; $i <= $#packages; $i++) {
my ($filename);
if ($^O eq "linux") {