 aaebf43320
			
		
	
	
	aaebf43320
	
	
	
		
			
			If CONFIG_AUTO_LOCALVERSION is set, the user is using a git-based tree, and the current HEAD is not referred to by any tags in .git/refs/tags/, append -g and the first 8 characters of the commit to the version string. This makes it easier to use git-bisect, and/or to do a daily build, without trampling on your older, working builds, or accidentally setting up conflicting sets of modules. Signed-off-by: Ryan Anderson <ryan@michonline.com> Signed-off-by: Sam Ravnborg <sam@ravnborg.org>
		
			
				
	
	
		
			56 lines
		
	
	
	
		
			1.3 KiB
			
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			56 lines
		
	
	
	
		
			1.3 KiB
			
		
	
	
	
		
			Perl
		
	
	
	
	
	
| #!/usr/bin/perl
 | |
| # Copyright 2004 - Ryan Anderson <ryan@michonline.com>  GPL v2
 | |
| 
 | |
| use strict;
 | |
| use warnings;
 | |
| use Digest::MD5;
 | |
| require 5.006;
 | |
| 
 | |
| if (@ARGV != 1) {
 | |
| 	print <<EOT;
 | |
| Usage: setlocalversion <srctree>
 | |
| EOT
 | |
| 	exit(1);
 | |
| }
 | |
| 
 | |
| my ($srctree) = @ARGV;
 | |
| chdir($srctree);
 | |
| 
 | |
| my @LOCALVERSIONS = ();
 | |
| 
 | |
| # We are going to use the following commands to try and determine if this
 | |
| # repository is at a Version boundary (i.e, 2.6.10 vs 2.6.10 + some patches) We
 | |
| # currently assume that all meaningful version boundaries are marked by a tag.
 | |
| # We don't care what the tag is, just that something exists.
 | |
| 
 | |
| # Git/Cogito store the top-of-tree "commit" in .git/HEAD
 | |
| # A list of known tags sits in .git/refs/tags/
 | |
| #
 | |
| # The simple trick here is to just compare the two of these, and if we get a
 | |
| # match, return nothing, otherwise, return a subset of the SHA-1 hash in
 | |
| # .git/HEAD
 | |
| 
 | |
| sub do_git_checks {
 | |
| 	open(H,"<.git/HEAD") or return;
 | |
| 	my $head = <H>;
 | |
| 	chomp $head;
 | |
| 	close(H);
 | |
| 
 | |
| 	opendir(D,".git/refs/tags") or return;
 | |
| 	foreach my $tagfile (grep !/^\.{1,2}$/, readdir(D)) {
 | |
| 		open(F,"<.git/refs/tags/" . $tagfile) or return;
 | |
| 		my $tag = <F>;
 | |
| 		chomp $tag;
 | |
| 		close(F);
 | |
| 		return if ($tag eq $head);
 | |
| 	}
 | |
| 	closedir(D);
 | |
| 
 | |
| 	push @LOCALVERSIONS, "g" . substr($head,0,8);
 | |
| }
 | |
| 
 | |
| if ( -d ".git") {
 | |
| 	do_git_checks();
 | |
| }
 | |
| 
 | |
| printf "-%s\n", join("-",@LOCALVERSIONS) if (scalar @LOCALVERSIONS > 0);
 |