1998-05-04 00:43:39 +08: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-11-28 03:29:27 +08:00
|
|
|
#include <string.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
1998-05-04 00:43:39 +08:00
|
|
|
#include "nest/bird.h"
|
|
|
|
#include "lib/ip.h"
|
1998-06-17 22:28:46 +08:00
|
|
|
#include "lib/string.h"
|
1998-05-04 00:43:39 +08:00
|
|
|
|
|
|
|
int
|
|
|
|
ipv4_classify(u32 a)
|
|
|
|
{
|
|
|
|
u32 b = a >> 24U;
|
|
|
|
|
|
|
|
if (b && b <= 0xdf)
|
|
|
|
{
|
|
|
|
if (b == 0x7f)
|
|
|
|
return IADDR_HOST | SCOPE_HOST;
|
1999-04-28 00:03:17 +08:00
|
|
|
else if (b == 0x0a ||
|
|
|
|
(a & 0xffff0000) == 0xc0a80000 ||
|
|
|
|
(a & 0xfff00000) == 0xac100000)
|
|
|
|
return IADDR_HOST | SCOPE_SITE;
|
1998-05-04 00:43:39 +08:00
|
|
|
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 15:56:13 +08:00
|
|
|
|
1998-06-17 22:28:46 +08: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 16:38:29 +08: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-28 03:29:27 +08: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-07 05:31:03 +08:00
|
|
|
if (d != c && *d || l > 255)
|
1998-11-28 03:29:27 +08:00
|
|
|
return 0;
|
|
|
|
ia = (ia << 8) | l;
|
1999-04-07 05:31:03 +08:00
|
|
|
if (c)
|
|
|
|
c++;
|
1998-11-28 03:29:27 +08:00
|
|
|
a = c;
|
|
|
|
}
|
|
|
|
*o = ipa_from_u32(ia);
|
|
|
|
return 1;
|
|
|
|
}
|
1999-05-15 02:03:09 +08:00
|
|
|
|
|
|
|
byte *
|
|
|
|
ipv4_skip_header(byte *pkt, int *len)
|
|
|
|
{
|
|
|
|
int l = *len;
|
|
|
|
int q;
|
|
|
|
|
|
|
|
if (l < 20 || (*pkt & 0xf0) != 0x40)
|
|
|
|
return NULL;
|
|
|
|
q = (*pkt & 0x0f) * 4;
|
1999-05-25 01:37:45 +08:00
|
|
|
if (q > l)
|
1999-05-15 02:03:09 +08:00
|
|
|
return NULL;
|
|
|
|
*len -= q;
|
|
|
|
return pkt + q;
|
|
|
|
}
|