#!/usr/bin/perl -w

my $ver_major=0;
my $ver_minor=0;
my $ver_build=0;

my $gtime = scalar gmtime;

# do nothing if target does not exist (last make failed)
exit if ((-f "version.h") and ($#ARGV>-1) and (! -f "$ARGV[0]"));

if (-f "version.h") {
  open (VERF,"version.h") or die "unable to open version.h for reading\n";
  while (<VERF>) {
    if (/define VERSION \"(\d+)\.(\d+)\.(-*\d+)\"/) {
      $ver_major = $1;
      $ver_minor = $2;
      $ver_build = $3;
    }
  }
  #print "major: $ver_major  minor: $ver_minor build: $ver_build\n";
  $ver_build++;
  close VERF;
}

open (VERF,">version.h") or die "unable to open version.h for writing\n";

print VERF "#define VERSION \"$ver_major.$ver_minor.$ver_build\"\n";
print VERF "#define BUILDTIME \"$gtime GMT\"\n";

close VERF;
