Módulo:StandardizedName

La documentación para este módulo puede ser creada en Módulo:StandardizedName/doc

local p = {}
local h = require("Module:HF")
local getArgs = require('Dev:Arguments').getArgs
---- //*** Functions for transforming pagenames of comics/episodes into desirable format ***// ----


-- returns transformed issue/episode number that can be used for sorting in categories as numbers, instead of text, including "point one" issues and "-1"/"negative" issues
function p.lua_padded_issue(issue)
    local minus = '5'
    local point_one = '00'
    local i = ''
    local j = ''
    local output = ''
    local s1 = ''
    local s2 = ''
    
    if not h.isempty(issue)
        then
            if issue == '½'
                then issue = '0.5'
            end
            
            s1, s2 = string.match( string.lower(issue), '(%d+)(%l)')--'(%d+)(%D+)')
            if not h.isempty( s2 ) --and s2 ~= '.'
                then issue = s1..'.'..s2
            end
            
            if string.match(issue, '^%-*%d', 1) ~= nil --check if issue starts with number (including negative numbers like -1)
                then
                    -- -1 issues
                    j = string.find(issue,"-",1,true)
                    if not h.isempty(j)
                        then
                            i = string.sub(issue,2,#issue)
                            j = string.find(i,".",1,true)
                            if not h.isempty(j) 
                                then minus = 5 - #string.sub(i,1,j-1)
                                else minus = 5 - #i
                            end
                        else
                            i = issue
                    end
    
                    -- point one issues
                    j = string.find(i,".",1,true) 
                    if not h.isempty(j)
                        then
                            point_one = string.sub(i,j+1,#i)
                            if tonumber(point_one) == nil
                                then point_one = '99' -- for issues with letters after . instead of just numbers (for example, Amazing Spider-Man Vol 5 #16.HU)
                            end
                            point_one = string.rep("0", 2-#point_one)..point_one
                            i = string.sub(i,1,j-1)
                    end
    
                    output = minus..string.rep("0", 6-#i)..i..point_one
                else -- issue is not a number
                    output = issue --'999999999'
            end
    end
    
    return output
end

-- returns transformed volume/season number that can be used for sorting in categories as numbers, instead of text
function p.lua_padded_volume(volume)
    local output = ''
    
    if not h.isempty(volume)
        then output = string.rep("0", 6-#volume)..volume
    end
    
    return output
end

-- returns transformed title, with replaced characters like ":" or "/" that can be used for names of files (for example, covers)
function p.lua_title_for_files(title)
    local output = title
    
    output = string.gsub(output,'/',' ')
    output = string.gsub(output,':','')
    output = string.gsub(output,'&','&')
    output = string.gsub(output,''',"'") 

    return output
end

-- break down pagename of comics/episodes into parts - title, volume/season, issue/episode. 
---- Also returns transformed volume/season number and issue/episode number that can be used for sorting in categories as numbers, instead of text, including "point one" issues and "-1"/"negative" issues
---- Also returns transformed title, with replaced characters like ":" or "/" that can be used for names of files (for example, covers)
function p.lua_get_title_volume_issue(pagename, pagetype)
    local title = ''
    local volume = ''
    local issue = ''
    local padded_issue = ''
    local padded_volume = ''
    local title_for_files = ''
    local remainder_issue = ''
    local clean_issue = ''
    local j
    local k
    
    if h.isempty(pagetype)
        then pagetype = 'Vol'
    end
    
    j,k = string.find(pagename, ' '..pagetype..' %d+ ')
    if not h.isempty(j)
        then
            title = string.sub(pagename, 1, j-1)
            issue = string.gsub(string.sub(pagename, k+1, #pagename), '#', '')
            j,k,volume = string.find(pagename, ' '..pagetype..' (%d+) ')
        else
            j,k = string.find(pagename, ' #')
            if h.isempty(j)
                then
                    j,k = string.find(pagename, ' '..pagetype..' %d+')
                    if not h.isempty(j)
                        then
                            title = string.sub(pagename, 1, j-1)
                            volume = string.sub(pagename, j+#pagetype+2, k)
                        else return ''
                    end
                else
                    title = string.sub(pagename, 1, j-1)
                    issue = string.sub(pagename, k+1, #pagename)
                    volume = '1'
            end
    end
    
    if not h.isempty(issue) and tonumber(issue) == nil
        then clean_issue, remainder_issue = string.match(issue, '(%d+)(%D+)')
    end

    padded_volume = p.lua_padded_volume(volume)
    padded_issue = p.lua_padded_issue(issue)
    title_for_files = p.lua_title_for_files(title)
    return {  ['title'] = title, 
              ['volume'] = volume,
              ['issue'] = issue,
              ['clean_issue'] = clean_issue or '',
              ['remainder_issue'] = remainder_issue or '',
              ['padded_volume'] = padded_volume,
              ['padded_issue'] = padded_issue,
              ['title_for_files'] = title_for_files,
              ['filename'] = {
                  ['title'] = title_for_files,
                  ['noissue'] = title_for_files..' '..pagetype..' '..volume,
                  ['all'] = title_for_files..' '..pagetype..' '..volume..' '..issue,
              },
              ['sortname'] = {
                  ['title'] = p.lua_remove_the(title),
                  ['noissue'] = p.lua_remove_the(title)..' '..pagetype..' '..padded_volume,
                  ['all'] = p.lua_remove_the(title)..' '..pagetype..' '..padded_volume..' '.. padded_issue,
              },
              ['noissue'] = title..' '..pagetype..' '..volume,
              ['all'] = title..' '..pagetype..' '..volume..' '..issue,
           }
end


-- removes "The " from the start of pagename
function p.lua_remove_the(pagename)
    if not h.isempty(pagename) and string.lower( string.sub(pagename, 1, 4) ) == 'the '
        then pagename = string.sub(pagename, 5, #pagename)
    end
    return pagename
end
function p.remove_the(frame)
    local args = getArgs(frame)
    return p.lua_remove_the(args[1])
end


-- automatic standardization of comics names
function p.lua_standardized_comics_name(pagename)
    local info = {}
    local output = pagename
    
    
    if not h.isempty(pagename)
        then 
            info = p.lua_get_title_volume_issue(pagename, 'Vol')
            if not h.isempty(info.title)
                then output = info.all
            end
    end
    
    return output
end
function p.standardized_comics_name(frame)
    local args = getArgs(frame)
    return p.lua_standardized_comics_name(args[1])
end


-- automatic standardization of episodes names
function p.lua_standardized_episode_name(pagename)
    local info = {}
    local output = pagename

    if not h.isempty(pagename)
        then 
            info = p.lua_get_title_volume_issue(pagename, 'Season')
            if not h.isempty(info.title)
                then output = info.all
            end
    end
    
    return output
end
function p.standardized_episode_name(frame)
    local args = getArgs(frame)
    return p.lua_standardized_comics_name(args[1])
end


-- returns link after standardization of its name
function p.lua_standardized_link(pagename, pagetype)
    local design = require("Module:Design")
    local link = ''
    local text = ''
    local issue = ''
    local s1
    local s2
    local info = {}
    local output = ''
    
    if not h.isempty(pagename)
        then
            pagename = h.lua_breaklink(pagename, 1)
            if not h.isempty(pagetype)
                then
                    if pagetype == 'Comics' or pagetype == 'Episode'
                        then
                            if pagetype == 'Comics'
                                then pagetype = 'Vol'
                                else pagetype = 'Season'
                            end
    
                            info = p.lua_get_title_volume_issue(pagename,pagetype)
                            if not h.isempty(info.title)
                                then
                                    if not h.isempty(info.issue)
                                        then 
                                            link = info.noissue..' '..info.issue
                                            s1, s2 = string.match(info.issue, '(%d+): (.+)')
                                            if h.isempty(s2)
                                                then issue = ' #'..info.issue
                                                else issue = design.lua_span(': '..s2).italic
                                            end
                                        else
                                            link = info.noissue
                                            issue = ''
                                    end
                                    if info.volume == '1'
                                        then text = design.lua_span(info.title).italic .. issue
                                        else text = design.lua_span(info.noissue).italic .. issue
                                    end
                                    output = h.Link(link, text)
                            end
                        elseif pagetype == 'Film' or pagetype == 'Game'
                            then
                                link = pagename
                                text = string.gsub(pagename, ' %(.+%)', '')
                                output = h.Link(link, design.lua_span(text).italic)
                    end
                else output = '[['..pagename..']]'
            end
    end
    
    return output
end

function p.comics_link(frame)
    local args = getArgs(frame)
    return p.lua_standardized_link(args[1], 'Comics')
end

function p.game_link(frame)
    local args = getArgs(frame)
    return p.lua_standardized_link(args[1], 'Game')
end

function p.game_link_and_date(frame)
    local args = getArgs(frame)
    local page = args[1]
    local s_date = args[2]
    local output = ''
    
    if not h.isempty(page)
        then
            if h.isempty(s_date)
                then s_date = h.lua_getFieldValue( h.lua_getContent(page), 'Release Date' )
            end
            
            if not h.isempty(s_date)
                then s_date = '('..s_date..')'
            end

            output = p.lua_standardized_link(page, 'Game')..'<br />'..s_date
    end
    
    return output
end


-- returns name transformed into format for sorting 
---- removes "The" from the begining
---- for comics/episodes changes volume/season and issue/episode into numbers, instead of text
function p.lua_standardized_name_for_sorting(pagename,pagetype)
    local info = {}
    local output = ''
    
    
    if not h.isempty(pagename) and not h.isempty(pagetype)
        then
            if pagetype == 'Comics' or pagetype == 'Episode'
                then
                    if pagetype == 'Comics'
                        then pagetype = 'Vol'
                        else pagetype = 'Season'
                    end
                    info = p.lua_get_title_volume_issue(pagename,pagetype)
                    if not h.isempty(info.title)
                        then output = info.sortname.all
                    end
                elseif pagetype == 'Film' or pagetype == 'Game'
                    then output = p.lua_remove_the(pagename)
            end
    end
    
    return output
end
function p.comics_name_for_sorting(frame)
    local args = getArgs(frame)
    return p.lua_standardized_name_for_sorting(args[1], 'Comics')
end

function p.lua_get_part(pagename,pagetype,part)
    local output = ''
    local info = {}
    
    if not h.isempty(pagename) and not h.isempty(pagetype)
        then 
            if pagetype == 'Comics' or pagetype == 'Episode'
                then
                    if pagetype == 'Comics'
                        then pagetype = 'Vol'
                        else pagetype = 'Season'
                    end
                    
                    info = p.lua_get_title_volume_issue(pagename,pagetype)
                    if not h.isempty(title)
                        then 
                            if part == 'Title'
                                then output = info.title
                                elseif part == 'Volume'
                                    then output = info.volume
                                    elseif part == 'Issue'
                                        then output = info.issue
                            end
                    end
            end
    end
    
    return output
end

function p.get_part(frame)
    local args = getArgs(frame)
    return p.lua_get_part(args[1], args[2], args[3])
end

function p.get_title_and_volume(frame)
    local args = getArgs(frame)
    local pagename = args[1]
    local info = {}
    local output = ''
    
    if not h.isempty(pagename)
        then 
            info = p.lua_get_title_volume_issue(pagename, 'Vol')
            output = info.title .. ' Vol ' .. info.volume
    end
    
    return output
end


function p.lua_cid(pagename)
    local m_date = require("Module:Date")
    local design = require("Module:Design")
    --local module_page_type = require("Module:PageType")
    local release_date = ''
    local month = ''
    local year = ''
    --local page_type = ''
    local page_content = ''
    local info
    local link
    local div = mw.html.create( 'div' ):attr( 'align', 'center' ):done()
    local output = ''
    
    if not h.isempty(pagename)
        then
            --page_type = module_page_type.lua_getPageType(pagename)
            --if page_type == 'Comic'
                --then
                    --pagename = p.lua_get_title_volume_issue(pagename, 'Vol').all
            output = p.lua_standardized_link(pagename, 'Comics')
            output = design.lua_span(output).bold
            page_content = h.lua_getContent(pagename)
            release_date = h.lua_getFieldValue(page_content, 'ReleaseDate')

            if not h.isempty(release_date)
                then
                    info = m_date.lua_get_release_date_info(release_date)
                    link = h.lua_link_to_category( info.week.text, info.no_day )
                else
                    month = h.lua_getFieldValue(page_content, 'Month')
                    year = h.lua_getFieldValue(page_content, 'Year')
                    info = m_date.lua_get_publication_date_info(year, month, false)
                    link = string.gsub(info.link, '%]%], %[%[:Category:%d+|', ', ')
            end
            
            if not h.isempty(link)
                then output = output..'<br>('..link..')'
            end
            
            output = tostring( div:wikitext(output) )
    end
    
    return output
end


function p.cid(frame)
    local args = getArgs(frame)
    return p.lua_cid(args[1])
end


--[[
function p.lua_releasedate()--pagename,pagetype)
    local s = ''
    local releasedate = ''
    local year = ''
    local month = ''
    local day = ''
    local pagename = 'Legion (TV series) Season 1 1'
    --local pagename = 'FF Vol 1 1'
    --local pagename = 'X-Men: Mutant Academy'
    --local pagename = 'Captain Marvel (film)'
    local pagetype = 'Episode'
    --local pagetype = 'Comics'
    --local pagetype = 'Game'
    --local pagetype = 'Film'
 
    if not h.isempty(pagename) and not h.isempty(pagetype)
        then
            s = mw.title.new(pagename):getContent()
            if not h.isempty(s)
                then 
                    if pagetype == 'Comics'
                        then
                            year = string.match(s, "|%s+Year%s+=%s+(.-)\n")
                            month = string.match(s, "|%s+Month%s+=%s+(.-)\n")
                            if not h.isempty(year) and not h.isempty(month)
                                then releasedate = month..', '..year
                            end
                        elseif pagetype == 'Episode'
                            then 
                                year = string.match(s, "|%s+Year%s+=%s+(.-)\n")
                                month = string.match(s, "|%s+Month%s+=%s+(.-)\n")
                                day = string.match(s, "|%s+Day%s+=%s+(.-)\n")
                                if not h.isempty(year) and not h.isempty(month) and not h.isempty(day)
                                    then releasedate = day..' '..month..', '..year
                                end
                            elseif pagetype == 'Film' or pagetype == 'Game'
                                then releasedate = string.match(s, "|%s+Release Date%s+=%s+(.-)\n")
                    end
            end
    end
    
    return releasedate
end
]]--

return p