Quelltext der Seite Modul:SFfield/class

local class = require('Module:Middleclass').class
local classSFfield = class('SFfield')
local classDebug = require('Module:Debug/class')

-- ****************************************************************
-- *                          properties                          *
-- ****************************************************************
 
-- **************** initialization of table for private properties
local _private = setmetatable({}, {__mode = "k"})   -- weak table storing all private attributes
 
-- **************** declaration of private static properties
-- local _PROPERTY = require( 'Module:' )
local _CFG = mw.loadData( 'Module:SFfield/config' )
local _TT = require( 'Module:TableTools' )
local _defaultListInputType = 'tokens'
local _defaultSingleInputType = 'combobox'
local _defaultSize = 40
local _defaultTextAreaAttributes = {
	autogrow = true,
	cols = 80,
	editor = 'wikieditor',
	rows = 12
}
local _mandatoryMarker = '<sup>*</sup>'
local _showOnSelectIdPrefix = _CFG.global.showOnSelectIdPrefix

-- ***************************************************************
-- *                           methods                           *
-- ***************************************************************
 
-- **************** declaration of static methods
function classSFfield:initialize(fieldname)	-- constructor
	local fieldname = fieldname or 'no fieldname specified'
	local dbg = classDebug:new('SFfield_field_' .. fieldname)
	-- initialize all private properties
	_private[self] = {
		attributes = {},
		dbg = dbg,
		name = fieldname,
	}
	_private[self].dbg:log(11, 'Initializing field "' .. fieldname ..'"')
end	-- end of function classSFfield:initialize(fieldname)

function classSFfield.static:getShowOnSelectIdPrefix()
	return _showOnSelectIdPrefix
end

function classSFfield.static:setDefaultSize(val)
	if val and type(val) == 'number' then
		_defaultSize = val
		classDebug:log(13, ' classSFfield.static:setDefaultSize(): Setting _defaultSize to ' .. val, tostring(self) .. '.static')
		return true
	end
	return false
end

function classSFfield.static:setDefaultTextAreaAutogrow(val)
	if val and type(val) == 'boolean' then
		_defaultTextAreaAttributes.autogrow = val
		classDebug:log(13, 'classSFfield.static:setDefaultTextAreaAutogrow(): Setting _defaultTextAreaAttributes.autogrow to ' .. val,
			tostring(self) .. '.static')
		return true
	end
	return false
end

function classSFfield.static:setDefaultTextAreaCols(val)
	if val and type(val) == 'number' then
		_defaultTextAreaAttributes.cols = val
		classDebug:log(13, 'classSFfield.static:setDefaultTextAreaCols(): Setting _defaultTextAreaAttributes.cols to ' .. val,
			tostring(self) .. '.static')
		return true
	end
	return false
end

function classSFfield.static:setDefaultTextAreaEditor(val)
	if type(val) == 'boolean' then
		if val then
			_defaultTextAreaAttributes.editor = 'wikieditor'
			classDebug:log(13, 'classSFfield.static:setDefaultTextAreaEditor(): Setting _defaultTextAreaAttributes.editor to wikieditor',
				tostring(self) .. '.static')
		else
			_defaultTextAreaAttributes.editor = nil
			classDebug:log(13, 'classSFfield.static:setDefaultTextAreaEditor(): Setting _defaultTextAreaAttributes.editor to NIL',
				tostring(self) .. '.static')
		end
		return true
	elseif val and type(val) == 'string' then
		_defaultTextAreaAttributes.editor = val
		classDebug:log(13, 'classSFfield.static:setDefaultTextAreaEditor(): Setting _defaultTextAreaAttributes.editor to ' .. val,
			tostring(self) .. '.static')
		return true
	else
		classDebug:log(13, 'classSFfield.static:setDefaultTextAreaEditor(): doing nothing. parameter type is ' .. type(val),
			tostring(self) .. '.static')
	end
	return false
end

function classSFfield.static:setDefaultTextAreaRows(val)
	if val and type(val) == 'number' then
		_defaultTextAreaAttributes.rows = val
		classDebug:log(13, 'classSFfield.static:setDefaultTextAreaRows(): Setting _defaultTextAreaAttributes.rows to ' .. val, 
			tostring(self) .. '.static')
		return true
	end
	return false
end

function classSFfield.static:setShowOnSelectIdPrefix(val)
	if val and type(val) == 'string' then
		_showOnSelectIdPrefix = val
		classDebug:log(13, 'classSFfield.static:setShowOnSelectIdPrefix(): Setting _showOnSelectIdPrefix to ' .. val,
			tostring(self) .. '.static')
		return true
	end
	return false
end

-- **************** declaration of private methods
local _processAttributes = function (self)
	_private[self].dbg:log(11, 'entering _processAttributes() to process attributes and preparing them for printout')
	_private[self].dbg:log(13, ' _processAttributes(): attributes array so far looks like: <pre>' .. _TT.printTable(_private[self].attributes) .. '</pre>')
	local attributes = {}
	if not _private[self].attributes['input type'] and not (_private[self].attributes.hidden or _private[self].attributes['holds template']) then
		_private[self].dbg:log(13, ' _processAttributes(): no input type set. defaulting dependant on the setting of attribute "list"')
		if _private[self].attributes.list then
			_private[self].attributes['input type'] = _defaultListInputType
		else
			_private[self].attributes['input type'] = _defaultSingleInputType
		end
	end
	if _private[self].attributes['input type'] and (_private[self].attributes['input type'] == 'textarea' or _private[self].attributes['input type'] == 'textarea with autocomplete') then
		_private[self].dbg:log(13, ' _processAttributes(): textarea input type detected. setting defaults when unset')
		if _private[self].attributes.autogrow == nil then
			_private[self].attributes.autogrow = _defaultTextAreaAttributes.autogrow
		end
		if _private[self].attributes.cols == nil then
			_private[self].attributes.cols = _defaultTextAreaAttributes.cols
		end
		if _private[self].attributes.editor == nil and _defaultTextAreaAttributes.editor then
			_private[self].attributes.editor = _defaultTextAreaAttributes.editor
		end
		if _private[self].attributes.rows == nil then
			_private[self].attributes.rows = _defaultTextAreaAttributes.rows
		end
	elseif _private[self].attributes.size == nil and _private[self].attributes['input type']
			and not _TT.inTable({'radiobutton', 'hidden', 'checkbox', 'checkboxes'}, mw.ustring.lower(_private[self].attributes['input type'])) then
		_private[self].attributes.size = _defaultSize
	end
	
	for attr, val in pairs(_private[self].attributes) do
		if not _private[self].attributes['input type'] or _TT.inTable(_CFG.generalAttributes, mw.ustring.lower(attr)) or 
				_TT.inTable(_CFG.validAttributesPerType[_private[self].attributes['input type']], mw.ustring.lower(attr)) then
			local line
			if type(val) == 'boolean' then
				if val then
					line = attr
				end
			elseif type(val) == 'table' then
				_private[self].dbg:log(13, ' _processAttributes(): value of type "table" detected')
				if attr == 'show on select' then
					_private[self].dbg:log(13, ' _processAttributes(): belonging to attribute "show on select". processing table')
					line = attr .. '='
					for v, eid in pairs(val) do
						if type(eid) == 'table' then
							for _, eid_v in pairs(eid) do
								line = line .. v .. '=>' .. _showOnSelectIdPrefix .. eid_v .. ';'
							end
						else
							line = line .. v .. '=>' .. _showOnSelectIdPrefix .. eid .. ';'
						end
					end
				else
					_private[self].dbg:log(13, ' _processAttributes(): not belonging to attribute "show on select". processing table normally')
					local delimiter = _private[self].attributes.delimiter or _CFG.global.defaultDelimiter or ''
					-- unfortunately FoundationsClass tables get represented as arrays, albeit with integers ranging from 1 - n as keys. H2IK-Y! workaround:
					local tmpvals = {}
					for _, v in pairs(val) do
						table.insert(tmpvals, v)
					end
					line = attr .. '=' .. table.concat(tmpvals, delimiter) -- '1,2,3,' .. #val .. '-<pre>' .. require('Module:TableTools').printTable(val) .. '</pre>' ..table.maxn(val) --table.concat(val, '-')
				end
			else
				if attr == 'show on select' then
					line = attr .. '=' .. _showOnSelectIdPrefix .. val
				else
					line = attr .. '=' .. val
				end
			end
			if line then
				_private[self].dbg:log(13, ' _processAttributes(): adding "' .. line .. '" to table of attributes')
			end
			table.insert(attributes, line)
		else
			_private[self].dbg:log(13, ' _processAttributes(): ignoring attribute ' .. attr .. '; reason is: ' ..
				(_private[self].attributes['input type'] and 'not found in tables _CFG.generalAttributes and _CFG.validAttributesPerType["' .. _private[self].attributes['input type'] .. '"]' or 'no input type set')
			)
		end
	end
	return attributes
end


-- **************** declaration of public methods
function classSFfield:__tostring()
	_private[self].dbg:log(11, 'entering classSFfield:__tostring() to render field output')
	return self:render()
end

function classSFfield:createTr(label, tooltip)
	_private[self].dbg:log(11, 'entering classSFfield:createTr() to create a table row around self:render()')
	_private[self].dbg:log(12, ' classSFfield:createTr() has label "' .. (label and label or 'NOT PROVIDED') .. '"')
	_private[self].dbg:log(12, ' classSFfield:createTr() has tooltip "' .. (tooltip and tooltip or 'NONE') .. '"')
	local frame = mw.getCurrentFrame()
	tr = mw.html.create('tr')
	tr:attr( 'id', _showOnSelectIdPrefix .. mw.uri.encode(_private[self].name, 'WIKI') )
		:tag((_private[self].attributes.mandatory and 'th' or 'td'))
			:wikitext((label or 'LABEL_' .. fieldname) .. 
				(_private[self].attributes.mandatory and _mandatoryMarker or '') ..
				(tooltip and frame:callParserFunction(_CFG.global.tooltipParserFunction, tooltip) or ''))
			:done()
		:newline()
		:tag('td')
			:wikitext(self:render())
			:done()
		:newline()
		:done()
	return tr
end

function classSFfield:get(attribute)
	return _private[self].attributes[attribute]
end

function classSFfield:render()
	_private[self].dbg:log(11, 'entering classSFfield:render() to render field output')
	local str = '{{{field|' .. _private[self].name .. '|'
				.. table.concat(_processAttributes(self), '|') .. '}}}'
	_private[self].dbg:log(11, ' classSFfield:render() renders <code>' .. mw.text.nowiki(str) .. '</code>')
	return str
end

function classSFfield:set(attribute, value)
	local attribute = (attribute and mw.ustring.lower(attribute) or 'NOT PROVIDED!')
	_private[self].dbg:log(11, 'entering classSFfield:set() to set attribute: ' .. attribute)
	local value = value
	if value == nil then
		value = true
	end
	if _TT.inTable(_CFG.validAttributes, attribute) then
		-- we have a valid attribute. do some plausibility check
		if attribute == 'input type' then
			value = mw.ustring.lower(value)
			if not _TT.inTable(_CFG.validInputTypes, value) then
				_private[self].dbg:log(11, ' classSFfield:set() trying to set "intput type" to invalid value: ' .. value and mw.ustring.lower(value) or 'NIL')
				return false
			end
		end
		_private[self].attributes[attribute] = value
		if type(value) == 'number' or type(value) == 'string' then
			_private[self].dbg:log(12, ' classSFfield:set() setting attribute: "' .. attribute .. '" to value ' .. value)
		else
			_private[self].dbg:log(12, ' classSFfield:set() setting attribute: "' .. attribute .. '" to a value of type ' .. type(value))
		end
		return true
	else
		_private[self].dbg:log(11, ' classSFfield:set() called with invalid attribute: ' .. attribute)
		return false
	end
end

return classSFfield
Beschreibung	Was du eingibst	Wie es aussieht
Kursiv	''Kursiver Text''	Kursiver Text
Fett	'''Fetter Text'''	Fetter Text
Fett und kursiv	'''''Fetter und kursiver Text'''''	*Fetter und kursiver Text*