Whamcloud - gitweb
git://git.whamcloud.com
/
fs
/
lustre-release.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
LU-601 mdd: Fix transaction credits
[fs/lustre-release.git]
/
lustre
/
scripts
/
version_tag-git.pl
1
my ($tag, $fcoms, $hash);
2
3
sub get_buildid()
4
{
5
6
return $main::am_buildid;
7
8
}
9
10
sub is_pristine()
11
{
12
13
if ($fcoms > 0) {
14
return 0;
15
}
16
17
my $diffcount=`git diff | wc -l`;
18
if ($diffcount > 0) {
19
return 0;
20
}
21
22
return 1;
23
24
}
25
26
sub get_tag()
27
{
28
29
return $tag;
30
31
}
32
33
my $desc=`git describe --tags`;
34
$desc =~ /([^-]+)(?:-(.+)-(.+))?\n/;
35
$tag = $1;
36
$fcoms = $2;
37
$hash = $3;
38
39
1;