Modul:Index template
Dokumentasi untuk modul ini dapat dibuat di Modul:Index template/doc
function withWikidataLink(wikitext, category)
if wikitext == nil then
return nil
end
new_wikitext = mw.ustring.gsub(wikitext, '%[%[([^|%]]*)%]%]', function(page)
return addWikidataToLink(page, mw.ustring.gsub(page, '%.*/', '') , category)
end)
if new_wikitext ~= wikitext then
return new_wikitext
end
return mw.ustring.gsub(wikitext, '%[%[([^|]*)|([^|%]]*)%]%]', function(page, link)
return addWikidataToLink(page, link, category)
end)
end
function addWikidataToLink(page, label, category)
local title = mw.title.new( page )
if title == nil then
return '[[' .. page .. '|' .. label .. ']]'
end
if title.isRedirect then
title = title.redirectTarget
end
local tag = mw.html.create('span')
local itemId = mw.wikibase.getEntityIdForTitle(title.fullText)
tag:wikitext('[[' .. page .. '|' .. label .. ']]')
if itemId ~= nil then
tag:wikitext(' [[Image:Wikidata.svg|10px|link=d:' .. itemId .. '|Lihat butir ini di Wikidata]]')
if category ~= nil then
tag:wikitext('[[Kategori:' .. category .. ']]')
end
end
return tostring(tag)
end
function addRow(metadataTable, key, value)
if value then
metadataTable:tag('tr')
:tag('th')
:attr('score', 'row')
:css('vertical-align', 'top')
:wikitext(key)
:done()
:tag('td'):wikitext(value)
end
end
function splitFileNameInFileAndPage(title)
local slashPosition = string.find(title.text, "/")
if slashPosition == nil then
return title.text,nil
else
return string.sub(title.text, 1, slashPosition - 1), string.sub(title.text, slashPosition + 1)
end
end
function indexTemplate(frame)
--create a clean table of parameters with blank parameters removed
local data = (require 'Module:Index_data').indexDataWithWikidata(frame)
local args = data.args
local item = data.item
local page = mw.title.getCurrentTitle()
local html = mw.html.create()
if item then
html:wikitext('[[Kategori: Buku dengan butir Wikidata]]<indicator name="wikidata">[[File:Wikidata.svg|20px|Elemen Wikidata|link=d:' .. item.id .. ']]</indicator>')
else
html:wikitext('[[Category: Buku tanpa butir Wikidata]]')
end
--Left part
local left = html:tag('div')
if args.remarks or args.notes then
left:css('width', '80%')
end
left:css('float', 'left')
--Image
if args.image then
local imageContainer = left:tag('div')
:css({
float = 'left',
overflow = 'hidden',
border = 'thin grey solid'
})
local imageTitle = nil
if tonumber(args.image) ~= nil then
-- this is a page number
imageTitle = mw.title.getCurrentTitle():subPageTitle(args.image)
else
-- this is an other file
imageTitle = mw.title.new(args.image, "Media")
end
if imageTitle == nil then
imageContainer:wikitext(args.image)
else
local imageName, imagePage = splitFileNameInFileAndPage(imageTitle)
if imagePage ~= nil then
imageContainer:wikitext('[[File:' .. imageName .. '|page=' .. imagePage .. '|250px]]')
else
imageContainer:wikitext('[[File:' .. imageName .. '|250px]]')
end
end
end
--Metadata
local metadataContainer = left:tag('div')
if args.image then
metadataContainer:css('margin-left', '150px')
end
local metadataTable = metadataContainer:tag('table')
if args.title then
if item then
addRow(metadataTable, 'Judul', withWikidataLink(args.title))
else
addRow(metadataTable, 'Judul', '[[' .. args.title .. ']]')
end
else
mw.addWarning('Anda harus mengisi kotak judul')
end
addRow(metadataTable, 'Subjudul', withWikidataLink(args.subtitle))
if args.volume then
addRow(metadataTable, 'Volume', '' .. args.volume .. '' )
html:wikitext('[[Kategori: Buku dengan informasi Volume]]')
else
html:wikitext('[[Category: Buku tanpa informasi Volume]]')
end
if args.edition then
addRow(metadataTable, 'Edisi', '' .. args.edition .. '')
html:wikitext('[[Category: Buku dengan informasi Edisi]]')
else
html:wikitext('[[Category: Buku tanpa informasi Edisi]]')
end
if args.author then
if item then
addRow(metadataTable, 'Pengarang', withWikidataLink(args.author))
html:wikitext('[[Category: Buku dengan informasi Pengarang]]')
--html:wikitext('[[Category: Books by ' .. mw.text.nowiki(args.author) .. ']]')
-- local author = {{#invoke:delink|delink|mw.text.nowiki(args.author)}}
--local author = wikitext(args.author)
--local author = mw.text.killMarkers(args.author)
--local author = {{#invoke:delink|delinkWikilink| mw.text.nowiki(args.author)}}
--html:wikitext('[[Category: Books by ' .. {{#invoke:delink|' .. args.author .. '}}]]')
local author = item:formatStatements('P253075')['value']
--local author = {{delink|[[args.author]]}}
--local author = {{#delink|I visited www.example.com example.com.}}
--local author = {{#invoke:delink | args.author}}
--local author = mw.text.unstrip( args.author )
--html:wikitext('[[Category: Books by ' .. author .. ']]')
else
addRow(metadataTable, 'Pengarang', '{{Al|' .. args.author .. '}}')
end
else
html:wikitext('[[Category: Buku tanpa informasi Pengarang]]')
end
if args.coauthor1 then
addRow(metadataTable, 'Pengarang kedua', '{{Al|' .. args.coauthor1 .. '}}')
end
if args.translator then
if item then
addRow(metadataTable, 'Penerjemah', withWikidataLink(args.translator))
html:wikitext('[[Category: Buku dengan informasi Penerjemah]]')
else
addRow(metadataTable, 'Penerjemah', '{{Al|' .. args.translator .. '}}')
end
else
html:wikitext('[[Category: Buku tanpa informasi Penerjemah]]')
end
if args.editor then
if item then
addRow(metadataTable, 'Penyunting', withWikidataLink(args.editor))
html:wikitext('[[Category: Buku dengan informasi Penyunting]]')
else
addRow(metadataTable, 'Penyunting', '{{Al|' .. args.editor .. '}}')
end
else
html:wikitext('[[Category: Buku tanpa informasi Penyunting]]')
end
if args.illustrator then
addRow(metadataTable, 'Ilustrator', withWikidataLink(args.illustrator))
html:wikitext('[[Category: Buku dengan informasi Ilustrator]]')
else
html:wikitext('[[Category: Buku tanpa informasi Ilustrator]]')
end
if args.publisher then
if item then
addRow(metadataTable, 'Penerbit', withWikidataLink(args.publisher))
html:wikitext('[[Category: Buku dengan informasi Penerbit]]')
-- {{suppress categories|html:wikitext[[Category:No Publisher]]}}
-- {{#invoke:Suppress categories|main|html:wikitext[[Category:No Publisher]]}}
else
addRow(metadataTable, 'Penerbit', withWikidataLink(args.publisher))
html:wikitext('[[Category: Buku dengan informasi Penerbit]]')
end
else
html:wikitext('[[Category: Buku tanpa informasi Penerbit]]')
end
if args.address then
addRow(metadataTable, 'Alamat penerbit', withWikidataLink(args.address))
html:wikitext('[[Category:Buku dengan informasi Alamat Penerbit]]')
else
if args.publishedin then
addRow(metadataTable, 'Published In', withWikidataLink(args.publishedin))
html:wikitext('[[Category:Buku dengan informasi Alamat Penerbit]]')
else
html:wikitext('[[Category:Buku tanpa informasi Alamat Penerbit]]')
end
end
if args.year then
addRow(metadataTable, 'Tahun', withWikidataLink(args.year))
html:wikitext('[[Category: Buku dengan informasi Tahun]]')
else
html:wikitext('[[Category: Buku dengan informasi Tahun]]')
end
if args.printer then
addRow(metadataTable, 'Pencetak', withWikidataLink(args.printer))
html:wikitext('[[Category: Buku dengan informasi Pencetak]]')
else
html:wikitext('[[Category: Buku tanpa informasi Pencetak]]')
end
if args.source == 'djvu' or args.source == 'pdf' then
addRow(metadataTable, 'Sumber', '[[:File:' .. mw.title.getCurrentTitle().text .. '|' .. args.source .. ']]')
--add an indicator linking to the usages
local query = 'SELECT ?item ?itemLabel ?pages ?page WHERE {\n ?item wdt:P996 <http://commons.wikimedia.org/wiki/Special:FilePath/' .. mw.uri.encode(mw.title.getCurrentTitle().text, 'PATH') .. '> .\n OPTIONAL { ?page schema:about ?item ; schema:isPartOf <https://id.wikisource.org/> . }\n OPTIONAL { ?item wdt:P304 ?pages . }\n SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],id".\n}}'
html:wikitext('<indicator name="index-scan-wikidata">[[File:Wikidata Query Service Favicon.svg|20px|Butir Wikidata |link=https://query.wikidata.org/embed.html#' .. mw.uri.encode(query, 'PATH') .. ']]</indicator>')
else
addRow(metadataTable, 'Sumber', args.source)
end
if args.progress == 'T' then
addRow(metadataTable, 'Kemajuan', '[[Category:Buku lengkap]] [[:Category:Buku lengkap|Lengkap]]')
elseif args.progress == 'V' then
addRow(metadataTable, 'Kemajuan', '[[category:Buku untuk divalidasi]] [[:Category:Buku untuk divalidasi | Untuk divalidasi]]')
elseif args.progress == 'C' then
addRow(metadataTable, 'Kemajuan', '[[category:Buku untuk dibetulkan]] [[:category:Buku untuk dibetulkan | Untuk dibetulkan]]')
elseif args.progress == 'OCR' then
addRow(metadataTable, 'Kemajuan', '[[category:Buku tanpa lapisan teks]] [[:category:Buku tanpa lapisan teks | Tambahkan lapisan teks OCR]]')
elseif args.progress == 'L' then
addRow(metadataTable, 'Kemajuan', '[[category:Buku untuk diperbaiki]] <span style = "color: # FF0000;"> [[:category: Buku untuk diperbaiki | Berkas sumber cacat]]</span>')
elseif args.progress == 'X' then
addRow(metadataTable, 'Progres', '[[category:Ekstrak dan kompilasi]] [[:category:Ekstrak dan kompilasi | Sumber tidak lengkap: ekstrak dan kompilasi]]')
else
addRow(metadataTable, 'Progres', '[[Category:Buku dengan kemajuan tidak diketahui]] [[:category:Buku dengan kemajuan tidak diketahui | Kemajuan tidak diketahui]]')
end
addRow(metadataTable, 'Seri', args.volumes)
if args.pages then
left:tag('div'):css('clear', 'both')
left:tag('h3'):wikitext('Halaman')
left:tag('div'):attr('id', 'pagelist'):css({
background = '#F0F0F0',
['padding-left'] = '0.5em',
['text-align'] = 'justify'
}):newline():wikitext(args.pages):newline()
else
mw.addWarning('You must enter the pagination of the facsimile (Pages field) ')
end
if args.remarks or args.notes then
local right = html:tag('div'):css({
width = '44%;',
['padding-left'] = '1em',
float = 'right'
})
if args.remarks then
right:tag('div'):attr('id', 'remarks'):wikitext(args.remarks)
end
if args.notes then
right:tag('hr'):css({
['margin-top'] = '1em',
['margin-bottom'] = '1em'
})
right:tag('div'):attr('id', 'notes'):wikitext(args.notes)
end
end
if args.type == 'book' then
html:wikitext('[[Category: Indeks - Buku]] ')
elseif args.type == 'journal' then
html:wikitext('[[Category: Indeks - Terbitan berkala]] ')
elseif args.type == 'collection' then
html:wikitext('[[Category: Indeks - Koleksi]] ')
elseif args.type == 'dictionary' then
html:wikitext('[[Category: Indeks - Kamus]] ')
elseif args.type == 'phdthesis' then
html:wikitext('[[Category: Indeks - Tesis]] ')
end
html:wikitext('[[Category: Indeks]] ')
if args.source ~= 'djvu' then
html:wikitext('[[Category: Buku non-DjVu]] ')
elseif args.source == 'pdf' then
html: wikitext ('[[Category: Buku PDF]]')
elseif args.source == 'ogg' then
html: wikitext ('[[Category: Berkas OGG]]')
elseif args.source == 'webm' then
html: wikitext ('[[Category: Berkas WEBM]]')
end
if not args.remarks then
html: wikitext ('[[Category: Halaman berindeks]]')
end
return tostring(html)
end
local p = {}
function p.indexTemplate( frame )
return indexTemplate( frame )
end
return p