mirror of
https://github.com/FlightControl-Master/MOOSE.git
synced 2025-10-29 16:58:06 +00:00
3b69cf992e
* Installs luarocks WITH it's executable (easy to install other rocks if necessary) * Use Lua supplied with luarocks * Create Utils/luadocumentor.bat, which works with RELATIVE PATH ! -> Everybody can generate the doc * Updated launch files accordingly
98 lines
3.2 KiB
Lua
98 lines
3.2 KiB
Lua
|
|
--- Module implementing the LuaRocks "list" command.
|
|
-- Lists currently installed rocks.
|
|
local list = {}
|
|
package.loaded["luarocks.list"] = list
|
|
|
|
local search = require("luarocks.search")
|
|
local deps = require("luarocks.deps")
|
|
local cfg = require("luarocks.cfg")
|
|
local util = require("luarocks.util")
|
|
local path = require("luarocks.path")
|
|
|
|
util.add_run_function(list)
|
|
list.help_summary = "List currently installed rocks."
|
|
list.help_arguments = "[--porcelain] <filter>"
|
|
list.help = [[
|
|
<filter> is a substring of a rock name to filter by.
|
|
|
|
--outdated List only rocks for which there is a
|
|
higher version available in the rocks server.
|
|
|
|
--porcelain Produce machine-friendly output.
|
|
]]
|
|
|
|
local function check_outdated(trees, query)
|
|
local results_installed = {}
|
|
for _, tree in ipairs(trees) do
|
|
search.manifest_search(results_installed, path.rocks_dir(tree), query)
|
|
end
|
|
local outdated = {}
|
|
for name, versions in util.sortedpairs(results_installed) do
|
|
versions = util.keys(versions)
|
|
table.sort(versions, deps.compare_versions)
|
|
local latest_installed = versions[1]
|
|
|
|
local query_available = search.make_query(name:lower())
|
|
query.exact_name = true
|
|
local results_available, err = search.search_repos(query_available)
|
|
|
|
if results_available[name] then
|
|
local available_versions = util.keys(results_available[name])
|
|
table.sort(available_versions, deps.compare_versions)
|
|
local latest_available = available_versions[1]
|
|
local latest_available_repo = results_available[name][latest_available][1].repo
|
|
|
|
if deps.compare_versions(latest_available, latest_installed) then
|
|
table.insert(outdated, { name = name, installed = latest_installed, available = latest_available, repo = latest_available_repo })
|
|
end
|
|
end
|
|
end
|
|
return outdated
|
|
end
|
|
|
|
local function list_outdated(trees, query, porcelain)
|
|
util.title("Outdated rocks:", porcelain)
|
|
local outdated = check_outdated(trees, query)
|
|
for _, item in ipairs(outdated) do
|
|
if porcelain then
|
|
util.printout(item.name, item.installed, item.available, item.repo)
|
|
else
|
|
util.printout(item.name)
|
|
util.printout(" "..item.installed.." < "..item.available.." at "..item.repo)
|
|
util.printout()
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
|
|
--- Driver function for "list" command.
|
|
-- @param filter string or nil: A substring of a rock name to filter by.
|
|
-- @param version string or nil: a version may also be passed.
|
|
-- @return boolean: True if succeeded, nil on errors.
|
|
function list.command(flags, filter, version)
|
|
local query = search.make_query(filter and filter:lower() or "", version)
|
|
query.exact_name = false
|
|
local trees = cfg.rocks_trees
|
|
if flags["tree"] then
|
|
trees = { flags["tree"] }
|
|
end
|
|
|
|
if flags["outdated"] then
|
|
return list_outdated(trees, query, flags["porcelain"])
|
|
end
|
|
|
|
local results = {}
|
|
for _, tree in ipairs(trees) do
|
|
local ok, err, errcode = search.manifest_search(results, path.rocks_dir(tree), query)
|
|
if not ok and errcode ~= "open" then
|
|
util.warning(err)
|
|
end
|
|
end
|
|
util.title("Installed rocks:", flags["porcelain"])
|
|
search.print_results(results, flags["porcelain"])
|
|
return true
|
|
end
|
|
|
|
return list
|