aboutsummaryrefslogtreecommitdiff
path: root/chinese/ttfm/files/patch-modules::gscjk.ttfm
diff options
context:
space:
mode:
Diffstat (limited to 'chinese/ttfm/files/patch-modules::gscjk.ttfm')
-rw-r--r--chinese/ttfm/files/patch-modules::gscjk.ttfm763
1 files changed, 0 insertions, 763 deletions
diff --git a/chinese/ttfm/files/patch-modules::gscjk.ttfm b/chinese/ttfm/files/patch-modules::gscjk.ttfm
deleted file mode 100644
index e9c729382dcf..000000000000
--- a/chinese/ttfm/files/patch-modules::gscjk.ttfm
+++ /dev/null
@@ -1,763 +0,0 @@
---- modules/gscjk.ttfm.orig Sun Jun 2 03:40:13 2002
-+++ modules/gscjk.ttfm Sun Jun 2 03:39:59 2002
-@@ -0,0 +1,760 @@
-+#!/bin/sh
-+#
-+# TTFM module for Ghostscript 6.51 with GS-CJK
-+#
-+# This script is distributed under the revised BSD license.
-+#
-+# For any problem reports or suggestions, please contact
-+# Chung-Yen Chang <candyz@linux.org.tw>,
-+# Anthony Fok <anthony@thizlinux.org>
-+# or the original author Jing-Tang Keith Jang <keith@FreeBSD.org>.
-+#
-+
-+# This script can handle both CID and TrueType fonts.
-+
-+# Name & version
-+export NAME; NAME="Ghostscript 7.06 TTF Font Manager"
-+export VERSION; VERSION=1.0
-+
-+# Global constants
-+
-+export PREFIX; PREFIX=/usr/local
-+export TTFINFOPath; TTFINFOPath="${PREFIX}/bin/ttfinfo"
-+export GS6Path; GS6Path="${PREFIX}/share/ghostscript"
-+export GS6CJKPath; GS6CJKPath="${GS6Path}/Resource"
-+export CJKCMapPath; CJKCMapPath="${GS6CJKPath}/CMap"
-+export CJKFontPath; CJKFontPath="${GS6CJKPath}/Font"
-+export CJKCIDPath; CJKCIDPath="${GS6CJKPath}/CIDFont"
-+# Not used
-+# export CJKTTFPath; CJKTTFPath="${GS6CJKPath}/TrueType"
-+export GS6LibPath; GS6LibPath="${GS6Path}/7.06/lib"
-+export DefaultMing_Name; DefaultMing_Name="DEFAULT-MING"
-+export DefaultKai_Name; DefaultKai_Name="DEFAULT-KAI"
-+export TEMPFILE; TEMPFILE="`mktemp /tmp/ttfm.tmpXXXXXX`"
-+
-+# Encoding/Ordering table, used to convert the output of ttfinfo(encoding)
-+# to CID font's ordering property, and vice versa. See guess_ttf_info()
-+# below.
-+#
-+export eo_table; eo_table=\
-+"Adobe CNS1,big5-0\n
-+Adobe GB1,gb2312.1980-0\n
-+Adobe Korea1,ksc5601.1987-0\n
-+Adobe Japan1,jisx0208.1983-0\n
-+Adobe Japan2,jisx0212.1990-0\n"
-+
-+# Postscript command to open TTFs, defined in gs_ttf.ps.
-+# It needs gs_ttf.ps-cjkv-*.patch of http://www.aihara.co.jp/~taiji/tops/.
-+export OpenTTFont; OpenTTFont=.openttcidfont
-+
-+# Who am I?
-+print_name()
-+{
-+ echo "$NAME $VERSION"
-+}
-+
-+
-+# Usage
-+Usage()
-+{
-+ echo
-+ echo "$NAME $VERSION"
-+ echo
-+ echo "Usage: $NAME [option]"
-+ echo
-+ echo " --check check Ghostscript 7.06 settings"
-+ echo " --add <file>... install CID font"
-+ echo " --add [alias=]<file>... install TTF font"
-+ echo " --remove <file>... remove font from the system"
-+ echo " --list list all fonts on the system"
-+ echo " --setdefault <file>"
-+ echo " set default font to file"
-+ echo " --setdefault_kai <file>"
-+ echo " set default \kai font to file"
-+ echo " --setdefault_ming <file>"
-+ echo " set default \ming font to file"
-+ echo " --help show this info"
-+ echo
-+}
-+
-+
-+#
-+# Check if CJK CMap files are correctly installed with Ghostscript 6.
-+# Give a warning if Adobe CNS1/GB1/Identity/Japan1/Japan2/Korea1 is not found.
-+#
-+# We'll also check gs_res.ps & gs_ttf.ps.
-+#
-+check_gs6()
-+{
-+ if [ ! -x $TTFINFOPath ]; then
-+ echo "ttfinfo not installed!"
-+ exit 1
-+ fi
-+
-+ if [ ! -d "${CJKCMapPath}" ]; then
-+ echo "Error: You have no CMap files installed!"
-+ exit 1
-+ fi
-+
-+ # ac1
-+ if [ -z "`grep -l "Adobe CNS1" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe-CNS1-3 CMap files not installed!"
-+ # ag1
-+ elif [ -z "`grep -l "Adobe GB1" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe-GB1-3 CMap files not installed!"
-+ # aj1
-+ elif [ -z "`grep -l "Adobe Japan1" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe-Japan1-4 CMap files not installed!"
-+ # aj2
-+ elif [ -z "`grep -l "Adobe Japan2" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe-Japan2-0 CMap files not installed!"
-+ # ak1
-+ elif [ -z "`grep -l "Adobe Korea1" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe-Korea1-2 CMap files not installed!"
-+ # I'm not sure if it's needed, so just a warning if not found.
-+ elif [ -z "`grep -l "Adobe Identity" ${CJKCMapPath}/*`" ]; then
-+ echo "Warning: Adobe Identity CMap files not installed!"
-+ fi
-+
-+ # These two conditions are pretty weak. :-)
-+ if [ -z "`grep -l "Taiji Yamada" ${GS6LibPath}/gs_ttf.ps`" ]; then
-+ echo "Error: Your gs_ttf.ps is not patched."
-+ echo "See http://www.aihara.co.jp/~taiji/tops/ for details."
-+ exit 1
-+ elif [ -n "`grep -l -e "/FontResourceDir (/Resource/Font/)\|/FontResourceDir (/Resource/Font/)" ${GS6LibPath}/gs_res.ps`" ]; then
-+ echo "Error: Please modify FontResourceDir or FontResourceDir in gs_res.ps."
-+ echo "See http://www.aihara.co.jp/~taiji/tops/ for details."
-+ exit 1
-+ fi
-+
-+ echo "No errors found."
-+}
-+
-+
-+# List all fonts installed in ${CJKFontPath}, cross-referenced with those
-+# fonts installed in ${CJKCIDPath}.
-+list_fonts()
-+{
-+ echo "Installed TTF fonts:"
-+ for CIDFont in `ls ${CJKCIDPath}`; do
-+ echo "${CIDFont}:"
-+ cd ${CJKFontPath}; ls ${CIDFont}* 2>/dev/null
-+ echo
-+ done
-+}
-+
-+
-+# Remove fonts
-+remove_fonts()
-+{
-+ for f in "$@"; do
-+ targetname=`basename $f`
-+
-+ rm -f ${CJKCIDPath}/${targetname} ${CJKFontPath}/${targetname}*
-+ done
-+}
-+
-+
-+#
-+# guess_ttf_info <fontfile>, eg. guess_ttf_info bsmi00lp.ttf.
-+#
-+# Guess the alias of a ttf, and put it in $TTF_ALIAS.
-+# Guess which index to use, and put it in $TTF_INDEX.
-+# Guess which ordering a ttf should use, eg. "Adobe CNS1" for bsmi00lp.ttf.
-+# Then put the ordering in $TTF_ORDERING.
-+#
-+# Simply put, we guess everything. :-)
-+#
-+guess_ttf_info()
-+{
-+ targetname=$1
-+
-+ eval `$TTFINFOPath -c ${targetname}`
-+ # Set fontname from the filename if it's unknown.
-+ # I assume there's no ttf filename like "-----.ttf".
-+ unset HKSCS
-+ ( echo $TTFINFO_FONT_NAME | grep -qi HKSCS ) && export HKSCS=1
-+ if [ "$TTFINFO_FONT_NAME" = "unknown" ]; then
-+ TTFINFO_FONT_NAME=`basename $targetname |cut -d "." -f 1 |sed -e "s/-//g"`
-+ fi
-+
-+ # Extract slant/property/encoding, then install.
-+ MAPNUM=1
-+ while [ $MAPNUM -le $TTFINFO_MAPNUM ]; do
-+ eval TTFINFO_FONTMAP=\$TTFINFO_FONTMAP${MAPNUM}
-+ fontweight=`echo $TTFINFO_FONTMAP |cut -d "-" -f 4`
-+ fontslant=`echo $TTFINFO_FONTMAP |cut -d "-" -f 5`
-+ encoding1=`echo $TTFINFO_FONTMAP |cut -d "-" -f 14`
-+ encoding2=`echo $TTFINFO_FONTMAP |cut -d "-" -f 15`
-+ fontencoding=${encoding1}-${encoding2}
-+
-+ if [ -n "`echo ${fontencoding} |grep -i -e "big5\|cns\|gb\|ksc\|jis"`" ]; then
-+ break
-+ fi
-+
-+ MAPNUM=`expr $MAPNUM + 1`
-+ done
-+
-+ if [ -z "`echo ${fontencoding} |grep -i -e "big5\|cns\|gb\|ksc\|jis"`" ]; then
-+ echo "${targetname}" is not a CJK TTF!
-+ exit 1
-+ fi
-+
-+ # The first characters of foundry & font names should be uppercase.
-+ i=`echo "$TTFINFO_FOUNDRY_NAME" |cut -b 1`
-+ j=`echo $i |tr [:lower:] [:upper:]`
-+ TTFINFO_FOUNDRY_NAME=`echo $TTFINFO_FOUNDRY_NAME |sed -e "s/^$i/$j/"`
-+ i=`echo "$TTFINFO_FONT_NAME" |cut -b 1`
-+ j=`echo $i |tr [:lower:] [:upper:]`
-+ TTFINFO_FONT_NAME=`echo $TTFINFO_FONT_NAME |sed -e "s/^$i/$j/"`
-+
-+ # Alias property. The first two are in favor of Chinese TTFs.
-+ # We'll also strip any spaces in foundry and font names.
-+ TTFINFO_FOUNDRY_NAME="`echo $TTFINFO_FOUNDRY_NAME |sed -e "s/ //g"`"
-+# if [ -n "`echo ${fontencoding} |grep -i "big5"`" ]; then
-+# if [ -z "`echo $TTFINFO_FONT_NAME |grep " "`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}${TTFINFO_FONT_NAME}B5"
-+# # The following two are hacks, in favor of Arphic TTF.
-+# elif [ -n "`echo $TTFINFO_FONT_NAME |grep -i -e "kai"`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}KaiB5"
-+# elif [ -n "`echo $TTFINFO_FONT_NAME |grep -i -e "ming"`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}MingB5"
-+# else
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}`echo $TTFINFO_FONT_NAME |sed -e "s/ //g"`B5"
-+# fi
-+# elif [ -n "`echo ${fontencoding} |grep -i "gb"`" ]; then
-+# if [ -z "`echo $TTFINFO_FONT_NAME |grep " "`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}${TTFINFO_FONT_NAME}GB"
-+# # The following two are hacks, in favor of Arphic TTF.
-+# elif [ -n "`echo $TTFINFO_FONT_NAME |grep -i -e "kai"`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}KaiGB"
-+# elif [ -n "`echo $TTFINFO_FONT_NAME |grep -i -e "ming"`" ]; then
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}MingGB"
-+# else
-+# TTF_ALIAS="${TTFINFO_FOUNDRY_NAME}`echo $TTFINFO_FONT_NAME |sed -e "s/ //g"`GB"
-+# fi
-+# else
-+# TTF_ALIAS=${TTFINFO_FOUNDRY_NAME}"`echo $TTFINFO_FONT_NAME |sed -e "s/ //g"`"
-+# fi
-+ TTF_ALIAS=$TTFINFO_FONT_PSNAME
-+
-+# case "$fontweight" in
-+# 'bold')
-+# TTF_ALIAS="${TTF_ALIAS}-Bold"
-+# ;;
-+# *)
-+# TTF_ALIAS="${TTF_ALIAS}-Regular"
-+# ;;
-+# esac
-+
-+ # Index
-+ TTF_INDEX=$MAPNUM
-+ # Ordering property
-+ TTF_ORDERING="`printf "$eo_table" |awk -F "," -v i=$fontencoding '{encoding[$2]=$1} END {print encoding[i]}'`"
-+}
-+
-+
-+#
-+# install_ttf <alias> <filename>[,ttf_index] eg.
-+# install_ttf Arphic-MingB5 /usr/share/fonts/ttf/bsmi00lp.ttf,1.
-+#
-+# Write CID info file of a TTF, so it can be used as a CID font afterwards.
-+# Currently we'll always call install_ttf() with ttf_index.
-+#
-+install_ttf()
-+{
-+ alias=$1
-+ filename=$2
-+
-+ TTE=""
-+ case "$alias" in
-+ *-Adobe-*[0-9])
-+ TTE=' /'`echo "$alias" |sed -n -e "s/^.*-\(Adobe-.*[0-9]\)$/\1/p"`"-Unicode"
-+ ;;
-+ *,Adobe-*[0-9]-*)
-+ TTE=' /'`echo "$alias" |sed -n -e "s/^\(.*\),\(Adobe-.*[0-9]-.*\)$/\2/p"`
-+ alias=`echo "$alias" |sed -n -e "s/^\(.*\),\(Adobe-.*[0-9]-.*\)$/\1/p"`
-+ ;;
-+ esac
-+
-+ case "$filename" in
-+ *.[Tt][Tt][CcFf],[0-9])
-+ TTF=`echo "$filename" |sed -n -e "s/^\(.*\),\([0-9]\)$/\1/p"`
-+ TTI=`echo "$filename" |sed -n -e "s/^\(.*\),\([0-9]\)$/\2/p"`
-+ # Regular font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias" ] && cat <<EOF > "$CJKCIDPath/$alias" && echo "+$alias=$TTF"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN)
-+/$alias
-+($TTF) $TTI$TTE $OpenTTFont
-+dup length dict begin {def} forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # Bold font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-Bold" ] && cat <<EOF > "$CJKCIDPath/$alias-Bold" && echo "+$alias=$TTF-Bold"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-Bold)
-+/$alias-Bold
-+/$alias /CIDFont findresource
-+16 dict begin
-+ /basecidfont exch def
-+ /basefont-H /.basefont-H /Identity-H [ basecidfont ] composefont def
-+ /basefont-V /.basefont-V /Identity-V [ basecidfont ] composefont def
-+ /CIDFontName dup basecidfont exch get def
-+ /CIDFontType 1 def
-+ /CIDSystemInfo dup basecidfont exch get def
-+ /FontInfo dup basecidfont exch get def
-+ /FontMatrix [ 1 0 0 1 0 0 ] def
-+ /FontBBox [
-+ basecidfont /FontBBox get cvx exec
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ ] def
-+ /cid 2 string def
-+ /BuildGlyph {
-+ gsave
-+ exch begin
-+ dup 256 idiv cid exch 0 exch put
-+ 256 mod cid exch 1 exch put
-+ rootfont /WMode known { rootfont /WMode get 1 eq } { false } ifelse
-+ { basefont-V } { basefont-H } ifelse setfont
-+ .03 setlinewidth 1 setlinejoin
-+ newpath
-+ 0 0 moveto cid false charpath stroke
-+ 0 0 moveto cid show
-+ currentpoint setcharwidth
-+ end
-+ grestore
-+ } bind def
-+ currentdict
-+end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # Italic font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-Italic" ] && cat <<EOF > "$CJKCIDPath/$alias-Italic" && echo "+$alias=$TTF-Italic"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-Italic)
-+/$alias-Italic
-+/$alias /CIDFont findresource
-+dup length dict begin { 1 index /FontMatrix eq { [1 0 .3 1 0 0] matrix concatmatrix def } { def } ifelse } forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # BoldItalic font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-BoldItalic" ] && cat <<EOF > "$CJKCIDPath/$alias-BoldItalic" && echo "+$alias=$TTF-BoldItalic"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-BoldItalic)
-+/$alias-BoldItalic
-+/$alias /CIDFont findresource
-+16 dict begin
-+ /basecidfont exch def
-+ /basefont-H /.basefont-H /Identity-H [ basecidfont ] composefont def
-+ /basefont-V /.basefont-V /Identity-V [ basecidfont ] composefont def
-+ /CIDFontName dup basecidfont exch get def
-+ /CIDFontType 1 def
-+ /CIDSystemInfo dup basecidfont exch get def
-+ /FontInfo dup basecidfont exch get def
-+ /FontMatrix [ 1 0 0 1 0 0 ] def
-+ /FontBBox [
-+ basecidfont /FontBBox get cvx exec
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ ] def
-+ /cid 2 string def
-+ /BuildGlyph {
-+ gsave
-+ exch begin
-+ dup 256 idiv cid exch 0 exch put
-+ 256 mod cid exch 1 exch put
-+ rootfont /WMode known { rootfont /WMode get 1 eq } { false } ifelse
-+ { basefont-V } { basefont-H } ifelse setfont
-+ .03 setlinewidth 1 setlinejoin
-+ newpath
-+ 0 0 moveto cid false charpath stroke
-+ 0 0 moveto cid show
-+ currentpoint setcharwidth
-+ end
-+ grestore
-+ } bind def
-+ currentdict
-+end
-+dup length dict begin { 1 index /FontMatrix eq { [1 0 .3 1 0 0] matrix concatmatrix def } { def } ifelse } forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ ;;
-+ *.[Tt][Tt][CcFf])
-+ TTF="$filename"
-+ # Regular Font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias" ] && cat <<EOF > "$CJKCIDPath/$alias" && echo "+$alias=$TTF"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN)
-+/$alias
-+($TTF)$TTE $OpenTTFont
-+dup length dict begin {def} forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # Bold Font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-Bold" ] && cat <<EOF > "$CJKCIDPath/$alias-Bold" && echo "+$alias=$TTF-Bold"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-Bold)
-+/$alias-Bold
-+/$alias /CIDFont findresource
-+16 dict begin
-+ /basecidfont exch def
-+ /basefont-H /.basefont-H /Identity-H [ basecidfont ] composefont def
-+ /basefont-V /.basefont-V /Identity-V [ basecidfont ] composefont def
-+ /CIDFontName dup basecidfont exch get def
-+ /CIDFontType 1 def
-+ /CIDSystemInfo dup basecidfont exch get def
-+ /FontInfo dup basecidfont exch get def
-+ /FontMatrix [ 1 0 0 1 0 0 ] def
-+ /FontBBox [
-+ basecidfont /FontBBox get cvx exec
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ ] def
-+ /cid 2 string def
-+ /BuildGlyph {
-+ gsave
-+ exch begin
-+ dup 256 idiv cid exch 0 exch put
-+ 256 mod cid exch 1 exch put
-+ rootfont /WMode known { rootfont /WMode get 1 eq } { false } ifelse
-+ { basefont-V } { basefont-H } ifelse setfont
-+ .03 setlinewidth 1 setlinejoin
-+ newpath
-+ 0 0 moveto cid false charpath stroke
-+ 0 0 moveto cid show
-+ currentpoint setcharwidth
-+ end
-+ grestore
-+ } bind def
-+ currentdict
-+end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # Italic Font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-Italic" ] && cat <<EOF > "$CJKCIDPath/$alias-Italic" && echo "+$alias=$TTF-Italic"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-Italic)
-+/$alias-Italic
-+/$alias /CIDFont findresource
-+dup length dict begin { 1 index /FontMatrix eq { [1 0 .3 1 0 0] matrix concatmat
-+rix def } { def } ifelse } forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ # BoldItalic Font
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias-BoldItalic" ] && cat <<EOF > "$CJKCIDPath/$alias-BoldItalic" && echo "+$alias=$TTF-BoldItalic"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN-BoldItalic)
-+/$alias-BoldItalic
-+/$alias /CIDFont findresource
-+16 dict begin
-+ /basecidfont exch def
-+ /basefont-H /.basefont-H /Identity-H [ basecidfont ] composefont def
-+ /basefont-V /.basefont-V /Identity-V [ basecidfont ] composefont def
-+ /CIDFontName dup basecidfont exch get def
-+ /CIDFontType 1 def
-+ /CIDSystemInfo dup basecidfont exch get def
-+ /FontInfo dup basecidfont exch get def
-+ /FontMatrix [ 1 0 0 1 0 0 ] def
-+ /FontBBox [
-+ basecidfont /FontBBox get cvx exec
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ 4 2 roll basecidfont /FontMatrix get transform
-+ ] def
-+ /cid 2 string def
-+ /BuildGlyph {
-+ gsave
-+ exch begin
-+ dup 256 idiv cid exch 0 exch put
-+ 256 mod cid exch 1 exch put
-+ rootfont /WMode known { rootfont /WMode get 1 eq } { false } ifelse
-+ { basefont-V } { basefont-H } ifelse setfont
-+ .03 setlinewidth 1 setlinejoin
-+ newpath
-+ 0 0 moveto cid false charpath stroke
-+ 0 0 moveto cid show
-+ currentpoint setcharwidth
-+ end
-+ grestore
-+ } bind def
-+ currentdict
-+end
-+dup length dict begin { 1 index /FontMatrix eq { [1 0 .3 1 0 0] matrix concatmat
-+rix def } { def } ifelse } forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ ;;
-+ *)
-+ [ "$HKSCS" = "1" -o ! -f "$CJKCIDPath/$alias" ] && cat <<EOF > "$CJKCIDPath/$alias" && echo "+$alias=$filename"
-+%!PS-Adobe-3.0 Resource-CIDFont
-+%%BeginResource: CIDFont ($FNN)
-+/$alias
-+/$filename /CIDFont findresource
-+dup length dict begin {def} forall currentdict end
-+/CIDFont defineresource pop
-+%%EndResource
-+%%EOF
-+EOF
-+ ;;
-+ esac
-+}
-+
-+
-+#
-+# install_cid <ordering> <fontname>, eg.
-+# install_cid "Adobe CNS1" MOESung-Regular.
-+#
-+# Write all CID-related font files. It can be used to install TTF once
-+# the CID info file of TTF is available.
-+#
-+install_cid()
-+{
-+ CID_ordering=$1
-+ fontname=$2
-+ CMaps=`cd $CJKCMapPath; grep -l -e "$CID_ordering\|Adobe Identity" *`
-+
-+ for cmap in $CMaps; do
-+ if [ $cmap = 'Roman' -o $cmap = 'Katakana' -o $cmap = 'Hiragana' -o $cmap = 'Hankaku' ]; then
-+ to='.'
-+ else
-+ to='-'
-+ fi
-+ for style in '' '-Bold' '-Italic' '-BoldItalic'; do
-+ [ "$HKSCS" = "1" -o ! -f "$CJKFontPath/$fontname$style$to$cmap" ] && cat <<EOF > "$CJKFontPath/$fontname$style$to$cmap" && echo "+$fontname$style$to$cmap"
-+%!PS-Adobe-3.0 Resource-Font
-+%%DocumentNeededResources: $cmap (CMap)
-+%%IncludeResource: $cmap (CMap)
-+%%BeginResource: Font ($fontname$style$to$cmap)
-+/$fontname$style$to$cmap
-+/$cmap /CMap findresource
-+[/$fontname$style /CIDFont findresource]
-+composefont pop
-+%%EndResource
-+%%EOF
-+EOF
-+ done
-+ done
-+}
-+
-+
-+#
-+# Add fonts
-+#
-+add_fonts()
-+{
-+ ALIASES=$*
-+ for alias in $ALIASES; do
-+ case "$alias" in
-+ ?*=?*) # We have alias & font filename.
-+ FNN="`echo "$alias" |sed -n -e 's/^\(.*\)=\(.*\)$/\1/p'`"
-+ fnn="`echo "$alias" |sed -n -e 's/^\(.*\)=\(.*\)$/\2/p'`"
-+ if [ ! -f "$fnn" ]; then
-+ echo "$fnn not found!"
-+ fi
-+ guess_ttf_info "$fnn"
-+ TTF_ALIAS="$FNN"
-+ install_ttf "$FNN" "$fnn",$TTF_INDEX
-+ install_cid "$TTF_ORDERING" "$fnn"
-+ ;;
-+ ?*.[Tt][Tt][CcFf]) # We have to make up an alias.
-+ if [ ! -f "$alias" ]; then
-+ echo "$alias not found!"
-+ fi
-+ guess_ttf_info "$alias"
-+ FNN=$TTF_ALIAS
-+ install_ttf $TTF_ALIAS "$alias",$TTF_INDEX
-+ install_cid "$TTF_ORDERING" $TTF_ALIAS
-+ ;;
-+ *) # CID font
-+ if [ ! -f "$alias" ]; then
-+ echo "$alias not found!"
-+ fi
-+ if [ ! -f "$CJKCIDPath/`basename $alias`" ]; then
-+ ln -s "$alias" "$CJKCIDPath"
-+ fi
-+ cid_registry=`head -10 "$alias" |grep ^%%Title |cut -d " " -f 3`
-+ cid_ordering=`head -10 "$alias" |grep ^%%Title |cut -d " " -f 4`
-+ install_cid "$cid_registry $cid_ordering" "`basename "$alias"`"
-+ ;;
-+ esac
-+ done
-+}
-+
-+
-+#
-+# setdefault <face> <fontfile>, eg.
-+# setdefault ming /usr/share/fonts/ttf/bsmi00lp.ttf.
-+#
-+# Set default font, accept kai or ming(default) only, all others will be
-+# treated as ming.
-+#
-+# All aliases will be set to "Default<face><encoding>-<weight>", like
-+# DefaultMingB5-Regular, or DefaultKaiGB-Regular.
-+#
-+# Currently we can't assign a CID font as default Kai/Ming. This is
-+# because CID font has "/FontName" hard-coded. I'm not sure if there
-+# are any safe ways to substitute this.
-+#
-+setdefault()
-+{
-+ face=$1
-+ if [ "$face" != "Ming" -a "$face" != "Kai" ]; then
-+ face="Ming"
-+ fi
-+ fontfile=$2
-+ if [ -n "`echo "$fontfile" |grep '='`" ]; then # Ignore alias
-+ fontfile="`echo "$fontfile" |sed -n -e 's/^\(.*\)=\(.*\)$/\2/p'`"
-+ fi
-+ if [ ! -f "$fontfile" ]; then
-+ echo "$fontfile not found!"
-+ fi
-+
-+ case "$fontfile" in
-+ *.[Tt][Tt][CcFf])
-+ guess_ttf_info "$fontfile"
-+
-+ case "$TTF_ORDERING" in
-+ "Adobe CNS1")
-+ TTF_ALIAS="Default${face}B5-`echo $TTF_ALIAS |cut -d '-' -f 2`"
-+ ;;
-+ "Adobe GB1")
-+ TTF_ALIAS="Default${face}GB-`echo $TTF_ALIAS |cut -d '-' -f 2`"
-+ ;;
-+ *)
-+ TTF_ALIAS="Default${face}-`echo $TTF_ALIAS |cut -d '-' -f 2`"
-+ ;;
-+ esac
-+
-+ install_ttf "$TTF_ALIAS" "$fontfile",$TTF_INDEX
-+ install_cid "$TTF_ORDERING" "$TTF_ALIAS"
-+ ;;
-+ *) # CID font. Give a message and exit.
-+ echo "CID fonts can't be used as default fonts."
-+ echo "Please use TTF instead."
-+ exit 1
-+ ;;
-+ esac
-+}
-+
-+
-+#
-+# main program
-+#
-+
-+if [ $# -lt 1 ]; then
-+ Usage
-+ exit 1
-+fi
-+
-+ARG=$1
-+shift 1
-+
-+case $ARG in
-+--help)
-+ Usage
-+ ;;
-+--name)
-+ echo
-+ echo "$NAME $VERSION"
-+ echo
-+ ;;
-+--list)
-+ list_fonts
-+ ;;
-+--check)
-+ check_gs6
-+ ;;
-+--add)
-+ if [ $# -lt 1 ]; then
-+ echo "Missing font filename argument!"
-+ Usage
-+ exit 1
-+ fi
-+ add_fonts $@
-+ echo "Done!"
-+ ;;
-+--remove)
-+ if [ $# -lt 1 ]; then
-+ echo "Missing font filename argument!"
-+ Usage
-+ exit 1
-+ fi
-+ remove_fonts $@
-+ echo "Done!"
-+ ;;
-+--setdefault|--setdefault_ming)
-+ if [ $# -lt 1 ]; then
-+ echo "Missing font filename arguments!"
-+ Usage
-+ exit 1
-+ elif [ $# -gt 1 ]; then
-+ echo "Only need one font filename!"
-+ Usage
-+ exit 1
-+ fi
-+ setdefault "Ming" $1
-+ echo "Done!"
-+ ;;
-+--setdefault_kai)
-+ if [ $# -lt 1 ]; then
-+ echo "Missing font filename arguments!"
-+ Usage
-+ exit 1
-+ elif [ $# -gt 1 ]; then
-+ echo "Only need one font filename!"
-+ Usage
-+ exit 1
-+ fi
-+ setdefault "Kai" $1
-+ echo "Done!"
-+ ;;
-+*)
-+ Usage
-+ exit 1
-+ ;;
-+esac
-+
-+rm -f $TEMPFILE
-+exit 0
-+
-+
-+# ChangeLog
-+#
-+# * Sat Oct 18 2001 Chung-Yen Chang <candyz@linux.org.tw>
-+# - add Italic fonts support
-+#
-+# * Tue Sep 4 2001 Anthony Fok <anthony@thizlinux.com>
-+# - Use original PostScript font names instead of making them up :-)
-+# - Added poorman's Bold font. Still needs to work on Italic.
-+# - Gives HKSCS priority, e.g. kai00m.ttf (Big5&HKSCS) and bkai00mp.ttf
-+# are both ZenKai-Medium; kai00m.ttf takes precedence.
-+#
-+# * Sat Dec 9 2000 Chung-Yen Chang <candyz@cle.linux.org.tw>
-+# - Modified for Red Hat Linux
-+#
-+# $Log: gscjk.ttfm,v $
-+# Revision 1.1 2001/12/14 15:21:26 candyz
-+# add ttfm.sh.1 gscjk.ttfm
-+#
-+# Revision 1.1 2000/11/23 04:32:57 Keith
-+# Log entry was added.
-+#
-+# * Thu Nov 23 2000 Jing-Tang Keith Jang <keith@FreeBSD.org>
-+# - Initial version.
generated by cgit v1.2.3 (git 2.25.1) at 2025-02-27 10:48:00 +0000