Module:User script table row

local data = mw.loadData('Module:User script table row/data')
local p = {}

function p._main(args)
	local code = args.code
	local doc = args.doc
	local name = args.name
	local desc = args.desc
	
	if not code and not doc then
		return mw.html.create('tr'):tag('td'):attr('colspan', 4)
			:tag('span')
				:addClass('error')
				:wikitext('Error: <code>|code=</code> or <code>|doc=</code> must be specified')
				:allDone()
	end
	
	if not code and not args.instruction then
		code = doc .. '.js'
	end
	if not doc then
		local title = code:match('^(.+)%.[CJcj][Ss][Ss]?$')
		if title then
			title = mw.title.new(title)
			if not title.isExternal and title.exists then
				doc = title.fullText
			end
		end
	end
	if not name then
		name = doc and mw.ustring.match(doc, '[^/]+$') or
			mw.ustring.match(code, '([^/]+)%.js')
	end
	
	local row = mw.html.create('tr')
	
	local instruction
	if args.instruction ~= 'no' then
		instruction = args.instruction or string.format(
			'[//en.wikipedia.org/w/index.php?title=Special:MyPage/common.js&action=edit <b title="Click here to edit your common.js page">Click here</b>] and paste:<div><code>{{subst:%s|1=%s%s}}</code></div>',
			code:find('%.[Cc][Ss][Ss]$') and 'luss' or 'lusc',
			code,
			args.backlink and '|2=' .. args.backlink or ''
		)
		instruction = mw.html.create('')
			:newline()
			:tag('div')
				:addClass('mw-collapsible mw-collapsed userscripttable-instruction')
				:tag('div')
					:addClass('userscripttable-instruction-head')
					:wikitext('How to install')
					:done()
				:tag('div')
					:addClass('mw-collapsible-content plainlinks')
					:wikitext(instruction)
					:done()
				:done()
	end
	
	do
		local cell = mw.html.create('td')
			:wikitext(doc and string.format('[[:%s|%s]]', doc, name) or name)
		
		if args.indent and args.indent:find('^%d+$') then
			cell:css('padding-left', args.indent .. 'em')
		end
		
		if code then
			cell
				:wikitext(' ')
				:tag('span')
					:addClass('userscripttable-sourcelink')
					:wikitext(string.format('([[:%s|source]])', code))
					:done()
		end
		
		if instruction and code then
			cell:tag('span')
				:addClass('scriptInstallerLink')
				:attr('id', code)
				:done()
		end
		
		row:node(cell)
	end
	
	row:tag('td')
		:wikitext(desc)
		:node(instruction)
		:done()
	
	local stats = code and data[code] or { total = 'N/A', active = 'N/A' }
	row
		:tag('td'):wikitext(stats.total):done()
		:tag('td'):wikitext(stats.active)
	
	return row
end

function p.main(frame)
	local args = {}
	for k, v in pairs(frame:getParent().args) do
		if v and v ~= '' then
			args[k] = v
		end
	end
	return p._main(args)
end

return p