Gecko [ 122.154.134.11 ]

Name	Size	Permission
CIDFnmap	291 B	-rw-r--r--
FCOfontmap-PCLPS2	2.94 KB	-rw-r--r--
Fontmap	216 B	-rw-r--r--
Fontmap.GS	11.93 KB	-rw-r--r--
cidfmap	398 B	-rw-r--r--
cidfmap.GS	991 B	-rw-r--r--
gs_agl.ps	27.93 KB	-rw-r--r--
gs_btokn.ps	11.11 KB	-rw-r--r--
gs_cet.ps	1.77 KB	-rw-r--r--
gs_cff.ps	24 KB	-rw-r--r--
gs_cidcm.ps	16.97 KB	-rw-r--r--
gs_ciddc.ps	8.18 KB	-rw-r--r--
gs_cidfm.ps	4.53 KB	-rw-r--r--
gs_cidfn.ps	12.59 KB	-rw-r--r--
gs_cidtt.ps	5.37 KB	-rw-r--r--
gs_cmap.ps	17.31 KB	-rw-r--r--
gs_cspace.ps	6.79 KB	-rw-r--r--
gs_css_e.ps	4.83 KB	-rw-r--r--
gs_dbt_e.ps	2.23 KB	-rw-r--r--
gs_diskf.ps	7.4 KB	-rw-r--r--
gs_diskn.ps	6.75 KB	-rw-r--r--
gs_dpnxt.ps	4.66 KB	-rw-r--r--
gs_dps.ps	7.79 KB	-rw-r--r--
gs_dps1.ps	4.61 KB	-rw-r--r--
gs_dps2.ps	7.9 KB	-rw-r--r--
gs_dscp.ps	3.84 KB	-rw-r--r--
gs_epsf.ps	7.04 KB	-rw-r--r--
gs_fapi.ps	11.2 KB	-rw-r--r--
gs_fntem.ps	11.36 KB	-rw-r--r--
gs_fonts.ps	43.84 KB	-rw-r--r--
gs_frsd.ps	2.95 KB	-rw-r--r--
gs_icc.ps	3.2 KB	-rw-r--r--
gs_il1_e.ps	2.73 KB	-rw-r--r--
gs_img.ps	27.51 KB	-rw-r--r--
gs_init.ps	72.42 KB	-rw-r--r--
gs_l2img.ps	5.5 KB	-rw-r--r--
gs_lev2.ps	33.8 KB	-rw-r--r--
gs_ll3.ps	11.83 KB	-rw-r--r--
gs_mex_e.ps	3.9 KB	-rw-r--r--
gs_mgl_e.ps	2.14 KB	-rw-r--r--
gs_mro_e.ps	2.47 KB	-rw-r--r--
gs_pdf_e.ps	1.66 KB	-rw-r--r--
gs_pdfwr.ps	27.34 KB	-rw-r--r--
gs_res.ps	36 KB	-rw-r--r--
gs_resmp.ps	22.2 KB	-rw-r--r--
gs_setpd.ps	29.17 KB	-rw-r--r--
gs_statd.ps	13.24 KB	-rw-r--r--
gs_std_e.ps	3.16 KB	-rw-r--r--
gs_sym_e.ps	3.02 KB	-rw-r--r--
gs_trap.ps	2.96 KB	-rw-r--r--
gs_ttf.ps	77.36 KB	-rw-r--r--
gs_typ32.ps	4.25 KB	-rw-r--r--
gs_typ42.ps	2.08 KB	-rw-r--r--
gs_type1.ps	8.09 KB	-rw-r--r--
gs_wan_e.ps	1.64 KB	-rw-r--r--
opdfread.ps	138.44 KB	-rw-r--r--
pdf_base.ps	40.03 KB	-rw-r--r--
pdf_cslayer.ps	3.96 KB	-rw-r--r--
pdf_draw.ps	60.05 KB	-rw-r--r--
pdf_font.ps	59.32 KB	-rw-r--r--
pdf_main.ps	64.76 KB	-rw-r--r--
pdf_ops.ps	27.75 KB	-rw-r--r--
pdf_rbld.ps	14.7 KB	-rw-r--r--
pdf_sec.ps	15.54 KB	-rw-r--r--
xlatmap	1.75 KB	-rw-r--r--

Code Editor : gs_icc.ps

%    Copyright (C) 2001, 2002 Aladdin Enterprises.  All rights reserved.
% 
% This software is provided AS-IS with no warranty, either express or
% implied.
% 
% This software is distributed under license and may not be copied,
% modified or distributed except as expressly authorized under the terms
% of the license contained in the file LICENSE in this distribution.
% 
% For more information about licensing, please refer to
% http://www.ghostscript.com/licensing/. For information on
% commercial licensing, go to http://www.artifex.com/licensing/ or
% contact Artifex Software, Inc., 101 Lucas Valley Road #110,
% San Rafael, CA  94903, U.S.A., +1(415)492-9861.

% $Id: gs_icc.ps 8962 2008-08-11 14:16:18Z ken $
% ICCBased color space method dictionaries.
% This assumes gs_ciecs2.ps has already been processed.

.currentglobal true .setglobal

% gs_res.ps uses these entries in colorspacedict
% to populate the ColorSpaceFamily resource, so we need
% to add the supported spaces.
%
systemdict /colorspacedict get begin
/ICCBased [] def
end

NOPSICC { (%END PSICC) .skipeof } if
% Now set up ICC profile loading for PostScript %%BeginICCProfile sections.

systemdict begin
/.ProcessICCcomment { % file comment --  file comment
  dup
  (%%BeginICCProfile) anchorsearch {
    pop pop
    DEBUG { (.ProcessICCcomment found %%BeginICCProfile) print flush } if

% load an ICC profile defined as comments (hex encoded).
    % Ends with %%End at the start of a line. Read the data into
    % a bytestring to allow seeking. This string can be used as a
    % seekable ReusableStreamDecode filter source by the ICC logic.
    %
    % Since .bigstring needs to know the size, we first read an array of
    % strings each 64000 max length.
    %
    % stack: --file-- (%%BeginICCProfile: ...) 
    1 index 0 (%%EndICCProfile) /SubFileDecode filter
    [ { counttomark 1 add index
        64000 string readhexstring
        not { exit } if
      } loop
    ] exch closefile
    0 1 index { length add } forall
    .bigstring
    exch 0 exch {
      % stack: --file-- (%%BeginICCProfile: ...) --bytestring-- cur_index --string--
      2 copy length add 	% calculate next string start point
      3 1 roll 3 index 3 1 roll putinterval
    } forall
    pop				% discard length of bytestring
    % make a seekable -file- out of the bytestring
    mark /AsyncRead true .dicttomark /ReusableStreamDecode filter
    % stack: --file-- (%%BeginICCProfile: ...) --icc_subfile-- 
    /DeviceCMYK setcolorspace
    << /DataSource 3 -1 roll
       /N 4		% Try CMYK first
    >> { .seticcspace } stopped {
      /DeviceRGB setcolorspace
      dup /N 3 put  { .seticcspace } stopped {
        /DeviceGray setcolorspace
        dup /N 1 put { .seticcspace } stopped {	% last choice
          QUIET not { (   *** Unable to load ICC profile from PostScript DSC comments ***) = flush } if
          pop
        } if
      } if
    } if
  } {
    pop % Not interested in this DSC comment
  } ifelse
} bind def

% Merge ProcessICCcomment with existing handler
/.ProcessICCcomment load /exec load
currentuserparams /ProcessDSCComment get 
dup null eq {pop {pop pop}} if /exec load
4 array astore cvx readonly
<< /ProcessDSCComment 3 -1 roll >> setuserparams

end	% systemdict
%END PSICC
.setglobal

${this.title}

Code Editor : gs_icc.ps