Modul:Straße: Unterschied zwischen den Versionen

Aus FürthWiki

Keine Bearbeitungszusammenfassung
(fix streetlocation)
 
(25 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
local p = {} --p stands for package
local p = {}
local c = require( "Module:Common" )


function p.Faktenbox( frame )
local com = require("Modul:Common")
pf = frame:getParent()
local str = require("Modul:String")
args = pf.args
local geo = require("Modul:Geo")
local fab = require("Modul:Faktenbox")
-- Before you ask: No, you cant' use extensionTag here!
 
tpl_bild = p.Bild( frame, args )
function p.Faktenbox(frame)
tab_bild=''
-- mw.log("Faktenbox(frame)")
if tpl_bild:gsub("%s+", "") ~= '' then
-- mw.logObject(frame)
tab_bild='<tab name=Bild>' ..  
-- Konsolenzeile zum Debuggen:
tpl_bild .. '</tab>'
-- =p.Faktenbox{pargs={Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}}
 
-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
local fbdata = fab.fbdata(frame)
fbdata.klasse = {"Straße"}
fbdata.kategorie = {"Straßen"}
fbdata.formular = "Straße" -- ggf. "Straße/Work"
fbdata.positionscheck = true
 
-- Postleitzahl ermitteln
local stadtteile = str.splitAndStrip(fbdata.pargs["Stadtteil"] or "", ";")
fbdata.plz = geo.stadtteil2PLZ(stadtteile)
 
-- Tabs einsammeln und zusammenfügen
local box =  
"<div class = factbox><tabs>" ..
p.kartenTab(fbdata) ..
fab.bildTab(fbdata) ..
p.datenTab(fbdata) ..
fab.benennungenTab(fbdata) ..
"</tabs></div>"
 
-- Straßen-spezifische Kategorien usw.
if (fbdata.pargs["Stadtteil"] or "") == "" then
box = box .. "[[Kategorie:Straßen ohne Stadtteil]]"
end
end
if (fbdata.pargs["Ort"] or "") == "" then
tpl_karte = p.Karte( frame, args )
box = box .. "{{#set:Ort=Fürth}}"
tab_karte=''
if tpl_karte:gsub("%s+", "") ~= '' then
tab_karte='<tab name=Karte>' ..  
tpl_karte .. '</tab>'
end
end
-- The tab "Daten" is visible everytime
tpl_daten = p.Daten( frame, args )
tab_daten='<tab name=Daten>' ..
tpl_daten .. '</tab>'
tpl_benennungen = p.Benennungen( frame, args )
tab_benennungen=''
if tpl_benennungen:gsub("%s+", "") ~= '' then
tab_benennungen='<tab name=Benennungen>' ..
tpl_benennungen .. '</tab>'
end
t ='<div class=factbox><tabs>' ..
  tab_karte ..
  tab_bild ..
  tab_daten ..
  tab_benennungen ..
  '</tabs></div>'


-- Use preprocess to render the factbox and all contens at once
-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
return frame:preprocess(t)
box = box .. fab.common(fbdata)
end
-- mw.log("box = " .. box)


function p.Bild( frame, args )
-- Pre-Processing und String-Länge checken
t = frame:expandTemplate{title = 'Bildertab', args={
box = fbdata.frame:preprocess(box)
Bild=args.Bild}
box = box .. com.returnStringCheck(box)
}
-- mw.log("box = " .. box)
    return t
return box
end
end


function p.Karte( frame, args )
function p.datenTab(fbdata)
    args_ = c.shallowcopy(args)
-- mw.log("datenTab(fbdata)")
args_["streetlocation"] = frame:expandTemplate{title = 'Straße/Karte/Lokation', args=args}
-- mw.logObject(fbdata)
t = frame:expandTemplate{title = 'Straße/Karte', args=args_}
--[[ Konsolenzeile zum Debuggen:
    return t
fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Baujahr="1987",Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}};
end
fbdata.klasse={"Straße"}; fbdata.kategorie={"Straßen"}; fbdata.fullpagename="Erlanger Straße"; fbdata.subpagename="Erlanger Straße";
print(p.datenTab(fbdata))
]]
local t = ""


function p.Daten( frame, args )
-- Zusammenbau
t = frame:expandTemplate{title = 'Straße/Daten', args=args}
t = t .. "<dl class = 'dataTable'>"
    return t
t = t .. fab.zeileKategorieSeite(fbdata)
end
t = t .. fab.zeile{attr_name = "Baujahr", fbdata = fbdata, delimiter = ";"}
t = t .. fab.zeile{attr_name = "Stadtteil", fbdata = fbdata, delimiter = ";"}
t = t .. fab.zeile{attr_name = "PLZ", attr_val = fbdata.plz}
t = t .. fab.zeile{attr_name = "Ort", fbdata = fbdata, delimiter = ";"}
t = t .. fab.zeile{attr_name = "Ehemals", fbdata = fbdata}
t = t .. fab.zeile{attr_name = "Abbruchjahr", fbdata = fbdata, delimiter = ";"}
t = t .. fab.zeileGeoDaten(fbdata)
t = t .. "</dl>"
t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)


function p.Benennungen( frame, args )
-- Tab draus machen
t = frame:expandTemplate{title = 'Straße/Benennungen'}
t = fab.tab(t, "Daten")
-- mw.log("t = " .. t)
     return t
     return t
end
end


function p.HausnummerOhneBuchstaben( frame )
function p.kartenTab(fbdata)
pf = frame:getParent()
-- mw.logObject(fbdata, "kartenTab(fbdata)")
args = pf.args
-- Konsolenzeile zum Debuggen:
hnr = string.match( args["1"], "%d+" )
-- fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Ehemals="ja";location="Bla"}}; fbdata.pagename="Erlanger Straße"; fbdata.plz={90765}; p.kartenTab(fbdata)
    return hnr
local t = ""
if string.find(fbdata.pagename, ";") ~= nil then
t = "Semikolon im Artikel-/Seitennamen für korrekte Kartendarstellung nicht erlaubt!"
else
local args = com.shallowcopy(fbdata.pargs)
if com.isEmpty(args["location"]) and not com.isTrue(args["Ehemals"]) then
args["streetlocation"] = fbdata.pagename .. "," .. (args["Ort"] or "Fürth")
if  #fbdata.plz > 0 then
args["streetlocation"] = args["streetlocation"] .. "," .. fbdata.plz[1]
end
args["streetlocation"] = args["streetlocation"] .. ",Bayern,Deutschland"
end
-- mw.logObject(args, "args")
t = t .. fbdata.frame:expandTemplate{title = 'Straße/Karte', args=args}
t = str.strip(t)
end
-- Tab draus machen
-- mw.logObject(t, "t")
t = fab.tab(t, "Karte")
return t
end
end


return p
return p

Aktuelle Version vom 12. November 2025, 09:31 Uhr

local p = {}

local com = require("Modul:Common")
local str = require("Modul:String")
local geo = require("Modul:Geo")
local fab = require("Modul:Faktenbox")

function p.Faktenbox(frame)
--	mw.log("Faktenbox(frame)")
--	mw.logObject(frame)
	-- Konsolenzeile zum Debuggen:
	-- =p.Faktenbox{pargs={Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}}

	-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
	local fbdata = fab.fbdata(frame)
	fbdata.klasse = {"Straße"}
	fbdata.kategorie = {"Straßen"}
	fbdata.formular = "Straße" -- ggf. "Straße/Work"
	fbdata.positionscheck = true

	-- Postleitzahl ermitteln
	local stadtteile = str.splitAndStrip(fbdata.pargs["Stadtteil"] or "", ";")
	fbdata.plz = geo.stadtteil2PLZ(stadtteile)

	-- Tabs einsammeln und zusammenfügen
	local box = 
		"<div class = factbox><tabs>" ..
		p.kartenTab(fbdata) ..
		fab.bildTab(fbdata) ..
		p.datenTab(fbdata) ..
		fab.benennungenTab(fbdata) ..
		"</tabs></div>"

	-- Straßen-spezifische Kategorien usw.
	if (fbdata.pargs["Stadtteil"] or "") == "" then
		box = box .. "[[Kategorie:Straßen ohne Stadtteil]]"
	end
	if (fbdata.pargs["Ort"] or "") == "" then
		box = box .. "{{#set:Ort=Fürth}}"
	end

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

	-- Pre-Processing und String-Länge checken
	box = fbdata.frame:preprocess(box)
	box = box .. com.returnStringCheck(box)
--	mw.log("box = " .. box)
	return box
end

function p.datenTab(fbdata)
--	mw.log("datenTab(fbdata)")
--	mw.logObject(fbdata)
	--[[ Konsolenzeile zum Debuggen:
	fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Baujahr="1987",Stadtteil="Innenstadt;Ronhof",Ort="Buxtehude"}};
	fbdata.klasse={"Straße"}; fbdata.kategorie={"Straßen"}; fbdata.fullpagename="Erlanger Straße"; fbdata.subpagename="Erlanger Straße";
	print(p.datenTab(fbdata))
	]]
	local t = ""

	-- Zusammenbau
	t = t .. "<dl class = 'dataTable'>"
	t = t .. fab.zeileKategorieSeite(fbdata)
	t = t .. fab.zeile{attr_name = "Baujahr",		fbdata = fbdata, delimiter = ";"}
	t = t .. fab.zeile{attr_name = "Stadtteil",		fbdata = fbdata, delimiter = ";"}
	t = t .. fab.zeile{attr_name = "PLZ",			attr_val = fbdata.plz}
	t = t .. fab.zeile{attr_name = "Ort",			fbdata = fbdata, delimiter = ";"}
	t = t .. fab.zeile{attr_name = "Ehemals",		fbdata = fbdata}
	t = t .. fab.zeile{attr_name = "Abbruchjahr",	fbdata = fbdata, delimiter = ";"}
	t = t .. fab.zeileGeoDaten(fbdata)
	t = t .. "</dl>"
	t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)

	-- Tab draus machen
	t = fab.tab(t, "Daten")
--	mw.log("t = " .. t)
    return t
end

function p.kartenTab(fbdata)
--	mw.logObject(fbdata, "kartenTab(fbdata)")
	-- Konsolenzeile zum Debuggen:
	-- fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Ehemals="ja";location="Bla"}}; fbdata.pagename="Erlanger Straße"; fbdata.plz={90765}; p.kartenTab(fbdata)
	local t = ""
	if string.find(fbdata.pagename, ";") ~= nil then
		t = "Semikolon im Artikel-/Seitennamen für korrekte Kartendarstellung nicht erlaubt!"
	else
		local args = com.shallowcopy(fbdata.pargs)
		if com.isEmpty(args["location"]) and not com.isTrue(args["Ehemals"]) then
			args["streetlocation"] = fbdata.pagename .. "," .. (args["Ort"] or "Fürth")
			if  #fbdata.plz > 0 then
				args["streetlocation"] = args["streetlocation"] .. "," .. fbdata.plz[1]
			end
			args["streetlocation"] = args["streetlocation"] .. ",Bayern,Deutschland"
		end
--		mw.logObject(args, "args")
		t = t .. fbdata.frame:expandTemplate{title = 'Straße/Karte', args=args}
		t = str.strip(t)
	end
	-- Tab draus machen
--	mw.logObject(t, "t")
	t = fab.tab(t, "Karte")
	return t
end

return p