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
|
local upload = {}
local signing = require("luarocks.signing")
local util = require("luarocks.util")
local fetch = require("luarocks.fetch")
local pack = require("luarocks.pack")
local cfg = require("luarocks.core.cfg")
local Api = require("luarocks.upload.api")
function upload.add_to_parser(parser)
local cmd = parser:command("upload", "Pack a source rock file (.src.rock extension) "..
"and upload it and the rockspec to the public rocks repository.", util.see_also())
:summary("Upload a rockspec to the public rocks repository.")
cmd:argument("rockspec", "Rockspec for the rock to upload.")
cmd:argument("src-rock", "A corresponding .src.rock file; if not given it will be generated.")
:args("?")
cmd:flag("--skip-pack", "Do not pack and send source rock.")
cmd:option("--api-key", "Pass an API key. It will be stored for subsequent uses.")
:argname("<key>")
cmd:option("--temp-key", "Use the given a temporary API key in this "..
"invocation only. It will not be stored.")
:argname("<key>")
cmd:flag("--force", "Replace existing rockspec if the same revision of a "..
"module already exists. This should be used only in case of upload "..
"mistakes: when updating a rockspec, increment the revision number "..
"instead.")
cmd:flag("--sign", "Upload a signature file alongside each file as well.")
cmd:flag("--debug"):hidden(true)
end
local function is_dev_version(version)
return version:match("^dev") or version:match("^scm")
end
function upload.command(args)
local api, err = Api.new(args)
if not api then
return nil, err
end
if cfg.verbose then
api.debug = true
end
local rockspec, err, errcode = fetch.load_rockspec(args.rockspec)
if err then
return nil, err, errcode
end
util.printout("Sending " .. tostring(args.rockspec) .. " ...")
local res, err = api:method("check_rockspec", {
package = rockspec.package,
version = rockspec.version
})
if not res then return nil, err end
if not res.module then
util.printout("Will create new module (" .. tostring(rockspec.package) .. ")")
end
if res.version and not args.force then
return nil, "Revision "..rockspec.version.." already exists on the server. "..util.see_help("upload")
end
local sigfname
local rock_sigfname
if args.sign then
sigfname, err = signing.sign_file(args.rockspec)
if err then
return nil, "Failed signing rockspec: " .. err
end
util.printout("Signed rockspec: "..sigfname)
end
local rock_fname
if args.src_rock then
rock_fname = args.src_rock
elseif not args.skip_pack and not is_dev_version(rockspec.version) then
util.printout("Packing " .. tostring(rockspec.package))
rock_fname, err = pack.pack_source_rock(args.rockspec)
if not rock_fname then
return nil, err
end
end
if rock_fname and args.sign then
rock_sigfname, err = signing.sign_file(rock_fname)
if err then
return nil, "Failed signing rock: " .. err
end
util.printout("Signed packed rock: "..rock_sigfname)
end
local multipart = require("luarocks.upload.multipart")
res, err = api:method("upload", nil, {
rockspec_file = multipart.new_file(args.rockspec),
rockspec_sig = sigfname and multipart.new_file(sigfname),
})
if not res then return nil, err end
if res.is_new and #res.manifests == 0 then
util.printerr("Warning: module not added to root manifest due to name taken.")
end
local module_url = res.module_url
if rock_fname then
if (not res.version) or (not res.version.id) then
return nil, "Invalid response from server."
end
util.printout(("Sending " .. tostring(rock_fname) .. " ..."))
res, err = api:method("upload_rock/" .. ("%d"):format(res.version.id), nil, {
rock_file = multipart.new_file(rock_fname),
rock_sig = rock_sigfname and multipart.new_file(rock_sigfname),
})
if not res then return nil, err end
end
util.printout()
util.printout("Done: " .. tostring(module_url))
util.printout()
return true
end
return upload
|
