summaryrefslogtreecommitdiffstats
path: root/src/cmd/page/pdfprolog.c
diff options
context:
space:
mode:
authorrsc <devnull@localhost>2005-01-04 21:23:50 +0000
committerrsc <devnull@localhost>2005-01-04 21:23:50 +0000
commit24c02865d8fcc97d1fb5cb9281810d8074aa5eb1 (patch)
tree3bb16794ded14341ee58d9f1f173ce92fb4d2be7 /src/cmd/page/pdfprolog.c
parentd1e9002f81f14fbfef1ebc4261edccd9eb97b72c (diff)
downloadplan9port-24c02865d8fcc97d1fb5cb9281810d8074aa5eb1.tar.gz
plan9port-24c02865d8fcc97d1fb5cb9281810d8074aa5eb1.zip
placeholder; does not yet build
Diffstat (limited to 'src/cmd/page/pdfprolog.c')
-rw-r--r--src/cmd/page/pdfprolog.c29
1 files changed, 29 insertions, 0 deletions
diff --git a/src/cmd/page/pdfprolog.c b/src/cmd/page/pdfprolog.c
new file mode 100644
index 00000000..8493e6d2
--- /dev/null
+++ b/src/cmd/page/pdfprolog.c
@@ -0,0 +1,29 @@
+"/Page null def\n"
+"/Page# 0 def\n"
+"/PDFSave null def\n"
+"/DSCPageCount 0 def\n"
+"/DoPDFPage {dup /Page# exch store pdfgetpage mypdfshowpage } def\n"
+"\n"
+"/pdfshowpage_mysetpage { % <pagedict> pdfshowpage_mysetpage <pagedict>\n"
+" dup /CropBox pget {\n"
+" boxrect\n"
+" 2 array astore /PageSize exch 4 2 roll\n"
+" neg exch neg exch 2 array astore /PageOffset exch\n"
+" << 5 1 roll >> setpagedevice\n"
+" } if\n"
+"} bind def\n"
+"\n"
+"/mypdfshowpage % <pagedict> pdfshowpage -\n"
+" { dup /Page exch store\n"
+" pdfshowpage_init \n"
+" pdfshowpage_setpage \n"
+" pdfshowpage_mysetpage\n"
+" save /PDFSave exch store\n"
+" (before exec) VMDEBUG\n"
+" pdfshowpage_finish\n"
+" (after exec) VMDEBUG\n"
+" PDFSave restore\n"
+" } bind def\n"
+"\n"
+"GS_PDF_ProcSet begin\n"
+"pdfdict begin\n"