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
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
#!/usr/bin/env texlua
-- This file is copyright 2010 Elie Roux and Khaled Hosny and is under CC0
-- license (see http://creativecommons.org/publicdomain/zero/1.0/legalcode).
--
-- This file is a wrapper for the luaotfload-fonts.lua script.
-- It is part of the luaotfload bundle, please see the luaotfload documentation
-- for more info.
kpse.set_program_name("luatex")
local name = 'update-luatex-font-database'
local version = '1.07' -- same version number as luaotfload
--[[
first we import luaotfload-fonts.lua.
Basically it 'exports' three usefult things: the two overwritable variables
- luaotfload.fonts.basename: the filename of the database
- luaotfload.fonts.directory: the directory of the database
and the function
- luaotfload.fonts.generate: the function to generate the database
]]
require("luaotfload-fonts")
require("alt_getopt")
local function help_msg()
texio.write_nl(string.format([[Usage: %s [OPTION]...
Rebuild the LuaTeX font database.
Valid options:
-d --dbdir DIRECTORY writes the database in the specified directory
-f --force force re-indexing all fonts
-q --quiet don't output anything
-v --verbose=LEVEL be more verbose (print the searched directories)
-vv print the loaded fonts
-vvv print all steps of directory searching
-V --version prints the version and exits
-h --help prints this message
--fc-cache run fc-cache before updating database
(default is to run it if available)
--no-fc-cache do not run fc-cache
--sys writes the database for the whole system
(default is only for the user)
The output database file is named otfl-fonts.lua.
]], name))
end
local function version_msg()
texio.write_nl(string.format(
"%s version %s, database version %s.\n", name, version, luaotfload.fonts.version))
end
--[[
Command-line processing.
Here we fill cmdargs with the good values, and then analyze it, setting
luaotfload.fonts.log_level luaotfload.fonts.directory if necessary.
]]
local long_opts = {
dbdir = "d",
force = "f",
quiet = "q",
verbose = 1,
version = "V",
help = "h",
sys = 0,
['fc-cache'] = 0,
['no-fc-cache'] = 0,
}
local short_opts = "d:fqvVh"
-- Function running fc-cache if needed.
-- The argument is nil for default, 0 for no fc-cache and 1 for fc-cache.
-- Default behaviour is to run fc-cache if available.
local function do_run_fc_cache(c)
if c == 0 then return end
if not c then
-- TODO: detect if fc-cache is available
end
local toexec = 'fc-cache'
if system == 'windows' then
toexec = 'fc-cache.exe' -- TODO: to test on a non-cygwin Windows
end
luaotfload.fonts.log(1, 'Executing %s...\n', toexec)
os.execute(toexec)
end
-- a temporary variable, containing the command line option concerning fc-cache
local run_fc_cache = nil
local force_reload = nil
local function process_cmdline()
local opts, optind, optarg = alt_getopt.get_ordered_opts (arg, short_opts, long_opts)
local log_level = 1
for i,v in ipairs(opts) do
if v == "q" then
log_level = 0
elseif v == "v" then
if log_level > 0 then
log_level = log_level + 1
else
log_level = 2
end
elseif v == "V" then
version_msg()
os.exit(0)
elseif v == "h" then
help_msg()
os.exit(0)
elseif v == "d" then
luaotfload.fonts.directory = optarg [i]
elseif v == "f" then
force_reload = 1
elseif v == "fc-cache" then
run_fc_cache = 1
elseif v == "no-fc-cache" then
run_fc_cache = 0
elseif v == "sys" then
luaotfload.fonts.directory = kpse.expand_var("$TEXMFSYSVAR") .. luaotfload.fonts.subtexmfvardir
end
end
if string.match(arg[0], '-sys') then
luaotfload.fonts.directory = kpse.expand_var("$TEXMFSYSVAR") .. luaotfload.fonts.subtexmfvardir
end
luaotfload.fonts.log_level = log_level
end
process_cmdline()
do_run_fc_cache(run_fc_cache)
luaotfload.fonts.reload(force_reload)
|
