Module:Cite Talmud: Difference between revisions

Module documentation[view] [edit] [history] [purge]

Implements {{Cite Talmud}}

The above documentation is transcluded from Module:Cite Talmud/doc. (edit | history)
Editors can experiment in this module's sandbox (create | mirror) and testcases (create) pages.
Subpages of this module.

function inspect(str)
  str = tostring(str)
  local r = tostring(#str) .. ':"'
  for i = 1, #str do
    local c = string.byte(str:sub(i,i))
    if c > 32 and c < 127 then
      r = r .. str:sub(i,i)
    else
      r = r .. '&#' .. c .. ';'
    end
  end
  r = r .. '"'
  return r
end

function blanks_to_nil(template_args)
	for key, val in pairs(template_args) do
		if string.find(string.gsub(val, '&#32;', ''), '^%s*$') then
			template_args[key] = nil
			mw.log("Replacing argument " .. inspect(key) .. " which was " .. inspect(val))
		else
			mw.log("Keeping argument " .. inspect(key) .. " which is " .. inspect(val))
		end
	end
end

local talmud = {}

talmud.jb_key = {b = "Babylonian", y = "Jerusalem"}

function talmud.generate_citation(frame)
	local template_args = frame:getParent().args
	-- local invoke_args = frame.args -- parameters from {{#invoke:}}
	mw.log(inspect(template_args[1]))
	blanks_to_nil(template_args)
	mw.log(inspect(template_args[1]))
	jb       = template_args[1] or 'b'
	if not talmud.jb_key[jb] then
		str = frame:expandTemplate{ title = 'error', args = { 'First argument must be either b for Babylonian Talmud or y for Jerusalem Talmud. (Given ' .. inspect(jb) .. ')' } }
	end
    tractate = template_args[2]
    chapter  = template_args[3] -- Chapter name or number (optional)
    daf      = template_args[4] -- These are page or folio numbers as described at Talmud#Slavuta Talmud 1795 and Vilna Talmud 1835. Ranges are accepted, eg. 2b-4a
    url      = template_args['url']
    if not url then
    	url = "https://www.sefaria.org/"
    	if(jb == 'y') then url = url .. 'Jerusalem_Talmud_' end 
    	url = url .. string.gsub(tractate, ' ', '_') .. '.' .. string.gsub(daf or '2a', ' ', '_')
    end
    -- str is only set if there has been an error.
    if not str then
		str = '[[Talmud]], <abbr title="' .. talmud.jb_key[jb] .. '">' .. jb .. '.</abbr> ['
		str = str .. url .. ' ' .. tractate .. ' ' .. ( daf or '' ) .. ']'
	end
	return str
end

return talmud