1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
#!/usr/bin/env perl
use English;
use strict;
use warnings;
my $compilerText = `$ENV{CC} --version`;
my @compilerLines = split /\n/, $compilerText;
chomp @compilerLines;
my $git = `which git`;
my $gitHash = '';
if ($git && -d '.git') {
chomp $git;
my $hash = `$git rev-parse HEAD`;
chomp $hash;
my $dirty = '';
my @changed = `git diff-index --name-only HEAD`;
if (@changed) {
$dirty = '-dirty';
}
$gitHash = "\"Git hash: $hash$dirty\\n\"";
}
my $platform = `uname -srvmpio`;
chomp $platform;
print <<"EOF";
const char *libocxl_info =
"LibOCXL Version: $ENV{VERSION_MAJOR}.$ENV{VERSION_MINOR}.$ENV{VERSION_PATCH}\\n"
"CC: $ENV{CC}\\n"
"Compiler Version: $compilerLines[0]\\n"
"CFLAGS: $ENV{CFLAGS}\\n"
$gitHash
"Build platform: $platform\\n";
EOF
|
