marcel/luametalatex
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Fix small errors (Esp. a TTF component off by one)

Browse source
This commit is contained in:
Marcel Krüger 2020-07-16 01:41:42 +02:00
parent 063251b54f
commit e02c78e1b5
2 changed files with 15 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

8
luametalatex-pdf-font-ttf.lua
View file

@ -18,11 +18,11 @@ local function addglyph(glyph, usedcids, cidtogid)
local flags, component = string.unpack(">I2I2", glyph, offset)
local gid = cidtogid[component]
if not gid then
gid = #usedcids
usedcids[gid+1] = {component}
gid = #usedcids+1
usedcids[gid] = {component}
cidtogid[component] = gid
end
glyph = glyph:sub(1, offset+1) .. string.pack(">I2", gid).. glyph:sub(offset+4)
glyph = glyph:sub(1, offset+1) .. string.pack(">I2", gid-1).. glyph:sub(offset+4)
offset = flags&32==32 and offset + 4 + (flags&1==1 and 4 or 2) + (flags&8==8 and 2 or (flags&64==64 and 4 or (flags&128==128 and 8 or 0)))
end
end
@ -69,7 +69,7 @@ local function readpostnames(buf, i, usedcids, encoding)
return newusedcids
end
return function(filename, fontid, reencode)
local file <close> = readfile('truetype', filename)
local file <close> = assert(readfile('truetype', filename))
local buf = file()
local magic, tables = sfnt.parse(buf, 1, fontid)
if magic ~= "\0\1\0\0" then error[[Invalid TTF font]] end