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

%    Copyright (C) 2000 Artifex Software, Inc.  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_cidtt.ps 9834 2009-07-03 09:27:02Z ken $
% Redefine CIDFont category with an emulation with True Type fonts.

languagelevel 2 .setlanguagelevel

15 dict begin    % a temporary dictionary for local binding.

%------------------Copy the FontEmulationProcs here : -------------------

/FontEmulationProcs /ProcSet findresource {
  def
} forall

currentdict /super.complete_instance currentdict /complete_instance get put

%-------Auxiliary procedures for building CIDFontType 2 from TT file -----------

/GenerateCIDMap % GenerateCIDMap 
{ begin
 % Obtain the maximal CID :
 % This implementation doesn't check whether glyphs really present.
 Decoding /CIDCount get /CIDCount exch def
 % Prepare the CIDMap structure :
 /CIDMap [
 CIDCount 22000 le {
 CIDCount 2 mul string
 } {
 44000 string
 CIDCount 44000 gt {
	 % need three strings
 44000 string		% 22000 2 mul string
 CIDCount 44000 sub 2 mul string
 } {
 CIDCount 22000 sub 2 mul string
 } ifelse
 } ifelse
 ] def
 % Now fill it :
 Decoding TT_cmap SubstNWP GDBytes CIDMap .fillCIDMap
 currentdict end
} bind def

/GenerateIdentityCIDMap % GenerateCIDMap 
{ begin
 /CIDMap [ 44000 string 44000 string 44000 string] def
 CIDMap .fillIdentityCIDMap
 currentdict end
} bind def

/load_sfnts % <FontDict> load_sfnts <FontDict> 
{ % Read the True Type file from the path /Path, and buld /sfnts,
 % skipping glyf and loca. 
 dup /Path get % (path)
 QUIET not {
 (Loading a TT font from ) print dup print 
 ( to emulate a CID font ) print 1 index /CIDFontName get =only ( ... ) print
 } if
 (r) file dup % file file
 3 1 roll % file file
 1 index /SubfontID .knownget not { 0 } if % file file SubfontID
 .load_tt_font_stripped exch copy % file 
 QUIET not {
 (Done.) =
 } if
 dup 3 1 roll % file 
 exch /File exch put % 
 dup dup /CIDSystemInfo get /Ordering get (.) % () ()
 2 index /Decoding get =string cvs % () () ()
 concatstrings concatstrings cvn /Decoding exch put % 
 dup dup /CIDSystemInfo get /Ordering get (-WMode) % () ()
 concatstrings cvn /SubstCID 
 2 copy resourcestatus {
 pop pop
 findresource /subst_CID_on_WMode exch put % 
 } {
 pop pop pop
 } ifelse
 dup /Decoding get /Identity.Unicode eq {
 //ChooseDecoding exec % 
 //GenerateIdentityCIDMap exec % 
 } {
 //ChooseDecoding exec % 
 //GenerateCIDMap exec % 
 } ifelse
} bind def

%-----------TrueType-specific methods for category redefinition : -----------

/RefinePath % <FontDict> RefinePath <FontDict>
{ dup begin
 Path .libfile {
 dup .filename {
 currentdict exch /Path exch put
 } if
 closefile
 } {
 (Can't find the font file ) print =
 /findfont cvx /undefinedfilename signalerror
 } ifelse
 end
} bind def

/complete_instance % <font_name> <FontDict> <Options> complete_FAPI_Font <font_name> <FontDict>
{ 1 index /CIDFontType 2 put % Other types are not emulated yet.
 //super.complete_instance exec
 //RefinePath exec
 //load_sfnts exec
} bind def

/IsMyRecord % <raw_record> -> <raw_record> bool
{ dup type /dicttype eq { dup /FileType .knownget { /TrueType eq } { false } ifelse } { false } ifelse
} bind def

/IsActive % <record> IsActive <bool>
{ pop true
} bind def

/CIDFontRecordVirtualMethods //RecordVirtualMethodsStub dup length 3 add dict copy begin
 /GetCSI //TranslateCSI def
 /IsActive //IsActive def
 /MakeInstance % <Name> <record> MakeInstance <Name> <Instance> <size>
 { currentglobal 3 1 roll true setglobal
 //CIDFontOptions //complete_instance exec
 2 copy //GetSize exec
 4 3 roll setglobal
 } bind def
currentdict end def

% Redefine the /CIDFont category :
4 dict begin
 /CategoryName /CIDFont def
 /IsMapFileOptional true def
 /VerifyMap { pop } bind def
 /PreprocessRecord % <map> <Name> <raw_record> PreprocessRecord <map> <Name> <record> <bool>
 { //IsMyRecord exec dup {
 pop dup /RecordVirtualMethods //CIDFontRecordVirtualMethods put
 true
 } if
 } bind def
currentdict end

/MappedCategoryRedefiner /ProcSet findresource /Redefine get exec

end  % the temporary dictionary for local binding.

.setlanguagelevel

${this.title}

Code Editor : gs_cidtt.ps