1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
if not modules then modules = { } end modules ['grph-fil'] = {
version = 1.001,
comment = "companion to grph-fig.mkiv",
author = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
copyright = "PRAGMA ADE / ConTeXt Development Team",
license = "see context related readme files"
}
local type = type
local trace_run = false trackers.register("graphic.runfile",function(v) trace_run = v end)
local report_run = logs.reporter("graphics","run")
local isfile = lfs.isfile
local replacesuffix = file.replacesuffix
local addsuffix = file.addsuffix
local checksum = file.checksum
-- Historically running files is part of graphics processing, so this is why it
-- sits here but is part of the job namespace.
local allocate = utilities.storage.allocate
local collected = allocate()
local tobesaved = allocate()
local jobfiles = {
collected = collected,
tobesaved = tobesaved,
forcerun = false, -- maybe a directive some day
}
job.files = jobfiles
local inputsuffix = "tex"
local resultsuffix = "pdf"
local function initializer()
tobesaved = jobfiles.tobesaved
collected = jobfiles.collected
end
job.register('job.files.collected', tobesaved, initializer)
local runner = sandbox.registerrunner {
name = "hashed context run",
program = "context",
template = [[%options% "%filename%"]],
checkers = {
options = "string",
filename = "readable",
}
}
function jobfiles.run(name,action)
local usedname = addsuffix(name,inputsuffix) -- we assume tex if not set
local oldchecksum = collected[usedname]
local newchecksum = checksum(usedname)
local resultfile = replacesuffix(usedname,resultsuffix)
if jobfiles.forcerun or not oldchecksum or oldchecksum ~= newchecksum or not isfile(resultfile) then
if trace_run then
report_run("processing file, changes in %a, processing forced",name)
end
local ta = type(action)
if ta == "function" then
action(name)
elseif ta == "string" and action ~= "" then
-- can be anything but we assume it gets checked by the sandbox
os.execute(action)
elseif ta == "table" then
runner(action)
else
report_run("processing file, no action given for processing %a",name)
end
elseif trace_run then
report_run("processing file, no changes in %a, not processed",name)
end
tobesaved[name] = newchecksum
end
--
local done = { }
function jobfiles.context(name,options)
if type(name) == "table" then
local result = { }
for i=1,#name do
result[#result+1] = jobfiles.context(name[i],options)
end
return result
else
local result = replacesuffix(name,resultsuffix)
if not done[result] then
jobfiles.run(name, { options = options, filename = name })
done[result] = true
end
return result
end
end
interfaces.implement {
name = "runcontextjob",
arguments = { "string", "string" },
actions = { jobfiles.context, context }
}
|
