Module:Yesno

This module provides a consistent interface for processing boolean or boolean-style string input. While Lua allows the true and false boolean values, wikicode templates can only express boolean values through strings such as "yes", "no", etc. This module processes these kinds of strings and turns them into boolean input for Lua to process. It also returns nil values as nil, to allow for distinctions between nil and false. The module also accepts other Lua structures as input, i.e. booleans, numbers, tables, and functions. If it is passed input that it does not recognise as boolean or nil, it is possible to specify a default value to return.

Syntax

<source lang="lua">yesno(value, default)</source>

value is the value to be tested. Boolean input or boolean-style input (see below) always evaluates to either true or false, and nil always evaluates to nil. Other values evaluate to default.

Usage

First, load the module. Note that it can only be loaded from other Lua modules, not from normal wiki pages. For normal wiki pages you can use {{yesno}} instead.

<source lang="lua"> local yesno = require('Module:Yesno') </source>

Some input values always return true, and some always return false. nil values always return nil.

<source lang="lua"> -- These always return true: yesno('yes') yesno('y') yesno('true') yesno('t') yesno('1') yesno(1) yesno(true)

-- These always return false: yesno('no') yesno('n') yesno('false') yesno('f') yesno('0') yesno(0) yesno(false)

-- A nil value always returns nil: yesno(nil) </source>

String values are converted to lower case before they are matched:

<source lang="lua"> -- These always return true: yesno('Yes') yesno('YES') yesno('yEs') yesno('Y') yesno('tRuE')

-- These always return false: yesno('No') yesno('NO') yesno('nO') yesno('N') yesno('fALsE') </source>

You can specify a default value if yesno receives input other than that listed above. If you don't supply a default, the module will return nil for these inputs.

<source lang="lua"> -- These return nil: yesno('foo') yesno({}) yesno(5) yesno(function() return 'This is a function.' end)

-- These return true: yesno('foo', true) yesno({}, true) yesno(5, true) yesno(function() return 'This is a function.' end, true)

-- These return "bar": yesno('foo', 'bar') yesno({}, 'bar') yesno(5, 'bar') yesno(function() return 'This is a function.' end, 'bar') </source>

Note that the blank string also functions this way: <source lang="lua"> yesno() -- Returns nil. yesno(, true) -- Returns true. yesno(, 'bar') -- Returns "bar". </source>

Although the blank string usually evaluates to false in wikitext, it evaluates to true in Lua. This module prefers the Lua behaviour over the wikitext behaviour. If treating the blank string as false is important for your module, you will need to remove blank arguments at an earlier stage of processing.

---

local p = {}

function p.yesno(frame)

    -- defaults
    local retvals = {
        yes   = "yes",
        no    = "",
        ["¬"] = ""
    }

    -- Allow arguments to override defaults. Arguments are taken from
    -- the parent frame; other arguments are ignored.
    for k,v in pairs(frame.args) do
        retvals[k] = v
    end

    val = frame.args[1]

    -- First deal with the case if val is nil, then deal with other cases.
    if val == nil then
        return retvals['¬']
    end

    val = val:lower()          -- Make lowercase.
    val = val:match'^%s*(.*%S)' or ''  -- Trim whitespace.

    -- Cases are ordered by (probable) likelihood of use. 
    if val == '' then
        return retvals['blank'] or retvals['no']
    elseif val == 'yes' then
        return retvals['yes']
    elseif val == 'no' then
        return retvals['no']
    elseif val == 'y' then
        return retvals['yes']
    elseif val == 'n' then
        return retvals['no']
    elseif val == '¬' then
        return retvals['¬']
    elseif tonumber(val) == 1 then
        return retvals['yes']
    elseif tonumber(val) == 0 then
        return retvals['no']
    else
        return retvals['def'] or retvals['yes']
    end
end

return p