forked from abh/djbdns
-
Notifications
You must be signed in to change notification settings - Fork 1
/
ip6_scan.c
115 lines (108 loc) · 2.29 KB
/
ip6_scan.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
#include "scan.h"
#include "ip4.h"
#include "ip6.h"
#include "byte.h"
/*
* IPv6 addresses are really ugly to parse.
* Syntax: (h = hex digit)
* 1. hhhh:hhhh:hhhh:hhhh:hhhh:hhhh:hhhh:hhhh
* 2. any number of 0000 may be abbreviated as "::", but only once
* 3. The last two words may be written as IPv4 address
*/
unsigned int ip6_scan(const char *s,char ip[16])
{
unsigned int i;
unsigned int len=0;
unsigned long u;
char suffix[16];
int prefixlen=0;
int suffixlen=0;
if ((i=ip4_scan(s,ip+12))) {
const char *c=V4mappedprefix;
if (byte_equal(ip+12,4,V6any)) c=V6any;
for (len=0; len<12; ++len) ip[len]=c[len];
return i;
}
for (i=0; i<16; i++) ip[i]=0;
for (;;) {
if (*s == ':') {
len++;
if (s[1] == ':') { /* Found "::", skip to part 2 */
s+=2;
len++;
break;
}
s++;
}
i = scan_xlong(s,&u);
if (!i) return 0;
if (prefixlen==12 && s[i]=='.') {
/* the last 4 bytes may be written as IPv4 address */
i=ip4_scan(s,ip+12);
if (i)
return i+len;
else
return 0;
}
ip[prefixlen++] = (u >> 8);
ip[prefixlen++] = (u & 255);
s += i; len += i;
if (prefixlen==16)
return len;
}
/* part 2, after "::" */
for (;;) {
if (*s == ':') {
if (suffixlen==0)
break;
s++;
len++;
} else if (suffixlen!=0)
break;
i = scan_xlong(s,&u);
if (!i) {
len--;
break;
}
if (suffixlen+prefixlen<=12 && s[i]=='.') {
int j=ip4_scan(s,suffix+suffixlen);
if (j) {
suffixlen+=4;
len+=j;
break;
} else
prefixlen=12-suffixlen; /* make end-of-loop test true */
}
suffix[suffixlen++] = (u >> 8);
suffix[suffixlen++] = (u & 255);
s += i; len += i;
if (prefixlen+suffixlen==16)
break;
}
for (i=0; i<suffixlen; i++)
ip[16-suffixlen+i] = suffix[i];
return len;
}
static long int fromhex(unsigned char c) {
if (c>='0' && c<='9')
return c-'0';
else if (c>='A' && c<='F')
return c-'A'+10;
else if (c>='a' && c<='f')
return c-'a'+10;
return -1;
}
unsigned int ip6_scan_flat(const char *s,char ip[16])
{
int i;
for (i=0; i<16; i++) {
int tmp;
tmp=fromhex(*s++);
if (tmp<0) return 0;
ip[i]=tmp << 4;
tmp=fromhex(*s++);
if (tmp<0) return 0;
ip[i]+=tmp;
}
return 32;
}