Difference between revisions of "Module:Limitation status list"
(forgot to actually invoke the function that sets SMW data) |
(support for column with Chinese/Japanese/Korean names) |
||
Line 7: | Line 7: | ||
prev = nil, | prev = nil, | ||
next = nil, | next = nil, | ||
− | items = {} | + | items = {}, |
+ | |||
+ | -- If there is a column for non-English names | ||
+ | -- The text to display in the column heading | ||
+ | localColumnHeading = nil, | ||
+ | -- The name of the SMW property to find the names in | ||
+ | localColumnProperty = nil, | ||
} | } | ||
Line 16: | Line 22: | ||
-- Name of the card page, if applicable | -- Name of the card page, if applicable | ||
cardName = nil, | cardName = nil, | ||
+ | localCardName = nil, | ||
-- Final text to display in the cell | -- Final text to display in the cell | ||
displayText = nil, | displayText = nil, | ||
Line 62: | Line 69: | ||
self:setSmwData() | self:setSmwData() | ||
+ | end | ||
+ | |||
+ | function List:setLocalisationAttributes() | ||
+ | if ( | ||
+ | self.locality == 'Simplified Chinese' or | ||
+ | self.locality == 'Traditional Chinese' or | ||
+ | self.locality == 'Japanese' or | ||
+ | self.locality == 'Korean' | ||
+ | ) then | ||
+ | self.localColumnHeading = self.locality | ||
+ | self.localColumnProperty = self.locality .. ' name' | ||
+ | |||
+ | elseif self.medium == 'OCG' or self.medium == 'Yu-Gi-Oh! Official Card Game' then | ||
+ | self.localColumnHeading = 'Japanese' | ||
+ | self.localColumnProperty = 'Japanese name' | ||
+ | |||
+ | else | ||
+ | self.localColumnHeading = nil | ||
+ | self.localColumnProperty = nil | ||
+ | end | ||
end | end | ||
Line 99: | Line 126: | ||
listItem.card = itemText | listItem.card = itemText | ||
listItem.cardName = cardData.name | listItem.cardName = cardData.name | ||
+ | listItem.localCardName = cardData.localName | ||
listItem.cardType = cardData.cardType | listItem.cardType = cardData.cardType | ||
listItem.displayText = '"[[' .. listItem.card .. '|' .. listItem.cardName .. ']]"' | listItem.displayText = '"[[' .. listItem.card .. '|' .. listItem.cardName .. ']]"' | ||
Line 131: | Line 159: | ||
-- Find data on a card by suppyling its name | -- Find data on a card by suppyling its name | ||
function List:lookupCardData(pageName) | function List:lookupCardData(pageName) | ||
− | local | + | local queryParams = { |
'[[' .. pageName .. ']]', | '[[' .. pageName .. ']]', | ||
'?English name = name', | '?English name = name', | ||
'?Card type# = cardType', | '?Card type# = cardType', | ||
− | |||
} | } | ||
− | + | ||
+ | if (self.localColumnProperty) then | ||
+ | table.insert(queryParams, '?' .. self.localColumnProperty .. ' = localName') | ||
+ | end | ||
+ | |||
+ | local cardData = mw.smw.ask(queryParams) | ||
+ | |||
return cardData and cardData[1] or {} | return cardData and cardData[1] or {} | ||
end | end | ||
Line 224: | Line 257: | ||
local headingRow = list:tag('tr') | local headingRow = list:tag('tr') | ||
headingRow:tag('th'):wikitext('Card') | headingRow:tag('th'):wikitext('Card') | ||
+ | if self.localColumnHeading then | ||
+ | headingRow:tag('th'):wikitext(self.localColumnHeading) | ||
+ | end | ||
headingRow:tag('th'):wikitext('Card type') | headingRow:tag('th'):wikitext('Card type') | ||
headingRow:tag('th'):wikitext('Status') | headingRow:tag('th'):wikitext('Status') | ||
Line 238: | Line 274: | ||
local row = list:tag('tr') | local row = list:tag('tr') | ||
row:tag('td'):wikitext(item.displayText) | row:tag('td'):wikitext(item.displayText) | ||
+ | if self.localColumnHeading then | ||
+ | headingRow:tag('td'):wikitext(item.localName) | ||
+ | end | ||
row:tag('td'):wikitext(cardTypeLink) | row:tag('td'):wikitext(cardTypeLink) | ||
row:tag('td'):addClass(statusClass):wikitext('[[' .. item.status .. ']]') | row:tag('td'):addClass(statusClass):wikitext('[[' .. item.status .. ']]') |
Revision as of 18:14, 4 December 2023
Module:Limitation status list is implemented by Template:Limitation list
-- Shell object for the list itself
local List = {
name = nil,
medium = nil,
locality = nil,
startDate = nil,
prev = nil,
next = nil,
items = {},
-- If there is a column for non-English names
-- The text to display in the column heading
localColumnHeading = nil,
-- The name of the SMW property to find the names in
localColumnProperty = nil,
}
-- Shell object for an item in the list
local ListItem = {
-- Link to card page. `nil` if not a specific card
card = nil,
-- Name of the card page, if applicable
cardName = nil,
localCardName = nil,
-- Final text to display in the cell
displayText = nil,
cardType = nil,
status = nil,
prevStatus = nil,
note = nil
}
-- Main function that gets invoked
-- Create a new list from the user input, then render it
function List.list(frame)
-- Get the template parameters
local args = frame:getParent().args
local l = List:new(args)
return l:render()
end
-- Create a new instance of a list
-- @param args table
-- @return List
function List:new(args)
local l = mw.clone(List)
l:setData(args or {})
return l
end
-- Main function for setting data for the list
-- @param args table - data from the user input
function List:setData(args)
self.name = args.name or mw.title.getCurrentTitle().text
self.medium = args.medium
self.locality = args.locality
self.startDate = args.start_date
self.prev = args.prev
self.next = args.next
self.items = {}
self:addItems('Forbidden', args.forbidden)
self:addItems('Limited', args.limited)
self:addItems('Semi-Limited', args.semi_limited)
self:addItems('Unlimited', args.no_longer_on_list)
self:setSmwData()
end
function List:setLocalisationAttributes()
if (
self.locality == 'Simplified Chinese' or
self.locality == 'Traditional Chinese' or
self.locality == 'Japanese' or
self.locality == 'Korean'
) then
self.localColumnHeading = self.locality
self.localColumnProperty = self.locality .. ' name'
elseif self.medium == 'OCG' or self.medium == 'Yu-Gi-Oh! Official Card Game' then
self.localColumnHeading = 'Japanese'
self.localColumnProperty = 'Japanese name'
else
self.localColumnHeading = nil
self.localColumnProperty = nil
end
end
-- Add items based on user input
-- @param status string
-- @param listInput string
function List:addItems(status, listInput)
-- Exit early if there is no input
if not isFilled(listInput) then return end
-- Split the input by new line and loop through each line
local listItems = mw.text.split(listInput, '\n')
for _, line in pairs(listItems) do
-- Split the line input by `//` and get data from each piece
local lineData = mw.text.split(line, '%s*//%s*')
-- Extract data from content after the `//`
local itemText = lineData[1]
local options = lineData[2]
local prevStatus = options and options:match('prev::([^;]*)')
-- Create a new list item object
local listItem = mw.clone(ListItem)
listItem.status = status
listItem.prevStatus = prevStatus
listItem.displayText = itemText
-- Assume it's a card if there's no manual link syntax
local isCard = not itemText:find('%[%[')
-- If it's a card, look up the card's data and fill in more of the attributes
if isCard then
local cardData = self:lookupCardData(itemText)
listItem.card = itemText
listItem.cardName = cardData.name
listItem.localCardName = cardData.localName
listItem.cardType = cardData.cardType
listItem.displayText = '"[[' .. listItem.card .. '|' .. listItem.cardName .. ']]"'
end
-- Add the card to the list
table.insert(self.items, listItem)
end
end
function List:setSmwData()
mw.smw.set({
['Effective date'] = self.startDate,
['Medium'] = self.medium,
['Release'] = self.medium,
['Locality'] = self.locality,
['Page type'] = 'Status list'
})
-- Go through each list item to add a subobject
for _, item in pairs(self.items) do
-- If it's not a card, don't store any data
if (not item.card) then return end
mw.smw.subobject({
'List contains = ' .. item.card,
'Status = ' .. item.status,
})
end
end
-- Find data on a card by suppyling its name
function List:lookupCardData(pageName)
local queryParams = {
'[[' .. pageName .. ']]',
'?English name = name',
'?Card type# = cardType',
}
if (self.localColumnProperty) then
table.insert(queryParams, '?' .. self.localColumnProperty .. ' = localName')
end
local cardData = mw.smw.ask(queryParams)
return cardData and cardData[1] or {}
end
-- Filter a list's `cards` attribute by a status
-- @return table
function List:getItemsByStatus(status)
-- New array to contain list items with just the specified status
local filteredItems = {}
-- Loop through the list of all cards
for _, item in pairs(self.items) do
-- If the item has the specified status, add it to the new array
if (item.status == status) then
table.insert(filteredItems, item)
end
end
return filteredItems
end
-- Render the overall output
-- @return string
function List:render()
local output = ''
output = output .. self:renderNavigation()
output = output .. self:renderStatusList('Forbidden')
output = output .. self:renderStatusList('Limited')
output = output .. self:renderStatusList('Semi-Limited')
output = output .. self:renderStatusList('Unlimited', 'No longer on list')
return output
end
-- Render the navigation section
-- @return string
function List:renderNavigation()
-- If prev and next are both empty, don't show a navigation menu
if (not isFilled(self.prev) and not isFilled(self.next)) then
return ''
end
local currText = self:pageNameToShortName(self.name)
local prevText = self.prev and ('← [[' .. self.prev .. '|' .. self:pageNameToShortName(self.prev) .. ']]') or ' '
local nextText = self.next and ('[[' .. self.prev .. '|' .. self:pageNameToShortName(self.next) .. ']] →') or ' '
local output = '<div style="border: 1px solid #aaa; display: flex; margin-bottom: .5em;">'
output = output .. '<div style="flex: 1; padding: .25em; text-align: left;">' .. prevText .. '</div>'
output = output .. '<div style="flex: 1; padding: .25em; text-align: center;">' .. currText .. '</div>'
output = output .. '<div style="flex: 1; padding: .25em; text-align: right;">' .. nextText .. '</div>'
output = output .. '</div>'
return output
end
-- Convert a page name to a short name
-- e.g. "March 2020 Lists (Duel Links)" -> "March 2020 Lists"
-- e.g. "OCG April 2014 Lists" -> "April 2014 Lists"
-- @param pageName string
-- @return string
function List:pageNameToShortName(pageName)
-- Strip out disambiguation text
local shortName = mw.text.split(pageName, ' %(')[1]
-- Remove mention of the medium
shortName = shortName:gsub(self.medium, '')
-- Clear any leading/trailing spaces
return mw.text.trim(shortName)
end
-- Render a section with a list fora given status
-- @param status string
-- @param heading status - The text to appear in the heading, if different than the status
-- @return string
function List:renderStatusList(status, heading)
-- Get all list items for the given status
local items = self:getItemsByStatus(status)
-- If there are no cards, return empty string and end early
if (#items == 0) then return '' end
local heading = mw.html.create('h2'):wikitext(heading or status)
local list = mw.html.create('table'):addClass('wikitable sortable')
local headingRow = list:tag('tr')
headingRow:tag('th'):wikitext('Card')
if self.localColumnHeading then
headingRow:tag('th'):wikitext(self.localColumnHeading)
end
headingRow:tag('th'):wikitext('Card type')
headingRow:tag('th'):wikitext('Status')
headingRow:tag('th'):wikitext('Changes')
for _, item in pairs(items) do
local cardTypeLink = item.cardType
and ('[[' .. item.cardType .. '|' .. string.gsub(item.cardType, ' Card', '') .. ']]')
or ''
-- Form the CSS class that styles the cells in the status column
local statusClass = 'status-' .. (item.status):lower()
local row = list:tag('tr')
row:tag('td'):wikitext(item.displayText)
if self.localColumnHeading then
headingRow:tag('td'):wikitext(item.localName)
end
row:tag('td'):wikitext(cardTypeLink)
row:tag('td'):addClass(statusClass):wikitext('[[' .. item.status .. ']]')
row:tag('td'):wikitext(item.prevStatus and 'was [[' .. item.prevStatus .. ']]' or '')
end
return tostring(heading) .. tostring(list)
end
-- Check if something has been filled out
-- i.e. check that it's neither `nil` nor empty string
-- @param value mixed
-- @return bool
function isFilled(value)
return value ~= nil and value ~= ''
end
return List