home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 April / PCWorld_2001-04_cd.bin / Software / Vyzkuste / gs / gs650w32.exe / gs6.50 / lib / pdf_sec.ps < prev    next >
Text File  |  2000-12-05  |  2KB  |  60 lines
  1. %    Copyright (C) 1996, 1997 Aladdin Enterprises.  All rights reserved.
  2. % 
  3. % This file is part of AFPL Ghostscript.
  4. % 
  5. % AFPL Ghostscript is distributed with NO WARRANTY OF ANY KIND.  No author or
  6. % distributor accepts any responsibility for the consequences of using it, or
  7. % for whether it serves any particular purpose or works at all, unless he or
  8. % she says so in writing.  Refer to the Aladdin Free Public License (the
  9. % "License") for full details.
  10. % 
  11. % Every copy of AFPL Ghostscript must include a copy of the License, normally
  12. % in a plain ASCII text file named PUBLIC.  The License grants you the right
  13. % to copy, modify and redistribute AFPL Ghostscript, but only under certain
  14. % conditions described in the License.  Among other things, the License
  15. % requires that the copyright notice and this notice be preserved on all
  16. % copies.
  17.  
  18. % $Id: pdf_sec.ps,v 1.2 2000/09/19 18:29:11 lpd Exp $
  19. % pdf_sec.ps
  20. % Security hooks for PDF reader.
  21.  
  22. % This file contains the procedures that have to take encryption into
  23. % account when reading a PDF file.  There is no actual decryption code here,
  24. % because U.S. export control laws might prohibit making this file available
  25. % to anyone outside the U.S. if the code were included.  Instead, you can
  26. % get the real version of this file from
  27. %    http://www.ozemail.com.au/~geoffk/pdfencrypt/pdf_sec.ps
  28. % or, if the ~ character upsets your software,
  29. %    http://www.ozemail.com.au/%7Egeoffk/pdfencrypt/pdf_sec.ps
  30. % NOTE: these URLs are referenced in the error message below.
  31.  
  32. /.setlanguagelevel where { pop 2 .setlanguagelevel } if
  33. .currentglobal true .setglobal
  34. /pdfdict where { pop } { /pdfdict 100 dict def } ifelse
  35. pdfdict begin
  36.  
  37. % Process the encryption information in the Trailer.
  38. /pdf_process_Encrypt
  39.  { (\n) =
  40.    (    **** The PDF input file uses encryption and cannot be processed.) =
  41.    (    **** Please get and install the patch available from) =
  42.    (    ****     http://www.ozemail.com.au/~geoffk/pdfencrypt/pdf_sec.ps) =
  43.    (\n) = flush
  44.    /pdfopen cvx /invalidfileaccess signalerror
  45.  } bind def
  46.  
  47. % Run the code to resolve an object reference.
  48. /pdf_run_resolve
  49.  { PDFfile resolveopdict .pdfrun
  50.  } bind def
  51.  
  52. % Prefix a decryption filter to a stream if needed.
  53. % Stack: readdata? dict parms file/string filternames
  54. /pdf_decrypt_stream
  55.  {
  56.  } bind def
  57.  
  58. end            % pdfdict
  59. .setglobal
  60.