Module:Ep ref/sandbox

local p = {} -- function to create and format the reference function p.epRef(frame)

-- receiving parameters local ep = frame.args["ep"] or "" local part = frame.args["part"] or nil local intro = frame.args["intro"] or nil local more = frame.args["more"] or nil local vod = frame.args["vod"] or nil local group = frame.args["group"] or nil local name = frame.args["name"] or nil local startTime = frame.args[1] or nil local endTime = frame.args[2] or nil local cite = frame.args["cite"] or nil local noshow = frame.args["noshow"] or nil local twitch = frame.args["twitch"] or nil -- remove pipes in ep   if isempty(ep) then ep = ep:gsub('|', '|') end

-- convert the input into the standardized epCode local epMatcher = require('Module:Ep/Matcher/sandbox') local epCode = epMatcher.matchCode(ep) -- error message if code doesn't exist; otherwise, get the full episode string if (epCode == '0x00' and isempty(vod)) or isempty(ep) then return frame:preprocess(" ") elseif not isempty(vod) then -- ignore epCode when it's a custom video link epValue = ep   else epValue = p.epForRef(epCode, noshow) end

-- get YouTube URL from Module:Ep/YTURLSwitcher/URLs local ytURL = mw.loadData('Module:Ep/YTURLSwitcher/URLs') local url if not isempty(vod) then url = vod elseif not isempty(part) then url = ytURL[epCode .. part] else url = ytURL[epCode] or ytURL["default"] end -- use Twitch timecode to generate YouTube timecode local ytConvertedTime local twitchWarning local twitchURL local assigned -- convert twitch timecode to YouTube if can if not isempty(twitch) and isempty(startTime) and not isempty(url) then ytConvertedTime = p.getOffsetYTTime(epCode, twitch) if ytConvertedTime then startTime = ytConvertedTime -- needs to be eventually converted to YouTube timestamp twitchWarning = 'Timestamp approximated from Twitch.' end end -- otherwise, twitch timecode is startTime if not isempty(twitch) and isempty(startTime) then -- placeholder because VOD isn't out yet startTime = twitch local epTwitch = require('Module:Ep/Twitch') twitchURL = epTwitch.turl(epCode) twitchWarning = '(subscription required).' if not isempty(twitchURL) then url = twitchURL assigned = true -- even if YT URL exists, it's about Twitch else url = nil end end if assigned == false then startTime = twitch end

--add timestamp to youtube URL local timedURL local longURL = false

if not isempty(url) then longURL = string.find(url, "?") end -- create linked startTime, if available if not isempty(startTime) then startTime = p.formatTimestamp(startTime) if not isempty(url) then timedURL = p.buildLinkedTimestamp(url, startTime) end end if not isempty(endTime) then endTime = p.formatTimestamp(endTime) end if not isempty(timedURL) then startTime = timedURL end local refText = 'See ' .. epValue

if not isempty(part) then refText = refText .. ", part " .. part end if not isempty(part) and not isempty(startTime) then refText = refText .. "," end if not isempty(startTime) and not isempty(endTime) then refText = refText .. " from " .. startTime .. " through " .. endTime .. "."   elseif not isempty(startTime) and url == twitchURL then refText = refText .. " at " .. startTime .. " on Twitch" elseif not isempty(startTime) then refText = refText .. " at " .. startTime .. "."   else refText = refText .. "." end -- +error msg and cat if timestring has invalid timecodes refText = string.gsub(		refText,		'invalid timecode',		'Invalid Timecode ')

-- citation format local supCite = mw.html.create('sup') supCite :wikitext("[citation needed]") local citeCategory if not isempty(cite) then citeCategory = "" end if not isempty(intro) then refText = intro .. " " .. refText end if not isempty(cite) then refText = refText .. tostring(supCite) .. citeCategory end if not isempty(more) then refText = refText .. " " .. more end -- add Twitch warning, if Twitch timecode included if not isempty(twitchWarning) then refText = refText .. ' ' .. twitchWarning end

-- create wikitext reference local reference = "" .. refText .. " "   return frame:preprocess(reference) end function p.epForRef(epCode, noshow) -- get the title and pagename for that epCode local epInfo = require('Module:Ep/Info/sandbox') local epName = epInfo.title(epCode) local pageName = epInfo.pagename(epCode) -- if there is no epCode code, then just return the episode name without any further formatting if isempty(epCode) then return epName end -- (epCode) local small = mw.html.create('small') small :wikitext("(" .. epCode .. ")")   if epCode == '0x00' or isempty(epName) then local pageName = 'Unknown episode' local epName = pageName end local epValue if pageName:find("Talks Machina Special") and not isempty(noshow) then epName = split(pageName, ': ')[2] elseif pageName:find("Talks Machina") and not isempty(noshow) then epName = pageName:gsub('Talks Machina ', '#') elseif pageName == epName or not isempty(noshow) then epValue = pageName end if pageName ~= epName and not epValue then epValue = pageName .. '|' .. epName end if epValue then epValue = '"' .. epValue .. '"' else epValue = '' end

local fullEpValue = epValue .. " " .. tostring(small) if not isempty(hide) then return epValue else return fullEpValue end

end

-- function to split a string at a specified character function split(s, delimiter) result = {}; for match in (s..delimiter):gmatch("(.-)"..delimiter) do       table.insert(result, match); end return result; end --function to determine if a string is empty function isempty(s) return s == nil or s == '' end

-- to parse a string with single or multiple single-character delimiters -- thx https://stackoverflow.com/a/40180465/7417081 function multisplit(s, sep) local fields = {} local sep = sep or " " local pattern = string.format("([^%s]+)", sep) string.gsub(s, pattern, function(c) fields[#fields + 1] = c end) return fields end

-- convert either (HH:)MM:SS or (HHh)MMmSSs to seconds function p.timestampToSeconds(s, delimiters) if s == 'invalid timecode' or isempty(s) then return s		end local totalSeconds local t = multisplit(s, delimiters) for _, x in ipairs(t) do   	if not tonumber(x) then return "invalid timecode" end end if #t == 3 then totalSeconds = 3600*t[1] + 60*t[2] + t[3] elseif #t == 2 then totalSeconds = 60*t[1] + t[2] elseif #t == 1 then totalSeconds = t[1] end return totalSeconds end

-- convert seconds to either MM:SS or HH:MM:SS (depending on length) function p.secondsToTimestamp(seconds) local formatted if tonumber(seconds) and tonumber(seconds) >= 3600 then formatted = string.format("%d:%02d:%02d",           math.floor(seconds / 3600) % 60,            math.floor(seconds / 60) % 60,            math.floor(seconds) % 60) elseif tonumber(seconds) then formatted = string.format("%d:%02d",       math.floor(seconds / 60) % 60,        math.floor(seconds) % 60) end return formatted end

-- zeropad a timestamp, or convert seconds to timestamp function p.formatTimestamp(timeValue) local seconds local timestamp if timeValue and timeValue:find('[hms:]') then seconds = p.timestampToSeconds(timeValue, 'hms:') elseif timeValue and tonumber(timeValue) then seconds = timeValue else timestamp = 'invalid timecode' end if timestamp ~= 'invalid timecode' then timestamp = p.secondsToTimestamp(seconds) end return timestamp end

-- create suffix for appending to YT URL function p.timestampToYtSuffix(timeValue) local suffix local timestamp = p.formatTimestamp(timeValue) if isempty(timestamp) then return "invalid timecode" end timeSnippet = multisplit(timestamp, 'hms:') for _, x in ipairs(timeSnippet) do   	if not tonumber(x) then return "invalid timecode" end end if #timeSnippet == 3 then suffix = string.format("%dh%02dm%02ds", timeSnippet[1], timeSnippet[2], timeSnippet[3]) elseif #timeSnippet == 2 then suffix = string.format("%dm%02ds", timeSnippet[1], timeSnippet[2]) end suffix = 't=' .. suffix return suffix end

-- combine YT url and url-formatted timestamp function buildYouTubeLink(videoLink, timestamp) local fullLink local suffix = p.timestampToYtSuffix(timestamp) if suffix == 'invalid timecode' then return suffix end if videoLink:find('youtube.com/[%w_-]+') then fullLink = videoLink .. '&' .. suffix elseif videoLink:find('youtu.be/[%w_-]+') or videoLink:find('twitch.tv')then fullLink = videoLink .. '?' .. suffix end return fullLink end

function p.buildLinkedTimestamp(videoLink, timestamp) local url local linkedTimestamp timestamp = p.formatTimestamp(timestamp) url = buildYouTubeLink(videoLink, timestamp) if url == 'invalid timecode' then linkedTimestamp = 'invalid timecode' else linkedTimestamp = '[' .. url .. ' ' .. timestamp .. "] "	end return linkedTimestamp end

-- for generating placeholder timecodes from Twitch function p.getOffsetYTTime(epCode, twitchStartTime) local epTwitch = require('Module:Ep/Twitch') local ytSeconds local ytTimecode

local seconds = p.timestampToSeconds(twitchStartTime, "hms:") local offset = epTwitch.offset(epCode) if not isempty(offset) then offsetSeconds = p.timestampToSeconds(offset, "hms:") ytSeconds = seconds - offsetSeconds ytTimecode = p.secondsToTimestamp(ytSeconds) else ytTimecode = nil end return ytTimecode end

p.anchor = function(frame) local ep = frame.args["ep"] or "" local part = frame.args["part"] or "" local intro = frame.args["intro"] or "" local more = frame.args["more"] or "" local vod = frame.args["vod"] or "" local name = frame.args["name"] or "" local startTime = frame.args[1] or "" local endTime = frame.args[2] or ""

-- convert the input into the standardized epCode local epMatcher = require('Module:Ep/Matcher/sandbox') local epCode = epMatcher.matchCode(ep) if not isempty(name) then return name end if not isempty(startTime) then startTime = p.timestampToSeconds(startTime, "hms:") end if not isempty(endTime) then endTime = p.timestampToSeconds(endTime, "hms:") end

anchor = ep .. part .. intro .. more .. vod .. startTime .. endTime -- alphanumeric only anchor = anchor:gsub('%W', '') return anchor end

return p