From c293cc5e64a5575b0b22a373061569bacf92ee76 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 15 May 2013 21:51:27 +0000 Subject: luatexja (15may13) git-svn-id: svn://tug.org/texlive/trunk@30485 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/source/luatex/luatexja/ltjlist.lua | 24 ---- .../source/luatex/luatexja/mk-rmlgbm-data.tex | 123 --------------------- 2 files changed, 147 deletions(-) delete mode 100644 Master/texmf-dist/source/luatex/luatexja/ltjlist.lua delete mode 100644 Master/texmf-dist/source/luatex/luatexja/mk-rmlgbm-data.tex (limited to 'Master/texmf-dist/source/luatex') diff --git a/Master/texmf-dist/source/luatex/luatexja/ltjlist.lua b/Master/texmf-dist/source/luatex/luatexja/ltjlist.lua deleted file mode 100644 index dbe8e82bcc6..00000000000 --- a/Master/texmf-dist/source/luatex/luatexja/ltjlist.lua +++ /dev/null @@ -1,24 +0,0 @@ -print("% This file is automatically generated by ltjlist.lua.") - -function inner(a, b, c) - print("\\ltj@@listing@jpset{" .. a .. "}{" .. b .. "}") -end -function innerN(a, b, c) - print("\\ltj@@listing@jpsetN{" .. a .. "}{" - .. b .. "}{" .. c .. "}") -end -k = arg[1] -t = {{0x2000, 0xFEFF, "BMP"}, {0x20000, 0x2FFFF, "SIP"}} -for g, v in pairs(t) do - print("\\message{" .. v[3] .. "}") - for x = v[1],v[2],k do - inner(x, x+k-1, "\\lst@ProcessJALetter") - end -end - -print("\\message{Hankaku}") -innerN(0xFF00, 0xFF60, "\\lst@ProcessJALetter") -innerN(0xFF61, 0xFF9F, "\\lst@ProcessJALetterHalf") -innerN(0xFFE0, 0xFFE5, "\\lst@ProcessJALetter") - -print("\\message{done.}") diff --git a/Master/texmf-dist/source/luatex/luatexja/mk-rmlgbm-data.tex b/Master/texmf-dist/source/luatex/luatexja/mk-rmlgbm-data.tex deleted file mode 100644 index 363d01b124d..00000000000 --- a/Master/texmf-dist/source/luatex/luatexja/mk-rmlgbm-data.tex +++ /dev/null @@ -1,123 +0,0 @@ -%#! lualatex -\documentclass{article} - -\usepackage{luaotfload} - -\font\a=file:AdobeMingStd-Light.otf -\font\b=file:AdobeMyungjoStd-Medium.otf -\usepackage{luacode} -\begin{luacode} --- only for debug -function table_search(tbl, name, prefix) - for i,x in pairs(tbl) do - if string.match(i, name) then - print('found: entry' .. prefix .. '.' .. i) - elseif type(x) == 'string' and string.match(x, name) then - print('found: entry' .. prefix .. '.' .. i .. ' = ' .. x) - elseif type(x) == 'table' then - table_search(x, name, prefix .. '.' .. i) - end - end -end - -function mkrmlgbm(nonfilename,opfilename) - local fontdata = containers.read(fonts.otf.cache, string.lower(nonfilename)) - - -- from fonts.otf.otf_to_tfm() - local tfmdata - fontdata.shared = fontdata.shared or { - featuredata = { }, - anchorhash = { }, - initialized = false, - } - tfmdata = fonts.otf.copy_to_tfm(fontdata) - tfmdata.unique = tfmdata.unique or { } - tfmdata.shared = tfmdata.shared or { } -- combine - local shared = tfmdata.shared - shared.otfdata = fontdata - shared.features = features -- default - shared.dynamics = { } - shared.processes = { } - tfmdata.luatex = fontdata.luatex - tfmdata.indices = fontdata.luatex.indices - tfmdata.unicodes = fontdata.luatex.unicodes - tfmdata.marks = fontdata.luatex.marks - tfmdata.originals = fontdata.luatex.originals - tfmdata.changed = { } - tfmdata.has_italic = fontdata.metadata.has_italic - if not tfmdata.language then tfmdata.language = 'dflt' end - if not tfmdata.script then tfmdata.script = 'dflt' end - _, shared.features = fonts.otf.set_features(tfmdata,fonts.define.check(features,fonts.otf.features.default)) - - -- from fonts.otf.read_from_open_type() - tfmdata = fonts.tfm.scale(tfmdata, 655360) - - -- delete extra data - fontdata.subfonts = nil - fontdata.metadata = {} - fontdata.pfminfo = {} - fontdata.luatex.filename = 'dummy.otf' - fontdata.luatex.foundfilename = nil - fontdata.size = nil - fontdata.time = nil - fontdata.glyphs = nil - fontdata.luatex.indices = nil - fontdata.luatex.unicodes = nil - fontdata.luatex.originals = nil - fontdata.luatex.tounicode = nil - tfmdata.indices = nil - tfmdata.descriptions = {} - - tfmdata.psname = '' - tfmdata.filename = '' - tfmdata.fontname = '' - tfmdata.fullname = '' - tfmdata.name = '' - tfmdata.embedding = 'no' - tfmdata.cache = 'yes' - - for k, v in pairs(tfmdata.characters) do - v.height = nil - v.depth = nil - if v.width == 655360 then v.width = nil -- 全角 - elseif v.width == 327680 then v.width = 327680 -- 半角 - elseif v.width == 163840 then v.width = 163840 -- 1/4 角 - elseif v.width == 218234.88 then v.width = 218234.88 -- 1/3 角 - elseif k>=128 then v.width = nil - end - end - - if fontdata then -- remove gpos data - local tmpt = fontdata.shared.featuredata - tmpt.gpos_single = {} - tmpt.gpos_pair = {} - tmpt.gpos_reversecontextchain = {} - tmpt.gpos_contextchain = {} - tmpt.gpos_cursive = {} - tmpt.gpos_mark2base = {} - tmpt.gpos_mark2ligature = {} - tmpt.gpos_mark2mark = {} - shared.otfdata.luatex.features.gpos = nil - for i,x in pairs(tfmdata.shared.otfdata.luatex.sequences) do - if string.match(x.type,'gpos') then x.subtables = {} end - end - -- Following features use proportional glyphs, so remove them. - shared.otfdata.luatex.features.gsub.pwid = nil - shared.otfdata.luatex.features.gsub.pkna = nil - shared.otfdata.luatex.features.gsub.palt = nil - end - - -- for luaotfload - if fontdata.pfminfo then - fontdata.pfminfo.os2_capheight = 0 - end - table.tofile(opfilename, tfmdata, 'return', false, true, false) -end -mkrmlgbm('AdobeMingStd-Light', 'ltj-cid-adobe-cns1.lua') -mkrmlgbm('AdobeSongStd-Light', 'ltj-cid-adobe-gb1.lua') -mkrmlgbm('KozMinPr6N-Regular', 'ltj-cid-adobe-japan1.lua') -mkrmlgbm('AdobeMyungjoStd-Medium', 'ltj-cid-adobe-korea1.lua') -\end{luacode} - -\begin{document} -\end{document} -- cgit v1.2.3