Modul:LinkFormDatum: Unterschied zwischen den Versionen

Aus FürthWiki

linkFormDate() zusätzlich ISO-P case YYYY-MM-DD
Keine Bearbeitungszusammenfassung
(linkFormDate() zusätzlich ISO-P case YYYY-MM-DD)
 
(24 dazwischenliegende Versionen von 3 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {}
local p = {}
local c = require( "Module:Common" )
local c = require( "Module:Common" )
local str = require("Modul:String")


function p.LinkFormDate( frame )
function p.LinkFormDate(frame)
pf = frame:getParent()
-- #invoke wrapper
args = pf.args
local args = frame.args
    return p.linkFormDate(args[1], args[2], args[3], args[4])
months=getMonthList()
end
 
date = args[1]
function p.linkFormDate(date, attr_date, attr_day, attr_year)
attr_date = args[2]
    local months = c.getMonthList()
attr_day = args[3]
    local date_array
attr_year = args[4]
    local mda
    local mn -- monthname
 
if string.find(date, "/") ~= nil then -- regular case YYYY/MM/DD
    date_array = str.split(date, "/")
    else -- ISO-P case YYYY-MM-DD
    date_array = str.split(date, "-")
    end
      
      
     date_array=split(date, "/")
     -- wenn keine Attribute übergeben, werden keine gesetzt, sondern nur Links eingebaut
     mw.smw.set({[attr_date] = date})
    if attr_day ~= nil then
     if isEmpty(date_array[1]) then
    attr_day = attr_day .. "::"
    else
    attr_day = ""
    end
    if attr_year ~= nil then
    attr_year = attr_year .. "::"
    else
    attr_year = ""
     end
    if attr_date ~= nil then
    mw.smw.set({[attr_date] = date})
    end
     if c.isEmpty(date_array[2]) then
     -- When datestring contained no "/"
     -- When datestring contained no "/"
     if isInteger(date_array[0]) then
     if c.isInteger(date_array[1]) then
     -- When dateformat is just YYYY
     -- When dateformat is just YYYY
     return "[[" .. attr_year .. "::" .. date_array[0] .. "]]"
     return "[[" .. attr_year .. date_array[1] .. "]]"
     else
     else
     -- Dateformat is <monthname> YYYY
     -- Dateformat is <monthname> YYYY
     mda = split(date_array[0])
     mda = str.split(date_array[1])
     return mda[0] .. " [[" .. attr_year .. "::" .. mda[1] .. "]]"
     return mda[1] .. " [[" .. attr_year .. mda[2] .. "]]"
     end
     end
     elseif isEmpty(date_array[2]) then
     elseif c.isEmpty(date_array[3]) then
     -- Datestring contained one "/"
     -- Datestring contained one "/"
     mn = months[tonumber(date_array[1])]
     mn = months[tonumber(date_array[2])]
     return mn .. " [[" .. attr_year .. "::" .. date_array[0] .. "]]"
     return mn .. " [[" .. attr_year .. date_array[1] .. "]]"
     else
     else
     -- Dateformat should be YYYY/MM/DD
     -- Dateformat should be YYYY/MM/DD or YYYY-MM-DD
     mn = months[tonumber(date_array[1])]
     mn = months[tonumber(date_array[2])]
     date_array[2] = date_array[2]:gsub('0*', '', 1)
     date_array[3] = date_array[3]:gsub('0*', '', 1)
     return "[[" .. attr_day .. "::" .. date_array[2] .. ". " .. mn .. "]]" ..  
     return "[[" .. attr_day .. date_array[3] .. ". " .. mn .. "]]" ..  
     " [[" .. attr_year .. "::" .. date_array[0] .. "]]"
     " [[" .. attr_year .. date_array[1] .. "]]"
     end
     end
end
end


function p.FormatDate( frame )
function p.FormatDate(frame)
pf = frame:getParent()
-- #invoke wrapper
args = pf.args
return p.formatDate(frame.args[1])
end
 
function p.formatDate(date)
local date_array = str.split(date, " ")
local day
date = args[1]
if c.isEmpty(date_array[2]) then
date_array=split(date, " ")
if isEmpty(date_array[1]) then
     -- When datestring contained no " ", thus is year
     -- When datestring contained no " ", thus is year
     return "[[" .. date_array[0] .. "]]"
     return "[[" .. date_array[1] .. "]]"
elseif isEmpty(date_array[2]) then
elseif c.isEmpty(date_array[3]) then
-- When datestring contains monthname and year
-- When datestring contains monthname and year
return date_array[0] .. " [[" .. date_array[1] .. "]]"
return date_array[1] .. " [[" .. date_array[2] .. "]]"
else
else
-- When datestring contains day, monthname and year
-- When datestring contains day, monthname and year
return "[[" .. date_array[0] .. ". " .. date_array[1] .. "]] " ..  
day = string.gsub(date_array[1], "%.", "")
"[[" .. date_array[2] .. "]]"
return "[[" .. day .. ". " .. date_array[2] .. "]] " ..  
"[[" .. date_array[3] .. "]]"
end
end
 
function p.HumanToFormDate(frame)
-- #invoke wrapper
return p.humanToFormDate(frame.args[1])
end
 
function p.humanToFormDate(date)
mw.log("p.humanToFormDate(date)")
mw.logObject(date)
-- Converts a human date (3. Februar 1955) to 1955/02/03, like SMW needs
local date_array=str.split(date, " ")
local day
local mnr -- monthnr
if c.isEmpty(date_array[2]) then
-- When datestring contained no " ", thus is year
return date_array[1]
elseif c.isEmpty(date_array[3]) then
-- When datestring contains monthname and year
return date_array[1].." "..date_array[2]
else
day = string.gsub(date_array[1], "%.", "")
day = string.format("%02d", day)
mnr = c.getMonthnr(date_array[2])
mnr = string.format("%02d", mnr)
return date_array[3] .. "/" .. mnr .. "/" .. day
end
end
end
end


return p
return p