Module:Sandbox/Chao

--[[

simulate passing a frame to the function in the console with: myFrame = { args = { character='Noel Vermillion' } } =p.main(myFrame) =p.GallerySection ( myFrame ) =p.testExpandTemplate( myFrame )

--]]

local cargo = mw.ext.cargo

- -- Gallery Section Class -

local GalleryTemplate = {} GalleryTemplate.__index = GalleryTemplate

GalleryTemplate.fields = { character = true, source = true, section = true, limit = true, widths = true, header = true, title = true, sort = true, see_all = true, see_cameos = true, --Gallery Section (BBRadio) season = true, episode = true, widths = true, --Gallery Section cat = true, cat2 = true, --Misc/Shared count_all = true, count_cameos = true, images_in_section = true, }

GalleryTemplate.templateMethods = { ['Gallery Section (Cargo)'] = 'makeGallerySectionCargo', ['Gallery Section (BBRadio)'] = 'makeGallerySectionBBRadio', ['Gallery Section'] = 'makeGallerySection', }

function GalleryTemplate.new(frame, templateType, params) local self = setmetatable({}, GalleryTemplate) self.templateType= templateType self.frame = frame for field in pairs(GalleryTemplate.fields) do		self[field] = params[field] or '' end

self.images_in_section = 0 self.cat = params.category or '' if (params.character == nil) then self.character = frame.args.character or '' else self.character = params.character or '' end return self end

function GalleryTemplate:__tostring local method = GalleryTemplate.templateMethods[self.templateType] if method then return self[method](self) end return '' end

function GalleryTemplate.makeGallerySectionCargo(self) self.character = cargo_escape(self.character)

self.count_all = GalleryTemplate._countImages_GallerySectionCargo(self,false) or 0 self.count_cameos = GalleryTemplate._countImages_GallerySectionCargo(self,true) or 0 local total_images = self.count_all + self.count_cameos if self.count_all > 0 then self.see_all = 'y'	end if self.count_cameos > 0 then self.see_cameos = 'y'	end if total_images > 0 then expanded_template = GalleryTemplate._expandTemplate_GallerySectionCargo(self, self.frame) --table.insert(t_galleries, expanded_template) self.images_in_section = self.images_in_section + total_images end

return expanded_template end

function GalleryTemplate.makeGallerySectionBBRadio(self) self.character = cargo_escape(self.character) self.count_all = GalleryTemplate._countImages_GallerySectionBBRadio(self) or 0 expanded_template = GalleryTemplate._expandTemplate_GallerySectionBBRadio(self,self.frame) --table.insert(t_galleries, expanded_template) self.images_in_section = self.images_in_section + self.count_all return expanded_template end

function GalleryTemplate.makeGallerySection(self) self.count_all = GalleryTemplate._countImages_GallerySection(self) or 0 expanded_template = GalleryTemplate._expandTemplate_GallerySection(self,self.frame) --table.insert(t_galleries, expanded_template) self.images_in_section = self.images_in_section + self.count_all return expanded_template end

-- counts the number of images with this character (or cameo) for sections using Template:Gallery Section (Cargo) -- countCameos: boolean function GalleryTemplate._countImages_GallerySectionCargo(self, countCameos) tables = 'Files' fields = 'COUNT(Files._pageName)'

character = self.character or '' source = self.source or '' section = self.section or ''

where_clause_parts = {} if countCameos then table.insert(where_clause_parts, "Files.Cameos HOLDS '" .. character .. "'") else table.insert(where_clause_parts, "Files.Characters HOLDS '" .. character .. "'") end if source == '' then else table.insert(where_clause_parts, "Files.Source HOLDS '" .. source .. "'")	end if section == '' then else table.insert(where_clause_parts, "Files.Gallery_Sections HOLDS '" .. section .. "'")	end where_clause = concatvalues(where_clause_parts, " AND ")

local args = { where = where_clause }

result = cargo.query( tables, fields, args ) count = result[1][fields] or '0'

return tonumber(count) end

function GalleryTemplate._countImages_GallerySectionBBRadio(self) tables = 'Files,BBRadio_Cuts' fields = 'COUNT(Files._pageName)' join_on = 'Files._pageName=BBRadio_Cuts._pageName' mw.log("Count images for " .. self.character .. ' season ' .. self.season)

where_clause = 'Files.Characters HOLDS "' .. self.character .. '" AND BBRadio_Cuts.Season="' .. self.season .. '"'

local args = { where = where_clause, join = join_on }

result = cargo.query( tables, fields, args ) count = result[1][fields] or '0'

return tonumber(count) end

function GalleryTemplate._countImages_GallerySection(self) cat1 = self.character or '' cat2 = self.cat or '' cat3 = self.cat2 or ''

local query = {} if cat1 ~=  then table.insert(query, ) end if cat2 ~=  then table.insert(query, ) end if cat3 ~=  then table.insert(query, ) end local result = mw.smw.getQueryResult( query ) count = result.meta.count or 0

return count end

function GalleryTemplate._expandTemplate_GallerySectionCargo(self) _limit = tonumber(self.limit) or 4

if self.frame.expandTemplate == nil then return '' end gallery = self.frame:expandTemplate{ title = 'Gallery Section (Cargo)', args = { character = self.character, source = self.source, section = self.section, limit = _limit, title = self.title, header = self.header, see_all = self.see_all, see_cameos = self.see_cameos, count_all = self.count_all, count_cameos = self.count_cameos }}

return gallery end

function GalleryTemplate._expandTemplate_GallerySectionBBRadio(self) _limit = tonumber(self.limit) or 4 _widths = tonumber(self.widths) or 250

if self.frame.expandTemplate == nil then return '' end gallery = self.frame:expandTemplate { title = 'Gallery Section (BBRadio)', args = { self.character, self.season, self.episode, self.header, self.title, widths = _widths, limit = _limit, count_all = self.count_all }}

return gallery end

function GalleryTemplate._expandTemplate_GallerySection(self) _limit = tonumber(self.limit) or 4 _widths = tonumber(self.widths) or 250 _count_all = self.count_all or 0 _title = self.title or ''

if self.frame.expandTemplate == nil then return '' end gallery = self.frame:expandTemplate { title = 'Gallery Section', args = { self.character, self.cat, self.cat2, self.header, self.title, widths = _widths, limit = _limit, count_all = _count_all, }}

return gallery end

function GalleryTemplate:getNumberOfImages(self) return self.images_in_section end

- -- Gallery Class -

local Gallery = {} Gallery.__index = Gallery

function Gallery.new(data, frame) local self = setmetatable({}, Gallery) self.galleryData = mw.loadData(data) self.ordering = self.galleryData.ordering self.sections = self.galleryData.sections self.frame = frame return self end

function Gallery:__tostring local frame = self.frame text = {} _char = frame.args['character'] or '' for i,v in ipairs (self.ordering) do		category = v		local params = self.sections[v] or '' if params == '' then else local t_section = {} local t_galleries = {} local images_in_section = 0 local images_in_subsection = 0 local current_subheader = '' -- add a wrapper div if there's a class to apply to the section class = params.class or '' if class ~= '' then table.insert(t_section, ' ') end

-- each v2 represents one template call for k2,v2 in pairs(params) do				template = v2.template or ''

local title = v2.title or '' mw.log(template .. ": " .. title)

if not (template == 'Header') and template ~= '' then local g = nil local expanded_g = nil

g = GalleryTemplate.new(frame, template, v2) if g ~= nil then expanded_g = tostring(g) mw.log("imgs: " .. g:getNumberOfImages(g) or 0 ) if expanded_g ~= '' then table.insert(t_galleries, expanded_g) num_images = tonumber(g:getNumberOfImages(g)) or 0 images_in_subsection = images_in_subsection + num_images images_in_section = images_in_section + num_images end mw.log("t_galleries: " .. table.concat(t_galleries)) end elseif template == 'Header' then -- if this is not the first subheader in this section if current_subheader ~= '' then -- check if the previous subheader's galleries had images in them if images_in_subsection > 0 then table.insert(t_section, current_subheader) g = table.concat(t_galleries) if g ~= "" then table.insert(t_section, g)							end -- reset galleries and images for the next subsection clear_table(t_galleries) images_in_subsection = 0 end end local header = v2.header or '' -- save the new subheader and wait to see if the following galleries have any images in them current_subheader = '<' .. header .. '>' .. title .. '\n" end end

-- check the number of images in the section mw.log("---\n" .. category .. " images_in_section = " .. images_in_section) mw.log("t_galleries: " .. table.concat(t_galleries))

if images_in_section > 0 then -- if there is a subheader to insert, then insert it				if current_subheader ~= "" then table.insert(t_section, current_subheader) end -- if there are galleries to insert, then insert them g = table.concat(t_galleries) table.insert(t_section, g)

-- close the wrapping div if one was added if class ~= "" then table.insert(t_section, " ") end

-- insert the section, prepended by the section header, to the final text s = concatvaluesonly(t_section, '') mw.log('t_section ' .. category .. ' ' .. s)				if s ~= "" then table.insert(text, ' ' .. category .. ' \n' .. s)				end end

mw.log("\n") clear_table(t_galleries) clear_table(t_section) end end gallery = table.concat(text) return gallery end

- -- Main - local p = {}

function p.main(frame) data = frame.args.data or 'Module:Character Gallery/data' gallery = Gallery.new(data, frame)

--mw.log(dump(tostring(gallery))) return tostring(gallery) end

- -- Tests -

function p.testExpandTemplate_1(frame) v = { character = 'Noel Vermillion', source = 'BlazBlue: Central Fiction', section = '', limit = 8, title = 'title', header = 'h3', see_all = 'y', see_cameos = 'y', count_all = '7' }	text = p._expandTemplate_GallerySectionCargo(frame, v)	return text end

function p.testExpandTemplate_2(frame) v = { character = 'Noel Vermillion', season = 'NEO', limit = 8, title = 'title', header = 'h3', see_all = 'y', count_all = '7', }	text = p._expandTemplate_GallerySectionBBRadio(frame, v)	return text end

function p.testOrdering for i,v in ipairs (ordering) do		section = v		k = sections[v] or ''

mw.log('\n' .. i .. ': ' .. section) if k == '' then mw.log('no parameters found') else mw.log(k.class) for k2,v2 in pairs (k) do				mw.log(k2) end end end end

- -- Utility Functions -

-- clear a table function clear_table(t) for k in pairs (t) do   	t [k] = nil end end

-- concat all the strings in table s together with the given delimiter function concatvalues(s,delimiter) local t = { } for k,v in ipairs(s) do       t[#t+1] = tostring(v) end return table.concat(t,delimiter) end

-- concat all the strings in table s together with the given delimiter -- skips blank entries (where value v = "") function concatvaluesonly(s,delimiter) local t = { } for k,v in ipairs(s) do   	if not (v == '') then t[#t+1] = tostring(v) end end return table.concat(t,delimiter) end

function cargo_escape(s) return (string.gsub(s, "[']", { ["'"] = "",		['"'] = "",	})) end

function quote_escape(s) return (string.gsub(s, "[\"']", {		["\'"] = "\\'",		['\"'] = '\\"'	})) end

function html_escape(s) return (string.gsub(s, "[<>\"'/ ,]", {       ["<"] = "%3C",        [">"] = "%3E",        ['"'] = "%22", ["'"] = "%27",       ["/"] = "%2F", [" "] = "+",       [","] = "%2C" })) end

-- helpful for printing tables function dump(o) if type(o) == 'table' then local s = '{ ' for k,v in pairs(o) do        if type(k) ~= 'number' then k = '"'..k..'"' end s = s .. '['..k..'] = ' .. dump(v) .. ','     end return s .. '} '  else return tostring(o) end end

return p