1998-01-25 08:11:07 +01:00
|
|
|
--
|
|
|
|
-- PostgreSQL code for IP addresses.
|
|
|
|
--
|
1998-02-14 18:58:09 +01:00
|
|
|
-- $Id: ip.sql,v 1.2 1998/02/14 17:58:04 scrappy Exp $
|
|
|
|
--
|
1998-01-25 08:11:07 +01:00
|
|
|
|
|
|
|
load '/usr/local/pgsql/modules/ip.so';
|
|
|
|
|
|
|
|
--
|
|
|
|
-- Input and output functions and the type itself:
|
|
|
|
--
|
|
|
|
|
|
|
|
create function ipaddr_in(opaque)
|
|
|
|
returns opaque
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_out(opaque)
|
|
|
|
returns opaque
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create type ipaddr (
|
1998-02-14 18:58:09 +01:00
|
|
|
internallength = 6,
|
1998-01-25 08:11:07 +01:00
|
|
|
externallength = variable,
|
|
|
|
input = ipaddr_in,
|
|
|
|
output = ipaddr_out
|
|
|
|
);
|
|
|
|
|
|
|
|
--
|
|
|
|
-- The various boolean tests:
|
|
|
|
--
|
|
|
|
|
|
|
|
create function ipaddr_lt(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_le(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_eq(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_ge(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_gt(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_ne(ipaddr, ipaddr)
|
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
1998-02-14 18:58:09 +01:00
|
|
|
create function ipaddr_in_net(ipaddr, ipaddr)
|
1998-01-25 08:11:07 +01:00
|
|
|
returns bool
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
1998-02-14 18:58:09 +01:00
|
|
|
create function ipaddr_mask(ipaddr)
|
|
|
|
returns ipaddr
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
|
|
|
create function ipaddr_bcast(ipaddr)
|
|
|
|
returns ipaddr
|
|
|
|
as '/usr/local/pgsql/modules/ip.so'
|
|
|
|
language 'c';
|
|
|
|
|
1998-01-25 08:11:07 +01:00
|
|
|
--
|
|
|
|
-- Now the operators. Note how some of the parameters to some
|
|
|
|
-- of the 'create operator' commands are commented out. This
|
|
|
|
-- is because they reference as yet undefined operators, and
|
|
|
|
-- will be implicitly defined when those are, further down.
|
|
|
|
--
|
|
|
|
|
1998-02-14 18:58:09 +01:00
|
|
|
create operator < (
|
1998-01-25 08:11:07 +01:00
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
1998-02-14 18:58:09 +01:00
|
|
|
-- negator = >=,
|
|
|
|
procedure = ipaddr_lt
|
1998-01-25 08:11:07 +01:00
|
|
|
);
|
|
|
|
|
1998-02-14 18:58:09 +01:00
|
|
|
create operator <= (
|
1998-01-25 08:11:07 +01:00
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
1998-02-14 18:58:09 +01:00
|
|
|
-- negator = >,
|
|
|
|
procedure = ipaddr_le
|
1998-01-25 08:11:07 +01:00
|
|
|
);
|
|
|
|
|
|
|
|
create operator = (
|
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
|
|
|
commutator = =,
|
|
|
|
-- negator = <>,
|
|
|
|
procedure = ipaddr_eq
|
|
|
|
);
|
|
|
|
|
|
|
|
create operator >= (
|
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
|
|
|
negator = <,
|
|
|
|
procedure = ipaddr_ge
|
|
|
|
);
|
|
|
|
|
|
|
|
create operator > (
|
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
|
|
|
negator = <=,
|
|
|
|
procedure = ipaddr_gt
|
|
|
|
);
|
|
|
|
|
|
|
|
create operator <> (
|
|
|
|
leftarg = ipaddr,
|
|
|
|
rightarg = ipaddr,
|
|
|
|
negator = =,
|
|
|
|
procedure = ipaddr_ne
|
|
|
|
);
|
|
|
|
|
|
|
|
--
|
|
|
|
-- eof
|
|
|
|
--
|