Mercurial > prosody-hg
diff util/argparse.lua @ 13733:48c056c10e5a 13.0
util.argparse: Add strict mode + tests
| author | Matthew Wild <mwild1@gmail.com> |
|---|---|
| date | Mon, 17 Feb 2025 18:24:23 +0000 |
| parents | d78e0f422464 |
| children | 81856814d74f |
line wrap: on
line diff
--- a/util/argparse.lua Mon Feb 17 17:02:35 2025 +0000 +++ b/util/argparse.lua Mon Feb 17 18:24:23 2025 +0000 @@ -2,6 +2,8 @@ local short_params = config and config.short_params or {}; local value_params = config and config.value_params or {}; local array_params = config and config.array_params or {}; + local kv_params = config and config.kv_params or {}; + local strict = config and config.strict; local stop_on_positional = not config or config.stop_on_positional ~= false; local parsed_opts = {}; @@ -33,9 +35,11 @@ return nil, "param-not-found", raw_param; end + local uparam = param:match("^[^=]*"):gsub("%-", "_"); + local param_k, param_v; - if value_params[param] or array_params[param] then - param_k, param_v = param, table.remove(arg, 1); + if value_params[uparam] or array_params[uparam] then + param_k, param_v = uparam, table.remove(arg, 1); if not param_v then return nil, "missing-value", raw_param; end @@ -49,8 +53,11 @@ end end param_k = param_k:gsub("%-", "_"); + if strict and not kv_params[param_k] then + return nil, "param-not-found", raw_param; + end end - if array_params[param] then + if array_params[uparam] then if parsed_opts[param_k] then table.insert(parsed_opts[param_k], param_v); else
