☰

Расшифровка шестнадцатеричной строки в XeLaTeX

tag-icon • tag-icon macros xetex
Расшифровка шестнадцатеричной строки в XeLaTeX

Я попробую адаптировать pax.styдля XeLaTeX и обнаружил, что URL в .paxфайлах кодируются как шестнадцатеричная строка:

\[{annot}{1}{Link}{56.693 693.9 156.107 707.7}{URI}{
  URI={\<6D61696C746F3A68656C6C6F406578616D706C652E636F6D\>},
  Border={[0 0 0]},
}\\

Расшифрованный URI (можно увидеть )mailto:[email protected]xxd -r -p

Как декодировать шестнадцатеричную строку в XeLaTeX (из шестнадцатеричной в ascii)?

МВЭ:

\documentclass{article}
\newcommand{\hextotext}[1]{#1} % ???
\begin{document}
\hextotext{6D61696C746F3A68656C6C6F406578616D706C652E636F6D}
\end{document}

решение1

Вы можете использовать \str_set_convert:Nnnnдля преобразования из (предполагая) utf8/hexв utf8:

\documentclass{article}
\usepackage{xparse}
\ExplSyntaxOn
\str_new:N \l__ivanov_tmpa_str
\NewDocumentCommand \hextotext { o m }
  {
    \str_set_convert:Nxnn \l__ivanov_tmpa_str {#2}
      { utf8/hex } { utf8 }
    \IfValueTF{#1}
      { \str_set_eq:NN #1 \l__ivanov_tmpa_str }
      { \str_use:N \l__ivanov_tmpa_str }
  }
\cs_generate_variant:Nn \str_set_convert:Nnnn { Nx }
\ExplSyntaxOff
\begin{document}

\hextotext{6D61696C746F3A68656C6C6F406578616D706C652E636F6D}

\hextotext[\tmp]{6D61696C746F3A68656C6C6F406578616D706C652E636F6D}
\texttt{\meaning\tmp}

\end{document}

Это печатает:

введите описание изображения здесь

решение2

В особом случае «шестнадцатеричное вascii" (как указано в вашем вопросе) вы можете, например, сделать строчными всю последовательность, всегда вставлять ее ^^перед двумя последовательными символами этой последовательности, и у вас будет что-то, что интерпретируется, например, \scantokensкак соответствующая последовательность символов в ^^-нотации.

\documentclass{article}

\begingroup
\makeatletter
\catcode`\^^A=14\relax
\catcode`\%=12\relax
\@firstofone{^^A
  \endgroup
  \newcommand\hextotext[2]{^^A
    \@ifdefinable#1{^^A
      \lowercase{^^A
        \scantokens\expandafter{^^A
          \expandafter\newcommand\expandafter#1\expandafter{^^A
            \romannumeral\expandafter\hextotextloop\expandafter{\expandafter}\detokenize{#2}\relax\relax
          }%^^A
        }^^A
      }^^A
    }^^A
  }^^A
}%
\begingroup
\makeatletter
\catcode`\^=12\relax
\@firstofone{%
  \endgroup
  \newcommand*\hextotextloop[3]{%
    \ifx\relax#2\expandafter\@firstoftwo\else\expandafter\@secondoftwo\fi
    {\z@#1}{\hextotextloop{#1^^#2#3}}%
  }%
}%

\begin{document}

%  6D61696C746F3A68656C6C6F406578616D706C652E636F6D

^^6d^^61^^69^^6c^^74^^6f^^3a^^68^^65^^6c^^6c^^6f^^40^^65^^78^^61^^6d^^70^^6c^^65^^2e^^63^^6f^^6d

\hextotext{\MyCommand}{6D61696C746F3A68656C6C6F406578616D706C652E636F6D}

\begingroup

\ttfamily

\string\MyCommand: \meaning\MyCommand

\endgroup

\MyCommand

\end{document}

введите описание изображения здесь

Но это только для развлечения.

В реальных жизненных ситуациях я бы использовалчто указано в ответе Фелипе Олейника.Это охватывает преобразование utf8/hex в utf8, в то время как ASCII (то, о чем идет речь в моем ответе) является всего лишь подмножеством utf8.

Связанный контент