20.564
Bearbeitungen
(+ val_show_only) |
(- smw.addAttrToList(fbdata.attr.list, "Seite", fbdata.fullpagename) verschoben nach Modul:Faktenbox/Common) |
||
| (33 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt) | |||
| Zeile 4: | Zeile 4: | ||
local str = require("Modul:String") | local str = require("Modul:String") | ||
local wik = require("Modul:Wiki") | local wik = require("Modul:Wiki") | ||
local geo = require("Modul:Geo") | local geo = require("Modul:Geo") | ||
local | local smw = require("Modul:SMW") | ||
local lfd = require("Modul:LinkFormDatum") | local lfd = require("Modul:LinkFormDatum") | ||
local wob = require("Modul:Wörterbuch") | |||
local | local fab_red_links = require("Modul:Faktenbox/Zeilen/RedLinks") | ||
function p.zeileKategorieSeite_(fbdata, kindex) | function p.zeileKategorieSeite_(fbdata, kindex) | ||
-- mw.log("zeileKategorieSeite_(fbdata, " .. (kindex or 1) .. ")") | -- mw.log("zeileKategorieSeite_(fbdata, " .. (kindex or 1) .. ")") | ||
-- mw.logObject(fbdata) | -- mw.logObject(fbdata, "fbdata") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeileKategorieSeite_({pagename="fpn",kategorie={"kat1","kat2"},klasse={"kla1","kla2"}}, 2) | -- =p.zeileKategorieSeite_({pagename="fpn",kategorie={"kat1","kat2"},kategorie_einzahl={"k1","k2"},klasse={"kla1","kla2"}}, 2) | ||
local t = "" | local t = "" | ||
t = t .. "<dt>[[:Kategorie:" . | local kategorie = wob.mehrzahl((fbdata.kategorie or fbdata.klasse)[kindex or 1]) | ||
local kategorie_einzahl = (fbdata.kategorie_einzahl or fbdata.klasse)[kindex or 1] | |||
t = t .. "<dt>[[:Kategorie:" .. kategorie .. "|" .. kategorie_einzahl .. "]]</dt>" | |||
if wik.pageExists("Kategorie:" .. fbdata.pagename) then | if wik.pageExists("Kategorie:" .. fbdata.pagename) then | ||
t = t .. "<dd>[[:Kategorie:" .. fbdata.pagename .. "|" .. fbdata.pagename .. "]] | t = t .. "<dd>[[:Kategorie:" .. fbdata.pagename .. "|" .. fbdata.pagename .. "]]</dd>" | ||
else | else | ||
t = t .. "<dd> | t = t .. "<dd>'''" .. fbdata.fullpagename .. "'''</dd>" | ||
end | end | ||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
| Zeile 58: | Zeile 31: | ||
function p.zeileStrasseHnr_(fbdata) | function p.zeileStrasseHnr_(fbdata) | ||
-- mw.log("zeileStrasseHnr_(fbdata)") | -- mw.log("zeileStrasseHnr_(fbdata)") | ||
-- mw.logObject(fbdata.strasse_hnr) | -- mw.logObject(fbdata.strasse_hnr, "fbdata.strasse_hnr") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeileStrasseHnr_{strasse_hnr={strasse={{name="Erlanger Straße",hausnummer={"11", "13"}},{name="XY Straße",hausnummer={}}},anzahlGebaeude=3}} | -- =p.zeileStrasseHnr_{strasse_hnr={strasse={{name="Erlanger Straße",hausnummer={"11", "13"}},{name="XY Straße",hausnummer={}}},anzahlGebaeude=3}} | ||
local t = "" | local t = "" | ||
for is, sh in ipairs(fbdata.strasse_hnr.strasse) do -- Straßen/Hausnummer-Kombis durchiterieren | for is, sh in ipairs(fbdata.strasse_hnr.strasse) do -- Straßen/Hausnummer-Kombis durchiterieren | ||
t = t .. "<dt>" | t = t .. "<dt>" | ||
if is > 1 then | if is > 1 then | ||
t = t .. is .. ". " -- Numerierungsanzeige "2., "3." usw. | if is == 2 and #sh.hausnummer == 0 then | ||
t = t .. "Ecke " -- Sonderfall Ecke | |||
else | |||
t = t .. is .. ". " -- Numerierungsanzeige "2., "3." usw. | |||
end | |||
else | else | ||
is = "" -- keine 1, aber 2, 3, ... für weitere Verwendung | is = "" -- keine 1, aber 2, 3, ... für weitere Verwendung | ||
end | end | ||
t = t .. " | t = t .. "Straße" | ||
if #sh.hausnummer > 0 then | if #sh.hausnummer > 0 then | ||
t = t .. " / " .. " | t = t .. " / " .. "Hausnummer" -- nur wenn Hausnummern vorhanden | ||
if #sh.hausnummer > 1 then | |||
t = t .. "n" -- Mehrzahl | |||
end | |||
end | end | ||
t = t .. "</dt><dd>[[ | t = t .. "</dt><dd>[[" .. sh.name .. "]]" | ||
for ih, h in ipairs(sh.hausnummer) do -- Hausnummern durchiterieren | smw.addAttrToList(fbdata.attr.list, "Straße" .. is, sh.name) | ||
for ih, h in ipairs(sh.hausnummer) do -- Hausnummern durchiterieren | |||
local strasse_hnr_ = sh.name .. " " .. h | local strasse_hnr_ = sh.name .. " " .. h | ||
if ih > 1 then | if ih > 1 then | ||
t = t .. "," -- Kommas davor ab 2. Hausnummer | t = t .. "," -- Kommas davor ab 2. Hausnummer | ||
end | end | ||
if wik.pageExists(strasse_hnr_) then -- Link, wenn Seite vorhanden | if wik.pageExists(strasse_hnr_) then -- Link, wenn Seite vorhanden | ||
t = t .. " [[" .. strasse_hnr_ .. "|" .. h .. "]]" | t = t .. " [[" .. strasse_hnr_ .. "|" .. h .. "]]" | ||
else | else | ||
t = t .. " " .. h | t = t .. " " .. h | ||
end | end | ||
smw.addAttrToList(fbdata.attr.list, "Hausnummer" .. is, h) | |||
smw.addAttrToList(fbdata.attr.list, "StraßeHnr", strasse_hnr_) | |||
end | end | ||
t = t .. "</dd>" | t = t .. "</dd>" | ||
end | end | ||
smw.addAttrToList(fbdata.attr.list, "AnzahlGebäude", fbdata.strasse_hnr.anzahlGebaeude) | |||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
| Zeile 95: | Zeile 77: | ||
function p.zeileAktenNr_(fbdata) | function p.zeileAktenNr_(fbdata) | ||
-- mw.log("zeileAktenNr_(fbdata)") | -- mw.log("zeileAktenNr_(fbdata)") | ||
-- mw.logObject(fbdata.pargs) | -- mw.logObject(fbdata.pargs, "fbdata.pargs") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeileAktenNr_{pargs={AktenNr="D-5-63-000-1464"}} | -- =p.zeileAktenNr_{pargs={AktenNr="D-5-63-000-1464"}} | ||
local t = "" | local t = "" | ||
local aktennr = str.splitAndStrip(fbdata.pargs["AktenNr"] | local aktennr = str.splitAndStrip(fbdata.pargs["AktenNr"], ";") | ||
if #aktennr > 0 then | if #aktennr > 0 then | ||
t = t .. "<dt>" .. " | t = t .. "<dt>" .. "Akten-Nr.</dt><dd>" | ||
for i, a in ipairs(aktennr) do | for i, a in ipairs(aktennr) do | ||
if i > 1 then | if i > 1 then | ||
t = t .. ",<br>" | t = t .. ",<br>" | ||
end | end | ||
local p = | local p = smw.getPages("[[:+]][[AktenNr::" .. a .. "]]", true) | ||
if #p > 1 then | if #p > 1 then | ||
t = t .. "{{#queryformlink:form=Abfrage Denkmalschutz|link text= | t = t .. "{{#queryformlink:form=Abfrage Denkmalschutz|link text=" .. a .. "|query string=Abfrage Denkmalschutz[AktenNr]=" .. a .. "&_run}}" | ||
else | else | ||
t = t | t = t .. a | ||
end | end | ||
smw.addAttrToList(fbdata.attr.list, "AktenNr", a) | |||
t = t .. " (" .. #p .. ")" -- Anzahl der Artikel mit dieser Akten-Nr. in Klammern | t = t .. " (" .. #p .. ")" -- Anzahl der Artikel mit dieser Akten-Nr. in Klammern | ||
end | end | ||
t = t .. "</dd>" | t = t .. "</dd>" | ||
end | end | ||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
function p.zeileGeoDaten_(fbdata) | function p.zeileGeoDaten_(fbdata) | ||
-- mw.log("zeileGeoDaten()") | -- mw.log("zeileGeoDaten(fbdata)") | ||
-- mw.logObject(fbdata | -- mw.logObject(fbdata, "fbdata") | ||
local t = "" | local t = "" | ||
if fbdata.geoobjects ~= nil then | |||
for i, o in ipairs(fbdata.geoobjects) do | |||
local geokoordinate = o["Geokoordinate"] | |||
if geokoordinate ~= nil then | |||
local double = false -- doppelte Koordinaten ausfiltern | |||
for d = 1, i - 1 do | |||
if fbdata.geoobjects[d]["Geokoordinate"] == geokoordinate then | |||
double = true | |||
break | |||
end | |||
end | |||
if not double then | |||
if t ~= "" then | |||
t = t .. ",<br>" | |||
end | |||
t = t .. geo.osmLink(fbdata.frame, geokoordinate) | |||
end | |||
end | |||
end | end | ||
if fbdata.geoobjects.geojson.exists then | |||
if t ~= "" then | |||
t = t .. ",<br>" | t = t .. ",<br>" | ||
end | end | ||
t = t .. | t = t .. "[[" .. fbdata.geoobjects.geojson.fullpagename .. "|GeoJson-Karte]]" | ||
end | end | ||
if | if t ~= "" then | ||
t = "<dt>Geo-Daten</dt><dd>" .. t .. "</dd>" | |||
end | end | ||
end | end | ||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
| Zeile 161: | Zeile 142: | ||
function p.zeileDatum_(args) | function p.zeileDatum_(args) | ||
-- mw.log("zeileDatum_(args)") | -- mw.log("zeileDatum_(args)") | ||
-- mw.logObject(args) | -- mw.logObject(args, "args") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeileDatum_{attr_date="Weihedatum",date="1959/11/15",attr_day="Weihetag",attr_year="Weihejahr"} | -- =p.zeileDatum_{attr_date="Weihedatum",date="1959/11/15",attr_day="Weihetag",attr_year="Weihejahr"} | ||
local t = "" | local t = "" | ||
if args.date ~= nil then | |||
t = t .. "<dt>" .. (args.attr_text or args.attr_date) .. "</dt><dd>" | |||
t = t .. "<dt> | if com.isTrue(args.val_show_only) then | ||
t = t .. lfd.linkFormDate(date, args.attr_date, args.attr_day, args.attr_year) | t = t .. lfd.linkFormDate(args.date) | ||
else | |||
t = t .. lfd.linkFormDate(args.date, args.attr_date, args.attr_day, args.attr_year) | |||
end | |||
t = t .. "</dd>" | t = t .. "</dd>" | ||
end | end | ||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
| Zeile 177: | Zeile 161: | ||
function p.zeileSemantikBrowsenAbfrage_(fbdata) | function p.zeileSemantikBrowsenAbfrage_(fbdata) | ||
-- mw.log("zeileSemantikBrowsenAbfrage_(fbdata)") | -- mw.log("zeileSemantikBrowsenAbfrage_(fbdata)") | ||
-- mw.logObject(fbdata) | -- mw.logObject(fbdata, "fbdata") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeileSemantikBrowsenAbfrage_{fullpagename="Rathaus"} | -- =p.zeileSemantikBrowsenAbfrage_{fullpagename="Rathaus"} | ||
local t = "" | local t = "" | ||
t = t .. " | t = t .. " " | ||
t = t .. " | t = t .. "[[Bild:IconSearch.svg|16px|semantisches Browsen|link=[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "]]]]" | ||
t = t .. " | t = t .. " " | ||
t = t .. "[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "|Sem. Browsen]]" | |||
if fbdata.kategorie ~= nil and wik.pageExists("Formular:Abfrage " .. fbdata.kategorie[1]) then | if fbdata.kategorie ~= nil and wik.pageExists("Formular:Abfrage " .. fbdata.kategorie[1]) then | ||
t = t .. " / {{#queryformlink:form=Abfrage " .. fbdata.kategorie[1] .. "|link text=Abfrage}}" | t = t .. " / {{#queryformlink:form=Abfrage " .. fbdata.kategorie[1] .. "|link text=Abfrage}}" | ||
end | end | ||
-- mw.logObject(t, "t") | |||
-- mw. | |||
return t | return t | ||
end | end | ||
| Zeile 194: | Zeile 178: | ||
function p.zeile_(args) | function p.zeile_(args) | ||
-- mw.log("zeile(args)") | -- mw.log("zeile(args)") | ||
-- mw.logObject(args) | -- mw.logObject(args, "args") | ||
-- Konsolenzeile zum Debuggen: | -- Konsolenzeile zum Debuggen: | ||
-- =p.zeile_{attr_name="Vorgänger",attr_text="t",fbdata={pargs={["Vorgänger"]="; v11 , V12 ; v13 (a(b))"}},attr_val="; v1 ; v2, v3 (a(b))",val_prefix="pre",val_postfix="post",exclude_bracket_values=true,delimiter=","} | -- =p.zeile_{attr_name="Vorgänger",attr_text="t",fbdata={pargs={["Vorgänger"]="; v11 , V12 ; v13 (a(b))"}},attr_val="; v1 ; v2, v3 (a(b))",val_prefix="pre",val_postfix="post",exclude_bracket_values=true,delimiter=","} | ||
| Zeile 201: | Zeile 185: | ||
local attr_name = args.attr_name | local attr_name = args.attr_name | ||
local attr_val | local attr_val | ||
if fbdata ~= nil then | if args.fbdata ~= nil then | ||
attr_val = args.attr_val or args.fbdata.pargs[attr_name] or {} | attr_val = args.attr_val or args.fbdata.pargs[attr_name] or {} | ||
else | else | ||
| Zeile 218: | Zeile 202: | ||
if #attr_val > 0 then | if #attr_val > 0 then | ||
-- Attribut-Text ermitteln und in Zeile übernehmen | -- Attribut-Text ermitteln und in Zeile übernehmen | ||
local attr_text = args.attr_text or | local attr_text = args.attr_text or wob.attrText(attr_name, args.fbdata.klasse[1]) | ||
if #attr_val > 1 then | if #attr_val > 1 then | ||
attr_text = | attr_text = wob.mehrzahl(attr_text) -- Mehrzahl | ||
end | end | ||
t = t .. "<dt> | t = t .. "<dt>" .. attr_text .. "</dt>" | ||
-- Attribut-Werte in Zeile übernehmen | -- Attribut-Werte in Zeile übernehmen | ||
t = t .. "<dd>" | t = t .. "<dd>" | ||
| Zeile 232: | Zeile 216: | ||
t = t .. ", " -- Listen-Kommata | t = t .. ", " -- Listen-Kommata | ||
end | end | ||
if mw.smw.getPropertyType(attr_name) == "_wpg" then -- Seiten-Attribute Spezialbehandlung | if not wik.pageExists("Attribut:" .. attr_name) then -- Spezialbehandlung Attribut nicht vorhanden | ||
t = t .. p.setPageAttr(attr_name, val) | t = t .. p.setStandardAttr(args.fbdata.attr.list, attr_name, val, args.exclude_bracket_values, args.val_show_only) | ||
elseif mw.smw.getPropertyType(attr_name) == "_wpg" then -- Seiten-Attribute Spezialbehandlung | |||
t = t .. p.setPageAttr(args.fbdata.attr.list, attr_name, val, args.val_show_only) | |||
elseif mw.smw.getPropertyType(attr_name) == "_tel" then -- Telefon-Attribute Spezialbehandlung | |||
t = t .. p.setTelAttr(args.fbdata.attr.list, attr_name, val, args.val_show_only) | |||
else -- Standard-Attribute | |||
t = t .. p.setStandardAttr(args.fbdata.attr.list, attr_name, val, args.exclude_bracket_values, args.val_show_only) | |||
end | end | ||
end | end | ||
| Zeile 257: | Zeile 231: | ||
t = t .. "</dd>" | t = t .. "</dd>" | ||
end | end | ||
-- mw. | -- mw.logObject(t, "t") | ||
return t | return t | ||
end | end | ||
function p.setPageAttr(name, val) | function p.setPageAttr(attrlist, name, val, val_show_only) | ||
local t = "" | local t = "" | ||
if string.find(val, "[#=<>%[%]%|%{%}]") ~= nil then | if string.find(val, "[#=<>%[%]%|%{%}]") ~= nil then -- problematische Wikitext/HTML-Inhalte vorhanden? | ||
t = | t = t .. val -- ==> kein Link, sondern nur Attribut versteckt setzen | ||
elseif wik.pageExists(val) then | elseif wik.pageExists(val) then -- eine vorhandene Seite regulär verlinken bzw. setzen | ||
t = "[[ | t = t .. "[[" .. val .. "]]" | ||
else | else | ||
val_pre_bracket, val_without_bracket, val_post_bracket = str.bracketSplitAndStrip(val) -- nach Klammern suchen und aufteilen | local val_pre_bracket, val_without_bracket, val_post_bracket = str.bracketSplitAndStrip(val) -- nach Klammern suchen und aufteilen | ||
if | if wik.pageExists(val_without_bracket) then -- Seite ohne Klammern vorhanden? | ||
if val_pre_bracket ~= "" then -- Klammer-Text vor eigentlicher Seite | |||
if val_pre_bracket ~= "" then | |||
t = t .. val_pre_bracket .. " " | t = t .. val_pre_bracket .. " " | ||
end | end | ||
t = t .. "[[ | t = t .. "[[" .. val_without_bracket .. "]]" -- das eigentliche Attribut verlinken | ||
if val_post_bracket ~= "" then | if val_post_bracket ~= "" then -- Klammer-Text nach eigentlicher Seite | ||
t = t .. " " .. val_post_bracket | t = t .. " " .. val_post_bracket | ||
end | end | ||
val = val_without_bracket | |||
-- auch ohne Klammern existiert keine Seite => dann roten Link anzeigen? | |||
elseif fab_red_links.red_links[name] ~= false then -- auch nil als default als roten Link | |||
t = t .. "[[" .. val .. "]]" | |||
else | |||
t = t .. val | |||
end | end | ||
end | end | ||
if not val_show_only then | |||
smw.addAttrToList(attrlist, name, val) | |||
end | |||
-- mw.logObject(t, "t") | |||
return t | return t | ||
end | |||
function p.setTelAttr(attrlist, name, val, val_show_only) | |||
local t = "" | |||
local val_pre_bracket, tel, val_post_bracket = str.bracketSplitAndStrip(val) -- nach Klammern suchen und aufteilen | |||
local tel = val_pre_bracket .. " " .. tel -- Klammer am Anfang wieder anfügen | |||
tel = p.getTelUri(tel) | |||
if string.sub(tel, 1, 1) == "+" then | |||
t = t .. "[tel:" .. tel .. " " .. val .. "]" | |||
else | |||
t = t .. val | |||
end | |||
if not val_show_only then | |||
smw.addAttrToList(attrlist, name, val) | |||
end | |||
-- mw.logObject(t, "t") | |||
return t | |||
end | |||
function p.setStandardAttr(attrlist, name, val, exclude_bracket_values, val_show_only) | |||
local t = "" | |||
local val_pre_bracket, val_post_bracket = "", "" | |||
if com.isTrue(exclude_bracket_values) then -- Klammer-Text separieren (kein Attribut-Wert) | |||
val_pre_bracket, val, val_post_bracket = str.bracketSplitAndStrip(val) -- nach Klammern suchen und aufteilen | |||
end | |||
if val_pre_bracket ~= "" then | |||
t = t .. val_pre_bracket .. " " | |||
end | |||
t = t .. val | |||
if val_post_bracket ~= "" then | |||
t = t .. " " .. val_post_bracket | |||
end | |||
if not val_show_only then | |||
smw.addAttrToList(attrlist, name, val) | |||
end | |||
-- mw.logObject(t, "t") | |||
return t | |||
end | |||
function p.getTelUri(val) | |||
-- Alles außer Zahlen und + am Anfang ausfiltern | |||
local tel = "" | |||
local pre_plus = false | |||
for i = 1, mw.ustring.len(val) do | |||
local char = mw.ustring.sub(val, i, i) | |||
if (char == "+" and not pre_plus) or tonumber(char) ~= nil then -- + am Anfang erlaubt | |||
tel = tel .. char | |||
pre_plus = true | |||
end | |||
end | |||
-- Sonderbehandlungen | |||
if mw.ustring.sub(tel, 1, 2) == "00" then -- 00 ... | |||
tel = "+" .. mw.ustring.sub(tel, 3) | |||
end | |||
if mw.ustring.sub(tel, 1, 1) == "0" and -- beginnt mit 0zzz (z = Zahl 1-9) | |||
(tonumber(mw.ustring.sub(tel, 2, 2)) or 0) > 0 then -- dann wird +49 angenommen | |||
tel = "+49" .. mw.ustring.sub(tel, 2) | |||
elseif mw.ustring.sub(tel, 1, 4) == "+490" then -- +49(0) ... | |||
tel = "+49" .. mw.ustring.sub(tel, 5) | |||
end | |||
return tel | |||
end | end | ||
return p | return p | ||