Module:Legislationuk/new

local export = {}

local data = mw.loadData("Module:Legislationuk/data")

-- TODO: Use Module:Roman.

local function roman(num)

end

-- Constructor for an Act object.

local function makeAct(text)

local Act = {_args={}}

local links = {}

-- Parse the pseudo-template used for each Act and extract the parameters.

text = text:gsub("^.-{{|", ""):gsub("}}$", "")

-- Wikilinks need to be temporarily substituted to prevent middle pipes from disrupting the parse.

local u, i = mw.ustring.char, 1

for link in text:gmatch("%[%[(.-)%]%]") do

links[i] = "" .. link .. ""

text = text:gsub("%[%[" .. link .. "%]%]", u(0xE000+i))

end

--Extract the arguments.

local args = mw.text.split(text, "|")

--Re-substitute any links.

local cp = mw.ustring.codepoint

for i, arg in ipairs(args) do

args[i] = mw.ustring.gsub(arg, "[" .. u(0xE000) .. "-" .. u(0xF000) .. "]", function(cap1) return links[cp(cap1)-0xE000] end)

end

-- Parse each argument to extract the key and value. Any numbered arguments preceded by a named argument in the wikitext will need to have their keys adjusted downwards.

for i, arg in ipairs(args) do

local name = arg:match("^(.-)=") or i

local val = arg:gsub("^" .. name .. "=", "") or arg

while type(name) == "number" and name > 1 and Act._args[name-1] == nil do

name = name - 1

end

Act._args[name] = val

end

function Act:getArgs()

return self._args

end

-- Give the (English) short title as a link (which may be given explicitly in the wikitext, so as to support piped links).

-- FIXME: This will break if a user tries to link only part of the title. Do we want to allow that?

function Act:shortTitle()

if self:getArgs()[1]:match("^%[%[.*%]%]$") then

return self:getArgs()[1]

else

return "" .. self:getArgs()[1] .. ""

end

function Act:cyShortTitle()

return self:getArgs().cyshort

end

function Act:longTitle()

return self:getArgs()[5]

end

function Act:cyLongTitle()

return self:getArgs().cylong

end

-- Gives the legislation type, which may be contextually adjusted based on an optional parameter (e.g. for URLs).

function Act:type(context)

if context == "govUK" then

local leg_type = {

["public"] = "ukpga",

["local"] = "ukla",

["nawm"] = "mwa",

["ania"] = "nia",

["church"] = "ukcm"

}

return leg_type[self:getArgs()[2]] or self:getArgs()[2]

else

return self:getArgs()[2]

end

-- TODO: Roman numeral for local Acts (and italic for private?), depending on context.

function Act:number()

return self:getArgs()[3]

end

function Act:date()

local day, month, year = self:getArgs()[4]:match("(%d%d)-(%d%d)-(%d%d%d%d)")

return os.time{day = day, month = month, year = year}

end

-- FIXME: (Foot)note parameters are currently numbered in correspondence with the parameter they refer to. There's probably a better way to handle these, as it isn't very flexible.

function Act:note(n)

return self:getArgs()["note" .. n]

end

--TODO: Allow a wider range of inputs (e.g. 1/0, y/n, yes/no etc.)

function Act:isRepealed()

return self:getArgs().repealed == "y" or false

end

function Act:isMaintained()

return self:getArgs().maintained == "y" or false

end

function Act:isArchived()

return self:getArgs().archived ~= "n" or false

end

function Act:govUKurl()

return "https://www.legislation.gov.uk/" .. self:type("govUK") .. "/" .. os.date("%Y", self:date()) .. "/" .. self:number() .. "/contents"

end

function Act:NAurl(context, leg_type)

if context == "welsh" then

return "https://archives.library.wales/index.php/" .. self:getArgs().url

else

leg_type = "public" and "PU" or "PB"

local session = ""

if self:date() < os.time {day=1, month=1, year=1963} then

for _, t in ipairs(data) do

if legDate >= t.sDate.date and legDate <= t.eDate.date then

session = t.archive

end

local num = self:type() == "local" and roman(self:number()) or self:number()

-- TODO: Finish.

end

function Act:linkedIcon(context, leg_type)

if context == "govUK" then

return "File:Legislation.gov.uk External.svg"

elseif context == "NA" then

local welsh = {

["nawm"] = true,

["anaw"] = true,

["asc"] = true

}

if welsh[leg_type] then

return "File:Library External.svg"

else

return "File:Parliamentary Archives External.svg"

end

-- TODO: Check for more of these.

function Act:sortkey()

return self:getArgs()[1]:gsub("%(No%.?.-(%d+)%) (.*)$", "%2 %1")

end

Act.__index = Act

return setmetatable({}, Act)

end

function export.main(frame)

local html = mw.html

local args = frame:getParent().args[1] and frame:getParent().args or frame.args

local Act

-- Iterate over the pseudo-templates to generate the HTML row for each Act.

for i, arg in ipairs(args) do

if arg:match("{{|") then

Act = makeAct(arg)

local enShortTitle = html.create("span")

:css("font-weight", "700")

:wikitext(Act:shortTitle())

local cyShortTitle = Act:cyShortTitle() and html.create("span")

:css("font-size", "0.975em")

:css("font-weight", "700")

:css("font-style", "italic")

:wikitext(Act:cyShortTitle())

local shortTitle = html.create("div")

:css("flex-grow", "9")

:node(enShortTitle)

:wikitext(Act:isRepealed() and " (repealed)" or "")

:node(cyShortTitle and html.create("br") or "")

:node(cyShortTitle and cyShortTitle or "")

local linksBoxesWidth = Act:isArchived() and Act:isMaintained() and "4.5em" or "2.25em"

local linksBoxes = html.create("div")

:css("float", "right")

:css("min-width", linksBoxesWidth)

:css("max-width", linksBoxesWidth)

:wikitext(Act:isMaintained() and Act:linkedIcon("govUK", Act:type()))

:node(Act:isArchived() and Act:isMaintained() and html.create("wbr") or "")

--:wikitext(Act:isArchived() and Act:linkedIcon("NA", Act:type()))

local titleBox = html.create("div")

:css("display", "flex")

:css("align-items", "center")

:css("width", "42em")

:css("max-width", "51vw")

:attr("class", "box")

:node(shortTitle)

-- ETC.

end

--return

end

return export