Nicht angemeldeter Benutzer - Bearbeiten von Seiten ist nur als angemeldeter Benutzer möglich.

Änderungen

Zur Navigation springen Zur Suche springen

Modul:Vorlage:Handle (Quelltext anzeigen)

Version vom 28. Dezember 2019, 14:45 Uhr

3.823 Bytes hinzugefügt ,  14:45, 28. Dez. 2019
K
8 Versionen importiert: Import der Seite wikipedia-de:Gelber Enzian mit Vorlagen und Historie
Zeile 1: Zeile 1: −
--[=[ 2014-12-13
+
local Handle = { suite  = "Handle",
 +
                serial = "2019-07-14",
 +
                item  = 19644424 }
 +
--[=[
 
Template:Handle  {{DOI}} {{HDL}}
 
Template:Handle  {{DOI}} {{HDL}}
 +
require: URIutil
 
]=]
 
]=]
 +
local Failsafe = Handle
      Zeile 10: Zeile 15:  
   doi        = { showArticle = "Digital Object Identifier",
 
   doi        = { showArticle = "Digital Object Identifier",
 
                   showName    = "DOI",
 
                   showName    = "DOI",
−
                   stemURL    = "https://dx.doi.org/" },
+
                   stemURL    = "//doi.org/" },
 
   hdl        = { showArticle = false,
 
   hdl        = { showArticle = false,
 
                   showName    = "Handle",
 
                   showName    = "Handle",
−
                   stemURL    = "https://hdl.handle.net/" },
+
                   stemURL    = "//hdl.handle.net/" },
 
   errCat      = false,
 
   errCat      = false,
 
   errClass    = "error_Handle",
 
   errClass    = "error_Handle",
Zeile 19: Zeile 24:  
   errHide    = false,
 
   errHide    = false,
 
   errNS      = false,
 
   errNS      = false,
 +
  errDate    = { en = "Bad ISO year (month)",
 +
                  de = "ISO-Jahr (ggf. Monat) fehlerhaft" },
 
   errInvalid  = { en = "Invalid:",
 
   errInvalid  = { en = "Invalid:",
 
                   de = "Ungültig:" },
 
                   de = "Ungültig:" },
Zeile 27: Zeile 34:  
                   de = "(zurzeit nicht erreichbar)" }
 
                   de = "(zurzeit nicht erreichbar)" }
 
}
 
}
 +
 +
 +
 +
Config.fault = function ( alert )
 +
    -- Format error message by class=error
 +
    -- Parameter:
 +
    --    alert  -- string, error message
 +
    -- Returns:
 +
    --    string, HTML span
 +
    return tostring( mw.html.create( "span" )
 +
                            :addClass( "error" )
 +
                            :wikitext( alert ) )
 +
end -- Config.fault()
      Zeile 42: Zeile 62:  
         end
 
         end
 
     else
 
     else
−
         r = string.format( "<span class=\"error\">????.%s.????</span>",
+
         r = Config.fault( string.format( "????.%s.????", apply ) )
−
                          apply )
   
     end
 
     end
 
     return r
 
     return r
Zeile 66: Zeile 85:       −
local function fault( alert, add )
+
local function failed( alert, add )
 
     -- Format message with class="error" or similar
 
     -- Format message with class="error" or similar
 
     --    alert  -- string, with message key
 
     --    alert  -- string, with message key
 
     --    add    -- string, with additional information, or nil
 
     --    add    -- string, with additional information, or nil
 
     -- Returns message with markup
 
     -- Returns message with markup
 +
    local lucky, TemplUtl = pcall( require, "Module:TemplUtl" )
 +
    local scope = Config.errClass
 
     local story = factory( alert )
 
     local story = factory( alert )
−
     local r, scope, style
+
     local r
 
     if add then
 
     if add then
 
         story = string.format( "%s %s", story, add )
 
         story = string.format( "%s %s", story, add )
 
     end
 
     end
−
     if not Config.frame then
+
     if Config.errClasses then
−
         Config.frame = mw.getCurrentFrame()
+
         scope = string.format( "%s %s", scope, Config.errClasses )
 
     end
 
     end
−
     if Config.frame:preprocess( "{{REVISIONID}}" ) == "" then
+
     if type( TemplUtl ) == "table" then
−
         Config.errCat  = false
+
         TemplUtl = TemplUtl.TemplUtl()
−
        Config.errHide = false
  −
        scope          = string.format( "%s error", Config.errClass )
  −
    else
  −
        scope = Config.errClass
   
     end
 
     end
−
     if Config.errHide then
+
     if type( TemplUtl ) == "table"  and
−
         style = "style='display:none'"
+
      type( TemplUtl.failure ) == "function" then
 +
         r = TemplUtl.failure( story,
 +
                              not Config.errHide,
 +
                              scope,
 +
                              Config.frame )
 
     else
 
     else
−
         style = ""
+
         -- LEGACY and global wiki mode
 +
        local element = mw.html.create( "span" )
 +
                              :addClass( scope )
 +
        if not Config.frame then
 +
            Config.frame = mw.getCurrentFrame()
 +
        end
 +
        if Config.frame:preprocess( "{{REVISIONID}}" ) == "" then
 +
            Config.errCat  = false
 +
            Config.errHide = false
 +
            element:addClass( "error" )
 +
        end
 +
        if Config.errHide then
 +
            element:css( "display", "none" )
 +
        end
 +
        r = tostring( element:wikitext( story ) )
 
     end
 
     end
−
    if Config.errClasses then
  −
        scope = string.format( "%s %s",
  −
                              scope, Config.errClasses )
  −
    end
  −
    r = string.format( "<span class=\"%s\" %s>%s</span>",
  −
                      scope, style, story )
   
     if Config.errCat then
 
     if Config.errCat then
 
         if Config.errNS then
 
         if Config.errNS then
Zeile 121: Zeile 150:  
     end
 
     end
 
     return r
 
     return r
−
end -- fault()
+
end -- failed()
      Zeile 147: Zeile 176:  
     end
 
     end
 
     if unknown then
 
     if unknown then
−
         r = string.format( "'<code>%s</code>' in Template:%s",
+
        local e = mw.html.create( "code" )
−
                           table.concat( unknown, " " ),
+
        e:wikitext( table.concat( unknown, " " ) )
−
                          Config.scheme )
+
         r = string.format( "'%s' in Template:%s",
−
         r = fault( "errUnkown", r )
+
                           tostring( e ), Config.scheme )
 +
         r = failed( "errUnkown", r )
 
     else
 
     else
−
         local lucky, util = pcall( require, "Module:URIutil" );
+
         local lucky, URIutil = pcall( require, "Module:URIutil" )
 
         if lucky then
 
         if lucky then
−
             if type( util ) == "table" then
+
             if type( URIutil ) == "table" then
−
                 util = util.URIutil();
+
                 URIutil = URIutil.URIutil()
 
             else
 
             else
−
                 util = "library URIutil invalid";
+
                 URIutil = "library URIutil invalid"
 
             end
 
             end
 
         end
 
         end
−
         if type( util ) ~= "table" then
+
         if type( URIutil ) ~= "table" then
−
             error( util, 0 );
+
             error( URIutil, 0 )
 
         end
 
         end
−
         if util[ "is" .. Config.showName ]( access )  then
+
         if URIutil[ "is" .. Config.showName ]( access )  then
−
             r = util[ "link" .. Config.showName ]( access )
+
            local suffer = args[ Config.parProblem ]
 +
             r = URIutil[ "link" .. Config.showName ]( access )
 
             if Config.showArticle then
 
             if Config.showArticle then
 
                 r = string.format( "[[%s|%s]]:%s",
 
                 r = string.format( "[[%s|%s]]:%s",
Zeile 171: Zeile 202:  
                 r = string.format( "%s:%s", Config.scheme, r )
 
                 r = string.format( "%s:%s", Config.scheme, r )
 
             end
 
             end
−
             if args[ Config.parProblem ] then
+
             if suffer  and  suffer ~= "" then
−
                 r = string.format( "%s <small>%s</small>",
+
                local scan = "^(2[01]%d%d)(%-?[01]?%d?)$"
−
                                  r,  factory( "problemNote" ) )
+
                local s, sm = suffer:match( scan )
 +
                local e
 +
                if sm  and  sm ~= "" then
 +
                    s = sm:match( "^%-([01]%d)$" )
 +
                    if s then
 +
                        local m = tonumber( s )
 +
                        if m < 1  or  m > 12 then
 +
                            s = false
 +
                        end
 +
                    end
 +
                 end
 +
                if s then
 +
                    e = mw.html.create( "small" )
 +
                              :wikitext( factory( "problemNote" ) )
 +
                    r = string.format( "%s %s", r, tostring( e ) )
 +
                else
 +
                    e = mw.html.create( "code" )
 +
                              :wikitext( Config.parProblem .. "=" )
 +
                    r = failed( "errDate", tostring( e ) )
 +
                end
 
             end
 
             end
 
         else
 
         else
−
             r = fault( "errInvalid",
+
             r = failed( "errInvalid",
 
                         string.format( "%s=%s",
 
                         string.format( "%s=%s",
 
                                       Config.showName,
 
                                       Config.showName,
Zeile 187: Zeile 237:       −
-- Export
+
Handle.main = function ( argsF, argsT )
−
local p = { }
  −
 
  −
p.main = function ( argsF, argsT )
   
     -- Invocation; decide between first and secondary processing
 
     -- Invocation; decide between first and secondary processing
 
     --    argsF  -- table, with #invoke parameters
 
     --    argsF  -- table, with #invoke parameters
Zeile 234: Zeile 281:  
             Config.errHide  = false
 
             Config.errHide  = false
 
             Config.errClass = "error"
 
             Config.errClass = "error"
−
             r = fault( "errScheme", argsF.scheme )
+
             r = failed( "errScheme", argsF.scheme )
 
         end
 
         end
 
     else
 
     else
Zeile 240: Zeile 287:  
     end
 
     end
 
     return r
 
     return r
−
end -- p.main()
+
end -- Handle.main()
 +
 
 +
 
 +
 
 +
Failsafe.failsafe = function ( atleast )
 +
    -- Retrieve versioning and check for compliance
 +
    -- Precondition:
 +
    --    atleast  -- string, with required version or "wikidata" or "~"
 +
    --                or false
 +
    -- Postcondition:
 +
    --    Returns  string  -- with queried version, also if problem
 +
    --              false  -- if appropriate
 +
    local last  = ( atleast == "~" )
 +
    local since = atleast
 +
    local r
 +
    if last  or  since == "wikidata" then
 +
        local item = Failsafe.item
 +
        since = false
 +
        if type( item ) == "number"  and  item > 0 then
 +
            local entity = mw.wikibase.getEntity( string.format( "Q%d",
 +
                                                                item ) )
 +
            if type( entity ) == "table" then
 +
                local vsn = entity:formatPropertyValues( "P348" )
 +
                if type( vsn ) == "table"  and
 +
                  type( vsn.value ) == "string"  and
 +
                  vsn.value ~= "" then
 +
                    if last  and  vsn.value == Failsafe.serial then
 +
                        r = false
 +
                    else
 +
                        r = vsn.value
 +
                    end
 +
                end
 +
            end
 +
        end
 +
    end
 +
    if type( r ) == "nil" then
 +
        if not since  or  since <= Failsafe.serial then
 +
            r = Failsafe.serial
 +
        else
 +
            r = false
 +
        end
 +
    end
 +
    return r
 +
end -- Failsafe.failsafe()
       +
 +
-- Export
 +
local p = { }
    
p.f = function ( frame )
 
p.f = function ( frame )
 
     local lucky, r
 
     local lucky, r
 
     Config.frame = frame
 
     Config.frame = frame
−
     lucky, r = pcall( p.main, frame.args, frame:getParent().args )
+
     lucky, r = pcall( Handle.main, frame.args, frame:getParent().args )
 
     if not lucky then
 
     if not lucky then
−
         r = string.format( "<span class=\"error\">%s * %s</span>",
+
         r = Config.fault( string.format( "%s * %s",
−
                          frame:getTitle(),
+
                                        frame:getTitle(), r ) )
−
                          r )
   
     end
 
     end
 
     return r
 
     return r
 
end -- p.f()
 
end -- p.f()
 +
 +
p.failsafe = function ( frame )
 +
    -- Versioning interface
 +
    local s = type( frame )
 +
    local since
 +
    if s == "table" then
 +
        since = frame.args[ 1 ]
 +
    elseif s == "string" then
 +
        since = frame
 +
    end
 +
    if since then
 +
        since = mw.text.trim( since )
 +
        if since == "" then
 +
            since = false
 +
        end
 +
    end
 +
    return Failsafe.failsafe( since )  or  ""
 +
end -- p.failsafe()
 +
 +
p.Handle = function ()
 +
    -- Module interface
 +
    return Handle
 +
end -- p.Handle()
    
return p
 
return p
Abgerufen von „https://de.imedwiki.org/wiki/Spezial:Mobiler_Unterschied/16395...16400“
Cookies helfen uns bei der Bereitstellung von imedwiki. Durch die Nutzung von imedwiki erklärst du dich damit einverstanden, dass wir Cookies speichern.

Navigationsmenü