Module:IPA symbol/sandbox
< Module:IPA symbol
Jump to navigation
Jump to search
Revision as of 02:03, 9 April 2019 by blackwiki>Nardog
Documentation for this module may be created at Module:IPA symbol/sandbox/doc
local data = mw.loadData('Module:IPA symbol/sandbox/data').data
local p = {}
local gsub = mw.ustring.gsub
local len = mw.ustring.len
local lower = mw.ustring.lower
local sub = mw.ustring.sub
local function reverseLook(t, s)
local ret
for i = 1, len(s) - 1 do
-- Look for 2-char matches first
ret = t[sub(s, i, i + 1)] or t[sub(s, i, i)]
if ret then break end
end
return ret or t[sub(s, -1)] -- Last character
end
local function returnData(s, dataType)
for _, v in ipairs(data.univPatterns) do
s = gsub(s, v.pat, v.rep)
end
local key = s
for _, v in ipairs(data.keyPatterns) do
key = gsub(key, v.pat, v.rep)
end
local ret = data.sounds[key] or data.diacritics[key]
or reverseLook(data.diacritics, s)
if ret and dataType then
if ret[dataType] then
ret = ret[dataType]
else
error(string.format('Invalid data type "%s"', dataType))
end
end
return ret
end
local function returnErrorCat()
local ns = mw.title.getCurrentTitle().namespace
if ns % 2 == 0 and ns ~= 2 then -- Non-talk and non-user
return '[[Category:International Phonetic Alphabet pages needing attention]]'
else
return ''
end
end
local function returnError(s)
return string.format(
'<span class="error">Error using {{[[Template:IPA symbol|IPA symbol]]}}: "%s" not found in list</span>%s',
s, returnErrorCat())
end
function p._main(s, errorText, output)
return returnData(s, output or 'article') or errorText or returnError(s)
end
function p.main(frame)
local args = {}
for k, v in pairs(frame.args) do
args[k] = v ~= '' and v
end
if not args.symbol then return '' end -- Exit early
if args.errortext == 'blank' then args.errortext = '' end
return p._main(args.symbol, args.errortext, args.output)
end
local function renderAudio(s, file)
if s then
s = require('Module:Yesno')(s, s)
if s == true then s = file end
if s ~= '' then
s = mw.getCurrentFrame():expandTemplate{
title = 'Template:Audio',
args = { s, 'listen', help = 'no' }
}
s = ' <span class="nowrap" style="font-size:85%">(' .. s ..
')</span>'
end
else
s = ''
end
return s
end
function p._link(s, displayText, prefix, suffix, audio, addSpan, errorText)
local t = returnData(s)
if t then
s = string.format('%s[[:%s|%s]]%s',
prefix or '', t.article, displayText or s, suffix or '')
if addSpan ~= 'no' then
local span = mw.html.create('span'):addClass('IPA')
if prefix or suffix then
span:addClass('nowrap'):attr('title',
'Representation in the International Phonetic Alphabet (IPA)')
end
s = tostring(span:wikitext(s))
end
return s .. renderAudio(audio, t.audio)
else
return errorText or returnError(s)
end
end
function p.link(frame)
local args = {}
for k, v in pairs(frame.args) do
args[k] = v ~= '' and v
end
if not args.symbol then return '' end -- Exit early
if args.errortext == 'blank' then args.errortext = '' end
return p._link(args.symbol, args.text, args.prefix, args.suffix, args.audio,
args.span, args.errortext)
end
function p._textlink(s, lowercase, errorText)
local t = returnData(s)
if t then
s = t.name
local article = ''
if s ~= t.article then
article = t.article .. '|'
end
if lowercase == 'yes' then
s = lower(sub(s, 1, 1)) .. sub(s, 2)
end
return string.format('[[:%s%s]]', article, s)
else
return errorText or returnError(s)
end
end
function p.textlink(frame)
local args = {}
for k, v in pairs(frame.args) do
args[k] = v ~= '' and v
end
if not args.symbol then return '' end -- Exit early
if args.errortext == 'blank' then args.errortext = '' end
return p._textlink(args.symbol, args.lowercase, args.errortext)
end
return p