+
+-- loading and saving
+ local font_ivs_basename = {} -- key: basename
+ local cache_ver = 4
+ local checksum = file.checksum
+
+ local function prepare_ivs_data(n, id)
+ -- test if already loaded
+ if type(id)=='number' then -- sometimes id is an integer
+ font_ivs_table[n] = font_ivs_table[id]; return
+ elseif not id then return
+ end
+ local fname = id.filename
+ local bname = file.basename(fname)
+ if not fname then
+ font_ivs_table[n] = {}; return
+ elseif font_ivs_basename[bname] then
+ font_ivs_table[n] = font_ivs_basename[bname]; return
+ end
+
+ -- if the cache is present, read it
+ local newsum = checksum(fname) -- MD5 checksum of the fontfile
+ local v = "ivs_" .. string.lower(file.nameonly(fname))
+ local dat = ltjb.load_cache(v,
+ function (t) return (t.version~=cache_ver) or (t.chksum~=newsum) end
+ )
+ -- if the cache is not found or outdated, save the cache
+ if dat then
+ font_ivs_basename[bname] = dat[1] or {}
+ else
+ dat = make_ivs_table(id, fname)
+ font_ivs_basename[bname] = dat or {}
+ ltjb.save_cache( v,
+ {
+ chksum = checksum(fname),
+ version = cache_ver,
+ dat,
+ })
+ end
+ font_ivs_table[n] = font_ivs_basename[bname]
+ end
+
+-- 組版時
+ local function ivs_jglyph(char, bp, pf, uid)
+ local p = node_new(id_whatsit,sid_user)
+ setfield(p, 'user_id', uid)
+ setfield(p, 'type', 100)
+ setfield(p, 'value', char)
+ set_attr(p, attr_curjfnt, pf)
+ set_attr(p, attr_yablshift, has_attr(bp, attr_ykblshift) or 0)
+ return p
+ end
+