generic 1

git-svn-id: svn://tug.org/texlive/trunk@613 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 821 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty
new file mode 100644
index 00000000000..74569d864dc
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty
@@ -0,0 +1,543 @@
+% File:        thumbpdf.sty
+% Project:     thumbpdf
+% Version:     2005/07/06 v3.8
+% Author:      Heiko Oberdiek
+%
+% Function:    Inclusion of thumbnails
+%
+% Copyright:   Copyright (C) 1999-2005 Heiko Oberdiek.
+%
+%              This work may be distributed and/or modified under
+%              the conditions of the LaTeX Project Public License,
+%              either version 1.3 of this license or (at your option)
+%              any later version. The latest version of this license
+%              is in
+%                http://www.latex-project.org/lppl.txt
+%              and version 1.3 or later is part of all distributions
+%              of LaTeX version 2003/12/01 or later.
+%
+%              This work has the LPPL maintenance status "maintained".
+%
+%              This Current Maintainer of this work is Heiko Oberdiek.
+%
+%              See file `readme.txt' for a list of files that
+%              belong to this project.
+%
+% Requirement: * pdftex mode:
+%                * pdfTeX (plain or latex formats)
+%                * thumbnail data file: `<jobname>.tpt'
+%              * pdfmark mode:
+%                * Ghostscript 6.0, versions below do not work.
+%                  Eventually Adobe Distiller can work, but I
+%                  cannot test this.
+%                * thumbnail data file: `<jobname>.tpm'
+%              * Both thumbnail data files are generated by the
+%                perl script `thumbpdf(.pl)'.
+%
+% Use:         * LaTeX2e: \usepackage{thumbpdf}
+%                Options: pdftex,
+%                         pdfmark, dvips, ps2pdf
+%                         vtex, vtexpdfmark
+%              * plain:   \input thumbpdf.sty
+%                A driver can be defined previously:
+%                \def\ThumbpdfDriver{pdfmark}
+%              * It is not necessary to set driver `pdftex', `vtex',
+%                or `vtexpdfmark', because pdfTeX and VTeX are
+%                detected at run time. So package `thumbpdf'
+%                chooses the correct driver and ignores other
+%                specified drivers.
+%
+% History:     1999/02/14 v1.0:  first public release
+%              1999/02/23 v1.1:  bug in plain-\@thumbwarning removed.
+%              1999/03/01 v1.2:  \DefLastObj no longer needed.
+%              1999/03/12 v1.3:  Copyright: LPPL
+%              1999/05/05 v1.4:  added \the before \inputlineno.
+%                                sharing RGB objects.
+%              1999/06/13 v1.5
+%              1999/07/27 v1.6:  Bug of handling with \pdfpageattr
+%                                fixed. The same bug is in hyperref
+%                                versions below 6.64 (option
+%                                pagetransition).
+%                                Warning added, if there are missing
+%                                thumbnails.
+%              1999/08/08 v1.7:  Bug in \@ThumbPageAttr fixed
+%                                (introduced in version 1.6).
+%              1999/09/09 v1.8:  \PackageWarning does not work at
+%                                the beginning of \shipout, because
+%                                \protect has been set to \noexpand
+%                                (mysterious LaTeX behaviour?).
+%              1999/09/16 v1.9
+%              2000/01/11 v1.10: Revised.
+%              2000/01/19 v1.11
+%              2000/02/11 v1.12: \jobname.tnd supported,
+%                                \DeclareThumbs added.
+%              2000/02/22 v2.0:  pdfmark support, extra thumbnails are
+%                                scanned in file `<jobname>.tno'.
+%              2000/02/28 v2.1:  support of `thumbpdf.cfg'.
+%              2000/03/07 v2.2
+%              2000/03/22 v2.3
+%              2000/04/10 v2.4
+%              2000/07/29 v2.5
+%              2000/09/27 v2.6
+%              2000/10/27 v2.7
+%              2001/01/12 v2.8
+%              2001/03/29 v2.9
+%              2001/04/02 v2.10
+%              2001/04/26 v2.11
+%              2002/01/11 v3.0:  Support for VTeX's PostScript mode added.
+%              2002/05/26 v3.1
+%              2002/05/26 v3.2
+%              2003/03/19 v3.3
+%              2003/06/06 v3.4
+%              2004/10/24 v3.5: LPPL 1.3.
+%              2004/11/19 v3.6
+%              2004/11/19 v3.7
+%              2005/07/06 v3.8
+%
+% \THB@ is the prefix for internal command names.
+%
+% Prevent that the package is loaded twice (for plain formats).
+\expandafter\ifx\csname THB@name\endcsname\relax
+  \expandafter\gdef\csname THB@name\endcsname{thumbpdf}
+\else
+  \expandafter\endinput
+\fi
+
+% Package identification in the log file
+\begingroup
+  \def\x[#1]{\endgroup\immediate\write-1{Package: thumbpdf #1}}%
+  \ifx\ProvidesPackage\UnDeFiNeD
+  \else
+    \ifx\ProvidesPackage\relax
+    \else
+      \def\x{\endgroup\ProvidesPackage{thumbpdf}}%
+    \fi
+  \fi
+\x[2005/07/06 v3.8 Inclusion of thumbnails (HO)]%
+
+% Dummy for \thisthumb and \DeclareThumbs. It is overwritten,
+% if the checks succeed and the whole package is loaded.
+\def\thisthumb#1{}
+\def\DeclareThumbs#1{}
+
+% Check part, keep help macros local:
+\begingroup
+
+  % For use of `@' in command names.
+  \catcode`\@=11
+
+  % Now we define utils of the LaTeX kernel, if they aren't.
+  \expandafter\ifx\csname @firstoftwo\endcsname\relax
+    \long\def\@firstoftwo#1#2{#1}%
+    \long\def\@secondoftwo#1#2{#2}%
+  \fi
+  \expandafter\ifx\csname @ifundefined\endcsname\relax
+    \def\@ifundefined#1{%
+      \expandafter\ifx\csname#1\endcsname\relax
+        \expandafter\@firstoftwo
+      \else
+        \expandafter\@secondoftwo
+      \fi
+    }%
+  \fi
+
+  % If a check fails, a warning is produced and the package exits.
+  \@ifundefined{PackageWarningNoLine}{%
+    \def\PackageWarningNoLine#1#2{%
+      \immediate\write16{}%
+      \immediate\write16{Package #1 Warning: #2.}%
+      \immediate\write16{}%
+    }%
+  }{}
+
+  \long\def\@ReturnAfterFi#1\fi{\fi#1}
+  \long\def\@ReturnAfterElseFi#1\else#2\fi{\fi#1}
+
+  \def\THB@WarnEnd#1{%
+    \PackageWarningNoLine{thumbpdf}{#1}%
+    \endgroup
+    \endinput
+  }
+
+  % \csname-Trick because of \outer definition of \newread.
+  % \globaldefs=-1 in order to make the allocation of \newread local.
+  \@ifundefined{IfFileExists}{%
+    \edef\x{\the\globaldefs}%
+    \globaldefs-1\relax
+    \csname newread\endcsname\THB@TempRead
+    \globaldefs\x\relax
+    \def\IfFileExists#1{%
+      \openin\THB@TempRead=#1\relax
+      \ifeof\THB@TempRead
+        \closein\THB@TempRead
+        \expandafter\@secondoftwo
+      \else
+        \closein\THB@TempRead
+        \expandafter\@firstoftwo
+      \fi
+    }%
+  }{}
+
+  % Load .cfg file if it exists
+  \IfFileExists{thumbpdf.cfg}{%
+    \@ifundefined{@@input}{%
+      \input thumbpdf.cfg\relax
+    }{%
+      \input{thumbpdf.cfg}%
+    }%
+  }{}
+
+  % LaTeX2e options
+  \def\THB@pdftex{pdftex}
+  \def\THB@pdfmark{pdfmark}
+  \def\THB@vtex{vtex}
+  \@ifundefined{ThumbpdfDriver}{\let\ThumbpdfDriver\empty}{}
+  \@ifundefined{DeclareOption}{}{%
+    \DeclareOption{pdftex}{\let\ThumbpdfDriver\THB@pdftex}%
+    \DeclareOption{pdfmark}{\let\ThumbpdfDriver\THB@pdfmark}%
+    \DeclareOption{dvips}{\let\ThumbpdfDriver\THB@pdfmark}%
+    \DeclareOption{ps2pdf}{\let\ThumbpdfDriver\THB@pdfmark}%
+    \DeclareOption{vtex}{\let\ThumbpdfDriver\THB@vtex}%
+    \DeclareOption{vtexpdfmark}{\let\ThumbpdfDriver\THB@vtex}%
+    \ProcessOptions\relax
+  }
+  \edef\x{\ThumbpdfDriver}
+  \expandafter\lowercase\expandafter{%
+    \expandafter\gdef\expandafter\ThumbpdfDriver\expandafter{\x}%
+  }
+  \def\x{dvips}\ifx\ThumbpdfDriver\x
+    \global\let\ThumbpdfDriver\THB@pdfmark
+  \fi
+  \def\x{ps2pdf}\ifx\ThumbpdfDriver\x
+    \global\let\ThumbpdfDriver\THB@pdfmark
+  \fi
+  \def\x{vtexpdfmark}\ifx\ThumbpdfDriver\x
+    \global\let\ThumbpdfDriver\THB@vtex
+  \fi
+
+  % Check: Called by pdfTeX or VTeX? Driver correct?
+  \ifcase\@ifundefined{pdfoutput}0\pdfoutput\relax
+    \@ReturnAfterElseFi{%
+      \ifcase0\@ifundefined{OpMode}1{\ifnum\OpMode=2 \else 1\fi} %
+        \global\let\ThumbpdfDriver\THB@vtex
+      \else
+        \@ReturnAfterFi{%
+          \ifx\ThumbpdfDriver\THB@pdfmark
+          \else
+            \@ReturnAfterFi{%
+              \ifx\ThumbpdfDriver\empty
+                \@ReturnAfterElseFi{%
+                  \THB@WarnEnd{%
+                    Missing driver name%
+                  }%
+                }%
+              \else
+                \@ReturnAfterFi{%
+                  \ifx\ThumbpdfDriver\THB@pdftex
+                    \@ReturnAfterElseFi{%
+                      \THB@WarnEnd{%
+                        You need pdfTeX in PDF mode for driver `pdftex'%
+                      }%
+                    }%
+                  \else
+                    \@ReturnAfterFi{%
+                      \ifx\ThumbpdfDriver\THB@vtex
+                        \@ReturnAfterElseFi{%
+                          \THB@WarnEnd{%
+                            You need VTeX in PS mode for driver `vtex'%
+                          }%
+                        }%
+                      \else
+                        \@ReturnAfterFi{%
+                          \THB@WarnEnd{%
+                            Driver `\ThumbpdfDriver' not supported%
+                          }%
+                        }%
+                      \fi
+                    }%
+                  \fi
+                }%
+              \fi
+            }%
+          \fi
+        }%
+      \fi
+    }%
+  \else
+    \global\let\ThumbpdfDriver\THB@pdftex
+  \fi
+
+  % Check: Does data file exists?
+  \edef\THB@datafile{%
+    \jobname.tp\ifx\ThumbpdfDriver\THB@pdftex t\else m\fi
+  }%
+  \IfFileExists{\THB@datafile}{}{%
+    \THB@WarnEnd{Thumbnail data file `\THB@datafile' not found}%
+  }%
+
+  % Some macros need \PackageWarning
+  \expandafter\ifx\csname PackageWarning\endcsname\relax
+    \gdef\PackageWarning#1#2{%
+      \immediate\write16{}%
+      \immediate\write16{%
+        Package `#1' warning: #2 on input line \the\inputlineno.%
+      }%
+      \immediate\write16{}%
+    }%
+  \fi
+
+  % definition of \DeclareThumbs
+  \gdef\DeclareThumbs#1{%
+    \begingroup
+      % check LaTeX's \if@filesw
+      \expandafter\ifx\csname if@filesw\expandafter\endcsname
+                      \csname iffalse\endcsname
+      \else
+        \csname newwrite\endcsname\THB@thumbopt
+        \immediate\openout\THB@thumbopt=\jobname.tno
+        % Definition of \thumb that also works with plain format.
+        \def\thumb##1##{\THB@thumb{##1}}%
+        \def\THB@thumb##1##2{%
+          \immediate\write\THB@thumbopt{%
+            \string\thumb##1{##2}%
+          }%
+        }%
+        \let\protect\string
+        % process data
+        #1%
+        % end of file
+        \immediate\write\THB@thumbopt{\string\endinput}%
+      \fi
+    \endgroup
+    \global\let\DeclareThumbs\THB@DeclareThumbs
+  }
+  \def\THB@DeclareThumbs#1{%
+    \PackageWarning{\THB@name}{Too many \string\DeclareThumbs}%
+  }
+
+  % pdfmark part
+  \ifx\ThumbpdfDriver\THB@pdfmark
+    % the header file includes already the regular thumbnails.
+    \special{header=\THB@datafile}%
+    \begingroup
+      \def\DefThisThumb#1{%
+        \global\expandafter\let\csname thumb#1\endcsname\empty
+      }%
+      % ignore PostScript comment char
+      \catcode`\%=9
+      \@ifundefined{@@input}{\input\THB@datafile\relax}
+                            {\input{\THB@datafile}}
+    \endgroup
+    % definition of \thisthumb
+    \gdef\thisthumb#1{%
+      \expandafter\ifx\csname thumb#1\endcsname\relax
+        \PackageWarning{\THB@name}{Thumbnail `#1' undefined}%
+      \else
+        \special{ps:{THB\string_#1} thisTHB}%
+      \fi
+    }%
+    % end of pdfmark part
+    \endgroup\expandafter\endinput
+  \fi
+
+  % vtex part
+  \ifx\ThumbpdfDriver\THB@vtex
+    % the header file includes already the regular thumbnails.
+    \ifnum\@ifundefined{VTeXversion}0\VTeXversion<753 %
+      \ifcase\@ifundefined{gexmode}1\gexmode
+        % without GeX
+        \immediate\special{header=\THB@datafile}%
+      \else
+        % with GeX
+        \begingroup
+          \edef\x{\the\globaldefs}%
+          \globaldefs-1\relax
+          \csname newread\endcsname\THB@TempRead
+          \globaldefs\x\relax
+          \openin\THB@TempRead=\THB@datafile\relax
+          \def\x{%
+            \catcode`\%=12 %
+            \catcode`\|=0 %
+            \catcode`\{=12 %
+            \catcode`\}=12 %
+            \catcode`\ =12 %
+            \catcode`\\=12 %
+            \catcode`\_=12 %
+            \let\par\empty
+            \loop
+            \ifcase\ifeof\THB@TempRead 1 \else 0 \fi
+              \read\THB@TempRead to \THB@line
+              \immediate\special{!=\THB@line}%
+            \repeat
+            \closein\THB@TempRead
+            \endgroup
+          }%
+        \x
+      \fi
+    \else
+      \immediate\special{headercopy=\THB@datafile}%
+    \fi
+    \begingroup
+      \def\DefThisThumb#1{%
+        \global\expandafter\let\csname thumb#1\endcsname\empty
+      }%
+      % ignore PostScript comment char
+      \catcode`\%=9
+      \@ifundefined{@@input}{\input\THB@datafile\relax}
+                            {\input{\THB@datafile}}
+    \endgroup
+    % definition of \thisthumb
+    \gdef\thisthumb#1{%
+      \expandafter\ifx\csname thumb#1\endcsname\relax
+        \PackageWarning{\THB@name}{Thumbnail `#1' undefined}%
+      \else
+        \special{!={THB\string_#1} thisTHB}%
+      \fi
+    }%
+    % end of vtex part
+    \endgroup\expandafter\endinput
+  \fi
+
+  % pdftex part
+  \global\let\THB@datafile\THB@datafile
+\endgroup
+
+\expandafter\chardef\csname THB@AtCode\endcsname=\the\catcode`\@
+\catcode`\@=11
+
+% The thumbnails are numbered with the output pages:
+% `thb1.png' means the thumbnail of the first output page,
+% `thb28.png' the thumbnail of the 28th written page,
+% regardless of the page number.
+%   Therefore we need a new counter that is incremented with each
+% page that is written to the pdf file.
+\newcount\c@thumb
+\c@thumb 0\relax
+
+\newif\ifTHB@thisthumb
+
+\def\thisthumb#1{%
+  \global\THB@thisthumbtrue
+  \THB@AddPageAttr{#1}%
+}
+
+% Now we enhance \shipout in order to
+% * increment the output page counter (\c@thumb),
+% * check if a thumbnail exists,
+% * add/remove the thumbnail entry to the pdf page attributes.
+\let\THBorg@shipout\shipout
+\def\shipout{\THB@AddThumb\THBorg@shipout}
+\def\THB@AddThumb{%
+  \begingroup
+    \global\advance\c@thumb by 1\relax
+    \ifTHB@thisthumb
+      \global\THB@thisthumbfalse % reset switch
+    \else
+      \THB@AddPageAttr{\the\c@thumb}%
+    \fi
+  \endgroup
+}
+\def\THB@AddPageAttr#1{%
+  % Remove previous /Thumb entry.
+  \expandafter\THB@RemoveThumbAttr\the\pdfpageattr^^J/Thumb{} 0 R\END
+  % Check, if thumb exists.
+  \expandafter\ifx\csname thumb#1\endcsname\relax
+    % \PackageWarning cannot be used, because \protect=\noexpand.
+    \immediate\write16{}%
+    \immediate\write16{Package \THB@name\space Warning: %
+      Thumbnail `#1' undefined %
+      on input line \the\inputlineno.%
+    }%
+    \immediate\write16{}%
+  \else
+    \begingroup
+      \edef\x{\endgroup
+        \global\pdfpageattr{%
+          \the\pdfpageattr
+          ^^J/Thumb \csname thumb#1\endcsname\space 0 R%
+        }%
+      }%
+    \x
+  \fi
+}
+\def\THB@RemoveThumbAttr#1^^J/Thumb#2#3 0 R#4\END{%
+  \ifx\\#2\\%
+    \global\pdfpageattr{#1}%
+  \else
+    \THB@RemoveThumbAttr#1#4\END
+  \fi
+}
+
+% Many commands and catcode changes are only necessary to read
+% the data file, so we do this in a group.
+\begingroup
+
+  % These commands are used in `<jobname>.tpt'
+  \def\DefThumb#1{%
+    \expandafter\xdef\csname thumb#1\endcsname{\the\pdflastobj}%
+  }%
+
+  \def\DefRGB#1{%
+    \expandafter\edef\csname thumbRGB#1\endcsname{\the\pdflastobj}%
+  }%
+  \def\UseRGB#1{\csname thumbRGB#1\endcsname}%
+
+  % Now the catcodes to read `<jobname>.tpt' follows:
+  \def\SetCatcodeRange#1#2{%
+    \c@thumb=#1
+    \loop
+      \catcode\c@thumb=12
+    \ifnum\c@thumb<#2
+      \advance\c@thumb by 1
+    \repeat
+  }
+  \SetCatcodeRange{0}{12}%
+  % ^^M
+  \SetCatcodeRange{14}{31}%
+  % space
+  \SetCatcodeRange{33}{36}% ! " # $
+  % percent
+  \SetCatcodeRange{38}{63}% & ' ( ) * + , - . / 0-9 : ; < = > ?
+  % @ A-Z
+  \catcode`\[=12
+  % backslash
+  \catcode`\]=12
+  % ^
+  \SetCatcodeRange{95}{96}% _ '
+  % a-z {
+  \catcode`\|=12
+  % }
+  \SetCatcodeRange{126}{255}% ~ 127 8-bit
+
+  % commands for special characters used in `<jobname>.tpt'.
+  \edef\~{\space}% in stream data to avoid `\ ' at line end.
+  \let\ \~%
+  \edef\+{\string^}%
+  \begingroup
+    \lccode`1=`\\
+    \lccode`2=`\^^M
+    \lccode`3=`\{
+    \lccode`4=`\}
+    \lccode`5=`\%
+  \lowercase{\endgroup
+    \def\\{1}%
+    \def\/{2}%
+    \def\{{3}%
+    \def\}{4}%
+    \def\%{5}%
+  }
+
+  % no white space by line ends
+  \endlinechar=-1
+
+  % process data file and include the thumbnails
+  % in the current pdf file
+  \expandafter\ifx\csname @@input\endcsname\relax
+    \input\THB@datafile\relax
+  \else
+    \input{\THB@datafile}%
+  \fi
+\endgroup
+% restore catcode of `@'.
+\catcode`\@=\THB@AtCode\relax
+\endinput
diff --git a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex
new file mode 100644
index 00000000000..0bfdf2b8eda
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex
@@ -0,0 +1,278 @@
+% File:        thumbpdf.tex
+% Project:     thumbpdf
+% Version:     2005/07/06 v3.8
+% Author:      Heiko Oberdiek
+%
+% Copyright:   Copyright (C) 1999-2005 Heiko Oberdiek.
+%
+%              This work may be distributed and/or modified under
+%              the conditions of the LaTeX Project Public License,
+%              either version 1.3 of this license or (at your option)
+%              any later version. The latest version of this license
+%              is in
+%                http://www.latex-project.org/lppl.txt
+%              and version 1.3 or later is part of all distributions
+%              of LaTeX version 2003/12/01 or later.
+%
+%              This work has the LPPL maintenance status "maintained".
+%
+%              This Current Maintainer of this work is Heiko Oberdiek.
+%
+%              See file "readme.txt" for a list of files that
+%              belong to this project.
+%
+% Function:    Program to include thumbnails as images.
+%              It looks for thumbnail files `thb*.png' and
+%              includes them as images in the output pdf file
+%              `thumbpdf.pdf'. The perl script `thumbpdf(.pl)'
+%              automatically calls pdftex with this file to
+%              generate `thumbpdf.pdf' and produces the data
+%              files, that contains the necessary pdf image objects
+%              for package `thumbpdf.sty'.
+%
+% Requirement: * pdftex
+%              * thumbnails `thb*.png'
+%
+% Use:         * Syntax: pdftex thumbpdf
+%              * \thumbmax:
+%                Because it takes some time to look for 1000 thumbnail
+%                files, a maximum number can be specified:
+%                  pdftex \def\thumbmax{20}\input thumbpdf
+%              * \thumbjob:
+%                This macro contains the name of the user's TeX file
+%                without extension (`<jobname>'). It is needed to build
+%                the name of the optional file `<jobname>.tno', that
+%                contains extra thumbnail declarations:
+%                  pdftex \def\thumbjob{example}\input thumbpdf
+%                Then `example.tno' are read to get additional
+%                thumbnails.
+%
+% History:     1999/02/14 v1.0:  first public release
+%              1999/02/23 v1.1
+%              1999/03/01 v1.2
+%              1999/03/12 v1.3:  Copyright: LPPL
+%              1999/05/05 v1.4
+%              1999/06/13 v1.5
+%              1999/07/27 v1.6
+%              1999/08/08 v1.7:  pdfTeX 0.14a
+%              1999/09/09 v1.8
+%              1999/09/16 v1.9
+%              2000/01/11 v1.10: \immediate before \pdfximage removed,
+%                because it is obsolete and because of a problem with
+%                a pre-release version of pdfTeX 0.14d.
+%              2000/01/19 v1.11
+%              2000/02/11 v1.12: \thumbjob added.
+%              2000/02/22 v2.0:  Looking for `\thumbjob.tno' only, the
+%                file name `thumbopt.tex' is not supported anymore.
+%              2000/02/28 v2.1
+%              2000/03/07 v2.2
+%              2000/03/22 v2.3
+%              2000/04/10 v2.4: Version is also printed on screen.
+%              2000/07/29 v2.5
+%              2000/09/27 v2.6
+%              2000/10/27 v2.7
+%              2001/01/12 v2.8
+%              2001/03/29 v2.9
+%              2001/04/02 v2.10
+%              2001/04/26 v2.11
+%              2002/01/11 v3.0
+%              2002/05/26 v3.1
+%              2002/05/26 v3.2
+%              2003/03/19 v3.3
+%              2003/06/06 v3.4
+%              2004/10/24 v3.5: LPPL 1.3.
+%              2004/11/19 v3.6
+%              2004/11/19 v3.7: For easier debugging, the special
+%                thumbpdf objects are now valid PDF objects that
+%                are referenced in the Catalog.
+%              2005/07/06 v3.8
+
+\immediate\write16{%
+  File: thumbpdf.tex 2005/07/06 v3.8 %
+  Including thumbnails as images (HO)%
+}
+\immediate\write16{%
+****************************************************************}
+\immediate\write16{%
+* Generating `thumbpdf.pdf', each page with a found thumbnail. *}
+\immediate\write16{%
+****************************************************************}
+
+\def\END{\csname @@end\endcsname\end}
+
+% Check, if LaTeX format
+\ifx\mbox\undefined
+\else
+  \immediate\write16{%
+    !!! Process this file `\jobname.tex' with pdf(e)tex %
+    (plain format) !!!%
+  }%
+  \expandafter\END
+\fi
+
+% Check if pdfTeX
+\ifx\pdfoutput\undefined
+  \immediate\write16{%
+    !!! Process this file `\jobname.tex' with pdf(e)tex %
+    (NOT tex) !!!%
+  }%
+  \expandafter\END
+\fi
+
+\pdfoutput=1
+
+% this file is tested with pdfTeX 0.13a
+% but for downward compatibilty a trick from Hans Hagen:
+\ifnum\pdftexversion<13 \ifnum\expandafter `\pdftexrevision<`s
+  \let\normalpdfimage\pdfimage
+  \def\grabpdfimage#1#2{\normalpdfimage#1 #2\relax}
+  \def\pdfimage#1#{\grabpdfimage{#1}}
+\fi\fi
+
+% syntax has changed with pdfTeX 0.14a:
+\ifnum\pdftexversion>13
+  \def\pdfimage#1#{\grabpdfimage{#1}}
+  \def\grabpdfimage#1#2{%
+    \pdfximage#1{#2}\pdfrefximage\pdflastximage
+  }
+\fi
+
+% max. 106x106 / 72 dpi
+\hsize 1.5in
+\vsize 1.5in
+
+\nopagenumbers
+
+\newcount\thumbcount
+\def\thumbcountstep{\advance\thumbcount by 1 }
+
+\def\thumbfilename{thb\the\thumbcount.png}
+
+\newread\thumbread
+\def\ifthumbexists{%
+  \openin\thumbread=\thumbfilename\relax
+  \ifeof\thumbread
+    \expandafter\noneofone
+  \else
+    \closein\thumbread
+    \expandafter\firstofone
+  \fi
+}
+\def\noneofone#1{}
+\def\firstofone#1{#1}
+
+\def\iffileexists#1{%
+  \openin\thumbread=#1\relax
+  \ifeof\thumbread
+    \expandafter\secondoftwo
+  \else
+    \closein\thumbread
+    \expandafter\firstoftwo
+  \fi
+}
+\long\def\firstoftwo#1#2{#1}
+\long\def\secondoftwo#1#2{#2}
+
+\let\listthumbs\empty
+
+\def\printthumbfile{%
+  \vfill\eject
+  \centerline{%
+    \pdfimage height \vsize {\thumbfilename}%
+  }%
+}
+
+\newcount\thumbfound
+\thumbfound=0
+\def\processthumb{%
+  \edef\listthumbs{\listthumbs\space\the\thumbcount}%
+  \printthumbfile
+  \pageno=\thumbcount
+  \advance\thumbfound by 1
+}
+
+\expandafter\ifx\csname thumbmax\endcsname\relax
+  \def\thumbmax{999}%
+\fi
+
+\immediate\write16{* Looking for thumbnails 0..\thumbmax:}
+
+\thumbcount=\thumbmax\relax
+\advance\thumbcount by 1
+\edef\thumbmax{\the\thumbcount}%
+\thumbcount=0
+\loop
+\ifnum\thumbcount<\thumbmax\relax
+  \ifthumbexists\processthumb
+  \thumbcountstep
+\repeat
+
+\break
+\immediate\write16{==> \the\thumbfound\space thumbnail(s) found.}
+\immediate\pdfobj{<</MaxThumbNumber \the\thumbfound>>}
+\edef\CatalogHook{\the\pdflastobj\space 0 R}%
+\immediate\write16{* Looking for extra thumbnails:}
+
+\def\END{%
+  \ifx\allthumbs\empty
+  \else
+    \immediate\pdfobj{<</ListThumbs\listthumbs>>}%
+    \edef\CatalogHook{\CatalogHook\space\the\pdflastobj\space 0 R}%
+  \fi
+  \pdfcatalog{/ThumbpdfHook [\CatalogHook]}%
+  \vfill\eject
+  \csname bye\endcsname % \bye is \outer
+}
+
+% <jobname>.tno
+\ifx\thumbjob\UnDeFiNeD
+  \immediate\write16{!!! Warning: \string\thumbjob\space undefined,
+    search for extra thumbnails skipped!%
+  }
+  \expandafter\END
+\fi
+\def\optfile{\thumbjob.tno}%
+\iffileexists{\optfile}{}{%
+  \immediate\write16{==> No optional thumbnail file.}%
+  \END
+}%
+\thumbfound=0
+
+\def\thumb{\futurelet\nexttoken\thumbA}
+\let\braceleft=[
+\def\thumbA{%
+  \if\nexttoken\braceleft
+    \expandafter\thumbB
+  \else
+    \expandafter\thumbC
+  \fi
+}
+\def\thumbC#1{\thumbB[#1]{#1}}
+\def\thumbB[#1]#2{% #1: label, #2: file[.png]
+  \iffileexists{#2.png}{%
+    \def\thumbfilename{#2.png}%
+  }{%
+    \iffileexists{#2}{%
+      \def\thumbfilename{#2}%
+    }{%
+      \let\thumbfilename\empty
+    }%
+  }%
+  \ifx\thumbfilename\empty
+    \immediate\write16{%
+      !!! Warning: Thumbnail `#2' does not exist!"}%
+  \else
+    \edef\listthumbs{\listthumbs\space{#1}}%
+    \printthumbfile
+    \advance\thumbcount by -1
+    \pageno=\thumbcount
+    \advance\thumbfound by 1
+  \fi
+}
+
+\thumbcount=0
+\input \optfile
+\break
+\immediate\write16{==> \the\thumbfound\space extra thumbnail(s) found.}%
+
+\END