Module:GetShortDescription/sandbox: Difference between revisions

Revision as of 21:19, 10 February 2023

Latest revision as of 01:42, 22 February 2023

(7 intermediate revisions by the same user not shown)

Line 1:

local function isEmpty( value ) return value == nil or value == '' end

local function notEmpty( value ) return not isEmpty( value ) end

local function isNone( value ) return value:lower() == 'none' end

local function alarmingMessage( message, preview )

message = '<span style="color:#d33">[[Module:GetShortDescription]] ' .. message .. '.</span>'

if not preview then
message = message .. '[[Category:Pages displaying alarming messages about Module:GetShortDescription]]'
end

return message

end

-- Grammatically reasonable concatenation of possible issues into one message per problematic link target.

local function previewWarning( args_name, quantity_of_things )

local message = ''

if quantity_of_things.params > 3 then
message = message .. ' with extraneous parameters'
end

if quantity_of_things.descriptions > 1 then
message = message .. ', declaring ' .. quantity_of_things.descriptions .. ' short descriptions'
end

if quantity_of_things.templates > 1 or notEmpty( message ) then

message = 'has detected that [[:' .. args_name .. '|' .. args_name .. ']] has ' ..
quantity_of_things.templates .. ' {{tlx|short description}}' .. message

mw.addWarning( alarmingMessage( message, true ) )

end

end

local function getWikidataDescription( title, args, fallback)

local wikidata_id = mw.wikibase.getEntityIdForTitle( title )

if isEmpty( wikidata_id ) then
return nil
end

local wikidata_description, wikidata_description_lang = mw.wikibase.getDescriptionWithLang( wikidata_id )

if isEmpty( wikidata_description ) then
return nil
end

local result = { wikidata = wikidata_description }

if isEmpty( args.lang_no ) and notEmpty( wikidata_description_lang ) and wikidata_description_lang ~= 'en' then

-- According to the docs this is possiblea possibility...

result.wikidata = require( 'Module:Lang' )._lang {

wikidata_description_lang,

wikidata_description,

Line 41 ⟶ 52:

}

end

result.fellback = fallback

return result

end

local function getShortDescriptiongetShortDescriptionTemplates( title_table, args_name )

local page_content = title_table:getContent()

-- Assume no content is a nonexistent title because it's cheaper than testing if it exists.

-- Assume no content means a nonexistent title because it's cheaper than testing if it exists.

if isEmpty( page_content ) then return { redlink = true } end

if isEmpty(page_content) then

return {redlink = true}

end

local contents_of_all_short_description_templates = {}

-- Because there could be any number of short description templates, and not all where there should be; get all the templates.

for template in page_content:gmatch( '{%b{}}' ) do

local short_description_content = mw.ustring.match( template, '^{{%s*[Ss]hort description%s*|%s*(.-)%s*}}' )

if notEmpty( short_description_content ) then

-- Collect the contents of short description templates.

contents_of_all_short_description_templates[ #contents_of_all_short_description_templates+1 ] = short_description_content

end

-- An opportunity for efficiency gain exists - to break if another type of template is found e.g. citation templates,

-- but on an appallingly formatted page, a short description template down by the categories would likely be missed.

end

if #contents_of_all_short_description_templates < 1 then return nil end

-- Better to lower/upper the case of the possibly very long page_content or this?

local redirect_to_id = mw.ustring.match(page_content, '^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*%[%[.-#.-%]%]')

if redirect_to_id then

mw.log(redirect_to_id)

-- pass this info along

end

return contents_of_all_short_description_templates

end

local function getShortDescription(args_name, args_name_title_table, title, title_table, fallback)

local contents_of_all_short_description_templates = {}

local redirected

-- Check for short description templates on redirect pages.

if title ~= args_name then

contents_of_all_short_description_templates = getShortDescriptionTemplates(args_name_title_table)

if contents_of_all_short_description_templates.redlink then

return contents_of_all_short_description_templates

end

redirected = false

end

if #contents_of_all_short_description_templates < 1 then

contents_of_all_short_description_templates = getShortDescriptionTemplates(title_table)

if notEmpty(redirected) then

redirected = true

end

end

if contents_of_all_short_description_templates.redlink then

return contents_of_all_short_description_templates

end

if #contents_of_all_short_description_templates < 1 then

return nil

end

local quantity_of_things = {

templates = #contents_of_all_short_description_templates,

Line 65 ⟶ 120:

params = 0

}

local possible_short_descriptions = {}

for template_content_index, short_description_template_contents in ipairs( contents_of_all_short_description_templates ) do

-- Look through the short description templates:

for template_content_index, short_description_template_contents in ipairs(contents_of_all_short_description_templates) do

-- Split the contents at pipes and trim.

local short_description_template_params = mw.text.split( short_description_template_contents, '%s*|%s*' )

if #short_description_template_params > quantity_of_things.params then

quantity_of_things.params = #short_description_template_params

end

possible_short_descriptions[ template_content_index ] = {}

-- Look through the params:

for i, param in ipairs( short_description_template_params ) do

if param == 'noreplace' or mw.ustring.match( param, '^2%s*=%s*noreplace$' ) then

-- Take note of 'noreplace'-ing for establishment of hierarchy later.

possible_short_descriptions[ template_content_index ].noreplace = true

else

local has_equals = param:match( '=' )

if not has_equals or param:match( '^1' ) then

-- Grab the short description.

if has_equals then
param = mw.ustring.gsub( param, '^1%s*=%s*', '' ) end

end

-- If the template has both a numbered and an unnumbered short description;

-- whichever comes last (ltr) will be used by that template, so overwriting works out great.

possible_short_descriptions[ template_content_index ].description = param

-- And we want to know the total quantity of descriptions being declared.

quantity_of_things.descriptions = quantity_of_things.descriptions + 1

Line 92 ⟶ 152:

end

end

local short_descriptions = {}

-- Look through the short descriptions.

-- Look through the possible short descriptions for definite short descriptions,

for i, possible_short_description in ipairs( possible_short_descriptions ) do

-- and prepare for working out which of possibly multiple short descriptions is actually being applied for the page:

for i, possible_short_description in ipairs(possible_short_descriptions) do

if possible_short_description.description then

-- If a description is 'noreplace'-ing or 'none'; demote it.

if ( possible_short_description.noreplace or isNone( possible_short_description.description ) ) and
#possible_short_descriptions > 1 then

-- But don't demote it if it's already at the bottom.

if i > 1 then
table.insert( short_descriptions, #short_descriptions, possible_short_description )

else

else short_descriptions[ #short_descriptions+1 ] = possible_short_description end

else short_descriptions[ #short_descriptions+1 ] = possible_short_description end

end

else

short_descriptions[#short_descriptions+1] = possible_short_description

end

end

end

-- Let previewWarning() work out if these numbers are bad.

previewWarning( args_name, quantity_of_things )

if #short_descriptions >= 1 then return { explicit = short_descriptions[ #short_descriptions ].description } end

if #short_descriptions >= 1 then

-- Pop!

local short_description = short_descriptions[#short_descriptions].description

if notEmpty(short_description) then

return {explicit = short_description, fellback = fallback, redirected = redirected}

end

end

return nil

end

local function isSisterProjectLink( title )

local sister_project_prefixes = {

'wiktionary', 'wikt',

Line 128 ⟶ 205:

'phabricator', 'phab'

}

local pre_colon = title:match( '^(%a+):' )

if pre_colon then

for i, sister in ipairs( sister_project_prefixes ) do

if pre_colon == sister then
return true end

end

end

end

Line 137 ⟶ 216:

end

-- Literally testing if title_table.isRedirect can be expensive;

-- Resolve redirects (including multiple) to their end target.

-- processing this way resolves (multiple) redirects without the possibly expensive check.

local function getTitleAndTable( orig_name )

local title_tablefunction = mw.title.newgetTitleAndTable( orig_name )

local title_table = mw.title.new(orig_name)

title_table = title_table.redirectTarget or title_table

local title = title_table.prefixedText

Line 145 ⟶ 225:

return title, title_table

end

return getTitleAndTable( title )

end

local function getDescription( args )

local args_name = args.name

if isEmpty( args_name ) then
return { alarm = 'requires a page name (including namespace)' }
end

local title, title_table = getTitleAndTable( args_name )

-- Keep the orginal name, cleaned up, and its title_table for later.

if isSisterProjectLink( title ) then return nil end

local args_name_title_table = mw.title.new(args_name)

args_name = args_name_title_table.prefixedText

if isSisterProjectLink(args_name) then

return nil

end

local title, title_table = getTitleAndTable(args_name)

if title ~= args_name then

if isSisterProjectLink(title) then

return nil

end

end

local only = args.only

local prefer = args.prefer or 'explicit'

-- Pass args_name to getShortDescription() so previewWarning()s won't be confusing for redirects.

if notEmpty( only ) then

if notEmpty(only) then

if only == 'explicit' then return getShortDescription( title_table, args_name ) end

if only == 'wikidataexplicit' then return getWikidataDescription( title, args ) end

return getShortDescription(args_name, args_name_title_table, title, title_table)

return { alarm = 'accepts either "explicit" or "wikidata" as the value of |only=' } end

end

if notEmpty( prefer ) then

if only == 'wikidata' then

return getWikidataDescription(title, args)

end

return {alarm = 'accepts either "explicit" or "wikidata" as the value of |only='}

end

if notEmpty(prefer) then

if prefer == 'explicit' then

local short_description = getShortDescription(args_name, title_tableargs_name_title_table, args_nametitle, title_table)

if notEmpty( short_description ) and short_description.redlink or ( not isNone( short_description.explicit ) or args.none_is_valid ) then return short_description end

-- Assume a Wikidata search would be a bad idea for an assumed nonexistent title.

return getWikidataDescription( title, args ) end

if short_description.redlink or (not isNone(short_description.explicit) or args.none_is_valid) then

if prefer == 'wikidata' then return getWikidataDescription( title, args ) or getShortDescription( title_table, args_name ) end

return short_description

return { alarm = 'accepts either "explicit" or "wikidata" as the value of |prefer=' }

end

end

return getWikidataDescription(title, args, true)

end

if prefer == 'wikidata' then

return getWikidataDescription(title, args) or getShortDescription(args_name, args_name_title_table, title, title_table, true)

end

return {alarm = 'accepts either "explicit" or "wikidata" as the value of |prefer='}

end

end

local function main( args )

local result = getDescription( args )

if notEmpty( result ) then

if result.alarm then
result.alarm = alarmingMessage( result.alarm )
end

if args.stringify then

if result.alarm then
result = result.alarm
else

result = result.explicit or result.wikidata

if args.none_is_nil and isNone( result ) then
result = nil end

end

end

elseif not result.alarm and args.none_is_nil then

local description = result.explicit or result.wikidata

if description and args.none_is_nil and isNone( description ) then
result = nil end

end

end

end

Line 189 ⟶ 310:

local p = {}

function p.main( frame )

local args = require( 'Module:Arguments' ).getArgs( frame )

if isEmpty( args ) then
return alarmingMessage( 'could not getArgs' ) end-- This really would be alarming.

end

return main(args)

--[[ DON'T FORGET THIS ]]

--local result = main( args )

--mw.logObject( result )

return main( args )

--[[ DON'T FORGET THIS ]]

end

return p

-- p.main{ name="" }

-- p.main{ name="", stringify=true }

-- p.main{ name="jhgfd" }

-- p.main{ name="jhgfd", stringify=true }

-- p.main{ name="Wikipedia:example of a double redirect" }

-- p.main{ name="Wikipedia:example of a double redirect", stringify=true }

-- p.main{ name="The Partisan", only="wackydata" }

-- p.main{ name="The Partisan", only="wackydata", stringify=true }

-- p.main{ name="List of sausages" }

-- p.main{ name="List of sausages", none_is_valid=true }

-- p.main{ name="List of sausages", none_is_valid=true, none_is_nil=true }

-- p.main{ name="List of sausages", stringify=true }

-- p.main{ name="List of sausages", none_is_valid=true, stringify=true }

-- p.main{ name="List of sausages", none_is_valid=true, none_is_nil=true, stringify=true }