Toggle search
Toggle menu
5.4K
5.3K
520
76.2K
ProleWiki
Toggle personal menu
Not logged in
Your IP address will be publicly visible if you make any edits.

Module:Library citation: Difference between revisions

From ProleWiki, the proletarian encyclopedia
More languages
More actions
← Older edit
CriticalResist (talk | contribs)
interface-editor, Administrators, Stewards
11,279 edits
attempting to fix link to library page. It will also hide source link, can always be changed.
Forte (talk | contribs)
interface-editor, Administrators, Stewards
8,599 edits
m Removed more useless functions. Not even sure why they were there.
 
(7 intermediate revisions by 2 users not shown)
Line 2: Line 2:


require("Module:Auxiliary functions")
require("Module:Auxiliary functions")
local function checkset(var)
    local rtn = nil
    if not (var == nil or var == '') then
        rtn = var
    end
    return rtn
end
-- local function is_set(var)
--  return not (var == nil or var == '')
-- end
local function removeApostrophes(str)
    return str:gsub("[\"'%`]", "")
end
local function compareStrings(a,b)
    local stringA = removeApostrophes(a):lower()
    local stringB = removeApostrophes(b):lower()
    return stringA < stringB
end
function listOfWorks(author)
    local newMethod = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","titleregexp=" .. author .. "/[^/]+$","format=,%TITLE%\\n")
    local catMethod = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","category=Library works by " .. author ,"format=,%TITLE%\\n")
    local list = ""
    if string.len(newMethod) > string.len(catMethod) then
        list = newMethod
    else
        list = catMethod
    end
    titleTable = mw.text.split(string.gsub(mw.text.trim(list),author .. "/",""),"\n")
    linkTable=mw.text.split(mw.text.trim(list),"\n")
    for i,v in ipairs(linkTable) do
        linkTable[i] = "Library:" .. v
    end
    table.sort(linkTable,compareStrings)
    table.sort(titleTable,compareStrings)
    return {links=linkTable,titles=titleTable}
end


function getDataFromTitle(title)
function getDataFromTitle(title)
    local rawString = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","title=" .. title,"mode=userformat","include={Library work}:title:author:published_date:source")
local rawString = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","title=" .. title,"mode=userformat","include={Library work}:title:author:published_date:source")
    local title,author,published_date,source = rawString:match("^(.-)%s|(.-)%s|(.-)%s|(.-)$")
local title,author,published_date,source = rawString:match("^(.-)%s|(.-)%s|(.-)%s|(.-)$")
    local year = ""
local year = ""
    if is_set(published_date) then
if is_set(published_date) then
        year = published_date:match("%d%d%d%d")
year = published_date:match("%d%d%d%d")
    end
end
    return title,author,year,source
return title,author,year,source
end
end


function getDataFromLink(link)
function getDataFromLink(link)
    local str = link
-- In case it's in URL format
local str = mw.uri.decode(link)
     local result = str:match("https?://[^/]+/wiki/(.*)")
     local result = str:match("https?://[^/]+/wiki/(.*)")
     if result then
     if result then
         str = result
         str = result -- Use the extracted part after /wiki/
     end
     end
    -- Remove "Library:" prefix, if present
     str = str:gsub("^Library:", "")
     str = str:gsub("^Library:", "")
     str = str:gsub(" ", "_") -- Ensure underscores for page names
 
   
    -- Replace underscores with spaces
     return getDataFromTitle(str), str
     str = str:gsub("_", " ")
 
    -- Return data using the other function
     return getDataFromTitle(str)
end
 
function wikilinkFromTitle(title)
local pagename = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","titleregexp=" .. title .. "$","format=,%TITLE%")
if is_set(pagename) then
return "[[Library:" .. pagename .. "|" .. title .. "]]"
end
return title
end
end


local function wikilinkFromAuthor(author)
local function wikilinkFromAuthor(author)
    if mw.getCurrentFrame():callParserFunction('#ifexist',author,true) == "1" then
-- if page exists
        return "[[" .. author .. "]]"
if mw.getCurrentFrame():callParserFunction('#ifexist',author,true) == "1" then
    end
return "[[" .. author .. "]]"
    return author
end
return author
end
end


function p.cite(frame)
function p.cite(frame)
    local parentFrame = frame:getParent()
-- Parent frame to get parameters from template calls instead of from {{#invoke: ...
    local link = checkset(parentFrame.args.link)
local parentFrame = frame:getParent()
    local author = nil
-- get arguments from "args" table pre-defined by MediaWiki/Scribunto
    local quote = checkset(parentFrame.args.quote)
local link = parentFrame.args.link
    local pageName = nil
local author = nil
    local source = nil
local quote = parentFrame.args.quote
   
if is_set(link) then
    if is_set(link) then
title,author,year,source = getDataFromLink(link)
        title, author, year, source, pageName = getDataFromLink(link)
end
    end
   
local render = ""
    local render = ""
   
if is_set(author) then
    if is_set(author) then
render = render .. wikilinkFromAuthor(author)
        render = render .. wikilinkFromAuthor(author)
if not is_set(year) then
    end
render = render .. "."
    if is_set(year) then
end
        render = render .. " (" .. year .. ")."
end
    end
if is_set(year) then
    if is_set(title) and is_set(pageName) then
render = render .. " (" .. year .. ")."
        render = render .. " ''[[Library:" .. pageName .. "|" .. title .. "]]''."
end
    end
if is_set(title) then
    if is_set (quote) then
render = render .. " ''" .. wikilinkFromTitle(title) .. "''."
        quote = string.gsub(quote,"\n","<br>")
end
        quote = "“" .. quote .. "”"
if is_set(source) then
        local div = mw.html.create ('div')
render = render .. " " .. source .. "."
        div
end
        :attr("style", "width:80%; margin-left:10%;")
if is_set (quote) then
        :wikitext(quote)
quote = string.gsub(quote,"\n","<br>")
        local br = mw.html.create ('br', selfClosing)
quote = "“" .. quote .. "”"
        render = italics(tostring(div)) .. tostring(br) .. render
local div = mw.html.create ('div')
    end
div
   
:attr("style", "width:80%; margin-left:10%;")
    -- Store source in hidden metadata
:wikitext(quote)
    if is_set(source) then
local br = mw.html.create ('br', selfClosing)
        render = render .. '<span style="display:none">Source: ' .. source .. '</span>'
render = italics(tostring(div)) .. tostring(br) .. render
    end
end
   
return render
    return render
end
end


return p
return p

Latest revision as of 03:35, 19 September 2025

local p = {}

require("Module:Auxiliary functions")

function getDataFromTitle(title)
	local rawString = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","title=" .. title,"mode=userformat","include={Library work}:title:author:published_date:source")
	local title,author,published_date,source = rawString:match("^(.-)%s|(.-)%s|(.-)%s|(.-)$")
	local year = ""
	if is_set(published_date) then
		year = published_date:match("%d%d%d%d")
	end
	return title,author,year,source
end

function getDataFromLink(link)
	-- In case it's in URL format
	local str = mw.uri.decode(link)
    local result = str:match("https?://[^/]+/wiki/(.*)")
    if result then
        str = result  -- Use the extracted part after /wiki/
    end
    -- Remove "Library:" prefix, if present
    str = str:gsub("^Library:", "")

    -- Replace underscores with spaces
    str = str:gsub("_", " ")

    -- Return data using the other function
    return getDataFromTitle(str)
end

function wikilinkFromTitle(title)
	local pagename = mw.getCurrentFrame():callParserFunction("#dpl","namespace=Library","titleregexp=" .. title .. "$","format=,%TITLE%")
	if is_set(pagename) then
		return "[[Library:" .. pagename .. "|" .. title .. "]]"
	end
	return title
end

local function wikilinkFromAuthor(author)
	-- if page exists
	if mw.getCurrentFrame():callParserFunction('#ifexist',author,true) == "1" then
		return "[[" .. author .. "]]"
	end
	return author
end

function p.cite(frame)
	-- Parent frame to get parameters from template calls instead of from {{#invoke: ...
	local parentFrame = frame:getParent()
	-- get arguments from "args" table pre-defined by MediaWiki/Scribunto
	local link = parentFrame.args.link
	local author = nil
	local quote = parentFrame.args.quote
	if is_set(link) then
		title,author,year,source = getDataFromLink(link)
	end
	
	local render = ""
	
	if is_set(author) then
		render = render .. wikilinkFromAuthor(author)
		if not is_set(year) then
			render = render .. "."
		end
	end
	if is_set(year) then
		render = render .. " (" .. year .. ")."
	end
	if is_set(title) then
		render = render .. " ''" .. wikilinkFromTitle(title) .. "''."
	end
	if is_set(source) then
		render = render .. " " .. source .. "."
	end
	if is_set (quote) then
		quote = string.gsub(quote,"\n","<br>")
		quote = "“" .. quote .. "”"
		local div = mw.html.create ('div')
		div
		:attr("style", "width:80%; margin-left:10%;")
		:wikitext(quote)
		local br = mw.html.create ('br', selfClosing)
		render = italics(tostring(div)) .. tostring(br) .. render
	end
	return render
end

return p
Retrieved from "https://prole.wiki/w/index.php?title=Module:Library_citation&oldid=86877"
Last modified
This page was last edited on 19 September 2025, at 03:35.
This page has been accessed 6,679 times.