use strict;
use warnings;

use lib 'inc';
use MyBuilder;
use Config;
use File::Spec::Functions qw.catdir catfile.;
use File::Copy;

my $version = get_version();


my $builder = MyBuilder->new
  (
   module_name    => 'Text::BibTeX',
   license        => 'perl',
   dist_author    => ['Alberto Simões <ambs@cpan.org>',
                      'Greg Ward <gward@python.net>'],
   needs_compiler => 1,
   configure_requires => {
                          'Module::Build' => '0.36' ,
                          'Config::AutoConf'     => '0.16',
                          'ExtUtils::LibBuilder' => '0.02',
   },
   build_requires => {
                      'File::Copy'           => '0',
                      'Config::AutoConf'     => '0.16',
                      'ExtUtils::LibBuilder' => '0.02',
                      'Capture::Tiny'        => '0.06',
                      'ExtUtils::CBuilder'   => '0.27',
                      'Module::Build'        => '0.3603',
                     },
   add_to_cleanup => [
                      'Text-BibTeX-*',
# NOT SURE YET        'btparse/src/bt_config.h',
                      'btparse/src/*.so',
                      'btparse/src/*.dylib',
                      'btparse/src/*.dll',
                      'btparse/src/*.o',
                      'xscode/*.o',
                      'btparse/tests/*.o',
                      'btparse/progs/*.o',
                      'btparse/progs/dumpnames',
                      'btparse/progs/bibparse',
                      'btparse/progs/biblex',
                      'btparse/tests/postprocess_test',
                      'btparse/tests/read_test',
                      'btparse/tests/simple_test',
                      'btparse/tests/macro_test',
                      'btparse/tests/case_test',
                      'btparse/tests/name_test',
                      'btparse/tests/purify_test',
                     ],
  );

## HACK  HACK  HACK  HACK
my $libdir = $builder->install_destination("bin");
if ($^O =~ /mswin32/i) {
    $libdir = undef;
    # Find a place where we can write.
    my @folders = split /;/, $ENV{PATH};
    my $installed = 0;
    my $target = "text-bibtex.$$";
    while(@folders && !$installed) {
        $libdir = shift @folders;	

        copy("MANIFEST", catfile($libdir,$target));
        $installed = 1 if -f catfile($libdir, $target);
    }
    if (!$installed) {
        warn("Wasn't able to find a suitable place for libbtparse.dll!");
    } else {
        print STDERR "libbtparse.dll will be installed in $libdir\n";
        unlink catfile($libdir, $target);
    }
} else {
    if ($Config{archname} =~ /^x86_64/) {
        $libdir =~ s/\bbin\b/lib64/;
        if (!-d $libdir) {
            my $test = $libdir;
            $test =~ s/lib64/lib/;
            $libdir = $test if -d $test;
        }
    } else {
        $libdir =~ s/\bbin\b/lib/;
    }
}
$builder->notes('btparse_version' => $version);
$builder->notes('lib_path' => $libdir);
$builder->add_build_element('usrlib');
$builder->install_path( 'usrlib' => $libdir );

$builder->create_build_script;

sub get_version {
    my $version = undef;
    open PM, "lib/Text/BibTeX.pm" or die "Cannot open 'lib/Text/BibTeX.pm' for reading: $!\n";
    while (<PM>) {
        if (m!^our\s+\$VERSION\s*=\s*'([^']+)'!) {
            $version = $1;
            last;
        }
    }
    close PM;
    die "Could not find VERSION on your .pm file. Weirdo!\n" unless $version;
}