[gs-cvs] rev 8844 - trunk/gs/lib

[alexcher at ghostscript.com]

Author: alexcher
Date: 2008-07-16 08:00:17 -0700 (Wed, 16 Jul 2008)
New Revision: 8844

Modified:
   trunk/gs/lib/pdf_font.ps
Log:
Ignore out-of-range UniqueID in embedded Type 1 PDF fonts. Bug 689973.

DIFFERENCES:
None


Modified: trunk/gs/lib/pdf_font.ps
===================================================================
--- trunk/gs/lib/pdf_font.ps	2008-07-15 20:29:13 UTC (rev 8843)
+++ trunk/gs/lib/pdf_font.ps	2008-07-16 15:00:17 UTC (rev 8844)
@@ -704,6 +704,15 @@
 /readtype1dict 5 dict dup begin
   /definefont {
     exch pop
+    dup /UniqueID .knownget {
+      dup dup 0 lt exch 16#ffffff gt or {
+        (   **** Warning: Ignoring invalid /UniqueID = ) exch =string cvs
+        concatstrings (\n) concatstrings pdfformaterror
+        dup /UniqueID undef
+      } {
+        pop
+      } ifelse
+    } if
     .completefont
   } bdef