imported>Oetterer: fixed an error with show on select for input_type checkbox

2016-02-29T08:49:45Z

fixed an error with show on select for input_type checkbox

Neue Seite

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

Modul:SFfield/class - Versionsgeschichte

imported>Oetterer: fixed an error with show on select for input_type checkbox