largefile test from Martin

git-svn-id: svn://tug.org/texlive/trunk@6858 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 42 insertions, 0 deletions

diff --git a/Master/support/tests/largefile/3gb.tex b/Master/support/tests/largefile/3gb.tex
new file mode 100644
index 00000000000..a65143631a3
--- /dev/null
+++ b/Master/support/tests/largefile/3gb.tex
@@ -0,0 +1,16 @@
+% $Id$
+% Check if a 3gb file can be created.
+% (Public domain.)
+\pdfoutput=1
+\pdfcompresslevel=0
+
+\topskip0pt
+\newcount\n
+\loop
+	\pdfximage width \hsize height \vsize {poles.png}
+	\hbox{\pdfrefximage\pdflastximage}
+	\eject
+	\advance\n by1
+	\ifnum\n<3000
+\repeat
+\bye
diff --git a/Master/support/tests/largefile/Makefile b/Master/support/tests/largefile/Makefile
new file mode 100644
index 00000000000..302b241963d
--- /dev/null
+++ b/Master/support/tests/largefile/Makefile
@@ -0,0 +1,17 @@
+# $Id$
+# Public domain.
+# 
+3gb.pdf: 3gb.tex poles.png
+	pdftex 3gb.tex
+	@echo "check the first numbers to see if LFS works; they must be > 2147483648"
+	@tail 3gb.pdf|head -2
+	
+poles.png:
+	ppmpat -poles 1250 1250 |pnmtopng > poles.png
+
+.PHONY: clean clobber
+clean:
+	rm -f *.log
+
+clobber: clean
+	rm -f poles.png 3gb.pdf
diff --git a/Master/support/tests/largefile/README b/Master/support/tests/largefile/README
new file mode 100644
index 00000000000..515691568d8
--- /dev/null
+++ b/Master/support/tests/largefile/README
@@ -0,0 +1,9 @@
+(This file public domain.)
+
+The idea here is to see if a 3gb PDF file can be created, that is, if
+largefile support is present and working.  Just run make.
+
+You'll need ppmpat from the netpbm tools to make the test image,
+although any image >1gb will do.
+
+-ms/peb/karl, 5mar08.