Datetime storage and display.

- Changed the storage format in order to avoid delimited arguments. - Basic date/time display macros. - Framework for easy definition collections of date/timeuser macros.

Author: mpg

.gitignore

@@ -1,3 +1,4 @@
 *.aux
 *.log
 *.gih
+*.pdf

git-info.sty

@@ -8,15 +8,7 @@
 \newcommand\githeadmail{GITHEADMAIL}
 \newcommand\githeadcommit{GITHEADCOMMIT}
 \newcommand\githeadbranch{GITHEADBRANCH}
-\newcommand\githeadyear{1970}
-\newcommand\githeadmonth{1}
-\newcommand\githeadday{1}
-\newcommand\githeadhour{0}
-\newcommand\githeadminute{0}
-\newcommand\githeadsecond{0}
-\newcommand\githeadtzsign{+}
-\newcommand\githeadtzhour{0}
-\newcommand\githeadtzminute{0}
+\newcommand\GI@head@datetime{{1970}{01}{01}{00}{00}{00}{+}{00}{00}}
 
 % semi-private settings
 \newcommand\GI@max@depth{8}
@@ -99,7 +91,7 @@
 \GI@set@export\githeadbranch{\githeadbranch}%
 \GI@set@export\githeadauthor{\githeadauthor}%
 \GI@set@export\githeadmail{\githeadmail}%
-\GI@set@export\githeaddatetime{\githeaddatetime}}%
+\GI@set@export\GI@head@datetime{\GI@head@datetime}}%
  \@tempa}
 
 % finding the path to head
@@ -233,11 +225,11 @@
  \GI@extract@year
  \GI@extract@month@day
  \edef\GI@datetime{%
-\GI@year-\GI@two@d{\the\GI@month}-\GI@two@d\GI@day 
-T\GI@two@d\GI@hour:\GI@two@d\GI@min:\GI@two@d\GI@sec
-\GI@tzsign\GI@two@d\GI@tzhour\GI@two@d\GI@tzmin}%
+{\GI@year}{\GI@two@d{\the\GI@month}}{\GI@two@d\GI@day}%
+{\GI@two@d\GI@hour}{\GI@two@d\GI@min}{\GI@two@d\GI@sec}%
+{\GI@tzsign}{\GI@two@d\GI@tzhour}{\GI@two@d\GI@tzmin}}%
  \edef\@tempa{\endgroup
-\GI@set@export@name{git#1datetime}{\GI@datetime}}
+\GI@set@export@name{GI@#1@datetime}{\GI@datetime}}
  \@tempa}
 
 \newcommand\GI@parse@timezone[5]{%
@@ -248,6 +240,66 @@
 \newcommand\GI@two@d[1]{%
  \ifnum#1<10 0\number#1\else \number#1\fi}
 
+% displaying date - internal macros
+
+\newcommand\GI@dt@date [9] {#1-#2-#3}
+\newcommand\GI@dt@time [9] {#4:#5:#6}
+\newcommand\GI@dt@timezone[9] {#7#8:#9}
+\newcommand\GI@dt@datetime[9] {#1-#2-#3T#4:#5:#6#7#8:#9}
+
+\newcommand\GI@dt@year [9] {#1}
+\newcommand\GI@dt@month [9] {#2}
+\newcommand\GI@dt@day [9] {#3}
+\newcommand\GI@dt@hour [9] {#4}
+\newcommand\GI@dt@min [9] {#5}
+\newcommand\GI@dt@sec [9] {#6}
+\newcommand\GI@dt@tzsign[9] {#7}
+\newcommand\GI@dt@tzhour[9] {#8}
+\newcommand\GI@dt@tzmin [9] {#9}
+
+\newcommand\GI@dt@today[9]{%
+ \@ifundefined{today}{%
+\PackageError{git-info}{%
+ \noexpand\today undefined! Did you load babel?}{%
+ You cannot use \noexpand\gitXXXtoday macros if
+ \noexpand\today is undefined.\MessageBreak
+ This macro is usually defined by the babel package.}%
+}{%
+\begingroup
+\year#1 \month#2 \day#3
+\today
+\endgroup}}
+
+% displaying date - defining user macros
+
+\newcommand\GI@def@dt@macro[2]{%
+ \begingroup
+ \edef\@tempa{\endgroup
+\noexpand\newcommand
+\expandafter\noexpand\csname git#1#2\endcsname{%
+ \noexpand\expandafter
+ \expandafter\noexpand\csname GI@dt@#2\endcsname
+ \expandafter\noexpand\csname GI@#1@datetime\endcsname}}%
+ \@tempa}
+
+\newcommand\GI@def@dt@collection[1]{%
+ \GI@def@dt@macro{#1}{today}%
+ \GI@def@dt@macro{#1}{datetime}%
+ \GI@def@dt@macro{#1}{date}%
+ \GI@def@dt@macro{#1}{time}%
+ \GI@def@dt@macro{#1}{timezone}%
+ \GI@def@dt@macro{#1}{year}%
+ \GI@def@dt@macro{#1}{month}%
+ \GI@def@dt@macro{#1}{day}%
+ \GI@def@dt@macro{#1}{hour}%
+ \GI@def@dt@macro{#1}{min}%
+ \GI@def@dt@macro{#1}{sec}%
+ \GI@def@dt@macro{#1}{tzsign}%
+ \GI@def@dt@macro{#1}{tzhour}%
+ \GI@def@dt@macro{#1}{tzmin}}
+
+\GI@def@dt@collection{head}
+
 % main
 
 \GI@check@repo@prefix

test-git-info.tex

@@ -1,6 +1,7 @@
 \documentclass{minimal}
 \usepackage[utf8]{inputenc}
 \usepackage[T1]{fontenc}
+\usepackage[english]{babel}
 \usepackage{ted, trace}
 \usepackage{git-info}
 
@@ -31,11 +32,27 @@
  \message{^^J#2: -=|#1|=-^^J}}
 
 \showval\githeadcommit{Git commit}
-\showval\githeaddatetime{Git datetime}
 \showval\githeadbranch{Git branch}
 \showval\githeadauthor{Git author}
 \showval\githeadmail{Git mail}
+\showval\githeaddatetime{Git head datetime}
+
+% \showval\githeaddate{Git head date}
+% \showval\githeadtime{Git head time}
+% \showval\githeadtimezone{Git head timezone}
+% \showval\githeadyear{Git head year}
+% \showval\githeadmonth{Git head month}
+% \showval\githeadday{Git head day}
+% \showval\githeadhour{Git head hour}
+% \showval\githeadmin{Git head min}
+% \showval\githeadsec{Git head sec}
+% \showval\githeadtzsign{Git head tzsing}
+% \showval\githeadtzhour{Git head tzhour}
+% \showval\githeadtzmin{Git head tzmin}
 
 \begin{document}
 
+% Not expandable, so must be tested in typesetting context only.
+Githeadtoday: -=|\githeadtoday|=-\par
+
 \end{document}