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
|
#!/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
-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",
quiet = "q",
verbose = 1,
version = "V",
help = "h",
sys = 0,
['fc-cache'] = 0,
['no-fc-cache'] = 0,
}
local short_opts = "d:qvVh"
-- 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 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 == "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") .. "/tex/"
end
end
luaotfload.fonts.log_level = log_level
end
process_cmdline()
do_run_fc_cache(run_fc_cache)
luaotfload.fonts.generate()
|
