Module:Path - Revision history

Grufo: Add support for “/” at the beginning of the input

2024-09-08T01:21:34Z

Add support for “/” at the beginning of the input

← Previous revision		Revision as of 01:21, 8 September 2024
Line 88:		Line 88:
	if page == nil then return mw.title.getCurrentTitle().prefixedText end		if page == nil then return mw.title.getCurrentTitle().prefixedText end
	local retval, _ = table.concat(get_abs_path(		local retval, _ = table.concat(get_abs_path(
	mw.title.getCurrentTitle().prefixedText, ~~page), '/')~~		mw.title.getCurrentTitle().prefixedText,
			page:gsub('^%s/%s', './', 1)
			), '/')
	return retval		return retval
	end		end
Line 98:		Line 100:
	if page == nil then return '.' end		if page == nil then return '.' end
	return get_rel_path(mw.title.getCurrentTitle().prefixedText,		return get_rel_path(mw.title.getCurrentTitle().prefixedText,
	page, true)		page:gsub('^%s/%s', './', 1), true)
	end		end

Line 107:		Line 109:
	if page == nil then return '' end		if page == nil then return '' end
	return get_rel_path(mw.title.getCurrentTitle().prefixedText,		return get_rel_path(mw.title.getCurrentTitle().prefixedText,
	page, false)		page:gsub('^%s/%s', './', 1), false)
	end		end

Grufo: No changes

2024-09-05T18:02:36Z

No changes

← Previous revision		Revision as of 18:02, 5 September 2024
Line 1:		Line 1:
	function split_path(path)		function split_path (path)
	local parts = {}		local parts = {}
	local len = 0		local len = 0
Line 10:		Line 10:


	function get_abs_path(current, page)		function get_abs_path (current, page)
	local tbl_i, len_i = split_path(page)		local tbl_i, len_i = split_path(page)
	local tbl_o		local tbl_o
Line 46:		Line 46:


	function get_rel_path(current, page, add_prefixes)		function get_rel_path (current, page, add_prefixes)
	local tbl_i, len_i = get_abs_path(current, page)		local tbl_i, len_i = get_abs_path(current, page)
	local tbl_c, len_c = split_path(current)		local tbl_c, len_c = split_path(current)
Line 83:		Line 83:


	iface.abs = function(frame)		iface.abs = function (frame)
	local page = frame.args[1]		local page = frame.args[1]
	if page ~= nil then page = page:match'^%s(.%S)' end		if page ~= nil then page = page:match'^%s(.%S)' end
Line 93:		Line 93:


	iface.rel = function(frame)		iface.rel = function (frame)
	local page = frame.args[1]		local page = frame.args[1]
	if page ~= nil then page = page:match'^%s(.%S)' end		if page ~= nil then page = page:match'^%s(.%S)' end
Line 102:		Line 102:


	iface.sub = function(frame)		iface.sub = function (frame)
	local page = frame.args[1]		local page = frame.args[1]
	if page ~= nil then page = page:match'^%s(.%S)' end		if page ~= nil then page = page:match'^%s(.%S)' end

Grufo: Normalize parent page

2024-09-05T16:23:39Z

Normalize parent page

← Previous revision		Revision as of 16:23, 5 September 2024
Line 17:		Line 17:
	tbl_o, len_o = split_path(current)		tbl_o, len_o = split_path(current)
	else		else
			tbl_i[1] = tbl_i[1]:gsub('^([^:]?)([^:]*)(:?)(.?)',
			function (s1, s2, s3, s4)
			if s3 == '' then return s1:upper() .. s2 end
			return s1:upper() .. s2 .. s3 .. s4:upper()
			end,
			1
			)
	tbl_o = {}		tbl_o = {}
	len_o = 0		len_o = 0
Line 22:		Line 29:
	for key, val in ipairs(tbl_i) do		for key, val in ipairs(tbl_i) do
	if val == '..' then		if val == '..' then
	if len_o < 1 then error('Module:Path: invalid path', 0) end		if len_o < 1 then
			error('Module:Path: invalid path', 0) end
	tbl_o[len_o] = nil		tbl_o[len_o] = nil
	len_o = len_o - 1		len_o = len_o - 1

Grufo: First draft

2024-09-05T08:16:53Z

First draft

New page

function split_path(path)
local parts = {}
local len = 0
for token in path:gmatch("[^/]+") do
len = len + 1
parts[len] = token
end
return parts, len
end

function get_abs_path(current, page)
local tbl_i, len_i = split_path(page)
local tbl_o
local len_o
if tbl_i[1] == '.' or tbl_i[1] == '..' then
tbl_o, len_o = split_path(current)
else
tbl_o = {}
len_o = 0
end
for key, val in ipairs(tbl_i) do
if val == '..' then
if len_o < 1 then error('Module:Path: invalid path', 0) end
tbl_o[len_o] = nil
len_o = len_o - 1
elseif val ~= '.' then
len_o = len_o + 1
tbl_o[len_o] = val
end
end
if len_o < 1 then
tbl_o[1] = ''
len_o = 1
end
return tbl_o, len_o
end

function get_rel_path(current, page, add_prefixes)
local tbl_i, len_i = get_abs_path(current, page)
local tbl_c, len_c = split_path(current)
local tbl_o = {}
local len_o = 0
local minlen
local new_at = 0
if len_c < len_i then minlen = len_c else minlen = len_i end
for idx = 1, minlen do
if tbl_c[idx] ~= tbl_i[idx] then
new_at = idx
break
end
end
if new_at == 1 then return table.concat(tbl_i, '/') end
if add_prefixes then
if new_at == 0 then
tbl_o[1] = '.'
new_at = minlen + 1
end
for idx = new_at, len_c do
len_o = len_o + 1
tbl_o[len_o] = '..'
end
if len_o < 1 then len_o = 1 end
elseif new_at == 0 then new_at = minlen + 1 end
for idx = new_at, len_i do
len_o = len_o + 1
tbl_o[len_o] = tbl_i[idx]
end
return table.concat(tbl_o, '/')
end

local iface = {}

iface.abs = function(frame)
local page = frame.args[1]
if page ~= nil then page = page:match'^%s*(.*%S)' end
if page == nil then return mw.title.getCurrentTitle().prefixedText end
local retval, _ = table.concat(get_abs_path(
mw.title.getCurrentTitle().prefixedText, page), '/')
return retval
end

iface.rel = function(frame)
local page = frame.args[1]
if page ~= nil then page = page:match'^%s*(.*%S)' end
if page == nil then return '.' end
return get_rel_path(mw.title.getCurrentTitle().prefixedText,
page, true)
end

iface.sub = function(frame)
local page = frame.args[1]
if page ~= nil then page = page:match'^%s*(.*%S)' end
if page == nil then return '' end
return get_rel_path(mw.title.getCurrentTitle().prefixedText,
page, false)
end

return iface