奇怪的“ProvidesPackage”與“newenvironment”巨集擴展

奇怪的“ProvidesPackage”與“newenvironment”巨集擴展

目前正在改進現有的套件('ditaa',基於ditaa0_9.jar)以添加對svg的支援(在ditaa-0.11.0-standalone.jar中實現),但我面臨著奇怪的巨集定義/擴展。

基本上我想透過添加對其命令行參數的支援來控制“ditaa”二進位檔案的行為(總結):

\ProvidesPackage{ditaa}
\RequirePackage[patch]{kvoptions}

% Support for https://github.com/stathissideris/ditaa
\DeclareBoolOption{A}               % Turns anti-aliasing off (-A or --no-antialias)
\DeclareBoolOption{noantialias}

\ProcessKeyvalOptions*

\newenvironment{ditaa}[3][\columnwidth]{
        % OPTION A <-----
        \def\ditaaoptA{\ifthenelse{\boolean{ditaa@A}}{-A }{\ifthenelse{\boolean{ditaa@noantialias}}{--no-antialias }{}}}

        % OPTION B <-----
        \ifthenelse{\boolean{ditaa@A}}{\def\ditaaoptA{-A }}{\ifthenelse{\boolean{ditaa@noantialias}}{\def\ditaaoptA{--no-antialias }}{\def\ditaaoptA{}}}

        \VerbatimOut{\ditaafile}}
    {\endVerbatimOut
        \immediate\write18{ditaa.jar \ditaaoptA "\ditaafile" "\ditaadir/\ditaastem.png"}    % <----- TITI
        \begin{figure}[H]
            \vdots      % because I'm lazy
        \end{figure}
        \ditaaoptA      % <----- TOTO
    }

之後...

\usepackage[A]{ditaa}

好的,如上所述,當使用選項 A 時,TOTO 顯示正確的參數 (-A),但 TITI 失敗,因為執行的內容類似於:

runsystem(ditaa.jar \let \begingroup \let \begingroup \NROrg@begingroup \begingroup \def \protect \let \reserved@d = *\def \catcode `\ =5 \par )...executed.

然而,當使用選項 B 時,它在兩種情況下都有效,然而它需要定義相同的巨集 3 次(使用空變體),維護起來很麻煩且容易出錯。

有沒有辦法讓選項 A(更優雅)無論如何都能運作?

謝謝。

答案1

正如 Ulrike 在評論中所說,\ifthenelse不可擴展,因此它不能在 a 內工作\write(也就是說,您必須先評估它,進行\ditaaoptA相應的設置,然後將其傳遞給\write)。

這是使用 bool 變數的重新實現expl3,並l3keys2e解析鍵。

我把no-antialias鑰匙變成.bool_set:N鑰匙了。no-antialias和的效果no-antialias=true是一樣的,也可以使用no-antialias=false。我製作了A一個.meta重定向到的金鑰no-antialias(不過,我不會使用它,只會提供no-antialias),因此您只有一個布林值,而不必檢查兩個(儘早清理,您的程式碼會變得更簡單)。我還為您的其他變數定義了鍵。

然後打電話ditaa.jar給你只需要:

\sys_shell_now:x
  {
    ditaa.jar~ % executable
    \bool_if:NT \l__ditaa_no_antialias_bool { --no-antialias ~ } % --no-antialias if the bool is true
    "\l__ditaa_outfile_tl" ~ % whatever these other two are :)
    "\l__ditaa_path_tl/\l__ditaa_path_tl.png"
  }

我還將環境的可選參數設定為可以在每個環境中傳遞的鍵列表,而不是透過載入時選項來修復它們。

\begin{filecontents}[overwrite]{ditaa.sty}

\RequirePackage{l3keys2e}
\RequirePackage{fancyvrb}

\ProvidesExplPackage{ditaa}{2020-11-04}
  {v1.0}{Interface to ditaa}

\keys_define:nn { ditaa }
  {
    , no-antialias .bool_set:N = \l__ditaa_no_antialias_bool
    , no-antialias .default:n = true
    , no-antialias .initial:n = false
    , A .meta:n = { no-antialias }
    %
    , output-file .tl_set:N = \l__ditaa_outfile_tl
    , output-file .initial:n = { \c_sys_jobname_str-ditaa }
    %
    , path .tl_set:N = \l__ditaa_path_tl
    , path .initial:n = { \c_sys_jobname_str-path } % <- insert reasonable defaults
    , stem .tl_set:N = \l__ditaa_stem_tl
    , stem .initial:n = { \c_sys_jobname_str-stem } % <- insert reasonable defaults
    %
  }

\ProcessKeysOptions { ditaa }

\NewDocumentEnvironment { ditaa } { o m m }
  {
    \group_begin:
      \IfValueT{#1} { \keys_set:nn { ditaa } {#1} }
      \VerbatimOut { \l__ditaa_outfile_tl }
  }
  {
      \endVerbatimOut
      % \exp_args:Nx \tl_show:n
      \sys_shell_now:x
        {
          ditaa.jar~
          \bool_if:NT \l__ditaa_no_antialias_bool { --no-antialias ~ }
          "\l__ditaa_outfile_tl" ~
          "\l__ditaa_path_tl/\l__ditaa_path_tl.png"
        }
    \group_end:
  }

\end{filecontents}

\documentclass{article}

\usepackage[A]{ditaa}

\begin{document}

\begin{ditaa}{a}{b}
\end{ditaa}

\begin{ditaa}[no-antialias=false]{a}{b}
\end{ditaa}

\end{document}

答案2

這是我的完整版本,其中註解掉了一些內容,因為不是功能/測試:

% 'ditaa' package
%
% (c) Hiroshi Ukai
%
%% 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.
%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{ditaa}
[2020/11/04 v0.11.0 LaTeX package for embedding ditaa style ascii art]

\RequirePackage{fancyvrb}
\RequirePackage{graphicx}
\RequirePackage{svg}
\RequirePackage{etoolbox}
\RequirePackage{xifthen}
\RequirePackage[debugshow,patch]{kvoptions}
%\RequirePackage[patch]{kvoptions}
%\RequirePackage{kvoptions-patch}

%\newcommand*{\ditaasetup}[1]{\setkeys{ditaa}{#1}}
\newcommand*{\ditaasetup}{\kvsetkeys{ditaa}}
\SetupKeyvalOptions{setkeys=\kvsetkeys}
%\SetupKeyvalOptions{family=ditaa, prefix=ditaa@, setkeys=\kvsetkeys}
%\SetupKeyvalOptions{}

% These options are defined at \usepackage[options]{ditaa} location, *not* at \begin[options]{ditaa}
% These options can be changed at "runtime" using the \ditaasetup{options} macro, though
\DeclareStringOption{imagepath}             % Path of the image
\DeclareStringOption[\columnwidth]{width}[\columnwidth]

% Support for https://github.com/stathissideris/ditaa
\DeclareBoolOption{A}                       % Turns anti-aliasing off
\DeclareBoolOption{noantialias}
\DeclareStringOption{b}[FFFFFF]             % The background colour of the image
\DeclareStringOption{background}[FFFFFF]
\DeclareBoolOption{d}                       % Renders the debug grid
\DeclareBoolOption{debug}
\DeclareBoolOption[true]{E}                 % Prevents the separation of common edges
\DeclareBoolOption{noseparation}
\DeclareStringOption{e}[utf-8]              % The encoding of the input file
\DeclareStringOption{encoding}[utf-8]
\DeclareBoolOption{h}                       % The input is an HTML file
\DeclareBoolOption{html}
\DeclareBoolOption{help}                    % Prints usage help
\DeclareBoolOption{o}                       % Image file is overwriten
\DeclareBoolOption{overwrite}
\DeclareBoolOption{r}                       % All corners to be rendered as round corners
\DeclareBoolOption{roundcorners}
\DeclareBoolOption{S}                       % Turns off the drop-shadow effect
\DeclareBoolOption{noshadows}
\DeclareStringOption{s}[1.0]                % Size of the rendered image
\DeclareStringOption{scale}[1.0]
\DeclareBoolOption{svg}                     % SVG image as destination file
\DeclareStringOption{svgfonturl}[]          % SVG font URL
\DeclareBoolOption{T}                       % Diagram rendered on a transparent background
\DeclareBoolOption{transparent}
\DeclareStringOption{t}[4]                  % Tabs interpreted as x spaces
\DeclareStringOption{tabs}[4]
\DeclareBoolOption{v}                       % Makes ditaa more verbose
\DeclareBoolOption{verbose}
\DeclareBoolOption{W}                       % Sides of parallelograms as fixed slope
\DeclareBoolOption{fixedslop}

\ProcessKeyvalOptions*
%\ProcessLocalKeyvalOptions*
%\ProcessKeyvalOptions{ditaa}

%@formatter:off (This line indicates IntelliJ that formatter should be off before this)
\newenvironment{ditaa}[3][\ditaa@width]
    {
        \def\ditaacaption{#2}
        \def\ditaastem{#3}
        \def\ditaadir{\ditaa@imagepath/ditaa}
        \def\ditaafile{\ditaadir/\ditaastem.ditaa}
        \def\ditaafigwidth{#1}
        % usepackage->program options ('-\/-' is de-ligaturing '--')

%       \def\ditaaoptA{\ifthenelse{\boolean{ditaa@A}}{-A}{\ifthenelse{\boolean{ditaa@noantialias}}{-\/-no-antialias}{}}}
%       \def\ditaaoptb{\ifdefstring{\ditaa@b}{}{\ifdefstring{\ditaa@background}{}{}{-\/-background \ditaa@background}}{-b \ditaa@b}}
%       \def\ditaaoptd{\ifthenelse{\boolean{ditaa@d}}{-d}{\ifthenelse{\boolean{ditaa@debug}}{-\/-debug}{}}}
%       \def\ditaaoptE{\ifthenelse{\boolean{ditaa@E}}{-E}{\ifthenelse{\boolean{ditaa@noseparation}}{-\/-no-separation}{}}}
%       \def\ditaaopte{\ifdefstring{\ditaa@e}{}{\ifdefstring{\ditaa@encoding}{}{}{-\/-encoding \ditaa@encoding}}{-b \ditaa@e}}
%       \def\ditaaopth{\ifthenelse{\boolean{ditaa@h}}{-h}{\ifthenelse{\boolean{ditaa@html}}{-\/-html}{}}}
%       \def\ditaaopthelp{\ifthenelse{\boolean{ditaa@help}}{-\/-help}{}}
%       \def\ditaaopto{\ifthenelse{\boolean{ditaa@o}}{-o}{\ifthenelse{\boolean{ditaa@overwrite}}{-\/-overwrite}{}}}
%       \def\ditaaoptr{\ifthenelse{\boolean{ditaa@r}}{-r}{\ifthenelse{\boolean{ditaa@roundcorners}}{-\/-round-corners}{}}}
%       \def\ditaaoptS{\ifthenelse{\boolean{ditaa@S}}{-S}{\ifthenelse{\boolean{ditaa@noshadows}}{-\/-no-shadows}{}}}
%       \def\ditaaopts{\ifdefstring{\ditaa@s}{}{\ifdefstring{\ditaa@scale}{}{}{-\/-scale \ditaa@scale}}{-s \ditaa@s}}
%       \def\ditaaoptsvg{\ifthenelse{\boolean{ditaa@svg}}{-\/-svg}{}}
%       \def\ditaaoptsvgext{\ifthenelse{\boolean{ditaa@svg}}{svg}{png}}
%       \def\ditaaoptsvgfonturl{\ifdefstring{\ditaa@svg-font-url}{}{}{-\/-svg-font-url \ditaa@svg-font-url}}
%       \def\ditaaoptT{\ifthenelse{\boolean{ditaa@T}}{-T}{\ifthenelse{\boolean{ditaa@transparent}}{-\/-transparent}{}}}
%       \def\ditaaoptt{\ifdefstring{\ditaa@t}{}{\ifdefstring{\ditaa@tabs}{}{}{-\/-tabs \ditaa@tabs}}{-t \ditaa@t}}
%       \def\ditaaoptv{\ifthenelse{\boolean{ditaa@v}}{-v}{\ifthenelse{\boolean{ditaa@verbose}}{-\/-verbose}{}}}
%       \def\ditaaoptW{\ifthenelse{\boolean{ditaa@W}}{-W}{\ifthenelse{\boolean{ditaa@fixedslop}}{-\/-fixed-slop}{}}}

        % \\def\\(ditaaopt[-\w]+)\{\\ifthenelse\{\\boolean\{(ditaa\@[-\w]+)\}\}\{([-\w]+)\}\{\\ifthenelse\{\\boolean\{(ditaa\@[-\w]+)\}\}\{-\\/-([-\w]+)\}\{\}\}\}
        % \\ifthenelse\{\\boolean\{\2\}\}\{\\def\\\1\{\3 \}\}\{\\ifthenelse\{\\boolean\{\4\}\}\{\\def\\\1\{-\\/-\5 \}\}\{\\\1\{\}\}\}

        % \\def\\(ditaaopt[-\w]+)\{\\ifdefstring\{\\(ditaa\@[-\w]+)\}\{\}\{\\ifdefstring\{\\(ditaa\@[-\w]+)\}\{\}\{\}\{-\\/-([-\w]+) \\\3\}\}\{-([-\w]+) \\\2\}\}
        % \\ifdefstring\{\\\2\}\{\}\{\\ifdefstring\{\\\3\}\{\}\{\\\1\{\}\}\{\\def\\\1\{-\\/-\4 \\\3 \}\}\}\{\\def\\\1\{-\5 \\\2 \}\}
        
        % \\def\\(ditaaopt[-\w]+)\{\\ifthenelse\{\\boolean\{(ditaa\@[-\w]+)\}\}\{-\\/-([-\w]+)\}\{\}\}
        % \\ifthenelse\{\\boolean\{\2\}\}\{\\def\\\1\{-\\/-\3 \}\}\{\\\1\{\}\}
        
        \ifthenelse{\boolean{ditaa@A}}{\def\ditaaoptA{-A }}{\ifthenelse{\boolean{ditaa@noantialias}}{\def\ditaaoptA{--no-antialias }}{\def\ditaaoptA{}}}
        \ifdefstring{\ditaa@b}{}{\ifdefstring{\ditaa@background}{}{\def\ditaaoptb{}}{\def\ditaaoptb{--background \ditaa@background }}}{\def\ditaaoptb{-b \ditaa@b }}
        \ifthenelse{\boolean{ditaa@d}}{\def\ditaaoptd{-d }}{\ifthenelse{\boolean{ditaa@debug}}{\def\ditaaoptd{--debug }}{\def\ditaaoptd{}}}
        \ifthenelse{\boolean{ditaa@E}}{\def\ditaaoptE{-E }}{\ifthenelse{\boolean{ditaa@noseparation}}{\def\ditaaoptE{--no-separation }}{\def\ditaaoptE{}}}
        \ifdefstring{\ditaa@e}{}{\ifdefstring{\ditaa@encoding}{}{\def\ditaaopte{}}{\def\ditaaopte{--encoding \ditaa@encoding }}}{\def\ditaaopte{-e \ditaa@e }}
        \ifthenelse{\boolean{ditaa@h}}{\def\ditaaopth{-h }}{\ifthenelse{\boolean{ditaa@html}}{\def\ditaaopth{--html }}{\def\ditaaopth{}}}
        \ifthenelse{\boolean{ditaa@help}}{\def\ditaaopthelp{--help }}{\def\ditaaopthelp{}}
        \ifthenelse{\boolean{ditaa@o}}{\def\ditaaopto{-o }}{\ifthenelse{\boolean{ditaa@overwrite}}{\def\ditaaopto{--overwrite }}{\def\ditaaopto{}}}
        \ifthenelse{\boolean{ditaa@r}}{\def\ditaaoptr{-r }}{\ifthenelse{\boolean{ditaa@roundcorners}}{\def\ditaaoptr{--round-corners }}{\def\ditaaoptr{}}}
        \ifthenelse{\boolean{ditaa@S}}{\def\ditaaoptS{-S }}{\ifthenelse{\boolean{ditaa@noshadows}}{\def\ditaaoptS{--no-shadows }}{\def\ditaaoptS{}}}
        \ifdefstring{\ditaa@s}{}{\ifdefstring{\ditaa@scale}{}{\def\ditaaopts{}}{\def\ditaaopts{--scale \ditaa@scale }}}{\def\ditaaopts{-s \ditaa@s }}
        \ifthenelse{\boolean{ditaa@svg}}{\def\ditaaoptsvg{--svg }}{\def\ditaaoptsvg{}}
        \ifthenelse{\boolean{ditaa@svg}}{\def\ditaaoptsvgext{svg}}{\def\ditaaoptsvgext{png}}
        \ifdefstring{\ditaa@svgfonturl}{}{\def\ditaaoptsvgfonturl{}}{\def\ditaaoptsvgfonturl{--svg-font-url "\ditaa@svgfonturl" }}
        \ifthenelse{\boolean{ditaa@T}}{\def\ditaaoptT{-T }}{\ifthenelse{\boolean{ditaa@transparent}}{\def\ditaaoptT{--transparent }}{\def\ditaaoptT{}}}
        \ifdefstring{\ditaa@t}{}{\ifdefstring{\ditaa@tabs}{}{\def\ditaaoptt{}}{\def\ditaaoptt{--tabs \ditaa@tabs }}}{\def\ditaaoptt{-t \ditaa@t }}
        \ifthenelse{\boolean{ditaa@v}}{\def\ditaaoptv{-v }}{\ifthenelse{\boolean{ditaa@verbose}}{\def\ditaaoptv{--verbose }}{\def\ditaaoptv{}}}
        \ifthenelse{\boolean{ditaa@W}}{\def\ditaaoptW{-W }}{\ifthenelse{\boolean{ditaa@fixedslop}}{\def\ditaaoptW{--fixed-slop }}{\def\ditaaoptW{}}}

        \VerbatimOut{\ditaafile}}
    {\endVerbatimOut
        \immediate\write18{ditaa.jar \ditaaoptA \ditaaoptb \ditaaoptd \ditaaoptE \ditaaopte \ditaaopth \ditaaopthelp \ditaaopto \ditaaoptr \ditaaoptS \ditaaopts \ditaaoptsvg \ditaaoptsvgfonturl \ditaaoptT \ditaaoptt \ditaaoptv \ditaaoptW "\ditaafile" "\ditaadir/\ditaastem.\ditaaoptsvgext"}
        \begin{figure}[H]
            \begin{center}
                \vspace{-1em}
                \ifditaa@svg
                    \includesvg[inkscapelatex=false, width=\ditaafigwidth]{\ditaadir/\ditaastem.svg}
                \else
                    \includegraphics[width=\ditaafigwidth]{\ditaadir/\ditaastem.png}
                \fi
                \vspace{-2em}
                \caption{\ditaacaption}
                \label{fig:\ditaastem}
                \vspace{-1.5em}
            \end{center}
        \end{figure}
    }
%@formatter:on (This line indicates IntelliJ that formatter should be off before this)
%--------------------------------------------------

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

是的,我還注意到雙連字符被“吃掉”了,所以我在另一個主題中讀到“--”應該“轉義”為“-\/-”,但是雖然它適用於選項A ,但它並不適用於選項 B。

相關內容