#! /usr/bin/env python # # (C) Mizi Research # distributed under GPL # # Author: Hwang, ChiDeok (hwang@mizi.co.kr) # 2000.03.14 # # ChangeLog: # -o option이 있을 경우나 argument로 주어진 파일이 # ps 파일이 아닌 경우 a2ps 를 부르도록 수정 # argument가 안 주어진 경우 stdin에서 읽어드림. (2000/03/16) # string변환을 postscript language에서 하도록 변경. (2000/03/20) # string변환을 하고 아직 비여있은 공간을 없앰 (2000/03/23) # stdin으로부터 온 내용도 필요하면 a2ps로 보냄 (2000/12/28) # mutt와 함께 쓸 수 있도록 -m옵션을 추가 (2000/01/03) import string,sys,os try: from os import tmpnam # python2.0 except: def tmpnam(): return "/tmp/a2ps-h-tmp" hps = '/Gulim-Medium-KSC-EUC-H' hbps = '/Gulim-Medium-KSC-EUC-H' hbops = '/Gulim-Medium-KSC-EUC-H' hops = '/Gulim-Medium-KSC-EUC-H' hps = '/Gulim-Regular' hbps = '/Gulim-Regular' hbops = '/Gulim-Regular' hops = '/Gulim-Regular' def startswith(s, needle): if len(needle) > len(s): return 0 return s[:len(needle)] == needle def trans_file(filename): if type(filename) == type([]): lines = filename else: lines = open(filename).readlines() for i in range(len(lines)): if startswith(lines[i], '% Check PostScript language '): print show_override print lines[i], elif startswith(lines[i], '% Dictionary for ISO-8859-1'): print lines[i], print lines[i+1], print hangul_font lines = lines[i+10:] break else: print lines[i], for line in lines: print line, hangul_font = """\ 16 dict begin /FontName /fCourier def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Courier findfont %(hps)s findfont ] def FontName currentdict end definefont /fCourier exch def 16 dict begin /FontName /fCourier-Bold def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Courier-Bold findfont %(hbps)s findfont ] def FontName currentdict end definefont /fCourier-Bold exch def 16 dict begin /FontName /fCourier-BoldOblique def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Courier-BoldOblique findfont %(hbops)s findfont ] def FontName currentdict end definefont /fCourier-BoldOblique exch def 16 dict begin /FontName /fCourier-Oblique def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Courier-Oblique findfont %(hops)s findfont ] def FontName currentdict end definefont /fCourier-Oblique exch def 16 dict begin /FontName /fHelvetica def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Helvetica findfont %(hps)s findfont ] def FontName currentdict end definefont /fHelvetica exch def 16 dict begin /FontName /fHelvetica-Bold def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Helvetica-Bold findfont %(hbps)s findfont ] def FontName currentdict end definefont /fHelvetica-Bold exch def 16 dict begin /FontName /fTimes-Bold def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Times-Bold findfont %(hbps)s findfont ] def FontName currentdict end definefont /fTimes-Bold exch def 16 dict begin /FontName /fTimes-Roman def /FontType 0 def /WMode 0 def /FMapType 3 def /FontMatrix matrix def /Encoding [0 1] def /FDepVector [ /Times-Roman findfont %(hps)s findfont ] def FontName currentdict end definefont /fTimes-Roman exch def """ % locals() show_override = """\ % %%Copyright: (c) 2000, 2001 Chideok Hwang /han-trans { dup length 3 mul string /mystr exch def /mylen 0 def /in-hangul false def { dup 128 gt { in-hangul { % c mystr exch mylen exch put /mylen mylen 1 add def } { /in-hangul true def % 255 1 c mystr mylen (\\377\\1) putinterval mystr exch mylen 2 add exch put /mylen mylen 3 add def } ifelse } { in-hangul not { % c mystr exch mylen exch put /mylen mylen 1 add def } { /in-hangul false def % 255 0 c mystr mylen (\\377\\0) putinterval mystr exch mylen 2 add exch put /mylen mylen 3 add def } ifelse } ifelse } forall mystr 0 mylen getinterval } bind def /origshow {show} bind def /show {han-trans origshow} bind def /origstringwidth {stringwidth} bind def /stringwidth { han-trans origstringwidth } bind def %\ """ def run_a2ps(input_file): ps = os.popen('a2ps --output=- ' + input_file) return ps.readlines() def run_a2ps_from_stdin(contents): infile_name = tmpnam() infile = open(infile_name, 'w') infile.write(contents) del infile # flush a2ps_args = ' --center-title="' + title + '" ' + \ '--footer="편지 메시지" ' + \ '--output=- '+ infile_name ps = os.popen('a2ps ' + a2ps_args, 'r') outlines = ps.readlines() os.remove(infile_name) return outlines try: i = sys.argv.index('-o') sys.stdout = open(sys.argv[i+1], 'w') del sys.argv[i:i+2] except: pass if '-h' in sys.argv: sys.exit(0) if '-m' in sys.argv: # called from mutt i = sys.argv.index('-m') del sys.argv[i] assert len(sys.argv) == 1 input_buf = sys.stdin.read() magic = input_buf[:5]; import re title = re.search('^Subject:(.*)$', input_buf, re.M).group(1) input_file = None elif len(sys.argv) == 1: input_buf = sys.stdin.read() magic = input_buf[:5] title = 'From Stdin' input_file = None else: input_file = sys.argv[1] magic = open(input_file).read(5) if magic != '%!PS-': if input_file: input_lines = run_a2ps(input_file) else: input_lines = run_a2ps_from_stdin(input_buf) trans_file(input_lines)