Modul:Queries: Unterschied zwischen den Versionen

1.529 Bytes hinzugefügt ,  Montag um 17:32
uniFilter() Sternchen
Keine Bearbeitungszusammenfassung
(uniFilter() Sternchen)
 
(15 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 s = require("Module:String")
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
-- mw.log("GetValues(frame)")
-- mw.logObject(frame)
local page = frame.args.page or ""
local page = frame.args.page or ""
local attr = frame.args.attr or ""
local attr = frame.args.attr or ""
Zeile 11: Zeile 13:


local values = p.getValues(page, attr, plain)
local values = p.getValues(page, attr, plain)
local vallist = s.list(values, sep)
local vallist = table.concat(values, sep)
-- mw.log("GetValues(frame)=" .. vallist)
-- mw.logObject(vallist)
-- mw.log("frame=")
-- mw.logObject(frame)
return vallist
return vallist
end
end
Zeile 20: Zeile 20:
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 26: 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 = {}
if not c.isEmpty(askResult) then
if not com.isEmpty(ask_result) then
values = askResult[1][attr] -- Erste Ergebnis-Zeile, attr-Spalte
values = ask_result[1][attr] -- Erste Ergebnis-Zeile, attr-Spalte
if type(values) ~= "table" then -- Immer als table rückgeben, auch wenn keine (dann umformen)
if type(values) ~= "table" then -- Immer als table rückgeben, auch wenn keine (dann umformen)
values = { [1]=values }
values = { [1]=values }
end
end
end
end
-- mw.log("getValues(" .. page .. "," ..  attr .. ")=")
-- mw.logObject(values)
-- mw.log("query=" .. query)
-- mw.log("askResult=")
-- mw.logObject(askResult)
-- mw.log("values=")
-- mw.logObject(values)
-- mw.logObject(values)
-- mw.log("type(values[1])=" .. type(values[1]))
return values
return values
end
end


function p.getPages(query, plain)
function p.getPages(query, plain)
local queryl = query
-- mw.log("getPages(" .. query .. ", " ..  tostring(plain) .. ")")
if plain then
if plain then
queryl = queryl .. "|?#-"
query = query .. "|?#-"
end
query = query .. "|mainlabel=-"
 
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)
return values
end
 
function p.UniFilter(frame)
-- 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
end
queryl = queryl .. "|mainlabel=-"
-- mw.log(filter)
return filter
end


local askResult = mw.smw.ask(queryl)
function p.dateLastDayCompleter(date)
local table = {}
local last_date
if not c.isEmpty(askResult) then
if #date == 4 then -- nur "Jahr" vorhanden
for i = 1, #askResult do
last_date = date .. "/12/31"
table[i] = askResult[i][1] -- i-te Zeile, 1. Spalte
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
end
else
last_date = date
end
end
-- mw.log("getPages()=")
return last_date
-- mw.logObject(table)
-- mw.log("queryl=")
-- mw.logObject(queryl)
-- mw.log("askResult=")
-- mw.logObject(askResult)
return table
end
end


return p
return p