FürthWiki

Modul:Publikation

Seiten-Übersicht

Zur Klasse Publikation gehörende Seiten:
Hauptseite Unterseiten
Allgemein
Faktenbox Vorlagen
Formulare
Module
Alias
Abfrage Vorlagen


Formulare


Sonstige


Siehe auch

local p = {}

local com = require("Modul:Common")
local dev = require("Modul:Development")
local tab = require("Modul:Table")
local str = require("Modul:String")
local atr = require("Modul:Attribut")
local wob = require("Modul:Wörterbuch")
local wik = require("Modul:Wiki")
local smw = require("Modul:SMW")
local fab = require("Modul:Faktenbox")
	
function p.Faktenbox(frame)
--	mw.log("Faktenbox(frame)")
--	mw.logObject(frame, "frame")
	-- Konsolenzeile zum Debuggen:
	-- =p.Faktenbox{pargs={Titel="Bla",Ausführung="1234",Genre="Stadtgeschichte;Biografie"}}

	-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
	local fbdata = fab.getFbdata(frame)
	fbdata.klasse = {frame.args["Klasse"] or "Publikation"}
	if frame.args["KategorieEinzahl"] ~= nil then
		fbdata.kategorie_einzahl = {frame.args["KategorieEinzahl"]}
		fbdata.kategorie = {wob.mehrzahl(frame.args["KategorieEinzahl"])}
	else
		fbdata.kategorie = {frame.args["Kategorie"] or "Publikationen"}
	end
	fbdata.formular = frame.args["Formular"] or frame.args["KategorieEinzahl"] or "Publikation" -- ggf. "Publikation/Work"
	fbdata.positionscheck = false

	-- Titel
	fbdata.pargs["Titel"] = fbdata.pargs["Titel"] or fbdata.pagename

	-- Index-Seite
	fbdata.indexpage = "Index:" .. (fbdata.pargs["Index"] or fbdata.pagename)
	if wik.pageExists(fbdata.indexpage) then
		smw.addAttrToList(fbdata.attr.list, "Index", fbdata.indexpage)
		-- fbdata.bildlink = fbdata.indexpage
	else
		fbdata.indexpage = nil
	end

	-- Tabs einsammeln und zusammenfügen
	local t = fab.bildTab(fbdata) .. p.datenTab(fbdata)
	t = fab.factbox_header_footer(t)

	-- Buch-spezifische Kategorien usw.
	-- siehe Genre-Kategorisierung in function p.zeileGenre()

	-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
	t = t .. fab.postprocess(fbdata)
	-- Pre-Processing
--	mw.logObject(t, "t")
	t = fbdata.frame:preprocess(t)
	return t
end

function p.datenTab(fbdata)
--	mw.log("datenTab(fbdata)")
--	mw.logObject(fbdata)
	--[[ Konsolenzeile zum Debuggen:
	fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Titel="Bla",Ausführung="1234"}};
	fbdata.klasse={"Buch"}; fbdata.kategorie={"Bücher"}; fbdata.fullpagename="Pegnitz"; fbdata.subpagename="Pegnitz";
	print(p.datenTab(fbdata))
	]]
	local t = ""

	-- Zusammenbau
	t = t .. p.zeileKategorieSeite(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Untertitel",				delimiter = ";"}
	t = t .. p.zeileReihe(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Band"}
	t = t .. p.zeileGenre(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Ausführung"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Autor",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Herausgeber",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Erscheinungsjahr",			delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Verlag",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Auflage"}				
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Seitenzahl",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "ISBNnr",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Besonderheit",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "BestandArchivFuerthWiki",	delimiter = ";"}
	if fbdata.indexpage ~= nil then
		t = t .. "<dt>" .. atr.attrText("Index") .. " &#128083;</dt>"
		t = t .. "<dd>'''[[" .. fbdata.indexpage .. "|" .. string.sub(fbdata.indexpage, 7) .. "]]'''</dd>"
	end
	t = fab.table_header_footer(t)
	t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)

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

function p.zeileKategorieSeite(fbdata, kindex)
--	mw.log(fbdata, "zeileKategorieSeite(fbdata, " .. (kindex or 1) .. ")")
--	mw.logObject(fbdata, "fbdata")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileKategorieSeite({pagename="fpn",kategorie={"kat1","kat2"},kategorie_einzahl={"k1","k2"},klasse={"kla1","kla2"},pargs={["Titel"]="T"}}, 2)
	local t = ""
	local kategorie_einzahl
	if fbdata.kategorie_einzahl ~= nil then
		kategorie_einzahl = fbdata.kategorie_einzahl[kindex or 1]
	else
		kategorie_einzahl = fbdata.klasse[kindex or 1]
	end
	t = t .. "<dt>[[:Kategorie:" .. fbdata.kategorie[kindex or 1] .. "|" .. kategorie_einzahl .. "-Titel]]</dt>"
	if fbdata.indexpage ~= nil then
		t = t .. "<dd>'''[[" .. fbdata.indexpage .. "|" .. fbdata.pargs["Titel"] .. "]]'''</dd>"
	else
		t = t .. "<dd>'''" .. fbdata.pargs["Titel"] .. "'''</dd>"
	end
	smw.addAttrToList(fbdata.attr.list, "Publikationstitel", fbdata.pargs["Titel"])
--	mw.logObject(t, "t")
	return t
end

function p.zeileReihe(fbdata)
--	mw.log("zeileReihe(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileReihe{pargs={Reihe=" Chronik Geschichtswerkstatt ; Durch Fürth geführt (Buchreihe) ; BlaBla "}}
	local t = ""
	local reihe = str.splitAndStrip(fbdata.pargs["Reihe"], ";")
	if #reihe > 0 then
		if #reihe > 1 then
			t = t .. "<dt>" .. "[[Attribut:Reihe|Reihen]]</dt><dd>"
		else
			t = t .. "<dt>" .. "[[Attribut:Reihe|Reihe]]</dt><dd>"
		end
		for i, r in ipairs(reihe) do
			if i > 1 then
				t = t .. ", "
			end
			-- "(Buchreihe)" abschneiden (r_ohne) bzw. zu r hinzufügen
			local r_ohne
			if string.find(r, "(Buchreihe)") ~= nil then
				r_ohne = str.strip(string.sub(r, 1, string.len(r) - 11))
			else
				r_ohne = r
				local r_mit = r .. " (Buchreihe)"
				if wik.pageExists(r_mit) or not wik.pageExists(r) then
					r = r_mit
				end
			end
			if wik.pageExists(r) then
				t = t .. "[[" .. r_ohne .. "]]"
			else
				t = t .. r_ohne
			end
			smw.addAttrToList(fbdata.attr.list, "Reihe", r)
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileGenre(fbdata)
--	mw.log("zeileGenre(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileGenre{pargs={Genre="Stadtgeschichte;Biografie"}}
	local t = ""
	local genre = str.splitAndStrip(fbdata.pargs["Genre"], ";")
	if #genre > 0 then
		if #genre > 1 then
			t = t .. "<dt>" .. "[[Attribut:Genre|Genres]]</dt><dd>"
		else
			t = t .. "<dt>" .. "[[Attribut:Genre|Genre]]</dt><dd>"
		end
		for i, g in ipairs(genre) do
			if i > 1 then
				t = t .. ", "
			end
			t = t .. "[[:Kategorie:" .. g .. "|" .. g .. "]][[Kategorie:" .. g .. "]]"
			smw.addAttrToList(fbdata.attr.list, "Genre", g)
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.BuchQuelle(frame)
	local t = ""
	-- Argumente extrahieren
	frame, pargs = dev.GetFrameAndParentArgs(frame)
	local buch_artikel = pargs[1]
	local thema = pargs["Thema"]
	local seite = pargs["Seite"]
	-- Daten zum Buch abfragen
	local query = { "[[" .. buch_artikel .. "]]",
		"?Autor", "?Publikationstitel", "?Untertitel", "?Verlag", "?Erscheinungsjahr", "?ISBNnr"}
	query = mw.smw.ask(query) or {{}}
	query = query[1]
	-- Table-Werte in Liste umwandeln
	for i, _ in pairs(query) do
		if type(query[i]) == "table" then
			query[i] = table.concat(query[i], ", ")
		end
	end
	-- Abfragewerte extrahieren
	local autor = query["Autor"]
	local publikationstitel = query["Publikationstitel"]
	local untertitel = query["Untertitel"]
	local verlag = query["Verlag"]
	local erscheinungsjahr = query["Erscheinungsjahr"]
	local isbnnr = query["ISBNnr"]
	-- Formatierungen und Ergänzungen, wenn gefüllt
	if thema ~= nil then
		thema = "''" .. thema .. "''" .. ". In: "
	end
	if autor ~= nil then
		t = t .. autor .. ": "
	end
	publikationstitel = "[[" .. buch_artikel .. "|" .. (publikationstitel or buch_artikel) .. "]]"
	if untertitel ~= nil then
		untertitel = "''" .. untertitel .. "''"
	end
	if seite ~= nil then
		seite = "S. " .. seite
	end
	-- Zusammenbau
	t = t .. (tab.tableMultiSeparatorConcat{
		" ", publikationstitel, ", ", untertitel, ""} or "")
	t = t .. (tab.tableMultiSeparatorConcat{
			". ", verlag, ", ", erscheinungsjahr, ", ", isbnnr, ", ",
			seite, ""} or "")
	-- SMW
	mw.smw.set{["Buch"] = buch_artikel}
	-- Nachbearbeitungen
	t = str.strip(t)
	return t
end


return p
Abgerufen von „https://www.fuerthwiki.de/wiki/index.php?title=Modul:Publikation&oldid=795729“