Fix typo and gcc-7 warnings (#401)

[proxmark3-svn] / tools / mkversion.pl

diff --git a/tools/mkversion.pl b/tools/mkversion.pl
index 6f2eff69bdc6031d599b2b9af74dc8370075fa05..19616441ad15e0338e688b02c6d8be84bb7f9ace 100644 (file)
--- a/tools/mkversion.pl
+++ b/tools/mkversion.pl
@@ -3,58 +3,30 @@
 # Normally a couple of lines of bash would be enough (see openpcd project, original firmware by Harald Welte and Milosch Meriac)
 # but this will, at least in theory, also work on Windows with our current compile environment.
 # -- Henryk Plötz <henryk@ploetzli.ch> 2009-09-28
 # Normally a couple of lines of bash would be enough (see openpcd project, original firmware by Harald Welte and Milosch Meriac)
 # but this will, at least in theory, also work on Windows with our current compile environment.
 # -- Henryk Plötz <henryk@ploetzli.ch> 2009-09-28

+# Modified april 2014 because of the move to github. 
+# --- Martin Holst Swende <martin@swende.se>

 
 

-my $main_dir = shift;

 
 

-# Clear environment locale so that svn will not use localized strings
+# Clear environment locale so that git will not use localized strings

 $ENV{'LC_ALL'} = "C";
 $ENV{'LANG'} = "C";
 
 $ENV{'LC_ALL'} = "C";
 $ENV{'LANG'} = "C";
 

-my $svnversion = 0;
+my $gitversion = `git describe --dirty`;
+my $gitbranch = `git rev-parse --abbrev-ref HEAD`;

 my $clean = 2;
 my @compiletime = gmtime();
 
 my $clean = 2;
 my @compiletime = gmtime();
 

-# Strategy one: call svn info and extract last changed revision, call svn status and look for ^M
-if(open(SVNINFO, "svn info $main_dir|")) {
-       while(<SVNINFO>) {
-               if (/^Last Changed Rev: (.*)/) {
-                       $svnversion = $1;
-                       ## last; # Do not abort here, since SVN tends to complain about a Broken pipe
-               }
-       }
-       close(SVNINFO);
+my $fullgitinfo = $gitbranch . '/' . $gitversion;

 
 

-       if(open(SVNSTATUS, "svn status $main_dir|")) {
-               $clean = 1;
-               while(<SVNSTATUS>) {
-                       if(/^M/) {
-                               $clean = 0;
-                               ## last;
-                       }
-               }
-               close(SVNINFO);
-       }
+$fullgitinfo =~ s/(\s)//g;

 
 

-} else {
-       # Strategy two: look for .svn/entries. The third line should be "dir", the fourth line should contain
-       #  the currently checked out revision, the eleventh line should contain the last changed revision.
-       #  revision.
-       if(open(ENTRIES, "$main_dir/.svn/entries")) {
-               my $i = 1;
-               while(<ENTRIES>) {
-                       last if($i == 3 and !/^dir/);
-                       if($i == 11 and /^([0-9]*)/) {
-                               $svnversion = $1;
-                       }
-                       $i++;
-               }
-       }
-}
+# Crop so it fits within 50 characters
+$fullgitinfo =~ s/.{50}\K.*//s;

 
 $compiletime[4] += 1;
 $compiletime[5] += 1900;
 my $ctime = sprintf("%6\$04i-%5\$02i-%4\$02i %3\$02i:%2\$02i:%1\$02i", @compiletime);
 
 $compiletime[4] += 1;
 $compiletime[5] += 1900;
 my $ctime = sprintf("%6\$04i-%5\$02i-%4\$02i %3\$02i:%2\$02i:%1\$02i", @compiletime);

-$svnversion=~ s/(^\s+|\s+$)//g;
+

 
 print <<EOF
 #include "proxmark3.h"
 
 print <<EOF
 #include "proxmark3.h"


@@ -64,7 +36,7 @@ const struct version_information __attribute__((section(".version_information"))
        1,
        1,
        $clean,
        1,
        1,
        $clean,

-       "svn $svnversion",
+       "$fullgitinfo",

        "$ctime",
 };
 EOF
        "$ctime",
 };
 EOF