imported>Oetterer am 8. August 2018 um 05:52 Uhr

2018-08-08T05:52:21Z

Neue Seite

local FoundationClass = require('Module:Foundationclass')
local ClassDebug = require('Module:Debug/class')

-- ****************************************************************
-- * inheritance *
-- ****************************************************************
local ClassgeneratorParameter = FoundationClass:subclass('ClassgeneratorParameter')
-- setting class's configuration data
ClassgeneratorParameter.static.myConfiguration = mw.loadData('Module:Classgenerator/parameter/config')
ClassgeneratorParameter.static.SFfieldConfig = mw.loadData('Module:SFfield/config')
--ClassgeneratorParameter.static.myConfiguration = require('Module:Classgenerator/parameter/config')
--local SFfieldConfig = mw.loadData('Module:SFfield/config')
--ClassgeneratorParameter.static.myConfiguration.parameter.input_type.values = SFfieldConfig.validInputTypes -- cant load a table from another config in my config. therefor this
--ClassgeneratorParameter.static.myConfiguration.parameter.base_type.values = SFfieldConfig.validInputTypes -- cant load a table from another config in my config. therefor this
-- being in a static method, use self.myConfiguration
-- being in a private method, that knows self or in a public method, use self.class.myConfiguration

-- ****************************************************************
-- * properties *
-- ****************************************************************

-- **************** initialization of table for private properties
local _private = setmetatable({}, {__mode = 'k'}) -- weak table storing all private attributes

-- **************** declaration of public static properties
-- ClassgeneratorParameter.static.myPropertyModule = require('Module:extern')
-- ClassgeneratorParameter.static.staticProperty = ' '

-- remember the static classes provided by Foundationclass:
-- ClassgeneratorParameter.globalConfig
-- ClassgeneratorParameter.myCargoUtil
-- ClassgeneratorParameter.myTableTools

-- **************** declaration of (global) private properties
-- for properties you should rather use constructor and _private[self]. this only, if you need a private class property
-- you should, however predeclare private methods here
local _debug -- private method declared later
local _privateMethodAhead -- declaration ahead, so this private method can be used in the constructor and in other private methods

-- ***************************************************************
-- * methods *
-- ***************************************************************

-- **************** declaration of static methods
function ClassgeneratorParameter:initialize(uid)
local _CFG = self.class.myConfiguration
FoundationClass.initialize(self, uid)
_private[self] = {
dbg = ClassDebug:new(tostring(self.class) .. ': id ' .. uid),
}
_debug(self, 1, ' ClassgeneratorParameter: done initializing object "' .. uid ..'", from ' .. tostring(self))
end

-- use use self.myConfiguration to access your configuration in a static method
function ClassgeneratorParameter.static:aStaticMethod(var)
_debug(self, 1, 'entering ClassgeneratorParameter.static:aStaticMethod() to do something, from ' .. tostring(self))
end

function ClassgeneratorParameter.static:mySfDynamicFieldAttribute(fieldname, attribute, value)
_debug(self, 1, 'entering ClassgeneratorParameter.static:mySfDynamicFieldAttribute(fieldname, attribute, value), from ' .. tostring(self))
_debug(self, 2, ' with parameters "' .. fieldname .. '", "' .. attribute .. '" and a ' .. type(value) .. ' value')
-- function that can process any attribute/value pair just before rendering the semantic forms field
-- usually done, to generate a dynamic 'default' value
-- keep in mind: you can completely disable a form field, if you return true on attribute "disable". note however, that this causes the field to not show at all, no data will be transported/saved
local val = value
if FoundationClass.globalConfig.dataStore ~= 'cargo' and FoundationClass.globalConfig.dataStore ~= 'both' then
-- disable all cargo fields
if fieldname == 'cargo' and attribute == 'disable' then
val = true
end
if fieldname == 'cargo_hidden' and attribute == 'disable' then
val = true
end
if fieldname == 'cargo_size' and attribute == 'disable' then
val = true
end
if fieldname == 'cargo_type' and attribute == 'disable' then
val = true
end
if fieldname == 'add_cargo_table_and_field' and attribute == 'disable' then
val = true
end
if fieldname == 'mapping_cargo_field' and attribute == 'disable' then
val = true
end
if fieldname == 'mapping_cargo_table' and attribute == 'disable' then
val = true
end
end
if FoundationClass.globalConfig.dataStore ~= 'smw' and FoundationClass.globalConfig.dataStore ~= 'both' then
-- disable all smw fields
if fieldname == 'property' and attribute == 'disable' then
val = true
end
if fieldname == 'property_name' and attribute == 'disable' then
val = true
end
if fieldname == 'property_type' and attribute == 'disable' then
val = true
end
if fieldname == 'unique_for_concept' and attribute == 'disable' then
val = true
end
if fieldname == 'mapping_property' and attribute == 'disable' then
val = true
end
if fieldname == 'values_from_concept' and attribute == 'disable' then
val = true
end
end
if fieldname == 'property_name' and attribute == 'values_from_namespace' then
local ret, nulProperty = pcall(mw.title.new, 'NUL', 'Property')
val = ret and mw.site.namespaces[nulProperty.namespace].name or 'NUL'
end
if fieldname == 'property_type' and attribute == 'values' then
val = FoundationClass.globalConfig.smwPropertyTypesAvailable
end
if fieldname == 'input_type' and attribute == 'show_on_select' then
-- build input type's show on select from SFfieldConfig.validAttributesPerType, except remove values and replace all spaces in attribute names by an underscore
--val = mw.clone(ClassgeneratorParameter.SFfieldConfig.validAttributesPerType)
--val = ClassgeneratorParameter.myTableTools.shallowClone(ClassgeneratorParameter.SFfieldConfig.validAttributesPerType)
val = {}
for param, attrlist in pairs(ClassgeneratorParameter.SFfieldConfig.validAttributesPerType) do
if not val[param] then
val[param] = {}
end
for k, attr in pairs(attrlist) do
if attr ~= 'values' then
val[param][k] = mw.ustring.gsub(attr, ' ', '_')
end
end
end
_debug(self, 2, ' calculated this monster: <pre>' .. ClassgeneratorParameter.myTableTools.printTable(val) .. '</pre>')
end
if fieldname == 'input_type' and attribute == 'values' then
return ClassgeneratorParameter.SFfieldConfig.validInputTypes
end
if fieldname == 'base_type' and attribute == 'values' then
return ClassgeneratorParameter.SFfieldConfig.validInputTypes
end
if fieldname == 'uploadable' and attribute == 'show_on_select' then
val = {}
val['true'] = {'default_filename', 'image_preview'}
end
_debug(self, 3, ' returning ' .. (type(val) == 'boolean' and (val and 'true' or 'false') or type(val)))
return val -- this value will be used as new value for field's attribute
end

function ClassgeneratorParameter.static:sfGenerateForm(embedIn)
_debug(self, 1, 'entering ClassgeneratorParameter.static:sfGenerateForm()')
local _CFG = self.myConfiguration
local embedIn = embedIn or 'Classgenerator[parameter_parameter]'
local tagStart = '{{{'
local tagEnd = '}}}'
-- create the table
-- start the html object
html = mw.html.create('')
html:wikitext(tagStart .. 'for template|' .. _CFG.template.name .. '|label=' .. _CFG.global.entityTitle ..
'|embed in field=' .. embedIn .. '|multiple|add button text=' .. _CFG.form.labelCreate .. '|minimum instances=1' .. tagEnd)
:node(self:sfGenerateFormTable(self.myConfiguration.form.fieldOrderGeneral))
:newline()
:wikitext(':')
:node(self:sfGenerateFormTable(self.myConfiguration.form.fieldOrderSFgeneral, 'row_parameter'))
:newline()
:wikitext('::')
:node(self:sfGenerateFormTable(self.myConfiguration.form.fieldOrderSFtypeDependent))
:wikitext(tagStart .. 'end template' .. tagEnd)
:newline()
return tostring(html)
end

-- **************** declaration of private methods
-- use self.class.myConfiguration to access your configuration in a public or a private method that is called by a public method
_debug = function (self, level, text)
if _private[self] and _private[self].dbg then
_private[self].dbg:log(level, text)
else
ClassDebug:log(level, text, tostring(self) .. '.static')
end
end

local _processAttribute = function (self, attr, indent)
_debug(self, 1, 'entering private _processAttribute() to print a line for attribute ' .. attr .. ', from ' .. tostring(self))
local coreData = self:getCoreData()
local ret = ''
local omissionList = {'name'}
local attr = attr
local val = coreData[attr]
if type(val) == 'boolean' then
val = val and 'true' or 'false'
end
if val and not ClassgeneratorParameter.myTableTools.inTable(omissionList, attr) then
ret = indent .. attr .. ' = '
if type(val) == 'table' then
ret = ret .. ClassgeneratorParameter.myTableTools.printTable(val, 'inline')
elseif val == 'true' or val == 'false' or attr == 'cargo_table' or (attr == 'restricted' and (val == 'global.restrictedTo' or val == 'superglobal.restrictedTo')) or mw.ustring.match(val, '^[0-9]+$') then
ret = ret .. val
else
local valMangled = mw.text.trim(val)
valMangled = mw.ustring.gsub(mw.ustring.gsub(valMangled, "\\'", "'"), "'", "\\'")
valMangled = mw.ustring.gsub(valMangled, '\n', '\\n\' ..\n' .. indent .. '\t\'')
ret = ret .. "'" .. valMangled .. "'" -- the gsub catches multiline input from textareas
end
ret = ret .. ','
if self.class.myConfiguration.template.addCommentsToConfig then
ret = ret .. '\t-- ' .. self.class.myConfiguration.parameter[attr].description
end
ret = ret .. '\n'
end
return ret
end

local _privateMethod = function (self)
_debug(self, 1, 'entering private _privateMethod() to do something, from ' .. tostring(self))
end

-- **************** declaration of public methods
-- use self.class.myConfiguration to access your configuration in a public method
function ClassgeneratorParameter:addInfobox()
_debug(self, 1, 'entering ClassgeneratorParameter:addInfobox(), from ' .. tostring(self))
if self:goodToGo() then
local _CFG = self.class.myConfiguration
local coreData = self:getPrivate('coreData')
local ib_args = {
bodyclass = 'infobox_name',
aboveclass = 'objtitle titletext',
headerclass = 'headertext',
labelstyle = 'width: 30%;',
datastyle = 'width: 70%;',
title = self:getPrivate('uid'),
subheader = nil,
label1 = _CFG.parameter.name.label,
data1 = coreData.name and coreData.name or '',
header1 = nil,
}
self:addOutput(require('Module:Infobox').infobox(ib_args))
return true
end
return false
end

function ClassgeneratorParameter:addPageBody()
_debug(self, 1, 'entering ClassgeneratorParameter:addPageBody(), from ' .. tostring(self))
_debug(self, 2, ' rendering errors and warnings and adding them to output')
local frame = mw.getCurrentFrame()
self:addOutput(self:renderErrors())
self:addOutput(self:renderWarnings())
if self:goodToGo() then
self:addOutput('No out put yet')
return true
end
return false
end

function ClassgeneratorParameter:myArgumentProcessing(coreData)
_debug(self, 1, 'entering ClassgeneratorParameter:myArgumentProcessing(args) to process coreData, from ' .. tostring(self))
-- function that performs some individual transformation args --&gt; coreData
local coreData = coreData
-- if dataStore == 'cargo' set sf_cargo_table and sf_cargo_field
if (FoundationClass.globalConfig.dataStore == 'cargo' or FoundationClass.globalConfig.dataStore == 'both') and FoundationClass.myYesno(coreData.cargo) and FoundationClass.myYesno(coreData.add_cargo_table_and_field) then
coreData.cargo_table = 'global.cargoTable'
coreData.cargo_field = coreData.name
end
coreData.add_cargo_table_and_field = nil
if (FoundationClass.globalConfig.dataStore == 'smw' or FoundationClass.globalConfig.dataStore == 'both') and FoundationClass.myYesno(coreData.property) then
coreData.property_name = mw.ustring.gsub(mw.ustring.gsub(coreData.property_name, ' ', '_'), mw.site.namespaces[mw.title.new('Nul', 'Property').namespace].name .. ':', '')
else
coreData.property_name = nil
coreData.property_type = nil
end
if coreData.sf and mw.ustring.lower(coreData.sf) == 'holds template' then
coreData.sf = 'yes'
coreData.holds_template = 'true'
end
if coreData.show_on_select and type(coreData.show_on_select) == 'table' then
local sos = {}
for _, selector in pairs(coreData.show_on_select) do
local value, field = mw.ustring.match(selector, '^([^=]+)%s*=%s*(.+)$')
if value and field then
if mw.ustring.match(value, ' ') then
value = '[\'' .. value .. '\']'
end
if not sos[value] then
sos[value] = {}
end
table.insert(sos[value], field)
elseif coreData.input_type == 'checkbox' or selector == 'false' then
table.insert(sos, mw.text.trim(selector))
else
self:addError('Error processing value for \'\'' .. self.class.myConfiguration.parameter.show_on_select.label .. '\'\': ' ..
ClassgeneratorParameter.myTableTools.printTable(coreData.show_on_select) .. ' on entry :' .. mw.text.encode(selector))
end
end
coreData.show_on_select = sos
--coreData.show_on_select = FoundationClass.myTableTools.printTable(sos)
--coreData.show_on_select = FoundationClass.myTableTools.printTable(coreData.show_on_select)
end
-- kill two cosmetical switches
coreData.cargo = nil
coreData.property = nil
return coreData -- this is your new coreData.
end

function ClassgeneratorParameter:myPlausibilityTest(args)
_debug(self, 1, 'entering ClassgeneratorParameter:myPlausibilityTest(args) to test arguments, from ' .. tostring(self))
local _CFG = self.class.myConfiguration
-- function that performs the individual plausibility tests
-- note: before you access a field args.fieldname you should check for existance
-- self:addError(text)
if args.name and not mw.ustring.match(args.name, '^[a-zA-Z_][0-9a-zA-Z_-]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.name.label .. ': "' .. mw.text.encode(tostring(args.name)) .. '"')
end
if args.cargo_size and not mw.ustring.match(args.cargo_size, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.cargo_size.label .. ': "' .. mw.text.encode(tostring(args.cargo_size)) .. '"')
end
if args.cols and not mw.ustring.match(args.cols, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.cols.label .. ': "' .. mw.text.encode(tostring(args.cols)) .. '"')
end
if args.max_values and not mw.ustring.match(args.max_values, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.max_values.label .. ': "' .. mw.text.encode(tostring(args.max_values)) .. '"')
end
if args.maxlength and not mw.ustring.match(args.maxlength, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.maxlength.label .. ': "' .. mw.text.encode(tostring(args.maxlength)) .. '"')
end
if args.rows and not mw.ustring.match(args.rows, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.rows.label .. ': "' .. mw.text.encode(tostring(args.rows)) .. '"')
end
if args.size and not mw.ustring.match(args.size, '^[0-9]*$') then
self:addError('Invalid value detected for parameter ' .. _CFG.parameter.size.label .. ': "' .. mw.text.encode(tostring(size.cols)) .. '"')
end
return false -- return value will be ignored. but if you add any error, the object's initialization will fail with the error
end

function ClassgeneratorParameter:myStashAdjustments(stash)
_debug(self, 1, 'entering ClassgeneratorParameter:myStashAdjustments(stash) to do some minor adjustments on data before storing, from ' .. tostring(self))
-- function that alters the stash before storing the data
local stash = stash
return stash -- this is your new stash. this will be stored. it has format (fieldname: value)
end

function ClassgeneratorParameter:render()
_debug(self, 1, 'entering ClassgeneratorParameter:render() to render the code I pass to template class generator, from ' .. tostring(self))
local str = ''
if self:goodToGo() then
local _CFG = self.class.myConfiguration
local coreData = self:getCoreData()
local indent = '\t'
local sfAttributes = {}
for _, val in pairs(_CFG.form.fieldOrderSFgeneral) do
table.insert(sfAttributes, val)
end
for _, val in pairs(_CFG.form.fieldOrderSFtypeDependent) do
table.insert(sfAttributes, val)
end
table.sort(sfAttributes)
if FoundationClass.myYesno(coreData.sf, true) then
str = str .. coreData.name
end
str = str .. _CFG.template.delimiterFormFieldName
str = str .. indent .. coreData.name .. ' = {\n'
for _, globalAttr in pairs(_CFG.form.fieldOrderGeneral) do
if globalAttr ~= 'sf' then
str = str .. _processAttribute(self, globalAttr, indent .. '\t')
elseif coreData.sf ~= 'Information' then
local sf = ''
sf = sf .. _processAttribute(self, 'cargo_table', indent .. '\t\t')
sf = sf .. _processAttribute(self, 'cargo_field', indent .. '\t\t')
for _, sfAttr in pairs(sfAttributes) do
sf = sf .. _processAttribute(self, sfAttr, indent .. '\t\t')
end
if mw.ustring.len(sf) > 0 then
str = str .. indent .. '\t' .. 'sf = {\n' .. sf .. indent .. '\t' .. '},\n'
end
end
end
str = str .. indent .. '},\n' .. _CFG.template.delimiterResult
else
str = tostring(self:renderErrors())
end
return str
end

return ClassgeneratorParameter

Modul:Classgenerator/parameter/class - Versionsgeschichte

imported>Oetterer am 8. August 2018 um 05:52 Uhr