/contrib/bind9/lib/dns/rdata/in_1/apl_42.c
https://bitbucket.org/freebsd/freebsd-head/ · C · 458 lines · 338 code · 75 blank · 45 comment · 111 complexity · f7bf47eb191a20cecbac800be17769c8 MD5 · raw file
- /*
- * Copyright (C) 2004, 2005, 2007-2009 Internet Systems Consortium, Inc. ("ISC")
- * Copyright (C) 2002 Internet Software Consortium.
- *
- * 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 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.
- */
- /* $Id: apl_42.c,v 1.16 2009/12/04 22:06:37 tbox Exp $ */
- /* RFC3123 */
- #ifndef RDATA_IN_1_APL_42_C
- #define RDATA_IN_1_APL_42_C
- #define RRTYPE_APL_ATTRIBUTES (0)
- static inline isc_result_t
- fromtext_in_apl(ARGS_FROMTEXT) {
- isc_token_t token;
- unsigned char addr[16];
- unsigned long afi;
- isc_uint8_t prefix;
- isc_uint8_t len;
- isc_boolean_t neg;
- char *cp, *ap, *slash;
- int n;
- REQUIRE(type == 42);
- REQUIRE(rdclass == 1);
- UNUSED(type);
- UNUSED(rdclass);
- UNUSED(origin);
- UNUSED(options);
- UNUSED(callbacks);
- do {
- RETERR(isc_lex_getmastertoken(lexer, &token,
- isc_tokentype_string, ISC_TRUE));
- if (token.type != isc_tokentype_string)
- break;
- cp = DNS_AS_STR(token);
- neg = ISC_TF(*cp == '!');
- if (neg)
- cp++;
- afi = strtoul(cp, &ap, 10);
- if (*ap++ != ':' || cp == ap)
- RETTOK(DNS_R_SYNTAX);
- if (afi > 0xffffU)
- RETTOK(ISC_R_RANGE);
- slash = strchr(ap, '/');
- if (slash == NULL || slash == ap)
- RETTOK(DNS_R_SYNTAX);
- RETTOK(isc_parse_uint8(&prefix, slash + 1, 10));
- switch (afi) {
- case 1:
- *slash = '\0';
- n = inet_pton(AF_INET, ap, addr);
- *slash = '/';
- if (n != 1)
- RETTOK(DNS_R_BADDOTTEDQUAD);
- if (prefix > 32)
- RETTOK(ISC_R_RANGE);
- for (len = 4; len > 0; len--)
- if (addr[len - 1] != 0)
- break;
- break;
- case 2:
- *slash = '\0';
- n = inet_pton(AF_INET6, ap, addr);
- *slash = '/';
- if (n != 1)
- RETTOK(DNS_R_BADAAAA);
- if (prefix > 128)
- RETTOK(ISC_R_RANGE);
- for (len = 16; len > 0; len--)
- if (addr[len - 1] != 0)
- break;
- break;
- default:
- RETTOK(ISC_R_NOTIMPLEMENTED);
- }
- RETERR(uint16_tobuffer(afi, target));
- RETERR(uint8_tobuffer(prefix, target));
- RETERR(uint8_tobuffer(len | ((neg) ? 0x80 : 0), target));
- RETERR(mem_tobuffer(target, addr, len));
- } while (1);
- /*
- * Let upper layer handle eol/eof.
- */
- isc_lex_ungettoken(lexer, &token);
- return (ISC_R_SUCCESS);
- }
- static inline isc_result_t
- totext_in_apl(ARGS_TOTEXT) {
- isc_region_t sr;
- isc_region_t ir;
- isc_uint16_t afi;
- isc_uint8_t prefix;
- isc_uint8_t len;
- isc_boolean_t neg;
- unsigned char buf[16];
- char txt[sizeof(" !64000")];
- const char *sep = "";
- int n;
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- UNUSED(tctx);
- dns_rdata_toregion(rdata, &sr);
- ir.base = buf;
- ir.length = sizeof(buf);
- while (sr.length > 0) {
- INSIST(sr.length >= 4);
- afi = uint16_fromregion(&sr);
- isc_region_consume(&sr, 2);
- prefix = *sr.base;
- isc_region_consume(&sr, 1);
- len = (*sr.base & 0x7f);
- neg = ISC_TF((*sr.base & 0x80) != 0);
- isc_region_consume(&sr, 1);
- INSIST(len <= sr.length);
- n = snprintf(txt, sizeof(txt), "%s%s%u:", sep,
- neg ? "!": "", afi);
- INSIST(n < (int)sizeof(txt));
- RETERR(str_totext(txt, target));
- switch (afi) {
- case 1:
- INSIST(len <= 4);
- INSIST(prefix <= 32);
- memset(buf, 0, sizeof(buf));
- memcpy(buf, sr.base, len);
- RETERR(inet_totext(AF_INET, &ir, target));
- break;
- case 2:
- INSIST(len <= 16);
- INSIST(prefix <= 128);
- memset(buf, 0, sizeof(buf));
- memcpy(buf, sr.base, len);
- RETERR(inet_totext(AF_INET6, &ir, target));
- break;
- default:
- return (ISC_R_NOTIMPLEMENTED);
- }
- n = snprintf(txt, sizeof(txt), "/%u", prefix);
- INSIST(n < (int)sizeof(txt));
- RETERR(str_totext(txt, target));
- isc_region_consume(&sr, len);
- sep = " ";
- }
- return (ISC_R_SUCCESS);
- }
- static inline isc_result_t
- fromwire_in_apl(ARGS_FROMWIRE) {
- isc_region_t sr, sr2;
- isc_region_t tr;
- isc_uint16_t afi;
- isc_uint8_t prefix;
- isc_uint8_t len;
- REQUIRE(type == 42);
- REQUIRE(rdclass == 1);
- UNUSED(type);
- UNUSED(dctx);
- UNUSED(rdclass);
- UNUSED(options);
- isc_buffer_activeregion(source, &sr);
- isc_buffer_availableregion(target, &tr);
- if (sr.length > tr.length)
- return (ISC_R_NOSPACE);
- sr2 = sr;
- /* Zero or more items */
- while (sr.length > 0) {
- if (sr.length < 4)
- return (ISC_R_UNEXPECTEDEND);
- afi = uint16_fromregion(&sr);
- isc_region_consume(&sr, 2);
- prefix = *sr.base;
- isc_region_consume(&sr, 1);
- len = (*sr.base & 0x7f);
- isc_region_consume(&sr, 1);
- if (len > sr.length)
- return (ISC_R_UNEXPECTEDEND);
- switch (afi) {
- case 1:
- if (prefix > 32 || len > 4)
- return (ISC_R_RANGE);
- break;
- case 2:
- if (prefix > 128 || len > 16)
- return (ISC_R_RANGE);
- }
- if (len > 0 && sr.base[len - 1] == 0)
- return (DNS_R_FORMERR);
- isc_region_consume(&sr, len);
- }
- isc_buffer_forward(source, sr2.length);
- return (mem_tobuffer(target, sr2.base, sr2.length));
- }
- static inline isc_result_t
- towire_in_apl(ARGS_TOWIRE) {
- UNUSED(cctx);
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- return (mem_tobuffer(target, rdata->data, rdata->length));
- }
- static inline int
- compare_in_apl(ARGS_COMPARE) {
- isc_region_t r1;
- isc_region_t r2;
- REQUIRE(rdata1->type == rdata2->type);
- REQUIRE(rdata1->rdclass == rdata2->rdclass);
- REQUIRE(rdata1->type == 42);
- REQUIRE(rdata1->rdclass == 1);
- dns_rdata_toregion(rdata1, &r1);
- dns_rdata_toregion(rdata2, &r2);
- return (isc_region_compare(&r1, &r2));
- }
- static inline isc_result_t
- fromstruct_in_apl(ARGS_FROMSTRUCT) {
- dns_rdata_in_apl_t *apl = source;
- isc_buffer_t b;
- REQUIRE(type == 42);
- REQUIRE(rdclass == 1);
- REQUIRE(source != NULL);
- REQUIRE(apl->common.rdtype == type);
- REQUIRE(apl->common.rdclass == rdclass);
- REQUIRE(apl->apl != NULL || apl->apl_len == 0);
- isc_buffer_init(&b, apl->apl, apl->apl_len);
- isc_buffer_add(&b, apl->apl_len);
- isc_buffer_setactive(&b, apl->apl_len);
- return(fromwire_in_apl(rdclass, type, &b, NULL, ISC_FALSE, target));
- }
- static inline isc_result_t
- tostruct_in_apl(ARGS_TOSTRUCT) {
- dns_rdata_in_apl_t *apl = target;
- isc_region_t r;
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- apl->common.rdclass = rdata->rdclass;
- apl->common.rdtype = rdata->type;
- ISC_LINK_INIT(&apl->common, link);
- dns_rdata_toregion(rdata, &r);
- apl->apl_len = r.length;
- apl->apl = mem_maybedup(mctx, r.base, r.length);
- if (apl->apl == NULL)
- return (ISC_R_NOMEMORY);
- apl->offset = 0;
- apl->mctx = mctx;
- return (ISC_R_SUCCESS);
- }
- static inline void
- freestruct_in_apl(ARGS_FREESTRUCT) {
- dns_rdata_in_apl_t *apl = source;
- REQUIRE(source != NULL);
- REQUIRE(apl->common.rdtype == 42);
- REQUIRE(apl->common.rdclass == 1);
- if (apl->mctx == NULL)
- return;
- if (apl->apl != NULL)
- isc_mem_free(apl->mctx, apl->apl);
- apl->mctx = NULL;
- }
- isc_result_t
- dns_rdata_apl_first(dns_rdata_in_apl_t *apl) {
- isc_uint32_t length;
- REQUIRE(apl != NULL);
- REQUIRE(apl->common.rdtype == 42);
- REQUIRE(apl->common.rdclass == 1);
- REQUIRE(apl->apl != NULL || apl->apl_len == 0);
- /*
- * If no APL return ISC_R_NOMORE.
- */
- if (apl->apl == NULL)
- return (ISC_R_NOMORE);
- /*
- * Sanity check data.
- */
- INSIST(apl->apl_len > 3U);
- length = apl->apl[apl->offset + 3] & 0x7f;
- INSIST(length <= apl->apl_len);
- apl->offset = 0;
- return (ISC_R_SUCCESS);
- }
- isc_result_t
- dns_rdata_apl_next(dns_rdata_in_apl_t *apl) {
- isc_uint32_t length;
- REQUIRE(apl != NULL);
- REQUIRE(apl->common.rdtype == 42);
- REQUIRE(apl->common.rdclass == 1);
- REQUIRE(apl->apl != NULL || apl->apl_len == 0);
- /*
- * No APL or have already reached the end return ISC_R_NOMORE.
- */
- if (apl->apl == NULL || apl->offset == apl->apl_len)
- return (ISC_R_NOMORE);
- /*
- * Sanity check data.
- */
- INSIST(apl->offset < apl->apl_len);
- INSIST(apl->apl_len > 3U);
- INSIST(apl->offset <= apl->apl_len - 4U);
- length = apl->apl[apl->offset + 3] & 0x7f;
- /*
- * 16 to 32 bits promotion as 'length' is 32 bits so there is
- * no overflow problems.
- */
- INSIST(length + apl->offset <= apl->apl_len);
- apl->offset += apl->apl[apl->offset + 3] & 0x7f;
- return ((apl->offset >= apl->apl_len) ? ISC_R_SUCCESS : ISC_R_NOMORE);
- }
- isc_result_t
- dns_rdata_apl_current(dns_rdata_in_apl_t *apl, dns_rdata_apl_ent_t *ent) {
- isc_uint32_t length;
- REQUIRE(apl != NULL);
- REQUIRE(apl->common.rdtype == 42);
- REQUIRE(apl->common.rdclass == 1);
- REQUIRE(ent != NULL);
- REQUIRE(apl->apl != NULL || apl->apl_len == 0);
- REQUIRE(apl->offset <= apl->apl_len);
- if (apl->offset == apl->apl_len)
- return (ISC_R_NOMORE);
- /*
- * Sanity check data.
- */
- INSIST(apl->apl_len > 3U);
- INSIST(apl->offset <= apl->apl_len - 4U);
- length = apl->apl[apl->offset + 3] & 0x7f;
- /*
- * 16 to 32 bits promotion as 'length' is 32 bits so there is
- * no overflow problems.
- */
- INSIST(length + apl->offset <= apl->apl_len);
- ent->family = (apl->apl[apl->offset] << 8) + apl->apl[apl->offset + 1];
- ent->prefix = apl->apl[apl->offset + 2];
- ent->length = apl->apl[apl->offset + 3] & 0x7f;
- ent->negative = ISC_TF((apl->apl[apl->offset + 3] & 0x80) != 0);
- if (ent->length != 0)
- ent->data = &apl->apl[apl->offset + 4];
- else
- ent->data = NULL;
- return (ISC_R_SUCCESS);
- }
- static inline isc_result_t
- additionaldata_in_apl(ARGS_ADDLDATA) {
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- (void)add;
- (void)arg;
- return (ISC_R_SUCCESS);
- }
- static inline isc_result_t
- digest_in_apl(ARGS_DIGEST) {
- isc_region_t r;
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- dns_rdata_toregion(rdata, &r);
- return ((digest)(arg, &r));
- }
- static inline isc_boolean_t
- checkowner_in_apl(ARGS_CHECKOWNER) {
- REQUIRE(type == 42);
- REQUIRE(rdclass == 1);
- UNUSED(name);
- UNUSED(type);
- UNUSED(rdclass);
- UNUSED(wildcard);
- return (ISC_TRUE);
- }
- static inline isc_boolean_t
- checknames_in_apl(ARGS_CHECKNAMES) {
- REQUIRE(rdata->type == 42);
- REQUIRE(rdata->rdclass == 1);
- UNUSED(rdata);
- UNUSED(owner);
- UNUSED(bad);
- return (ISC_TRUE);
- }
- static inline int
- casecompare_in_apl(ARGS_COMPARE) {
- return (compare_in_apl(rdata1, rdata2));
- }
- #endif /* RDATA_IN_1_APL_42_C */