From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 3 May 2005 14:25:10 +0000 (+0000)
Subject: new file
X-Git-Tag: release/2.5.22~4
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=1623da2c2945bcdfa953d0e19ddbec1da0b1abd7;p=lilypond.git

new file
---

diff --git a/ChangeLog b/ChangeLog
index f41df7b0d8..6918b19fc6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2005-05-03  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
+	* buildscripts/substitute-encoding.py: new file
+
 	* Documentation/user/basic-notation.itely (Basic polyphony): fix
 	missing @end 
 
diff --git a/buildscripts/substitute-encoding.py b/buildscripts/substitute-encoding.py
new file mode 100644
index 0000000000..c2fbeda6fd
--- /dev/null
+++ b/buildscripts/substitute-encoding.py
@@ -0,0 +1,51 @@
+#!@PYTHON@
+#
+# mess up the coding table of PFAemmentaler to work around
+# GS bug,
+#
+# http://bugs.ghostscript.com/show_bug.cgi?id=688017
+
+import string
+import sys
+import re
+import os
+
+filename = sys.argv[1]
+def get_glyph_names (enc_name):
+	enc_str = open (enc_name).read ()
+	glyphs = []
+	def note_glyph (match):
+		nm = match.group (1)
+		glyphs.append (nm)
+
+
+	m = re.sub ("(/[a-z-.A-Z0-9]+) %", note_glyph, enc_str )
+
+	glyphs = filter (lambda x: None == re.match (r'/\.notdef', x),
+			 glyphs)
+	return glyphs
+
+if re.search ('mmental', filename):
+	glyph_names = (get_glyph_names ('out/feta20.enc') +
+		       get_glyph_names ('out/feta-alphabet20.enc') +
+		       get_glyph_names ('out/parmesan20.enc'))
+
+	str = open (filename).read ()
+	os.rename (filename, filename + "~")
+
+	glyph_names = glyph_names[:256]
+	
+	put_glyphs = ''
+	i = 0
+	for g in glyph_names:
+		put_glyphs += 'dup %d %s put \n' % (i,g)
+		i += 1
+		
+	str = re.sub ('( 0 1 255 { 1 index exch /.notdef put} for)',
+		      '\\1 \n %s'  % put_glyphs,
+		      str)
+
+	open (filename, 'w').write (str)
+
+
+
diff --git a/mf/GNUmakefile b/mf/GNUmakefile
index 18825a86e6..1066565cc3 100644
--- a/mf/GNUmakefile
+++ b/mf/GNUmakefile
@@ -58,6 +58,7 @@ MFTRACE_FLAGS=$(if $(ENCODING_FILE),--encoding $(ENCODING_FILE),) --no-afm
 
 $(outdir)/$(PFA_PREFIX)%.pfa $(outdir)/%.otf $(outdir)/%.svg: $(outdir)/%.pe
 	(cd $(outdir) && $(FONTFORGE) -script $(notdir $<))
+	$(PYTHON) $(buildscript-dir)/substitute-encoding.py $@
 	-rm $(outdir)/*.scale.pfa
 
 # ugh, this does not work