1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
if not modules then modules = { } end modules ['font-imp-unicode'] = {
version = 1.001,
comment = "companion to font-ini.mkiv and hand-ini.mkiv",
author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
copyright = "PRAGMA ADE / ConTeXt Development Team",
license = "see context related readme files"
}
if not context then return end
local next = next
local fonts = fonts
local helpers = fonts.helpers
local constructors = fonts.constructors
local registerotffeature = fonts.handlers.otf.features.register
local extraprivates = helpers.extraprivates
local addprivate = helpers.addprivate
local function initialize(tfmdata)
for i=1,#extraprivates do
local e = extraprivates[i]
local c = e[2](tfmdata)
if c then
addprivate(tfmdata, e[1], c)
end
end
end
constructors.newfeatures.otf.register {
name = "extraprivates",
description = "extra privates",
default = true,
manipulators = {
base = initialize,
node = initialize,
}
}
local tounicode = fonts.mappings.tounicode
local function initialize(tfmdata,key,value)
if value == "ligatures" then
local private = fonts.constructors and fonts.constructors.privateoffset or 0xF0000
local collected = fonts.handlers.otf.readers.getcomponents(tfmdata.shared.rawdata)
if collected and next(collected)then
for unicode, char in next, tfmdata.characters do
local u = collected[unicode]
if u then
local n = #u
for i=1,n do
if u[i] > private then
n = 0
break
end
end
if n > 0 then
if n == 1 then
u = u[1]
end
char.unicode = u
char.tounicode = tounicode(u)
end
end
end
end
end
end
-- forceunicodes=ligatures : aggressive lig resolving (e.g. for emoji)
--
-- kind of like: \enabletrackers[fonts.mapping.forceligatures]
registerotffeature {
name = "forceunicodes",
description = "forceunicodes",
manipulators = {
base = initialize,
node = initialize,
}
}
|
