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
|
#include "soa.h"
#include <assert.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>
#define SEPARATORS " \t\n\v()"
int
soa_serial_increment (const char *old_soa, char *new_soa, unsigned int new_len)
{
unsigned long value;
const char *p, *beg;
char *end;
unsigned int len;
assert (old_soa);
assert (new_soa);
/* Check that we can add a digit */
len = strlen (old_soa);
assert (new_len >= len + 2);
p = old_soa;
/* Eat up space at the beginning */
while (*p && strchr (SEPARATORS, *p))
++p;
/* Skip over domain name, to next sep */
while (*p && !strchr (SEPARATORS, *p))
++p;
/* Eat up space between */
while (*p && strchr (SEPARATORS, *p))
++p;
/* Skip over administrator email, to next sep */
while (*p && !strchr (SEPARATORS, *p))
++p;
/* Eat up spaces between */
while (*p && strchr (SEPARATORS, *p))
++p;
if (*p == 0 || !isdigit (*p)) {
errno = EINVAL;
return -1;
}
/* Parse the integer here */
beg = p;
value = strtoul (beg, &end, 10);
if (beg == end || !strchr (SEPARATORS, *end)) {
errno = EINVAL;
return -1;
}
/* Increment the integer appropriately */
if (value == 0xFFFFFFFF)
value = 1; /* Zero is recommended against in RFC 1982 */
else
++value;
/* Build up the new SOA */
memset (new_soa, 0, new_len);
len = beg - old_soa;
strncpy (new_soa, old_soa, len);
snprintf (new_soa + len, 32, "%lu", value);
len = strlen (new_soa);
strcpy (new_soa + len, end);
len = strlen (new_soa);
assert (len < new_len);
return len;
}
|