summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/rcsinfo
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-13 00:05:07 +0000
committerKarl Berry <karl@freefriends.org>2006-01-13 00:05:07 +0000
commit36a632f815600b3413b5313e2380c6dc1dc06645 (patch)
treef3cc6df25e82bf1022a5fbe360ee8505ecbe0825 /Master/texmf-dist/tex/latex/rcsinfo
parent8a5f8d3f095f3705a41728225843e55a7130893f (diff)
rcsinfo
git-svn-id: svn://tug.org/texlive/trunk@1268 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/rcsinfo')
-rw-r--r--Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.cfg66
-rw-r--r--Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.sty302
2 files changed, 368 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.cfg b/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.cfg
new file mode 100644
index 00000000000..1d42e9e5de0
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.cfg
@@ -0,0 +1,66 @@
+%%
+%% This is file `rcsinfo.cfg',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% rcsinfo.dtx (with options: `header,config')
+%%
+%% IMPORTANT NOTICE:
+%%
+%% For the copyright see the source file.
+%%
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from rcsinfo.cfg.
+%%
+%% For distribution of the original source see the terms
+%% for copying and modification in the file rcsinfo.dtx.
+%%
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%% `rcsinfo' package to use with LaTeX2e.
+%%
+%% This package is used to extract the revision and file information provided
+%% by the RCS revision control system.
+%% A PERL-package supporting rcsinfo and LaTeX2HTML is provieded too.
+%%
+%% Copyright (C) 1995 Dr. Juergen Vollmer
+%% Viktoriastrasse 15, D-76133 Karlsruhe, Germany
+%% Juergen.Vollmer@informatik-vollmer.de
+%% License:
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License Distributed from CTAN
+%% archives in directory macros/latex/base/lppl.txt; either
+%% version 1 of the License, or any later version.
+%%
+%% If you find this software useful, please send me a postcard.
+%%
+%% $Id: rcsinfo.dtx,v 1.7 2005/02/25 08:37:03 vollmer draft vollmer $
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+%% \CheckSum{397}
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+
+\ExecuteOptions{fancyhdr}
+\endinput
+%%
+%% End of file `rcsinfo.cfg'.
diff --git a/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.sty b/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.sty
new file mode 100644
index 00000000000..0baf60b0ae3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/rcsinfo/rcsinfo.sty
@@ -0,0 +1,302 @@
+%%
+%% This is file `rcsinfo.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% rcsinfo.dtx (with options: `header,package')
+%%
+%% IMPORTANT NOTICE:
+%%
+%% For the copyright see the source file.
+%%
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from rcsinfo.sty.
+%%
+%% For distribution of the original source see the terms
+%% for copying and modification in the file rcsinfo.dtx.
+%%
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%% `rcsinfo' package to use with LaTeX2e.
+%%
+%% This package is used to extract the revision and file information provided
+%% by the RCS revision control system.
+%% A PERL-package supporting rcsinfo and LaTeX2HTML is provieded too.
+%%
+%% Copyright (C) 1995 Dr. Juergen Vollmer
+%% Viktoriastrasse 15, D-76133 Karlsruhe, Germany
+%% Juergen.Vollmer@informatik-vollmer.de
+%% License:
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License Distributed from CTAN
+%% archives in directory macros/latex/base/lppl.txt; either
+%% version 1 of the License, or any later version.
+%%
+%% If you find this software useful, please send me a postcard.
+%%
+%% $Id: rcsinfo.dtx,v 1.7 2005/02/25 08:37:03 vollmer draft vollmer $
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+%% \CheckSum{397}
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{rcsinfo}[2005/02/20 v1.10]
+\newcount\@rcsInfoDay
+\newcount\@rcsInfoMonth
+\newcount\@rcsInfoYear
+\newcount\@rcsInfoYearTmp
+\newcount\@rcsInfoMonthTmp
+\newcount\@rcsInfoDayTmp
+\newif\if@rcsInfoToday@
+\DeclareOption{today}{
+ \@rcsInfoToday@true
+}
+\DeclareOption{notoday}{
+ \@rcsInfoToday@false
+}
+\newif\if@rcsInfoUseFancy@
+\newif\if@rcsInfoUseFancyhdr@
+\newif\if@rcsInfoUseScrpage@
+\DeclareOption{fancy}{
+ \@rcsInfoUseFancy@true
+ \@rcsInfoUseFancyhdr@false
+ \@rcsInfoUseScrpage@false
+}
+\DeclareOption{fancyhdr}{
+ \@rcsInfoUseFancy@false
+ \@rcsInfoUseFancyhdr@true
+ \@rcsInfoUseScrpage@false
+}
+\DeclareOption{scrpage2}{
+ \@rcsInfoUseFancy@false
+ \@rcsInfoUseFancyhdr@false
+ \@rcsInfoUseScrpage@true
+}
+\DeclareOption{nofancy}{
+ \@rcsInfoUseFancy@false
+ \@rcsInfoUseFancyhdr@false
+ \@rcsInfoUseScrpage@false
+}
+\newif\if@rcsInfoLong@
+\DeclareOption{long}{
+ \@rcsInfoLong@true
+}
+\DeclareOption{short}{
+ \@rcsInfoLong@false
+}
+\newif\if@rcsInfoDateHyphen@
+\DeclareOption{datehyphen}{
+ \@rcsInfoDateHyphen@true
+}
+\ExecuteOptions{today,long}
+\IfFileExists{rcsinfo.cfg}{\input{rcsinfo.cfg}}{}
+\ProcessOptions
+\if@rcsInfoUseFancy@
+ \RequirePackage{fancyheadings}
+\fi
+\if@rcsInfoUseFancyhdr@
+ \RequirePackage{fancyhdr}
+\fi
+\if@rcsInfoUseScrpage@
+ \RequirePackage{scrpage2}
+\fi
+\def\today{\ifcase\month\or
+ January\or February\or March\or April\or May\or June\or
+ July\or August\or September\or October\or November\or December\fi
+ \space\number\day, \number\year}
+\newif\if@rcsInfoColonIsActive@
+
+\def\rcsInfo {
+ \catcode`\_=13
+ \ifnum\catcode`\:=13
+ \@rcsInfoColonIsActive@true
+ \catcode`:=12
+ \else
+ \@rcsInfoColonIsActive@false
+ \fi
+ \@rcsInfoReadArgs
+}
+
+\def\@rcsInfoReadArgs #1Id#2 {
+ \@rcsInfoDefaults
+ \if $#2 \let \@rcsInfoNext = \@rcsInfoEat
+ \else \let \@rcsInfoNext = \@rcsInfoEatColon
+ \fi
+ \if@rcsInfoColonIsActive@
+ \catcode`:=13
+ \fi
+ \@rcsInfoNext $Id#2
+}
+
+\def\@rcsInfoEat #1 {\catcode`\_=8}
+
+\def\@rcsInfoEatColon $Id:#1 {
+ \if $#1 \let \@rcsInfoNext = \@rcsInfoEat
+ \else \let \@rcsInfoNext = \@rcsInfoCrackAndEat
+ \fi
+ \@rcsInfoNext #1
+}
+
+\def\@rcsInfoCrackAndEat #1,v #2 #3 #4 #5 #6 #7 {
+ \@rcsInfoCrackString #1,v #2 #3 #4 #5 #6 #7
+ \@rcsInfoNext
+}
+
+\def\@rcsInfoCrackString #1,v #2 #3 #4 #5 #6 #7 {
+ \def\rcsInfoFile{#1}
+ \def\rcsInfoRevision{#2}
+ \def\rcsInfoTime{#4}
+ \def\rcsInfoOwner{#5}
+ \def\rcsInfoStatus{#6}
+ \write\@mainaux{\string\def\string\rcsInfoFILE{#1}}
+ \write\@mainaux{\string\def\string\rcsInfoREVISION{#2}}
+ \write\@mainaux{\string\def\string\rcsInfoTIME{#4}}
+ \write\@mainaux{\string\def\string\rcsInfoOWNER{#5}}
+ \write\@mainaux{\string\def\string\rcsInfoSTATUS{#6}}
+
+ \if $#7
+ \def\rcsInfoLocker{--not-locked--}
+ \write\@mainaux{\string\def\string\rcsInfoLocker{--not-locked--}}
+ \let \@rcsInfoNext = \relax
+ \else
+ \def\rcsInfoLocker{#7}
+ \write\@mainaux{\string\def\string\rcsInfoLocker{#7}}
+ \let \@rcsInfoNext = \@rcsInfoEat
+ \fi
+ \catcode`\_=8
+ \@rcsInfoSplitDate x#3x
+ \def\rcsInfoLongDate{\@rcsInfoToday}
+ \if@rcsInfoToday@
+ \year = \@rcsInfoYear
+ \month = \@rcsInfoMonth
+ \day = \@rcsInfoDay
+ \fi
+}
+\if@rcsInfoDateHyphen@
+\def\@rcsInfoSplitDate x#1-#2-#3x{
+ \@rcsInfoDay = #3
+ \@rcsInfoMonth= #2
+ \@rcsInfoYear = #1
+ \write\@mainaux{\string\def\string\rcsInfoDAY{#3}}
+ \write\@mainaux{\string\def\string\rcsInfoMONTH{#2}}
+ \write\@mainaux{\string\def\string\rcsInfoYEAR{#1}}
+}
+\else
+\def\@rcsInfoSplitDate x#1/#2/#3x{
+ \@rcsInfoDay = #3
+ \@rcsInfoMonth= #2
+ \@rcsInfoYear = #1
+ \write\@mainaux{\string\def\string\rcsInfoDAY{#3}}
+ \write\@mainaux{\string\def\string\rcsInfoMONTH{#2}}
+ \write\@mainaux{\string\def\string\rcsInfoYEAR{#1}}
+}
+\fi
+\def\@rcsInfoToday {%
+ \@rcsInfoYearTmp = \year
+ \@rcsInfoMonthTmp = \month
+ \@rcsInfoDayTmp = \day
+ \year = \@rcsInfoYear
+ \month = \@rcsInfoMonth
+ \day = \@rcsInfoDay
+ \today%
+ \year = \@rcsInfoYearTmp
+ \month = \@rcsInfoMonthTmp
+ \day = \@rcsInfoDayTmp
+}
+\def\@rcsInfoDefaults {
+ \@rcsInfoYear = \year
+ \@rcsInfoMonth = \month
+ \@rcsInfoDay = \day
+ \def\rcsInfoFile{--sourcefile--}
+ \def\rcsInfoDate{\the\@rcsInfoYear/\two@digits\@rcsInfoMonth/%
+ \two@digits\@rcsInfoDay}
+ \def\rcsInfoTime{--time--}
+ \def\rcsInfoRevision{--revision--}
+ \def\rcsInfoOwner{--owner--}
+ \def\rcsInfoStatus{--status--}
+ \def\rcsInfoLocker{--locker--}
+ \def\rcsInfoYear{\the\@rcsInfoYear}
+ \def\rcsInfoMonth{\the\@rcsInfoMonth}
+ \def\rcsInfoDay{\the\@rcsInfoDay}
+ \def\rcsInfoLongDate{\@rcsInfoToday}
+}
+\def\@rcsInfoFancyFoot {
+ \if@rcsInfoLong@
+ \def\@rcsInfoFancyInfo{{\footnotesize%
+ \emph{Rev: \rcsInfoRevision,
+ \rcsInfoStatus,
+ \rcsInfoLongDate}}}
+ \else
+ \def\@rcsInfoFancyInfo{{\footnotesize%
+ \emph{Rev: \rcsInfoRevision,
+ \rcsInfoStatus,
+ \rcsInfoDate}}}
+ \fi
+ \def\@rcsInfoFancyFile{{\footnotesize\emph{\rcsInfoFile}}}
+ \if@rcsInfoUseFancy@
+ \rfoot[\fancyplain{\@rcsInfoFancyFile}{\@rcsInfoFancyFile}]%
+ {\fancyplain{\@rcsInfoFancyInfo}{\@rcsInfoFancyInfo}}
+ \lfoot[\fancyplain{\@rcsInfoFancyInfo}{\@rcsInfoFancyInfo}]%
+ {\fancyplain{\@rcsInfoFancyFile}{\@rcsInfoFancyFile}}
+ \setlength{\footrulewidth}{0.4pt}
+ \setlength{\plainfootrulewidth}{0.4pt}
+ \fi
+ \if@rcsInfoUseFancyhdr@
+ \fancyfoot[LE,RO]{\@rcsInfoFancyInfo}
+ \fancyfoot[LO,RE]{\@rcsInfoFancyFile}
+ \fancyfoot[CO,CE]{\thepage}
+ \renewcommand{\footrulewidth}{0.4pt}
+ \fancypagestyle{plain}{%
+ \fancyfoot[LE,RO]{\@rcsInfoFancyInfo}
+ \fancyfoot[LO,RE]{\@rcsInfoFancyFile}
+ \fancyfoot[CO,CE]{\thepage}
+ \renewcommand{\footrulewidth}{0.4pt}
+ }
+ \fi
+ \if@rcsInfoUseScrpage@
+ \clearscrheadfoot
+ \ohead{\headmark}
+ \cfoot[\emph{\@rcsInfoFancyInfo}]{\emph{\@rcsInfoFancyInfo}}
+ \ifoot[\@rcsInfoFancyFile]{\@rcsInfoFancyFile}
+ \ofoot[\pagemark]{\pagemark}
+ \pagestyle{scrheadings}
+ \fi
+}
+
+\@rcsInfoDefaults
+
+\AtBeginDocument{
+ \if@rcsInfoUseFancy@
+ \@rcsInfoFancyFoot
+ \fi
+ \if@rcsInfoUseFancyhdr@
+ \@rcsInfoFancyFoot
+ \fi
+ \if@rcsInfoUseScrpage@
+ \@rcsInfoFancyFoot
+ \fi
+}
+\endinput
+%%
+%% End of file `rcsinfo.sty'.