[latex3-commits] [git/LaTeX3-latex3-pdfresources] master: some experiments with pageattr (dad1687)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : master
Link       : https://github.com/latex3/pdfresources/commit/dad1687241898362a1abc94c59cc89b0dc9e49e4

>---------------------------------------------------------------

commit dad1687241898362a1abc94c59cc89b0dc9e49e4
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Sat Mar 7 20:02:13 2020 +0100

    some experiments with pageattr


>---------------------------------------------------------------

dad1687241898362a1abc94c59cc89b0dc9e49e4
 experiments/pageattr-luatex.tex | 39 +++++++++++++++++++++++++++++++++++
 experiments/pageattr-tests.tex  | 45 +++++++++++++++++++++++++++++++++++++++++
 2 files changed, 84 insertions(+)

diff --git a/experiments/pageattr-luatex.tex b/experiments/pageattr-luatex.tex
new file mode 100644
index 0000000..9303e92
--- /dev/null
+++ b/experiments/pageattr-luatex.tex
@@ -0,0 +1,39 @@
+\documentclass{article}
+\usepackage{graphicx}
+\usepackage{l3pdf}
+\ExplSyntaxOn
+\pdf_uncompress:
+\ExplSyntaxOff
+\usepackage{atbegshi}
+\directlua{attrtable={} attrtable.rotate=0}
+\makeatletter
+\AtBeginShipout
+  {
+    \AtBeginShipoutAddToBox
+     {
+      \latelua{attrtable.rotate=\ifodd\c at page -90 \else 90\fi}
+     }
+
+    \AtBeginShipoutAddToBoxForeground
+      {
+        \latelua{pdf.setpageattributes ("/Rotate ".. attrtable.rotate)}
+      }
+  }
+
+\begin{document}\makeatletter
+some text
+
+\begin{figure}
+%\latelua{pdf.setpageattribute("/Rotate 90")}
+%\latelua{pdf.setpageattribute("/Rotate \ifodd\c at page -90 \else 90\fi")}
+%\latelua{attrtable.rotate=\ifodd\c at page -90 \else 90\fi}
+\rotatebox{90}{\resizebox{15cm}{!}{linksherum}}
+\end{figure}
+
+\begin{figure}
+%\latelua{pdf.setpageattributes("/Rotate -90")}
+%\latelua{pdf.setpageattributes("/Rotate \ifodd\c at page -90 \else 90\fi")}
+\rotatebox{-90}{\resizebox{15cm}{!}{rechtsherum}}
+\end{figure}
+
+\end{document}
\ No newline at end of file
diff --git a/experiments/pageattr-tests.tex b/experiments/pageattr-tests.tex
new file mode 100644
index 0000000..0f16e65
--- /dev/null
+++ b/experiments/pageattr-tests.tex
@@ -0,0 +1,45 @@
+% !Mode:: "TeX:UTF-8:Main"
+
+\PassOptionsToPackage{enable-debug,check-declarations}{expl3}
+\RequirePackage[debug]{pdfresources}
+%\input{regression-test}
+\documentclass{article}
+\usepackage{lmodern}
+\usepackage{l3pdf}
+\ExplSyntaxOn
+\pdf_uncompress:
+\ExplSyntaxOff
+\renewcommand\large{%
+   \fontsize{1.5cm}{2cm}\selectfont}
+\renewcommand\floatpagefraction{0.2}   
+\begin{document}\showoutput
+\makeatletter
+\ExplSyntaxOn
+\large blub
+
+\begin{figure}[p]
+\pdf_thispageattr_gput:nn{Rotate}{\ifodd\c at page -90\else 90 \fi}
+\large
+12345678 \par
+code~is~on~page~\thepage\par 
+\rule{1cm}{10cm}
+\end{figure}
+
+\begin{figure}[p]
+\pdf_thispageattr_gput:nn{Rotate}{\ifodd\c at page -90\else 90 \fi}
+\large
+12345678 \par
+code~is~on~page~\thepage\par 
+\rule{1cm}{10cm}
+\end{figure}
+\newpage
+12345678 \par
+code~is~on~page~\thepage\par 
+\pdf_thispageattr_gput:nn{Rotate}{90}
+\ExplSyntaxOff
+\end{document} 
+
+\begin{figure}[p]
+\rule{1cm}{15cm}
+\pdf_thispageattr_gput:nn{Rotate}{-90}
+\end{figure}