Modul:Queries: Unterschied zwischen den Versionen

1.966 Bytes hinzugefügt ,  Montag um 17:32
uniFilter() Sternchen
(debug raus)
(uniFilter() Sternchen)
 
(22 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {}
local p = {}
local c = require("Module:Common")
local com = require("Modul:Common")
local str = require("Modul:String")


function p.GetValues(frame)
function p.GetValues(frame)
-- Gets the values from an attribute on a page to be called from Wikitext by #invoke
-- Gets the values from an attribute on a page to be called from Wikitext by #invoke
local page = frame.args["page"] or ""
-- mw.log("GetValues(frame)")
local attr = frame.args["attr"] or ""
-- mw.logObject(frame)
local sep = frame.args["sep"] or ";"
local page = frame.args.page or ""
local plain = frame.args["plain"] or false
local attr = frame.args.attr or ""
local sep = frame.args.sep or ";"
local plain = frame.args.plain or false


local values = p.getValues(page, attr, plain)
local values = p.getValues(page, attr, plain)
local vallist = table.concat(values, sep)
local t = ""
-- mw.logObject(vallist)
if values ~= nil then
return vallist
for i = 1, #values do
    t = t .. values[i]
  if i ~= #values then
  t = t .. sep
    end
end
end
 
mw.log("GetValues(frame)=" .. t)
mw.log("frame=")
mw.logObject(frame)
 
return t
end
end


function p.getValues(page, attr, plain)
function p.getValues(page, attr, plain)
-- Gets the values from an attribute on a page to be called inside lua
-- Gets the values from an attribute on a page to be called inside lua
-- mw.log("getValues(" .. page .. ", " ..  attr .. ", " ..  tostring(plain) .. ")")
local query = "[[:" .. page .."]]|?" .. attr -- selektiert nur die Seite selbst
local query = "[[:" .. page .."]]|?" .. attr -- selektiert nur die Seite selbst
if plain then
if plain then
Zeile 36: Zeile 27:
query = query  .. "|mainlabel=-|limit=1"
query = query  .. "|mainlabel=-|limit=1"
local askResult = mw.smw.ask(query)
local ask_result = mw.smw.ask(query)
local values = {}
local values = nil
if not com.isEmpty(ask_result) then
if askResult ~= nil then
values = ask_result[1][attr] -- Erste Ergebnis-Zeile, attr-Spalte
values = askResult[1][attr] -- Erste Ergebnis-Zeile, attr-Spalte
if type(values) ~= "table" then -- Immer als table rückgeben, auch wenn keine (dann umformen)
values = { [1]=values }
end
end
end
-- mw.logObject(values)
return values
end


if type(values) ~= "table" then -- Immer als table rückgeben, auch wenn keine (dann umformen)
function p.getPages(query, plain)
  values = { [1]=values }
-- mw.log("getPages(" .. query .. ", " ..  tostring(plain) .. ")")
if plain then
query = query .. "|?#-"
end
end
query = query .. "|mainlabel=-"


-- mw.log("getValues(" .. page .. "," .. attr .. ")=")
local ask_result = mw.smw.ask(query)
local values = {}
if not com.isEmpty(ask_result) then
for _, v in pairs(ask_result) do
table.insert(values, v[1]) -- jede Zeile, 1. Spalte
end
end
-- mw.logObject(values)
-- mw.logObject(values)
-- mw.log("askResult=")
return values
-- mw.logObject(askResult)
end
-- mw.log("values=")
 
-- mw.logObject(values)
function p.UniFilter(frame)
-- mw.log("type(values[1])=" .. type(values[1]))
-- mw.log("UniFilter(frame)")
-- mw.logObject(frame)
local suchtext = frame.args[1] or ""
local filter = p.uniFilter(suchtext)
-- mw.log(filter)
return filter
end
 
function p.uniFilter(suchtext)
-- mw.log("uniFilter(" .. suchtext .. ")")
local filter = ""
suchtext = str.strip(tostring(suchtext or ""))
if suchtext == "" or suchtext == "*" then
filter = "+"
else
suchtext = string.gsub(suchtext, "%[", "")
suchtext = string.gsub(suchtext, "%]", "")
filter = filter .. suchtext -- exakte Suche (immer)
filter = filter .. "||~*" .. suchtext .. "*" -- Wildcard-Suche des ganzen Suchtextes (immer)
semikolonVorhanden = (string.find(suchtext, ";") ~= nil)
    if semikolonVorhanden then
suchtextSplit = str.split2(suchtext, ";") -- Einzelwort-Suche
if #suchtextSplit > 1 then
for _, ft in ipairs(suchtextSplit) do
ft = str.strip(ft)
if ft ~= "" then
filter = filter .. "||~*" .. ft .. "*" .. "||" .. ft
end
end
end
    end
end
-- mw.log(filter)
return filter
end


return values
function p.dateLastDayCompleter(date)
local last_date
if #date == 4 then -- nur "Jahr" vorhanden
last_date = date .. "/12/31"
elseif #date ~= 10 then -- "Monat Jahr" vorhanden
local days = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}
local month = string.sub(date, 1, string.find(date, " ") - 1)
month = com.getMonthnr(month)
local year = string.sub(date, string.find(date, " ") + 1)
last_date = year .. "/" .. month .. "/"
if month == 2 and year % 4 == 0 then -- Sonderfall Feb. Schaltjahr
last_date = last_date .. "29"
else
last_date = last_date .. days[month]
end
else
last_date = date
end
return last_date
end
end


return p
return p