Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
A
artoa4argo
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Wiki
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Package Registry
Container Registry
Model registry
Operate
Environments
Terraform modules
Monitor
Incidents
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
argoTools
artoa4argo
Commits
5b852918
Commit
5b852918
authored
5 years ago
by
leprob001
Browse files
Options
Downloads
Patches
Plain Diff
Added version info, showing the first eight characters of current commit hash.
parent
1dff61a4
No related branches found
Branches containing commit
No related tags found
Tags containing commit
No related merge requests found
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
lib/+artoa/+gui/main.m
+16
-0
16 additions, 0 deletions
lib/+artoa/+gui/main.m
lib/vendor/getGitInfo/getGitInfo.m
+154
-0
154 additions, 0 deletions
lib/vendor/getGitInfo/getGitInfo.m
lib/vendor/getGitInfo/license.txt
+24
-0
24 additions, 0 deletions
lib/vendor/getGitInfo/license.txt
with
194 additions
and
0 deletions
lib/+artoa/+gui/main.m
+
16
−
0
View file @
5b852918
...
...
@@ -171,5 +171,21 @@ artoaGui.main.shortcutHints.Units = 'normalized';
artoaGui
.
main
.
shortcutHints
.
Position
=
[
.
1
.
5
.
8
.
3
];
%% Version info
gitInfo
=
getGitInfo
();
artoaGui
.
main
.
textVersionInfo
=
uicontrol
(
...
'Parent'
,
artoaGui
.
figures
.
main
,
...
'String'
,
[
'Version 4.'
gitInfo
.
hash
(
1
:
8
)],
...
'Style'
,
'text'
,
...
'FontSize'
,
10
,
...
'Units'
,
'normalized'
,
...
'Background'
,
[
1
1
1
],
...
'Position'
,
[
.
68
.
03
.
3
.
05
]
...
);
end
This diff is collapsed.
Click to expand it.
lib/vendor/getGitInfo/getGitInfo.m
0 → 100755
+
154
−
0
View file @
5b852918
function
gitInfo
=
getGitInfo
()
% Get information about the Git repository in the current directory, including:
% - branch name of the current Git Repo
% -Git SHA1 HASH of the most recent commit
% -url of corresponding remote repository, if one exists
%
% The function first checks to see if a .git/ directory is present. If so it
% reads the .git/HEAD file to identify the branch name and then it looks up
% the corresponding commit.
%
% It then reads the .git/config file to find out the url of the
% corresponding remote repository. This is all stored in a gitInfo struct.
%
% Note this uses only file information, it makes no external program
% calls at all.
%
% This function must be in the base directory of the git repository
%
% Released under a BSD open source license. Based on a concept by Marc
% Gershow.
%
% Andrew Leifer
% Harvard University
% Program in Biophysics, Center for Brain Science,
% and Department of Physics
% leifer@fas.harvard.edu
% http://www.andrewleifer.com
% 12 September 2011
%
%
%
% Copyright 2011 Andrew Leifer. All rights reserved.
%
% Redistribution and use in source and binary forms, with or without modification, are
% permitted provided that the following conditions are met:
%
% 1. Redistributions of source code must retain the above copyright notice, this list of
% conditions and the following disclaimer.
%
% 2. Redistributions in binary form must reproduce the above copyright notice, this list
% of conditions and the following disclaimer in the documentation and/or other materials
% provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY <COPYRIGHT HOLDER> ''AS IS'' AND ANY EXPRESS OR IMPLIED
% WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
% FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> OR
% CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
% SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
% ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
% NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
% ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
%
% The views and conclusions contained in the software and documentation are those of the
% authors and should not be interpreted as representing official policies, either expressed
% or implied, of <copyright holder>.
gitInfo
=
[];
if
~
exist
(
'.git'
,
'file'
)
||
~
exist
(
'.git/HEAD'
,
'file'
)
%Git is not present
return
end
%Read in the HEAD information, this will tell us the location of the file
%containing the SHA1
text
=
fileread
(
'.git/HEAD'
);
parsed
=
textscan
(
text
,
'%s'
);
if
~
strcmp
(
parsed
{
1
}{
1
},
'ref:'
)
||
~
length
(
parsed
{
1
})
>
1
%the HEAD is not in the expected format.
%give up
return
end
path
=
parsed
{
1
}{
2
};
[
pathstr
,
name
,
ext
]
=
fileparts
(
path
);
branchName
=
name
;
%save branchname
gitInfo
.
branch
=
branchName
;
%Read in SHA1
SHA1text
=
fileread
(
fullfile
([
'.git/'
pathstr
],[
name
ext
]));
SHA1
=
textscan
(
SHA1text
,
'%s'
);
gitInfo
.
hash
=
SHA1
{
1
}{
1
};
%Read in config file
config
=
fileread
(
'.git/config'
);
%Find everything space delimited
temp
=
textscan
(
config
,
'%s'
,
'delimiter'
,
'\n'
);
lines
=
temp
{
1
};
remote
=
''
;
%Lets find the name of the remote corresponding to our branchName
for
k
=
1
:
length
(
lines
)
%Are we at the section describing our branch?
if
strcmp
(
lines
{
k
},[
'[branch "'
branchName
'"]'
])
m
=
k
+
1
;
%While we haven't run out of lines
%And while we haven't run into another section (which starts with
% an open bracket)
while
(
m
<=
length
(
lines
)
&&
~
strcmp
(
lines
{
m
}(
1
),
'['
)
)
temp
=
textscan
(
lines
{
m
},
'%s'
);
if
length
(
temp
{
1
})
>=
3
if
strcmp
(
temp
{
1
}{
1
},
'remote'
)
&&
strcmp
(
temp
{
1
}{
2
},
'='
)
%This is the line that tells us the name of the remote
remote
=
temp
{
1
}{
3
};
end
end
m
=
m
+
1
;
end
end
end
gitInfo
.
remote
=
remote
;
url
=
''
;
%Find the remote's url
for
k
=
1
:
length
(
lines
)
%Are we at the section describing our branch?
if
strcmp
(
lines
{
k
},[
'[remote "'
remote
'"]'
])
m
=
k
+
1
;
%While we haven't run out of lines
%And while we haven't run into another section (which starts with
% an open bracket)
while
(
m
<=
length
(
lines
)
&&
~
strcmp
(
lines
{
m
}(
1
),
'['
)
)
temp
=
textscan
(
lines
{
m
},
'%s'
);
if
length
(
temp
{
1
})
>=
3
if
strcmp
(
temp
{
1
}{
1
},
'url'
)
&&
strcmp
(
temp
{
1
}{
2
},
'='
)
%This is the line that tells us the name of the remote
url
=
temp
{
1
}{
3
};
end
end
m
=
m
+
1
;
end
end
end
gitInfo
.
url
=
url
;
\ No newline at end of file
This diff is collapsed.
Click to expand it.
lib/vendor/getGitInfo/license.txt
0 → 100644
+
24
−
0
View file @
5b852918
Copyright (c) 2011, Andrew
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are
met:
* Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
* Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in
the documentation and/or other materials provided with the distribution
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment