add scripts
This commit is contained in:
14
scripts/list.lua
Normal file
14
scripts/list.lua
Normal file
@@ -0,0 +1,14 @@
|
||||
import("packages")
|
||||
|
||||
function main(...)
|
||||
for plat, pkgs in pairs(packages()) do
|
||||
cprint("${magenta}%s${clear}:", plat)
|
||||
for _, pkg in ipairs(pkgs) do
|
||||
if pkg.generic then
|
||||
cprint(" ${yellow}->${clear} %s", pkg.name)
|
||||
else
|
||||
cprint(" ${yellow}->${clear} %s (%s)", pkg.name, table.concat(pkg.archs, ", "))
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
71
scripts/packages.lua
Normal file
71
scripts/packages.lua
Normal file
@@ -0,0 +1,71 @@
|
||||
-- imports
|
||||
import("core.package.package")
|
||||
import("core.platform.platform")
|
||||
import("private.core.base.select_script")
|
||||
|
||||
-- is supported platform and architecture?
|
||||
function is_supported(instance, plat, arch, opt)
|
||||
opt = opt or {}
|
||||
if instance:is_template() then
|
||||
return false
|
||||
end
|
||||
|
||||
local script = instance:get(instance:is_fetchonly() and "fetch" or "install")
|
||||
if not select_script(script, {plat = plat, arch = arch}) then
|
||||
if opt.native and select_script(script, {
|
||||
plat = plat, arch = arch, subhost = plat, subarch = arch}) then
|
||||
return true
|
||||
end
|
||||
return false
|
||||
end
|
||||
return true
|
||||
end
|
||||
|
||||
-- load package
|
||||
function _load_package(packagename, packagedir, packagefile)
|
||||
local funcinfo = debug.getinfo(package.load_from_repository)
|
||||
if funcinfo and funcinfo.nparams == 3 then -- >= 2.7.8
|
||||
return package.load_from_repository(packagename, packagedir, {packagefile = packagefile})
|
||||
else
|
||||
-- deprecated
|
||||
return package.load_from_repository(packagename, nil, packagedir, packagefile)
|
||||
end
|
||||
end
|
||||
|
||||
-- the main entry
|
||||
function main(opt)
|
||||
opt = opt or {}
|
||||
local packages = {}
|
||||
for _, packagedir in ipairs(os.dirs(path.join("packages", "*", "*"))) do
|
||||
local packagename = path.filename(packagedir)
|
||||
local packagefile = path.join(packagedir, "xmake.lua")
|
||||
local instance = _load_package(packagename, packagedir, packagefile)
|
||||
local basename = instance:get("base")
|
||||
if instance and basename then
|
||||
local basedir = path.join("packages", basename:sub(1, 1):lower(), basename:lower())
|
||||
local basefile = path.join(basedir, "xmake.lua")
|
||||
instance._BASE = _load_package(basename, basedir, basefile)
|
||||
end
|
||||
if instance then
|
||||
for _, plat in ipairs({"windows", "linux", "macosx", "iphoneos", "android", "mingw", "msys", "bsd", "wasm", "cross"}) do
|
||||
local archs = platform.archs(plat)
|
||||
if archs then
|
||||
local package_archs = {}
|
||||
for _, arch in ipairs(archs) do
|
||||
if is_supported(instance, plat, arch, opt) then
|
||||
table.insert(package_archs, arch)
|
||||
end
|
||||
end
|
||||
if #package_archs > 0 then
|
||||
packages[plat] = packages[plat] or {}
|
||||
table.insert(packages[plat], {name = instance:name(), instance = instance, archs = package_archs, generic = #package_archs == #archs})
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
for _, packages_plat in pairs(packages) do
|
||||
table.sort(packages_plat, function(a, b) return a.name < b.name end)
|
||||
end
|
||||
return packages
|
||||
end
|
||||
356
scripts/test.lua
Normal file
356
scripts/test.lua
Normal file
@@ -0,0 +1,356 @@
|
||||
-- imports
|
||||
import("core.base.option")
|
||||
import("core.platform.platform")
|
||||
import("core.package.package", {alias = "core_package"})
|
||||
import("packages", {alias = "get_packages"})
|
||||
|
||||
-- the options
|
||||
local options =
|
||||
{
|
||||
{'v', "verbose", "k", nil, "Enable verbose information." }
|
||||
, {'D', "diagnosis", "k", nil, "Enable diagnosis information." }
|
||||
, {nil, "shallow", "k", nil, "Only install the root packages." }
|
||||
, {'k', "kind", "kv", nil, "Enable static/shared library." }
|
||||
, {'p', "plat", "kv", nil, "Set the given platform." }
|
||||
, {'a', "arch", "kv", nil, "Set the given architecture." }
|
||||
, {'m', "mode", "kv", nil, "Set the given mode." }
|
||||
, {'j', "jobs", "kv", nil, "Set the build jobs." }
|
||||
, {'f', "configs", "kv", nil, "Set the configs." }
|
||||
, {'d', "debugdir", "kv", nil, "Set the debug source directory." }
|
||||
, {nil, "policies", "kv", nil, "Set the policies." }
|
||||
, {nil, "fetch", "k", nil, "Fetch package only." }
|
||||
, {nil, "precompiled", "k", nil, "Attemp to install the precompiled package." }
|
||||
, {nil, "remote", "k", nil, "Test package on the remote server." }
|
||||
, {nil, "linkjobs", "kv", nil, "Set the link jobs." }
|
||||
, {nil, "cflags", "kv", nil, "Set the cflags." }
|
||||
, {nil, "cxxflags", "kv", nil, "Set the cxxflags." }
|
||||
, {nil, "ldflags", "kv", nil, "Set the ldflags." }
|
||||
, {nil, "ndk", "kv", nil, "Set the Android NDK directory." }
|
||||
, {nil, "ndk_sdkver", "kv", nil, "Set the Android NDK platform sdk version." }
|
||||
, {nil, "sdk", "kv", nil, "Set the SDK directory of cross toolchain." }
|
||||
, {nil, "vs", "kv", nil, "Set the VS Compiler version." }
|
||||
, {nil, "vs_sdkver", "kv", nil, "Set the Windows SDK version." }
|
||||
, {nil, "vs_toolset", "kv", nil, "Set the Windows Toolset version." }
|
||||
, {nil, "vs_runtime", "kv", nil, "Set the VS Runtime library (deprecated)." }
|
||||
, {nil, "runtimes", "kv", nil, "Set the Runtime libraries." }
|
||||
, {nil, "xcode_sdkver", "kv", nil, "The SDK Version for Xcode" }
|
||||
, {nil, "target_minver", "kv", nil, "The Target Minimal Version" }
|
||||
, {nil, "appledev", "kv", nil, "The Apple Device Type" }
|
||||
, {nil, "mingw", "kv", nil, "Set the MingW directory." }
|
||||
, {nil, "toolchain", "kv", nil, "Set the toolchain name." }
|
||||
, {nil, "toolchain_host", "kv", nil, "Set the host toolchain name." }
|
||||
, {nil, "packages", "vs", nil, "The package list." }
|
||||
}
|
||||
|
||||
-- check package is supported?
|
||||
function _check_package_is_supported()
|
||||
for _, names in pairs(core_package.apis()) do
|
||||
for _, name in ipairs(names) do
|
||||
if type(name) == "string" and name == "package.on_check" then
|
||||
return true
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- config packages
|
||||
function _config_packages(argv, packages)
|
||||
local config_argv = {"f", "-c"}
|
||||
if argv.verbose then
|
||||
table.insert(config_argv, "-v")
|
||||
end
|
||||
if argv.diagnosis then
|
||||
table.insert(config_argv, "-D")
|
||||
end
|
||||
if argv.plat then
|
||||
table.insert(config_argv, "--plat=" .. argv.plat)
|
||||
end
|
||||
if argv.arch then
|
||||
table.insert(config_argv, "--arch=" .. argv.arch)
|
||||
end
|
||||
if argv.mode then
|
||||
table.insert(config_argv, "--mode=" .. argv.mode)
|
||||
end
|
||||
if argv.policies then
|
||||
table.insert(config_argv, "--policies=" .. argv.policies)
|
||||
end
|
||||
if argv.ndk then
|
||||
table.insert(config_argv, "--ndk=" .. argv.ndk)
|
||||
end
|
||||
if argv.sdk then
|
||||
table.insert(config_argv, "--sdk=" .. argv.sdk)
|
||||
end
|
||||
if argv.ndk_sdkver then
|
||||
table.insert(config_argv, "--ndk_sdkver=" .. argv.ndk_sdkver)
|
||||
end
|
||||
if argv.vs then
|
||||
table.insert(config_argv, "--vs=" .. argv.vs)
|
||||
end
|
||||
if argv.vs_sdkver then
|
||||
table.insert(config_argv, "--vs_sdkver=" .. argv.vs_sdkver)
|
||||
end
|
||||
if argv.vs_toolset then
|
||||
table.insert(config_argv, "--vs_toolset=" .. argv.vs_toolset)
|
||||
end
|
||||
local runtimes = argv.runtimes or argv.vs_runtime
|
||||
if runtimes then
|
||||
if is_host("windows") then
|
||||
table.insert(config_argv, "--vs_runtime=" .. runtimes)
|
||||
else
|
||||
table.insert(config_argv, "--runtimes=" .. runtimes)
|
||||
end
|
||||
end
|
||||
if argv.xcode_sdkver then
|
||||
table.insert(config_argv, "--xcode_sdkver=" .. argv.xcode_sdkver)
|
||||
end
|
||||
if argv.target_minver then
|
||||
table.insert(config_argv, "--target_minver=" .. argv.target_minver)
|
||||
end
|
||||
if argv.appledev then
|
||||
table.insert(config_argv, "--appledev=" .. argv.appledev)
|
||||
end
|
||||
if argv.mingw then
|
||||
table.insert(config_argv, "--mingw=" .. argv.mingw)
|
||||
end
|
||||
if argv.toolchain then
|
||||
table.insert(config_argv, "--toolchain=" .. argv.toolchain)
|
||||
end
|
||||
if argv.toolchain_host then
|
||||
table.insert(config_argv, "--toolchain_host=" .. argv.toolchain_host)
|
||||
end
|
||||
if argv.cflags then
|
||||
table.insert(config_argv, "--cflags=" .. argv.cflags)
|
||||
end
|
||||
if argv.cxxflags then
|
||||
table.insert(config_argv, "--cxxflags=" .. argv.cxxflags)
|
||||
end
|
||||
if argv.ldflags then
|
||||
table.insert(config_argv, "--ldflags=" .. argv.ldflags)
|
||||
end
|
||||
os.vexecv(os.programfile(), config_argv)
|
||||
end
|
||||
|
||||
-- get extra string
|
||||
function _get_extra_str(argv)
|
||||
local extra = {}
|
||||
if argv.mode == "debug" then
|
||||
extra.debug = true
|
||||
end
|
||||
-- Some packages set shared=true as default, so we need to force set
|
||||
-- shared=false to test static build.
|
||||
extra.configs = extra.configs or {}
|
||||
extra.configs.shared = argv.kind == "shared"
|
||||
local configs = argv.configs
|
||||
if configs then
|
||||
extra.system = false
|
||||
extra.configs = extra.configs or {}
|
||||
local extra_configs, errors = ("{" .. configs .. "}"):deserialize()
|
||||
if extra_configs then
|
||||
table.join2(extra.configs, extra_configs)
|
||||
else
|
||||
raise(errors)
|
||||
end
|
||||
end
|
||||
return string.serialize(extra, {indent = false, strip = true})
|
||||
end
|
||||
|
||||
-- load packages
|
||||
function _load_packages(argv, packages)
|
||||
_config_packages(argv, packages)
|
||||
local info_argv = {"require", "-f", "-y", "--info"}
|
||||
if argv.verbose then
|
||||
table.insert(info_argv, "-v")
|
||||
end
|
||||
if argv.diagnosis then
|
||||
table.insert(info_argv, "-D")
|
||||
end
|
||||
local extra_str = _get_extra_str(argv)
|
||||
table.insert(info_argv, "--extra=" .. extra_str)
|
||||
|
||||
-- call `xrepo info` to test on_load
|
||||
if #packages > 0 then
|
||||
print("testing to load packages ...")
|
||||
print(" > if it causes errors, please remove assert/raise() to on_check.")
|
||||
os.vexecv(os.programfile(), table.join(info_argv, packages))
|
||||
end
|
||||
end
|
||||
|
||||
-- require packages
|
||||
function _require_packages(argv, packages)
|
||||
_config_packages(argv, packages)
|
||||
local require_argv = {"require", "-f", "-y"}
|
||||
local check_argv = {"require", "-f", "-y", "--check"}
|
||||
if not argv.precompiled then
|
||||
table.insert(require_argv, "--build")
|
||||
end
|
||||
if argv.verbose then
|
||||
table.insert(require_argv, "-v")
|
||||
table.insert(check_argv, "-v")
|
||||
end
|
||||
if argv.diagnosis then
|
||||
table.insert(require_argv, "-D")
|
||||
table.insert(check_argv, "-D")
|
||||
end
|
||||
local is_debug = false
|
||||
if argv.debugdir then
|
||||
is_debug = true
|
||||
table.insert(require_argv, "--debugdir=" .. argv.debugdir)
|
||||
end
|
||||
if argv.shallow or is_debug then
|
||||
table.insert(require_argv, "--shallow")
|
||||
end
|
||||
if argv.jobs then
|
||||
table.insert(require_argv, "--jobs=" .. argv.jobs)
|
||||
end
|
||||
if argv.linkjobs then
|
||||
table.insert(require_argv, "--linkjobs=" .. argv.linkjobs)
|
||||
end
|
||||
if argv.fetch then
|
||||
table.insert(require_argv, "--fetch")
|
||||
end
|
||||
local extra_str = _get_extra_str(argv)
|
||||
table.insert(require_argv, "--extra=" .. extra_str)
|
||||
table.insert(check_argv, "--extra=" .. extra_str)
|
||||
|
||||
-- test on_check
|
||||
local install_packages = {}
|
||||
if _check_package_is_supported() then
|
||||
print("testing to check packages ...")
|
||||
for _, package in ipairs(packages) do
|
||||
local ok = os.vexecv(os.programfile(), table.join(check_argv, package), {try = true})
|
||||
if ok == 0 then
|
||||
table.insert(install_packages, package)
|
||||
end
|
||||
end
|
||||
else
|
||||
install_packages = packages
|
||||
end
|
||||
|
||||
-- test installation
|
||||
if #install_packages > 0 then
|
||||
print("testing to install packages ...")
|
||||
os.vexecv(os.programfile(), table.join(require_argv, install_packages))
|
||||
else
|
||||
print("no testable packages on %s or you're using lower version xmake!", argv.plat or os.subhost())
|
||||
end
|
||||
end
|
||||
|
||||
-- the given package is supported?
|
||||
function _package_is_supported(argv, packagename)
|
||||
local packages = get_packages()
|
||||
if packages then
|
||||
local plat = argv.plat or os.subhost()
|
||||
local packages_plat = packages[plat]
|
||||
for _, package in ipairs(packages_plat) do
|
||||
if package and packagename:split("%s+")[1] == package.name then
|
||||
local arch = argv.arch
|
||||
if not arch and plat ~= os.subhost() then
|
||||
arch = table.wrap(platform.archs(plat))[1]
|
||||
end
|
||||
if not arch then
|
||||
arch = os.subarch()
|
||||
end
|
||||
for _, package_arch in ipairs(package.archs) do
|
||||
print(package_arch, package.archs)
|
||||
if arch == package_arch then
|
||||
return true
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
function get_modified_packages()
|
||||
local packages = {}
|
||||
local diff = os.iorun("git --no-pager diff HEAD^")
|
||||
for _, line in ipairs(diff:split("\n")) do
|
||||
if line:startswith("+++ b/") then
|
||||
local file = line:sub(7)
|
||||
if file:startswith("packages") then
|
||||
assert(file == file:lower(), "%s must be lower case!", file)
|
||||
local package = file:match("packages/%w/(%S-)/")
|
||||
table.insert(packages, package)
|
||||
end
|
||||
elseif line:startswith("+") and line:find("add_versions") then
|
||||
local version = line:match("add_versions%(\"(.-)\"")
|
||||
if version:find(":", 1, true) then
|
||||
version = version:split(":")[2]
|
||||
end
|
||||
if #packages > 0 and version then
|
||||
local lastpackage = packages[#packages]
|
||||
local splitinfo = lastpackage:split("%s+")
|
||||
table.insert(packages, splitinfo[1] .. " " .. version)
|
||||
end
|
||||
end
|
||||
end
|
||||
return table.unique(packages)
|
||||
end
|
||||
|
||||
-- the main entry
|
||||
function main(...)
|
||||
|
||||
-- parse arguments
|
||||
local argv = option.parse({...}, options, "Test all the given or changed packages.")
|
||||
|
||||
-- get packages
|
||||
local packages = argv.packages or {}
|
||||
if #packages == 0 then
|
||||
packages = get_modified_packages()
|
||||
end
|
||||
if #packages == 0 then
|
||||
table.insert(packages, "tbox dev")
|
||||
end
|
||||
|
||||
-- prepare test project
|
||||
local repodir = os.curdir()
|
||||
local workdir = path.join(os.tmpdir(), "xmake-repo")
|
||||
print(packages)
|
||||
os.setenv("XMAKE_STATS", "false")
|
||||
if not os.isfile(path.join(workdir, "test", "xmake.lua")) then
|
||||
os.tryrm(workdir)
|
||||
os.mkdir(workdir)
|
||||
os.cd(workdir)
|
||||
os.execv(os.programfile(), {"create", "test"})
|
||||
else
|
||||
os.cd(workdir)
|
||||
end
|
||||
os.cd("test")
|
||||
print(os.curdir())
|
||||
-- do action for remote?
|
||||
if os.isdir("xmake-repo") then
|
||||
os.execv(os.programfile(), {"service", "--disconnect"})
|
||||
end
|
||||
if argv.remote then
|
||||
os.tryrm("xmake-repo")
|
||||
os.cp(path.join(repodir, "packages"), "xmake-repo/packages")
|
||||
os.execv(os.programfile(), {"service", "--connect"})
|
||||
repodir = "xmake-repo"
|
||||
end
|
||||
os.execv(os.programfile(), {"repo", "--add", "local-repo", repodir})
|
||||
os.execv(os.programfile(), {"repo", "-l"})
|
||||
|
||||
local packages_original = table.clone(packages)
|
||||
|
||||
-- load packages
|
||||
_load_packages(argv, packages_original)
|
||||
|
||||
local old_dir = os.cd(repodir)
|
||||
-- remove unsupported packages
|
||||
for idx, package in irpairs(packages) do
|
||||
assert(package == package:lower(), "package(%s) must be lower case!", package)
|
||||
if not _package_is_supported(argv, package) then
|
||||
table.remove(packages, idx)
|
||||
end
|
||||
end
|
||||
os.cd(old_dir)
|
||||
|
||||
-- no unsupported packages
|
||||
if #packages == 0 then
|
||||
print("no testable packages on %s!", argv.plat or os.subhost())
|
||||
return
|
||||
end
|
||||
|
||||
-- require packages
|
||||
_require_packages(argv, packages)
|
||||
end
|
||||
Reference in New Issue
Block a user