summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--README2
-rw-r--r--src/luaotfload-database.lua45
-rw-r--r--src/luaotfload-features.lua17
-rw-r--r--src/luaotfload-parsers.lua2
4 files changed, 31 insertions, 35 deletions
diff --git a/README b/README
index 77b2864..3df136f 100644
--- a/README
+++ b/README
@@ -39,7 +39,7 @@ Olof-Joachim Frahm <olof@macrolet.net>
Patrick Gundlach <gundlach@speedata.de>
Philipp Stephani <st_philipp@yahoo.de>
David Carlisle <d.p.carlisle@gmail.com>
-
+Yan Zhou @zhouyan
Installation
-------------------------------------------------------------------------------
diff --git a/src/luaotfload-database.lua b/src/luaotfload-database.lua
index c494318..199eca8 100644
--- a/src/luaotfload-database.lua
+++ b/src/luaotfload-database.lua
@@ -928,7 +928,7 @@ local choose_size = function (sizes, askedsize)
--- exact match, this is what we were looking for
exact = index
goto skip
- elseif askedsize < low then
+ elseif askedsize <= low then
--- below range, add to the norange table
local d = low - askedsize
norange [#norange + 1] = { d, index }
@@ -1051,22 +1051,27 @@ local lookup_fontname = function (specification, name, style)
return nil, nil
end
-local design_size_dimension
-local set_size_dimension
+local design_size_dimension --- scale asked size if not using bp
+local set_size_dimension --- called from config
do
- --- cf. TeXbook p. 57
+ --- cf. TeXbook p. 57; the index stores sizes pre-scaled from bp to
+ --- sp. This allows requesting sizes we got from the TeX end
+ --- without further conversion. For the other options *pt* and *dd*
+ --- we scale the requested size as though the value in the font was
+ --- specified in the requested unit.
+
local dimens = {
- pt = function (v) return v end,
- bp = function (v) return (v * 7227) / 7200 end,
- dd = function (v) return (v * 1238) / 1157 end,
+ bp = false,
+ pt = function (v) return v * (7227 / 7200) end,
+ dd = function (v) return v * (7227 / 7200) * (1238 / 1157) end,
}
design_size_dimension = dimens.bp
set_size_dimension = function (dim)
local f = dimens [dim]
- if f then
+ if f ~= nil then
logreport ("both", 4, "db",
"Interpreting design sizes as %q, factor %.6f.",
dim, f (1.000000))
@@ -1144,7 +1149,10 @@ lookup_font_name = function (specification)
askedsize = 0
end
end
- askedsize = design_size_dimension (askedsize)
+
+ if design_size_dimension ~= false then
+ askedsize = design_size_dimension (askedsize)
+ end
resolved, subfont = lookup_familyname (specification,
name,
@@ -1359,9 +1367,16 @@ local load_font_file = function (filename, subfont)
return ret
end
+--- Design sizes in the fonts are specified in decipoints. For the
+--- index these values are prescaled to sp which is what we’re dealing
+--- with at the TeX end.
+
local get_size_info do --- too many upvalues :/
--- rawdata -> (int * int * int | bool)
+ local sp = 2^16 -- pt
+ local bp = 7227 / 7200 -- pt
+
get_size_info = function (rawinfo)
local design_size = rawinfo.design_size
local design_range_top = rawinfo.design_range_top
@@ -1372,13 +1387,13 @@ local get_size_info do --- too many upvalues :/
or design_range_top ~= 0 and design_range_top
if fallback_size then
- design_size = ((design_size or fallback_size) * 2^16) / 10
- design_range_top = ((design_range_top or fallback_size) * 2^16) / 10
- design_range_bottom = ((design_range_bottom or fallback_size) * 2^16) / 10
+ design_size = ((design_size or fallback_size) * sp) / 10
+ design_range_top = ((design_range_top or fallback_size) * sp) / 10
+ design_range_bottom = ((design_range_bottom or fallback_size) * sp) / 10
- design_size = (design_size * 7227) / 7200
- design_range_top = (design_range_top * 7227) / 7200
- design_range_bottom = (design_range_bottom * 7227) / 7200
+ design_size = design_size * bp
+ design_range_top = design_range_top * bp
+ design_range_bottom = design_range_bottom * bp
return {
design_size, design_range_top, design_range_bottom,
diff --git a/src/luaotfload-features.lua b/src/luaotfload-features.lua
index a57aac3..5c35031 100644
--- a/src/luaotfload-features.lua
+++ b/src/luaotfload-features.lua
@@ -1288,10 +1288,6 @@ local tlig_specification = {
data = {
[0x2013] = {0x002D, 0x002D}, -- endash
[0x2014] = {0x002D, 0x002D, 0x002D}, -- emdash
- [0x201C] = {0x2018, 0x2018}, -- quotedblleft
- [0x201D] = {0x2019, 0x2019}, -- quotedblright
- [0x00A1] = {0x0021, 0x2018}, -- exclamdown
- [0x00BF] = {0x003F, 0x2018}, -- questiondown
--- next three originate in T1 encoding; Xetex applies
--- them too
[0x201E] = {0x002C, 0x002C}, -- quotedblbase
@@ -1302,19 +1298,6 @@ local tlig_specification = {
order = { "tlig" },
prepend = true,
},
- {
- type = "ligature",
- features = everywhere,
- data = {
- [0x201C] = {0x0060, 0x0060}, -- quotedblleft
- [0x201D] = {0x0027, 0x0027}, -- quotedblright
- [0x00A1] = {0x0021, 0x0060}, -- exclamdown
- [0x00BF] = {0x003F, 0x0060}, -- questiondown
- },
- flags = noflags,
- order = { "tlig" },
- prepend = true,
- },
}
local rot13_specification = {
diff --git a/src/luaotfload-parsers.lua b/src/luaotfload-parsers.lua
index ffb6401..c2b4f2e 100644
--- a/src/luaotfload-parsers.lua
+++ b/src/luaotfload-parsers.lua
@@ -615,9 +615,7 @@ local prefixed = P"name:" * ws * Cg(fontname, "name")
--- we’ll emit a warning.
+ P"file:" * ws * Cg(unsupported, "path")
+ P"file:" * ws * Cg(fontname, "file")
---- EXPERIMENTAL: kpse lookup
+ P"kpse:" * ws * Cg(fontname, "kpse")
---- EXPERIMENTAL: custom lookup
+ P"my:" * ws * Cg(fontname, "my")
local unprefixed = Cg(fontname, "anon")
local path_lookup = lbrk * Cg(C((1-rbrk)^1), "path") * rbrk