/*
* PostgreSQL type definitions for MAC addresses.
*
- * $Id: mac.c,v 1.6 1998/10/26 01:01:36 tgl Exp $
+ * $Id: mac.c,v 1.7 1999/03/22 05:00:57 momjian Exp $
*/
#include <stdio.h>
if (strlen(str) > 0)
{
-
count = sscanf(str, "%x:%x:%x:%x:%x:%x", &a, &b, &c, &d, &e, &f);
if (count != 6)
count = sscanf(str, "%x-%x-%x-%x-%x-%x", &a, &b, &c, &d, &e, &f);
count = sscanf(str, "%2x%2x.%2x%2x.%2x%2x", &a, &b, &c, &d, &e, &f);
if (count != 6)
- {
elog(ERROR, "macaddr_in: error in parsing \"%s\"", str);
- return (NULL);
- }
if ((a < 0) || (a > 255) || (b < 0) || (b > 255) ||
(c < 0) || (c > 255) || (d < 0) || (d > 255) ||
(e < 0) || (e > 255) || (f < 0) || (f > 255))
- {
elog(ERROR, "macaddr_in: illegal address \"%s\"", str);
- return (NULL);
- }
}
else
{
bool
macaddr_lt(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) < hibits(a2)) ||
((hibits(a1) == hibits(a2)) && lobits(a1) < lobits(a2)));
}
bool
macaddr_le(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) < hibits(a2)) ||
((hibits(a1) == hibits(a2)) && lobits(a1) <= lobits(a2)));
}
bool
macaddr_eq(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) == hibits(a2)) && (lobits(a1) == lobits(a2)));
}
bool
macaddr_ge(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) > hibits(a2)) ||
((hibits(a1) == hibits(a2)) && lobits(a1) >= lobits(a2)));
}
bool
macaddr_gt(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) > hibits(a2)) ||
((hibits(a1) == hibits(a2)) && lobits(a1) > lobits(a2)));
}
bool
macaddr_ne(macaddr *a1, macaddr *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return ((hibits(a1) != hibits(a2)) || (lobits(a1) != lobits(a2)));
}
int length;
text *result;
+ if (!PointerIsValid(addr))
+ return NULL;
+
for (manuf = manufacturers; manuf->name != NULL; manuf++)
{
if ((manuf->a == addr->a) &&
* is for IP V4 CIDR notation, but prepared for V6: just
* add the necessary bits where the comments indicate.
*
- * $Id: network.c,v 1.6 1999/02/24 03:17:05 momjian Exp $
+ * $Id: network.c,v 1.7 1999/03/22 05:00:57 momjian Exp $
* Jon Postel RIP 16 Oct 1998
*/
int bits;
inet *dst;
+ if (!src)
+ return NULL;
+
dst = palloc(VARHDRSZ + sizeof(inet_struct));
if (dst == NULL)
- {
elog(ERROR, "unable to allocate memory in network_in()");
- return NULL;
- }
+
/* First, try for an IP V4 address: */
ip_family(dst) = AF_INET;
bits = inet_net_pton(ip_family(dst), src, &ip_v4addr(dst),
type ? ip_addrsize(dst) : -1);
if ((bits < 0) || (bits > 32))
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "could not parse \"%s\"", src);
- pfree(dst);
- return NULL;
- }
+
VARSIZE(dst) = VARHDRSZ
+ ((char *) &ip_v4addr(dst) - (char *) VARDATA(dst))
+ ip_addrsize(dst);
tmp, sizeof(tmp));
if (dst == NULL)
- {
elog(ERROR, "unable to print address (%s)", strerror(errno));
- return (NULL);
- }
}
else
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "unknown address family (%d)", ip_family(src));
- return NULL;
- }
+
dst = palloc(strlen(tmp) + 1);
if (dst == NULL)
- {
elog(ERROR, "unable to allocate memory in inet_out()");
- return NULL;
- }
+
strcpy(dst, tmp);
return dst;
}
bool
network_lt(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
int order = v4bitncmp(ip_v4addr(a1), ip_v4addr(a2), ip_bits(a2));
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_le(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return (network_lt(a1, a2) || network_eq(a1, a2));
}
bool
network_eq(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
return ((ip_bits(a1) == ip_bits(a2))
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_ge(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return (network_gt(a1, a2) || network_eq(a1, a2));
}
bool
network_gt(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
int order = v4bitncmp(ip_v4addr(a1), ip_v4addr(a2), ip_bits(a2));
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_ne(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return FALSE;
return (!network_eq(a1, a2));
}
bool
network_sub(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return NULL;
+
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
return ((ip_bits(a1) > ip_bits(a2))
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_subeq(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return NULL;
+
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
return ((ip_bits(a1) >= ip_bits(a2))
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_sup(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return NULL;
+
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
return ((ip_bits(a1) < ip_bits(a2))
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
bool
network_supeq(inet *a1, inet *a2)
{
+ if (!PointerIsValid(a1) || !PointerIsValid(a2))
+ return NULL;
+
if ((ip_family(a1) == AF_INET) && (ip_family(a2) == AF_INET))
{
return ((ip_bits(a1) <= ip_bits(a2))
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "cannot compare address families %d and %d",
ip_family(a1), ip_family(a2));
- return (FALSE);
+ return FALSE;
}
}
char *ptr,
tmp[sizeof("255.255.255.255/32")];
+ if (!PointerIsValid(ip))
+ return NULL;
+
if (ip_type(ip))
- {
elog(ERROR, "CIDR type has no host part");
- return NULL;
- }
if (ip_family(ip) == AF_INET)
{
/* It's an IP V4 address: */
if (inet_net_ntop(AF_INET, &ip_v4addr(ip), 32, tmp, sizeof(tmp)) == NULL)
- {
elog(ERROR, "unable to print host (%s)", strerror(errno));
- return (NULL);
- }
}
else
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "unknown address family (%d)", ip_family(ip));
- return (NULL);
- }
+
if ((ptr = strchr(tmp, '/')) != NULL)
*ptr = 0;
len = VARHDRSZ + strlen(tmp) + 1;
ret = palloc(len);
if (ret == NULL)
- {
elog(ERROR, "unable to allocate memory in network_host()");
- return (NULL);
- }
+
VARSIZE(ret) = len;
strcpy(VARDATA(ret), tmp);
return (ret);
int4
network_masklen(inet *ip)
{
+ if (!PointerIsValid(ip))
+ return 0;
+
return ip_bits(ip);
}
char *ptr,
tmp[sizeof("255.255.255.255/32")];
+ if (!PointerIsValid(ip))
+ return NULL;
+
if (ip_family(ip) == AF_INET)
{
/* It's an IP V4 address: */
addr = htonl(ntohl(ip_v4addr(ip)) | mask);
if (inet_net_ntop(AF_INET, &addr, 32, tmp, sizeof(tmp)) == NULL)
- {
elog(ERROR, "unable to print address (%s)", strerror(errno));
- return (NULL);
- }
+
}
else
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "unknown address family (%d)", ip_family(ip));
- return (NULL);
- }
+
if ((ptr = strchr(tmp, '/')) != NULL)
*ptr = 0;
len = VARHDRSZ + strlen(tmp) + 1;
ret = palloc(len);
if (ret == NULL)
- {
elog(ERROR, "unable to allocate memory in network_broadcast()");
- return (NULL);
- }
+
VARSIZE(ret) = len;
strcpy(VARDATA(ret), tmp);
return (ret);
int len;
char tmp[sizeof("255.255.255.255/32")];
+ if (!PointerIsValid(ip))
+ return NULL;
+
if (ip_family(ip) == AF_INET)
{
/* It's an IP V4 address: */
int addr = htonl(ntohl(ip_v4addr(ip)) & (0xffffffff << (32 - ip_bits(ip))));
if (inet_cidr_ntop(AF_INET, &addr, ip_bits(ip), tmp, sizeof(tmp)) == NULL)
- {
elog(ERROR, "unable to print network (%s)", strerror(errno));
- return (NULL);
- }
+
}
else
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "unknown address family (%d)", ip_family(ip));
- return (NULL);
- }
+
len = VARHDRSZ + strlen(tmp) + 1;
ret = palloc(len);
if (ret == NULL)
- {
elog(ERROR, "unable to allocate memory in network_network()");
- return (NULL);
- }
+
VARSIZE(ret) = len;
strcpy(VARDATA(ret), tmp);
return (ret);
char *ptr,
tmp[sizeof("255.255.255.255/32")];
+ if (!PointerIsValid(ip))
+ return NULL;
+
if (ip_family(ip) == AF_INET)
{
/* It's an IP V4 address: */
int addr = htonl((-1 << (32 - ip_bits(ip))) & 0xffffffff);
if (inet_net_ntop(AF_INET, &addr, 32, tmp, sizeof(tmp)) == NULL)
- {
elog(ERROR, "unable to print netmask (%s)", strerror(errno));
- return (NULL);
- }
+
}
else
- {
/* Go for an IPV6 address here, before faulting out: */
elog(ERROR, "unknown address family (%d)", ip_family(ip));
- return (NULL);
- }
+
if ((ptr = strchr(tmp, '/')) != NULL)
*ptr = 0;
len = VARHDRSZ + strlen(tmp) + 1;
ret = palloc(len);
if (ret == NULL)
- {
elog(ERROR, "unable to allocate memory in network_netmask()");
- return (NULL);
- }
+
VARSIZE(ret) = len;
strcpy(VARDATA(ret), tmp);
return (ret);