From 59c94a0a96e936395186b2fc9e5aa3a20ad148da Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:51:46 +0000 Subject: authorindex git-svn-id: svn://tug.org/texlive/trunk@685 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/latex/authorindex/authorindex.sty | 125 +++++++++++++++++++++ 1 file changed, 125 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/authorindex/authorindex.sty (limited to 'Master/texmf-dist/tex/latex/authorindex') diff --git a/Master/texmf-dist/tex/latex/authorindex/authorindex.sty b/Master/texmf-dist/tex/latex/authorindex/authorindex.sty new file mode 100644 index 00000000000..58ea9f3a4a4 --- /dev/null +++ b/Master/texmf-dist/tex/latex/authorindex/authorindex.sty @@ -0,0 +1,125 @@ +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{authorindex}[2002/09/13 make index of authors cited in a work] +% \ainame and \aipages determine the format of the author name and the page +% list, respectively, and are to be \renewcommand-ed explicitly by the user. +% \aibibpage and \aifirstpage are styles for pages where works appear in the +% references and where the author is the first author of the work, respectively +\def\ainame#1{#1} +\def\aitop#1{#1} +\def\airep#1{#1} +\def\aifirst#1{#1} +\def\aipages#1{#1} +\def\aibibpage#1{#1} +\def\aifirstpage#1{#1} +% The following stuff can be changed via options to \usepackage +\newcommand\aisize{} +\def\@ainamefmt{} +\def\@aieditors{0} +\def\@aiwhat{pages} +% These Options will be handled directly by LaTeX +\DeclareOption{small}{\renewcommand\aisize{\small}} +\DeclareOption{normal}{\renewcommand\aisize{\normalsize}} +% These Options will go to the perl script and be used to build the .bst file. +\let\aioptions\@gobble +\DeclareOption{editors}{\renewcommand\@aieditors{2}} +\DeclareOption{avoideditors}{\renewcommand\@aieditors{1}} +\DeclareOption{onlyauthors}{\renewcommand\@aieditors{0}} +\DeclareOption{fullname}{\renewcommand\@ainamefmt{{vv }{ll}{, ff}{, jj}}} +\DeclareOption{lastname}{\renewcommand\@ainamefmt{{vv }{ll}}} +\DeclareOption{firstabbrev}{\renewcommand\@ainamefmt{{vv }{ll}{, f.}{, jj}}} +\DeclareOption{all}{\def\@aiwhich{9999}\def\@aitrunc{9999}} +\DeclareOption{onlyfirst}{\def\@aiwhich{1}\def\@aitrunc{1}} +\DeclareOption{miniindex}{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\aiinbibflag}\fi}}% +\DeclareOption{nocompress}{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\ainocompressflag}\fi}}% +\DeclareOption{pages}{\renewcommand\@aiwhat{pages}} +\DeclareOption{biblabels}{\renewcommand\@aiwhat{labels}} +\DeclareOption{withbib}{\AtBeginDocument{% + \let\@aiobibitem=\@bibitem\let\@aiolbibitem=\@lbibitem% + \def\@lbibitem[#1]#2{\@aiolbibitem[#1]{#2}% + \if@filesw{\protected@write\@auxout{} + {\string\bibpage{#2}{\theaipage}}}\fi\ignorespaces}% + \def\@bibitem#1{\@aiobibitem{#1}% + \if@filesw{\protected@write\@auxout{} + {\string\bibpage{#1}{\theaipage}}}\fi\ignorespaces}}}% +\ExecuteOptions{normal,fullname,all} +\ProcessOptions +% make sure options and filename are transfered to the perl script. +\expandafter\AtBeginDocument{\if@filesw\immediate{% + \write\@auxout{% + \string\aioptions{\@aieditors|\@ainamefmt|\@aiwhich|\@aitrunc|\@aiwhat}}% + \write\@auxout{\string\aifilename{\jobname.ain}}}% + \fi% + \def\aipagetypeorder{\@notprerr}% Generate error messages when used outside + \def\aimaxauthors{\@notprerr}% preamble. + \def\authorindexstyle{\@notprerr}% + \def\aisee{\@notprerr}% + \def\aitwosuffix{\@notprerr}% + \def\ainamefmt{\@notprerr}} +% Define commands to be put in the .aux file and only used by the perl script. +\let\pagetypeorder\@gobble +\let\aiseestring\@gobble +\let\aitwostring\@gobble +\let\ainocompressflag\relax +\let\aiinbibflag\relax +\let\aistyle\@gobble +\let\citationpage\@gobbletwo +\let\bibpage\@gobbletwo +\let\aiexplicit\@gobbletwo +\let\aifilename\@gobble +% By default, the numbers that appear in the index are the same that appear on +% the pages. In case this does not suffice for everybody (for example, in a 2 +% volume book, one might want the volume number appear in the index, but not +% in the page numbering) one can redefine this: +\def\theaipage{\thepage} +% determine the relative order of different numbering types (roman, arabic,...) +\def\aipagetypeorder#1{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\pagetypeorder{#1}}\fi}}% +% determine string by which first author is cross referenced +\def\aisee#1{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\aiseestring{#1}}\fi}}% +% determine string for abbreviation of two subsequent pages +\def\aitwosuffix#1{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\aitwostring{#1}}\fi}}% +% determines representation of miniindices +\def\aibibindex#1{\{\textbf{#1}\}} +\def\bibindex#1{\ifx\\#1\\\@bsphack\@esphack\else\aibibindex{#1}\fi} +% \authorindexstyle{x} writes \aistyle{x} to the .aux-file. x later will be +% used to select the x.bst as the bibstyle used to generate the author list +% from the database (overriding the generated .bst file). +\def\authorindexstyle#1{\AtBeginDocument{% + \if@filesw\immediate\write\@auxout{\string\aistyle{#1}}\fi}} +% determine formating and order of names +\def\ainamefmt#1{\def\@ainamefmt{#1}} +% Allow for other max. number of authors apart from 1 and 9999. +% First Argument lets us determine to how many authors to truncate the list. +\def\aimaxauthors{\@ifnextchar[\@aitruncmaxauthors\@aimaxauthors} +\def\@aitruncmaxauthors[#1]#2{\def\@aitrunc{#1}\def\@aiwhich{#2}} +\def\@aimaxauthors#1{\def\@aitrunc{#1}\def\@aiwhich{#1}} +% \aicite behaves similar to cite, but additionally writes for each key given +\def\@aicitey#1{% + \@for\@citeb:=#1\do + {\protected@write\@auxout{}% + {\string\citationpage{\@citeb}{\theaipage}}}} +\def\@aicitex[#1]#2{\@citex[#1]{#2}\@aicitey{#2}} +% \aicite behaves similar to cite, but additionally writes for each key given +\DeclareRobustCommand\aicite{% + \@ifnextchar [{\@tempswatrue\@aicitex}{\@tempswafalse\@aicitex[]}}% +\let\@oldnocite=\nocite +\def\ainocite#1{\@aicitey{#1}\@oldnocite{#1}} +\def\aionly{\@aicitey} +% \aimention gets authors BibTeX author name format to be included in the +% author index without having any reference of a work of that author. +\def\aimention#1{\@bsphack% + \protected@write\@auxout{}{\string\aiexplicit{#1}{\theaipage}}\@esphack} +% include author index +\newcommand\printauthorindex{\@input@{\jobname.ain}} +% the theauthorindex environment +\newenvironment{theauthorindex}{% + \raggedright% + \setlength{\leftskip}{1em}% + \setlength{\parindent}{-1em}% + \def\item[##1]{\par\hspace{0mm}\ainame{##1}} + \aisize}{\par} +\endinput -- cgit v1.2.3