ماڊيول:Wikidata
| ماڊيول:Wikidata فرسوده آهي. مهرباني ڪري ان بدران ماڊيول:WikidataIB يا ماڊيول:Wd استعمال ڪريو. |
| هي سانچو آهي۔ |
| هي سانچو ھزارين صفحن تي استعمال ٿئي ٿو، تنهنڪري ان ۾ ڪيل تبديليون وڏي پيماني تي نظر اچي سگهن ٿيون۔ تبديليون لاڳو ڪرڻ کان اڳ، مهرباني ڪري انهن کي سانچي جي /ريتخاني يا /آزمائشي حالتون وارن ذيلي صفحن ۾ آزمائي ڏسو، يا پنهنجي يوزر ذيلي صفحي ۾ جانچ ڪريو۔ تبديليون لاڳو ڪرڻ کان اڳ ڳالهيون صفحي تي بحث ڪرڻ تي پڻ غور ڪيو۔ |
طريقا
[سنواريو]ماڊيول "Wikidata" ۾ هيٺيان طريقا شامل آهن، جيڪي سڏيندڙ اسڪرپٽ کي پهريون پيرا ميٽر طور پراپرٽي آءِ ڊي ڏئي وڪيڊيٽا مان ڪنهن به پراپرٽي جو قدر حاصل ڪرڻ ڏين ٿا:
getValue: جتي لاڳو هجي، وڪي-ڳنڍيل قدر واپس ڪري ٿو. ٻيا سڀ قدر{{#property:}}وانگر ظاهر ٿيندا، سواءِ ان جي ته جيڪڏهن ترجيحي درجي وارا قدر موجود هجن ته رڳو اهي واپس ڪيا ويندا. w:ru:Модуль:Wikidata جيformatStatementsجي ابتڙ،getValueاڃا تائين ڪوبه حوالو نه کڻي ٿو؛ ڏسو w:en:Module talk:Wikidata/Archive 1#Why the references from Wikidata get dropped?.getRawValue: غير ڳنڍيل پراپرٽي قدر ۽ هزارن واري جدا ڪندڙ سان انگ واپس ڪري ٿو. اهو مقدار واري پراپرٽي جو سادو عددي قدر به واپس ڪري ٿو. ٻيا سڀ قدر{{#property:}}وانگر ظاهر ٿيندا، جنهن ۾ عام قدر به شامل آهن، ڀلي ترجيحي قدر موجود هجن.getDateValue: تاريخون فارميٽ ڪري واپس ڪرڻ لاءِ خاص طريقو. اڳواٽ تاريخي فارميٽ [ڏينهن مهينو سال] آهي؛ ٻين تاريخي فارميٽن لاءِ اختياري ٽيون پيرا ميٽر شامل ڪري سگهجي ٿو: [مهينو ڏينهن، سال] لاءِ "mdy" شامل ڪريو؛ [مهينو سال] لاءِ "my"؛ رڳو سال لاءِ "y". هڪ وڌيڪ اختياري پيرا ميٽر، جيڪو چوٿون هجڻ گهرجي، جهڙوڪ "BCE"، شامل ڪري سگهجي ٿو ته جيئن ق.م. تاريخن لاءِ لڳندڙ اڳواٽ "BC" کي مٽائي سگهجي.getImages: ڪنهن خاص پراپرٽي جون سڀ تصويرون واپس ڪري ٿو، مثال طور image (P18)، Gene Atlas Image (P692) وغيره. پيرا ميٽر هي آهن:| propertyID | value / FETCH_WIKIDATA / nil | separator (default=space) | size (default=220px). واپس ايندڙ متن هر تصوير لاءِ [[File:Filename | size]] جي صورت ۾ هوندو، چونڊيل سائيز ۽ جدا ڪندڙ سان، جيڪو ايڇ ٽي ايم ايل به ٿي سگهي ٿو. جيڪڏهن ڏنل پراپرٽي "commonsMedia" قسم جي نه هجي ته اهو خالي متن واپس ڪندو.getUnitsهي پهريون پيرا ميٽر طور مقدار واري propertyID وٺي ٿو، ۽ موجوده صفحي تي اها پراپرٽي جيڪي ايڪا استعمال ڪري رهي آهي، انهن جو نالو واپس ڪري ٿو. جيڪڏهن پراپرٽي مقدار واري قسم جي نه هجي يا قدر مقرر نه هجي ته خالي واپس ڪري ٿو. ٻيو پيرا ميٽر وڪيڊيٽا مان آڻڻ کي روڪڻ لاءِ استعمال ڪري سگهجي ٿو، جيڪڏهن اهو "FETCH_WIKIDATA" کان سواءِ ڪجهه به هجي.getUnitIDهي پهريون پيرا ميٽر طور مقدار واري propertyID وٺي ٿو، ۽ موجوده صفحي تي اها پراپرٽي جيڪي ايڪا استعمال ڪري رهي آهي، انهن جو QID واپس ڪري ٿو. جيڪڏهن پراپرٽي مقدار واري قسم جي نه هجي يا قدر مقرر نه هجي ته خالي واپس ڪري ٿو. ٻيو پيرا ميٽر وڪيڊيٽا مان آڻڻ کي روڪڻ لاءِ استعمال ڪري سگهجي ٿو، جيڪڏهن اهو "FETCH_WIKIDATA" کان سواءِ ڪجهه به هجي.
وڪيڊيٽا ڪواليفائر قدر، جيڪڏهن موجود هجن، هيٺين طريقن سان حاصل ڪري سگهجن ٿا:
getQualifierValue: جتي لاڳو هجي، رڳو وڪي-ڳنڍيل قدر واپس ڪري ٿو.getRawQualifierValue: غير ڳنڍيل قدر واپس ڪري ٿوgetQualifierDateValue: فارميٽ ڪيل تاريخون واپس ڪري ٿو
جيڪڏهن هي ڪوڊ سڏيندڙ مضمون لاءِ پراپرٽي وڪيڊيٽا ۾ بيان ٿيل نه هجي، ته خالي اسٽرنگ ("") واپس ٿيندي.
ٻيا طريقا:
pageId: موجوده صفحي جي وڪيڊيٽا آءِ ڊي (Q…) واپس ڪري ٿو، يا جيڪڏهن صفحو وڪيڊيٽا سان ڳنڍيل نه هجي ته ڪجهه به نه. ٻئي صفحي جي وڪيڊيٽا آءِ ڊي حاصل ڪرڻ لاءِ {{#invoke:ResolveEntityId|صفحو}} استعمال ڪريو.getTAValue: پراپرٽي P1323 لاءِ TA98 (Terminologia Anatomica پهريون ڇاپو 1998) جا قدر حاصل ڪري ٿو. اهو ڪوبه پيرا ميٽر نه وٺندو آهي ۽ پنهنجو نتيجو فهرست طور ٺاهي ٿو، جنهن ۾ هر قدر ٻاهرين وسيلي سان ڳنڍيل هوندو آهي. هي انهن ڪالن لکڻ لاءِ نمونو آهي جن کي ٻاهريان ڳنڍڻا واپس ڪرڻا هجن.ViewSomething: ڍانچي واري ڊيٽا مان ڪجھ به حاصل ڪري ٿو، جنهن ۾ ليبل، وضاحتون، حوالا ۽ انٽرويكي ڳنڍڻا شامل آهن. ڏسو [1]getSiteLink: دليل ۾ ڏنل وڪي تي صفحي جو نالو حاصل ڪري ٿو، جهڙوڪ "enwikiquote" انگريزي وڪي اقتباس لاءِ، "arwiki" عربي وڪيپيڊيا لاءِ.Dump:{{#invoke:Wikidata|Dump|claims}}ڍانچي واري ڊيٽا تي نظر رکي ٿو. اهو ساڳيا دليل استعمال ڪري ٿو جيڪي ViewSomething استعمال ڪري ٿو. نتيجا ڏسڻ لاءِ اهو رڳو پيش منظر ۾ آزمائجو. اهو Lua اسڪرپٽس ٺاهڻ ۾ تمام مدد ڪري ٿو جيڪي ڊيٽا تائين رسائي ڪن ٿيون. جيڪڏهن دليلن کان سواءِ استعمال ڪيو وڃي ته اهو ليبلن، وضاحتن، حوالن ۽ انٽرويكي ڳنڍڻن سميت سڀ ڪجهه ڊمپ ڪري ٿو. ان جو wrapper سانچو به آهي، ڏسو {{Dump}}.getImageLegend: تصوير جي وضاحت واپس ڪري ٿو؛ تصوير پراپرٽي P18 آهي ۽ تصوير جي وضاحت پراپرٽي P2096 آهي.- هن طرح سڏيو:
{{#invoke:Wikidata |getImageLegend | <PARAMETER> | lang=<ISO-639code> |id=<QID>}} - PARAMETER واپس ڪري ٿو، جيستائين اهو "FETCH_WIKIDATA" جي برابر نه هجي، Item QID مان (expensive call). جيڪڏهن QID نه ڏنو وڃي يا خالي هجي ته موجوده مضمون استعمال ٿيندو (expensive call نه آهي). جيڪڏهن lang نه ڏنو وڃي ته مقامي وڪي جي ٻولي استعمال ٿيندي، ٻي صورت ۾ ڏنل ISO-639 ٻولي ڪوڊ استعمال ٿيندو.
- ليبل پهرين 'preferred' درجي واري تصوير مان واپس ٿيندو؛ يا جيڪڏهن ڪنهن تصوير کي preferred درجو نه هجي ته پهرين 'normal' درجي واري تصوير مان.
- هن طرح سڏيو:
getValueShortName: getValue جهڙي ئي ڊيٽا واپس ڪري ٿو، پر جيڪڏهن موجود هجي ته ليبل طور پراپرٽي مختصر نالو استعمال ڪري ٿو. ان سان پائپ ٿيل ڳنڍڻن ۾ جتي بهتر هجي، ننڍو ليبل استعمال ٿي سگهي ٿو. جيڪڏهن شيءَ تي مختصر نالو مقرر نه هجي ته عام ليبل استعمال ٿيندو.
خودمختيار رسائي
[سنواريو]16 سيپٽمبر 2015 کان، هاڻي ٻين مضمونن مان انهن جي QID استعمال ڪري ڊيٽا آڻڻ ممڪن آهي. هيٺيون ڪال:
{{#invoke:Wikidata|getValueFromID|<QID>|<Property>|FETCH_WIKIDATA}}
getValue جهڙو ئي ڪم ڪندو، پر هڪ اضافي پيرا ميٽر وٺندو، جيڪو ان وڪيڊيٽا شيءَ جو QID آهي جنهن مان توهان پراپرٽي جو قدر حاصل ڪرڻ چاهيو ٿا. مثال طور:
{{#invoke:Wikidata|getValueFromID|{{Get QID|Richard Burton (actor) }}|P26|FETCH_WIKIDATA}}
انگريزي وڪيپيڊيا ۾ ڪٿي به redirect page title رچرڊ برٽن (اداڪار) مان 'spouse' (P26) جا ڳنڍيل قدر آڻيندو، جيڪو وڪيڊيٽا ليبل ماڊيول:Wikidata (Q12069631) سان لاڳاپيل آهي.
ان جو مطلب آهي ته جانچ جا ماحول واپرائيندڙ نيم اسپيس ۾ ٺاهي سگهجن ٿا، پر ياد رکو ته اهي ڪالون expensive شمار ٿين ٿيون، تنهنڪري مهرباني ڪري انهن کي جيترو ٿي سگهي اوترو گهٽ استعمال ڪريو.
پيرا ميٽر
[سنواريو]- عام حالت (getValue) لاءِ، ٻه بي نالي پيرا ميٽر ڏنا وڃن ٿا. پهريون ان پراپرٽي جي آءِ ڊي آهي جيڪا حاصل ڪرڻي آهي، مثال طور ڄمڻ جي هنڌ لاءِ P19 يا زال/مڙس لاءِ P26. ٻيو null، "FETCH_WIKIDATA"، يا ڪا ٻي اسٽرنگ ٿي سگهي ٿو، جيڪا واپس ٿيندڙ قدر بڻجي ٿي.
- عام غير ڳنڍيل حالت (getRawValue) لاءِ، ٻه بي نالي پيرا ميٽر ڏنا وڃن ٿا. پهريون ان پراپرٽي جي آءِ ڊي آهي جيڪا حاصل ڪرڻي آهي، مثال طور جنس لاءِ P21. ٻيو null، "FETCH_WIKIDATA"، يا ڪا ٻي اسٽرنگ ٿي سگهي ٿو، جيڪا واپس ٿيندڙ قدر بڻجي ٿي.
- عام تاريخي حالت (getDateValue) لاءِ، ٽي بي نالي پيرا ميٽر ڏنا وڃن ٿا. پهريون ان پراپرٽي جي آءِ ڊي آهي جيڪا حاصل ڪرڻي آهي، مثال طور ڄمڻ جي تاريخ لاءِ P569. ٻيو null، "FETCH_WIKIDATA"، يا ڪا ٻي اسٽرنگ ٿي سگهي ٿو، جيڪا واپس ٿيندڙ قدر بڻجي ٿي. ٽيون اهو فارميٽ آهي جنهن ۾ تاريخ واپس ٿيڻ گهرجي، يعني dmy، mdy، my، يا y.
مهرباني ڪري نوٽ ڪريو ته ننڍن اکرن وارا پيرا ميٽر wikibase ڪال ۾ هاڻي سهائتا يافته نه آهن: p123، تنهنڪري جيڪڏهن مسئلا پيدا ٿين ته پڪ ڪريو ته وڏن اکرن وارو روپ، جهڙوڪ P123، استعمال ٿيل آهي.
استعمال
[سنواريو]مثال: زال/مڙس (P26)
[سنواريو]{{#invoke:Wikidata|getValue|P26|}}= ڪجھ به واپس نه ڪندو، تنهنڪري انفوباڪس ۾ زال/مڙس جي ڏيک کي روڪي ٿو{{#invoke:Wikidata|getValue|P26|FETCH_WIKIDATA}}= لاڳاپيل مضمون لاءِ وڪيڊيٽا ۾ محفوظ ٿيل پراپرٽي P26 (زال/مڙس) جا ڳنڍيل قدر واپس ڪري ٿو، مثال طور مضمون بل ڪلنٽن لاءِ اهو هليري ڪلنٽن واپس ڪري ٿو{{#invoke:Wikidata|getValue|P26|[[Hillary Rodham Clinton]]}}= هليري روڊهم ڪلنٽن واپس ڪري ٿو، جنهن سان انفوباڪس وڪيڊيٽا ۾ محفوظ قدر بدران مقامي قدر استعمال ڪري سگهي ٿو.
انفوباڪس سانچي ۾ مثال
[سنواريو]انفوباڪس جي وصف اندر، ان کي هن طرح سڏي سگهجي ٿو:
| data55 = {{#invoke:Wikidata|getValue|P26|{{{spouse|FETCH_WIKIDATA}}} }}
جنهن سان انفوباڪس:
- جيڪڏهن انفوباڪس پيرا ميٽر
|spouseخالي مقرر هجي، جيئن"| spouse ="، ته زال/مڙس ظاهر نه ڪندو - جيڪڏهن انفوباڪس پيرا ميٽر
|spouseنه ڏنو ويو هجي ته وڪيڊيٽا مان ڳنڍيل قدر ظاهر ڪندو - جيڪڏهن مقامي انفوباڪس پيرا ميٽر
|spouseڏنو ويو هجي، مثال طور"|spouse = Hillary Rodham Clinton"، ته اهو ظاهر ڪندو
اختياري طور، ان کي هن طرح به سڏي سگهجي ٿو:
| data55 = {{#invoke:Wikidata|getValue|P26|{{{spouse|}}} }}
جنهن سان انفوباڪس:
- جيڪڏهن انفوباڪس پيرا ميٽر
|spouseخالي مقرر هجي، جيئن"| spouse ="، ته زال/مڙس ظاهر نه ڪندو - جيڪڏهن انفوباڪس پيرا ميٽر
|spouseنه ڏنو ويو هجي ته زال/مڙس ظاهر نه ڪندو - جيڪڏهن مقامي انفوباڪس پيرا ميٽر
|spouseڏنو ويو هجي، مثال طور"|spouse = Hillary Rodham Clinton"، ته اهو ظاهر ڪندو - جيڪڏهن انفوباڪس پيرا ميٽر مقامي طور FETCH_WIKIDATA تي مقرر هجي ته وڪيڊيٽا مان ڳنڍيل قدر ظاهر ڪندو
ڏسو ماڊيول:WikidataIB، اهڙي ترميم لاءِ جيڪا في مضمون بنياد تي فيلڊن کي blacklist ڪرڻ جي اجازت ڏئي ٿي، ته جيئن اهي ڪڏهن به ظاهر نه ٿين. اهو ايڊيٽر کي في مضمون بنياد تي اها به اجازت ڏئي ٿو ته ڪهڙا فيلڊ وڪيڊيٽا مان پاڻمرادو آڻي سگهجن ٿا جڏهن مقامي پيرا ميٽر ڏنل هجي؛ اڳواٽ none آهي، جنهن سان انفوباڪس کي وڪيڊيٽا قبول ڪرڻ لاءِ تبديل ڪري سگهجي ٿو بغير انهن مضمونن ۾ تبديلي آڻڻ جي جيڪي اهو انفوباڪس استعمال ڪن ٿا، جيستائين مضمون ۾ اها ڪارڪردگي فعال نه ڪئي وڃي.
مثال: ڄمڻ جو هنڌ
[سنواريو]هي مٿي ڏنل ڪالن وانگر ئي ڪم ڪري ٿو:
{{#invoke:Wikidata|getValue|P19|}}= ڪجھ به واپس نه ڪندو، تنهنڪري انفوباڪس ۾ ڄمڻ جي هنڌ جي ڏيک کي روڪي ٿو{{#invoke:Wikidata|getValue|P19|FETCH_WIKIDATA}}= لاڳاپيل مضمون لاءِ وڪيڊيٽا ۾ محفوظ ٿيل پراپرٽي P19 (ڄمڻ جو هنڌ) جا ڳنڍيل قدر واپس ڪري ٿو، مثال طور مضمون بل ڪلنٽن لاءِ اهو هوپ، آرڪنساس واپس ڪري ٿو{{#invoke:Wikidata|getValue|P19|[[Hope, Arkansas|Hope]]}}= هوپ واپس ڪري ٿو، جنهن سان انفوباڪس وڪيڊيٽا ۾ محفوظ قدر بدران مقامي قدر استعمال ڪري سگهي ٿو.
مثال: جنس
[سنواريو]اسان نٿا چاهيون ته واپس ٿيندڙ قدر ڳنڍيل هجي، تنهنڪري استعمال ڪريو:
- -
{{#invoke:Wikidata|getRawValue|P21|FETCH_WIKIDATA}}
مثال: ڄمڻ جي تاريخ
[سنواريو]جيڪڏهن اسان ڄمڻ جي تاريخ dmy فارميٽ ۾ چاهيون ٿا، ته هي استعمال ڪريون ٿا:
- -
{{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|dmy}}
جيڪڏهن اسان ڄمڻ جي تاريخ mdy فارميٽ ۾ چاهيون ٿا، ته هي استعمال ڪريون ٿا:
- -
{{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|mdy}}
جيڪڏهن اسان ڄمڻ جو سال چاهيون ٿا، ته هي استعمال ڪريون ٿا:
- -
{{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|y}}
جيڪڏهن اسان ڄمڻ جو اهڙو سال چاهيون ٿا جيڪو BC ٿي سگهي ٿو، پر "BCE" طور پڙهڻ گهرجي، ته هي استعمال ڪريون ٿا:
- -
{{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|y|BCE}}
مثال: وڪيڊيٽا شيءَ سان ڳنڍڻ
[سنواريو]رڳو Q-ID حاصل ڪرڻ لاءِ هي ڪوڊ استعمال ڪريو:
- -
{{#invoke:Wikidata|pageId}}
وڪيڊيٽا سان ڳنڍڻ لاءِ عام وڪي markup استعمال ٿيو:
- -
[[d:{{#invoke:Wikidata|pageId}}|ڳنڍڻي جو نالو]]
مثال: ٻي وڪي صفحي سان ڳنڍڻ
[سنواريو]ٻي وڪي سان ڳنڍڻ لاءِ هن جهڙو ڪوڊ استعمال ڪريو. مثال ۾ انگريزي وڪي سفر:
- -
[[voy:{{#invoke:Wikidata|getSiteLink|enwikivoyage}}|ڳنڍڻي جو نالو]]
جانچ
[سنواريو]زال/مڙس جي جانچ
[سنواريو]هيٺ ڏنل کي ڪنهن به مضمون ۾ نقل ڪري لڳايو ۽ پيش منظر ڏسو؛ مهرباني ڪري محفوظ نه ڪريو!
* - {{#invoke:Wikidata|getValue|P26|}}
* - {{#invoke:Wikidata|getValue|P26|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getValue|P26|[[Hillary Rodham Clinton]]}}
بل ڪلنٽن ۾ توهان کي هي ملڻ گهرجي:
- -
- - هليري ڪلنٽن
- - هليري روڊهم ڪلنٽن
بارڪ اوباما ۾ توهان کي هي ملڻ گهرجي:
- -
- - مشيل اوباما
- - هليري روڊهم ڪلنٽن
رچرڊ برٽن ۾ توهان کي هي ملڻ گهرجي:
فرانز ڪافڪا ۾ توهان کي هي ملڻ گهرجي:
- -
- -
- - هليري روڊهم ڪلنٽن
ڄمڻ جي هنڌ جي جانچ
[سنواريو]هيٺ ڏنل کي ڪنهن به مضمون ۾ نقل ڪري لڳايو ۽ پيش منظر ڏسو؛ مهرباني ڪري محفوظ نه ڪريو!
* - {{#invoke:Wikidata|getValue|P19|}}
* - {{#invoke:Wikidata|getValue|P19|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getValue|P19|[[Newport]]}}
وليم ايلري آزمائي ڏسو ۽ جانچيو ته وڪيڊيٽا ڪال صحيح نموني فرق ڪري ٿي.
getValue، getRawValue ۽ getDateValue جي جانچ
[سنواريو]هيٺ ڏنل کي ڪنهن به مضمون ۾ نقل ڪري لڳايو ۽ پيش منظر ڏسو؛ مهرباني ڪري محفوظ نه ڪريو!
* - {{#invoke:Wikidata|getValue|P19|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getValue|P26|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getValue|P27|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getValue|P140|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getRawValue|P21|FETCH_WIKIDATA}}
* - {{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|dmy}}
* - {{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|mdy}}
* - {{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|y}}
اهو ڄمڻ جي هنڌ، زال/مڙس، شهريت، مذهب، جنس، ڄمڻ جي تاريخ ٻه ڀيرا، ۽ ڄمڻ جو سال لاءِ وڪيڊيٽا قدر واپس ڪرڻ گهرجي، جيڪڏهن اهي موجود هجن. ڄمڻ جي تاريخ پهرين dmy فارميٽ ۾ ۽ پوءِ mdy ۾ آهي.
BC/BCE تاريخن جي جانچ
[سنواريو]هيٺ ڏنل کي ڪنهن مختصر مضمون جي حصي، جهڙوڪ هوريس #پڻ ڏسو، ۾ نقل ڪري لڳايو ۽ پيش منظر ڏسو؛ مهرباني ڪري محفوظ نه ڪريو!
* - {{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|y}}
* - {{#invoke:Wikidata|getDateValue|P569|FETCH_WIKIDATA|y|BCE}}
اهو ترتيبوار 65 BC ۽ 65 BCE واپس ڪرڻ گهرجي.
پڻ ڏسو
[سنواريو]- ماڊيول:WikidataIB، انفوباڪسن ۾ وڪيڊيٽا کي سنڀالڻ لاءِ
-- vim: set noexpandtab ft=lua ts=4 sw=4:
require('strict')
local p = {}
local debug = false
------------------------------------------------------------------------------
-- module local variables and functions
local wiki =
{
langcode = mw.language.getContentLanguage().code
}
-- internationalisation
local i18n =
{
["errors"] =
{
["property-not-found"] = "Property not found.",
["entity-not-found"] = "Wikidata entity not found.",
["unknown-claim-type"] = "Unknown claim type.",
["unknown-entity-type"] = "Unknown entity type.",
["qualifier-not-found"] = "Qualifier not found.",
["site-not-found"] = "Wikimedia project not found.",
["unknown-datetime-format"] = "Unknown datetime format.",
["local-article-not-found"] = "Article is not yet available in this wiki."
},
["datetime"] =
{
-- $1 is a placeholder for the actual number
[0] = "$1 billion years", -- precision: billion years
[1] = "$100 million years", -- precision: hundred million years
[2] = "$10 million years", -- precision: ten million years
[3] = "$1 million years", -- precision: million years
[4] = "$100,000 years", -- precision: hundred thousand years
[5] = "$10,000 years", -- precision: ten thousand years
[6] = "$1 millennium", -- precision: millennium
[7] = "$1 century", -- precision: century
[8] = "$1s", -- precision: decade
-- the following use the format of #time parser function
[9] = "Y", -- precision: year,
[10] = "F Y", -- precision: month
[11] = "F j, Y", -- precision: day
[12] = "F j, Y ga", -- precision: hour
[13] = "F j, Y g:ia", -- precision: minute
[14] = "F j, Y g:i:sa", -- precision: second
["beforenow"] = "$1 BCE", -- how to format negative numbers for precisions 0 to 5
["afternow"] = "$1 CE", -- how to format positive numbers for precisions 0 to 5
["bc"] = '$1 "BCE"', -- how print negative years
["ad"] = "$1", -- how print positive years
-- the following are for function getDateValue() and getQualifierDateValue()
["default-format"] = "dmy", -- default value of the #3 (getDateValue) or
-- #4 (getQualifierDateValue) argument
["default-addon"] = "BC", -- default value of the #4 (getDateValue) or
-- #5 (getQualifierDateValue) argument
["prefix-addon"] = false, -- set to true for languages put "BC" in front of the
-- datetime string; or the addon will be suffixed
["addon-sep"] = " ", -- separator between datetime string and addon (or inverse)
["format"] = -- options of the 3rd argument
{
["mdy"] = "F j, Y",
["my"] = "F Y",
["y"] = "Y",
["dmy"] = "j F Y",
["ymd"] = "Y-m-d",
["ym"] = "Y-m"
}
},
["monolingualtext"] = '<span lang="%language">%text</span>',
["warnDump"] = "[[Category:Called function 'Dump' from module Wikidata]]",
["ordinal"] =
{
[1] = "st",
[2] = "nd",
[3] = "rd",
["default"] = "th"
}
}
if wiki.langcode ~= "en" then
--require("Module:i18n").loadI18n("Module:Wikidata/i18n", i18n)
-- got idea from [[:w:Module:Wd]]
local module_title; if ... == nil then
module_title = mw.getCurrentFrame():getTitle()
else
module_title = ...
end
require('Module:i18n').loadI18n(module_title..'/i18n', i18n)
end
-- this function needs to be internationalised along with the above:
-- takes cardinal numer as a numeric and returns the ordinal as a string
-- we need three exceptions in English for 1st, 2nd, 3rd, 21st, .. 31st, etc.
local function makeOrdinal (cardinal)
local ordsuffix = i18n.ordinal.default
if cardinal % 10 == 1 then
ordsuffix = i18n.ordinal[1]
elseif cardinal % 10 == 2 then
ordsuffix = i18n.ordinal[2]
elseif cardinal % 10 == 3 then
ordsuffix = i18n.ordinal[3]
end
-- In English, 1, 21, 31, etc. use 'st', but 11, 111, etc. use 'th'
-- similarly for 12 and 13, etc.
if (cardinal % 100 == 11) or (cardinal % 100 == 12) or (cardinal % 100 == 13) then
ordsuffix = i18n.ordinal.default
end
return tostring(cardinal) .. ordsuffix
end
local function printError(code)
return '<span class="error">' .. (i18n.errors[code] or code) .. '</span>'
end
local function parseDateFormat(f, timestamp, addon, prefix_addon, addon_sep)
local year_suffix
local tstr = ""
local lang_obj = mw.language.new(wiki.langcode)
local f_parts = mw.text.split(f, 'Y', true)
for idx, f_part in pairs(f_parts) do
year_suffix = ''
if string.match(f_part, "x[mijkot]$") then
-- for non-Gregorian year
f_part = f_part .. 'Y'
elseif idx < #f_parts then
-- supress leading zeros in year
year_suffix = lang_obj:formatDate('Y', timestamp)
year_suffix = string.gsub(year_suffix, '^0+', '', 1)
end
tstr = tstr .. lang_obj:formatDate(f_part, timestamp) .. year_suffix
end
if addon ~= "" and prefix_addon then
return addon .. addon_sep .. tstr
elseif addon ~= "" then
return tstr .. addon_sep .. addon
else
return tstr
end
end
local function parseDateValue(timestamp, date_format, date_addon)
local prefix_addon = i18n["datetime"]["prefix-addon"]
local addon_sep = i18n["datetime"]["addon-sep"]
local addon = ""
-- check for negative date
if string.sub(timestamp, 1, 1) == '-' then
timestamp = '+' .. string.sub(timestamp, 2)
addon = date_addon
end
local _date_format = i18n["datetime"]["format"][date_format]
if _date_format ~= nil then
return parseDateFormat(_date_format, timestamp, addon, prefix_addon, addon_sep)
else
return printError("unknown-datetime-format")
end
end
-- This local function combines the year/month/day/BC/BCE handling of parseDateValue{}
-- with the millennium/century/decade handling of formatDate()
local function parseDateFull(timestamp, precision, date_format, date_addon)
local prefix_addon = i18n["datetime"]["prefix-addon"]
local addon_sep = i18n["datetime"]["addon-sep"]
local addon = ""
-- check for negative date
if string.sub(timestamp, 1, 1) == '-' then
timestamp = '+' .. string.sub(timestamp, 2)
addon = date_addon
end
-- get the next four characters after the + (should be the year now in all cases)
-- ok, so this is dirty, but let's get it working first
local intyear = tonumber(string.sub(timestamp, 2, 5))
if intyear == 0 and precision <= 9 then
return ""
end
-- precision is 10000 years or more
if precision <= 5 then
local factor = 10 ^ ((5 - precision) + 4)
local y2 = math.ceil(math.abs(intyear) / factor)
local relative = mw.ustring.gsub(i18n.datetime[precision], "$1", tostring(y2))
if addon ~= "" then
-- negative date
relative = mw.ustring.gsub(i18n.datetime.beforenow, "$1", relative)
else
relative = mw.ustring.gsub(i18n.datetime.afternow, "$1", relative)
end
return relative
end
-- precision is decades (8), centuries (7) and millennia (6)
local era, card
if precision == 6 then
card = math.floor((intyear - 1) / 1000) + 1
era = mw.ustring.gsub(i18n.datetime[6], "$1", makeOrdinal(card))
end
if precision == 7 then
card = math.floor((intyear - 1) / 100) + 1
era = mw.ustring.gsub(i18n.datetime[7], "$1", makeOrdinal(card))
end
if precision == 8 then
era = mw.ustring.gsub(i18n.datetime[8], "$1", tostring(math.floor(math.abs(intyear) / 10) * 10))
end
if era then
if addon ~= "" then
era = mw.ustring.gsub(mw.ustring.gsub(i18n.datetime.bc, '"', ""), "$1", era)
else
era = mw.ustring.gsub(mw.ustring.gsub(i18n.datetime.ad, '"', ""), "$1", era)
end
return era
end
local _date_format = i18n["datetime"]["format"][date_format]
if _date_format ~= nil then
-- check for precision is year and override supplied date_format
if precision == 9 then
_date_format = i18n["datetime"][9]
end
return parseDateFormat(_date_format, timestamp, addon, prefix_addon, addon_sep)
else
return printError("unknown-datetime-format")
end
end
-- the "qualifiers" and "snaks" field have a respective "qualifiers-order" and "snaks-order" field
-- use these as the second parameter and this function instead of the built-in "pairs" function
-- to iterate over all qualifiers and snaks in the intended order.
local function orderedpairs(array, order)
if not order then return pairs(array) end
-- return iterator function
local i = 0
return function()
i = i + 1
if order[i] then
return order[i], array[order[i]]
end
end
end
-- precision: 0 - billion years, 1 - hundred million years, ..., 6 - millennia, 7 - century, 8 - decade, 9 - year, 10 - month, 11 - day, 12 - hour, 13 - minute, 14 - second
local function normalizeDate(date)
date = mw.text.trim(date, "+")
-- extract year
local yearstr = mw.ustring.match(date, "^\-?%d+")
local year = tonumber(yearstr)
-- remove leading zeros of year
return year .. mw.ustring.sub(date, #yearstr + 1), year
end
local function formatDate(date, precision, timezone)
precision = precision or 11
local date, year = normalizeDate(date)
if year == 0 and precision <= 9 then return "" end
-- precision is 10000 years or more
if precision <= 5 then
local factor = 10 ^ ((5 - precision) + 4)
local y2 = math.ceil(math.abs(year) / factor)
local relative = mw.ustring.gsub(i18n.datetime[precision], "$1", tostring(y2))
if year < 0 then
relative = mw.ustring.gsub(i18n.datetime.beforenow, "$1", relative)
else
relative = mw.ustring.gsub(i18n.datetime.afternow, "$1", relative)
end
return relative
end
-- precision is decades, centuries and millennia
local era
if precision == 6 then era = mw.ustring.gsub(i18n.datetime[6], "$1", tostring(math.floor((math.abs(year) - 1) / 1000) + 1)) end
if precision == 7 then era = mw.ustring.gsub(i18n.datetime[7], "$1", tostring(math.floor((math.abs(year) - 1) / 100) + 1)) end
if precision == 8 then era = mw.ustring.gsub(i18n.datetime[8], "$1", tostring(math.floor(math.abs(year) / 10) * 10)) end
if era then
if year < 0 then era = mw.ustring.gsub(mw.ustring.gsub(i18n.datetime.bc, '"', ""), "$1", era)
elseif year > 0 then era = mw.ustring.gsub(mw.ustring.gsub(i18n.datetime.ad, '"', ""), "$1", era) end
return era
end
-- precision is year
if precision == 9 then
return year
end
-- precision is less than years
if precision > 9 then
--[[ the following code replaces the UTC suffix with the given negated timezone to convert the global time to the given local time
timezone = tonumber(timezone)
if timezone and timezone ~= 0 then
timezone = -timezone
timezone = string.format("%.2d%.2d", timezone / 60, timezone % 60)
if timezone[1] ~= '-' then timezone = "+" .. timezone end
date = mw.text.trim(date, "Z") .. " " .. timezone
end
]]--
local formatstr = i18n.datetime[precision]
if year == 0 then formatstr = mw.ustring.gsub(formatstr, i18n.datetime[9], "")
elseif year < 0 then
-- Mediawiki formatDate doesn't support negative years
date = mw.ustring.sub(date, 2)
formatstr = mw.ustring.gsub(formatstr, i18n.datetime[9], mw.ustring.gsub(i18n.datetime.bc, "$1", i18n.datetime[9]))
elseif year > 0 and i18n.datetime.ad ~= "$1" then
formatstr = mw.ustring.gsub(formatstr, i18n.datetime[9], mw.ustring.gsub(i18n.datetime.ad, "$1", i18n.datetime[9]))
end
return mw.language.new(wiki.langcode):formatDate(formatstr, date)
end
end
local function printDatavalueEntity(data, parameter)
-- data fields: entity-type [string], numeric-id [int, Wikidata id]
local id
if data["entity-type"] == "item" then id = "Q" .. data["numeric-id"]
elseif data["entity-type"] == "property" then id = "P" .. data["numeric-id"]
else return printError("unknown-entity-type")
end
if parameter then
if parameter == "link" then
local linkTarget = mw.wikibase.getSitelink(id)
local linkName = mw.wikibase.getLabel(id)
if linkTarget then
-- if there is a local Wikipedia article link to it using the label or the article title
return "[[" .. linkTarget .. "|" .. (linkName or linkTarget) .. "]]"
else
-- if there is no local Wikipedia article output the label or link to the Wikidata object to let the user input a proper label
if linkName then return linkName else return "[[:d:" .. id .. "|" .. id .. "]]" end
end
else
return data[parameter]
end
else
return mw.wikibase.getLabel(id) or id
end
end
local function printDatavalueTime(data, parameter)
-- data fields: time [ISO 8601 time], timezone [int in minutes], before [int], after [int], precision [int], calendarmodel [wikidata URI]
-- precision: 0 - billion years, 1 - hundred million years, ..., 6 - millennia, 7 - century, 8 - decade, 9 - year, 10 - month, 11 - day, 12 - hour, 13 - minute, 14 - second
-- calendarmodel: e.g. http://www.wikidata.org/entity/Q1985727 for the proleptic Gregorian calendar or http://www.wikidata.org/wiki/Q11184 for the Julian calendar]
if parameter then
if parameter == "calendarmodel" then data.calendarmodel = mw.ustring.match(data.calendarmodel, "Q%d+") -- extract entity id from the calendar model URI
elseif parameter == "time" then data.time = normalizeDate(data.time) end
return data[parameter]
else
return formatDate(data.time, data.precision, data.timezone)
end
end
local function printDatavalueMonolingualText(data, parameter)
-- data fields: language [string], text [string]
if parameter then
return data[parameter]
else
local result = mw.ustring.gsub(mw.ustring.gsub(i18n.monolingualtext, "%%language", data["language"]), "%%text", data["text"])
return result
end
end
local function findClaims(entity, property)
if not property or not entity or not entity.claims then return end
if mw.ustring.match(property, "^P%d+$") then
-- if the property is given by an id (P..) access the claim list by this id
return entity.claims[property]
else
property = mw.wikibase.resolvePropertyId(property)
if not property then return end
return entity.claims[property]
end
end
local function getSnakValue(snak, parameter)
if snak.snaktype == "value" then
-- call the respective snak parser
if snak.datavalue.type == "string" then return snak.datavalue.value
elseif snak.datavalue.type == "globecoordinate" then return printDatavalueCoordinate(snak.datavalue.value, parameter)
elseif snak.datavalue.type == "quantity" then return printDatavalueQuantity(snak.datavalue.value, parameter)
elseif snak.datavalue.type == "time" then return printDatavalueTime(snak.datavalue.value, parameter)
elseif snak.datavalue.type == "wikibase-entityid" then return printDatavalueEntity(snak.datavalue.value, parameter)
elseif snak.datavalue.type == "monolingualtext" then return printDatavalueMonolingualText(snak.datavalue.value, parameter)
end
end
return mw.wikibase.renderSnak(snak)
end
local function getQualifierSnak(claim, qualifierId)
-- a "snak" is Wikidata terminology for a typed key/value pair
-- a claim consists of a main snak holding the main information of this claim,
-- as well as a list of attribute snaks and a list of references snaks
if qualifierId then
-- search the attribute snak with the given qualifier as key
if claim.qualifiers then
local qualifier = claim.qualifiers[qualifierId]
if qualifier then return qualifier[1] end
end
return nil, printError("qualifier-not-found")
else
-- otherwise return the main snak
return claim.mainsnak
end
end
local function getValueOfClaim(claim, qualifierId, parameter)
local error
local snak
snak, error = getQualifierSnak(claim, qualifierId)
if snak then
return getSnakValue(snak, parameter)
else
return nil, error
end
end
local function getReferences(frame, claim)
local result = ""
-- traverse through all references
for ref in pairs(claim.references or {}) do
local refparts
-- traverse through all parts of the current reference
for snakkey, snakval in orderedpairs(claim.references[ref].snaks or {}, claim.references[ref]["snaks-order"]) do
if refparts then refparts = refparts .. ", " else refparts = "" end
-- output the label of the property of the reference part, e.g. "imported from" for P143
refparts = refparts .. tostring(mw.wikibase.getLabel(snakkey)) .. ": "
-- output all values of this reference part, e.g. "German Wikipedia" and "English Wikipedia" if the referenced claim was imported from both sites
for snakidx = 1, #snakval do
if snakidx > 1 then refparts = refparts .. ", " end
refparts = refparts .. getSnakValue(snakval[snakidx])
end
end
if refparts then result = result .. frame:extensionTag("ref", refparts) end
end
return result
end
local function parseInput(frame)
local qid = frame.args.qid
if qid and (#qid == 0) then qid = nil end
local propertyID = mw.text.trim(frame.args[1] or "")
local input_parm = mw.text.trim(frame.args[2] or "")
if input_parm ~= "FETCH_WIKIDATA" then
return false, input_parm, nil, nil
end
local entity = mw.wikibase.getEntity(qid)
local claims
if entity and entity.claims then
claims = entity.claims[propertyID]
if not claims then
return false, "", nil, nil
end
else
return false, "", nil, nil
end
return true, entity, claims, propertyID
end
local function isType(claims, type)
return claims[1] and claims[1].mainsnak.snaktype == "value" and claims[1].mainsnak.datavalue.type == type
end
local function getValue(entity, claims, propertyID, delim, labelHook)
if labelHook == nil then
labelHook = function (qnumber)
return nil;
end
end
if isType(claims, "wikibase-entityid") then
local out = {}
for k, v in pairs(claims) do
local qnumber = "Q" .. v.mainsnak.datavalue.value["numeric-id"]
local sitelink = mw.wikibase.getSitelink(qnumber)
local label = labelHook(qnumber) or mw.wikibase.getLabel(qnumber) or qnumber
if sitelink then
out[#out + 1] = "[[" .. sitelink .. "|" .. label .. "]]"
else
out[#out + 1] = "[[:d:" .. qnumber .. "|" .. label .. "]]<abbr title='" .. i18n["errors"]["local-article-not-found"] .. "'>[*]</abbr>"
end
end
return table.concat(out, delim)
else
-- just return best values
return entity:formatPropertyValues(propertyID).value
end
end
------------------------------------------------------------------------------
-- module global functions
if debug then
function p.inspectI18n(frame)
local val = i18n
for _, key in pairs(frame.args) do
key = mw.text.trim(key)
val = val[key]
end
return val
end
end
function p.descriptionIn(frame)
local langcode = frame.args[1]
local id = frame.args[2]
-- return description of a Wikidata entity in the given language or the default language of this Wikipedia site
return mw.wikibase.getEntity(id):getDescription(langcode or wiki.langcode)
end
function p.labelIn(frame)
local langcode = frame.args[1]
local id = frame.args[2]
-- return label of a Wikidata entity in the given language or the default language of this Wikipedia site
return mw.wikibase.getEntity(id):getLabel(langcode or wiki.langcode)
end
-- This is used to get a value, or a comma separated list of them if multiple values exist
p.getValue = function(frame)
local delimdefault = ", " -- **internationalise later**
local delim = frame.args.delimiter or ""
delim = string.gsub(delim, '"', '')
if #delim == 0 then
delim = delimdefault
end
local go, errorOrentity, claims, propertyID = parseInput(frame)
if not go then
return errorOrentity
end
return getValue(errorOrentity, claims, propertyID, delim)
end
-- Same as above, but uses the short name property for label if available.
p.getValueShortName = function(frame)
local go, errorOrentity, claims, propertyID = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
-- if wiki-linked value output as link if possible
local function labelHook (qnumber)
local label
local claimEntity = mw.wikibase.getEntity(qnumber)
if claimEntity ~= nil then
if claimEntity.claims.P1813 then
for k2, v2 in pairs(claimEntity.claims.P1813) do
if v2.mainsnak.datavalue.value.language == "en" then
label = v2.mainsnak.datavalue.value.text
end
end
end
end
if label == nil or label == "" then return nil end
return label
end
return getValue(errorOrentity, claims, propertyID, ", ", labelHook);
end
-- This is used to get a value, or a comma separated list of them if multiple values exist
-- from an arbitrary entry by using its QID.
-- Use : {{#invoke:Wikidata|getValueFromID|<ID>|<Property>|FETCH_WIKIDATA}}
-- E.g.: {{#invoke:Wikidata|getValueFromID|Q151973|P26|FETCH_WIKIDATA}} - to fetch value of 'spouse' (P26) from 'Richard Burton' (Q151973)
-- Please use sparingly - this is an *expensive call*.
p.getValueFromID = function(frame)
local itemID = mw.text.trim(frame.args[1] or "")
local propertyID = mw.text.trim(frame.args[2] or "")
local input_parm = mw.text.trim(frame.args[3] or "")
if input_parm == "FETCH_WIKIDATA" then
local entity = mw.wikibase.getEntity(itemID)
local claims
if entity and entity.claims then
claims = entity.claims[propertyID]
end
if claims then
return getValue(entity, claims, propertyID, ", ")
else
return ""
end
else
return input_parm
end
end
local function getQualifier(frame, outputHook)
local propertyID = mw.text.trim(frame.args[1] or "")
local qualifierID = mw.text.trim(frame.args[2] or "")
local input_parm = mw.text.trim(frame.args[3] or "")
if input_parm == "FETCH_WIKIDATA" then
local entity = mw.wikibase.getEntity()
if entity.claims[propertyID] ~= nil then
local out = {}
for k, v in pairs(entity.claims[propertyID]) do
for k2, v2 in pairs(v.qualifiers[qualifierID]) do
if v2.snaktype == 'value' then
out[#out + 1] = outputHook(v2);
end
end
end
return table.concat(out, ", "), true
else
return "", false
end
else
return input_parm, false
end
end
p.getQualifierValue = function(frame)
local function outputValue(value)
local qnumber = "Q" .. value.datavalue.value["numeric-id"]
if (mw.wikibase.getSitelink(qnumber)) then
return "[[" .. mw.wikibase.getSitelink(qnumber) .. "]]"
else
return "[[:d:" .. qnumber .. "|" ..qnumber .. "]]<abbr title='" .. i18n["errors"]["local-article-not-found"] .. "'>[*]</abbr>"
end
end
return (getQualifier(frame, outputValue))
end
-- This is used to get a value like 'male' (for property p21) which won't be linked and numbers without the thousand separators
p.getRawValue = function(frame)
local go, errorOrentity, claims, propertyID = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
local result = entity:formatPropertyValues(propertyID, mw.wikibase.entity.claimRanks).value
-- if number type: remove thousand separators, bounds and units
if isType(claims, "quantity") then
result = mw.ustring.gsub(result, "(%d),(%d)", "%1%2")
result = mw.ustring.gsub(result, "(%d)±.*", "%1")
end
return result
end
-- This is used to get the unit name for the numeric value returned by getRawValue
p.getUnits = function(frame)
local go, errorOrentity, claims, propertyID = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
local result = entity:formatPropertyValues(propertyID, mw.wikibase.entity.claimRanks).value
if isType(claims, "quantity") then
result = mw.ustring.sub(result, mw.ustring.find(result, " ")+1, -1)
end
return result
end
-- This is used to get the unit's QID to use with the numeric value returned by getRawValue
p.getUnitID = function(frame)
local go, errorOrentity, claims = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
local result
if isType(claims, "quantity") then
-- get the url for the unit entry on Wikidata:
result = claims[1].mainsnak.datavalue.value.unit
-- and just reurn the last bit from "Q" to the end (which is the QID):
result = mw.ustring.sub(result, mw.ustring.find(result, "Q"), -1)
end
return result
end
p.getRawQualifierValue = function(frame)
local function outputHook(value)
if value.datavalue.value["numeric-id"] then
return mw.wikibase.getLabel("Q" .. value.datavalue.value["numeric-id"])
else
return value.datavalue.value
end
end
local ret, gotData = getQualifier(frame, outputHook)
if gotData then
ret = string.upper(string.sub(ret, 1, 1)) .. string.sub(ret, 2)
end
return ret
end
-- This is used to get a date value for date_of_birth (P569), etc. which won't be linked
-- Dates and times are stored in ISO 8601 format (sort of).
-- At present the local formatDate(date, precision, timezone) function doesn't handle timezone
-- So I'll just supply "Z" in the call to formatDate below:
p.getDateValue = function(frame)
local date_format = mw.text.trim(frame.args[3] or i18n["datetime"]["default-format"])
local date_addon = mw.text.trim(frame.args[4] or i18n["datetime"]["default-addon"])
local go, errorOrentity, claims = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
local out = {}
for k, v in pairs(claims) do
if v.mainsnak.datavalue.type == 'time' then
local timestamp = v.mainsnak.datavalue.value.time
local dateprecision = v.mainsnak.datavalue.value.precision
-- A year can be stored like this: "+1872-00-00T00:00:00Z",
-- which is processed here as if it were the day before "+1872-01-01T00:00:00Z",
-- and that's the last day of 1871, so the year is wrong.
-- So fix the month 0, day 0 timestamp to become 1 January instead:
timestamp = timestamp:gsub("%-00%-00T", "-01-01T")
out[#out + 1] = parseDateFull(timestamp, dateprecision, date_format, date_addon)
end
end
return table.concat(out, ", ")
end
p.getQualifierDateValue = function(frame)
local date_format = mw.text.trim(frame.args[4] or i18n["datetime"]["default-format"])
local date_addon = mw.text.trim(frame.args[5] or i18n["datetime"]["default-addon"])
local function outputHook(value)
local timestamp = value.datavalue.value.time
return parseDateValue(timestamp, date_format, date_addon)
end
return (getQualifier(frame, outputHook))
end
-- This is used to fetch all of the images with a particular property, e.g. image (P18), Gene Atlas Image (P692), etc.
-- Parameters are | propertyID | value / FETCH_WIKIDATA / nil | separator (default=space) | size (default=frameless)
-- It will return a standard wiki-markup [[File:Filename | size]] for each image with a selectable size and separator (which may be html)
-- e.g. {{#invoke:Wikidata|getImages|P18|FETCH_WIKIDATA}}
-- e.g. {{#invoke:Wikidata|getImages|P18|FETCH_WIKIDATA|<br>|250px}}
-- If a property is chosen that is not of type "commonsMedia", it will return empty text.
p.getImages = function(frame)
local sep = mw.text.trim(frame.args[3] or " ")
local imgsize = mw.text.trim(frame.args[4] or "frameless")
local go, errorOrentity, claims = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
if (claims[1] and claims[1].mainsnak.datatype == "commonsMedia") then
local out = {}
for k, v in pairs(claims) do
local filename = v.mainsnak.datavalue.value
out[#out + 1] = "[[File:" .. filename .. "|" .. imgsize .. "]]"
end
return table.concat(out, sep)
else
return ""
end
end
-- This is used to get the TA98 (Terminologia Anatomica first edition 1998) values like 'A01.1.00.005' (property P1323)
-- which are then linked to https://ifaa.unifr.ch/Public/EntryPage/TA98%20Tree/Entity%20TA98%20EN/01.1.00.005%20Entity%20TA98%20EN.htm
-- uses the newer mw.wikibase calls instead of directly using the snaks
-- formatPropertyValues returns a table with the P1323 values concatenated with ", " so we have to split them out into a table in order to construct the return string
p.getTAValue = function(frame)
local ent = mw.wikibase.getEntity()
local props = ent:formatPropertyValues('P1323')
local out = {}
local t = {}
for k, v in pairs(props) do
if k == 'value' then
t = mw.text.split( v, ", ")
for k2, v2 in pairs(t) do
out[#out + 1] = "[https://ifaa.unifr.ch/Public/EntryPage/TA98%20Tree/Entity%20TA98%20EN/" .. string.sub(v2, 2) .. "%20Entity%20TA98%20EN.htm " .. v2 .. "]"
end
end
end
local ret = table.concat(out, "<br> ")
if #ret == 0 then
ret = "Invalid TA"
end
return ret
end
--[[
This is used to return an image legend from Wikidata
image is property P18
image legend is property P2096
Call as {{#invoke:Wikidata |getImageLegend | <PARAMETER> | lang=<ISO-639code> |id=<QID>}}
Returns PARAMETER, unless it is equal to "FETCH_WIKIDATA", from Item QID (expensive call)
If QID is omitted or blank, the current article is used (not an expensive call)
If lang is omitted, it uses the local wiki language, otherwise it uses the provided ISO-639 language code
ISO-639: https://docs.oracle.com/cd/E13214_01/wli/docs92/xref/xqisocodes.html#wp1252447
Ranks are: 'preferred' > 'normal'
This returns the label from the first image with 'preferred' rank
Or the label from the first image with 'normal' rank if preferred returns nothing
Ranks: https://www.mediawiki.org/wiki/Extension:Wikibase_Client/Lua
]]
p.getImageLegend = function(frame)
-- look for named parameter id; if it's blank make it nil
local id = frame.args.id
if id and (#id == 0) then
id = nil
end
-- look for named parameter lang
-- it should contain a two-character ISO-639 language code
-- if it's blank fetch the language of the local wiki
local lang = frame.args.lang
if (not lang) or (#lang < 2) then
lang = mw.language.getContentLanguage().code
end
-- first unnamed parameter is the local parameter, if supplied
local input_parm = mw.text.trim(frame.args[1] or "")
if input_parm == "FETCH_WIKIDATA" then
local ent = mw.wikibase.getEntity(id)
local imgs
if ent and ent.claims then
imgs = ent.claims.P18
end
local imglbl
if imgs then
-- look for an image with 'preferred' rank
for k1, v1 in pairs(imgs) do
if v1.rank == "preferred" and v1.qualifiers and v1.qualifiers.P2096 then
local imglbls = v1.qualifiers.P2096
for k2, v2 in pairs(imglbls) do
if v2.datavalue.value.language == lang then
imglbl = v2.datavalue.value.text
break
end
end
end
end
-- if we don't find one, look for an image with 'normal' rank
if (not imglbl) then
for k1, v1 in pairs(imgs) do
if v1.rank == "normal" and v1.qualifiers and v1.qualifiers.P2096 then
local imglbls = v1.qualifiers.P2096
for k2, v2 in pairs(imglbls) do
if v2.datavalue.value.language == lang then
imglbl = v2.datavalue.value.text
break
end
end
end
end
end
end
return imglbl
else
return input_parm
end
end
-- This is used to get the QIDs of all of the values of a property, as a comma separated list if multiple values exist
-- Usage: {{#invoke:Wikidata |getPropertyIDs |<PropertyID> |FETCH_WIKIDATA}}
-- Usage: {{#invoke:Wikidata |getPropertyIDs |<PropertyID> |<InputParameter> |qid=<QID>}}
p.getPropertyIDs = function(frame)
local go, errorOrentity, propclaims = parseInput(frame)
if not go then
return errorOrentity
end
local entity = errorOrentity
-- if wiki-linked value collect the QID in a table
if (propclaims[1] and propclaims[1].mainsnak.snaktype == "value" and propclaims[1].mainsnak.datavalue.type == "wikibase-entityid") then
local out = {}
for k, v in pairs(propclaims) do
out[#out + 1] = "Q" .. v.mainsnak.datavalue.value["numeric-id"]
end
return table.concat(out, ", ")
else
-- not a wikibase-entityid, so return empty
return ""
end
end
-- returns the page id (Q...) of the current page or nothing of the page is not connected to Wikidata
function p.pageId(frame)
return mw.wikibase.getEntityIdForCurrentPage()
end
function p.claim(frame)
local property = frame.args[1] or ""
local id = frame.args["id"]
local qualifierId = frame.args["qualifier"]
local parameter = frame.args["parameter"]
local list = frame.args["list"]
local references = frame.args["references"]
local showerrors = frame.args["showerrors"]
local default = frame.args["default"]
if default then showerrors = nil end
-- get wikidata entity
local entity = mw.wikibase.getEntity(id)
if not entity then
if showerrors then return printError("entity-not-found") else return default end
end
-- fetch the first claim of satisfying the given property
local claims = findClaims(entity, property)
if not claims or not claims[1] then
if showerrors then return printError("property-not-found") else return default end
end
-- get initial sort indices
local sortindices = {}
for idx in pairs(claims) do
sortindices[#sortindices + 1] = idx
end
-- sort by claim rank
local comparator = function(a, b)
local rankmap = { deprecated = 2, normal = 1, preferred = 0 }
local ranka = rankmap[claims[a].rank or "normal"] .. string.format("%08d", a)
local rankb = rankmap[claims[b].rank or "normal"] .. string.format("%08d", b)
return ranka < rankb
end
table.sort(sortindices, comparator)
local result
local error
if list then
local value
-- iterate over all elements and return their value (if existing)
result = {}
for idx in pairs(claims) do
local claim = claims[sortindices[idx]]
value, error = getValueOfClaim(claim, qualifierId, parameter)
if not value and showerrors then value = error end
if value and references then value = value .. getReferences(frame, claim) end
result[#result + 1] = value
end
result = table.concat(result, list)
else
-- return first element
local claim = claims[sortindices[1]]
result, error = getValueOfClaim(claim, qualifierId, parameter)
if result and references then result = result .. getReferences(frame, claim) end
end
if result then return result else
if showerrors then return error else return default end
end
end
-- look into entity object
function p.ViewSomething(frame)
local f = (frame.args[1] or frame.args.id) and frame or frame:getParent()
local id = f.args.id
if id and (#id == 0) then
id = nil
end
local data = mw.wikibase.getEntity(id)
if not data then
return nil
end
local i = 1
while true do
local index = f.args[i]
if not index then
if type(data) == "table" then
return mw.text.jsonEncode(data, mw.text.JSON_PRESERVE_KEYS + mw.text.JSON_PRETTY)
else
return tostring(data)
end
end
data = data[index] or data[tonumber(index)]
if not data then
return
end
i = i + 1
end
end
-- getting sitelink of a given wiki
-- get sitelink of current item if qid not supplied
function p.getSiteLink(frame)
local qid = frame.args.qid
if qid == "" then qid = nil end
local f = mw.text.trim( frame.args[1] or "")
local entity = mw.wikibase.getEntity(qid)
if not entity then
return
end
local link = entity:getSitelink( f )
if not link then
return
end
return link
end
function p.Dump(frame)
local f = (frame.args[1] or frame.args.id) and frame or frame:getParent()
local data = mw.wikibase.getEntity(f.args.id)
if not data then
return i18n.warnDump
end
local i = 1
while true do
local index = f.args[i]
if not index then
return "<pre>"..mw.dumpObject(data).."</pre>".. i18n.warnDump
end
data = data[index] or data[tonumber(index)]
if not data then
return i18n.warnDump
end
i = i + 1
end
end
return p