Module:PersonRelatedNews

Documentation for this module may be created at Module:PersonRelatedNews/doc

local cargo = mw.ext.cargo
local p = {}

function p.main(frame)
    local newsItemContainer = mw.html.create('div'):addClass('related__news')

    local title = mw.title.getCurrentTitle().fullText
    local newsTitle = "Related news"
    -- if title:match("^Companies/") then
    --     newsTitle = "Team News"
    -- end

    local iconHtml = '[[File:News-icon.png|30px|alt=' .. newsTitle .. ' Icon]]'
    local iconElement = mw.html.create('h3'):addClass('news-icon'):wikitext(iconHtml .. ' ' .. newsTitle)

    local titleContainer = mw.html.create('div'):addClass('related__news__title-container'):attr('style', 'display: flex; align-items: center;')
    titleContainer:node(iconElement)

    -- local viewAllElement = mw.html.create('div'):addClass('related__news__view-all'):attr('id', 'view-all-button'):wikitext('View All')
    local viewAllElement = mw.html.create('span')
    :addClass('related__news__view-all')
    :attr('id', 'view-all-button')
    :wikitext('[[News|View All]]')


    titleContainer:node(viewAllElement)

    local container = mw.html.create('div'):addClass('related__news__container'):node(titleContainer):node(newsItemContainer)

    local relatedNews = getRelatedNews(4, title)

    if #relatedNews > 0 then
        for i = 1, #relatedNews do
            addArticleToContainer(relatedNews[i], newsItemContainer)
        end
    end

    return container
end

function addArticleToContainer(result, container)
    local image = result.image or 'News placeholder.png'
    local link = result._pageName
    local category = result.category and mw.text.split(result.category, ',')[1] or 'Uncategorized'

    local categoryClassMap = {
        ['News'] = 'news-category-news',
        ['Transfer Market'] = 'news-category-transfer',
        ['Drama'] = 'news-category-drama',
        ['Business'] = 'news-category-business',
        ['Sponsorships'] = 'news-category-sponsorships'
    }

    local categoryClass = categoryClassMap[category] or 'default-category-class'
    
    local date = result.date and formatDate(result.date) or 'Unknown date'
    
    local title = mw.html.create('div')
	    :addClass('news-title-twogpedia')
	    :wikitext('[[' .. result._pageName .. '|' .. mw.ext.displaytitle.get(result._pageName) .. ']]')

    local metaContainer = mw.html.create('div'):addClass('news-meta-container')
    local categoryElement = mw.html.create('p'):addClass('news-meta news-category-meta ' .. categoryClass):wikitext(category)
    local dateElement = mw.html.create('p'):addClass('news-meta news-date'):wikitext(date)
    
    metaContainer:node(categoryElement):node(dateElement)

    local contentSnippet = getContentSnippet(result.content)
    local contentElement = mw.html.create('p'):addClass('news-content'):wikitext(contentSnippet)

    local imageHtml = '[[File:' .. image .. '|link=' .. link .. '|800px|class=news-image|alt=News Image]]'
    
    local imageContainer = mw.html.create('div'):addClass('news-image-container'):wikitext(imageHtml)
    
    local newsItem = mw.html.create('div')
        :addClass('related__article')
        :node(imageContainer)
        :node(title)
        :node(contentElement)
        :node(metaContainer)

    container:node(newsItem)
end

function getContentSnippet(content)
    local words = mw.text.split(content, ' ')
    local snippet = table.concat(words, ' ', 1, math.min(20, #words))
    return snippet .. ( #words > 20 and '...' or '' ) 
end

function formatDate(dateStr)
    local year, month, day = dateStr:match("(%d+)%-(%d+)%-(%d+)")
    local time = os.time({year = year, month = month, day = day})
    return os.date("%b %d, %Y", time)
end

-- function getRelatedNews(limit, title)
--     local tables = 'News'
--     local fields = '_pageName, date, tags, image, category, content'

--     local words = mw.text.split(title, ' ')
--     local conditions = {}

--     for _, word in ipairs(words) do
--         if #word > 2 then 
--             table.insert(conditions, '_pageName LIKE "%' .. word .. '%"')
--         end
--     end

--     local whereClause = table.concat(conditions, ' OR ')

--     local cargoArgs = {
--         where = whereClause,
--         orderBy = 'date DESC',
--         limit = limit
--     }

--     local results = cargo.query(tables, fields, cargoArgs)
--     return results or {}
-- end

function getRelatedNews(limit, title)
    local tables = 'News'
    local fields = '_pageName, date, tags, image, category, content'
    limit = tonumber(limit) or 4

    -- Local helpers (scoped to this function)
    local STOP = {
        ["the"]=true,["and"]=true,["for"]=true,["with"]=true,["from"]=true,["into"]=true,
        ["of"]=true,["in"]=true,["on"]=true,["at"]=true,["to"]=true,["by"]=true,["is"]=true,["are"]=true,
        ["a"]=true,["an"]=true,["as"]=true,["or"]=true,["if"]=true,["but"]=true,["not"]=true
    }
    local function escape_like(s)
        return (s or ""):gsub("%%","%%%%"):gsub("_","__"):gsub('"','\\"')
    end
    local function normalize(s)
        s = mw.ustring.lower(s or "")
        s = s:gsub("^[^:]+:", "")      -- strip namespace if present
        s = s:gsub("[%p%c]", " ")      -- punctuation/control -> space
        s = s:gsub("%s+", " ")
        return mw.text.trim(s)
    end

    -- Extract meaningful terms from the title
    local terms, seen = {}, {}
    for w in mw.ustring.gmatch(normalize(title), "[%w%d]+") do
        if #w >= 3 and not STOP[w] and not seen[w] then
            seen[w] = true
            table.insert(terms, w)
        end
    end

    -- Require at least two distinct terms to even try
    if #terms < 2 then
        return {}
    end

    -- Use the longest terms first and cap to avoid WHERE explosion
    table.sort(terms, function(a,b) return #a > #b end)
    local MAX_TERMS = 6
    while #terms > MAX_TERMS do table.remove(terms) end

    -- Build pairwise clauses enforcing: match >= 2 distinct terms (in tags or title)
    -- For each pair (ti, tj):
    --   ((tags HOLDS LIKE '%ti%' OR _pageName LIKE '%ti%') AND
    --    (tags HOLDS LIKE '%tj%' OR _pageName LIKE '%tj%'))
    local pairClauses = {}
    for i = 1, #terms - 1 do
        local ti = escape_like(terms[i])
        local left = string.format('(tags HOLDS LIKE "%%%s%%" OR _pageName LIKE "%%%s%%")', ti, ti)
        for j = i + 1, #terms do
            local tj = escape_like(terms[j])
            local right = string.format('(tags HOLDS LIKE "%%%s%%" OR _pageName LIKE "%%%s%%")', tj, tj)
            table.insert(pairClauses, '(' .. left .. ' AND ' .. right .. ')')
        end
    end

    -- Combine all pair clauses with OR, and exclude the current page
    local current = mw.title.getCurrentTitle().fullText
    local whereClause = '(' .. table.concat(pairClauses, ' OR ') ..
                        string.format(') AND _pageName != "%s"', escape_like(current))

    local cargoArgs = {
        where = whereClause,
        orderBy = 'date DESC',
        limit = limit
    }

    local results = mw.ext.cargo.query(tables, fields, cargoArgs) or {}

    -- If nothing matched (>=2-term condition), return empty to render nothing
    if #results == 0 then
        return {}
    end

    return results
end



return p