%% Copyright (C) 2013-2024 Eduardo C. Lourenço de Lima
%% 
%% 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 2005/12/01 or later.
%% 
\NeedsTeXFormat  {LaTeX2e}      [1996/06/01]
\ProvidesPackage {sepfootnotes} [2024/07/05 v0.3d Footnotes in separate file]

\newcommand\sep@packagename{sepfootnotes}

%{% options

\DeclareOption {quiet}             {\sep@opt@quiettrue}
\DeclareOption {warn}              {\sep@opt@warntrue}
\DeclareOption {error}             {\sep@opt@errortrue}
\DeclareOption {global}            {\sep@opt@globaltrue}
\DeclareOption {after}             {\sep@opt@aftertrue}

\newif \ifsep@opt@quiet
\newif \ifsep@opt@warn
\newif \ifsep@opt@error
\newif \ifsep@opt@global
\newif \ifsep@opt@after

\sep@opt@warntrue

\ProcessOptions

\ifsep@opt@quiet
 \sep@opt@warnfalse
 \sep@opt@errorfalse
\fi

\ifsep@opt@error
 \sep@opt@warnfalse
\fi

%}%
%{% public

%{% footnotes and endnotes

\newcommand\sep@new [1]
{\newcounter{#1note}%
 \expandafter\newcommand\csname      #1note\endcsname        [1] {\csname #1notemark\endcsname{##1}\csname #1notetext\endcsname{##1}}%
 \expandafter\newcommand\csname      #1notecontent\endcsname [2] {\sep@namedef {#1} {##1} {##2}}%
 \expandafter\newcommand\csname print#1note\endcsname        [1] {\sep@nameuse {#1} {##1}}%
 \expandafter\newcommand\csname   the#1mark\endcsname            {\csname the#1note\endcsname}\relax
 \expandafter\newcommand\csname      #1quicknote\endcsname   [1] {\sep@namereplace {#1} {sepfootnotes@tmp@quick} {##1}\csname #1note\endcsname{sepfootnotes@tmp@quick}}\relax
}

%}%
%{% footnotes

\newcommand\newfootnotes{\@ifstar\sep@newfootnotesfree\sep@newfootnotes}

\newcommand\sep@newfootnotes [1]
{\sep@new{#1}%
 \expandafter\renewcommand\csname    #1note\endcsname        [1] {\footnote      {\csname print#1note\endcsname{##1}}}%
 \expandafter\newcommand\csname      #1notetext\endcsname    [1] {\footnotetext  {\csname print#1note\endcsname{##1}}}%
 \expandafter\newcommand\csname      #1notemark\endcsname    [1] {\footnotemark}%
 \expandafter\renewcommand\csname the#1mark\endcsname            {\thefootnote}}

\newcommand\sep@newfootnotesfree [1]
{\sep@new{#1}%
 \expandafter\newcommand\csname      #1notemark\endcsname    [1] {\sep@mark    {#1} {##1}}%
 \expandafter\newcommand\csname      #1notetext\endcsname    [1] {\sep@markset {#1}\@footnotetext{\csname print#1note\endcsname {##1}}}}

\newcommand\newsymbolfootnotes [2] [page]
{\newfootnotes*                                                  {#2}%
 \@addtoreset                                                    {#2note} {#1}%
 \expandafter\renewcommand\csname the#2mark\endcsname            {\fnsymbol {#2note}}}

%}%
%{% endnotes

\newcommand\newendnotes [1]
{\sep@new                                                        {#1}%
 \sep@openout                                                    {#1}%
 \expandafter\newcommand\csname      #1notemark\endcsname        [1] {\sep@mark    {#1} {##1}}%
 \expandafter\newcommand\csname      #1notetext\endcsname        [1] {\sep@markset {#1}\sep@write {#1} {\expandafter\noexpand\csname do#1note\endcsname{\arabic{#1note}}{\unexpanded{##1}}}}%
 \expandafter\newcommand\csname addto#1notes\endcsname       [1] {\sep@write {#1} {\unexpanded{##1}}}%
 \expandafter\newcommand\csname   the#1notes\endcsname           {\sep@close {#1}\setcounter {#1note} {0}\begin{#1notes}\input\sep@filename{#1}\end{#1notes}}%
 \expandafter\newcommand\csname  make#1mark\endcsname            {\hbox{\normalfont\csname the#1mark\endcsname.\ }}%
 \expandafter\newcommand\csname      #1noteformat\endcsname      {\noindent\rightskip\z@ \leftskip\z@ \leavevmode\llap{\csname make#1mark\endcsname}}%
 \expandafter\newcommand\csname    do#1note\endcsname        [2] {\sep@refsetcounter{#1note}{##1}\par\csname #1noteformat\endcsname\csname print#1note\endcsname{##2}\par}%
 \expandafter\newcommand\csname      #1notesize\endcsname        {\footnotesize}%
 \newenvironment                    {#1notes}                    {\csname #1notesize\endcsname\setlength\parskip\footnotesep} {}}

%}%
%{% commentnotes

\newcommand\newcommentnotes [1]
{\newfootnotes*{#1}\relax
 \expandafter\renewcommand\csname    #1note\endcsname        [1] {\csname #1notemark\endcsname{##1}\csname #1notetext\endcsname{##1}}\relax
 \expandafter\renewcommand\csname the#1mark\endcsname            {\begingroup\csname #1notesize\endcsname\roman{#1note}\endgroup}\relax
 \expandafter\newcommand\csname      #1notesize\endcsname        {\tiny}\relax
 \expandafter\renewcommand\csname    #1notetext\endcsname    [1] {\-\marginpar[{\csname #1margintext\endcsname{##1}{left}}]{\setstretch{\csname #1stretch\endcsname}\csname #1margintext\endcsname {##1} {right}\relax}}\relax
 \expandafter\newcommand\csname      #1margintext\endcsname  [2] {\csname #1notesize\endcsname\expandafter\raggedright\csname the#1marginmark\endcsname{#1}\csname print#1note\endcsname{##1}}\relax
 \expandafter\newcommand\csname   the#1marginmark\endcsname  [1] {\textsuperscript{\csname the#1mark\endcsname}}\relax
 \expandafter\newcommand\csname      #1stretch\endcsname         {0.5}\relax
}

\newcommand\newsymbolcommentnotes [2] [page]
{\newcommentnotes                                                {#2}\relax
 \@addtoreset                                                    {#2note} {#1}\relax
 \expandafter\renewcommand\csname the#2mark\endcsname            {\fnsymbol {#2note}}}

%}%

%}%
%{% private

%{% files

\newcommand\sep@filename [1] {\jobname.ent-#1}
\newcommand\sep@openout  [1] {\expandafter          \newwrite\csname sep@fileout#1\endcsname\immediate\expandafter\openout\csname sep@fileout#1\endcsname=\sep@filename#1\relax}
\newcommand\sep@write    [2] {\immediate               \write\csname sep@fileout#1\endcsname {#2}}
\newcommand\sep@close    [1] {\immediate\expandafter\closeout\csname sep@fileout#1\endcsname\relax}

%}%
%{% names

%{% \sep@nameuse <prefix> <key>

\newcommand\sep@nameuse [2]
{\@ifundefined{sepfootnotes@text@#1@#2}
 {\sep@warning@undefined{#1}{#2}}
 {\@nameuse{sepfootnotes@text@#1@#2}}}

%}%
%{% \sep@namedef <prefix> <key> <content>

\newcommand\sep@namedef [3]
{\ifsep@opt@after\sep@namereplace{#1}{#2}{#3}\else
 \@ifundefined{sepfootnotes@text@#1@#2}
 {\ifsep@opt@global\global\fi\@namedef{sepfootnotes@text@#1@#2}{#3}}
 {\sep@warning@already{#1}{#2}}\fi}

%}%
%{% \sep@namereplace <prefix> <key> <content>

\newcommand\sep@namereplace [3]
{%
 \ifsep@opt@after
  \global\@namedef{sepfootnotes@text@#1@#2}{#3}%
  \write\@auxout{\expandafter\unexpanded\expandafter{\global\@namedef {sepfootnotes@text@#1@#2}{#3}}}%
 \else
  \ifsep@opt@global\global\fi\@namedef{sepfootnotes@text@#1@#2}{#3}%
 \fi
}

%}%

%{% \sep@warning@undefined <prefix> <key>

\newcommand \sep@warning@undefined [2]
{\ifsep@opt@error
  \PackageError
   {\sep@packagename}
   {`#2' has not been assigned a content}
   {`#2' has not been assigned a content.\MessageBreak
    Solution: Define `#2'\MessageBreak
    Try: \@backslashchar #1notecontent{#2}{<content>}}%
 \fi
 \ifsep@opt@warn
  \PackageWarning
   {\sep@packagename}
   {`#2' has not been assigned a content}%
 \fi
}

%}%
%{% \sep@warning@already <prefix> <key>

\newcommand \sep@warning@already [2]
{\ifsep@opt@error
  \PackageError
   {\sep@packagename}
   {`#2' is already in use}
   {`#2' is already in use.\MessageBreak
    Solution: Use another key.\MessageBreak
    Try: \@backslashchar #1notecontent{<key>}{<content>}}%
 \fi
 \ifsep@opt@warn
  \PackageWarning
   {\sep@packagename}
   {`#2' is already in use}%
 \fi
}

%}%

%}%
%{% marks

\newcommand\sep@markset  [1] {\protected@xdef\@thefnmark{\csname the#1mark\endcsname}}
\newcommand\sep@mark     [2] {\stepcounter {#1note}\sep@markset {#1}\@footnotemark}

%}%
%{% cross-references and counters

\newcommand\sep@refsetcounter  [2] {\setcounter{#1}{#2}\protected@edef\@currentlabel{\csname p@#1\endcsname\csname the#1\endcsname}}
\newcommand\sep@refstepcounter [1] {\stepcounter   {#1}\protected@edef\@currentlabel{\csname p@#1\endcsname\csname the#1\endcsname}}

%}%

%}%
%{% default

%% The default \sepfootnote apparatus relies on \footnote

\newfootnotes{sepfoot}

%}%

\endinput
%%
%% End of file `sepfootnotes.sty'.