#!/usr/bin/perl

use strict;
use Cwd;
use File::Basename;

my ($myself, $path) = fileparse($0);
chdir($path);

require 'helpers.pm';

chdir(Build::PathFormat('../builder'));
if ($^O eq "linux")
{
    Build::Command('make clean');
    Build::Command('make');
}
else
{
    Build::Command('"' . $ENV{'VC9BUILDER'} . '" /rebuild builder.csproj Release');
    Build::Command('move ' . Build::PathFormat('bin/Release/builder.exe') . ' .');
}

die "Unable to build builder tool!\n" unless -e 'builder.exe';

#Go back to main source dir.
chdir(Build::PathFormat('../..'));

#Get the source path.
our ($root) = getcwd();

#Create output folder if it doesn't exist.
if (!(-d 'OUTPUT')) {
    mkdir('OUTPUT') or die("Failed to create output folder: $!\n");
}

#Write the configuration file.
open(CONF, '>build.cfg') or die("Failed to write build.cfg: $!\n");
print CONF "OutputBase = " . Build::PathFormat($root . '/OUTPUT') . "\n";
print CONF "SourceBase = $root\n";
if ($^O eq "linux") 
{
    print CONF "BuilderPath = /usr/bin/make\n";
}
else
{
    print CONF "BuilderPath = " . $ENV{'VC9BUILDER'} . "\n";
    print CONF "PDBLog = $root\\OUTPUT\\pdblog.txt\n";
}
close(CONF);

#Do the annoying revision bumping.
#Linux needs some help here.
if ($^O eq "linux")
{
    Build::Command("flip -u modules.versions");
    Build::Command("flip -u tools/versionchanger.pl");
    Build::Command("chmod +x tools/versionchanger.pl");
}
Build::Command(Build::PathFormat('tools/versionchanger.pl') . ' --buildstring="-dev"');

#Bootstrap extensions that have complex dependencies

if ($^O eq "linux")
{
	BuildLibCurl_Linux();
}
else
{
	BuildLibCurl_Win32();
}

sub BuildLibCurl_Win32
{
	chdir("extensions\\curl\\curl-src\\lib");
	Build::Command('"' . $ENV{'VC9BUILDER'} . '" /rebuild build_libcurl.vcproj "LIB Release"');
	die "Unable to find libcurl.lib!\n" unless (-f "LIB-Release\\libcurl.lib");
	chdir("..\\..\\..\\..");
}

sub BuildLibCurl_Linux
{
	chdir("extensions/curl/curl-src");
	Build::Command("mkdir -p Release");
	Build::Command("chmod +x configure");
	chdir("Release");
	Build::Command("../configure --enable-static --disable-shared --disable-ldap --without-ssl --without-zlib");
	Build::Command("make");
	die "Unable to find libcurl.a!\n" unless (-f "lib/.libs/libcurl.a");
	chdir("../../../..");
}