Anonymous user
Module:IP: Difference between revisions
From the Croc Wiki, the Croc encyclopedia
Jump to navigationJump to search
need to use __index to have a unique key which is really private - if outside code gets uniqueKey with getmetatable then they can set it in another table's __eq metamethod, thus foiling isSubnetObject
(add __concat metamethod for Subnet) |
(need to use __index to have a unique key which is really private - if outside code gets uniqueKey with getmetatable then they can set it in another table's __eq metamethod, thus foiling isSubnetObject) |
||
| (4 intermediate revisions by 2 users not shown) | |||
Line 488:
-- uniqueKey is a unique, private key used to test whether a given object
-- is a Subnet object.
local uniqueKey = setmetatable({}, {__metatable = false})
__eq = function (self, obj)▼
return self:getCIDR() == obj:getCIDR()▼
end,▼
return tostring(self) .. tostring(obj)▼
end,▼
__tostring = function (self)▼
return self:getCIDR()▼
end,▼
__metatable = uniqueKey▼
-- Private static methods
Line 516 ⟶ 502:
-- arg - the argument to be validated
validateSubnet = makeValidationFunction('Subnet', isSubnetObject)
-- Metamethods that don't need upvalues
local function subnetEquals(subnet1, subnet2)
end
local function concatenateSubnets(subnet1, subnet2)
end
local function subnetToString(subnet)
end
-- Constructors
makeSubnetFromRaw = function (rawIP, bitLength)
-- Set up structure
local obj =
local data = {
rawIP = rawIP,
Line 602 ⟶ 601:
function obj:overlapsSubnet(subnet)
checkSelf(self, 'overlapsSubnet')
local tp = type(subnet)
if tp == 'string' then
subnet = makeSubnet(subnet)
elseif tp == 'table' then
validateSubnet('overlapsSubnet', 1, subnet)
else
checkTypeMulti('overlapsSubnet', 1, subnet, {'string', 'table'})
if self:getVersion() == subnet:getVersion() then
return (
Line 628 ⟶ 635:
end
return setmetatable(obj, {
if key == uniqueKey then
return true
▲ end,
__eq = subnetEquals,
__concat = concatenateSubnets,
})
end
| |||
