Gaa na ọdịnaya

Module:ISO 3166

Tinye njikọ
Shí Wikipedia, njikotá édémédé nke onyobulạ

Templeeti:High risk

This module returns a country's or subdivision's code (alpha-2, alpha-3, numeric) or name (ISO, non-ISO) from ISO 3166 from a variety of inputs (alpha-2, alpha-3, numeric, name, ISO-name, alternative names). The module also removes junk from the input.

Examples

Countries (ISO 3166-1)

All three types of ISO 3166-1 codes (alpha-2, alpha-3 and numeric) work as inputs to name, as well as to code (which can therefore also be used to convert between different code types). Use |codetype= to output alpha-3 or numeric codes in code instead of the default alpha-2 codes.

Name

To get the common name use the name function

  • {{#invoke:ISO 3166|name|GB}} → United Kingdom
  • {{#invoke:ISO 3166|name|GBR}} → United Kingdom
  • {{#invoke:ISO 3166|name|826}} → United Kingdom

ISO Name

To get the ISO name use the name function with isoname = yes

  • {{#invoke:ISO 3166|name|GB|isoname=yes}} → United Kingdom of Great Britain and Northern Ireland
  • {{#invoke:ISO 3166|name|GBR|isoname=yes}} → United Kingdom of Great Britain and Northern Ireland
  • {{#invoke:ISO 3166|name|826|isoname=yes}} → United Kingdom of Great Britain and Northern Ireland

Alpha-2

To get the alpha 2 code use the code function

  • {{#invoke:ISO 3166|code|826}} → GB
  • {{#invoke:ISO 3166|code|United Kingdom}} → GB
  • {{#invoke:ISO 3166|code|UK}} → GB

Alpha-3

To get the alpha 3 code use the code function with codetype = 3

  • {{#invoke:ISO 3166|code|United Kingdom|codetype=alpha3}} → GBR
  • {{#invoke:ISO 3166|name|GB}} → United Kingdom
  • {{#invoke:ISO 3166|name|GBR}} → United Kingdom
  • {{#invoke:ISO 3166|name|826}} → United Kingdom
  • {{#invoke:ISO 3166|code|UK|codetype=alpha3}} → GBR

Numeric

To get the numeric code use the code function with codetype = numeric or use the numeric function

  • {{#invoke:ISO 3166|numeric|GB}} → Script error: The function "numeric" does not exist.
  • {{#invoke:ISO 3166|code|GB|codetype=numeric}} → 826

Subdivisions (ISO 3166-2)

Inputs to name must be valid ISO 3166-2 codes, i.e. the country's alpha-2 code for the first part, and up to three alphanumeric characters for the second part. They may be given normally (with a hyphen between the parts), or split between two unnamed parameters. For code, the first parameter is the country name (or any of its three codes, like above), and the second the subdivision name.

Code (alpha-2)

To get the alpha-2 code of a subdivision use the code function with parameter 1 being the country and parameter 2 being the subdivision

  • {{#invoke:ISO 3166|code|United Kingdom|England}} → GB-ENG
  • {{#invoke:ISO 3166|code|GBR|England}} → GB-ENG
  • {{#invoke:ISO 3166|code|GB|England}} → GB-ENG

Name

To get the name of a subdivision use the name function with parameter 1 being the country and parameter 2 being the subdivsion or parameter 1 being the subdivsion code

  • {{#invoke:ISO 3166|name|GB-ENG}} → England
  • {{#invoke:ISO 3166|name|GB|ENG}} → England

|isoname= works for subnational entities as well; keep in mind that ISO 3166-2 uses (transliterations of) local names that may differ from English ones. Set |lang= to a language code to switch between different languages for entities that have multiple ISO names. The default language for multilingual entities can be set on the country's data page.

  • {{#invoke:ISO 3166|name|BE|BRU}} → Brussels
  • {{#invoke:ISO 3166|name|BE|BRU|isoname=yes}} → Bruxelles-Capitale, Région de
  • {{#invoke:ISO 3166|name|BE|BRU|lang=fr}} → Bruxelles-Capitale, Région de
  • {{#invoke:ISO 3166|name|BE|BRU|lang=nl}} → Brussels Hoofdstedelijk Gewest

Tracking categories

See also

Subpages

local p = {}

local data = mw.loadData("Module:ISO 3166/data/National")

local function cerror(eot,errortext,inputtext)
  if eot=="empty" or eot=="" then
    return nil
  elseif eot=="input" then
    return inputtext
  else
    return mw.html.create("span"):addClass("error"):wikitext("Error in [[Module:ISO 3166]]: "..errortext)
  end
end

local function findname(code,cdata,qry)
  local sqry = p.strip(qry)
  if cdata["name"] and sqry==p.strip(cdata["name"])
    or cdata["isoname"] and sqry==p.strip(cdata["isoname"])
    or not cdata["nocode"] and sqry==code
    or sqry==cdata["alpha3"] or sqry==cdata["numeric"]
  then
    return true
  end
  for _,tname in pairs(cdata["isonames"] or {}) do
    if sqry==p.strip(tname) then
      return true
    end
  end
  for _,tname in pairs(cdata["altnames"] or {}) do
    if sqry==p.strip(tname) then
      return true
    end
  end
  return false
end

local function isoname(data,code,lang)
  if data[code]["isonames"] then
    local name = data[code]["isonames"][lang or data[code]["defaultlang"] or data["defaultlang"] or "en"]
                 or data[code]["isonames"][data[code]["defaultlang"] or data["defaultlang"] or "en"]
                 or data[code]["isonames"]["en"]
    if name then return name end
    for _,iname in pairs(data[code]["isonames"]) do return iname end
    return data[code]["isodisplayname"] or data[code]["isoname"]
  else
    return data[code]["isodisplayname"] or data[code]["isoname"]
  end
end

function p.strip(text)
  text = mw.ustring.upper(text)                     --Case insensitivity
  text = string.gsub(text,"^THE ","")               --Remove definite article
  text = string.gsub(text,"[%s%-%,%.%(%)%/%\']","") --Remove spacing and punctuation
  local accents = {["À"]="A",["Á"]="A",["Â"]="A",["Ã"]="A",["Ä"]="A",["Å"]="A",["Ç"]="C",["È"]="E",["É"]="E",
                   ["Ê"]="E",["Ë"]="E",["Ì"]="I",["Í"]="I",["Î"]="I",["Ï"]="I",["Ñ"]="N",["Ò"]="O",["Ó"]="O",
                   ["Ô"]="O",["Õ"]="O",["Ö"]="O",["Ø"]="O",["Ù"]="U",["Ú"]="U",["Û"]="U",["Ü"]="U",["Ý"]="Y"}
  text = mw.ustring.gsub(text,"[À-Ý]",accents)      --Deaccent
  return text
end

function p.luaname(args)

local eot = args.error or ""

if not args[1] then
  return cerror(eot,"No parameter given",args[2] or "")
end

local code1 = args[1] or ""; local code2 = args[2] or ""
if string.find(code1,"%-") then
  code1, code2 = string.match(code1,"^([^%-]*)%-(.*)$")
end
local orig = code1..(code1 and code2 and "-" or "")..code2
code1 = string.upper(code1); code2 = string.upper(code2)

if --Check if valid code
  --No non-alphanumeric characters allowed
  string.find(code1..code2,"[^A-Z0-9]")
  --3166-1 codes can be two or three letters or three digits;
  --3166-2 codes must be two letters (first part) and 1-3 letters or digits (second part)
  or not (string.find(code1,"^%u%u%u?$") or string.find(code1,"^%d%d%d$"))
  or not string.find(code2,"^%w?%w?%w?$")
  or not (string.find(code1,"^%u%u$") or code2=="")
then
  if code2=="" then
    return cerror(eot,"Invalid ISO 3166-1 code "..code1,orig)
  else
    return cerror(eot,"Invalid ISO 3166-2 code "..code1.."-"..code2,orig)
  end
end

if string.find(code1,"^%u%u$") then
  if code2=="" then
    --3166-1 alpha-2 code
    if data[code1] then
      return (args.isoname or args.lang) 
             and isoname(data,code1,args.lang)
             or (data[code1]["displayname"] or data[code1]["name"])
    else
      return cerror(eot,"Unknown ISO 3166-1 code "..code1,orig)
    end
  else
    --3166-2 code
    local sdata
    if data[code1] then
      sdata = mw.loadData("Module:ISO 3166/data/"..code1)
    else
      return cerror(eot,"Unknown ISO 3166-1 code "..code1,orig)
    end
    if sdata[code2] then
      return (args.isoname or args.lang)
             and isoname(sdata,code2,args.lang)
             or (sdata[code2]["displayname"] or sdata[code2]["name"])
    else
      for _,_ in pairs(sdata) do
        return cerror(eot,"Unknown ISO 3166-2 code "..code1.."-"..code2,orig)
      end
      return cerror(eot,"No subdivision codes for "..data[code1]["name"],orig)
    end
  end
else
  --3166-1 alpha-3 or numeric code
  local codetype = string.find(code1,"%d") and "numeric" or "alpha3"
  for alpha2,cdata in pairs(data) do
    if cdata[codetype]==code1 then
      return (args.isoname or args.lang)
             and isoname(data,alpha2,args.lang)
             or (cdata["displayname"] or cdata["name"])
    end
  end
  return cerror(eot,"Unknown ISO 3166-1 code "..code1,orig)
end

end

function p.name(frame)

local args = require("Module:Arguments").getArgs(frame)
return p.luaname(args) or ""

end

function p.luacode(args)

local eot = args.error or ""

if not args[1] then
  return cerror(eot,"No parameter given",args[2] or "")
end

if not args[2] then
  --3166-1 code
  for alpha2,cdata in pairs(data) do
    if findname(alpha2,cdata,args[1]) then
      if args["codetype"]=="numeric" or args["codetype"]=="alpha3" then
        return cdata[args["codetype"]]
      else
        return alpha2
      end
    end
  end
  return cerror(eot,"Unknown country name "..args[1],args[1])
else
  --3166-2 code
  for alpha2,cdata in pairs(data) do
    if findname(alpha2,cdata,args[1]) then
      local sdata = mw.loadData("Module:ISO 3166/data/"..alpha2)
      local empty = true
      for scode,scdata in pairs(sdata) do
        if type(scdata)=="table" then
          empty = false
          if findname(scode,scdata,args[2]) then
            return alpha2.."-"..scode
          end
        end
      end
      if empty then
        return cerror(eot,"No subdivision codes for "..args[1],args[2])
      else
        return cerror(eot,"Unknown subdivision name "..args[2],args[2])
      end
    end
  end
  return cerror(eot,"Unknown country name "..args[1],args[2])
end

end

function p.code(frame)

local args = require("Module:Arguments").getArgs(frame)
return p.luacode(args) or ""

end

return p
Ewepụtara na https://ig.wikipedia.org/w/index.php?title=Module:ISO_3166&oldid=334021