#!/usr/bin/perl

# vim: set ts=2 sw=2 tw=99 noet: 

use strict;

use Cwd;

use File::Basename;

use File::Path;

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

chdir($path);

require 'helpers.pm';

#Go back above build dir

chdir(Build::PathFormat('../../..'));

#Get the source path.

our ($root) = getcwd();

my $reconf = 0;

#Create output folder if it doesn't exist.

if (!(-d 'OUTPUT')) {

	$reconf = 1;

} else {

	if (-f 'OUTPUT/sentinel') {

		my @s = stat('OUTPUT/sentinel');

		my $mtime = $s[9];

		my @files = ('build/pushbuild.txt', 'build/AMBuildScript', 'build/product.version');

		my ($i);

		for ($i = 0; $i <= $#files; $i++) {

			if (IsNewer($files[$i], $mtime)) {

				$reconf = 1;

				last;

			}

		}

	} else {

		$reconf = 1;

	}

}

if ($reconf) {

	rmtree('OUTPUT');

	mkdir('OUTPUT') or die("Failed to create output folder: $!\n");

	chdir('OUTPUT');

	print "Attempting to reconfigure...\n";

	my ($os, $bits, $mode);

	$os = $ARGV[0];

	$bits = $ARGV[1];

	$mode = $ARGV[2];

	my ($prefix, $python);

	if ($^O eq "darwin") {

		$prefix = 'CC="ccache clang" CXX="ccache clang++" ';

		$python = 'python3';

	} elsif ($^O eq "linux") {

		$prefix = 'CC="ccache gcc-4.4" CXX="ccache g++-4.4" ';

		$python = 'python3';

	} elsif ($^O =~ /MSWin/) {

		$prefix = '';

		$python = "C:\\Python31\\Python.exe";

	}

	my ($cmdstring);

	$cmdstring = $prefix .

							 $python . ' ' .

							 Build::PathFormat('../build/configure.py') . ' ';

	if ($mode eq 'release') {

		$cmdstring .= '--enable-optimize ';

	} else {

		$cmdstring .= '--enable-debug ';

	}

	if ($bits eq '32') {

		$cmdstring .= '--arch=x86 ';

	} else {

		$cmdstring .= '--arch-x64 ';

	}

	my ($result);

	$result = `$cmdstring`;

	print "$result\n";

	if ($? != 0) {

		die("Could not configure: $!\n");

	}

	open(FILE, '>sentinel');

	print FILE "this is nothing.\n";

	close(FILE);

}

sub IsNewer

{

	my ($file, $time) = (@_);

	my @s = stat($file);

	my $mtime = $s[9];

	return $mtime > $time;

}

exit(0);