mirror of
https://git.FreeBSD.org/ports.git
synced 2024-12-12 03:00:28 +00:00
9fa169b13c
of CJK TrueType into PDF, and do not write CIDToGIDMap of NeverEmbed CJK TrueType and Encoding of CIDFont into PDF. PR: ports/62078 Submitted by: KOMATSU Shinichiro <koma2 at jiro dot c dot u-tokyo dot ac dot jp> Reviewed by: KATO Tsuguru <jungle at m8 dot dion dot ne dot jp>
52 lines
1.6 KiB
PostScript
52 lines
1.6 KiB
PostScript
--- lib/gs_cidfn.ps.org 2003-04-12 23:02:38.000000000 +0900
|
|
+++ lib/gs_cidfn.ps 2003-09-03 07:28:28.000000000 +0900
|
|
@@ -511,9 +511,32 @@
|
|
|
|
.loadinitialcidfonts
|
|
|
|
+% <fontname> <font> .RenameFontForNeverEmbed <fontname> <font'>
|
|
+/.RenameFontForNeverEmbed {
|
|
+ /DEVICE where { pop DEVICE (pdfwrite) eq {
|
|
+ currentdistillerparams /NeverEmbed get {
|
|
+ 2 index eq {
|
|
+ (*** unembeddable CIDFont: ) print 1 index == flush
|
|
+ dup length 1 add dict copy
|
|
+ dup /FID undef
|
|
+ dup /.orig_CIDFontName 1 index /CIDFontName get put
|
|
+ dup /CIDFontName 3 index dup type /stringtype eq {
|
|
+ dup rcheck {
|
|
+ dup length string 0 1 2 index length 1 sub {
|
|
+ 2 index 1 index get 3 copy put pop pop
|
|
+ } for exch pop
|
|
+ } if
|
|
+ } if put
|
|
+ dup /FontName 1 index /CIDFontName get put
|
|
+ } if
|
|
+ } forall
|
|
+ } if } if
|
|
+} bind def
|
|
+
|
|
/CIDFontmapHandler <<
|
|
/nametype {
|
|
/CIDFont findresource
|
|
+ .RenameFontForNeverEmbed
|
|
/CIDFont defineresource pop
|
|
} bind
|
|
/stringtype {
|
|
@@ -528,6 +551,7 @@
|
|
pop pop
|
|
} {
|
|
% Give a name different from the name defined in the file
|
|
+ .RenameFontForNeverEmbed
|
|
/CIDFont defineresource pop
|
|
} ifelse
|
|
} {
|
|
@@ -546,6 +570,7 @@
|
|
3 -1 roll put
|
|
% Expand array
|
|
aload pop .loadcjkvttcidfont
|
|
+ .RenameFontForNeverEmbed
|
|
/CIDFont defineresource pop
|
|
} {
|
|
/undefinedresource signalerror
|