]>
git.ipfire.org Git - thirdparty/dracut.git/blob - git2spec.pl
13 open( GIT
, 'git log -p --pretty=email --stat -m --first-parent --reverse --binary '.$tag.'..HEAD |');
16 if (/^From [a-z0-9]{40} .*$/) {
17 $fname = sprintf("%04d", $n++).".patch";
18 open FH
, ">".$pdir."/".$fname;
21 if (/^---$/ && $f == 1) {
31 use POSIX
qw(strftime);
32 my $datestr = strftime
"%Y%m%d", gmtime;
36 $tag=`git describe --abbrev=0 --tags` if not defined $tag;
38 my @patches=&create_patches
($tag, $pdir);
39 my $num=$#patches + 2;
40 $tag=~s/[^0-9]+?([0-9]+)/$1/ if $tag !~ /\b[0-9a-f]{5,40}\b/;
41 my $release="$num.git$datestr";
42 $release="1" if $num == 1;
46 print "Version: $tag\n";
48 elsif (/^%define dist_free_release/) {
49 print "%define dist_free_release $release\n";
51 elsif ((/^Source0:/) || (/^Source:/)) {
56 print "Patch$num: $_\n";