Modul:URIutil - Versionsgeschichte

Admin: 41 Versionen importiert

2019-09-06T11:27:37Z

41 Versionen importiert

te>PerfektesChaos: 2019-08-07

2019-09-01T13:48:39Z

2019-08-07

te>PerfektesChaos: 2019-02-22

2019-02-23T14:31:09Z

2019-02-22

te>PerfektesChaos: 2019-01-27

2019-01-27T21:01:25Z

2019-01-27

te>PerfektesChaos: 2019-01-01

2019-01-26T21:09:24Z

2019-01-01

te>PerfektesChaos: 2018-07-03

2018-07-03T18:08:30Z

2018-07-03

te>PerfektesChaos: 2018-01-11

2018-02-15T12:40:24Z

2018-01-11

te>PerfektesChaos: 2018-01-10

2018-01-10T15:47:17Z

2018-01-10

te>Thgoiter: https://www.doi.org/doi_handbook/3_Resolution.html#3.7.3

2018-01-09T22:38:18Z

https://www.doi.org/doi_handbook/3_Resolution.html#3.7.3

te>PerfektesChaos: 2017-10-04

2017-10-04T07:03:16Z

2017-10-04

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2019-02-22",
+                   serial = "2019-08-07",
                    item   = 19644443 };
 --[=[
@@ Zeile 40: / Zeile 40: @@
 loadData: URIutil/config URIutil/isbn URIutil/urn
 ]=]
 local CurrentPageName
@@ Zeile 1.457: / Zeile 1.458: @@
      if URIutil.mayURN( attempt ) then
          local e = mw.html.create( "span" )
-                          :addClass( "invalid-URN" )
+                          :addClass( "invalid-URN" );
-                         :wikitext( attempt );
+        local serial  = attempt;
-         local s = flop( alert );
+         local suffix  = flop( alert );
          r = tostring( e ) .. fault( "(?!?!)" );
-         if s then
+         if suffix then
-             r = r .. s;
+             r = r .. suffix;
          end
      else
@@ Zeile 1.871: / Zeile 1.876: @@
-URIutil.failsafe = function ( assert )
+Failsafe.failsafe = function ( atleast )
      -- Retrieve versioning and check for compliance
      -- Precondition:
-     --     assert  -- string, with required version or "wikidata",
+     --     atleast  -- string, with required version or "wikidata" or "~"
-     --                or false
+     --                 or false
      -- Postcondition:
-     --     Returns  string with appropriate version, or false
+     --     Returns  string  -- with queried version, also if problem
-     local since = assert;
+    --              false   -- if appropriate
-     local r;
+    local last  = ( atleast == "~" )
-     if since == "wikidata" then
+     local since = atleast
-         local item = URIutil.item;
+     local r
-         since = false;
+     if last  or  since == "wikidata" then
          if type( item ) == "number"  and  item > 0 then
-             local ent = mw.wikibase.getEntity( string.format( "Q%d",
+             local entity = mw.wikibase.getEntity( string.format( "Q%d",
-                                                              item ) );
+                                                                 item ) )
-             if type( ent ) == "table" then
+             if type( entity ) == "table" then
-                 local vsn = ent:formatPropertyValues( "P348" );
+                 local vsn = entity:formatPropertyValues( "P348" )
                  if type( vsn ) == "table"  and
-                    type( vsn.value ) == "string" and
+                    type( vsn.value ) == "string"  and
                     vsn.value ~= "" then
-                     r = vsn.value;
+                     if last  and  vsn.value == Failsafe.serial then
                  end
              end
          end
      end
-     if not r then
+     if type( r ) == "nil" then
-         if not since  or  since <= URIutil.serial then
+         if not since  or  since <= Failsafe.serial then
-             r = URIutil.serial;
+             r = Failsafe.serial
          else
-             r = false;
+             r = false
          end
      end
-     return r;
+     return r
-end -- URIutil.failsafe()
+end -- Failsafe.failsafe()
@@ Zeile 2.053: / Zeile 2.064: @@
          end
      end
-     return URIutil.failsafe( since )  or  "";
+     return Failsafe.failsafe( since )  or  "";
 end -- p.failsafe()
 function p.URIutil( arg )

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2019-01-27",
+                   serial = "2019-02-22",
                    item   = 19644443 };
 --[=[
@@ Zeile 155: / Zeile 155: @@
-local function fault( alert )
+local fault = function ( alert )
      -- Format error message by class=error
      -- Parameter:
@@ Zeile 776: / Zeile 776: @@
              r = string.format( ":%s:", area );
              if s:match( r ) then
-                 s = "[^%w%(%)%+,%-%.:=@;%$_!%*'].*$";
+                 s = "[^%w%(%)%+,%-%.:=/@;%$_!%*'].*$";
                  r = acquire:match( s );
              else
@@ Zeile 1.475: / Zeile 1.475: @@
                      resolver = resolver[ space ];
                      r2       = ( resolver ~= true );
                      if type( resolver ) == "table" then
                          r, sign = URNresolve( resolver, sign, alter );
                          s = string.format( "%s:%s", space, sign );
                          if r then
                              if alone then
                                  r2 = true;
-                             end
+                             else
-                                 r  = r:gsub( "%$1",  "urn:" .. s );
+                                 s = "urn:" .. s;
                              end
                              r = string.format( "[%s %s]", r, s );
                          end
                      elseif r2 then

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2019-01-01",
+                   serial = "2019-01-27",
                    item   = 19644443 };
 --[=[
@@ Zeile 1.475: / Zeile 1.475: @@
                      resolver = resolver[ space ];
                      r2       = ( resolver ~= true );
                      if type( resolver ) == "table" then
                          r, sign = URNresolve( resolver, sign, alter );
                          s = string.format( "%s:%s", space, sign );
                          if r then
                              if alone then
                                  r2 = true;
-                             else
+                             end
                                  r  = r:gsub( "%$1",  "urn:" .. s );
                              if at then
                                  r = string.format( "%s#%s", r, at );
                              end
                              r = string.format( "[%s %s]", r, s );
                          end
                      elseif r2 then

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2018-07-03",
+                   serial = "2019-01-01",
                    item   = 19644443 };
 --[=[
@@ Zeile 768: / Zeile 768: @@
      --     Returns  false if no problem detected
      --              string with violation
      local r;
-     if type( s ) == "string" then
+     if area == "urn" then
-        r = string.format( ":%s:", area );
+        r = "urn:";
-        if s:match( r ) then
+    else
-            s = "[^%w%(%)%+,%-%.:=@;%$_!%*'].*$";
+        local s = fetch( "urn" ).sns;
-            r = acquire:match( s );
+        if type( s ) == "string" then
-        else
+            r = string.format( ":%s:", area );
-            r = string.format( "&#58;%s:", area );
+            if s:match( r ) then
-        end
+                s = "[^%w%(%)%+,%-%.:=@;%$_!%*'].*$";
-        if not r then
+                r = acquire:match( s );
-            r = false;
+            else
-            if area == "isbn" then
+                r = string.format( "&#58;%s:", area );
-                if not URIutil.isISBNvalid( acquire ) then
+            end
-                    r = acquire;
+            if not r then
-                end
+                r = false;
-            elseif area == "issn" then
+                if area == "isbn" then
-                if not URIutil.isISSNvalid( acquire ) then
+                    if not URIutil.isISBNvalid( acquire ) then
-                    r = acquire;
+                        r = acquire;
                  end
              end
@@ Zeile 1.435: / Zeile 1.439: @@
-function URIutil.linkURN( attempt, alter, any1, any2, alert, at )
+function URIutil.linkURN( attempt, alter, any1, any2, alert, at, alone )
      -- Retrieve bracketed titled external URN link
      -- Precondition:
@@ Zeile 1.444: / Zeile 1.448: @@
      --     alert    -- string, with title of maintenance category, or nil
      --     at       -- fragment, or nil
      -- Postcondition:
      --     Returns
@@ Zeile 1.450: / Zeile 1.455: @@
      local r2 = true;
      local r;
-     if not URIutil.mayURI( attempt, true ) then
+     if URIutil.mayURN( attempt ) then
          local s = attempt:match( "^%s*[uU][rR][nN]:(%S+)%s*$" );
          if s then
@@ Zeile 1.465: / Zeile 1.479: @@
                          s = string.format( "%s:%s", space, sign );
                          if r then
-                             r = r:gsub( "%$1",  "urn:" .. s );
+                             if alone then
                              if at then
                                  r = string.format( "%s#%s", r, at );
@@ Zeile 1.486: / Zeile 1.504: @@
                                                 space, sign );
                          end
                      else
                          s = "link" .. space:upper();
@@ Zeile 1.505: / Zeile 1.524: @@
              r = mw.text.trim( attempt );
          end
      end
      return r, r2;
@@ Zeile 1.685: / Zeile 1.705: @@
                  r = s;
              end
          else
-             r = "urn:";
+             s = mw.text.trim( attempt );
          end
      end
@@ Zeile 1.823: / Zeile 1.848: @@
      --     Returns  link, or plain string if bad URN
      local r, l =
-              URIutil.linkURN( attempt, alter, false, false, alert, at );
+        URIutil.linkURN( attempt, alter, false, false, alert, at, true );
      if l then
          local s = fetch( "config" ).supportURN;
@@ Zeile 1.863: / Zeile 1.888: @@
                  local vsn = ent:formatPropertyValues( "P348" );
                  if type( vsn ) == "table"  and
-                    type( vsn.value) == "string" and
+                    type( vsn.value ) == "string" and
                     vsn.value ~= "" then
                      r = vsn.value;

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2018-01-11",
+                   serial = "2018-07-03",
                    item   = 19644443 };
 --[=[
@@ Zeile 1.258: / Zeile 1.258: @@
          local e = mw.html.create( "span" )
                           :addClass( "uri-handle" );
-         r = mw.text.decode( mw.text.trim( attempt ),  "PATH" );
+         local s;
-         r = string.format( "[%s%s %s]",
+        s, r = attempt:match( "^%s*(10%.[1-9][0-9]+/)(.+)%s*$" );
-                            "//doi.org/",
+        r = mw.text.decode( r, "PATH" );
                             mw.uri.encode( r ),
                             mw.text.encode( r, "<>&%]" ) );
          r = tostring( e:wikitext( r ) );

← Nächstältere Version	Version vom 6. September 2019, 11:27 Uhr
(kein Unterschied)

@@ Zeile 1: / Zeile 1: @@
 local URIutil = { suite  = "URIutil",
-                   serial = "2017-10-04" };
+                   serial = "2018-01-10" };
 --[=[
 Utilities for URI etc.
@@ Zeile 160: / Zeile 160: @@
      -- Returns:
      --     string, HTML span
-     return string.format( "<span class=\"error\">%s</span>", alert );
+     return tostring( mw.html.create( "span" )
 end -- fault()
@@ Zeile 1.253: / Zeile 1.255: @@
      local r = URIutil.isDOI( attempt );
      if r then
          r = mw.text.decode( mw.text.trim( attempt ),  "PATH" );
          r = string.format( "[%s%s %s]",
@@ Zeile 1.258: / Zeile 1.262: @@
                             mw.uri.encode( r ),
                             mw.text.encode( r, "<>&%]" ) );
-         r = string.format( "<span class='uri-handle'>%s</span>",  r );
+         r = tostring( e:wikitext( r ) );
      else
          r = flop( alert );
@@ Zeile 1.279: / Zeile 1.283: @@
      local r = URIutil.isHandle( attempt );
      if r then
          r = mw.text.decode( mw.text.trim( attempt ),  "PATH" );
          r = string.format( "[%s%s %s]",
@@ Zeile 1.284: / Zeile 1.290: @@
                             mw.uri.encode( r ),
                             mw.text.encode( r, "<>&%]" ) );
-         r = string.format( "<span class='uri-handle'>%s</span>",  r );
+         r = tostring( e:wikitext( r ) );
      else
          r = flop( alert );
@@ Zeile 1.326: / Zeile 1.332: @@
      r = r .. "]]";
      if lapsus then
-         r = string.format( "<span class='invalid-ISBN'>%s</span>%s",
+         local e = mw.html.create( "span" )
-                           r,  fault( "(?!?!)" ) );
+                         :addClass( "invalid-ISBN" )
          if alert then
              r = r .. flop( alert );
@@ Zeile 1.734: / Zeile 1.742: @@
      end
      if lapsus then
-         r = string.format( "<span class='invalid-ISSN'>%s</span>%s",
+         local e = mw.html.create( "span" )
-                           r,  fault( "(?!?!)" ) );
+                         :addClass( "invalid-ISSN" )
          if alert then
              r = r .. flop( alert );