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
116
|
/*
* Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
* Copyright (c) 2001 by Internet Software Consortium.
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
* OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#include <port_before.h>
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <isc/misc.h>
#include <port_after.h>
static const char hex[17] = "0123456789abcdef";
int
isc_gethexstring(unsigned char *buf, size_t len, int count, FILE *fp,
int *multiline)
{
int c, n;
unsigned char x;
char *s;
int result = count;
x = 0; /* silence compiler */
n = 0;
while (count > 0) {
c = fgetc(fp);
if ((c == EOF) ||
(c == '\n' && !*multiline) ||
(c == '(' && *multiline) ||
(c == ')' && !*multiline))
goto formerr;
/* comment */
if (c == ';') {
while ((c = fgetc(fp)) != EOF && c != '\n')
/* empty */
if (c == '\n' && *multiline)
continue;
goto formerr;
}
/* white space */
if (c == ' ' || c == '\t' || c == '\n' || c == '\r')
continue;
/* multiline */
if ('(' == c || c == ')') {
*multiline = (c == '(' /*)*/);
continue;
}
if ((s = strchr(hex, tolower(c))) == NULL)
goto formerr;
x = (x<<4) | (s - hex);
if (++n == 2) {
if (len > 0U) {
*buf++ = x;
len--;
} else
result = -1;
count--;
n = 0;
}
}
return (result);
formerr:
if (c == '\n')
ungetc(c, fp);
return (-1);
}
void
isc_puthexstring(FILE *fp, const unsigned char *buf, size_t buflen,
size_t len1, size_t len2, const char *sep)
{
size_t i = 0;
if (len1 < 4U)
len1 = 4;
if (len2 < 4U)
len2 = 4;
while (buflen > 0U) {
fputc(hex[(buf[0]>>4)&0xf], fp);
fputc(hex[buf[0]&0xf], fp);
i += 2;
buflen--;
buf++;
if (i >= len1 && sep != NULL) {
fputs(sep, fp);
i = 0;
len1 = len2;
}
}
}
void
isc_tohex(const unsigned char *buf, size_t buflen, char *t) {
while (buflen > 0U) {
*t++ = hex[(buf[0]>>4)&0xf];
*t++ = hex[buf[0]&0xf];
buf++;
buflen--;
}
*t = '\0';
}
|
