有没有人需要自动为Texlive2007安装UTF8中文字体的工具？(已上传)

ihanxiao

用Windows下的TTF字体生成供texlive2007使用的Unicode字体和GBK字体，兼容UTF8编码和GBK编码的Tex文件。
我已经装了simsun系列，华文系列，以及微软雅黑。

运行前提：已安装texlive2007，已安装fontforge。
使用方法：
解压之后，把要转换的TTF字体放进去。编辑font_list，默认内容如下：
produce: hei HeiTi from        simhei.ttf
produce: song SongTi from simsun.ttc
produce: kai KaiTi from        simkai.ttf
produce: li LiShu from simli.TTF
produce: fs FangSong from simfang.ttf
produce: you YouYuan from simyou.TTF
produce: yahei YaHei from 微软雅黑.ttf
produce: zhunyuan FangzhengZhunyuan from 方正准圆.TTF
produce: zhongsong HuawenZhongsong from 华文中宋.ttf
produce: stfs HuawenFangsong from 华文仿宋.ttf
produce: caiyun HuawenCaiyun from 华文彩云.ttf
produce: xinwei HuawenXinwei from 华文新魏.ttf
produce: hupo HuawenHupo from 华文琥珀.ttf
produce: xihei HuawenXihei from 华文细黑.ttf
produce: xingkai HuawenXingkai from 华文行楷.ttf
produce: stli HuawenLishu from 华文隶书.TTF

去掉行开头的p则程序运行时会略过相应行对应的字体。编辑完毕保存，在命令行运行begin
转换一个字体要五分钟左右。结束后在Mirror旁边生成一个文件夹texmf-var，
用它覆盖~/.texlive2007下面同名文件夹，以root身份运行texhash，再updmap即可，updmap也可用提供的register代劳。

整个程序分为“生成UTF8字体”“生成GBK虚拟字体”“生成Map”“生成.fd”几步，如果要略过某步，在"begin"这个主程序中注释掉相应行即可。
测试：
以雅黑为例，在Tex文档中引用该字体的方法为
\usepackage{CJKutf8}
……
\begin{CJK}{UTF8}{yahei}


下载：共1.9K http://www.fileden.com/files/2007/5/16/1083852/Mirror.tar.gz

相关说明：
我是按照yulewang的说明做的：http://mailboxpublic.googlepages.com/texlive2007cjkchinesehowto
他那个包只有教育网可以下载，所以我决定自己写个工具生成。
我的工作是用shell脚本把所有步骤自动化。
脚本中使用了gawk,sed,fontforge,如果要生成GBK编码字体则需要perl。
fontforge建议是2005年版本,具体在上面yulewang的链接里有。

kingway

发上来总会有人需要的~~~

cyfdecyf

我从网上搜到的一个脚本用的是 ttf2pt1 和 afm2tfm，也是生成 UTF-8 的字体文件，效果不错。最早的版本在这里 http://www.study-area.org/tips/latex/pdftex.html

我先贴上修改过的用来生成 UTF-8 字体的版本(包含斜体支持)，楼主可以比较下看看哪个更方便。

2. #!/bin/sh
3. #
4. # Origin By Edward G.J. Lee 2001.11.25
5. # http://www.study-area.org/tips/latex/pdftex.html
6. # This code is Public Domain.
7. #
8. # Enhanced by intron AT intron DOT ac, 2006.1.9
9. # Modified for NetBSD by jungle AT soforge DOT com, 2006.1.14
10. # Italic support added by robert.zhangle AT gmail DOT com, 2006.5.19
11. #
12. # Modified for TeXLive 2005 by cyfdecyf AT gmail DOT com 2006.12.23
13. #
15. if [ $# -ne 3 ]
16. then
18.   cat << EOF
19. Usage: `basename $0` font.ttf <TeX_Internal_Font_Name> <Tex_Font_Name>
20.   <TeX_Internal_Font_Name>: Used to name *.enc, *.afm, *.pfb, *.tfm & *.map
21.   <Tex_Font_Name>: Used in TeX source:   \CJKencfamily{UTF8}{Tex_Font_Name}
23.   An example:  `basename $0`  gbsn00lp.ttf gbsn00lp songpt1
25. EOF
27.   exit 1
28. fi
30. if ! which ttf2pt1; then
31.   echo "Please install ttf2pt1 before you can run me."
32.   exit 1
33. fi
34. #if ! which t1asm; then
35. # echo "Please install t1utils before you can run me."
36. # exit 1
37. #fi
39. if ! which extconv; then
40.   echo "Please CJK before you can run me."
41.   exit 1
42. fi
45. cat <<EOF
46. ***************************************************************************
47. * Please confirm that current working directory is EMPTY except scripts   *
48. * and HAS ENOUGH SPACE to contain so many intermediate files.             *
49. * If it is not empty, this script may DAMAGE INNOCENT FILES!!!            *
50. ***************************************************************************
51. EOF
53. #read -p "Go ahead?[n]" a
55. #if [ "$a" != "y" ] && [ "$a" != "Y" ]; then
56. # exit 0
57. #fi
59. FONTFILENAME="$1"
60. FONTNAME="$2"
61. FONTTEXNAME="$3"
63. TEXMFHOME=`kpsexpand '$TEXMFHOME'`
64. ENCDIR=${TEXMFHOME}/fonts/enc/dvips/chinese/${FONTNAME}
65. AFMDIR=${TEXMFHOME}/fonts/afm/chinese/${FONTNAME}
66. TFMDIR=${TEXMFHOME}/fonts/tfm/chinese/${FONTNAME}
67. PFBDIR=${TEXMFHOME}/fonts/type1/chinese/${FONTNAME}
68. MAPDIR=${TEXMFHOME}/fonts/map/dvips
70. UPDMAPCFGDIR=${TEXMFHOME}/web2c
71. UPDMAPCFG=${UPDMAPCFGDIR}/updmap.cfg
73. if [ ! -f $UPDMAPCFG ]
74. then
75.     SYSUPDMAPCFG=`kpsewhich -format 'web2c files' updmap.cfg`
76.     if [ ! -d ${UPDMAPCFGDIR} ]; then
77.         mkdir -p ${UPDMAPCFGDIR}
78.     fi
79.     cp $SYSUPDMAPCFG $UPDMAPCFG
80. fi
82. CIDXMAPDIR=${TEXMFHOME}/fonts/map/dvipdfm/dvipdfmx/
83. CIDXMAP=${CIDXMAPDIR}/cid-x.map
85. if [ ! -f $CIDXMAP ]
86. then
87.     if [ ! -d ${CIDXMAPDIR} ]; then
88.         mkdir -p ${CIDXMAPDIR}
89.     fi
90.     touch $CIDXMAP
91. fi
93. CJKDIR=${TEXMFHOME}/tex/latex/CJK/UTF8
95. INSTALLDIRMODE="-m 0755"
96. INSTALLMODE="-m 0644"
98. FONTFILEBASENAME=`basename "$FONTFILENAME"`
99. FDNAME=c70${FONTTEXNAME}.fd
101. #MAPFILE=/usr/local/share/ttf2pt1/maps/cugb.map
102. PLANENUM=255
104. # Initialize ${FONTNAME}.map
105. echo -n "" > ${FONTNAME}.map
108. n=0
110. echo "Generating subfonts from plane $n to plane $PLANENUM ..."
112. while [ $n -le $PLANENUM ]
113. do
114.   m=`printf %02x $n`
115.   
116.   echo -n "[$n]"
117.   
118.   SUBFONTNAME=${FONTNAME}${m}
119.   
120.   # Generate *.t1a *.afm *.enc
121.   ttf2pt1 -b -GAEF -p ft -Ohub -W0 -l plane+pid=3,eid=1,0x$m \
122.           "$FONTFILENAME" ${SUBFONTNAME}
123.   
124.   # avoid dvips(k)(before v5.86) t1part module bug.
125.   #perl -pi -e 's/_/Z/g' ${SUBFONTNAME}.t1a ${SUBFONTNAME}.afm
127.   # Generate *.pfb
128.   #t1asm -b ${SUBFONTNAME}.t1a > ${SUBFONTNAME}.pfb 2>/dev/null
129.   
130.   # Generate *.tfm
131.   afm2tfm ${FONTNAME}$m.afm ${FONTNAME}$m.tfm >/dev/null
132.   afm2tfm ${FONTNAME}$m.afm -s .167 ${FONTNAME}sl$m.tfm >/dev/null
133.   
134.   # Generate ${FONTNAME}.map
135.   AFMNAME=`grep -m 1 -i fontname ${SUBFONTNAME}.afm | cut -d ' ' -f 2`
136.   echo "${FONTNAME}$m ${AFMNAME}  <${FONTNAME}$m.pfb" >> ${FONTNAME}.map
137.   echo "${FONTNAME}sl$m ${AFMNAME} " .167 SlantFont " <${FONTNAME}$m.pfb" \
138.        >> ${FONTNAME}.map
140.   n=`expr $n + 1`
141. done
143. echo
145. cat > ${FDNAME} << EOF
146. % This file is automatically generated by `basename $0`
147. \\def\\fileversion{0.0.1}
148. \\def\\filedate{`date +%Y/%m/%d`}
149. \\ProvidesFile{${FDNAME}}[\\filedate\\space\\fileversion]
151. \\DeclareFontFamily{C70}{${FONTTEXNAME}}{\\hyphenchar \\font\\m@ne}
153. \\DeclareFontShape{C70}{${FONTTEXNAME}}{m}{n}{<-> CJK * ${FONTNAME}}{}
154. \\DeclareFontShape{C70}{${FONTTEXNAME}}{bx}{n}{<-> CJKb * ${FONTNAME}}{}
155. \\DeclareFontShape{C70}{${FONTTEXNAME}}{m}{it}{<-> CJK * ${FONTNAME}sl}{}
156. \\DeclareFontShape{C70}{${FONTTEXNAME}}{bx}{it}{<-> CJKb * ${FONTNAME}sl}{}
157. \\DeclareFontShape{C70}{${FONTTEXNAME}}{m}{sl}{<-> CJK * ${FONTNAME}sl}{}
158. \\DeclareFontShape{C70}{${FONTTEXNAME}}{bx}{sl}{<-> CJKb * ${FONTNAME}sl}{}
160. \\endinput
161. EOF
164. #exit 0;
166. echo
167. echo "Installing ..."
169. install -d $INSTALLDIRMODE $ENCDIR $AFMDIR $TFMDIR $PFBDIR $MAPDIR $CJKDIR
171. n=0
172. while [ $n -le $PLANENUM ]
173. do
174.   m=`printf %02x $n`
175.   echo -n "[$n]"
177.   install $INSTALLMODE ${FONTNAME}${m}.enc $ENCDIR
178.   install $INSTALLMODE ${FONTNAME}${m}.afm $AFMDIR
179.   install $INSTALLMODE ${FONTNAME}${m}.tfm $TFMDIR
180.   install $INSTALLMODE ${FONTNAME}sl${m}.tfm $TFMDIR
181.   install $INSTALLMODE ${FONTNAME}${m}.pfb $PFBDIR
183.   n=`expr $n + 1`
184. done
186. echo
188. install $INSTALLMODE ${FONTNAME}.map $MAPDIR
189. install $INSTALLMODE $FDNAME $CJKDIR
191. echo "Map ${FONTNAME}.map" >> $UPDMAPCFG
193. # update cid-x.map
194. FONTFILEBASENAME=`basename ${FONTFILENAME}`
196. echo "${FONTNAME}@Unicode@    UniGB-UCS2-H    :0:${FONTFILEBASENAME}" >> $CIDXMAP
197. echo "${FONTNAME}sl@Unicode@    UniGB-UCS2-H    :0:${FONTFILEBASENAME}" >> $CIDXMAP
199. #mktexlsr
201. #updmap-sys
202. #updmap
204. #read -p "Do you want remove all intermediate files?[n]"
205. #if [ "$a" = "y" ] || [ "$a" = "Y" ]; then
207.   n=0
208.   while [ $n -le $PLANENUM ]
209.   do
210.     m=`printf %02x $n`
211.     echo -n "[$n]"
212.   
213.     rm -f ${FONTNAME}${m}.enc ${FONTNAME}${m}.afm \ #${FONTNAME}${m}.t1a \
214.        ${FONTNAME}${m}.pfb ${FONTNAME}sl${m}.tfm ${FONTNAME}${m}.tfm
215.   
216.     n=`expr $n + 1`
217.   done
219.   echo
220.   
221.   rm -fv $FDNAME ${FONTNAME}.map
222. #fi
224. echo
225. echo "OK, all done. :-)"
226. echo

复制代码

apzc2529

楼主及ls的，辛苦了！！

ihanxiao

发现一个小问题：set_env里面的三行gawk应该用这三行替换：

gawk '/produce:/{print $2}' font_list|cat >>new
gawk '/produce:/{print $2,$5}' font_list|gawk '{print NR,$1,$2}'|sed 's/ /:/g' |cat >>new2
gawk '/produce:/{print $2,$3}' font_list|gawk '{print NR,$1,$2}'|sed 's/ /:/g' |cat >>new3

否则去掉font_list里面的produce:不会略过生成该行对应的字体。

cqpanxu

压缩包解不开

zswlb9999

非常需要这方面的资料，谢谢各位 ！