FürthWiki

Modul:Faktenbox: Unterschied zwischen den Versionen

Modul Diskussion

Modul:Faktenbox (Quelltext anzeigen)

Version vom 8. Dezember 2025, 23:25 Uhr

8.633 Bytes entfernt ,  Gestern um 23:25
fix fab_tabs_karte
(Auslagerungen in Modul:Faktenbox/Zeilen)
(fix fab_tabs_karte)
 
(11 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 1: Zeile 1:
p = {}
local p = {}


local com = require("Modul:Common")
local com = require("Modul:Common")
local dev = require("Modul:Development")
local str = require("Modul:String")
local wik = require("Modul:Wiki")
local mez = require("Modul:Mehrzahl")
local geo = require("Modul:Geo")
local geo = require("Modul:Geo")
local que = require("Modul:Queries")
local lfd = require("Modul:LinkFormDatum")


local fab_common = require("Modul:Faktenbox/Common")
local fab_zeilen = require("Modul:Faktenbox/Zeilen")
local fab_zeilen = require("Modul:Faktenbox/Zeilen")
local fab_tabs = require("Modul:Faktenbox/Tabs")
local fab_tabs_karte = require("Modul:Faktenbox/Tabs/Karte")
local fab_tabs_adressen = require("Modul:Faktenbox/Tabs/Adressen")


function p.Faktenbox(frame)
function p.Faktenbox(frame)
Zeile 20: Zeile 18:
-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
-- Kein(e) Klasse/Kategorie/Formular!
-- Kein(e) Klasse/Kategorie/Formular!
local fbdata = p.fbdata(frame)
local fbdata = fab_common.fbdata_(frame)


-- Tabs einsammeln und zusammenfügen
-- Tabs einsammeln und zusammenfügen
local box =  
local box =  
"<div class = factbox><tabs>" ..
"<div class = factbox><tabs>" ..
p.bildTab(fbdata) ..
fab_tabs.bildTab_(fbdata) ..
p.kartenTab(fbdata) ..
fab_tabs_karte.kartenTab_(fbdata) ..
p.datenUniversalDatenTab(fbdata) ..
fab_tabs.universalDatenTab_(fbdata) ..
"</tabs></div>"
"</tabs></div>"


-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
box = box .. p.common(fbdata, false)
box = box .. fab_common.common_(fbdata, false)
mw.log("box = " .. box)
mw.log("box = " .. box)


Zeile 41: Zeile 39:
end
end


function p.datenUniversalDatenTab(fbdata)
-- wrapper für functions von Modul:Faktenbox/Tabs
-- mw.log("datenUniversalTab(fbdata)")
function p.universalDatenTab(...) return fab_tabs.universalDatenTab_(...) end
-- mw.logObject(fbdata)
function p.bildTab(...) return fab_tabs.bildTab_(...) end
-- Konsolenzeile zum Debuggen (Achtung! Bug in Fehlerbereinigungskonsole! Kann nur 1x ausgeführt werden!):
function p.kartenTab(...) return fab_tabs_karte.kartenTab_(...) end
-- fab=require("Modul:Faktenbox/Work"); fbdata=p.fbdata{pargs={lat="Bla", Objekt="Häusle", Test="BlaBla"}}; print(p.datenTab(fbdata))
function p.getKartenArgs(...) return fab_tabs_karte.getKartenArgs_(...) end
local t = ""
function p.benennungenTab(...) return fab_tabs.benennungenTab_(...) end
local no_show_attr = {
function p.adressenTab(...) return fab_tabs_adressen.adressenTab_(...) end
["Bild"] = true,
function p.tab(...) return fab_tabs.tab_(...) end
["lat"] = true, ["lon"] = true, ["location"] = true,["locationlist"] = true, ["geojson"] = true,
["zoom"] = true, ["popuptitle"] = true, ["popuptext"] = true
}
 
-- Zusammenbau
t = t .. "<dl class = 'dataTable'>"
for a, _ in pairs(fbdata.pargs) do
if not com.isTrue(no_show_attr[a]) then
t = t .. p.zeile{attr_name = a, fbdata = fbdata, delimiter = ";"}
end
end
t = t .. "</dl>"
t = t .. p.faktenboxSemantikBrowsen(fbdata)
 
-- Tab draus machen
t = p.tab(t, "Daten")
-- mw.log("t = " .. t)
    return t
end
 
function p.bildTab(fbdata, seite)
-- mw.log("bild(fbdata, " .. (seite or "nil") .. ")")
-- mw.logObject(fbdata.pargs)
-- Konsolenzeile zum Debuggen:
-- =p.bildTab{pargs={Bild="Erloeserkirche.jpg"}}
local t = ""
local beschreibung = que.getValues("Datei:" .. (fbdata.pargs["Bild"] or ""), "Beschreibung")
local beschreibung = beschreibung[1] or ""
if (fbdata.pargs["Bild"] or "") ~= "" and wik.pageexists("Bild:" .. fbdata.pargs["Bild"]) then
t = t .. '{| class = "factbox_imagetable" border = "0" cellpadding = "0" cellspacing = "0" width = "100%"\n'
t = t .. '|-\n'
t = t .. '|[[Bild::Datei:' .. fbdata.pargs["Bild"] .. '|768px|link=' .. (seite or '') .. ']]\n'
if beschreibung ~= "" then
t = t .. '|-\n'
t = t .. '|' .. beschreibung .. '\n'
end
t = t .. '|}'
end
-- Tab draus machen
t = p.tab(t, "Bild")
-- mw.log("t = " .. t)
return t
end
 
function p.kartenTab(fbdata)
-- mw.log("kartenTab(fbdata)")
-- mw.logObject(fbdata)
-- Konsolenzeile zum Debuggen:
-- fab=require("Modul:Faktenbox/Work"); fbdata=p.fbdata{pargs={["location"]="Erlanger Straße 11, Fürth, Bayern, Deutschland",Debug="ja"}}; print(p.kartenTab(fbdata))
-- fab=require("Modul:Faktenbox/Work"); fbdata=p.fbdata{pargs={["Gebäude"]="Erlanger Straße 11;Erlanger Straße 12",Debug="ja"}}; print(p.kartenTab(fbdata))
t = ""
if string.find(fbdata.pagename, ";") ~= nil then
t = "Semikolon im Artikel-/Seitennamen für korrekte Kartendarstellung nicht erlaubt!"
else
local args = {
lat = fbdata.pargs["lat"] or "", location = fbdata.pargs["location"] or "",
lon = fbdata.pargs["lon"] or "", locationlist = fbdata.pargs["locationlist"] or "",
geojson = fbdata.pargs["geojson"] or "", zoom = fbdata.pargs["zoom"] or "18", -- 18 ist default-zoom
Debug = fbdata.pargs["Debug"] or "",
width = "", height = "", -- passt sich beides automatisch an die Box an
box = "nein", form = "ja" -- keine eigene Box; Seite hat Formular
}
-- Wenn kein geojson-Formular-Wert vorgegeben, prüfen,
-- ob sich hinter der Artikelseite eine gleichnamige GeoJson-Karte versteckt oder
-- über Formular-Wert GeoJsonKarte eine Karte aktiviert ist
if args.geojson == "" then
if wik.pageexists("GeoJson:" .. fbdata.pagename) or com.isTrue(fbdata.pargs["GeoJsonKarte"]) then
args.geojson = fbdata.pagename
end
end
-- Verwende Geolokation des Gebäudes, sofern vorhanden und wenn keine location oder locationlist übergeben
if args.location == "" and args.locationlist == "" then
local gebaeude = str.splitAndStrip(fbdata.pargs["Gebäude"] or "", ";")
if #gebaeude > 0 then -- Gebäude angegeben?
args.locationlist = ""
local first = true
for _, g in ipairs(gebaeude) do -- alle Gebäude durchiterieren
local seite = que.getValues(g, "Seite", true)
if seite[1] ~= fbdata.pagename then -- Weiterleitung auf sich selbst rausfiltern
local geolokation = que.getValues(g, "Geolokation", true)
for _, l in ipairs(geolokation) do -- alle Geolokationen eines Gebäudes durchiterieren
if first then
first = false
else
args.locationlist = args.locationlist .. ";"
end
args.locationlist = args.locationlist .. l
end
end
end
end
end
-- Karte-Vorlage einbinden
-- mw.logObject(args)
if (args.lat ~= "" and args.lon ~= "") or args.location ~= "" or args.locationlist ~= "" or args.geojson ~= "" then
t = fbdata.frame:expandTemplate{title = "Karte", args = args}
end
end
-- Tab draus machen
t = p.tab(t, "Karte")
-- mw.log("t = " .. t)
return t
end
 
function p.benennungenTab(fbdata)
-- mw.log("benennungenTab()")
-- mw.logObject(fbdata)
-- Konsolenzeile zum Debuggen:
-- =p.benennungenTab({fullpagename="Engelhardtsteg"})
-- =p.benennungenTab({fullpagename="Jakob-Henle-Straße"})
-- =p.benennungenTab({fullpagename="Eichhornstraße"})
-- =p.benennungenTab({fullpagename="Georg-Brandstätter-Straße"})
local t = ""
 
-- DB-Abfrage
local query = "[[-Has subobject::".. fbdata.fullpagename .. "]][[SubObjektTyp::Benennung]]|?Benennung|?Benennungsdatum|?BenanntNach|?Bemerkung|limit=100"
local ask_result = mw.smw.ask(query)
-- mw.logObject(ask_result)
 
-- Zeilen zusammenbauen
local first = true
if ask_result ~= nil then
for i, z in ipairs(ask_result) do -- Ergebniszeile durchiterieren
if (z.Benennung or "") ~= "" or (z.BenanntNach or "") ~= "" then
if first then
t = t .. "<nowiki></nowiki>\n" -- nötig, warum auch immer, damit erster Listeeintrag richtig gerendert wird
first = false
end
t = t .. "* "
if z.Benennung ~= nil then
t = t .. "[[" .. z.Benennung .. "]]"
end
if z.Benennung ~= nil and z.BenanntNach ~= nil then
t = t .. ", "
end
if z.BenanntNach ~= nil then
t = t .. "benannt nach " .. z.BenanntNach
end
if z.Benennungsdatum ~= nil then
t = t .. ", " .. z.Benennungsdatum
end
if z.Bemerkung ~= nil then
t = t .. " (" .. z.Bemerkung .. ")"
end
t = t .. "\n"
end
end
end
 
-- Tab draus machen
t = p.tab(t, "Benennungen")
-- mw.log("t = " .. t)
return t
end
 
function p.adressenTab(fbdata)
local t = fbdata.frame:expandTemplate{title = 'CommonTabs/Adressen'}
t = p.tab(t, "Adressen")
    return t
end


-- wrapper für functions von Modul:Faktenbox/Zeilen
-- wrapper für functions von Modul:Faktenbox/Zeilen
function p.zeileKategorieSeite(fbdata, kindex) return fab_zeilen.zeileKategorieSeite_(fbdata, kindex) end
function p.zeileKategorieSeite(...) return fab_zeilen.zeileKategorieSeite_(...) end
function p.zeileStrasseHnr(fbdata) return fab_zeilen.zeileStrasseHnr_(fbdata) end
function p.zeileStrasseHnr(...) return fab_zeilen.zeileStrasseHnr_(...) end
function p.zeileAktenNr(fbdata) return fab_zeilen.zeileAktenNr_(fbdata) end
function p.zeileAktenNr(...) return fab_zeilen.zeileAktenNr_(...) end
function p.zeileGeoDaten(fbdata) return fab_zeilen.zeileGeoDaten_(fbdata) end
function p.zeileGeoDaten(...) return fab_zeilen.zeileGeoDaten_(...) end
function p.zeileDatum(args) return fab_zeilen.zeileDatum_(args) end
function p.zeileDatum(...) return fab_zeilen.zeileDatum_(...) end
function p.zeile(args) return fab_zeilen.zeile_(args) end
function p.zeileSemantikBrowsenAbfrage(...) return fab_zeilen.zeileSemantikBrowsenAbfrage_(...) end
 
function p.zeile(...) return fab_zeilen.zeile_(...) end
function p.faktenboxSemantikBrowsen(fbdata)
-- mw.log("faktenboxSemantikBrowsen(fbdata)")
-- mw.logObject(fbdata)
-- Konsolenzeile zum Debuggen:
-- =p.faktenboxSemantikBrowsen{pargs={Bild="Erloeserkirche.jpg"}}
local t = ""
t = t .. "<dl class = 'dataTable'>"
t = t .. "<dt>[[Bild:IconSearch.svg|16px|semantisches Browsen|link=[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "]]]]</dt>"
t = t .. "<dd>[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "|Semantisches Browsen]]</dd>"
t = t .. "</dl>"
-- mw.log("t = " .. t)
return t
end
 
function p.common(fbdata)
-- mw.log("common(fbdata)")
-- mw.logObject(fbdata)
-- Konsolenzeile zum Debuggen:
-- =p.common{formular="Gebäude/Work",klasse={"Gebäude","Kirche"},kategorie={"Gebäude","Kirchen"},strasse_hnr={suspekt=true},positionscheck=true,pargs={Bild="Angie Oeckl.JPG",Ehemals="Ja",DenkmalstatusBesteht="Ja",Stadtteil="Ronhof; Nordstadt ",location="bla"},pagename="Test/Test;Test"}
local t = ""
-- Klasse
if fbdata.klasse ~= nil then
t = t .. "{{#set:KlassenName=" .. fbdata.klasse[1] .. "}}"
end
-- Formular
if fbdata.formular ~= nil then
t = t .. "{{#default_form:" .. fbdata.formular .. "}}"
end
-- Kategorien
local ehemals_text = ""
if com.isTrue(fbdata.pargs["Ehemals"]) then
ehemals_text = " (ehemals)"
end
if fbdata.kategorie ~= nil then
for _, k in ipairs(fbdata.kategorie) do
t = t .. "[[Kategorie:" .. k .. ehemals_text .. "]]"
end
end
if com.isTrue(fbdata.pargs["DenkmalstatusBesteht"]) then
t = t .. "[[Kategorie:Denkmalliste]]"
end
local stadtteil = str.splitAndStrip(fbdata.pargs["Stadtteil"] or "", ";")
for _, s in ipairs(stadtteil) do
s = str.strip(tostring(s or ""))
t = t .. "[[Kategorie:" .. s .. "]]"
end
-- Wartungs-Kategorien
if (fbdata.pargs["Bild"] or "") == "" then
if fbdata.kategorie ~= nil then
t = t .. "[[Kategorie:" .. fbdata.kategorie[1] .. " ohne Bild]]"
else
t = t .. "[[Kategorie:Ohne Bild]]"
end
elseif not wik.pageexists("Bild:" .. fbdata.pargs["Bild"]) then
t = t .. "[[Kategorie:Bild nicht gefunden]]"
end
if string.find(fbdata.pagename, ";") ~= nil then
t = t .. "[[Kategorie:Hat Semikolon]]"
end
if string.find(fbdata.pagename, "/") ~= nil then
t = t .. "[[Kategorie:Hat Slash]]"
end
if fbdata.strasse_hnr ~= nil then
if fbdata.strasse_hnr.suspekt then
t = t .. "[[Kategorie:Gebäude mit verdächtiger Straße-Hausnummer-Kombination]]"
end
end
if fbdata.positionscheck and fbdata.kategorie ~= nil and
not ((fbdata.pargs["lat"] or "") ~= "" or (fbdata.pargs["lon"] or "") ~= "" or
(fbdata.pargs["location"] or "") ~= "" or wik.pageexists("GeoJson:" .. (fbdata.pargs["geojson"] or fbdata.pagename))) then
t = t .. "[[Kategorie:" .. fbdata.kategorie[1] .. ehemals_text .. " ohne Position]]"
end
-- mw.log("t = " .. t)
return t
end
 
function p.tab(t, name)
-- mw.log("tab(t)")
-- mw.logObject(t)
t = str.strip(t)
if t ~= "" then
t = "<tab name = ".. name .. ">" .. t .. "</tab>"
end
-- mw.log("t = " .. t)
return t
end


function p.fbdata(frame)
-- wrapper für functions von Modul:Faktenbox/Common
-- mw.log("fbdata(frame)")
function p.common(...) return fab_common.common_(...) end
-- mw.logObject(frame)
function p.fbdata(...) return fab_common.fbdata_(...) end
-- Konsolenzeile zum Debuggen:
-- =p.fbdata{pargs={a=1}}
local fbdata = {}
fbdata.frame, fbdata.pargs = dev.GetFrameAndParentArgs(frame)
wik.setPagenames(fbdata)
-- mw.logObject(fbdata)
return fbdata
end


return p
return p
Abgerufen von „https://www.fuerthwiki.de/wiki/index.php?title=Spezial:Mobiler_Unterschied/757863...769559“