Module:Authority control

Documentation for this module may be created at Module:Authority control/doc

function outputError( message, cat )
    local str = '<span class="error">' .. message .. '</span>'
    if cat then
        str = str .. '[[Category:' .. cat .. ']]'
    end
    return str
end

function viafLink( id )
    if not string.match( id, '^%d+$' ) then
        return outputError( 'The VIAF id ' .. id .. ' is not valid.', 'Wikipedia articles with faulty authority control identifiers (VIAF)' )
    end
    return '<span class="uid">[http://viaf.org/viaf/' .. id .. ' ' .. id .. ']</span>'
end

local conf = {
    { 'VIAF', '[[Virtual International Authority File|VIAF]]', 0, viafLink }
}
    
local p = {}

function p.authorityControl( frame )
    local parentArgs = frame:getParent().args
    --Create rows
    local elements = {}
    for k, params in pairs( conf ) do
        if parentArgs[params[1]] and parentArgs[params[1]] ~= '' then
            table.insert( elements, params[2] .. ': ' .. params[4]( parentArgs[params[1]] ) )
        end
    end
    local Navbox = require('Module:Navbox')
    return Navbox._navbox( {
        name  = 'Authority control',
        bodyclass = 'hlist',
        group1 = '[[Authority control]]',
        list1 = table.concat( elements, '*' )
    } )
end

return p