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
117
118
119
|
/*
* Copyright (C) Internet Systems Consortium, Inc. ("ISC")
*
* SPDX-License-Identifier: MPL-2.0 AND ISC
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, you can obtain one at https://mozilla.org/MPL/2.0/.
*
* See the COPYRIGHT file distributed with this work for additional
* information regarding copyright ownership.
*/
/*
* Copyright (C) 2001 Nominum, Inc.
*
* Permission to use, copy, modify, and/or 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 AND NOMINUM 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.
*/
#pragma once
/*! \file isccc/sexpr.h */
#include <stdbool.h>
#include <stdio.h>
#include <isc/lang.h>
#include <isccc/types.h>
ISC_LANG_BEGINDECLS
/*% dotted pair structure */
struct isccc_dottedpair {
isccc_sexpr_t *car;
isccc_sexpr_t *cdr;
};
/*% iscc_sexpr structure */
struct isccc_sexpr {
unsigned int type;
union {
char *as_string;
isccc_dottedpair_t as_dottedpair;
isccc_region_t as_region;
} value;
};
#define ISCCC_SEXPRTYPE_NONE 0x00 /*%< Illegal. */
#define ISCCC_SEXPRTYPE_T 0x01
#define ISCCC_SEXPRTYPE_STRING 0x02
#define ISCCC_SEXPRTYPE_DOTTEDPAIR 0x03
#define ISCCC_SEXPRTYPE_BINARY 0x04
#define ISCCC_SEXPR_CAR(s) (s)->value.as_dottedpair.car
#define ISCCC_SEXPR_CDR(s) (s)->value.as_dottedpair.cdr
isccc_sexpr_t *
isccc_sexpr_cons(isccc_sexpr_t *car, isccc_sexpr_t *cdr);
isccc_sexpr_t *
isccc_sexpr_tconst(void);
isccc_sexpr_t *
isccc_sexpr_fromstring(const char *str);
isccc_sexpr_t *
isccc_sexpr_frombinary(const isccc_region_t *region);
void
isccc_sexpr_free(isccc_sexpr_t **sexprp);
void
isccc_sexpr_print(isccc_sexpr_t *sexpr, FILE *stream);
isccc_sexpr_t *
isccc_sexpr_car(isccc_sexpr_t *list);
isccc_sexpr_t *
isccc_sexpr_cdr(isccc_sexpr_t *list);
void
isccc_sexpr_setcar(isccc_sexpr_t *pair, isccc_sexpr_t *car);
void
isccc_sexpr_setcdr(isccc_sexpr_t *pair, isccc_sexpr_t *cdr);
isccc_sexpr_t *
isccc_sexpr_addtolist(isccc_sexpr_t **l1p, isccc_sexpr_t *l2);
bool
isccc_sexpr_listp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_emptyp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_stringp(isccc_sexpr_t *sexpr);
bool
isccc_sexpr_binaryp(isccc_sexpr_t *sexpr);
char *
isccc_sexpr_tostring(isccc_sexpr_t *sexpr);
isccc_region_t *
isccc_sexpr_tobinary(isccc_sexpr_t *sexpr);
ISC_LANG_ENDDECLS
|
