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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
|
--- Module implementing the LuaRocks "build" command.
-- Builds a rock, compiling its C parts if any.
local cmd_build = {}
local pack = require("luarocks.pack")
local path = require("luarocks.path")
local util = require("luarocks.util")
local fetch = require("luarocks.fetch")
local fs = require("luarocks.fs")
local deps = require("luarocks.deps")
local remove = require("luarocks.remove")
local cfg = require("luarocks.core.cfg")
local build = require("luarocks.build")
local writer = require("luarocks.manif.writer")
local search = require("luarocks.search")
local make = require("luarocks.cmd.make")
local repos = require("luarocks.repos")
function cmd_build.add_to_parser(parser)
local cmd = parser:command("build", "Build and install a rock, compiling its C parts if any.\n".. -- luacheck: ignore 431
"If the sources contain a luarocks.lock file, uses it as an authoritative source for "..
"exact version of dependencies.\n"..
"If no arguments are given, behaves as luarocks make.", util.see_also())
:summary("Build/compile a rock.")
cmd:argument("rock", "A rockspec file, a source rock file, or the name of "..
"a rock to be fetched from a repository.")
:args("?")
:action(util.namespaced_name_action)
cmd:argument("version", "Rock version.")
:args("?")
cmd:flag("--only-deps --deps-only", "Install only the dependencies of the rock.")
cmd:option("--branch", "Override the `source.branch` field in the loaded "..
"rockspec. Allows to specify a different branch to fetch. Particularly "..
'for "dev" rocks.')
:argname("<name>")
cmd:flag("--pin", "Create a luarocks.lock file listing the exact "..
"versions of each dependency found for this rock (recursively), "..
"and store it in the rock's directory. "..
"Ignores any existing luarocks.lock file in the rock's sources.")
make.cmd_options(cmd)
end
--- Build and install a rock.
-- @param rock_filename string: local or remote filename of a rock.
-- @param opts table: build options
-- @return boolean or (nil, string, [string]): True if build was successful,
-- or false and an error message and an optional error code.
local function build_rock(rock_filename, opts)
assert(type(rock_filename) == "string")
assert(opts:type() == "build.opts")
local ok, err, errcode
local unpack_dir
unpack_dir, err, errcode = fetch.fetch_and_unpack_rock(rock_filename, nil, opts.verify)
if not unpack_dir then
return nil, err, errcode
end
local rockspec_filename = path.rockspec_name_from_rock(rock_filename)
ok, err = fs.change_dir(unpack_dir)
if not ok then return nil, err end
local rockspec
rockspec, err, errcode = fetch.load_rockspec(rockspec_filename)
if not rockspec then
return nil, err, errcode
end
ok, err, errcode = build.build_rockspec(rockspec, opts)
fs.pop_dir()
return ok, err, errcode
end
local function do_build(name, namespace, version, opts)
assert(type(name) == "string")
assert(type(namespace) == "string" or not namespace)
assert(version == nil or type(version) == "string")
assert(opts:type() == "build.opts")
local url, err
if name:match("%.rockspec$") or name:match("%.rock$") then
url = name
else
url, err = search.find_src_or_rockspec(name, namespace, version, opts.check_lua_versions)
if not url then
return nil, err
end
end
name, version = path.parse_name(url)
if name and repos.is_installed(name, version) then
if not opts.rebuild then
util.printout(name .. " " .. version .. " is already installed in " .. path.root_dir(cfg.root_dir))
util.printout("Use --force to reinstall.")
return name, version, "skip"
end
end
if url:match("%.rockspec$") then
local rockspec, err = fetch.load_rockspec(url, nil, opts.verify)
if not rockspec then
return nil, err
end
return build.build_rockspec(rockspec, opts)
end
if url:match("%.src%.rock$") then
opts.need_to_fetch = false
end
return build_rock(url, opts)
end
--- Driver function for "build" command.
-- If a package name is given, forwards the request to "search" and,
-- if returned a result, installs the matching rock.
-- When passing a package name, a version number may also be given.
-- @return boolean or (nil, string, exitcode): True if build was successful; nil and an
-- error message otherwise. exitcode is optionally returned.
function cmd_build.command(args)
if not args.rock then
return make.command(args)
end
local opts = build.opts({
need_to_fetch = true,
minimal_mode = false,
deps_mode = deps.get_deps_mode(args),
build_only_deps = not not (args.only_deps and not args.pack_binary_rock),
namespace = args.namespace,
branch = args.branch,
verify = not not args.verify,
check_lua_versions = not not args.check_lua_versions,
pin = not not args.pin,
rebuild = not not (args.force or args.force_fast),
no_install = false
})
if args.sign and not args.pack_binary_rock then
return nil, "In the build command, --sign is meant to be used only with --pack-binary-rock"
end
if args.pack_binary_rock then
return pack.pack_binary_rock(args.rock, args.namespace, args.version, args.sign, function()
local name, version = do_build(args.rock, args.namespace, args.version, opts)
if name and args.no_doc then
util.remove_doc_dir(name, version)
end
return name, version
end)
end
local name, version, skip = do_build(args.rock, args.namespace, args.version, opts)
if not name then
return nil, version
end
if skip == "skip" then
return name, version
end
if args.no_doc then
util.remove_doc_dir(name, version)
end
if opts.build_only_deps then
util.printout("Stopping after installing dependencies for " ..name.." "..version)
util.printout()
else
if (not args.keep) and not cfg.keep_other_versions then
local ok, err, warn = remove.remove_other_versions(name, version, args.force, args.force_fast)
if not ok then
return nil, err
elseif warn then
util.printerr(err)
end
end
end
if opts.deps_mode ~= "none" then
writer.check_dependencies(nil, deps.get_deps_mode(args))
end
return name, version
end
cmd_build.needs_lock = function(args)
if args.pack_binary_rock then
return false
end
return true
end
return cmd_build
|
