Modul:tillar

Ishorat qoʻshish
Vikilug‘atdan olingan

local export = {}

local find = mw.ustring.find

--[=[ This function checks for things that could plausibly be a language code: two or three lowercase letters, two or three groups of three lowercase letters with hyphens between them. If such a pattern is not found, it is likely the editor simply forgot to enter a language code. ]=]

function export.err(langCode, param, text) local ordinals = { "first", "second", "third", "fourth" }

if type(param) == "number" then ordinal = ordinals[param] param = ordinal .. ' parameter' elseif type(param) == "string" then param = 'parameter "' .. param .. '"' else error("The parameter name is " .. ( type(param) == "table" and "a table" or tostring(param) ) .. ", but it should be a number or a string.") end

--[[ Can't use "%l" because that would include all Unicode lowercase letters; language codes only use ASCII. ]] local lower = "[a-z]"

if not langCode or langCode == "" then error("The " .. param .. " (" .. (text or "language code" ) .. ") is missing.", 2) elseif find(langCode, "^" .. lower .. lower .. lower .. "?$") or find(langCode, "^" .. lower .. lower .. lower .. "%-" .. lower .. lower .. lower .. "$") or find(langCode, "^" .. lower .. lower .. lower .. "%-" .. lower .. lower .. lower .. "%-" .. lower .. lower .. lower .. "$") then error("The language code \"" .. langCode .. "\" is not valid.", 2) else error("Please enter a " .. ( text or "language code" ) .. " in the " .. param .. ".", 2) end end

local Tili = {}

function Tili:getCode() return self._code end


function Tili:getCanonicalName() return self._rawData.canonicalName end


-- Commented out; I don't think anything uses this, the presence/absence of script errors should confirm --funtsiya Tili:getAllNames() -- return self._rawData.names --end


function Tili:getOtherNames() return self._rawData.otherNames or {} end


function Tili:getType() return self._rawData.type or "regular" end


function Tili:getWikimediaLanguages() if not self._wikimediaLanguageObjects then local m_wikimedia_languages = require("Module:wikimedia languages") self._wikimediaLanguageObjects = {} local wikimedia_codes = self._rawData.wikimedia_codes or {self._code}

for _, wlangcode in ipairs(wikimedia_codes) do table.insert(self._wikimediaLanguageObjects, m_wikimedia_languages.getByCode(wlangcode)) end end

return self._wikimediaLanguageObjects end


function Tili:getWikipediaArticle() return self._rawData.wikipedia_article or self:getCategoryName() end


function Tili:makeWikipediaLink() return "" .. self:getCanonicalName() .. "" end


function Tili:getScripts() if not self._scriptObjects then local m_scripts = require("Module:scripts") self._scriptObjects = {}

for _, sc in ipairs(self._rawData.scripts or {"None"}) do table.insert(self._scriptObjects, m_scripts.getByCode(sc)) end end

return self._scriptObjects end


function Tili:getFamily() if self._rawData.family and not self._familyObject then self._familyObject = require("Module:families").getByCode(self._rawData.family) end

return self._familyObject end


function Tili:getAncestors() if not self._ancestorObjects then self._ancestorObjects = {}

if self._rawData.ancestors then for _, ancestor in ipairs(self._rawData.ancestors) do table.insert(self._ancestorObjects, export.getByCode(ancestor) or require("Module:etymology languages").getByCode(ancestor)) end else local fam = self:getFamily() local protoLang = fam and fam:getProtoLanguage() or nil

-- For the case where the current language is the proto-language -- of its family, we need to step up a level higher right from the start. if protoLang and protoLang:getCode() == self:getCode() then fam = fam:getFamily() protoLang = fam and fam:getProtoLanguage() or nil end

while not protoLang and not (not fam or fam:getCode() == "qfa-not") do fam = fam:getFamily() protoLang = fam and fam:getProtoLanguage() or nil end

table.insert(self._ancestorObjects, protoLang) end end

return self._ancestorObjects end

local function iterateOverAncestorTree(node, func) for _, ancestor in ipairs(node:getAncestors()) do if ancestor then local ret = func(ancestor) or iterateOverAncestorTree(ancestor, func) if ret then return ret end end end end

function Tili:getAncestorChain() if not self._ancestorChain then self._ancestorChain = {} local step = #self:getAncestors() == 1 and self:getAncestors()[1] or nil

while step do table.insert(self._ancestorChain, 1, step) step = #step:getAncestors() == 1 and step:getAncestors()[1] or nil end end

return self._ancestorChain end


function Tili:hasAncestor(otherlang) local function compare(ancestor) return ancestor:getCode() == otherlang:getCode() end return iterateOverAncestorTree(self, compare) or false end


function Tili:getCategoryName() local name = self._rawData.canonicalName

-- If the name already has "language" in it, don't add it. if name:find("[Tt]illar$") then return name else return name .. " tili" end end


function Tili:getStandardCharacters() return self._rawData.standardChars end


function Tili:makeEntryName(text) text = mw.ustring.gsub(text, "^[¿¡]", "") text = mw.ustring.gsub(text, "(.)[؟?!;՛՜ ՞ ՟？！।॥။၊་།]$", "%1")

if self:getCode() == "ar" then local U = mw.ustring.char local taTwiil = U(0x640) local waSla = U(0x671) -- diacritics ordinarily removed by entry_name replacements local Arabic_diacritics = U(0x64B, 0x64C, 0x64D, 0x64E, 0x64F, 0x650, 0x651, 0x652, 0x670)

if text == waSla or mw.ustring.find(text, "^" .. taTwiil .. "?[" .. Arabic_diacritics .. "]" .. "$") then return text end end

if self._rawData.entry_name then for i, from in ipairs(self._rawData.entry_name.from) do local to = self._rawData.entry_name.to[i] or "" text = mw.ustring.gsub(text, from, to) end end

--[=[ For instance, ᾰ (alpha-breve) + combining smooth breathing is converted to alpha + combining smooth breathing by the entry_name replacements. It must be re-combined to alpha-smooth breathing (ἀ) so that allowSelfLink in Module:links will work properly. ]=] if self:getCode() == "grc" then text = mw.ustring.toNFC(text) end

return text end


function Tili:makeSortKey(name) name = mw.ustring.lower(name)

-- Remove initial hyphens and * local hyphens_regex = "^[-־ـ*]+(.)" name = mw.ustring.gsub(name, hyphens_regex, "%1")

-- Remove parentheses, as long as they are either preceded or followed by something name = mw.ustring.gsub(name, "(.)[()]+", "%1") name = mw.ustring.gsub(name, "[()]+(.)", "%1")

-- If there are language-specific rules to generate the key, use those if self._rawData.sort_key then for i, from in ipairs(self._rawData.sort_key.from) do local to = self._rawData.sort_key.to[i] or "" name = mw.ustring.gsub(name, from, to) end end

return mw.ustring.upper(name) end

function Tili:overrideManualTranslit() if self._rawData.override_translit then return true else return false end end


function Tili:transliterate(text, sc, module_override) if not ((module_override or self._rawData.translit_module) and text) then return nil end

if module_override then require("Module:debug").track("module_override") end

return require("Module:" .. (module_override or self._rawData.translit_module)).tr(text, self:getCode(), sc and sc:getCode() or nil) end

function Tili:hasTranslit() return self._rawData.translit_module and true or false end


function Tili:link_tr() return self._rawData.link_tr and true or false end


function Tili:toJSON() local entryNamePatterns = nil

if self._rawData.entry_name then entryNamePatterns = {}

for i, from in ipairs(self._rawData.entry_name.from) do local to = self._rawData.entry_name.to[i] or "" table.insert(entryNamePatterns, {from = from, to = to}) end end

local ret = { ancestors = self._rawData.ancestors, canonicalName = self:getCanonicalName(), categoryName = self:getCategoryName(), code = self._code, entryNamePatterns = entryNamePatterns, family = self._rawData.family, otherNames = self:getOtherNames(), scripts = self._rawData.scripts, type = self:getType(), wikimediaLanguages = self._rawData.wikimedia_codes, }

return require("Module:JSON").toJSON(ret) end


-- Do NOT use this method! -- All uses should be pre-approved on the talk page! function Tili:getRawData() return self._rawData end

Tili.__index = Tili


function export.getDataModuleName(code) if code:find("^[a-z][a-z]$") then return "tili/data2" elseif code:find("^[a-z][a-z][a-z]$") then local prefix = code:sub(1, 1) return "tili/data3/" .. prefix elseif code:find("^[a-z-]+$") then return "tili/datax" else return nil end end


local function getRawLanguageData(code) local modulename = export.getDataModuleName(code) return modulename and mw.loadData("Module:" .. modulename)[code] or nil end


function export.makeObject(code, data) if data and data.deprecated then require("Module:debug").track("tili/eskirgan") require("Module:debug").track("tili/eskirgan/" .. code) end

return data and setmetatable({ _rawData = data, _code = code }, Tili) or nil end


function export.getByCode(code) return export.makeObject(code, getRawLanguageData(code)) end


function export.getByName(name) local byName = mw.loadData("Module:tili/nomi bilan") local code = byName.all and byName.all[name] or byName[name]

if not code then return nil end

return export.makeObject(code, getRawLanguageData(code)) end


function export.getByCanonicalName(name) local byName = mw.loadData("Module:languages/canonical names") local code = byName and byName[name]

if not code then return nil end

return export.makeObject(code, getRawLanguageData(code)) end


function export.iterateAll() mw.incrementExpensiveFunctionCount() local m_data = mw.loadData("Module:tili/alldata") local func, t, var = pairs(m_data)

return function() local code, data = func(t, var) return export.makeObject(code, data) end end

return export 

-- Tillar boʻyicha tarjimalar roʻyxatini yaratish uchun modul
 
-- maʼlumotlar modulini tillar jadvali bilan yuklash
local languages = mw.loadData("Module:tili/data");
local p = {};

-- yordamchi funksiya, boʻsh joylarni oʻchiradi
local function trimstr(s)
  return (s:gsub("^%s*(.-)%s*$", "%1"));
end

function p.list(frame)
  local result = "";
  local names = {};
  local nnames = {};
  local key = "";
  local cnt = 0;
  local demo = frame.args['demo'];
  local tur = frame.args['tur'];
  local ikkilik = frame.args['ikkilik'];
  local belgi = '';
  if demo ~= nil and demo ~= "" then
    for code,v in pairs(languages) do
      key = v[2];
      if v[4] ~= nil and v[4] ~= "" then
        key = key .. v[4];
      end
      table.insert(nnames, key);
      names[key] = { code = v[1], name = v[2], index = v[3],  extention = v[4], image = v[5], value =  code};
      cnt = cnt +1;
    end; 
  else
    for code,value in pairs(frame:getParent().args) do
      if type(code)=='string' then 
        local trimmed = trimstr(code);
        local v = trimstr(value);
        local l = languages[trimmed];
        if l ~= nil and l ~= "" and v ~= nil and v ~= "" then
          key = l[2];
          if l[4] ~= nil and l[4] ~= "" then
            key = key .. l[4];
          end
          table.insert(nnames, key);
          names[key] = { code = l[1], name = l[2], index = l[3],  extention = l[4], image = l[5], value = v};
          cnt = cnt +1;
        end
      end
    end
  end
  if cnt > 0 then
  	if tur == 'keng' then
  		if ikkilik == '1' then
  			belgi = '====';
  		else
  			belgi = '===';
  		end
  	else
  		belgi = '*';
  	end
    table.sort(nnames);
    for i, key in ipairs(nnames) do
      local v = names[key];    
      -- result = result .. "* [[" .. mw.ustring.lower(v.name) .. "#Oʻzbekcha|" .. v.name .. "]]";
  	  result = result .. belgi .. " ";
      if v.image ~= nil and v.image ~= "" then
      	result = result .. "[[Fayl:Flag of " .. v.image .. ".svg|20px|]] ";
	  end
      result = result .. "[[" .. mw.ustring.lower(v.name) .. "#Oʻzbekcha|" .. v.name .. "]] ";
      if v.code ~= nil and v.code ~= "" then
        result = result .. "<span style='color:#33C066'><sub>" .. v.code .. "</sub></span>";
      end
      if v.index ~= nil and v.index ~= "" then
        result = result .. "<sup>" .. v.index .. "</sup>";
      end
      if v.extention ~= nil and v.extention ~= "" then
        result = result .. " " .. v.extention;
      end
      if tur == 'keng' then
      	result = result .. " " .. belgi .. "\n";
  	  else
  		result = result .. " : ";
  	  end
      result = result .. v.value .. "\n";
    end
  end
  return result
end

return p

"https://uz.wiktionary.org/w/index.php?title=Modul:tillar&oldid=460887" dan olindi