aboutsummaryrefslogtreecommitdiff
path: root/advtrains
diff options
context:
space:
mode:
Diffstat (limited to 'advtrains')
-rw-r--r--advtrains/unifont.lua128
1 files changed, 73 insertions, 55 deletions
diff --git a/advtrains/unifont.lua b/advtrains/unifont.lua
index 3db4de8..f8c4d10 100644
--- a/advtrains/unifont.lua
+++ b/advtrains/unifont.lua
@@ -21,7 +21,9 @@ local sbyte, schar, sformat, smatch, ssub = string.byte, string.char, string.for
local tconcat = table.concat
local texture_dir = tconcat({advtrains.modpath, "textures", "unifont"}, DIR_DELIM)
+minetest.rmdir(texture_dir, true)
minetest.mkdir(texture_dir)
+
local function texture_file(cp)
return sformat(cp < 65536 and "%s_%04x.bmp" or "%s_%06x.bmp", "advtrains_unifont", cp)
end
@@ -29,8 +31,75 @@ local function texture_path(cp)
return texture_dir .. DIR_DELIM .. texture_file(cp)
end
+local _cpwidth = {}
+local cpdata = {}
-local cpwidth = {}
+-- Generate texture files
+local bmp_headers = {}
+for _, v in pairs {8, 16} do
+ bmp_headers[v] = tconcat{
+ "BM", -- starting bytes
+ "\125\0\0\0", -- file size
+ "\0\0\0\0", -- reserved fields
+ "\62\0\0\0", -- offset of the pixel array
+ "\40\0\0\0", -- BITMAPINFOHEADER
+ schar(v, 0, 0, 0), -- image width
+ "\16\0\0\0", -- image height
+ "\1\0", -- number of color planes (must be 1, apparently)
+ "\1\0", -- bits per pixel
+ "\0\0\0\0", -- no compression
+ "\64\0\0\0", -- size of the raw bitmap data
+ "\0\0\0\0\0\0\0\0", -- image resolution (irrelevant here)
+ "\2\0\0\0", -- number of colors in the palette
+ "\0\0\0\0", -- "important" colors
+ -- palette
+ "\0\0\0\0",
+ "\255\255\255\0",
+ }
+end
+
+local f = io.open(advtrains.modpath .. DIR_DELIM .. "unifont.hex", "rb") or error("Cannot open unifont.hex")
+for l in f:lines() do
+ local cp, raw = smatch(l, "^(%x+):(%x+)$")
+ cpdata[tonumber(cp, 16)] = raw
+end
+f:close()
+f = nil
+
+local mods_loaded = false
+local function cpwidth(cp)
+ if _cpwidth[cp] then
+ return _cpwidth[cp]
+ end
+ if cpdata[cp] then
+ local raw = cpdata[cp]
+ local rowsize = #raw/16
+ local width = rowsize*4
+ _cpwidth[cp] = width
+ local rowbytes = rowsize/2
+ local bytes = {bmp_headers[width]}
+ for i = 0, 15 do
+ local row = {}
+ local offset = i*rowsize
+ for j = 1, rowbytes do
+ local offset = offset+2*j-1
+ local data = ssub(raw, offset, offset+1)
+ row[j] = tonumber(data, 16)
+ end
+ for j = rowbytes+1, 4 do
+ row[j] = 0
+ end
+ bytes[17-i] = schar(unpack(row))
+ end
+ local path = texture_path(cp)
+ minetest.safe_file_write(path, tconcat(bytes))
+ if mods_loaded then
+ minetest.dynamic_add_media({filepath = path})
+ end
+ return width
+ end
+end
+minetest.register_on_mods_loaded(function() mods_loaded = true end)
local function mbstocps(str)
local t = {}
@@ -82,8 +151,8 @@ local function renderer(opts)
if char == 10 then
lastline = {width = 0}
lines[#lines+1] = lastline
- elseif cpwidth[char] then
- local newwidth = lastline.width + cpwidth[char]
+ elseif cpwidth(char) then
+ local newwidth = lastline.width + cpwidth(char)
lastline.width = newwidth
maxwidth = math.max(newwidth, maxwidth)
lastline[#lastline+1] = char
@@ -112,7 +181,7 @@ local function renderer(opts)
for j = 1, #line do
local cp = line[j]
st[#st+1] = sformat("%d,%d=%s", x, y, texture_file(cp))
- x = x + cpwidth[cp] + spacing
+ x = x + cpwidth(cp) + spacing
end
y = y + 16
end
@@ -129,57 +198,6 @@ local function render(str, opts)
return renderer(opts)(str)
end
--- Generate texture files
-local bmp_headers = {}
-for _, v in pairs {8, 16} do
- bmp_headers[v] = tconcat{
- "BM", -- starting bytes
- "\125\0\0\0", -- file size
- "\0\0\0\0", -- reserved fields
- "\62\0\0\0", -- offset of the pixel array
- "\40\0\0\0", -- BITMAPINFOHEADER
- schar(v, 0, 0, 0), -- image width
- "\16\0\0\0", -- image height
- "\1\0", -- number of color planes (must be 1, apparently)
- "\1\0", -- bits per pixel
- "\0\0\0\0", -- no compression
- "\64\0\0\0", -- size of the raw bitmap data
- "\0\0\0\0\0\0\0\0", -- image resolution (irrelevant here)
- "\2\0\0\0", -- number of colors in the palette
- "\0\0\0\0", -- "important" colors
- -- palette
- "\0\0\0\0",
- "\255\255\255\0",
- }
-end
-
-local t0 = os.clock()
-local f = io.open(advtrains.modpath .. DIR_DELIM .. "unifont.hex", "rb") or error("Cannot open unifont.hex")
-for l in f:lines() do
- local cp, raw = smatch(l, "^(%x+):(%x+)$")
- local cp = tonumber(cp, 16) or error("Cannot parse codepoint from " .. cp)
- local rowsize = #raw/16
- local width = rowsize*4
- cpwidth[cp] = width
- local rowbytes = rowsize/2
- local bytes = {bmp_headers[width]}
- for i = 0, 15 do
- local row = {}
- local offset = i*rowsize
- for j = 1, rowbytes do
- local offset = offset+2*j-1
- local data = ssub(raw, offset, offset+1)
- row[j] = tonumber(data, 16)
- end
- for j = rowbytes+1, 4 do
- row[j] = 0
- end
- bytes[17-i] = schar(unpack(row))
- end
- minetest.safe_file_write(texture_path(cp), tconcat(bytes))
-end
-minetest.log("action",sformat("[advtrains/unifont] Generated textures in %f seconds", os.clock()-t0))
-
return {
texture_dir = texture_dir,
mbstocps = mbstocps,