Modulo:IPAddress
Dokumentasion ti modulo
Functions are not "local", so other modules can require this module and call them directly.We return an object with 3 small stub functions to call the real ones so that the functionscan be called from templates also.
Only dotted decimal notation for IPv4 supported. Does not supportdotted hexadecimal, dotted octal, or single-number formats (see en:IPv4#Address_representations).
Unit tests at en:Module:IPAddress/testcases
local p = {}function p._isIpV6(s)local dcolon, groupsif type(s) ~= "string"or s:len() == 0or s:find("[^:%x]") -- only colon and hex digits are legal charsor s:find("^:[^:]") -- can begin or end with :: but not with single :or s:find("[^:]:$")or s:find(":::")thenreturn falseends, dcolon = s:gsub("::", ":")if dcolon > 1 then return false end -- at most one ::s = s:gsub("^:?", ":") -- prepend : if needed, uppers, groups = s:gsub(":%x%x?%x?%x?", "") -- remove valid groups, and count themreturn ( (dcolon == 1 and groups < 8) or (dcolon == 0 and groups == 8) )and ( s:len() == 0 or (dcolon == 1 and s == ":") ) -- might be one dangling : if original ended with ::endfunction p._isIpV4(s)local function legal(n) return (tonumber(n) or 256) < 256 and not n:match("^0%d") endif type(s) ~= "string" then return false endlocal p1, p2, p3, p4 = s:match("^(%d+)%.(%d+)%.(%d+)%.(%d+)$")return legal(p1) and legal(p2) and legal(p3) and legal(p4)endfunction p._isIp(s)return p._isIpV4(s) and "4" or p._isIpV6(s) and "6"endfunction p._isIpOrRange(s)local modip = require('Modulo:IP')local success, ip = pcall(modip.IPAddress.new, s)if success thenreturn 'ip'endsuccess, ip = pcall(modip.Subnet.new, s)if success thenreturn 'range'endreturn ''endlocal function input(frame)-- Return input parameter after replacing any of following directional markers.-- LRM : LEFT-TO-RIGHT MARK (U+200E) : hex e2 80 8e = 226 128 142-- LRE : LEFT-TO-RIGHT EMBEDDING (U+202A) : hex e2 80 aa = 226 128 170-- PDF : POP DIRECTIONAL FORMATTING (U+202C) : hex e2 80 ac = 226 128 172-- This is required for MediaWiki:Blockedtext message.return (frame.args[1] or ''):gsub('\226\128[\142\170\172]', ' ') -- replace LRM, LRE, PDF with space delimiterendfunction p.isIpV6(frame) return p._isIpV6(input(frame)) and "1" or "0" endfunction p.isIpV4(frame) return p._isIpV4(input(frame)) and "1" or "0" endfunction p.isIp(frame) return p._isIp(input(frame)) or "" endfunction p.isIpOrRange(frame)-- {{#invoke:IPAddress|isIpOrRange|x}} → 'ip' (IPv4/IPv6) or 'range' (CIDR IPv4/IPv6) or '' (invalid)return p._isIpOrRange(input(frame))endreturn p
🔥 Top keywords: Umuna a PanidMaikadua a Sangalubongan a GubatWikipedia:MaipanggepWikipedia:Sapasap a renunsiaTulong:Dagiti linaonWikipediaWikipedia:Dap-ayanWikipedia:Portal ti komunidadEspesial:RecentChangesEspesial:SearchPasismoTulong:KategoriaNagkaykaysa a PagarianAustraliaTheodore RooseveltEtikaPagsasao nga IlokanoWayback MachinePanagpapada ti Sangalubongan nga OrasEstados Unidos iti AmerikaSeptiembreEspesial:MyTalkPapeles:Flag of Andes (Antioquia).svgFilipinasEuropaSeptiembre 2Espesial:MyContributionsKategoria:Amin a pungol nga artikulo1992Kategoria:PoloniaWikipedia:Annuroten ti nagan ti agar-aramatDagiti KrusadaBlogAlemaniaKategoria:Dagiti artikulo nga agraman kadagiti panangilasin ti ULANOras a panagin-inut ti lawagBertebrataPagsurotan ti estadistika a panakaiwarasKategoria:Salisal