1998-05-03 16:43:39 +00:00
|
|
|
/*
|
|
|
|
* BIRD Library -- IPv4 Address Manipulation Functions
|
|
|
|
*
|
|
|
|
* (c) 1998 Martin Mares <mj@ucw.cz>
|
|
|
|
*
|
|
|
|
* Can be freely distributed and used under the terms of the GNU GPL.
|
|
|
|
*/
|
|
|
|
|
1998-05-15 07:56:13 +00:00
|
|
|
#ifndef IPV6
|
|
|
|
|
1998-11-27 19:29:27 +00:00
|
|
|
#include <string.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
1998-05-03 16:43:39 +00:00
|
|
|
#include "nest/bird.h"
|
|
|
|
#include "lib/ip.h"
|
1998-06-17 14:28:46 +00:00
|
|
|
#include "lib/string.h"
|
1998-05-03 16:43:39 +00:00
|
|
|
|
|
|
|
int
|
|
|
|
ipv4_classify(u32 a)
|
|
|
|
{
|
|
|
|
u32 b = a >> 24U;
|
|
|
|
|
|
|
|
if (b && b <= 0xdf)
|
|
|
|
{
|
|
|
|
if (b == 0x7f)
|
|
|
|
return IADDR_HOST | SCOPE_HOST;
|
|
|
|
else
|
|
|
|
return IADDR_HOST | SCOPE_UNIVERSE;
|
|
|
|
}
|
|
|
|
if (b >= 0xe0 && b <= 0xef)
|
|
|
|
return IADDR_MULTICAST | SCOPE_UNIVERSE;
|
|
|
|
if (a == 0xffffffff)
|
|
|
|
return IADDR_BROADCAST | SCOPE_LINK;
|
|
|
|
return IADDR_INVALID;
|
|
|
|
}
|
1998-05-15 07:56:13 +00:00
|
|
|
|
1998-06-17 14:28:46 +00:00
|
|
|
char *
|
|
|
|
ip_ntop(ip_addr a, char *b)
|
|
|
|
{
|
|
|
|
u32 x = _I(a);
|
|
|
|
|
|
|
|
return b + bsprintf(b, "%d.%d.%d.%d",
|
|
|
|
((x >> 24) & 0xff),
|
|
|
|
((x >> 16) & 0xff),
|
|
|
|
((x >> 8) & 0xff),
|
|
|
|
(x & 0xff));
|
|
|
|
}
|
|
|
|
|
|
|
|
char *
|
|
|
|
ip_ntox(ip_addr a, char *b)
|
|
|
|
{
|
|
|
|
return b + bsprintf(b, "%08x", _I(a));
|
|
|
|
}
|
|
|
|
|
1998-07-10 08:38:29 +00:00
|
|
|
u32
|
|
|
|
ipv4_class_mask(u32 a)
|
|
|
|
{
|
|
|
|
u32 m;
|
|
|
|
|
|
|
|
if (a < 0x80000000)
|
|
|
|
m = 0xff000000;
|
|
|
|
if (a < 0xc0000000)
|
|
|
|
m = 0xffff0000;
|
|
|
|
else
|
|
|
|
m = 0xffffff00;
|
|
|
|
while (a & ~m)
|
|
|
|
m |= m >> 1;
|
|
|
|
return m;
|
|
|
|
}
|
|
|
|
|
1998-11-27 19:29:27 +00:00
|
|
|
int
|
|
|
|
ip_pton(char *a, ip_addr *o)
|
|
|
|
{
|
|
|
|
int i,j;
|
|
|
|
unsigned long int l;
|
|
|
|
u32 ia = 0;
|
|
|
|
|
|
|
|
i=4;
|
|
|
|
while (i--)
|
|
|
|
{
|
|
|
|
char *d, *c = strchr(a, '.');
|
|
|
|
if (!c != !i)
|
|
|
|
return 0;
|
|
|
|
l = strtoul(a, &d, 10);
|
1999-04-06 21:31:03 +00:00
|
|
|
if (d != c && *d || l > 255)
|
1998-11-27 19:29:27 +00:00
|
|
|
return 0;
|
|
|
|
ia = (ia << 8) | l;
|
1999-04-06 21:31:03 +00:00
|
|
|
if (c)
|
|
|
|
c++;
|
1998-11-27 19:29:27 +00:00
|
|
|
a = c;
|
|
|
|
}
|
|
|
|
*o = ipa_from_u32(ia);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
1998-05-15 07:56:13 +00:00
|
|
|
#endif
|