Modul:Queries: Unterschied zwischen den Versionen

2.823 Bytes hinzugefügt ,  Montag um 17:32
uniFilter() Sternchen
(Aufräumarbeiten, sep hinzugefügt mit defaultwert ";".)
(uniFilter() Sternchen)
 
(28 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {}
local p = {}
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
-- Gets the values from an attribute on a page to be called from Wikitext by #invoke
page = frame.args["page"] or ""
-- mw.log("GetValues(frame)")
attr = frame.args["attr"] or ""
-- mw.logObject(frame)
sep = frame.args["sep"] or ";"
local page = frame.args.page or ""
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 vallist = table.concat(values, sep)
-- mw.logObject(vallist)
return vallist
end
 
function p.getValues(page, attr, plain)
-- 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
if plain then
query = query .. "#-"
end
query = query  .. "|mainlabel=-|limit=1"
result = mw.smw.getQueryResult("[["..page.."]] |?"..attr)
local ask_result = mw.smw.ask(query)
local values = {}
-- If no results, return just nil
if not com.isEmpty(ask_result) then
if #result.results == 0 then
values = ask_result[1][attr] -- Erste Ergebnis-Zeile, attr-Spalte
return
if type(values) ~= "table" then -- Immer als table rückgeben, auch wenn keine (dann umformen)
values = { [1]=values }
end
end
-- mw.logObject(values)
return values
end
 
function p.getPages(query, plain)
-- mw.log("getPages(" .. query .. ", " .. tostring(plain) .. ")")
if plain then
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
--mw.logObject(result.results[1].printouts[attr])
-- mw.log(filter)
return filter
values = result.results[1].printouts[attr]
end
t = ""
 
for i = 1, #values do
function p.dateLastDayCompleter(date)
    t = t .. values[i]["fulltext"]
local last_date
    if i ~= #values then
if #date == 4 then -- nur "Jahr" vorhanden
      t = t .. sep .. " "
last_date = date .. "/12/31"
    end
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
end
return t
return last_date
end
end
return p
return p