Modul:SMW: Unterschied zwischen den Versionen

uniFilter() optimiert
(Teilung UniFilter/uniFilter)
(uniFilter() optimiert)
 
(16 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {}
local p = {}
local com = require("Module:Common")
 
local str = require("Module:String")
local com = require("Modul:Common")
local str = require("Modul:String")


function p.GetValues(frame)
function p.GetValues(frame)
Zeile 27: Zeile 28:
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 com.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 }
Zeile 46: Zeile 47:
query = query .. "|mainlabel=-"
query = query .. "|mainlabel=-"


local askResult = mw.smw.ask(query)
local ask_result = mw.smw.ask(query)
local values = {}
local values = {}
if not com.isEmpty(askResult) then
if not com.isEmpty(ask_result) then
for _, v  in pairs(askResult) do
for _, v  in pairs(ask_result) do
table.insert(values, v[1]) -- jede Zeile, 1. Spalte
table.insert(values, v[1]) -- jede Zeile, 1. Spalte
end
end
Zeile 69: Zeile 70:
-- mw.log("uniFilter(" .. suchtext .. ")")
-- mw.log("uniFilter(" .. suchtext .. ")")
local filter = ""
local filter = ""
suchtext = str.strip(suchtext)
if not com.isEmpty(suchtext) and type(suchtext) ~= "table" then
if suchtext == "" then
suchtext = tostring(suchtext) -- Suchtext bereinigen
filter = "+"
suchtext = string.gsub(suchtext, "%[", "") -- Link-Klammern rauslöschen
else
suchtext = string.gsub(suchtext, "%[", "")
suchtext = string.gsub(suchtext, "%]", "")
suchtext = string.gsub(suchtext, "%]", "")
filter = filter .. suchtext -- exakte Suche (immer)
suchtext = string.gsub(suchtext, "|", " ")
filter = filter .. "||~*" .. suchtext .. "*" -- Wildcard-Suche des ganzen Suchtextes (immer)
suchtext = str.strip(suchtext)
semikolonVorhanden = (string.find(suchtext, ";") ~= nil)
if suchtext == "*" or suchtext == "" then -- Filter irgendein Wert
    if semikolonVorhanden then
filter = "+"
suchtextSplit = str.split2(suchtext, ";") -- Einzelwort-Suche
else
if #suchtextSplit > 1 then
filter = uniFilterAddGrossKlein(suchtext) -- Suchtext in Gänze
for _, ft in ipairs(suchtextSplit) do
local suchtext = str.splitAndStrip(suchtext, ";") -- Suchbegriffsliste hinzufügen
ft = str.strip(ft)
if #suchtext > 1 then
if ft ~= "" then
for _, st in ipairs(suchtext) do
filter = filter .. "||~*" .. ft .. "*"
filter = filter .. "||" .. uniFilterAddGrossKlein(st)
end
end
end
end
end
    end
end
end
end
-- mw.log(filter)
-- mw.log(filter)
return filter
return filter
end
function uniFilterAddGrossKlein(suchtext)
local filter = ""
suchtext = -- zuerst klein geschrieben
string.lower(string.sub(suchtext, 1, 1)) .. string.sub(suchtext, 2)
filter = filter ..
"~*" .. suchtext .. "*" .. "||" .. suchtext
local suchtext_gross = -- dann groß geschrieben
string.upper(string.sub(suchtext, 1, 1)) .. string.sub(suchtext, 2)
if suchtext_gross ~= suchtext then
filter = filter ..
"||~*" .. suchtext_gross .. "*" .. "||" .. suchtext_gross
end
return filter
end
function p.subobjectIdCleaner(id)
local id_clean = ""
for i = 1, mw.ustring.len(id) do
local char = mw.ustring.sub(id, i, i)
if char == "." then
id_clean = id_clean .. "_"
else
id_clean = id_clean .. char
end
end
return id_clean
end
function p.addAttrToList(attrlist, attr, val)
-- Kommandozeile zum Debuggen:
-- attrlist={["t"]={"1","2"}}; p.addAttrToList(attrlist, "t", {"3", "4"}); mw.logObject(attrlist)
if val ~= nil then
if type(val) ~= "table" then
val = {val}
end
if attrlist[attr] == nil then
attrlist[attr] = val
else
for _, v in ipairs(val) do
table.insert(attrlist[attr], v)
end
end
end
end
end


return p
return p