Extensión del paquete `rotating` para configurar la rotación de PDF

Extensión del paquete `rotating` para configurar la rotación de PDF

Estoy intentando ampliar el rotatingpaquete para mostrar también las páginas respectivas giradas correctamente en la salida PDF configurando el atributo de página PDF /Rotate. Tengo una versión funcional para XeLaTeX, sin embargo, no logro hacerla para LuaLaTeX. Por favor considere el siguiente MWE:

\documentclass{article}
\usepackage{lipsum}
\usepackage{rotating}
\usepackage{etoolbox}
\usepackage{iftex}
\usepackage{afterpage}

\ifLuaTeX
    \edef\pdfpageattr{\pdfvariable pageattr}
\fi

\makeatletter
    \def\@PDFrot#1{%
        \ifXeTeX%
            \special{pdf: put @thispage <</Rotate #1>>}%
        \fi%
        \ifLuaTeX%
            \global\pdfpageattr\expandafter{\the\pdfpageattr/Rotate #1}%
            \afterpage{\global\pdfpageattr\expandafter{\the\pdfpageattr/Rotate 0}}%
        \fi%
    }

    \patchcmd{\@xrotfloat}%
        {\begin{minipage}\textheight}%
        {\begin{minipage}\textheight\@PDFrot{90}}%
        {}{}%
\makeatother

\begin{document}

    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]

\end{document}

Al compilar este MWE con XeLaTeX, se obtendrá el comportamiento deseado: la página flotante con el sidewaysfigurecontenido (página 3) se gira correctamente en la salida PDF. Pero cuando se compila con LuaLaTeX, también se rotará la página 2, lo cual no es deseado.


Orientaciones de página PDF deseadas cuando se compila con XeLaTeX. Orientaciones de página PDF deseadas cuando se compila con XeLaTeX.


Orientación incorrecta de la página PDF de la página 2 cuando se compila con LuaLaTeX. Orientación incorrecta de la página PDF de la página 2 cuando se compila con LuaLaTeX.


Creo que esto se debe a que la definición del sidewaysfigurecontenido (junto con la configuración del atributo PDF) ya se evaluará en la página 2, donde aparecería el contenido si no fuera flotante. No he encontrado ninguna manera de evitar este problema y me alegraría tener alguna idea.

NÓTESE BIEN:El MWE es sólo un ejemplo reducido, que no tiene en cuenta adecuadamente la orientación de la página en función de su número de página (par/impar). Eliminé estas partes del código para facilitar la comprensión del MWE.

Respuesta1

Basado en elrespuesta a otra preguntaproporcionado en el comentario de Ulrike Fischer, desarrollé el siguiente parche que también tiene en cuenta las páginas pares/impares:

\documentclass{article}
\usepackage{lipsum}
\usepackage{rotating}
\usepackage{etoolbox}
\usepackage{iftex}
\usepackage{pdflscape}
\usepackage{atbegshi}
\usepackage{zref-user}

\makeatletter
    \ifXeTeX%
        \patchcmd{\@xrotfloat}%
            {\begin{minipage}\textheight}%
            {%
                \begin{minipage}\textheight%
                \ifnumodd{\thepage}%
                    {\special{pdf: put @thispage <</Rotate 90>>}}%
                    {\special{pdf: put @thispage <</Rotate -90>>}}%
            }%
            {}{}%
    \fi%
    \ifLuaTeX%
        \newcounter{cntsideways}%
        \AtBeginShipout{%
            \ifnum\zref@extractdefault{rotate\number\value{page}}{page}{0}=0%
                \PLS@RemoveRotate%
            \else%
                \ifnumodd{\thepage}{\PLS@AddRotate{90}}{\PLS@AddRotate{-90}}%
            \fi}%
        \patchcmd{\@xrotfloat}%
            {\begin{minipage}\textheight}%
            {\begin{minipage}\textheight\rotatesidewayslabel}%
            {}{}%
        \newcommand\rotatesidewayslabel{\stepcounter{cntsideways}%
        \zlabel{tmp\thecntsideways}\zlabel{rotate\zref@extractdefault{tmp\thecntsideways}{page}{0}}}%
    \fi%
\makeatother

\begin{document}

    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]

\end{document}

¡Gracias!

Respuesta2

El problema principal es que \afterpagefunciona bien, pero la configuración del atributo de página debe retrasarse hasta que TeX ya no funcione en la página anterior. Afortunadamente, \lateluapermite ejecutar código Lua que se retrasa hasta el momento adecuado, por lo que puedes usar

\documentclass{article}
\usepackage{lipsum}
\usepackage{rotating}
\usepackage{etoolbox}
\usepackage{iftex}
\usepackage{afterpage}

\ifLuaTeX
    \edef\pdfpageattr{\pdfvariable pageattr}
\fi

\makeatletter
    \def\@PDFrot#1{%
        \ifXeTeX%
            \special{pdf: put @thispage <</Rotate #1>>}%
        \fi%
        \ifLuaTeX%
            \latelua{pdf.setpageattributes(string.gsub(pdf.getpageattributes() or '', '/Rotate [+-]?\csstring\%d+', '') .. '/Rotate #1')}%
            \afterpage{\directlua{pdf.setpageattributes((string.gsub(pdf.getpageattributes(), '/Rotate #1', '')))}}%
        \fi%
    }

    \patchcmd{\@xrotfloat}%
        {\begin{minipage}\textheight}%
        {\begin{minipage}\textheight\@PDFrot{90}}%
        {}{}%
\makeatother

\begin{document}

    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]


    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]


    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]

\end{document}

Respuesta3

MientrasLa solución de DigNativeXeLaTeX funciona en su mayor parte, tuve algunos problemas con él. Resulta que \thepagese expande al número de página tal como está en la primera ejecución, lo que podría no ser igual al número de página en la ejecución final.1Específicamente, obtuve resultados diferentes según si usé \clearpageantes sidewaysfigureo no, o cuando tenía varias figuras seguidas.

Para resolver esto, opté por un enfoque con \label+ \pageref, similar a lo que mencionó Ulrike Fischer eneste comentario. Una nota al margen: porque \pagerefno se expande a un número sino a texto (que depende del \pagenumbering, por lo que es posible que ni siquieramirarcomo un número), tuve que usar el \getpagerefnumbercomando del refcountpaquete.2

Tenga en cuenta que no actualicé la parte de LuaLaTeX, parece funcionar bien. Pero como estoy usando XeLaTeX, quería incluir esta solución :)

\documentclass[twoside]{article}
\usepackage{lipsum}
\usepackage{rotating}
\usepackage{etoolbox}
\usepackage{iftex}
\usepackage{pdflscape}
\usepackage{refcount}
\usepackage{atbegshi}
\usepackage{zref-user}

\makeatletter
    \ifXeTeX%
        \newcounter{rotfigcount}%
        \patchcmd{\@xrotfloat}%
            {\begin{minipage}\textheight}%
            {%
                \begin{minipage}\textheight%
                \stepcounter{rotfigcount}%
                \label{rotfig:\therotfigcount}%
                \ifnumodd{\getpagerefnumber{rotfig:\therotfigcount}}%
                    {\special{pdf: put @thispage <</Rotate 90>>}}%
                    {\special{pdf: put @thispage <</Rotate -90>>}}%
            }%
            {}{}%
    \fi%
    \ifLuaTeX%
        \newcounter{cntsideways}%
        \AtBeginShipout{%
            \ifnum\zref@extractdefault{rotate\number\value{page}}{page}{0}=0%
                \PLS@RemoveRotate%
            \else%
                \ifnumodd{\thepage}{\PLS@AddRotate{90}}{\PLS@AddRotate{-90}}%
            \fi}%
        \patchcmd{\@xrotfloat}%
            {\begin{minipage}\textheight}%
            {\begin{minipage}\textheight\rotatesidewayslabel}%
            {}{}%
        \newcommand\rotatesidewayslabel{\stepcounter{cntsideways}%
        \zlabel{tmp\thecntsideways}\zlabel{rotate\zref@extractdefault{tmp\thecntsideways}{page}{0}}}%
    \fi%
\makeatotherz

\begin{document}

    \lipsum[1-10]

    \begin{sidewaysfigure}
        \centering
        Test
        \caption{Just an example figure.}
    \end{sidewaysfigure}

    \begin{sidewaysfigure}
        \centering
        Test 2
        \caption{Just a second example figure.}
    \end{sidewaysfigure}

    \lipsum[1-5]

\end{document}

información relacionada