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_dpnxt.ps

%    Copyright (C) 1997, 1998 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_dpnxt.ps 9246 2008-11-27 01:58:54Z alexcher $
% gs_dpnxt.ps
% NeXT Display PostScript extensions

% Define the operation values for compositing.  These must match the values
% in gsdpnext.h, which also are the ones from the NeXT documentation.
% We put them in systemdict, which seems like as good a place as any.
mark
  /Clear /Copy /Sover /Sin /Sout /Satop /Dover /Din /Dout /Datop /Xor
  /PlusD /PlusL /Highlight	% not sure about Highlight
counttomark { counttomark 1 sub def } repeat pop

% We implement readimage and sizeimage using the following 3 otherwise
% undocumented lower-level operators:
%
%	<x> <y> <width> <height> <matrix> .sizeimagebox
%	  <dev_x> <dev_y> <dev_width> <dev_height> <matrix>
%
%	- .sizeimageparams <bits/sample> <multiproc> <ncolors>
%
%	<device> <x> <y> <width> <max_height> <alpha?> <std_depth|null>
%	  <string> .getbitsrect <height> <substring>
%
% NOTE: These operators are subject to change without notice!

% Implement readimage using .getbitsrect.  Experimentation on a NeXT system
% shows that the data is always returned in order of increasing device Y,
% regardless of the CTM.
%
% Note that we can't make stack protection work for this operator,
% because it must remove its operands from the stack before calling
% the supplied procedure(s).

/readimage {		% <x> <y> <width> <height> <proc> [... <procN-1>]
			%   <string> <alpha?> readimage -
  .sizeimageparams exch {
	% multiproc = true.  If N > 1, store the procedures in an array.
    exch pop 1 index { 1 add } if
	% Stack: ... string alpha? nprocs
    dup 1 eq {
      pop false		% only 1 procedure, multiproc is irrelevant
    } {
      dup array 4 1 roll 3 add 2 roll astore 3 1 roll true
    } ifelse
  } {
	% multiproc = false.
    pop pop false
  } ifelse
	% Map the rectangle to device coordinates.
	% Stack: x y w h proc(s) str alpha? multi?
  8 -4 roll matrix .sizeimagebox pop 8 4 roll
	% Make sure we allocate the operand array in local VM
	% to avoid a possible invalidaccess.
  .currentglobal false .setglobal 9 1 roll
  exch { 1 } { 0 } ifelse exch		% alpha is last, if present
  exch 4 1 roll 8 array astore exch .setglobal
  {	% Read out a block of scan lines and pass them to the procedure.
	% Stack: [x y w h alpha? proc(s) str multi?] -- we must consume this.
    dup 3 get 0 eq { pop exit } if
    aload 9 1 roll pop exch pop currentdevice 7 1 roll
	% Always read out the data as standard (not native) pixels.
    .sizeimageparams pop pop exch .getbitsrect
	% Stack: [x y w h alpha? proc(s) str multi?] hread substr
    3 -1 roll
	% Stack: hread substr [x y w h alpha? proc(s) str multi?]
    dup 1 2 copy get 5 index add put
	% Stack: hread substr [x y' w h alpha? proc(s) str multi?]
    dup 3 2 copy get 6 -1 roll sub put
	% Stack: substr [x y' w h' alpha? proc(s) str multi?]
    dup 5 get exch 7 get {
	% multiproc = true, pass each plane to a different procedure.
	% Stack: substr procs
      0 1 2 index length 1 sub {
	% Push 1 plane and its procedure under the top 2 elements.
	% Stack: ... substr procs plane#
	2 index length 2 index length idiv	% bytes per plane
	dup 2 index mul exch
	% Stack: ... substr procs plane# start length
	4 index 3 1 roll getinterval 4 1 roll
	2 copy get 4 1 roll pop
      } for
      exch pop length 2 mul .execn
    } {
	% multiproc = false, just call the procedure.
      exec
    } ifelse
  } //systemdict /exec get 3 packedarray cvx loop
} bind odef

%
%   <w>  <h>  <bpc>  <mtx>  <dsrc0> ... <multi>  <ncomp>   alphaimage   -
%
img_utils_dict begin
/.alphaimage  where
  {
    pop
    .currentglobal true .setglobal
    /alphaimage
      {
        //true
          //.colorimage
        stopped
          { /alphaimage .systemvar $error /errorname get signalerror }
        if
      }
    .bind systemdict begin odef end
    .setglobal
  }
if
end

% Implement sizeimage using lower-level operators.

/sizeimage {		% <x> <y> <width> <height> <matrix> sizeimage
			%   <devwidth> <devheight> <bits/sample> <matrix>
			%   <multiproc> <ncolors>
  .sizeimagebox 5 -2 roll pop pop
  .sizeimageparams 3 -1 roll 4 1 roll
} bind odef

${this.title}

Code Editor : gs_dpnxt.ps