From 7f02fde8764b58fadf93ea9d778ad05a42d28abb Mon Sep 17 00:00:00 2001 From: Philipp Gesang Date: Tue, 9 Dec 2014 22:00:50 +0100 Subject: [import] add single file importing routine --- scripts/mkimport | 32 ++++++++++++++++++++++---------- 1 file changed, 22 insertions(+), 10 deletions(-) (limited to 'scripts/mkimport') diff --git a/scripts/mkimport b/scripts/mkimport index 4f6875d..2ac1549 100644 --- a/scripts/mkimport +++ b/scripts/mkimport @@ -55,7 +55,7 @@ local prefixes = { ------------------------------------------------------------------------------- local die = function (...) - io.stderr:write "[fatal error]: " + io.stderr:write "[\x1b[1;30;41mfatal error\x1b[0m]: " io.stderr:write (stringformat (...)) io.stderr:write "\naborting.\n" os.exit (1) @@ -305,19 +305,32 @@ local get_file_definition = function (name, ourname, kind) local dkind = def.kind --- test properties - if derive_ourname (dours, dkind) == ourname then return def end - if derive_fullname (cat, dname, dkind) == fullname then return def end - if dours == ourname then return def end - if dname == fullname then return def end + if derive_ourname (dours, dkind) == ourname then return def, cat end + if derive_fullname (cat, dname, dkind) == fullname then return def, cat end + if dours == ourname then return def, cat end + if dname == fullname then return def, cat end end end --- search unsuccessful end --[[ [local get_file_definition = function (name, ourname, kind)] ]] -local import_file = function (name, kind) - local ourname = derive_ourname (name) - local def = get_file_definition (name, ourname, kind) +local import_file = function (name, kind, def, cat) + local expected_ourname = derive_ourname (name) + if not def or not cat then + def, cat = get_file_definition (name, expected_ourname, kind) + end + if not def then die ("unable to find a definition matching " .. name) end + if not cat then die ("missing category for file " .. name .. " -- WTF‽") end + + local dname = def.name + local dours = def.ours + local dkind = def.kind + local srcdir = derive_category_path (cat) + local src = file.join (srcdir, derive_fullname (cat, dname, kind)) + local dst = file.join (fontloader_subdir, expected_ourname) + file.copy (src, dst) + return (hash_file (src) == hash_file (dst)) and 0 or 1 end --[[ [local import_file = function (name, kind)] ]] local import = function (arg) @@ -338,7 +351,7 @@ local job_kind = table.mirrored { --- job_kind -> bool local check_job = function (j) - return job_kind[j] + return job_kind[j] or die ("invalid job type “" .. job .. "”.") end ------------------------------------------------------------------------------- @@ -348,7 +361,6 @@ end local main = function () local job = arg[1] or "news" local runner = check_job (job) - if not runner then die ("invalid job type “" .. job .. "”.") end return runner(arg) end -- cgit v1.2.3