diff util/human/io.lua @ 13367:82513890a1d8

util.human.io: Don't accept ambiguous durations by default The new method parse_duration_lax() exports the old behaviour, mainly for compatibility purposes.
author Matthew Wild <mwild1@gmail.com>
date Thu, 30 Nov 2023 13:42:44 +0000
parents 8dbe693ded6b
children 6a493e41c2cc 519c16c2eb21
line wrap: on
line diff
--- a/util/human/io.lua	Thu Nov 30 12:41:26 2023 +0000
+++ b/util/human/io.lua	Thu Nov 30 13:42:44 2023 +0000
@@ -200,13 +200,26 @@
 
 local day = 86400;
 local multipliers = {
-	d = day, w = day * 7, m = 31 * day, mo = 31 * day, y = 365.2425 * day;
-	s = 1, mi = 60, h = 3600, ho = 3600
+	d = day, w = day * 7, mon = 31 * day, y = 365.2425 * day;
+	s = 1, min = 60, h = 3600, ho = 3600
 };
+
 local function parse_duration(duration_string)
+	local n, m = duration_string:lower():match("(%d+)%s*([smhdwy]?[io]?n?)");
+	if not n or not multipliers[m] then return nil; end
+	return tonumber(n) * ( multipliers[m] or 1 );
+end
+
+local multipliers_lax = setmetatable({
+	m = multipliers.mon;
+	mo = multipliers.mon;
+	mi = multipliers.min;
+}, { __index = multipliers });
+
+local function parse_duration_lax(duration_string)
 	local n, m = duration_string:lower():match("(%d+)%s*([smhdwy]?[io]?)");
 	if not n then return nil; end
-	return tonumber(n) * ( multipliers[m] or 1 );
+	return tonumber(n) * ( multipliers_lax[m] or 1 );
 end
 
 return {
@@ -223,4 +236,5 @@
 	ellipsis = ellipsis;
 	table = new_table;
 	parse_duration = parse_duration;
+	parse_duration_lax = parse_duration_lax;
 };