什么无终
Lua
CodeDiscussionEditHistoryLinksLink count Subpages:DocumentationTestsResultsSandboxLive code All modules
 | This module is rated as ready for general use. It has reached a mature form and is thought to be bug-free and ready for use wherever appropriate. To reduce server load and bad output, it should be improved by sandbox testing rather than repeated trial-and-error editing. |
Supported languages (mappings in "MediaWiki:Lang/code" for {{int:lang}}, and their current native names)
- (?lang/yua?) maaya t’aan
- (gsw) Alemannisch
- (af) Afrikaans
- (ak) Akan
- (?lang/aig?) Aanteegan an' Baabyuudan
- (ang) ?nglisc
- (?lang/dlg?) долган тыла
- (ace) Acèh
- (sma) ?arjelsaemien
- (?lang/hoc-latn?) Ho
- (agq) Aghem
- (als) Alemannisch
- (en-us) American English
- (ase) American sign language
- (smn) anara?kiela
- (an) aragonés
- (aae) Arb?risht
- (rup) arm?neashti
- (roa-rup) arm?neashti
- (frp) arpetan
- (ast) asturianu
- (atj) Atikamekw
- (gn) Ava?e'?
- (da) dansk
- (hif) Fiji Hindi
- (az) az?rbaycanca
- (en-gb) British English
- (cbk-zam) Chavacano de Zamboanga
- (bax) Bamum
- (chn) chinuk wawa
- (id) Bahasa Indonesia
- (bkh) Bakoko
- (cps) Capice?o
- (ga) Gaeilge
- (egl) emiliàn e rumagnòl
- (gor) Bahasa Hulontalo
- (co) corsu
- (eto) Eton
- (gur) farefare
- (ca) català
- (gaa) Ga
- (fur) furlan
- (nan-latn-pehoeji) Ban-lam-gí (Pe?h-ōe-jī)
- (zh-min-nan) 閩南語 / Ban-lam-gí
- (dsb) dolnoserbski
- (cho) Chahta anumpa
- (nan-latn-tailo) Ban-lam-gí (Tai-l?)
- (frc) fran?ais cadien
- (?lang/cal?) Carolinian
- (sm) Gagana Samoa
- (gv) Gaelg
- (bm) bamanankan
- (cy) Cymraeg
- (bbc) Batak Toba
- (bcl) Bikol Central
- (en) English
- (etu) Ejagham
- (sn) chiShona
- (fy) Frysk
- (bjn) Banjar
- (pdc) Deitsch
- (map-bms) Basa Banyumasan
- (eo) Esperanto
- (se-fi) davvisámegiella (Suoma bealde)
- (fo) f?royskt
- (eml) emiliàn e rumagnòl
- (se-no) davvisámegiella (Norgga bealde)
- (ay) Aymar aru
- (de-formal) Deutsch (Sie-Form)
- (btm) Batak Mandailing
- (es-formal) espa?ol (formal)
- (bdr) Bajau Sama
- (fon) f??ngbè
- (na) Dorerin Naoero
- (en-ca) Canadian English
- (bew) Betawi
- (ban) Basa Bali
- (dag) dagbanli
- (br) brezhoneg
- (cs) ?e?tina
- (brh) Bráhuí
- (sje) bidumsámegiella
- (fmp) Fe'fe'
- (fr) fran?ais
- (wls) Faka?uvea
- (bs) bosanski
- (lua) ciluba
- (ny) Chi-Chewa
- (se-se) davvisámegiella (Ruo?a bealde)
- (nv) Diné bizaad
- (ms) Bahasa Melayu
- (es) espa?ol
- (efi) Ef?k
- (abs) bahasa ambon
- (hif-latn) Fiji Hindi
- (bug) Basa Ugi
- (et) eesti
- (es-419) espa?ol de América Latina
- (dua) Duala
- (eu) euskara
- (de) Deutsch
- (ee) e?egbe
- (vmw) emakhuwa
- (bbc-latn) Batak Toba
- (sei) Cmique Itom
- (ff) Fulfulde
- (se) davvisámegiella
- (dga) Dagaare
- (ksf) Bafia
- (bar) Boarisch
- (bkc) Baka
- (ext) estreme?u
- (bfd) Bafut
- (mh) Ebon
- (tum) chiTumbuka
- (mui) Baso Palembang
- (ewo) Ewondo
- (ceb) Cebuano
- (ch) Chamoru
- (bas) Basaa
- (bi) Bislama
- (gag) Gagauz
- (sjd) к?ллт са?мь к?лл
- (lus) Mizo ?awng
- (frr) Nordfriisk
- (koi) перем коми
- (mcp) Maka
- (mi) Māori
- (tay) Tayal
- (fit) me?nkieli
- (niu) Niuē
- (tt) татарча / tatar?a
- (fi) suomi
- (hyw) ??????????????
- (li) Limburgs
- (ki) G?k?y?
- (tg-latn) tojikī
- (dtp) Kadazandusun
- (st) Sesotho
- (kj) Kwanyama
- (mt) Malti
- (nmz) nawdm
- (kum) къумукъ
- (cak) Kaqchikel
- (byv) Medumba
- (pwn) pinayuanan
- (sh) srpskohrvatski / српскохрватски
- (tly) tol??i
- (hrx) Hunsrik
- (myv) эрзянь
- (it) italiano
- (sh-latn) srpskohrvatski (latinica)
- (de-at) ?sterreichisches Deutsch
- (lzz) Lazuri
- (ady-cyrl) адыгабзэ
- (mk) македонски
- (pih) Norfuk / Pitkern
- (ku) kurd?
- (bg) български
- (lg) Luganda
- (kg) Kongo
- (ng) Oshiwambo
- (mg) Malagasy
- (ojb) Ojibwemowin
- (ig) Igbo
- (tg) то?ик?
- (sg) S?ng?
- (ik) I?upiatun
- (mdf) мокшень
- (za) Vahcuengh
- (gcr) kriyòl gwiyannen
- (shi) Tacl?it
- (ku-latn) kurd? (lat?n?)
- (tk) Türkmen?e
- (nyn) runyankore
- (vut) Vute
- (kbp) Kab?y?
- (pt-br) português do Brasil
- (rut) мыха?бишды
- (ht) Kreyòl ayisyen
- (wya) Wyandot
- (jut) jysk
- (qu) Runa Simi
- (cpx-latn) Pó-sing-g?? (Bá?-uā-ci?)
- (sk) sloven?ina
- (nyo) Orunyoro
- (nnz) Nda'nda'
- (kcg) Tyap
- (acf) Kwéyòl Sent Lisi
- (ce) нохчийн
- (be) беларуская
- (nds-nl) Nedersaksies
- (nia) Li Niha
- (cu) слов?ньскъ / ??????????
- (?lang/hoc?) ?????? ??????
- (ie) Interlingue
- (fiu-vro) v?ro
- (aeb-latn) T?ns?
- (hu) magyar
- (mwl) Mirandés
- (tg-cyrl) то?ик?
- (szl) ?l?nski
- (gl) galego
- (nl-informal) Nederlands (informeel)
- (nap) Napulitano
- (sah) саха тыла
- (nog) ногайша
- (rgn) Rumagn?l
- (tt-latn) tatar?a
- (kab) Taqbaylit
- (gd) Gàidhlig
- (bqz) Mka'a
- (av) авар
- (gcf) kréyòl Gwadloup
- (cdo-latn) Mìng-d??ng-ng?? (Bàng-ua-cê)
- (sh-cyrl) српскохрватски (?ирилица)
- (kbd) адыгэбзэ
- (yrl) Nh??gatú
- (is) íslenska
- (ks) ?????
- (lez) лезги
- (os) ирон
- (nup) Nupe
- (ss) SiSwati
- (sty) себертатар
- (min) Minangkabau
- (lbe) лакку
- (zgh-latn) tamazi?t tanawayt
- (?lang/wlx?) waale
- (gpe) Ghanaian Pidgin
- (kaa) Qaraqalpaqsha
- (mnc) manju gisun
- (knc) Yerwa Kanuri
- (bat-smg) ?emait??ka
- (guw) gungbe
- (nys) Nyunga
- (hr) hrvatski
- (kr) kanuri
- (guc) wayuunaiki
- (nr) isiNdebele seSewula
- (mad) Madhura
- (kk-latn) qazaq?a (lat?n)
- (pam) Kapampangan
- (sr) српски / srpski
- (tru) ?uroyo
- (crh) q?r?mtatarca
- (jam) Patois
- (kai) Karai-karai
- (din) Thu??j??
- (shi-latn) Tacl?it
- (cr) Nēhiyawēwin / ???????
- (lld) Ladin
- (nds) Plattdüütsch
- (nnh) Ngiemboon
- (sq) shqip
- (crh-latn) q?r?mtatarca (Latin)
- (krc) къарачай-малкъар
- (shy-latn) tacawit
- (sco) Scots
- (aln) Geg?
- (wes) Pidgin (Cameroon)
- (ilo) Ilokano
- (be-tarask) беларуская (тарашкев?ца)
- (kjh) хакас
- (vep) veps?n kel’
- (ses) Koyraboro Senni
- (ker) Kera
- (ts) Xitsonga
- (rmc) romaňi ?hib
- (kk) ?аза?ша
- (krl) karjal
- (fkv) kv??ni
- (isu) Isu
- (lv) latvie?u
- (nso) Sesotho sa Leboa
- (kk-kz) ?аза?ша (?аза?стан)
- (pt) português
- (cop) ?????????????
- (arn) mapudungun
- (kv) коми
- (chy) Tsetsêhestahese
- (ro) roman?
- (pnt) Ποντιακ?
- (to) lea faka-Tonga
- (so) Soomaaliga
- (nb) norsk
- (mo) молдовеняскэ
- (tpi) Tok Pisin
- (kbd-cyrl) адыгэбзэ
- (io) Ido
- (rmf) kaalengo t?imb
- (fat) mfantse
- (jbo) la .lojban.
- (ibb) ibibio
- (bxr) буряад
- (kiu) K?rmancki
- (csb) kasz?bsczi
- (anp) ??????
- (pap-aw) Papiamento
- (lad) Ladino
- (hsb) hornjoserbsce
- (pcd) Picard
- (inh) г?алг?ай
- (rn) ikirundi
- (pcm) Naijá
- (tn) Setswana
- (mn) монгол
- (pdt) Plautdietsch
- (?lang/thq?) ??????? ????
- (?lang/ljp?) Lampung Api
- (ln) lingála
- (lt) lietuvi?
- (nmg) Kwasio
- (isv-cyrl) меджуслов?анскы
- (nah) Nāhuatl
- (cv) ч?вашла
- (mhr) олык марий
- (gom-latn) G?ychi Konknni
- (diq) Zazaki
- (qug) Runa shimi
- (bkm) Kom
- (mrj) кырык мары
- (iba) Jaku Iban
- (rm) rumantsch
- (nrm) Nouormand
- (kea) kabuverdianu
- (om) Oromoo
- (pms) Piemontèis
- (cnh) Hakha Chin
- (prg) prūsiskan
- (stq) Seeltersk
- (rif) Tarifit
- (bci) wawle
- (lij) Ligure
- (pag) Pangasinan
- (mnc-latn) manju gisun
- (hke) kihunde
- (mcn) vùn màsànà
- (tly-cyrl) толыши
- (rmy) romani ?hib
- (nov) Novial
- (crh-ro) tatar?a
- (ltg) latga?u
- (alt) алтай тил
- (ho) Hiri Motu
- (bto) Iriga Bicolano
- (yo) Yorùbá
- (zea) Zeêuws
- (kw) kernowek
- (vo) Volapük
- (sr-el) srpski (latinica)
- (scn) sicilianu
- (osa-latn) Wa?á?e íe
- (sl) sloven??ina
- (tl) Tagalog
- (ybb) Yemba
- (rw) Ikinyarwanda
- (yas) Nugunu
- (pl) polski
- (crh-cyrl) къырымтатарджа (Кирилл)
- (nl) Nederlands
- (kl) kalaallisut
- (vot) Va??a
- (roa-tara) tarandíne
- (xsy) saisiyat
- (isv-latn) med?uslovjansky
- (xmf) ?????????
- (el) Ελληνικ?
- (hil) Ilonggo
- (xh) isiXhosa
- (jv) Jawa
- (rsk) руски
- (igl) Igala
- (ru) русский
- (wo) Wolof
- (kk-cyrl) ?аза?ша (кирил)
- (wa) walon
- (ruq) Vl?he?te
- (haw) Hawai?i
- (war) Winaray
- (nge) Ngémba
- (kge) Kumoring
- (vro) v?ro
- (vmf) Mainfr?nkisch
- (ruq-cyrl) Влахесте
- (vi) Ti?ng Vi?t
- (vec) vèneto
- (ve) Tshivenda
- (uz-latn) o?zbekcha
- (uz-cyrl) ?збекча
- (udm) удмурт
- (la) Latina
- (uk) укра?нська
- (ug-latn) Uyghurche
- (hu-formal) magyar (formal)
- (mos) moore
- (uz) o?zbekcha / ?збекча
- (bbj) Ghomála'
- (tyv) тыва дыл
- (ruq-latn) Vl?he?te
- (ty) reo tahiti
- (nn) norsk nynorsk
- (tw) Twi
- (tvu) Tunen
- (ttj) Orutooro
- (tt-cyrl) татарча
- (ami) Pangcah
- (hak-latn) Hak-ka-ng? (Pha?k-fa-s?)
- (trv) Seediq
- (tr) Türk?e
- (?lang/tpv?) Tanapag
- (mus) Mvskoke
- (tok) toki pona
- (ka) ???????
- (liv) Līv? kē?
- (hz) Otsiherero
- (awa) ????
- (zu) isiZulu
- (smj) julevsámegiella
- (sdc) Sassaresu
- (fj) Na Vosa Vakaviti
- (gld) на?ни
- (sw) Kiswahili
- (sv) svenska
- (gya) Gbaya
- (kus) K?saal
- (aa) Qafár af
- (lns) Lamnso'
- (su) Sunda
- (mrh) Mara
- (srq) mbia che?
- (sro) sardu campidanesu
- (srn) Sranantongo
- (?lang/fvr?) poor’í? belé’?
- (rue) русиньскый
- (ky) кыргызча
- (be-x-old) беларуская (тарашкев?ца)
- (sr-ec) српски (?ирилица)
- (loz) Silozi
- (ba) баш?ортса
- (lem) Nomaande
- (quc) Qatzijob\?al
- (de-ch) Schweizer Hochdeutsch
- (bag) Tuki
- (ann) Obolo
- (wal) wolaytta
- (hy) ???????
- (xal) хальмг
- (nb) norsk bokm?l
- (olo) livvinkarjala
- (kri) Krio
- (tet) tetun
- (lb) L?tzebuergesch
- (yav) Yangben
- (ksh) Ripoarisch
- (pap) Papiamentu
- (szy) Sakizaya
- (sli) Schl?sch
- (ha) Hausa
- (ia) interlingua
- (sju) ubmejesámiengi?lla
- (ab) а?сш?а
- (lfn) Lingua Franca Nova
- (sms) nu?rtts???m?i?ll
- (lmo) lombard
- (ike-latn) inuktitut
- (avk) Kotava
- (vls) West-Vlams
- (ady) адыгабзэ
- (simple) Simple English
- (nla) Ngombala
- (ks-deva) ?????
- (shy) tacawit
- (kk-tr) qazaq?a (Türk?ya)
- (sgs) ?emait??ka
- (yat) Yambeta
- (pfl) P?lzisch
- (mua) Mundang
- (sc) sardu
- (oc) occitan
- (krj) Kinaray-a
- (grc) ?ρχα?α ?λληνικ?
- (?lang/gju-deva?) ???????
- (?lang/kgg?) ?????????? ????
- (gom-deva) ?????? ??????
- (gom) ?????? ?????? / G?ychi Konknni
- (dty) ??????
- (new) ????? ????
- (pi) ????
- (ne) ??????
- (bho) ???????
- (bh) ???????
- (mag) ????
- (mr) ?????
- (rwr) ????????
- (mai) ??????
- (sa) ?????????
- (bgc) ????????
- (hi) ??????
- (as) ???????
- (bn) ?????
- (bpy) ????????????? ???????
- (pa) ??????
- (syl) ?????
- (gu) ???????
- (or) ?????
- (?lang/dso?) ?????
- (?lang/bfw?) ???????
- (ta) ?????
- (nit) ??????
- (te) ??????
- (kn) ?????
- (tcy) ????
- (ml) ??????
- (si) ?????
- (dz) ?????
- (bo) ???????
- (mni) ???? ???
- (ksw) ????
- (blk) ?????????????
- (kjp) ????????
- (shn) ???
- (mnw) ???????
- (my) ??????????
- (ccp) ????????????
- (rki) ??????
- (km) ?????????
- (lo) ???
- (tdd) ??? ??? ????
- (nod) ????????
- (th) ???
- (?lang/bug-bugi?) ?? ????
- (ban-bali) ?????
- (sat) ???????
- (ike-cans) ??????
- (chr) ???
- (iu) ?????? / inuktitut
- (got) ????????????
- (tzm) ????????
- (zgh) ???????? ????????
- (shi-tfng) ???????
- (tig) ???
- (ti) ????
- (am) ????
- (ii) ??
- (ko-kp) ???
- (ko) ???
- (ja) 日本語
- (ryu) 沖縄口
- (zh) 中文
- (zh-cn) 中文（中国大陆）
- (zh-sg) 中文（新加坡）
- (zh-mo) 中文（澳門）
- (zh-hans) 中文（简体）
- (zh-hant) 中文（繁體）
- (zh-tw) 中文（臺灣）
- (zh-hk) 中文（香港）
- (wuu-hant) 吳語（正體）
- (zh-my) 中文（马来西亚）
- (wuu) 吴语
- (wuu-hans) 吴语（简体）
- (hak) 客家語 / Hak-ka-ng?
- (hak-hant) 客家語（繁體）
- (hak-hans) 客家语（简体）
- (lzh) 文言
- (zh-classical) 文言
- (hsn) 湘語
- (yue) 粵語
- (zh-yue) 粵語
- (yue-hant) 粵語（繁體）
- (yue-hans) 粵语（简体）
- (cpx) 莆仙語 / Pó-sing-g??
- (cpx-hant) 莆仙語（繁體）
- (cpx-hans) 莆仙语（简体）
- (gan) 贛語
- (gan-hant) 贛語（繁體）
- (gan-hans) 赣语（简体）
- (nan-hani) 閩南語
- (nan) 閩南語 / Ban-lam-gí
- (nan-hant) 閩南語（傳統漢字）
- (cdo) 閩東語 / Mìng-d??ng-ng??
- (cdo-hant) 閩東語（傳統漢字）
- (mnc-mong) ????? ?????
- (yi) ??????
- (ug-arab) ????????
- (he) ?????
- (ug) ???????? / Uyghurche
- (ur) ????
- (ary) ???????
- (ps) ????
- (ar) ???????
- (bqi) ???????
- (ms-arab) ???? ?????
- (pnb) ??????
- (aeb-arab) ?????
- (aeb) ????? / T?ns?
- (azb) ??????
- (arq) ????????
- (bcc) ?????? ?????
- (bgn) ??? ????? ?????
- (skr) ???????
- (skr-arab) ???????
- (sd) ????
- (apc) ????
- (acm) ?????
- (fa) ?????
- (kk-arab) ??????? (?????)
- (kk-cn) ??????? (?????)
- (ku-arab) ????? (??????)
- (ks-arab) ?????
- (khw) ?????
- (ckb) ?????
- (sdh) ????? ?????
- (?lang/gju-arab?) ?????
- (glk) ?????
- (ota) ???? ??????
- (lrc) ???? ??????
- (luz) ???? ???????
- (lki) ????
- (mzn) ????????
- (arz) ????
- (hno) ?????
- (arc) ?????
- (dv) ??????????
- (nqo) ???
The previous list was generated by:
{{#invoke:Languages|forEachLanguage|preprocess=yes|pattern=<nowiki />
* <span style="font-size:smaller;">([[MediaWiki:Lang/$lc|<span style="font-family:monospace,monospace;" title="{{((}}#language:$lc{{!}}en{{))}}">{{((}}int{{!}}lang/$lc{{))}}</span>]])</span> <bdi lang="$lc" class="autonym lang-$lc">{{((}}#language:$lc{{))}}</bdi>
}}
Note that as of 2025-08-07, there's a new bug in Scribunto, which causes the standard "table.sort()" function to no longer accept a standard comparison function. Now when "table.sort()" fails, the error is correctly catched (instead of producing a visible error), but the list may not be sorted correctly (temporarily) in some cases. The bug is tracked and corrected in Mediawiki but waiting to be deployed with the fix. Nothing will need to be changed (using "perror()" will then no longer have any effect, it is just needed for now and the bug was not a bug of this module which was properly tested and sudddently failed unexpectedly). Thanks.
Note:
- The list is retrieved using Module:Languages/List and sorted in native language name (LTR languages before RTL languages, then each one sorted by native script and then a locale-neutral sort order within each script) using Module:Multilingual description/sort (which is the consistant sort order used for multilingual navigation navigation boxes, or for showing lists of translations in multilingual descriptions, in a user-friendly way). For seeing the complete list of languages, tested with their directionality, look at the tests results table on Module talk:Multilingual description/sort/testcases.
Code
--[=[
Not globally exposed. Internal function only.
language_subpages( frame, transform, options )
Parameters
frame: The frame that was passed to the method invoked. The first argument or the page argument will be respected.
transform: A transform function. Example: function( basepagename, subpagename, code, langname ) end
options: An object with options. Example: { abort= { on=function() end, time=0.8 } }
Following options are available:
abort: Aborts iterating over the subpages if one of the conditions is met. If the process is aborted, nil is returned!
on: Function to be called if an abort-condition was met.
cycles: The maximum number of subpages to run over.
time: Maximum time to spend running over the subpages.
]=]
local function language_subpages( frame, transform, options )
local args, pargs, options = frame.args, ( frame:getParent() or {} ).args or {}, options or {};
local title = args.page or args[1] or pargs.page or pargs[1] or "";
local abort = options.abort or {};
local at, clock = type( abort.on ), os.clock();
local ac = function()
if at == 'function' or ( at == 'table' and getmetatable(abort.on).__call ) then
abort.on();
end
end
local tt = type( transform );
local page = require( 'Module:Page' );
title = page.clean(title);
if tt == 'function' or ( tt == 'table' and getmetatable(transform).__call ) then
local fetch, pages, langcode, langname = mw.language.fetchLanguageName, {};
--[==[
/ \
/ | \
/ · \
ˉˉˉˉˉˉˉ
Page.subpages() no longer works because it attempted to parse the HTML content generated by
calling the parser function "Special:Prefixindex:" which is no longer expanded in Lua but
converted to a "stripped tag" (containing a unique identifier surrounded by ASCII DEL characters)
representing the tag name and its parameters.
The actual expansion of stripped tags can no longer be performed in Lua.
Now unstripping these tags just kills ALL these tags (except "wiki" tags) instead of performing
their expansion by running the extension code. Only MediaWiki can unstrip these tags in texts after
they have been returned by Lua.
For this reason, page.subpages() is now completely empty (Module:Page no longer works).
This cannot be bypassed, except by using a Scribunto extension library if lifting the limits set by mw.unstrip.
Note that "Special:Prefixindex:" is also costly, even if it just requires a single database query to
get all subpages, instead of one costly #ifexist or one costly mw.title() property reading per
tested subpage to know if it exists.
For now there's still no reliable way to get a list of subpages, or performing queries similar to
the [[Special:Prefixindex]] page or list members of a category like when viewing a category page.
Ideally, there should exist a method for such queries on Title objects returned by the mw.title library;
but for now there's none.
In Lua now, the only expansion possible with an immediate effect is the expansion of standard templates,
all special tags or special pages, or parser function extensions do not work (Only the #expr parser
function is supported by using an external Scribunto library).
--]==]
for pg in page.subpages( title, { ignoreNS=true } ) do
if abort.cycles then
abort.cycles = abort.cycles - 1
if 0 == abort.cycles then return ac() end
end
if abort.time then
if (os.clock() - clock) > abort.time then return ac() end
end
if mw.ustring.len( pg ) <= 12 then
langcode = string.lower( pg );
langname = fetch( langcode );
if langname ~= '' then
table.insert( pages, transform( title, pg, langcode, langname ) );
end
end
end
return pages;
end
return {};
end
local function cloneArgs(frame)
local args, pargs = {}, {}
for k,v in pairs( frame.args ) do args[k] = v end
if frame:getParent() then
for k,v in pairs( frame:getParent().args ) do pargs[k] = v end
end
return args, pargs
end
local p = {};
--[=[
Usage:
{{#invoke:languages|internal|Template:Adjective}}
]=]
function p.internal(frame)
return table.concat(
language_subpages( frame,
function( title, page, code, name )
return mw.ustring.format(
'<bdi class="language lang-%s" lang="%s">[[%s/%s|%s]]</bdi>',
code, code,
title, page,
name
);
end
),
' <b>·</b> '
);
end
--[=[
Usage:
{{#invoke:languages|external|Template:Adjective}}
]=]
function p.external(frame)
return table.concat(
language_subpages( frame,
function( title, page, code, name )
return mw.ustring.format(
'<bdi class="language lang-%s" lang="%s">[%s/%s %s]</bdi>',
code, code,
tostring( mw.uri.fullUrl( title ) ), page:gsub( ' ', '_' ),
name
);
end
),
' <b>·</b> '
);
end
--[=[
forEachLanguage
This function iterates over all language codes known to MediaWiki based on a maintained list
replacing patterns in a pattern-string for each language
Usage
{{#invoke:Languages|forEachLanguage
|pattern=patternstring
|before=string to insert before iteration
|after=string added after iteration
|sep=separator string between iterations
|inLang=langcode used for $lnTrP and $lnTrUC1
}}
Parameters
pattern: A pattern string which is processed for each language and which is concatenated at the end and returned as one string
before: A string that is inserted before the concatenated result
after: A string that is inserted after the concatenated result
sep: A string that is inserted between each line created from the pattern while iterating (like ProcessedPattern_sep_ProcessedPattern_sep_ProcessedPattern)
inLang: Langcode to use for $lnTrP and $lnTrUC1
preprocess: if set to a non-empty value, the output will be preprocessed before being returned.
Warning
The output is still not prepreprocessed by default: so parser functions and magic keywords generated by the pattern are still not executed and replaced,
and template transclusions are still not expanded (see examples in other functions in this module).
When using this function directly from a MediaWiki page or template, this means it is only possible to use patterns generating basic MediaWiki formatting
or HTML tags. It you want the output to be preprocessed (in the given frame), set the preprocess parameter to a non-empty string.
Patterns
$lc - language code such as en or de
$lnP - language name in own language (autonym)
$lnUC1 - language name in own language (autonym), first letter upper case
$lnTrP - language name translated to the language requested by language code passed to inLang
$lnTrUC1 - language name translated to the language requested by language code passed to inLang, first letter upper case
Example
{{#invoke:Languages|forEachLanguage|pattern=<span lang="$lc" xml:lang="$lc" class="language lang-$lc">[[Page/$lc|$lnP]]</span>}}
]=]
-- =p.forEachLanguage({ args= { pattern = "$lc - $lnTrP\n", inLang = "en" } })
function p.forEachLanguage(frame)
local l = require("Module:Languages/List")
local ret = {}
local lang = mw.language
local line
local pattern = frame.args.pattern or frame.args[1] or ""
local prefix = frame.args.before or frame.args[2] or ""
local postfix = frame.args.after or frame.args[3] or ""
local sep = frame.args.sep or frame.args.separator or frame.args[4] or ""
local inLang = frame.args.inLang or frame.args[5] or nil
local preprocess = frame.args.preprocess or frame.args[6] or ""
local langNameUCFirstReq = not not pattern:find( "$lnUC1", 1, true )
local langNameReq = not not pattern:find( "$lnP", 1, true ) or langNameUCFirstReq
local langNameTranslatedUCFirstReq = not not pattern:find( "$lnTrUC1", 1, true )
local langNameTranslatedReq = not not pattern:find( "$lnTrP", 1, true ) or langNameTranslatedUCFirstReq
local contentLangInstance = mw.language.getContentLanguage()
local inLangLangInstance
local l = mw.language.fetchLanguageNames() -- autonyms
local lTr
local lcIdList = require('Module:Languages/List').getSortedList( l )
if langNameTranslatedReq then
inLangLangInstance = --[==[
mw.getLanguage( inLang ) -- Quota hit in :ucfirst() if using too many langInstances
--]==] contentLangInstance
lTr = mw.language.fetchLanguageNames( inLang ) -- translated names
end
for _, lcId in pairs( lcIdList ) do
local subst = lcId:gsub('%%', '%%%%')
line = pattern:gsub( "%$lc", subst )
local langName, langInstance
-- autonym (name of lcId in locale lcId)
if langNameReq then
langName = l[lcId]
subst = langName:gsub('%%', '%%%%')
line = line:gsub( "%$lnP", subst )
end
if langNameUCFirstReq then
langInstance = --[==[
mw.getLanguage( lcId ) -- Quota hit in :ucfirst() if using too many langInstances
--]==] contentLangInstance
langName = langInstance:ucfirst( langName )
subst = langName:gsub('%%', '%%%%')
line = line:gsub( "%$lnUC1", subst )
end
-- translated name (name of lcId in locale inLang)
if langNameTranslatedReq then
langName = lTr[lcId]
subst = langName:gsub('%%', '%%%%')
line = line:gsub( "%$lnTrP", subst )
end
if langNameTranslatedUCFirstReq then
langName = inLangLangInstance:ucfirst( langName )
subst = langName:gsub('%%', '%%%%')
line = line:gsub( "%$lnTrUC1", subst )
end
table.insert(ret, line)
end
ret = prefix .. table.concat( ret, sep ) .. postfix
if preprocess ~= '' then
ret = frame:preprocess(ret)
end
return ret
end
--[=[
Provide logic for [[Template:Lle]] (Language Links external, to be substituted, language names written exactly as #language would provide them)
Warning: may expands too many costly #ifexist without limitation (if not substituted into a separate "/lang" template)
]=]
function p.lle(frame)
return frame:preprocess(
p.forEachLanguage({
args = {
pattern = '{{subst:#ifexist:{{{1}}}/$lc|[{{subst:fullurl:{{{1}}}/$lc}} <bdi class="language lang-$lc" lang="$lc">$lnP</bdi>] <b>?</b> <!--\n-->}}'
}
})
)
end
--[=[
Provide logic for [[Template:Ll]] (Language Links internal, to be substituted, language names written exactly as #language would provide them)
Warning: may expands too many costly #ifexist without limitation (if not substituted into a separate "/lang" template)
]=]
function p.ll(frame)
return frame:preprocess(
p.forEachLanguage({
args = {
pattern = '{{subst:#ifexist:{{{1}}}/$lc|[[{{{1}}}/$lc|<bdi class="language lang-$lc" lang="$lc">$lnP</bdi>]] <b>?</b> <!--\n-->}}'
}
})
)
end
--------------------------------------------------------
--- Different approaches for [[Template:Lang links]] ---
--------------------------------------------------------
--[=[
Provide logic for [[Template:Lang links]]
Using a cute Hybrid-Method:
First check the subpages which is quite fast; if there are too many fall back to checking for each language page individually
]=]
-- =p.langLinksNonExpensive({ args= { page='Commons:Picture of the Year/2010' }, getParent=function() end })
-- =p.langLinksNonExpensive({ args= { page='Main Page' }, getParent=function() end })
-- =p.langLinksNonExpensive({ args= { page='Template:No_source_since' }, getParent=function() end })
-- =p.langLinksNonExpensive({ args= { page='MediaWiki:Gadget-HotCat' }, getParent=function() end })
function p.langLinksNonExpensive(frame)
local args, pargs = frame.args, ( frame:getParent() or {} ).args or {};
local title = args.page or args[1] or pargs.page or pargs[1] or "";
local contentLangInstance = mw.language.getContentLanguage();
local pages2
if frame.preprocess == nil then
frame = mw.getCurrentFrame()
end
--[==[
local options = {
abort = {
time = 3.5,
on = function()
pages2 = p.forEachLanguage({
args = {
pattern = '{{#ifexist:' .. title .. '/$lc|[[' .. title .. '/$lc|<bdi lang="$lc">$lnP</bdi>]] <b>?</b> }}'
}
})
end
}
}
local pages = language_subpages( frame,
function( title, page, code, langname )
return mw.ustring.format(
'[[%s/%s|<bdi lang="%s">%s</bdi>]]</span> <b>?</b> ',
title, page, code, langname
)
end, options );
return pages2 and frame:preprocess(pages2) or table.concat(pages, '');
--]==]
return frame:preprocess(
p.forEachLanguage( {
args = {
pattern = '{{#ifexist:' .. title .. '/$lc|[[' .. title .. '/$lc|<bdi lang="$lc">$lnP</bdi>]] <b>?</b> }}'
}
})
)
end
---------------------------------------------------------
----------------- [[Template:Autolang]] -----------------
---------------------------------------------------------
--[[
Works like {{autotranslate}} just allowing an unlimited number of arguments, even named arguments.
It's doing Magic! No arguments should be passed to {{#invoke:}}
]]
function p.autolang(frame)
local args, pargs = cloneArgs( frame )
if nil == args.useargs then
if not args.base then args = pargs end
elseif 'both' == args.useargs then
for k,v in pairs(args) do pargs[k] = v end
args = pargs
elseif 'parent' == args.useargs then
args = pargs
if pargs.base and not args.base then
args.base = pargs.base
end
end
local base = args.base
local userlang = frame:callParserFunction('int', 'lang')
local tl, tlns = 'Template:', 10
local tlb, fallback1, currenttemplate, currenttemplatepage
local fallback, contentlang = mw.text.split( userlang, '-', true )[1], mw.language.getContentLanguage():getCode()
local function createReturn(title)
local ret
local tlargs = {}
-- When LUA is invoked, templates are already expanded. This must be respected.
return frame:expandTemplate{ title = title, args = args }
end
if not base then
return ("'autolang' in [[Module:Languages]] was called but the 'base' parameter could not be found." ..
"The base parameter specifies the template that's subpages will be sought for a suitable translation.")
end
tlb = tl .. base .. '/'
currenttemplate = tlb .. userlang
currenttemplatepage = mw.title.new( currenttemplate, tlns )
if currenttemplatepage and currenttemplatepage.exists then
return createReturn(currenttemplate)
end
fallback1 = frame:preprocess( '{{Fallback|1=' .. base .. '|2=' .. userlang .. '}}' )
if fallback1 ~= contentlang then
return createReturn(tlb .. fallback1)
end
currenttemplate = tlb .. fallback
currenttemplatepage = mw.title.new( currenttemplate, tlns )
if currenttemplatepage and currenttemplatepage.exists then
return createReturn(currenttemplate)
end
currenttemplate = tlb .. contentlang
currenttemplatepage = mw.title.new( currenttemplate, tlns )
if currenttemplatepage and currenttemplatepage.exists then
return createReturn(currenttemplate)
end
return createReturn(tl .. base)
end
--[=[
Usage:
{{#invoke:languages|isKnownLanguageTag|gsw}} -> 1
{{#invoke:languages|isKnownLanguageTag|doesNotExist}} ->
]=]
function p.isKnownLanguageTag(frame)
return mw.language.isKnownLanguageTag( frame.args[1] or frame.args.tag or frame.args.code or '' ) and '1' or ''
end
function p.file_languages(frame)
local M_link = require( 'Module:Link' )
local contentLangInstance = mw.language.getContentLanguage()
local pattern = frame.args.pattern or '%s (%s)'
local original = frame.args.original or mw.title.getCurrentTitle().text
local ext_start, _ = string.find( original, '\.%w+$' )
local file_ext = string.sub( original, ext_start )
original = string.sub( original, 0, ext_start - 1 )
return frame:preprocess(
'<gallery>\n' ..
(table.concat(
M_link.forEachLink(
p.forEachLanguage({
args = { pattern = '[[$lc]]' }
}),
function( linkInfo )
local filename = mw.ustring.format( pattern, original, linkInfo.text ) .. file_ext
local filepage = mw.title.new( filename, 6 )
if filepage and filepage.exists then
return mw.ustring.format( '%s|%s',
filename,
mw.language.fetchLanguageName( linkInfo.text )
)
else
return nil
end
end
), '\n'
)) ..
'\n</gallery>'
)
end
function p.runTests()
return p.langLinksNonExpensive({
args = {
page = 'Module:Languages/testcases/test'
},
getParent = function() end
}) ==
'[[Module:Languages/testcases/test/de|<bdi lang="de">Deutsch</bdi>]] <b>?</b> ' ..
'[[Module:Languages/testcases/test/en|<bdi lang="en">English</bdi>]] <b>?</b> '
end
return p;