diff options
-rw-r--r-- | Makefile | 4 | ||||
-rw-r--r-- | luaotfload-auxiliary.lua | 88 | ||||
-rw-r--r-- | luaotfload-blacklist.cnf | 2 | ||||
-rw-r--r-- | luaotfload-colors.lua | 4 | ||||
-rw-r--r-- | luaotfload-database.lua | 10 | ||||
-rw-r--r-- | luaotfload-features.lua | 2 | ||||
-rw-r--r-- | luaotfload-merged.lua | 8 | ||||
-rwxr-xr-x | luaotfload-tool.lua | 2 |
8 files changed, 86 insertions, 34 deletions
@@ -25,7 +25,7 @@ MAN = $(MANPAGE) COMPILED = $(DOC) UNPACKED = luaotfload.sty luaotfload.lua GENERATED = $(GRAPHED) $(UNPACKED) $(COMPILED) $(GLYPHS) $(MAN) -SOURCE = $(DTX) $(MANSOURCE) $(OTFL) README Makefile NEWS $(SCRIPT) $(OLDSCRIPT) $(GLYPHSCRIPT) +SOURCE = $(DTX) $(MANSOURCE) $(OTFL) README Makefile NEWS $(GLYPHSCRIPT) # test files TESTDIR = tests @@ -35,7 +35,7 @@ TESTFILES_TL = $(filter-out $(TESTFILES_SYS), $(TESTFILES)) # Files grouped by installation location SCRIPTFILES = $(SCRIPT) $(OLDSCRIPT) $(GLYPHSCRIPT) -RUNFILES = $(UNPACKED) $(OTFL) +RUNFILES = $(UNPACKED) $(filter-out $(SCRIPTFILES),$(OTFL)) DOCFILES = $(DOC) $(DOTPDF) README NEWS MANFILES = $(MANPAGE) SRCFILES = $(DTX) Makefile diff --git a/luaotfload-auxiliary.lua b/luaotfload-auxiliary.lua index a41520c..dde5686 100644 --- a/luaotfload-auxiliary.lua +++ b/luaotfload-auxiliary.lua @@ -76,16 +76,18 @@ local add_fontdata_fallbacks = function (fontdata) metadata = { ascent = metadata.ascent }, } --- for microtype and fontspec - local fake_features = { } -- wrong: table.copy(resources.features) + --local fake_features = { } + local fake_features = table.copy(resources.features) setmetatable(fake_features, { __index = function (tab, idx) - warning("some package (probably fontspec) is outdated") - warning( - "attempt to index " .. - "tfmdata.shared.otfdata.luatex.features (%s)", - idx) - --os.exit(1) - return nil --- empty anyways - end}) + warning("some package (probably fontspec) is outdated") + warning( + "attempt to index " .. + "tfmdata.shared.otfdata.luatex.features (%s)", + idx) + --os.exit(1) + return tab[idx] + end, + }) fontdata.shared.otfdata.luatex = { unicodes = resources.unicodes, features = fake_features, @@ -479,27 +481,65 @@ aux.sprint_math_dimension = sprint_math_dimension --- extra database functions ----------------------------------------------------------------------- +local namesresolve = fonts.names.resolve +local namesscan_dir = fonts.names.scan_dir + --- migrated from luaotfload-database.lua --- https://github.com/lualatex/luaotfload/pull/61#issuecomment-17776975 ---- string -> (int, int) +--- string -> (int * int) local scan_external_dir = function (dir) - local old_names, new_names = names.data - if not old_names then - old_names = load_names() - end - new_names = tablecopy(old_names) - local n_scanned, n_new = fonts.names.scan_dir(dir, old_names, - new_names) - --- FIXME - --- This doesn’t seem right. If a db update is triggered after this - --- point, then the added fonts will be saved along with it -- - --- which is not as “temporarily” as it should be. (This should be - --- addressed during a refactoring of names_resolve().) - names.data = new_names - return n_scanned, n_new + local old_names, new_names = names.data + if not old_names then + old_names = load_names() + end + new_names = tablecopy(old_names) + local n_scanned, n_new = scan_dir(dir, old_names, new_names) + --- FIXME + --- This doesn’t seem right. If a db update is triggered after this + --- point, then the added fonts will be saved along with it -- + --- which is not as “temporarily” as it should be. (This should be + --- addressed during a refactoring of names_resolve().) + names.data = new_names + return n_scanned, n_new end aux.scan_external_dir = scan_external_dir +--- https://github.com/lualatex/luaotfload/issues/74 +--- string -> (string * int) +local resolve_fontname = function (name) + local foundname, subfont, success = namesresolve(nil, nil, { + name = name, + lookup = "name", + optsize = 0, + specification = "name:" .. name, + }) + if success then + return foundname, subfont + end + return false, false +end + +aux.resolve_fontname = resolve_fontname + +--- string list -> (string * int) +local resolve_fontlist +resolve_fontlist = function (names, n) + if not n then + return resolve_fontlist(names, 1) + end + local this = names[n] + if this then + local foundname, subfont = resolve_fontname(this) + if foundname then + return foundname, subfont + end + return resolve_fontlist(names, n+1) + end + return false, false +end + +aux.resolve_fontlist = resolve_fontlist + -- vim:tw=71:sw=2:ts=2:expandtab diff --git a/luaotfload-blacklist.cnf b/luaotfload-blacklist.cnf index 943d347..2a21091 100644 --- a/luaotfload-blacklist.cnf +++ b/luaotfload-blacklist.cnf @@ -2,4 +2,6 @@ LastResort.ttf % a MacOSX font, but also available for free from unicode.org % Segfaults under LuaTeX 0.76 lingoes.ttf +% http://tug.org/pipermail/luatex/2013-May/004239.html +Diablindall.ttf diff --git a/luaotfload-colors.lua b/luaotfload-colors.lua index ec076c2..7bd5c1f 100644 --- a/luaotfload-colors.lua +++ b/luaotfload-colors.lua @@ -7,12 +7,16 @@ if not modules then modules = { } end modules ['luaotfload-colors'] = { } --[[doc-- + buggy coloring with the pre_output_filter when expansion is enabled · tfmdata for different expansion values is split over different objects · in ``initializeexpansion()``, chr.expansion_factor is set, and only those characters that have it are affected · in constructors.scale: chr.expansion_factor = ve*1000 if commented out makes the bug vanish + +explanation: http://tug.org/pipermail/luatex/2013-May/004305.html + --doc]]-- diff --git a/luaotfload-database.lua b/luaotfload-database.lua index f4c6fdc..0e46874 100644 --- a/luaotfload-database.lua +++ b/luaotfload-database.lua @@ -202,8 +202,10 @@ local fontnames_init = function (keep_cache) --- returns dbobj } end -local make_name = function (path) - return filereplacesuffix(path, "lua"), filereplacesuffix(path, "luc") +--- string -> (string * string) +local make_savenames = function (path) + return filereplacesuffix(path, "lua"), + filereplacesuffix(path, "luc") end --- When loading a lua file we try its binary complement first, which @@ -1493,7 +1495,7 @@ save_lookups = function ( ) local lookups = names.lookups local path = ensure_names_path() if fileiswritable(path) then - local luaname, lucname = make_name(names.path.lookup_path) + local luaname, lucname = make_savenames(names.path.lookup_path) if luaname then tabletofile(luaname, lookups, true) if lucname and type(caches.compile) == "function" then @@ -1514,7 +1516,7 @@ save_names = function (fontnames) if not fontnames then fontnames = names.data end local path = ensure_names_path() if fileiswritable(path) then - local luaname, lucname = make_name(names.path.path) + local luaname, lucname = make_savenames(names.path.path) if luaname then --tabletofile(luaname, fontnames, true, { reduce=true }) tabletofile(luaname, fontnames, true) diff --git a/luaotfload-features.lua b/luaotfload-features.lua index 39d4a88..f541964 100644 --- a/luaotfload-features.lua +++ b/luaotfload-features.lua @@ -1050,7 +1050,7 @@ local extract_subfont do local eof = P(-1) local digit = R"09" - --- Theoretically a valid subfont address can be up to seven + --- Theoretically a valid subfont address can be up to ten --- digits long. local sub_expr = P"(" * C(digit^1) * P")" * eof local full_path = C(P(1 - sub_expr)^1) diff --git a/luaotfload-merged.lua b/luaotfload-merged.lua index f814bdb..14667bd 100644 --- a/luaotfload-merged.lua +++ b/luaotfload-merged.lua @@ -1,6 +1,6 @@ -- merged file : luatex-fonts-merged.lua -- parent file : luatex-fonts.lua --- merge date : 05/12/13 22:16:22 +-- merge date : 05/14/13 23:14:52 do -- begin closure to overcome local limits and interference @@ -2046,7 +2046,11 @@ function file.splitname(str,splitdrive) end end function file.splitbase(str) - return str and lpegmatch(pattern_d,str) + if str then + return lpegmatch(pattern_d,str) + else + return "",str + end end function file.nametotable(str,splitdrive) if str then diff --git a/luaotfload-tool.lua b/luaotfload-tool.lua index 352697c..721e3cf 100755 --- a/luaotfload-tool.lua +++ b/luaotfload-tool.lua @@ -347,7 +347,7 @@ actions.query = function (job) lookup = "name", specification = "name:" .. query, optsize = 0, - } + } local foundname, subfont, success = fonts.names.resolve(nil, nil, tmpspec) |