Changelog

Yang Tse (11 Jun 2009)

- I adapted testcurl script to allow building test harness programs when

  cross-compiling for a *-*-mingw* host.

Daniel Stenberg (10 Jun 2009)

- Fabian Keil ran clang on the (lib)curl code, found a bunch of warnings and

  contributed a range of patches to fix them.

    exit 1;

}

sub get_host_triplet {

  my $triplet;

  my $configfile = "$pwd/$build/lib/config.h";

  if(-f $configfile && -s $configfile && open(LIBCONFIGH, "<$configfile")) {

    while(<LIBCONFIGH>) {

      if($_ =~ /^\#define\s+OS\s+"*([^"][^"]*)"*\s*/) {

        $triplet = $1;

        last;

      }

    }

    close(LIBCONFIGH);

  }

  return $triplet;

}

if (open(F, "$setupfile")) {

  while (<F>) {

    if (/(\w+)=(.*)/) {

  } else {

    logit "the tests were successful!";

  }

} else {

  # dummy message to feign success

}

else {

  if($crosscompile) {

    logit "cross-compiling, can't run tests";

    # build test harness programs for selected cross-compiles

    my $host_triplet = get_host_triplet();

    if($host_triplet =~ /([^-]+)-([^-]+)-mingw(.*)/) {

      chdir "$pwd/$build/tests";

      logit_spaced "build test harness";

      open(F, "$make -i 2>&1 |") or die;

      open(LOG, ">$buildlog") or die;

      while (<F>) {

        s/$pwd//g;

        print;

        print LOG;

      }

      close(F);

      close(LOG);

      chdir "$pwd/$build";

    }

    logit_spaced "cross-compiling, can't run tests";

  }

  # dummy message to feign success

  print "TESTDONE: 1 tests out of 0 (dummy message)\n";

}