From 9a778b19fbfd69dc7bee8b88b8640ebf2451047e Mon Sep 17 00:00:00 2001
From: Philipp Gesang <phg42.2a@gmail.com>
Date: Wed, 10 Dec 2014 08:07:41 +0100
Subject: [import] add preliminary file inspection
---
scripts/mkimport | 45 ++++++++++++++++++++++++++++++++++++++++++++-
1 file changed, 44 insertions(+), 1 deletion(-)
diff --git a/scripts/mkimport b/scripts/mkimport
index 1b4dc39..a748459 100644
--- a/scripts/mkimport
+++ b/scripts/mkimport
@@ -45,6 +45,17 @@ local paths = {
fontloader = "tex/generic/context/luatex",
}
+local subdirs = {
+ "runtime",
+ "misc"
+}
+
+local searchdirs = {
+ --- order is important!
+ fontloader_subdir,
+ context_root
+}
+
local prefixes = {
context = nil,
fontloader = "luatex",
@@ -427,10 +438,42 @@ local import = function (arg)
return 0
end --[[ [local import = function (arg)] ]]
+local tell = function (arg)
+ local target = arg[2]
+ if not target then die "no filename given" end
+
+ local look_for
+ --- pick a file
+ if lfs.isfile (target) then --- absolute path given
+ look_for = target
+ goto found
+ else
+ --- search in local tree
+ for i = 1, #searchdirs do
+ local root = searchdirs[i]
+ for j = 1, #subdirs do
+ local dir = file.join (searchdirs[i], subdirs[j])
+ local file = file.join (dir, target)
+ if lfs.isfile (file) then
+ look_for = file
+ goto found
+ end
+ end
+ end
+ end
+
+ if not look_for then
+ die ("file %s not found in any of the search locations", target)
+ end
+
+::found::
+ status ("found file %s at %s", target, look_for)
+end
+
local job_kind = table.mirrored {
news = news,
import = import,
- tell = function () end,
+ tell = tell,
}
-------------------------------------------------------------------------------
--
cgit v1.2.3