xorp_toc.sty

xorp源码hg

%%
%% This is file `tocloft.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% tocloft.dtx  (with options: `usc')
%% 
%%  Copyright 1998, 1999 Peter R. Wilson
%% 
%%  This program is provided under the terms of the
%%  LaTeX Project Public License distributed from CTAN
%%  archives in directory macros/latex/base/lppl.txt.
%% 
%% Author: Peter Wilson (CUA and NIST)
%%         now at: [e-mail]
%% 
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{xorp_toc}[1999/09/19 v1.0 parameterised ToC, etc., typesetting]
\RequirePackage{stdclsdv}
\providecommand{\PRWPackageNote}[2]{%
  \GenericWarning{%
    (#1)\@spaces\@spaces\@spaces\@spaces
  }{%
   Package #1 Note: #2%
   }%
}
\providecommand{\PRWPackageNoteNoLine}[2]{%
  \PRWPackageNote{#1}{#2\@gobble}%
}
\ifSCDnodivs
  \PackageWarning{xorp_toc}%
    {I don't recognize any sectional divisions so I'll do nothing}
  \renewcommand{\SCDquit}{\endinput}
\fi
\SCDquit
\ifSCDknownclass\else
  \PackageWarning{xorp_toc}%
    {I don't recognize the class but I'll do my best}
  \ifSCDnodivs
    \PackageWarning{xorp_toc}%
      {I don't recognize any sectional divisions so I'll do nothing}
    \renewcommand{\SCDquit}{\endinput}
  \else
    \ifSCDchapter
      \PRWPackageNoteNoLine{xorp_toc}{The document class has chapter divisions}
    \else
      \ifSCDsection
        \PRWPackageNoteNoLine{xorp_toc}{The document class has section divisions}
      \else
        \PackageWarning{xorp_toc}%
          {The class has neither chapters nor sections, so I'll do nothing}
        \renewcommand{\SCDquit}{\endinput}
      \fi
    \fi
  \fi
\fi
\SCDquit
\newif\if@cfttocbibind
\AtBeginDocument{%
  \@ifpackageloaded{tocbibind}{\@cfttocbibindtrue}{\@cfttocbibindfalse}
  \if@cfttocbibind
    \@ifpackagelater{tocbibind}{1998/11/16}{}{%
      \PackageWarning{xorp_toc}{%
You are using a version of the tocbibind package\MessageBreak
that is not compatible with xorp_toc.\MessageBreak
The results may be surprising.\MessageBreak
Consider installing the current version of tocbibind.}}
  \fi
}
\newif\if@cftnctoc\@cftnctocfalse
\DeclareOption{titles}{\@cftnctoctrue}
\ProcessOptions\relax
\newcommand{\cftmarktoc}{%
  \@mkboth{\MakeUppercase\contentsname}{\MakeUppercase\contentsname}}
\newcommand{\cftmarklof}{%
  \@mkboth{\MakeUppercase\listfigurename}{\MakeUppercase\listfigurename}}
\newcommand{\cftmarklot}{%
  \@mkboth{\MakeUppercase\listtablename}{\MakeUppercase\listtablename}}
\newcommand{\@cfttocstart}{%
  \ifSCDchapter
    \if@twocolumn
      \@restonecoltrue\onecolumn
    \else
      \@restonecolfalse
    \fi
  \fi}
\newcommand{\@cfttocfinish}{%
  \ifSCDchapter
    \if@restonecol\twocolumn\fi
  \fi}
\newcommand{\@cftdobibtoc}{%
  \if@dotoctoc
    \if@bibchapter
      \addcontentsline{toc}{chapter}{\contentsname}
    \else
      \addcontentsline{toc}{\@tocextra}{\contentsname}
    \fi
  \fi}
\AtBeginDocument{%
\if@cftnctoc\else
  \renewcommand{\tableofcontents}{%
    \@cfttocstart
    \par
    \begingroup
      \parindent\z@ \parskip\z@
      \@cftmaketoctitle
      \if@cfttocbibind
        \@cftdobibtoc
      \fi
      \@starttoc{toc}%
    \endgroup
    \@cfttocfinish}
\fi
}
\newcommand{\@cftmaketoctitle}{%
  \vspace*{\cftbeforetoctitleskip}
  \interlinepenalty\@M
  {\cfttoctitlefont\contentsname}{\cftaftertoctitle}
  \cftmarktoc
  \par\nobreak
  \vskip \cftaftertoctitleskip
  \@afterheading}
\newlength{\cftbeforetoctitleskip}
\newlength{\cftaftertoctitleskip}
\ifSCDchapter
  \setlength{\cftbeforetoctitleskip}{50pt}
  \setlength{\cftaftertoctitleskip}{40pt}
\else
  \setlength{\cftbeforetoctitleskip}{3.5ex \@plus 1ex \@minus .2ex}
  \setlength{\cftaftertoctitleskip}{2.3ex \@plus.2ex}
\fi
\ifSCDchapter
  \newcommand{\cfttoctitlefont}{\normalfont\Huge\bfseries}
\else
  \newcommand{\cfttoctitlefont}{\normalfont\Large\bfseries}
\fi
\newcommand{\cftaftertoctitle}{}
\newcommand{\cftsetpnumwidth}[1]{\renewcommand{\@pnumwidth}{#1}}
\newcommand{\cftsetrmarg}[1]{\renewcommand{\@tocrmarg}{#1}}
\newcommand{\cftdot}{.}
\newcommand{\@cftdotfill}[1]{%
  \leaders\hbox{$\m@th\mkern #1 mu\hbox{\cftdot}\mkern #1 mu$}\hfill}
\newcommand{\cftdotsep}{4.5}
\newcommand{\cftnodots}{10000}
\newcommand{\cftparfillskip}{\parfillskip=0pt plus1fil}
\renewcommand{\numberline}[1]{%
  \hb@xt@\@tempdima{#1\@cftasnum\hfil}\@cftasnumb}
\newcommand{\@cftasnum}{}
\newcommand{\@cftasnumb}{}
\newif\if@cftdopart
\ifSCDpart
\renewcommand*{\l@part}[2]{%
  \@cftdopartfalse
  \ifnum \c@tocdepth >-2\relax
    \ifSCDchapter
      \@cftdoparttrue
    \fi
    \ifnum \c@tocdepth >\m@ne
      \ifSCDchapter\else
        \@cftdoparttrue
      \fi
    \fi
  \fi
  \if@cftdopart
    \ifSCDchapter
      \addpenalty{-\@highpenalty}%
    \else
      \addpenalty\@secpenalty
    \fi
    \addvspace{\cftbeforepartskip}%
    \@tempdima \cftpartnumwidth\relax
    \let\@cftasnum \cftpartaftersnum
    \let\@cftasnumb \cftpartaftersnumb
    \begingroup
      \parindent \z@ \rightskip \@pnumwidth
      \parfillskip -\@pnumwidth
      {\leavevmode
      {\cftpartfont #1}{\cftpartleader}
        {\hb@xt@\@pnumwidth{\hss {\cftpartpagefont #2}}}\cftpartafterpnum}\par
      \nobreak
      \ifSCDchapter
        \global\@nobreaktrue
        \everypar{\global\@nobreakfalse\everypar{}}%
      \else
        \if@compatibility
          \global\@nobreaktrue
          \everypar{\global\@nobreakfalse\everypar{}}%
        \fi
      \fi
    \endgroup
  \fi}
\fi
\newlength{\cftbeforepartskip}
  \setlength{\cftbeforepartskip}{2.25em \@plus\p@}
\newlength{\cftpartnumwidth}
  \setlength{\cftpartnumwidth}{3em}
\newcommand{\cftpartfont}{\large\bfseries}
\newcommand{\cftpartaftersnum}{}
\newcommand{\cftpartaftersnumb}{}
\newcommand{\cftpartleader}{\large\bfseries\@cftdotfill{\cftpartdotsep}}
\newcommand{\cftpartdotsep}{\cftnodots}
\newcommand{\cftpartpagefont}{\large\bfseries}
\newcommand{\cftpartafterpnum}{}
\ifSCDchapter
\renewcommand*{\l@chapter}[2]{%
  \ifnum \c@tocdepth >\m@ne
    \addpenalty{-\@highpenalty}%
    \vskip \cftbeforechapskip
    {\leftskip \cftchapindent\relax
     \rightskip \@tocrmarg
     \parfillskip -\rightskip
     \parindent \cftchapindent\relax\@afterindenttrue
     \interlinepenalty\@M
     \leavevmode
     \@tempdima \cftchapnumwidth\relax
     \let\@cftasnum \cftchapaftersnum
     \let\@cftasnumb \cftchapaftersnumb
     \advance\leftskip \@tempdima \null\nobreak\hskip -\leftskip
     {\cftchapfont #1}\nobreak
     {\cftchapleader}
     \nobreak
     \hb@xt@\@pnumwidth{\hfil\cftchappagefont #2}\cftchapafterpnum\par}%
  \fi}
\fi
\newlength{\cftbeforechapskip}
  \setlength{\cftbeforechapskip}{1.0em \@plus\p@}
\newlength{\cftchapindent}
  \setlength{\cftchapindent}{0em}
\newlength{\cftchapnumwidth}
  \setlength{\cftchapnumwidth}{1.5em}
\newcommand{\cftchapfont}{\bfseries}
\newcommand{\cftchapaftersnum}{}
\newcommand{\cftchapaftersnumb}{}
\newcommand{\cftchapleader}{\bfseries\@cftdotfill{\cftchapdotsep}}
\newcommand{\cftchapdotsep}{\cftnodots}
\newcommand{\cftchappagefont}{\bfseries}
\newcommand{\cftchapafterpnum}{}
\renewcommand*{\l@section}[2]{%
  \ifnum \c@tocdepth >\z@
    \ifSCDchapter
      \vskip \cftbeforesecskip
    \else
      \addpenalty\@secpenalty
      \addvspace{\cftbeforesecskip}
    \fi
    {\leftskip \cftsecindent\relax
     \rightskip \@tocrmarg
     \parfillskip -\rightskip
     \parindent \cftsecindent\relax\@afterindenttrue
     \interlinepenalty\@M
     \leavevmode
     \@tempdima \cftsecnumwidth\relax
     \let\@cftasnum \cftsecaftersnum
     \let\@cftasnumb \cftsecaftersnumb
     \advance\leftskip \@tempdima \null\nobreak\hskip -\leftskip
     {\cftsecfont #1}\nobreak
     {\cftsecleader}
     \nobreak
     \hb@xt@\@pnumwidth{\hfil\cftsecpagefont #2}\cftsecafterpnum\par}%
  \fi}
\newlength{\cftbeforesecskip}
\ifSCDchapter
  \setlength{\cftbeforesecskip}{\z@ \@plus.2\p@}
\else
  \setlength{\cftbeforesecskip}{1.0em \@plus\p@}
\fi
\newlength{\cftsecindent}
\ifSCDchapter
  \setlength{\cftsecindent}{1.5em}
\else
  \setlength{\cftsecindent}{0em}
\fi
\newlength{\cftsecnumwidth}
\ifSCDchapter
  \setlength{\cftsecnumwidth}{2.3em}
\else
  \setlength{\cftsecnumwidth}{1.5em}
\fi
\ifSCDchapter
  \newcommand{\cftsecfont}{\normalfont}
\else
  \newcommand{\cftsecfont}{\bfseries}
\fi
\newcommand{\cftsecaftersnum}{}
\newcommand{\cftsecaftersnumb}{}
\ifSCDchapter
  \newcommand{\cftsecleader}{\normalfont\@cftdotfill{\cftsecdotsep}}
\else
  \newcommand{\cftsecleader}{\bfseries\@cftdotfill{\cftsecdotsep}}
\fi
\ifSCDchapter
  \newcommand{\cftsecdotsep}{\cftdotsep}
\else
  \newcommand{\cftsecdotsep}{\cftnodots}
\fi
\ifSCDchapter
  \newcommand{\cftsecpagefont}{\normalfont}
\else
  \newcommand{\cftsecpagefont}{\bfseries}
\fi
\newcommand{\cftsecafterpnum}{}
\renewcommand*{\l@subsection}[2]{%
  \ifnum \c@tocdepth >\@ne
    \vskip \cftbeforesubsecskip
    {\leftskip \cftsubsecindent\relax
     \rightskip \@tocrmarg
     \parfillskip -\rightskip
     \parindent \cftsubsecindent\relax\@afterindenttrue
     \interlinepenalty\@M
     \leavevmode
     \@tempdima \cftsubsecnumwidth\relax
     \let\@cftasnum \cftsubsecaftersnum
     \let\@cftasnumb \cftsubsecaftersnumb
     \advance\leftskip \@tempdima \null\nobreak\hskip -\leftskip
     {\cftsubsecfont #1}\nobreak
     {\cftsubsecleader}