模組:Authority control
外觀
![]() | 此模組被引用於約242,000個頁面。 為了避免造成大規模的影響,所有對此模組的編輯應先於沙盒或測試樣例上測試。 測試後無誤的版本可以一次性地加入此模組中,但是修改前請務必於討論頁發起討論。 模板引用數量會自動更新。 |
![]() | 此模組已被保護。此為高度可見模組,其已用於大量條目或被頻繁替換引用。由於破壞或失誤會影響諸多頁面,即便細小的改動也可能導致大量服務器負載,因此已被保護,不可編輯。 |
相關頁面 |
---|
相關頁面 |
---|
![]() | 此模組使用Lua語言: |
本模塊包含{{Authority control}}的代碼,用法詳見模板說明。
標識符列表
注意: 3個條目包含錯誤規範控制信息,見Category:包含錯誤規範控制信息的所有條目
該模板從Wikidata上的以下屬性獲取其信息:
標識符 | 分類 | 維基數據屬性 | 顯示為 |
---|---|---|---|
藝術家 | P3372: 奧克蘭美術館藝術家編號 | ||
藝術與建築索引典 | 學術 | P1014: 蓋蒂藝術與建築索引典標識符 | |
學術 | P864: ACM數字圖書館作者編碼 | ||
澳大利亞傳記辭典 | 人物 | P1907: 澳大利亞傳記辭典ID | |
柏林藝術學院 | 藝術家 | P4114: ADK member ID | |
地理 | P3562: 英國水文局燈塔編號 |
| |
南澳美術館 | 藝術家 | P6804: Art Gallery of South Australia creator ID | |
地理 | P2980: 業餘無線電燈塔協會燈塔編號 | ||
人物 | P1564: At the Circulating Library ID | ||
Autores.uy | 人物 | P2558: autores.uy編碼 | |
備註: autores.uy是一個作者數據庫,專注於烏拉圭作者。它由知識共享烏拉圭分會創建和維護。它還提供對公有共領域作者的數字化作品訪問。 | |||
人物 | P4186: 澳大利亞女性登記ID | ||
其他 | P3293: BALaT圖片編碼 | ||
備註: BALaT( (Belgian Art Links & Tools))照片庫數據庫由比利時皇家文化遺產研究所 KIK-IRPA 維護 | |||
國際植物園保護組織 | 地理 | P5818: BGCI garden ID | |
各地 | P1015: BIBSYS識別碼 | ||
備註: BIBSYS是挪威所有大學圖書館、國家圖書館以及許多研究圖書館和機構圖書館和機構的信息系統供應商。 | |||
馬爾堡圖片索引 | 其他 | P2092: Bildindex藝術和建築學編碼 | |
人物 | P865: BMLO編號 | ||
各地 | P1890: CCAB編號 | ||
西班牙國家圖書權威檔案 | 各地 | P950: 西班牙國家圖書館識別碼 | |
備註: 西班牙國家圖書館(BNE)是西班牙最大的公共圖書館。 | |||
法國國家圖書館 | 各地 | P268: 法國國家圖書館識別碼 | |
備註: 法國國家圖書館總目錄中列出了人物規範數據 | |||
法國國家圖書館 | 各地 | P268: 法國國家圖書館識別碼 | |
各地 | P3788: 阿根廷國家圖書館標識符 | ||
國際植物名稱索引 | 學術 | P428: 植物學命名人縮寫 | |
備註: 作者引文(植物學):作者引文中使用的個人姓名的標準形式(官方縮寫)(僅適用於藻類、真菌和植物的名稱)。 鏈接至國際植物名稱索引 (IPNI) 頁面。 | |||
人物 | P651: 傳記門戶編號 | ||
備註: 荷蘭項目提供40,000份數字化傳記材料,其中包括荷蘭前殖民地。 | |||
藝術家 | P5226: BRAHMS 藝術家 ID | ||
備註: B.R.A.H.M.S.中藝術家的標識符(20世紀音樂數據庫超文本文章的關係基礎),由IRCAM提供 | |||
其他 | P5302: BRAHMS 作品 ID | ||
備註: B.R.A.H.M.S.中音樂作品的標識符(20世紀音樂超文本文章關係數據庫)數據庫,由IRCAM提供 | |||
中國高等教育文獻保障系統 | 人物 | P270: CALIS規範數據庫記錄控制號 | |
備註: 中國高等教育文獻保障系統 | |||
加泰羅尼亞人名與頭銜權威 | 各地 | P9984: CANTIC ID | |
中國歷代人物傳記資料庫 | 人物 | P497: 中國歷代人物傳記資料庫編號 | |
備註: 中國歷代人物傳記資料庫 | |||
地理 | P3920: 加拿大海岸警衛隊燈塔 ID | ||
備註: 加拿大海岸警衛隊發布的4卷燈光、浮標和霧信號列表的標識符。 | |||
學術 | P271: CiNii圖書作者標識符 | ||
備註: CiNii是日本學術圖書館資料的書目數據庫服務。它由國立信息學研究所維護。 | |||
合作在線書目系統和服務權威檔案 | 其他 | P1280: 合作在線書目系統和服務權威檔案識別碼 | |
備註: CONOR是由斯洛文尼亞國家圖書館主導的合作線上書目系統 | |||
人物 | P1908: CWGC人物ID | ||
臺灣書目整合查詢系統 | 各地 | P10307: 臺灣書目整合查詢系統系統號 | |
備註: 臺灣書目整合查詢系統 | |||
澳大利亞藝術家詞典 | 藝術家 | P1707: Design & Art Australia Online ID | |
地理 | P4038: Danish List of Lights and Fog signals ID |
| |
其他 | P8671: Deutsche Bahn station code | ||
備註: 德國鐵路車站代碼、火車站和德國鐵路使用的其他運營點的標識符 | |||
意大利人物傳記辭典 | 人物 | P1986: Treccani's Biographical Dictionary of Italian People ID | |
數字書目索引與圖書館項目 | 學術 | P2456: DBLP人物編號 | |
人物 | P11646: Deutsche Synchronkartei person ID | ||
備註: 影視配音演員在線數據庫 | |||
人物 | P6829: 愛爾蘭傳記辭典標識符 | ||
法鼓佛學人名規範資料庫 | 人物 | P1187: 法鼓佛學人物碼 | |
備註: 法鼓佛學人名規範資料庫 | |||
藝術家 | P2349: Stuttgart Database of Scientific Illustrators ID | ||
德國傳記 | 人物 | P7902: 德國傳記識別碼 | |
地理 | P9725: EBIDAT ID | ||
備註: 城堡庫存數據庫 EBIDAT 中條目的標識符 | |||
艾美獎 | 藝術家 | P8381: 艾美獎人物標識符 | |
現代烏克蘭百科全書 | 其他 | P4613: 現代烏克蘭百科全書標識符 | |
地理 | P4535: EUTA theatre ID | ||
人物 | P4534: EUTA person ID | ||
分面應用主題詞表 | 國際 | P2163: 分面應用主題詞表識別碼 | |
地理 | P4143: Finnish List of Lights ID |
| |
藝術家 | P6792: Find NZ Artists ID | ||
各地 | P227: GND ID | ||
備註: 來自 德國國家圖書館 (DNB) 的有關人員、公司和主題的權威數據 | |||
學術 | P1960: Google學術作者編號 | ||
藝術家 | P7303: 格萊美獎藝術家編號 | ||
全球火山計畫 | 地理 | P1886: 史密森火山編號 | |
瑞士歷史辭典 | 其他 | P902: HDS編碼 | |
備註: 瑞士歷史詞典是一部有關瑞士歷史的百科全書。 | |||
香港中文名稱規範數據庫 | 其他 | P5909: 香港中文名稱規範數據庫識別碼 | |
備註: 香港中文名稱規範數據庫 | |||
人物 | P1146: 世界田聯運動員編號 | ||
備註: 國際田聯運動員數據庫列出了有關田徑運動參賽者的信息。 | |||
OPAC SBN | 各地 | P396: 意大利國家圖書館服務作者識別碼 | |
備註: 中央聯合目錄研究所(ICCU:Istituto Centrale per il Catalogo Unico)是一家意大利政府機構,旨在為全國所有圖書館建立單一目錄。它管理着國家圖書館服務 (Servizio bibliotecario nazionale)。 | |||
藝術家 | P1736: 以色列藝術信息中心藝術家編碼 | ||
其他 | P9070: Internet Encyclopedia of Ukraine ID | ||
國際標準圖書館和相關機構標識符 | 人物 | P791: 國際標準圖書館標識符 | |
備註: 圖書館、博物館和檔案館、分散的國家數據庫。 | |||
國際標準名稱識別碼 | 國際 | P213: ISNI | |
備註: ISNI是一種用於唯一識別書籍、電視節目和報紙文章等媒體內容貢獻者公共身份的方法。請注意不要混淆ISNI和ORCID標識符。 | |||
以色列國家圖書館名稱及主體權威檔 | 各地 | P8189: 以色列國家圖書館識別碼 | |
Joconde | 其他 | P347: Joconde編碼 | |
噴射推進實驗室小天體資料庫 | 其他 | P716: JPL小行星數據庫編號 | |
各地 | P8980: KANTO ID | ||
各地 | P11249: 比利時皇家圖書館人物標識符 | ||
地理 | P3407: Klosterdatenbank ID | ||
KulturNav | 藝術家 | P1248: KulturNav索引碼 | |
備註: KulturNav是挪威基於雲的軟件服務,允許用戶創建、管理和分發名稱權威和術語,重點關注博物館和其他文化遺產機構的需求。該軟件由 KulturIT ANS 開發,開發項目由挪威藝術理事會資助。 | |||
各地 | P244: 美國國會圖書館規範標識符 | ||
備註: 參見en:Wikipedia:Authority control#LCCN的格式化說明 | |||
學術 | P10299: Leopoldina member ID (new) | ||
藝術家 | P9692: LexM ID | ||
備註: 納粹時期受迫害音樂家詞典中音樂家的標識符 | |||
圖書館資訊系統 | 各地 | P5587: Libris統一資源標識符 | |
其他 | P886: LIR | ||
備註: Lexicon Istoric Retic (LIR) 是兩卷本,其中精選了用羅曼什語發表的文章。 | |||
各地 | P1368: 拉脫維亞國家圖書館識別碼 | ||
地理 | P3863: 意大利海軍燈塔和信標ID | ||
地理 | P3601: MarineTraffic Lighthouse ID | ||
學術 | P4955: 數學評論數據庫作者標識符 | ||
MusicBrainz音樂家標識符 | 藝術家 | P434: MusicBrainz音樂家編號 | |
備註: MusicBrainz 是一個開放的音樂百科全書,收集音樂元數據並將其提供給公眾。 | |||
地理 | P982: MusicBrainz地區編號 | ||
其他 | P1330: MusicBrainz樂器編碼 | ||
其他 | P966: MusicBrainz廠牌編號 | ||
地理 | P1004: MusicBrainz地點編號 | ||
其他 | P436: MusicBrainz發行組編號 | ||
其他 | P1407: MusicBrainz系列編碼 | ||
其他 | P435: MusicBrainz作品編號 | ||
註冊歷史遺蹟 | 地理 | P380: Mérimée ID | |
學術 | P549: 數學譜系計畫識別碼 | ||
備註: 數學譜系項目是一個基於網絡的數學家學術譜係數據庫。 | |||
藝術家 | P2174: MoMA藝術家ID | ||
其他 | P5736: 小行星中心星體編號 | ||
藝術家 | P2268: Musée d'Orsay artist ID | ||
國家檔案標識符 | 其他 | P1225: 美國國家檔案標識符 | |
備註: 國家檔案和記錄管理局 (NARA) 是美國政府的一個獨立機構,負責保存和記錄政府和歷史記錄。 | |||
藝術家 | P5368: 加拿大國家美術館藝術家ID | ||
地理 | P2484: NCES學校編號 | ||
國家圖書館 | 各地 | P1048: 中華民國國家圖書館識別碼 | |
備註: 國立中央圖書館是中華民國的國家圖書館。 | |||
國立國會圖書館網路權威檔案 | 各地 | P349: 日本國立國會圖書館識別碼 | |
備註: 日本國立圖書館目錄中列出的權威數據。也可通過[1]進行搜索。 | |||
地理 | P3563: 美國國家地理空間情報局燈塔編號 | ||
維多利亞國立美術館 | 藝術家 | P2041: 維多利亞國家美術館藝術家ID | |
捷克國家規範數據庫 | 各地 | P691: 捷克國家圖書館識別碼 | |
備註: 捷克共和國國家圖書館(Národní knihovna České republiky)是捷克共和國的中央圖書館。 | |||
各地 | P409: 澳洲國家圖書館識別碼 | ||
備註: NLA Trove 的人員和組織視圖允許發現有關人員和組織的傳記和其他上下文信息。 也可通過[2]進行搜索。 | |||
中國國家圖書館 | 各地 | P1213: 中國國家圖書館標識符 | |
備註: 中國國家圖書館 | |||
希臘國家圖書館 | 各地 | P3348: 希臘國家圖書館識別碼 | |
韓國國立中央圖書館權威檔案 | 各地 | P5034: 韓國國立中央圖書館標識符 | |
各地 | P1003: BNR(羅馬尼亞)標識符 | ||
地理 | P4055: Norwegian List of Lights ID |
| |
各地 | P1375: 薩格勒布國家和大學圖書館識別碼 | ||
各地 | P1006: 荷蘭皇家圖書館識別碼 | ||
地理 | P3223: Online List of Lights ID | ||
ORCID | 學術 | P496: ORCID識別碼 | |
備註: 研究人員、學者等的權威數據。ID 範圍是ISNI範圍的子集。對於自由文本鏈接(例如,當在頁面上提及與他們無關的人時),也可以使用 {{ORCID}}。 作者(包括維基百科編輯)可以通過在 orcid.org/register 註冊來獲取 ORCID。 請注意不要混淆 ORCID 和 ISNI 標識符。 | |||
藝術家 | P2750: 攝影師身份目錄編碼 | ||
備註: 攝影師身份目錄(PIC)是攝影師的數據庫,由美國紐約公共圖書館維護。 | |||
地理 | P1584: Pleiades ID | ||
備註: Pleiades 是紐約大學古代世界研究所和教堂山北卡羅來納大學古代世界測繪中心的聯合項目。 | |||
各地 | P7293: 波蘭國家圖書館識別碼 | ||
各地 | P1005: 葡萄牙國家圖書館識別碼 | ||
地理 | P4423: Portuguese lighthouse ID |
| |
波蘭國家圖書館 | 各地 | P1695: 波蘭國家圖書館識別碼(舊) | |
PhilPapers | 學術 | P3233: PhilPeople資料頁 | |
藝術家 | P5321: Museo del Prado artist ID | ||
Publons | 學術 | P3829: Publons作者編號 | |
ResearcherID | 學術 | P1053: ResearcherID | |
備註: 科學作者識別系統。 該系統由湯森路透於2008年1月推出。數字對象標識符與ResearcherID的結合使用允許作者和科學文章的唯一關聯。 | |||
國際音樂文獻資源總目 | 其他 | P5504: RISM ID | |
荷蘭藝術史研究所數據資料庫 | 藝術家 | P650: 荷蘭藝術史研究所藝術家ID | |
備註: 荷蘭藝術史研究所數據資料庫(RKDartists)是一個使用受控詞彙的在線數據庫,目前包含約200,000多個藝術家的姓名和其他信息。資料庫中的名稱可能包括名字、筆名、變體拼寫、多種語言的名稱以及隨時間變化的名稱(如已婚姓名等)。 | |||
其他 | P350: RKDimages編碼 | ||
俄羅斯國立圖書館 | 各地 | P947: RSL編碼(個人) | |
備註: 俄羅斯國家圖書館(Российская государственная библиотека)是俄羅斯的國家圖書館。 | |||
Scopus | 學術 | P1153: Scopus數據庫文獻作者編碼 | |
備註: SciVerse Scopus 是一個書目數據庫,包含學術期刊文章的摘要和引文。 它涵蓋來自 5,000 多家國際出版商的近 19,500 種期刊,其中 16,500 種是科學、技術、醫學和社會科學(包括藝術和人文科學)領域的同行評審期刊。 | |||
圖書館資訊系統 | 各地 | P906: 瑞典皇家圖書館編碼 | |
備註: 權威數據來自瑞典國家圖書館 | |||
上海圖書館開放數據平台 | 人物 | P6702: 上海圖書館人物標識符 | |
備註: 上海圖書館人物標識符 | |||
SIKART | 藝術家 | P781: SIKART編碼 | |
備註: SIKART 是瑞士和列支敦士登視覺藝術的傳記詞典和數據庫。 它由瑞士藝術研究所 (SIAR) 在線出版。 | |||
中央研究院人名權威資料庫 | 人物 | P6705: 中央研究院人名權威識別碼 | |
備註: 中央研究院人名權威-人物傳記資料庫 | |||
社交網絡及存檔內容 | 其他 | P3430: 社交網絡及存檔內容方舟編碼 | |
施泰德藝術館 | 藝術家 | P4581: 施泰德藝術館藝術家ID | |
球場數據庫 | 地理 | P5288: 球場數據庫標識符 | |
結構體數據庫 | 地理 | P454: Structurae結構編碼 | |
結構體數據庫 | 人物 | P2418: 結構體數據庫人物編號 | |
法國參考標識符 | 其他 | P269: IdRef識別碼 | |
備註: 法國大學文獻系統總目錄中列出的人員的權威數據。 也可從 英語目錄(搜索作者,單擊一本書,單擊作者) 名稱,取PPN=URL的值) | |||
人物 | P1045: Sycomore ID | ||
解剖學術語 | 其他 | P1323: 解剖學術語98編碼 | |
伊斯蘭百科全書 | 其他 | P7314: TDV İslam Ansiklopedisi編號 | |
藝術家 | P3544: Te Papa agent ID | ||
瑞士劇場詞典 | 其他 | P1362: 瑞士劇場詞典在線編碼 | |
備註: Theaterlexikon der Schweiz (TLS) 是一部關於瑞士戲劇的百科全書。 它是由伯爾尼大學戲劇研究所開發的。 | |||
Trove資料庫整合器 | 人物 | P1315: 澳大利亞國家圖書館人物標識符 | |
英國議會 | 人物 | P6213: UK Parliament ID | |
備註: 英國議會議員數據 | |||
藝術家聯合名錄 | 藝術家 | P245: ULAN編號 | |
備註: 《藝術家聯合名錄》(ULAN)是一個使用受控詞彙的在線數據庫,目前包含約290,000個藝術家的姓名和其他信息。名錄中的名稱可能包括名字、假名、變體拼寫、多種語言的名稱以及隨時間變化的名稱(如已婚姓名等)。 | |||
地理 | P3723: 美國海岸防衛隊燈塔編號 | ||
人物 | P1157: 美國國會議員編碼 | ||
備註: 《美國國會傳記名錄》是美國國會及其前身大陸會議所有現任和前任議員的傳記詞典。 還包括來自領土和哥倫比亞特區的代表以及來自菲律賓和波多黎各的常駐專員。 | |||
各地 | P8034: 梵蒂岡宗座圖書館識別碼 | ||
備註: 梵蒂岡圖書館文獻數據 | |||
虛擬國際規範文檔編碼 | 國際 | P214: VIAF標識符 | |
備註: 來自在線計算機圖書館中心 (OCLC) 的國際權威數據 | |||
地理 | P3993: Vitaskrá ID |
| |
國際 | P10832: WorldCat實體標識符 | ||
備註: 人員和作品的WorldCat實體,作者:OCLC | |||
地理 | P3326: 世界瀑布數據庫編號 | ||
學術 | P1556: 數學文摘作者標識符 |
額外的跟蹤分類
本模塊實施了下列隱藏的跟蹤分類:
- Category:規範控制分類為紅鏈的頁面(0)
- Category:包含已棄用規範控制信息的維基百科條目(0)
- Category:包含已廢止規範控制信息的維基百科條目(0)
- Category:頁面調用帶參數規範控制模板(458)
標識符數量
- Category:包含14元素的規範控制(0)
- Category:包含15元素的規範控制(0)
- Category:包含16元素的規範控制(0)
- Category:包含17元素的規範控制(0)
- Category:包含18元素的規範控制(0)
- Category:包含19元素的規範控制(0)
- Category:包含20元素的規範控制(0)
- Category:包含21元素的規範控制(0)
- Category:包含22元素的規範控制(0)
- Category:包含23元素的規範控制(0)
- Category:包含24元素的規範控制(0)
- Category:包含25元素的規範控制(0)
- Category:包含26元素的規範控制(0)
- Category:包含27元素的規範控制(0)
- Category:包含28元素的規範控制(0)
- Category:包含29元素的規範控制(0)
- Category:包含30元素的規範控制(0)
- Category:包含31元素的規範控制(0)
- Category:包含32元素的規範控制(0)
- Category:包含33元素的規範控制(0)
- Category:包含34元素的規範控制(0)
- Category:包含35元素的規範控制(0)
- Category:包含36元素的規範控制(0)
- Category:包含37元素的規範控制(0)
- Category:包含38元素的規範控制(0)
- Category:包含39元素的規範控制(0)
- Category:包含40元素的規範控制(0)
- Category:包含41元素的規範控制(0)
- Category:包含42元素的規範控制(0)
- Category:包含43元素的規範控制(0)
- Category:包含44元素的規範控制(0)
- Category:包含45元素的規範控制(0)
require('strict')
local p = {}
local arg = mw.getCurrentFrame().args.config
local configfile = 'Module:Authority control/config' .. (arg and arg~='' and ('/' .. arg) or '')
local config = mw.loadData(configfile)
local title = mw.title.getCurrentTitle()
local namespace = title.namespace
local testcases = title.subpageText == config.i18n.testcases
local function needsAttention(sortkey)
return '[[' .. config.i18n.category .. ':' .. config.i18n.attentioncat .. '|' .. sortkey .. title.text .. ']]'
end
local function addCat(cat,sortkey)
if cat and cat ~= '' and (namespace == 0 or namespace == 14 or testcases) then
local redlinkcat = ''
if testcases == false then
local success, exists = pcall(function() return mw.title.new(cat, 14).exists end)
if success and not exists then
redlinkcat = needsAttention('N')
end
end
if sortkey then
cat = '[[' .. config.i18n.category .. ':'..cat..'|' .. sortkey .. title.text .. ']]'
else
cat = '[[' .. config.i18n.category .. ':'..cat..']]'
end
cat = cat .. redlinkcat
return cat
else
return ''
end
end
local function getCatForId(id,faulty)
local cat
if faulty ~= nil then
cat = string.format(config.i18n.faultwithidcat, id)
else
cat = string.format(config.i18n.cat, id)
end
return addCat(cat)
end
local function getIdsFromWikidata(qid,property)
local function getquals(statement,qualid)
if statement.qualifiers and statement.qualifiers['P'..qualid] then
return mw.wikibase.renderSnak(statement.qualifiers['P'..qualid][1])
else
return false
end
end
local ids = {}
if qid then
for _, statement in ipairs(mw.wikibase.getBestStatements(qid,property)) do
if statement.mainsnak.datavalue then
local val = statement.mainsnak.datavalue.value
if val then
local namedas = getquals(statement,1810) or getquals(statement,742) or ''
table.insert(ids,{id=val,name=namedas})
end
end
end
end
return ids
end
local _makelink = function(conf,val,nextid,qid) --validate values and create a link
local function tooltip(text,label)
if label and label~='' then
return mw.getCurrentFrame():expandTemplate{title = "Tooltip", args = {text,label}}
else
return text
end
end
local link
if nextid==1 then
if conf.prefix then
link = '* ' .. conf.prefix .. '\n** '
else
link = '* '
end
else
link = '\n** '
end
local valid_value = false
if conf.customlink then -- use function to validate and generate link
local label = nextid>1 and nextid
local newlink= require(config.auxiliary)[conf.customlink](val.id,label)
if newlink then
link = link .. newlink
valid_value = true
end
else
if conf.pattern then -- use pattern to determine validity if defined
valid_value = string.match(val.id,'^'..conf.pattern..'$')
elseif conf.patterns then
for _,pattern in ipairs(conf.patterns) do
valid_value = val.id:match('^'..pattern..'$')
if valid_value then break end
end
elseif conf.valid then -- otherwise use function to determine validity
valid_value = require(config.auxiliary)[conf.valid](val.id)
else -- no validation possible
valid_value = val.id
end
if valid_value then
local newlink
local label = conf.label
if not label or nextid>1 then
label = tostring(nextid)
end
if conf.link then
valid_value = valid_value:gsub('%%', '%%%%')
newlink = '[' .. mw.ustring.gsub(conf.link,'%$1',valid_value) .. ' ' .. label .. ']'
else
newlink = valid_value
end
link = link .. '<span class="uid">'..tooltip(newlink,val.name)..'</span>'
end
end
if valid_value then
link = link .. getCatForId(conf.category or conf[1])
else
--local preview = require("Module:If preview")
local wdlink = qid and '[[:wikidata:' .. qid .. '#P' .. conf.property .. ']]' or ''
local tooltip = string.format(
config.i18n.idnotvalid,
conf[1],
val.id
)
link = link .. '[[File:' .. config.i18n.warningicon .. '|20px|frameless|link=' .. wdlink .. '|' .. tooltip .. '.]]'
if conf.errorcat then
link = link .. addCat(conf.errorcat)
else
link = link .. getCatForId(conf.category or conf[1],true)
end
link = link .. addCat(config.i18n.allfaultycat,conf[1])-- .. preview._warning({'The '..conf[1]..' id '..val..' is not valid.'})
end
return link
end
--[[==========================================================================]]
--[[ Main ]]
--[[==========================================================================]]
function p.authorityControl(frame)
local function resolveQID(qid)
if qid then
qid = 'Q'..mw.ustring.gsub(qid, '^[Qq]', '')
if mw.wikibase.isValidEntityId(qid) and mw.wikibase.entityExists(qid) then
local sitelink = mw.wikibase.getSitelink(qid)
if sitelink then
return mw.wikibase.getEntityIdForTitle(sitelink) or mw.wikibase.getEntity(qid).id
end
return mw.wikibase.getEntity(qid).id
end
end
end
local conf = config.config
local parentArgs = frame:getParent().args
local auxCats = ''
local rct = false -- boolean to track if there are any links to be returned
local qid,topic
local wikilink = function(qid,hideifequal)
local label,sitelink = mw.wikibase.getLabel(qid),mw.wikibase.getSitelink(qid)
if label then
if sitelink then
local target = mw.title.new(sitelink)
if target==title or (target.isRedirect and target.redirectTarget==title) then -- do not link
return label
else -- make wikilink to article
return '[[' .. sitelink .. '|' .. label .. ']]'
end
else
return label
end
else
auxCats = auxCats .. needsAttention('L')
return qid
end
end
if namespace == 0 then
qid = mw.wikibase.getEntityIdForCurrentPage()
end
if qid then -- article is connected to Wikidata item
if parentArgs.qid and (resolveQID(parentArgs.qid) ~= qid) then -- non-matching qid parameter
auxCats = auxCats .. needsAttention('D')
end
else -- page is not connected to any Wikidata item
qid = resolveQID(parentArgs.qid) -- check qid parameter if no wikidata item is connected
if qid then -- qid parameter is valid, set topic to display
topic = mw.wikibase.getLabel(qid)
if topic then
if mw.ustring.lower(title.subpageText) == mw.ustring.lower(topic) then -- suppress topic display if subpagename equals topic up to case change
topic = nil
end
if topic and mw.wikibase.getSitelink(qid) then -- make wikilink to article
topic = '[[' .. mw.wikibase.getSitelink(qid) .. '|' .. topic .. ']]'
end
else
auxCats = auxCats .. needsAttention('L')
end
elseif parentArgs.qid and parentArgs.qid~='' then -- invalid qid has been supplied, add to tracking cat
auxCats = auxCats .. needsAttention('Q')
end
end
local qids = {} -- setup any additional QIDs
if parentArgs.additional=='auto' and qid then -- check P527 for parts to add additional qids
local checkparts = function(property)
local parts = mw.wikibase.getBestStatements(qid,property)
if parts then
for _,part in ipairs(parts) do
if part.mainsnak.datavalue and part.mainsnak.datavalue.value.id then
local resolvedqid = resolveQID(part.mainsnak.datavalue.value.id)
if resolvedqid then
table.insert(qids,resolvedqid)
end end end end end
for _,part in ipairs(config.auto_additional) do
checkparts('P'..tostring(part))
end
elseif parentArgs.additional and parentArgs.additional ~= '' then
for _,v in ipairs(mw.text.split(parentArgs.additional,"%s*,%s*")) do
v = resolveQID(v)
if v then
if v == qid then -- duplicate of qid parameter
auxCats = auxCats .. needsAttention('R')
end
table.insert(qids,v)
else -- invalid QID specified
auxCats = auxCats .. needsAttention('A')
end
end
end
local sections = {}
local localparams = false
local numsections = 0
for _,_ in ipairs(config.sections) do numsections = numsections + 1 end
for _ = 1,#qids+numsections do table.insert(sections,{}) end
local qslink = '' -- setup link to add using QuickStatements
-- check which identifiers to show/suppress in template
local show = {} -- setup list
local showall = true
local function stripP(pid)
if pid:match("^[Pp]%d+$") then
pid = mw.ustring.gsub(pid,'[Pp]','') --strip P from property number
end
if pid:match("^%d+$") then
return tonumber(pid)
end
end
local function addshowlist(list)
if list and list ~= '' then
for _,v in ipairs(mw.text.split(string.lower(list),"%s*,%s*")) do
local vprop = stripP(v)
if vprop then -- e.g. show=P214 to show one particular property
show[vprop] = true
else -- e.g. show=arts to use whitelist
if config.whitelists[v] then
for _,w in ipairs(config.whitelists[v].properties) do
show[w] = true
end
end
end
end
showall = false
end
end
addshowlist(frame.args.show) -- check show= parameter on wrapper template
addshowlist(parentArgs.show or parentArgs.country) -- check show parameter on article template
if parentArgs.suppress then
local suppresslist = mw.text.split(parentArgs.suppress,"%s*,%s*") -- split parameter by comma
for _,v in ipairs(suppresslist) do
v = stripP(string.upper(v))
if v then
show[v] = false
auxCats = auxCats .. '[[' .. config.i18n.category .. ':' .. config.i18n.suppressedcat .. ']]'
else
auxCats = auxCats .. needsAttention('P')
end
end
end
local function makeSections(qid,addit)
local tval = {}
local function parameter_is_used(property)
local used = false
if property then
if tval[property] then
if tval[property][1] then
used = true
end
elseif tval[property] == false then -- property has been manually suppressed
used = true
end
end
return used
end
for _, params in ipairs(conf) do
tval[params.property] = getIdsFromWikidata(qid, 'P' .. params.property) -- setup table for values with property number as key
local showb = true
if (show[params.property] == nil) and (show[string.upper(params[1])] == nil ) then
showb = showall -- if not specified then depends on showall
elseif (show[params.property] == false) or (show[string.upper(params[1])] == false) then -- if either are false then id will be suppressed
showb = false
end
if not showb then
tval[params.property] = false -- indicates the identifier is suppressed
elseif not addit then
local val = parentArgs[mw.ustring.lower(params[1])] or parentArgs[params[1]]
if val and val~='' then -- add local parameter to list if not already in
localparams = true
local bnew = true
for _, w in pairs(tval[params.property]) do
if val == w.id then
bnew = false
end
end
if bnew then -- add new value to table
if qid then
qslink = qslink .. '%7C%7C' .. qid .. '%7CP' .. params.property .. '%7C%22' .. mw.uri.encode(val,"PATH") .. '%22%7CS143%7CQ30239' --Q30239 = [[中文維基百科]]
end
table.insert(tval[params.property],{id=val,name=''})
end
end
end
local suppress = false
if params.suppressedbyproperty then
for _,sc in ipairs(params.suppressedbyproperty) do
if parameter_is_used(sc) then
suppress = true
end
end
end
if tval[params.property] ~= false and not suppress then
local tlinks = {} -- setup table for links
local nextIdVal = 1
local row = ''
for _,val in ipairs(tval[params.property]) do
local link = _makelink(params,val,nextIdVal,qid)
row = row .. link
table.insert(tlinks,link)
nextIdVal = nextIdVal + 1
end
if nextIdVal>=2 then
row = row .. '\n'
table.insert(sections[addit or params.section],row)
rct = true
end
end
end
end
local function pencil(qid)
if not qid then
return ''
end
local args = { pid = 'identifiers' } -- #target the list of identifiers
args.qid = qid
return require('Module:EditAtWikidata')._showMessage(args)
end
makeSections(qid,false)
for c = 1,#qids do
makeSections(qids[c],numsections+c)
end
--configure Navbox
local outString = ''
if rct or localparams then -- there is at least one link to display
local Navbox = require('Module:Navbox')
local sect,lastsect = 0,0
local navboxArgs = {
name = 'Authority control',
navboxclass = 'authority-control',
bodyclass = 'hlist',
state = parentArgs.state or config.i18n.autocollapse,
navbar = 'plain'
}
for c=1,numsections+#qids do
if #sections[c] ~= 0 then -- section is non-empty
sect = sect + 1
lastsect = c
local sectname
if c <= numsections then -- regular section
sectname = config.sections[c].name
else -- section from additional qid
local qid = qids[c-numsections]
sectname = wikilink(qid) .. pencil(qid)
end
navboxArgs['group' .. c] = sectname
navboxArgs['list' .. c] = table.concat(sections[c])
end
end
if localparams then
lastsect = lastsect + 1
sect = sect + 1
navboxArgs['group' .. lastsect] = config.i18n.warning
local warning = frame:expandTemplate{title = config.i18n.errortemplate, args = {config.i18n.localparams}}
if qslink ~= '' then
warning = warning .. ' ' .. config.i18n.movetowd .. '<span class="qs autoconfirmed-show"> [[File:Commons to Wikidata QuickStatements.svg|20px|link=https://quickstatements.toolforge.org/#/v1=' .. qslink .. '|' .. config.i18n.addtowd .. ']]</span>'
elseif not qid then
if namespace == 0 then
warning = warning .. ' ' .. config.i18n.connecttowd
elseif namespace==14 or namespace==2 or namespace==118 then
warning = warning .. ' ' .. config.i18n.qidcode
end
end
navboxArgs['list' .. lastsect] = warning
end
if topic then -- display in expanded form with topic
navboxArgs.title = config.i18n.aclink .. '——' .. topic .. pencil(qid)
elseif sect == 1 then -- special display when only one section
if lastsect <= numsections then
if config.sections[lastsect].hidelabelwhenalone then -- no special label when only general or other IDs are present
navboxArgs['group' .. lastsect] = config.i18n.aclink .. pencil(qid)
else -- other regular section
navboxArgs['group' .. lastsect] = config.i18n.aclink .. ':' .. navboxArgs['group' .. lastsect] .. pencil(qid)
end
else -- section from additional qid
navboxArgs['group' .. lastsect] = config.i18n.aclink .. ':' .. navboxArgs['group' .. lastsect]
end
else -- add title to navbox
navboxArgs.title = config.i18n.aclink .. pencil(qid)
end
outString = Navbox._navbox(navboxArgs)
end
if parentArgs.state
and parentArgs.state~=''
and parentArgs.state~=config.i18n.collapsed
and parentArgs.state~=config.i18n.expanded
and parentArgs.state~=config.i18n.autocollapse then --invalid state parameter
auxCats = auxCats .. needsAttention('S')
end
if testcases then
auxCats = mw.ustring.gsub(auxCats, '(%[%[)(' .. config.i18n.category .. ')', '%1:%2') --for easier checking
end
--out
outString = outString..auxCats
if namespace ~= 0 then
outString = mw.ustring.gsub(outString,'(%[%[)(' .. config.i18n.category .. ':' .. config.i18n.Articles .. ')([^%|%]]+)%|?[^%|%]]*(%]%])','%1:%2%3%4')
outString = mw.ustring.gsub(outString,'(%[%[)(' .. config.i18n.category .. ':' .. config.i18n.All_articles .. ')([^%|%]]+)%|?[^%|%]]*(%]%])','%1:%2%3%4')
end
local check = require('Module:Check for unknown parameters')._check
local sortkey
if namespace == 0 then
sortkey = '*' .. title.text
else
sortkey = title.fullText
end
outString = outString .. check({
['unknown'] = '[[' .. config.i18n.category .. ':' .. config.i18n.pageswithparams .. '|' .. sortkey .. ']]',
['preview'] = config.i18n.previewwarning, 'show', 'country', 'suppress', 'additional', 'qid', 'state'
}, parentArgs)
return outString
end
p.makelink = function(conf,val,nextid,qid)
return _makelink(conf,val,nextid,qid)
end
return p