Module:Latin

local p = {}

function p._removeaccents(rv)

rv = mw.ustring.gsub(rv,"[ÁÀÂÄǍĂĀÃÅĄ]","A")

rv = mw.ustring.gsub(rv,"[ÆǢǼ]","Ae")

rv = mw.ustring.gsub(rv,"[ĆĊĈČÇ]","C")

rv = mw.ustring.gsub(rv,"[ĎĐḌÐḐ]","D")

rv = mw.ustring.gsub(rv,"[ÉÈĖÊËĚĔĒẼĘẸƐƎƏỀỂỄẾỆ]","E")

rv = mw.ustring.gsub(rv,"[ĠĜĞĢ]","G")

rv = mw.ustring.gsub(rv,"[ĤĦḤ]","H")

rv = mw.ustring.gsub(rv,"[İÍÌÎÏǏĬĪĨĮỊ]","I")

rv = mw.ustring.gsub(rv,"[Ĵ]","J")

rv = mw.ustring.gsub(rv,"[Ķ]","K")

rv = mw.ustring.gsub(rv,"[ĹĿĽĻŁḶḸ]","L")

rv = mw.ustring.gsub(rv,"[Ṃ]","M")

rv = mw.ustring.gsub(rv,"[ŃŇÑŅṆŊ]","N")

rv = mw.ustring.gsub(rv,"[ÓÒÔÖǑŎŌÕǪỌŐØƆ]","O")

rv = mw.ustring.gsub(rv,"[Œ]","Oe")

rv = mw.ustring.gsub(rv,"[ŔŘŖṚṜꝚⱤɌƦȐȒṘ]","R")

rv = mw.ustring.gsub(rv,"[ŚŜŠŞȘṢ]","S")

rv = mw.ustring.gsub(rv,"[ŤŢȚṬ]","T")

rv = mw.ustring.gsub(rv,"[Þ]","Th")

rv = mw.ustring.gsub(rv,"[ÚÙÛÜǓŬŪŨŮŲỤŰǗǛǙǕ]","U")

rv = mw.ustring.gsub(rv,"[Ŵ]","W")

rv = mw.ustring.gsub(rv,"[ÝŶŸỸȲ]","Y")

rv = mw.ustring.gsub(rv,"[ŹŻŽ]","Z")

rv = mw.ustring.gsub(rv,"[áàâäǎăāãåąắăằắẳẵặâầẩẫấậả]","a")

rv = mw.ustring.gsub(rv,"[æǣǽ]","ae")

rv = mw.ustring.gsub(rv,"[ćċĉčç]","c")

rv = mw.ustring.gsub(rv,"[ďđḍðḑ]","d")

rv = mw.ustring.gsub(rv,"[éèėêëěĕēẽęẹɛǝəềểễếệ]","e")

rv = mw.ustring.gsub(rv,"[ġĝğģ]","g")

rv = mw.ustring.gsub(rv,"[ĥħḥḩ]","h")

rv = mw.ustring.gsub(rv,"[ıíìîïǐĭīĩįị]","i")

rv = mw.ustring.gsub(rv,"[ĵ]","j")

rv = mw.ustring.gsub(rv,"[ķ]","k")

rv = mw.ustring.gsub(rv,"[ĺŀľļłḷḹ]","l")

rv = mw.ustring.gsub(rv,"[ṃ]","m")

rv = mw.ustring.gsub(rv,"[ńňñņṇŋ]","n")

rv = mw.ustring.gsub(rv,"[óòôöǒŏōõǫọőøɔơồ]","o")

rv = mw.ustring.gsub(rv,"[œ]","oe")

rv = mw.ustring.gsub(rv,"[ŕřŗṛṝꝛɽɍʀȑȓṙ]","r")

rv = mw.ustring.gsub(rv,"[śŝšşșṣ]","s")

rv = mw.ustring.gsub(rv,"[ß]","ss")

rv = mw.ustring.gsub(rv,"[ťţțṭ]","t")

rv = mw.ustring.gsub(rv,"[þ]","th")

rv = mw.ustring.gsub(rv,"[úùûüǔŭūũůųụűǘǜǚǖưứừ]","u")

rv = mw.ustring.gsub(rv,"[ŵ]","w")

rv = mw.ustring.gsub(rv,"[ýŷÿỹȳ]","y")

rv = mw.ustring.gsub(rv,"[źżž]","z")

return rv

end

function p.removeaccents(frame)

local rv = mw.ustring.toNFC (frame.args[1])

-- if (true) then return mw.ustring.isutf8 (rv) end

return p._removeaccents(rv)

end

--[[

The next function returns a % encoding concomitant with ISO/IEC 8859-1. It encodes % and any non-reserved and non-unreserved

characters.

Space is currently encoded as an underscore.

Reserved characters are currently not encoded.

]]

function p.urlencodeISO88591(frame)

local rv = mw.ustring.toNFC (frame.args[1])

-- % first to avoid double encoding

rv = mw.ustring.gsub(rv,"%%","%%%%")

-- space to underscore, then punctuation which is not reserved

rv = mw.ustring.gsub(rv," ","_")

rv = mw.ustring.gsub(rv,"\034;","%%22") -- quote mark

rv = mw.ustring.gsub(rv,"<","%%3C")

rv = mw.ustring.gsub(rv,">","%%3E")

rv = mw.ustring.gsub(rv,"\\","%%5C") -- backslash does not work with "\092", "%\" or "\"

rv = mw.ustring.gsub(rv,"%^","%%5E")

rv = mw.ustring.gsub(rv,"`","%%60")

rv = mw.ustring.gsub(rv,"{","%%7B")

rv = mw.ustring.gsub(rv,"|","%%7C")

rv = mw.ustring.gsub(rv,"}","%%7D")

-- all the rest of the codepoints that are printable

rv = mw.ustring.gsub(rv,"\194\160","%%A0")

rv = mw.ustring.gsub(rv,"\194\161","%%A1")

rv = mw.ustring.gsub(rv,"\194\162","%%A2")

rv = mw.ustring.gsub(rv,"\194\163","%%A3")

rv = mw.ustring.gsub(rv,"\194\164","%%A4")

rv = mw.ustring.gsub(rv,"\194\165","%%A5")

rv = mw.ustring.gsub(rv,"\194\166","%%A6")

rv = mw.ustring.gsub(rv,"\194\167","%%A7")

rv = mw.ustring.gsub(rv,"\194\168","%%A8")

rv = mw.ustring.gsub(rv,"\194\169","%%A9")

rv = mw.ustring.gsub(rv,"\194\170","%%AA")

rv = mw.ustring.gsub(rv,"\194\171","%%AB")

rv = mw.ustring.gsub(rv,"\194\172","%%AC")

rv = mw.ustring.gsub(rv,"\194\173","%%AD")

rv = mw.ustring.gsub(rv,"\194\174","%%AE")

rv = mw.ustring.gsub(rv,"\194\175","%%AF")

rv = mw.ustring.gsub(rv,"\194\176","%%B0")

rv = mw.ustring.gsub(rv,"\194\177","%%B1")

rv = mw.ustring.gsub(rv,"\194\178","%%B2")

rv = mw.ustring.gsub(rv,"\194\179","%%B3")

rv = mw.ustring.gsub(rv,"\194\180","%%B4")

rv = mw.ustring.gsub(rv,"\194\181","%%B5")

rv = mw.ustring.gsub(rv,"\194\182","%%B6")

rv = mw.ustring.gsub(rv,"\194\183","%%B7")

rv = mw.ustring.gsub(rv,"\194\184","%%B8")

rv = mw.ustring.gsub(rv,"\194\185","%%B9")

rv = mw.ustring.gsub(rv,"\194\186","%%BA")

rv = mw.ustring.gsub(rv,"\194\187","%%BB")

rv = mw.ustring.gsub(rv,"\194\188","%%BC")

rv = mw.ustring.gsub(rv,"\194\189","%%BD")

rv = mw.ustring.gsub(rv,"\194\190","%%BE")

rv = mw.ustring.gsub(rv,"\194\191","%%BF")

rv = mw.ustring.gsub(rv,"\195\128","%%C0")

rv = mw.ustring.gsub(rv,"\195\129","%%C1")

rv = mw.ustring.gsub(rv,"\195\130","%%C2")

rv = mw.ustring.gsub(rv,"\195\131","%%C3")

rv = mw.ustring.gsub(rv,"\195\132","%%C4")

rv = mw.ustring.gsub(rv,"\195\133","%%C5")

rv = mw.ustring.gsub(rv,"\195\134","%%C6")

rv = mw.ustring.gsub(rv,"\195\135","%%C7")

rv = mw.ustring.gsub(rv,"\195\136","%%C8")

rv = mw.ustring.gsub(rv,"\195\137","%%C9")

rv = mw.ustring.gsub(rv,"\195\138","%%CA")

rv = mw.ustring.gsub(rv,"\195\139","%%CB")

rv = mw.ustring.gsub(rv,"\195\140","%%CC")

rv = mw.ustring.gsub(rv,"\195\141","%%CD")

rv = mw.ustring.gsub(rv,"\195\142","%%CE")

rv = mw.ustring.gsub(rv,"\195\143","%%CF")

rv = mw.ustring.gsub(rv,"\195\144","%%D0")

rv = mw.ustring.gsub(rv,"\195\145","%%D1")

rv = mw.ustring.gsub(rv,"\195\146","%%D2")

rv = mw.ustring.gsub(rv,"\195\147","%%D3")

rv = mw.ustring.gsub(rv,"\195\148","%%D4")

rv = mw.ustring.gsub(rv,"\195\149","%%D5")

rv = mw.ustring.gsub(rv,"\195\150","%%D6")

rv = mw.ustring.gsub(rv,"\195\151","%%D7")

rv = mw.ustring.gsub(rv,"\195\152","%%D8")

rv = mw.ustring.gsub(rv,"\195\153","%%D9")

rv = mw.ustring.gsub(rv,"\195\154","%%DA")

rv = mw.ustring.gsub(rv,"\195\155","%%DB")

rv = mw.ustring.gsub(rv,"\195\156","%%DC")

rv = mw.ustring.gsub(rv,"\195\157","%%DD")

rv = mw.ustring.gsub(rv,"\195\158","%%DE")

rv = mw.ustring.gsub(rv,"\195\159","%%DF")

rv = mw.ustring.gsub(rv,"\195\160","%%E0")

rv = mw.ustring.gsub(rv,"\195\161","%%E1")

rv = mw.ustring.gsub(rv,"\195\162","%%E2")

rv = mw.ustring.gsub(rv,"\195\163","%%E3")

rv = mw.ustring.gsub(rv,"\195\164","%%E4")

rv = mw.ustring.gsub(rv,"\195\165","%%E5")

rv = mw.ustring.gsub(rv,"\195\166","%%E6")

rv = mw.ustring.gsub(rv,"\195\167","%%E7")

rv = mw.ustring.gsub(rv,"\195\168","%%E8")

rv = mw.ustring.gsub(rv,"\195\169","%%E9")

rv = mw.ustring.gsub(rv,"\195\170","%%EA")

rv = mw.ustring.gsub(rv,"\195\171","%%EB")

rv = mw.ustring.gsub(rv,"\195\172","%%EC")

rv = mw.ustring.gsub(rv,"\195\173","%%ED")

rv = mw.ustring.gsub(rv,"\195\174","%%EE")

rv = mw.ustring.gsub(rv,"\195\175","%%EF")

rv = mw.ustring.gsub(rv,"\195\176","%%F0")

rv = mw.ustring.gsub(rv,"\195\177","%%F1")

rv = mw.ustring.gsub(rv,"\195\178","%%F2")

rv = mw.ustring.gsub(rv,"\195\179","%%F3")

rv = mw.ustring.gsub(rv,"\195\180","%%F4")

rv = mw.ustring.gsub(rv,"\195\181","%%F5")

rv = mw.ustring.gsub(rv,"\195\182","%%F6")

rv = mw.ustring.gsub(rv,"\195\183","%%F7")

rv = mw.ustring.gsub(rv,"\195\184","%%F8")

rv = mw.ustring.gsub(rv,"\195\185","%%F9")

rv = mw.ustring.gsub(rv,"\195\186","%%FA")

rv = mw.ustring.gsub(rv,"\195\187","%%FB")

rv = mw.ustring.gsub(rv,"\195\188","%%FC")

rv = mw.ustring.gsub(rv,"\195\189","%%FD")

rv = mw.ustring.gsub(rv,"\195\190","%%FE")

rv = mw.ustring.gsub(rv,"\195\191","%%FF")

return rv

end

return p