109a3aaf3SDag-Erling Smørgrav /** 209a3aaf3SDag-Erling Smørgrav * str2wire.c - read txt presentation of RRs 309a3aaf3SDag-Erling Smørgrav * 409a3aaf3SDag-Erling Smørgrav * (c) NLnet Labs, 2005-2006 509a3aaf3SDag-Erling Smørgrav * 609a3aaf3SDag-Erling Smørgrav * See the file LICENSE for the license 709a3aaf3SDag-Erling Smørgrav */ 809a3aaf3SDag-Erling Smørgrav 909a3aaf3SDag-Erling Smørgrav /** 1009a3aaf3SDag-Erling Smørgrav * \file 1109a3aaf3SDag-Erling Smørgrav * 1209a3aaf3SDag-Erling Smørgrav * Parses text to wireformat. 1309a3aaf3SDag-Erling Smørgrav */ 1409a3aaf3SDag-Erling Smørgrav #include "config.h" 1509a3aaf3SDag-Erling Smørgrav #include "sldns/str2wire.h" 1609a3aaf3SDag-Erling Smørgrav #include "sldns/wire2str.h" 1709a3aaf3SDag-Erling Smørgrav #include "sldns/sbuffer.h" 1809a3aaf3SDag-Erling Smørgrav #include "sldns/parse.h" 1909a3aaf3SDag-Erling Smørgrav #include "sldns/parseutil.h" 2009a3aaf3SDag-Erling Smørgrav #include <ctype.h> 2109a3aaf3SDag-Erling Smørgrav #ifdef HAVE_TIME_H 2209a3aaf3SDag-Erling Smørgrav #include <time.h> 2309a3aaf3SDag-Erling Smørgrav #endif 2409a3aaf3SDag-Erling Smørgrav #ifdef HAVE_NETDB_H 2509a3aaf3SDag-Erling Smørgrav #include <netdb.h> 2609a3aaf3SDag-Erling Smørgrav #endif 2709a3aaf3SDag-Erling Smørgrav 2809a3aaf3SDag-Erling Smørgrav /** return an error */ 2909a3aaf3SDag-Erling Smørgrav #define RET_ERR(e, off) ((int)((e)|((off)<<LDNS_WIREPARSE_SHIFT))) 3009a3aaf3SDag-Erling Smørgrav /** Move parse error but keep its ID */ 3109a3aaf3SDag-Erling Smørgrav #define RET_ERR_SHIFT(e, move) RET_ERR(LDNS_WIREPARSE_ERROR(e), LDNS_WIREPARSE_OFFSET(e)+(move)); 3209a3aaf3SDag-Erling Smørgrav #define LDNS_IP6ADDRLEN (128/8) 3309a3aaf3SDag-Erling Smørgrav 3409a3aaf3SDag-Erling Smørgrav /* 3509a3aaf3SDag-Erling Smørgrav * No special care is taken, all dots are translated into 3609a3aaf3SDag-Erling Smørgrav * label separators. 3709a3aaf3SDag-Erling Smørgrav * @param rel: true if the domain is not absolute (not terminated in .). 3809a3aaf3SDag-Erling Smørgrav * The output is then still terminated with a '0' rootlabel. 3909a3aaf3SDag-Erling Smørgrav */ 4009a3aaf3SDag-Erling Smørgrav static int sldns_str2wire_dname_buf_rel(const char* str, uint8_t* buf, 4109a3aaf3SDag-Erling Smørgrav size_t* olen, int* rel) 4209a3aaf3SDag-Erling Smørgrav { 4309a3aaf3SDag-Erling Smørgrav size_t len; 4409a3aaf3SDag-Erling Smørgrav 4509a3aaf3SDag-Erling Smørgrav const char *s; 4609a3aaf3SDag-Erling Smørgrav uint8_t *q, *pq, label_len; 4709a3aaf3SDag-Erling Smørgrav 4809a3aaf3SDag-Erling Smørgrav if(rel) *rel = 0; 4909a3aaf3SDag-Erling Smørgrav len = strlen((char*)str); 5009a3aaf3SDag-Erling Smørgrav /* octet representation can make strings a lot longer than actual length */ 5109a3aaf3SDag-Erling Smørgrav if (len > LDNS_MAX_DOMAINLEN * 4) { 5209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_DOMAINNAME_OVERFLOW, 0); 5309a3aaf3SDag-Erling Smørgrav } 5409a3aaf3SDag-Erling Smørgrav if (0 == len) { 5509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_DOMAINNAME_UNDERFLOW, 0); 5609a3aaf3SDag-Erling Smørgrav } 5709a3aaf3SDag-Erling Smørgrav 5809a3aaf3SDag-Erling Smørgrav /* root label */ 5909a3aaf3SDag-Erling Smørgrav if (1 == len && *str == '.') { 6009a3aaf3SDag-Erling Smørgrav if(*olen < 1) 6109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 0); 6209a3aaf3SDag-Erling Smørgrav buf[0] = 0; 6309a3aaf3SDag-Erling Smørgrav *olen = 1; 6409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 6509a3aaf3SDag-Erling Smørgrav } 6609a3aaf3SDag-Erling Smørgrav 6709a3aaf3SDag-Erling Smørgrav /* get on with the rest */ 6809a3aaf3SDag-Erling Smørgrav 6909a3aaf3SDag-Erling Smørgrav /* s is on the current character in the string 7009a3aaf3SDag-Erling Smørgrav * pq points to where the labellength is going to go 7109a3aaf3SDag-Erling Smørgrav * label_len keeps track of the current label's length 7209a3aaf3SDag-Erling Smørgrav * q builds the dname inside the buf array 7309a3aaf3SDag-Erling Smørgrav */ 7409a3aaf3SDag-Erling Smørgrav len = 0; 7509a3aaf3SDag-Erling Smørgrav if(*olen < 1) 7609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 0); 7709a3aaf3SDag-Erling Smørgrav q = buf+1; 7809a3aaf3SDag-Erling Smørgrav pq = buf; 7909a3aaf3SDag-Erling Smørgrav label_len = 0; 8009a3aaf3SDag-Erling Smørgrav for (s = str; *s; s++, q++) { 8109a3aaf3SDag-Erling Smørgrav if (q >= buf + *olen) 8209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, q-buf); 8309a3aaf3SDag-Erling Smørgrav if (q > buf + LDNS_MAX_DOMAINLEN) 8409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_DOMAINNAME_OVERFLOW, q-buf); 8509a3aaf3SDag-Erling Smørgrav switch (*s) { 8609a3aaf3SDag-Erling Smørgrav case '.': 8709a3aaf3SDag-Erling Smørgrav if (label_len > LDNS_MAX_LABELLEN) { 8809a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_LABEL_OVERFLOW, q-buf); 8909a3aaf3SDag-Erling Smørgrav } 9009a3aaf3SDag-Erling Smørgrav if (label_len == 0) { 9109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_EMPTY_LABEL, q-buf); 9209a3aaf3SDag-Erling Smørgrav } 9309a3aaf3SDag-Erling Smørgrav len += label_len + 1; 9409a3aaf3SDag-Erling Smørgrav *q = 0; 9509a3aaf3SDag-Erling Smørgrav *pq = label_len; 9609a3aaf3SDag-Erling Smørgrav label_len = 0; 9709a3aaf3SDag-Erling Smørgrav pq = q; 9809a3aaf3SDag-Erling Smørgrav break; 9909a3aaf3SDag-Erling Smørgrav case '\\': 10009a3aaf3SDag-Erling Smørgrav /* octet value or literal char */ 10109a3aaf3SDag-Erling Smørgrav s += 1; 10209a3aaf3SDag-Erling Smørgrav if (!sldns_parse_escape(q, &s)) { 10309a3aaf3SDag-Erling Smørgrav *q = 0; 10409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_BAD_ESCAPE, q-buf); 10509a3aaf3SDag-Erling Smørgrav } 10609a3aaf3SDag-Erling Smørgrav s -= 1; 10709a3aaf3SDag-Erling Smørgrav label_len++; 10809a3aaf3SDag-Erling Smørgrav break; 10909a3aaf3SDag-Erling Smørgrav default: 11009a3aaf3SDag-Erling Smørgrav *q = (uint8_t)*s; 11109a3aaf3SDag-Erling Smørgrav label_len++; 11209a3aaf3SDag-Erling Smørgrav } 11309a3aaf3SDag-Erling Smørgrav } 11409a3aaf3SDag-Erling Smørgrav 11509a3aaf3SDag-Erling Smørgrav /* add root label if last char was not '.' */ 11609a3aaf3SDag-Erling Smørgrav if(label_len != 0) { 11709a3aaf3SDag-Erling Smørgrav if(rel) *rel = 1; 11809a3aaf3SDag-Erling Smørgrav if (q >= buf + *olen) 11909a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, q-buf); 12009a3aaf3SDag-Erling Smørgrav if (q > buf + LDNS_MAX_DOMAINLEN) { 12109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_DOMAINNAME_OVERFLOW, q-buf); 12209a3aaf3SDag-Erling Smørgrav } 12309a3aaf3SDag-Erling Smørgrav if (label_len > LDNS_MAX_LABELLEN) { 12409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_LABEL_OVERFLOW, q-buf); 12509a3aaf3SDag-Erling Smørgrav } 12609a3aaf3SDag-Erling Smørgrav if (label_len == 0) { /* label_len 0 but not . at end? */ 12709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_EMPTY_LABEL, q-buf); 12809a3aaf3SDag-Erling Smørgrav } 12909a3aaf3SDag-Erling Smørgrav len += label_len + 1; 13009a3aaf3SDag-Erling Smørgrav *pq = label_len; 13109a3aaf3SDag-Erling Smørgrav *q = 0; 13209a3aaf3SDag-Erling Smørgrav } 13309a3aaf3SDag-Erling Smørgrav len++; 13409a3aaf3SDag-Erling Smørgrav *olen = len; 13509a3aaf3SDag-Erling Smørgrav 13609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 13709a3aaf3SDag-Erling Smørgrav } 13809a3aaf3SDag-Erling Smørgrav 13909a3aaf3SDag-Erling Smørgrav int sldns_str2wire_dname_buf(const char* str, uint8_t* buf, size_t* len) 14009a3aaf3SDag-Erling Smørgrav { 14109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_dname_buf_rel(str, buf, len, NULL); 14209a3aaf3SDag-Erling Smørgrav } 14309a3aaf3SDag-Erling Smørgrav 14409a3aaf3SDag-Erling Smørgrav int sldns_str2wire_dname_buf_origin(const char* str, uint8_t* buf, size_t* len, 14509a3aaf3SDag-Erling Smørgrav uint8_t* origin, size_t origin_len) 14609a3aaf3SDag-Erling Smørgrav { 14709a3aaf3SDag-Erling Smørgrav size_t dlen = *len; 14809a3aaf3SDag-Erling Smørgrav int rel = 0; 14909a3aaf3SDag-Erling Smørgrav int s = sldns_str2wire_dname_buf_rel(str, buf, &dlen, &rel); 15009a3aaf3SDag-Erling Smørgrav if(s) return s; 15109a3aaf3SDag-Erling Smørgrav 15209a3aaf3SDag-Erling Smørgrav if(rel && origin && dlen > 0) { 15309a3aaf3SDag-Erling Smørgrav if(dlen + origin_len - 1 > LDNS_MAX_DOMAINLEN) 15409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_DOMAINNAME_OVERFLOW, 15509a3aaf3SDag-Erling Smørgrav LDNS_MAX_DOMAINLEN); 15609a3aaf3SDag-Erling Smørgrav if(dlen + origin_len - 1 > *len) 15709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 15809a3aaf3SDag-Erling Smørgrav *len); 15909a3aaf3SDag-Erling Smørgrav memmove(buf+dlen-1, origin, origin_len); 16009a3aaf3SDag-Erling Smørgrav *len = dlen + origin_len - 1; 16109a3aaf3SDag-Erling Smørgrav } else 16209a3aaf3SDag-Erling Smørgrav *len = dlen; 16309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 16409a3aaf3SDag-Erling Smørgrav } 16509a3aaf3SDag-Erling Smørgrav 16609a3aaf3SDag-Erling Smørgrav uint8_t* sldns_str2wire_dname(const char* str, size_t* len) 16709a3aaf3SDag-Erling Smørgrav { 16809a3aaf3SDag-Erling Smørgrav uint8_t dname[LDNS_MAX_DOMAINLEN+1]; 16909a3aaf3SDag-Erling Smørgrav *len = sizeof(dname); 17009a3aaf3SDag-Erling Smørgrav if(sldns_str2wire_dname_buf(str, dname, len) == 0) { 17109a3aaf3SDag-Erling Smørgrav uint8_t* r = (uint8_t*)malloc(*len); 17209a3aaf3SDag-Erling Smørgrav if(r) return memcpy(r, dname, *len); 17309a3aaf3SDag-Erling Smørgrav } 17409a3aaf3SDag-Erling Smørgrav *len = 0; 17509a3aaf3SDag-Erling Smørgrav return NULL; 17609a3aaf3SDag-Erling Smørgrav } 17709a3aaf3SDag-Erling Smørgrav 17809a3aaf3SDag-Erling Smørgrav /** read owner name */ 17909a3aaf3SDag-Erling Smørgrav static int 18009a3aaf3SDag-Erling Smørgrav rrinternal_get_owner(sldns_buffer* strbuf, uint8_t* rr, size_t* len, 18109a3aaf3SDag-Erling Smørgrav size_t* dname_len, uint8_t* origin, size_t origin_len, uint8_t* prev, 18209a3aaf3SDag-Erling Smørgrav size_t prev_len, char* token, size_t token_len) 18309a3aaf3SDag-Erling Smørgrav { 18409a3aaf3SDag-Erling Smørgrav /* split the rr in its parts -1 signals trouble */ 18509a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, "\t\n ", token_len) == -1) { 18609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX, 18709a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 18809a3aaf3SDag-Erling Smørgrav } 18909a3aaf3SDag-Erling Smørgrav 19009a3aaf3SDag-Erling Smørgrav if(strcmp(token, "@") == 0) { 19109a3aaf3SDag-Erling Smørgrav uint8_t* tocopy; 19209a3aaf3SDag-Erling Smørgrav if (origin) { 19309a3aaf3SDag-Erling Smørgrav *dname_len = origin_len; 19409a3aaf3SDag-Erling Smørgrav tocopy = origin; 19509a3aaf3SDag-Erling Smørgrav } else if (prev) { 19609a3aaf3SDag-Erling Smørgrav *dname_len = prev_len; 19709a3aaf3SDag-Erling Smørgrav tocopy = prev; 19809a3aaf3SDag-Erling Smørgrav } else { 19909a3aaf3SDag-Erling Smørgrav /* default to root */ 20009a3aaf3SDag-Erling Smørgrav *dname_len = 1; 20109a3aaf3SDag-Erling Smørgrav tocopy = (uint8_t*)"\0"; 20209a3aaf3SDag-Erling Smørgrav } 20309a3aaf3SDag-Erling Smørgrav if(*len < *dname_len) 20409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 20509a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 20609a3aaf3SDag-Erling Smørgrav memmove(rr, tocopy, *dname_len); 207f61ef7f6SDag-Erling Smørgrav } else if(*token == '\0') { 20809a3aaf3SDag-Erling Smørgrav /* no ownername was given, try prev, if that fails 20909a3aaf3SDag-Erling Smørgrav * origin, else default to root */ 21009a3aaf3SDag-Erling Smørgrav uint8_t* tocopy; 21109a3aaf3SDag-Erling Smørgrav if(prev) { 21209a3aaf3SDag-Erling Smørgrav *dname_len = prev_len; 21309a3aaf3SDag-Erling Smørgrav tocopy = prev; 21409a3aaf3SDag-Erling Smørgrav } else if(origin) { 21509a3aaf3SDag-Erling Smørgrav *dname_len = origin_len; 21609a3aaf3SDag-Erling Smørgrav tocopy = origin; 21709a3aaf3SDag-Erling Smørgrav } else { 21809a3aaf3SDag-Erling Smørgrav *dname_len = 1; 21909a3aaf3SDag-Erling Smørgrav tocopy = (uint8_t*)"\0"; 22009a3aaf3SDag-Erling Smørgrav } 22109a3aaf3SDag-Erling Smørgrav if(*len < *dname_len) 22209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 22309a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 22409a3aaf3SDag-Erling Smørgrav memmove(rr, tocopy, *dname_len); 22509a3aaf3SDag-Erling Smørgrav } else { 22609a3aaf3SDag-Erling Smørgrav size_t dlen = *len; 22709a3aaf3SDag-Erling Smørgrav int s = sldns_str2wire_dname_buf_origin(token, rr, &dlen, 22809a3aaf3SDag-Erling Smørgrav origin, origin_len); 22909a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, 23009a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)-strlen(token)); 23109a3aaf3SDag-Erling Smørgrav *dname_len = dlen; 23209a3aaf3SDag-Erling Smørgrav } 23309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 23409a3aaf3SDag-Erling Smørgrav } 23509a3aaf3SDag-Erling Smørgrav 23609a3aaf3SDag-Erling Smørgrav /** read ttl */ 23709a3aaf3SDag-Erling Smørgrav static int 23809a3aaf3SDag-Erling Smørgrav rrinternal_get_ttl(sldns_buffer* strbuf, char* token, size_t token_len, 23909a3aaf3SDag-Erling Smørgrav int* not_there, uint32_t* ttl, uint32_t default_ttl) 24009a3aaf3SDag-Erling Smørgrav { 24109a3aaf3SDag-Erling Smørgrav const char* endptr; 24209a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, "\t\n ", token_len) == -1) { 24309a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TTL, 24409a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 24509a3aaf3SDag-Erling Smørgrav } 24609a3aaf3SDag-Erling Smørgrav *ttl = (uint32_t) sldns_str2period(token, &endptr); 24709a3aaf3SDag-Erling Smørgrav 24809a3aaf3SDag-Erling Smørgrav if (strlen(token) > 0 && !isdigit((unsigned char)token[0])) { 24909a3aaf3SDag-Erling Smørgrav *not_there = 1; 25009a3aaf3SDag-Erling Smørgrav /* ah, it's not there or something */ 25109a3aaf3SDag-Erling Smørgrav if (default_ttl == 0) { 25209a3aaf3SDag-Erling Smørgrav *ttl = LDNS_DEFAULT_TTL; 25309a3aaf3SDag-Erling Smørgrav } else { 25409a3aaf3SDag-Erling Smørgrav *ttl = default_ttl; 25509a3aaf3SDag-Erling Smørgrav } 25609a3aaf3SDag-Erling Smørgrav } 25709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 25809a3aaf3SDag-Erling Smørgrav } 25909a3aaf3SDag-Erling Smørgrav 26009a3aaf3SDag-Erling Smørgrav /** read class */ 26109a3aaf3SDag-Erling Smørgrav static int 26209a3aaf3SDag-Erling Smørgrav rrinternal_get_class(sldns_buffer* strbuf, char* token, size_t token_len, 26309a3aaf3SDag-Erling Smørgrav int* not_there, uint16_t* cl) 26409a3aaf3SDag-Erling Smørgrav { 26509a3aaf3SDag-Erling Smørgrav /* if 'not_there' then we got token from previous parse routine */ 26609a3aaf3SDag-Erling Smørgrav if(!*not_there) { 26709a3aaf3SDag-Erling Smørgrav /* parse new token for class */ 26809a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, "\t\n ", token_len) == -1) { 26909a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_CLASS, 27009a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 27109a3aaf3SDag-Erling Smørgrav } 27209a3aaf3SDag-Erling Smørgrav } else *not_there = 0; 27309a3aaf3SDag-Erling Smørgrav *cl = sldns_get_rr_class_by_name(token); 27409a3aaf3SDag-Erling Smørgrav /* class can be left out too, assume IN, current token must be type */ 27509a3aaf3SDag-Erling Smørgrav if(*cl == 0 && strcmp(token, "CLASS0") != 0) { 27609a3aaf3SDag-Erling Smørgrav *not_there = 1; 27709a3aaf3SDag-Erling Smørgrav *cl = LDNS_RR_CLASS_IN; 27809a3aaf3SDag-Erling Smørgrav } 27909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 28009a3aaf3SDag-Erling Smørgrav } 28109a3aaf3SDag-Erling Smørgrav 28209a3aaf3SDag-Erling Smørgrav /** read type */ 28309a3aaf3SDag-Erling Smørgrav static int 28409a3aaf3SDag-Erling Smørgrav rrinternal_get_type(sldns_buffer* strbuf, char* token, size_t token_len, 28509a3aaf3SDag-Erling Smørgrav int* not_there, uint16_t* tp) 28609a3aaf3SDag-Erling Smørgrav { 28709a3aaf3SDag-Erling Smørgrav /* if 'not_there' then we got token from previous parse routine */ 28809a3aaf3SDag-Erling Smørgrav if(!*not_there) { 28909a3aaf3SDag-Erling Smørgrav /* parse new token for type */ 29009a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, "\t\n ", token_len) == -1) { 29109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TYPE, 29209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 29309a3aaf3SDag-Erling Smørgrav } 29409a3aaf3SDag-Erling Smørgrav } 29509a3aaf3SDag-Erling Smørgrav *tp = sldns_get_rr_type_by_name(token); 29609a3aaf3SDag-Erling Smørgrav if(*tp == 0 && strcmp(token, "TYPE0") != 0) { 29709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TYPE, 29809a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 29909a3aaf3SDag-Erling Smørgrav } 30009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 30109a3aaf3SDag-Erling Smørgrav } 30209a3aaf3SDag-Erling Smørgrav 30309a3aaf3SDag-Erling Smørgrav /** put type, class, ttl into rr buffer */ 30409a3aaf3SDag-Erling Smørgrav static int 30509a3aaf3SDag-Erling Smørgrav rrinternal_write_typeclassttl(sldns_buffer* strbuf, uint8_t* rr, size_t len, 30609a3aaf3SDag-Erling Smørgrav size_t dname_len, uint16_t tp, uint16_t cl, uint32_t ttl, int question) 30709a3aaf3SDag-Erling Smørgrav { 30809a3aaf3SDag-Erling Smørgrav if(question) { 30909a3aaf3SDag-Erling Smørgrav /* question is : name, type, class */ 31009a3aaf3SDag-Erling Smørgrav if(dname_len + 4 > len) 31109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 31209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 31309a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len, tp); 31409a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len+2, cl); 31509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 31609a3aaf3SDag-Erling Smørgrav } 31709a3aaf3SDag-Erling Smørgrav 31809a3aaf3SDag-Erling Smørgrav /* type(2), class(2), ttl(4), rdatalen(2 (later)) = 10 */ 31909a3aaf3SDag-Erling Smørgrav if(dname_len + 10 > len) 32009a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 32109a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 32209a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len, tp); 32309a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len+2, cl); 32409a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rr+dname_len+4, ttl); 32509a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len+8, 0); /* rdatalen placeholder */ 32609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 32709a3aaf3SDag-Erling Smørgrav } 32809a3aaf3SDag-Erling Smørgrav 32909a3aaf3SDag-Erling Smørgrav /** find delimiters for type */ 33009a3aaf3SDag-Erling Smørgrav static const char* 331bc892140SDag-Erling Smørgrav rrinternal_get_delims(sldns_rdf_type rdftype, size_t r_cnt, size_t r_max) 33209a3aaf3SDag-Erling Smørgrav { 33309a3aaf3SDag-Erling Smørgrav switch(rdftype) { 33409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_B64 : 33509a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_HEX : /* These rdf types may con- */ 33609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_LOC : /* tain whitespace, only if */ 33709a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_WKS : /* it is the last rd field. */ 33809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_IPSECKEY : 33909a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NSEC : if (r_cnt == r_max - 1) { 34009a3aaf3SDag-Erling Smørgrav return "\n"; 34109a3aaf3SDag-Erling Smørgrav } 34209a3aaf3SDag-Erling Smørgrav break; 34309a3aaf3SDag-Erling Smørgrav default : break; 34409a3aaf3SDag-Erling Smørgrav } 34509a3aaf3SDag-Erling Smørgrav return "\n\t "; 34609a3aaf3SDag-Erling Smørgrav } 34709a3aaf3SDag-Erling Smørgrav 34809a3aaf3SDag-Erling Smørgrav /* Syntactic sugar for sldns_rr_new_frm_str_internal */ 34909a3aaf3SDag-Erling Smørgrav static int 35009a3aaf3SDag-Erling Smørgrav sldns_rdf_type_maybe_quoted(sldns_rdf_type rdf_type) 35109a3aaf3SDag-Erling Smørgrav { 35209a3aaf3SDag-Erling Smørgrav return rdf_type == LDNS_RDF_TYPE_STR || 35309a3aaf3SDag-Erling Smørgrav rdf_type == LDNS_RDF_TYPE_LONG_STR; 35409a3aaf3SDag-Erling Smørgrav } 35509a3aaf3SDag-Erling Smørgrav 35609a3aaf3SDag-Erling Smørgrav /** see if rdata is quoted */ 35709a3aaf3SDag-Erling Smørgrav static int 35809a3aaf3SDag-Erling Smørgrav rrinternal_get_quoted(sldns_buffer* strbuf, const char** delimiters, 35909a3aaf3SDag-Erling Smørgrav sldns_rdf_type rdftype) 36009a3aaf3SDag-Erling Smørgrav { 36109a3aaf3SDag-Erling Smørgrav if(sldns_rdf_type_maybe_quoted(rdftype) && 36209a3aaf3SDag-Erling Smørgrav sldns_buffer_remaining(strbuf) > 0) { 36309a3aaf3SDag-Erling Smørgrav 36409a3aaf3SDag-Erling Smørgrav /* skip spaces */ 36509a3aaf3SDag-Erling Smørgrav while(sldns_buffer_remaining(strbuf) > 0 && 36609a3aaf3SDag-Erling Smørgrav *(sldns_buffer_current(strbuf)) == ' ') { 36709a3aaf3SDag-Erling Smørgrav sldns_buffer_skip(strbuf, 1); 36809a3aaf3SDag-Erling Smørgrav } 36909a3aaf3SDag-Erling Smørgrav 37009a3aaf3SDag-Erling Smørgrav if(sldns_buffer_remaining(strbuf) > 0 && 37109a3aaf3SDag-Erling Smørgrav *(sldns_buffer_current(strbuf)) == '\"') { 37209a3aaf3SDag-Erling Smørgrav *delimiters = "\"\0"; 37309a3aaf3SDag-Erling Smørgrav sldns_buffer_skip(strbuf, 1); 37409a3aaf3SDag-Erling Smørgrav return 1; 37509a3aaf3SDag-Erling Smørgrav } 37609a3aaf3SDag-Erling Smørgrav } 37709a3aaf3SDag-Erling Smørgrav return 0; 37809a3aaf3SDag-Erling Smørgrav } 37909a3aaf3SDag-Erling Smørgrav 38009a3aaf3SDag-Erling Smørgrav /** spool hex data into rdata */ 38109a3aaf3SDag-Erling Smørgrav static int 38209a3aaf3SDag-Erling Smørgrav rrinternal_spool_hex(char* token, uint8_t* rr, size_t rr_len, 38309a3aaf3SDag-Erling Smørgrav size_t rr_cur_len, size_t* cur_hex_data_size, size_t hex_data_size) 38409a3aaf3SDag-Erling Smørgrav { 38509a3aaf3SDag-Erling Smørgrav char* p = token; 38609a3aaf3SDag-Erling Smørgrav while(*p) { 38709a3aaf3SDag-Erling Smørgrav if(isspace((unsigned char)*p)) { 38809a3aaf3SDag-Erling Smørgrav p++; 38909a3aaf3SDag-Erling Smørgrav continue; 39009a3aaf3SDag-Erling Smørgrav } 39109a3aaf3SDag-Erling Smørgrav if(!isxdigit((unsigned char)*p)) 39209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_RDATA, 39309a3aaf3SDag-Erling Smørgrav p-token); 39409a3aaf3SDag-Erling Smørgrav if(*cur_hex_data_size >= hex_data_size) 39509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_RDATA, 39609a3aaf3SDag-Erling Smørgrav p-token); 39709a3aaf3SDag-Erling Smørgrav /* extra robust check */ 39809a3aaf3SDag-Erling Smørgrav if(rr_cur_len+(*cur_hex_data_size)/2 >= rr_len) 39909a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 40009a3aaf3SDag-Erling Smørgrav p-token); 40109a3aaf3SDag-Erling Smørgrav /* see if 16s or 1s */ 40209a3aaf3SDag-Erling Smørgrav if( ((*cur_hex_data_size)&1) == 0) { 40309a3aaf3SDag-Erling Smørgrav rr[rr_cur_len+(*cur_hex_data_size)/2] = 40409a3aaf3SDag-Erling Smørgrav (uint8_t)sldns_hexdigit_to_int(*p)*16; 40509a3aaf3SDag-Erling Smørgrav } else { 40609a3aaf3SDag-Erling Smørgrav rr[rr_cur_len+(*cur_hex_data_size)/2] += 40709a3aaf3SDag-Erling Smørgrav (uint8_t)sldns_hexdigit_to_int(*p); 40809a3aaf3SDag-Erling Smørgrav } 40909a3aaf3SDag-Erling Smørgrav p++; 41009a3aaf3SDag-Erling Smørgrav (*cur_hex_data_size)++; 41109a3aaf3SDag-Erling Smørgrav } 41209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 41309a3aaf3SDag-Erling Smørgrav } 41409a3aaf3SDag-Erling Smørgrav 41509a3aaf3SDag-Erling Smørgrav /** read unknown rr type format */ 41609a3aaf3SDag-Erling Smørgrav static int 41709a3aaf3SDag-Erling Smørgrav rrinternal_parse_unknown(sldns_buffer* strbuf, char* token, size_t token_len, 41809a3aaf3SDag-Erling Smørgrav uint8_t* rr, size_t* rr_len, size_t* rr_cur_len, size_t pre_data_pos) 41909a3aaf3SDag-Erling Smørgrav { 42009a3aaf3SDag-Erling Smørgrav const char* delim = "\n\t "; 42109a3aaf3SDag-Erling Smørgrav size_t hex_data_size, cur_hex_data_size; 42209a3aaf3SDag-Erling Smørgrav /* go back to before \# 42309a3aaf3SDag-Erling Smørgrav * and skip it while setting delimiters better 42409a3aaf3SDag-Erling Smørgrav */ 42509a3aaf3SDag-Erling Smørgrav sldns_buffer_set_position(strbuf, pre_data_pos); 42609a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, delim, token_len) == -1) 42709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_GENERAL; /* should not fail */ 42809a3aaf3SDag-Erling Smørgrav /* read rdata octet length */ 42909a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(strbuf, token, delim, token_len) == -1) { 43009a3aaf3SDag-Erling Smørgrav /* something goes very wrong here */ 43109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_RDATA, 43209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 43309a3aaf3SDag-Erling Smørgrav } 43409a3aaf3SDag-Erling Smørgrav hex_data_size = (size_t)atoi(token); 43509a3aaf3SDag-Erling Smørgrav if(hex_data_size > LDNS_MAX_RDFLEN || 43609a3aaf3SDag-Erling Smørgrav *rr_cur_len + hex_data_size > *rr_len) { 43709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 43809a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 43909a3aaf3SDag-Erling Smørgrav } 44009a3aaf3SDag-Erling Smørgrav /* copy hex chars into hex str (2 chars per byte) */ 44109a3aaf3SDag-Erling Smørgrav hex_data_size *= 2; 44209a3aaf3SDag-Erling Smørgrav cur_hex_data_size = 0; 44309a3aaf3SDag-Erling Smørgrav while(cur_hex_data_size < hex_data_size) { 44409a3aaf3SDag-Erling Smørgrav int status; 44509a3aaf3SDag-Erling Smørgrav ssize_t c = sldns_bget_token(strbuf, token, delim, token_len); 44609a3aaf3SDag-Erling Smørgrav if((status = rrinternal_spool_hex(token, rr, *rr_len, 44709a3aaf3SDag-Erling Smørgrav *rr_cur_len, &cur_hex_data_size, hex_data_size)) != 0) 44809a3aaf3SDag-Erling Smørgrav return RET_ERR_SHIFT(status, 44909a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)-strlen(token)); 45009a3aaf3SDag-Erling Smørgrav if(c == -1) { 45109a3aaf3SDag-Erling Smørgrav if(cur_hex_data_size != hex_data_size) 45209a3aaf3SDag-Erling Smørgrav return RET_ERR( 45309a3aaf3SDag-Erling Smørgrav LDNS_WIREPARSE_ERR_SYNTAX_RDATA, 45409a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 45509a3aaf3SDag-Erling Smørgrav break; 45609a3aaf3SDag-Erling Smørgrav } 45709a3aaf3SDag-Erling Smørgrav } 45809a3aaf3SDag-Erling Smørgrav *rr_cur_len += hex_data_size/2; 45909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 46009a3aaf3SDag-Erling Smørgrav } 46109a3aaf3SDag-Erling Smørgrav 46209a3aaf3SDag-Erling Smørgrav /** parse normal RR rdata element */ 46309a3aaf3SDag-Erling Smørgrav static int 46409a3aaf3SDag-Erling Smørgrav rrinternal_parse_rdf(sldns_buffer* strbuf, char* token, size_t token_len, 46509a3aaf3SDag-Erling Smørgrav uint8_t* rr, size_t rr_len, size_t* rr_cur_len, sldns_rdf_type rdftype, 466bc892140SDag-Erling Smørgrav uint16_t rr_type, size_t r_cnt, size_t r_max, size_t dname_len, 46709a3aaf3SDag-Erling Smørgrav uint8_t* origin, size_t origin_len) 46809a3aaf3SDag-Erling Smørgrav { 46909a3aaf3SDag-Erling Smørgrav size_t len; 47009a3aaf3SDag-Erling Smørgrav int status; 47109a3aaf3SDag-Erling Smørgrav 47209a3aaf3SDag-Erling Smørgrav switch(rdftype) { 47309a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_DNAME: 47409a3aaf3SDag-Erling Smørgrav /* check if the origin should be used or concatenated */ 47509a3aaf3SDag-Erling Smørgrav if(strcmp(token, "@") == 0) { 47609a3aaf3SDag-Erling Smørgrav uint8_t* tocopy; 47709a3aaf3SDag-Erling Smørgrav size_t copylen; 47809a3aaf3SDag-Erling Smørgrav if(origin) { 47909a3aaf3SDag-Erling Smørgrav copylen = origin_len; 48009a3aaf3SDag-Erling Smørgrav tocopy = origin; 48109a3aaf3SDag-Erling Smørgrav } else if(rr_type == LDNS_RR_TYPE_SOA) { 48209a3aaf3SDag-Erling Smørgrav copylen = dname_len; 48309a3aaf3SDag-Erling Smørgrav tocopy = rr; /* copy rr owner name */ 48409a3aaf3SDag-Erling Smørgrav } else { 48509a3aaf3SDag-Erling Smørgrav copylen = 1; 48609a3aaf3SDag-Erling Smørgrav tocopy = (uint8_t*)"\0"; 48709a3aaf3SDag-Erling Smørgrav } 48809a3aaf3SDag-Erling Smørgrav if((*rr_cur_len) + copylen > rr_len) 48909a3aaf3SDag-Erling Smørgrav return RET_ERR( 49009a3aaf3SDag-Erling Smørgrav LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 49109a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 49209a3aaf3SDag-Erling Smørgrav memmove(rr+*rr_cur_len, tocopy, copylen); 49309a3aaf3SDag-Erling Smørgrav (*rr_cur_len) += copylen; 49409a3aaf3SDag-Erling Smørgrav } else { 49509a3aaf3SDag-Erling Smørgrav size_t dlen = rr_len - (*rr_cur_len); 49609a3aaf3SDag-Erling Smørgrav int s = sldns_str2wire_dname_buf_origin(token, 49709a3aaf3SDag-Erling Smørgrav rr+*rr_cur_len, &dlen, origin, origin_len); 49809a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, 49909a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)-strlen(token)); 50009a3aaf3SDag-Erling Smørgrav (*rr_cur_len) += dlen; 50109a3aaf3SDag-Erling Smørgrav } 50209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 50309a3aaf3SDag-Erling Smørgrav 50409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_HEX: 50509a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_B64: 50609a3aaf3SDag-Erling Smørgrav /* When this is the last rdata field, then the 50709a3aaf3SDag-Erling Smørgrav * rest should be read in (cause then these 50809a3aaf3SDag-Erling Smørgrav * rdf types may contain spaces). */ 50909a3aaf3SDag-Erling Smørgrav if(r_cnt == r_max - 1) { 51009a3aaf3SDag-Erling Smørgrav size_t tlen = strlen(token); 51109a3aaf3SDag-Erling Smørgrav (void)sldns_bget_token(strbuf, token+tlen, "\n", 51209a3aaf3SDag-Erling Smørgrav token_len - tlen); 51309a3aaf3SDag-Erling Smørgrav } 51409a3aaf3SDag-Erling Smørgrav break; 51509a3aaf3SDag-Erling Smørgrav default: 51609a3aaf3SDag-Erling Smørgrav break; 51709a3aaf3SDag-Erling Smørgrav } 51809a3aaf3SDag-Erling Smørgrav 51909a3aaf3SDag-Erling Smørgrav len = rr_len - (*rr_cur_len); 52009a3aaf3SDag-Erling Smørgrav if((status=sldns_str2wire_rdf_buf(token, rr+(*rr_cur_len), &len, 52109a3aaf3SDag-Erling Smørgrav rdftype)) != 0) 52209a3aaf3SDag-Erling Smørgrav return RET_ERR_SHIFT(status, 52309a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)-strlen(token)); 52409a3aaf3SDag-Erling Smørgrav *rr_cur_len += len; 52509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 52609a3aaf3SDag-Erling Smørgrav } 52709a3aaf3SDag-Erling Smørgrav 52809a3aaf3SDag-Erling Smørgrav /** 52909a3aaf3SDag-Erling Smørgrav * Parse one rdf token. Takes care of quotes and parenthesis. 53009a3aaf3SDag-Erling Smørgrav */ 53109a3aaf3SDag-Erling Smørgrav static int 53209a3aaf3SDag-Erling Smørgrav sldns_parse_rdf_token(sldns_buffer* strbuf, char* token, size_t token_len, 53309a3aaf3SDag-Erling Smørgrav int* quoted, int* parens, size_t* pre_data_pos, 53409a3aaf3SDag-Erling Smørgrav const char* delimiters, sldns_rdf_type rdftype, size_t* token_strlen) 53509a3aaf3SDag-Erling Smørgrav { 53609a3aaf3SDag-Erling Smørgrav size_t slen; 53709a3aaf3SDag-Erling Smørgrav 53809a3aaf3SDag-Erling Smørgrav /* skip spaces */ 53909a3aaf3SDag-Erling Smørgrav while(sldns_buffer_remaining(strbuf) > 0 && !*quoted && 54009a3aaf3SDag-Erling Smørgrav *(sldns_buffer_current(strbuf)) == ' ') { 54109a3aaf3SDag-Erling Smørgrav sldns_buffer_skip(strbuf, 1); 54209a3aaf3SDag-Erling Smørgrav } 54309a3aaf3SDag-Erling Smørgrav 54409a3aaf3SDag-Erling Smørgrav *pre_data_pos = sldns_buffer_position(strbuf); 54509a3aaf3SDag-Erling Smørgrav if(sldns_bget_token_par(strbuf, token, (*quoted)?"\"":delimiters, 54609a3aaf3SDag-Erling Smørgrav token_len, parens, (*quoted)?NULL:" \t") == -1) { 54709a3aaf3SDag-Erling Smørgrav return 0; 54809a3aaf3SDag-Erling Smørgrav } 54909a3aaf3SDag-Erling Smørgrav slen = strlen(token); 55009a3aaf3SDag-Erling Smørgrav /* check if not quoted yet, and we have encountered quotes */ 55109a3aaf3SDag-Erling Smørgrav if(!*quoted && sldns_rdf_type_maybe_quoted(rdftype) && 55209a3aaf3SDag-Erling Smørgrav slen >= 2 && 55309a3aaf3SDag-Erling Smørgrav (token[0] == '"' || token[0] == '\'') && 55409a3aaf3SDag-Erling Smørgrav (token[slen-1] == '"' || token[slen-1] == '\'')) { 55509a3aaf3SDag-Erling Smørgrav /* move token two smaller (quotes) with endnull */ 55609a3aaf3SDag-Erling Smørgrav memmove(token, token+1, slen-2); 55709a3aaf3SDag-Erling Smørgrav token[slen-2] = 0; 55809a3aaf3SDag-Erling Smørgrav slen -= 2; 55909a3aaf3SDag-Erling Smørgrav *quoted = 1; 56009a3aaf3SDag-Erling Smørgrav } else if(!*quoted && sldns_rdf_type_maybe_quoted(rdftype) && 56109a3aaf3SDag-Erling Smørgrav slen >= 2 && 56209a3aaf3SDag-Erling Smørgrav (token[0] == '"' || token[0] == '\'')) { 56309a3aaf3SDag-Erling Smørgrav /* got the start quote (remove it) but read remainder 56409a3aaf3SDag-Erling Smørgrav * of quoted string as well into remainder of token */ 56509a3aaf3SDag-Erling Smørgrav memmove(token, token+1, slen-1); 56609a3aaf3SDag-Erling Smørgrav token[slen-1] = 0; 56709a3aaf3SDag-Erling Smørgrav slen -= 1; 56809a3aaf3SDag-Erling Smørgrav *quoted = 1; 56909a3aaf3SDag-Erling Smørgrav /* rewind buffer over skipped whitespace */ 57009a3aaf3SDag-Erling Smørgrav while(sldns_buffer_position(strbuf) > 0 && 57109a3aaf3SDag-Erling Smørgrav (sldns_buffer_current(strbuf)[-1] == ' ' || 57209a3aaf3SDag-Erling Smørgrav sldns_buffer_current(strbuf)[-1] == '\t')) { 57309a3aaf3SDag-Erling Smørgrav sldns_buffer_skip(strbuf, -1); 57409a3aaf3SDag-Erling Smørgrav } 57509a3aaf3SDag-Erling Smørgrav if(sldns_bget_token_par(strbuf, token+slen, 57609a3aaf3SDag-Erling Smørgrav "\"", token_len-slen, 57709a3aaf3SDag-Erling Smørgrav parens, NULL) == -1) { 57809a3aaf3SDag-Erling Smørgrav return 0; 57909a3aaf3SDag-Erling Smørgrav } 58009a3aaf3SDag-Erling Smørgrav slen = strlen(token); 58109a3aaf3SDag-Erling Smørgrav } 58209a3aaf3SDag-Erling Smørgrav *token_strlen = slen; 58309a3aaf3SDag-Erling Smørgrav return 1; 58409a3aaf3SDag-Erling Smørgrav } 58509a3aaf3SDag-Erling Smørgrav 58609a3aaf3SDag-Erling Smørgrav /** Add space and one more rdf token onto the existing token string. */ 58709a3aaf3SDag-Erling Smørgrav static int 58809a3aaf3SDag-Erling Smørgrav sldns_affix_token(sldns_buffer* strbuf, char* token, size_t* token_len, 58909a3aaf3SDag-Erling Smørgrav int* quoted, int* parens, size_t* pre_data_pos, 59009a3aaf3SDag-Erling Smørgrav const char* delimiters, sldns_rdf_type rdftype, size_t* token_strlen) 59109a3aaf3SDag-Erling Smørgrav { 59209a3aaf3SDag-Erling Smørgrav size_t addlen = *token_len - *token_strlen; 59309a3aaf3SDag-Erling Smørgrav size_t addstrlen = 0; 59409a3aaf3SDag-Erling Smørgrav 59509a3aaf3SDag-Erling Smørgrav /* add space */ 59609a3aaf3SDag-Erling Smørgrav if(addlen < 1) return 0; 59709a3aaf3SDag-Erling Smørgrav token[*token_strlen] = ' '; 59809a3aaf3SDag-Erling Smørgrav token[++(*token_strlen)] = 0; 59909a3aaf3SDag-Erling Smørgrav 60009a3aaf3SDag-Erling Smørgrav /* read another token */ 60109a3aaf3SDag-Erling Smørgrav addlen = *token_len - *token_strlen; 60209a3aaf3SDag-Erling Smørgrav if(!sldns_parse_rdf_token(strbuf, token+*token_strlen, addlen, quoted, 60309a3aaf3SDag-Erling Smørgrav parens, pre_data_pos, delimiters, rdftype, &addstrlen)) 60409a3aaf3SDag-Erling Smørgrav return 0; 60509a3aaf3SDag-Erling Smørgrav (*token_strlen) += addstrlen; 60609a3aaf3SDag-Erling Smørgrav return 1; 60709a3aaf3SDag-Erling Smørgrav } 60809a3aaf3SDag-Erling Smørgrav 60909a3aaf3SDag-Erling Smørgrav /** parse rdata from string into rr buffer(-remainder after dname). */ 61009a3aaf3SDag-Erling Smørgrav static int 61109a3aaf3SDag-Erling Smørgrav rrinternal_parse_rdata(sldns_buffer* strbuf, char* token, size_t token_len, 61209a3aaf3SDag-Erling Smørgrav uint8_t* rr, size_t* rr_len, size_t dname_len, uint16_t rr_type, 61309a3aaf3SDag-Erling Smørgrav uint8_t* origin, size_t origin_len) 61409a3aaf3SDag-Erling Smørgrav { 61509a3aaf3SDag-Erling Smørgrav const sldns_rr_descriptor *desc = sldns_rr_descript((uint16_t)rr_type); 616bc892140SDag-Erling Smørgrav size_t r_cnt, r_min, r_max; 61709a3aaf3SDag-Erling Smørgrav size_t rr_cur_len = dname_len + 10, pre_data_pos, token_strlen; 61809a3aaf3SDag-Erling Smørgrav int was_unknown_rr_format = 0, parens = 0, status, quoted; 61909a3aaf3SDag-Erling Smørgrav const char* delimiters; 62009a3aaf3SDag-Erling Smørgrav sldns_rdf_type rdftype; 62109a3aaf3SDag-Erling Smørgrav /* a desc is always returned */ 62209a3aaf3SDag-Erling Smørgrav if(!desc) return LDNS_WIREPARSE_ERR_GENERAL; 62309a3aaf3SDag-Erling Smørgrav r_max = sldns_rr_descriptor_maximum(desc); 62409a3aaf3SDag-Erling Smørgrav r_min = sldns_rr_descriptor_minimum(desc); 62509a3aaf3SDag-Erling Smørgrav /* robust check */ 62609a3aaf3SDag-Erling Smørgrav if(rr_cur_len > *rr_len) 62709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 62809a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 62909a3aaf3SDag-Erling Smørgrav 63009a3aaf3SDag-Erling Smørgrav /* because number of fields can be variable, we can't rely on 63109a3aaf3SDag-Erling Smørgrav * _maximum() only */ 63209a3aaf3SDag-Erling Smørgrav for(r_cnt=0; r_cnt < r_max; r_cnt++) { 63309a3aaf3SDag-Erling Smørgrav rdftype = sldns_rr_descriptor_field_type(desc, r_cnt); 63409a3aaf3SDag-Erling Smørgrav delimiters = rrinternal_get_delims(rdftype, r_cnt, r_max); 63509a3aaf3SDag-Erling Smørgrav quoted = rrinternal_get_quoted(strbuf, &delimiters, rdftype); 63609a3aaf3SDag-Erling Smørgrav 63709a3aaf3SDag-Erling Smørgrav if(!sldns_parse_rdf_token(strbuf, token, token_len, "ed, 63809a3aaf3SDag-Erling Smørgrav &parens, &pre_data_pos, delimiters, rdftype, 63909a3aaf3SDag-Erling Smørgrav &token_strlen)) 64009a3aaf3SDag-Erling Smørgrav break; 64109a3aaf3SDag-Erling Smørgrav 64209a3aaf3SDag-Erling Smørgrav /* rfc3597 specifies that any type can be represented 64309a3aaf3SDag-Erling Smørgrav * with \# method, which can contain spaces... 64409a3aaf3SDag-Erling Smørgrav * it does specify size though... */ 64509a3aaf3SDag-Erling Smørgrav 64609a3aaf3SDag-Erling Smørgrav /* unknown RR data */ 64709a3aaf3SDag-Erling Smørgrav if(token_strlen>=2 && strncmp(token, "\\#", 2) == 0 && 64809a3aaf3SDag-Erling Smørgrav !quoted && (token_strlen == 2 || token[2]==' ')) { 64909a3aaf3SDag-Erling Smørgrav was_unknown_rr_format = 1; 65009a3aaf3SDag-Erling Smørgrav if((status=rrinternal_parse_unknown(strbuf, token, 65109a3aaf3SDag-Erling Smørgrav token_len, rr, rr_len, &rr_cur_len, 65209a3aaf3SDag-Erling Smørgrav pre_data_pos)) != 0) 65309a3aaf3SDag-Erling Smørgrav return status; 65409a3aaf3SDag-Erling Smørgrav } else if(token_strlen > 0 || quoted) { 65509a3aaf3SDag-Erling Smørgrav if(rdftype == LDNS_RDF_TYPE_HIP) { 65609a3aaf3SDag-Erling Smørgrav /* affix the HIT and PK fields, with a space */ 65709a3aaf3SDag-Erling Smørgrav if(!sldns_affix_token(strbuf, token, 65809a3aaf3SDag-Erling Smørgrav &token_len, "ed, &parens, 65909a3aaf3SDag-Erling Smørgrav &pre_data_pos, delimiters, 66009a3aaf3SDag-Erling Smørgrav rdftype, &token_strlen)) 66109a3aaf3SDag-Erling Smørgrav break; 66209a3aaf3SDag-Erling Smørgrav if(!sldns_affix_token(strbuf, token, 66309a3aaf3SDag-Erling Smørgrav &token_len, "ed, &parens, 66409a3aaf3SDag-Erling Smørgrav &pre_data_pos, delimiters, 66509a3aaf3SDag-Erling Smørgrav rdftype, &token_strlen)) 66609a3aaf3SDag-Erling Smørgrav break; 667c7f4d7adSDag-Erling Smørgrav } else if(rdftype == LDNS_RDF_TYPE_INT16_DATA && 668c7f4d7adSDag-Erling Smørgrav strcmp(token, "0")!=0) { 669c7f4d7adSDag-Erling Smørgrav /* affix len and b64 fields */ 670c7f4d7adSDag-Erling Smørgrav if(!sldns_affix_token(strbuf, token, 671c7f4d7adSDag-Erling Smørgrav &token_len, "ed, &parens, 672c7f4d7adSDag-Erling Smørgrav &pre_data_pos, delimiters, 673c7f4d7adSDag-Erling Smørgrav rdftype, &token_strlen)) 674c7f4d7adSDag-Erling Smørgrav break; 67509a3aaf3SDag-Erling Smørgrav } 67609a3aaf3SDag-Erling Smørgrav 67709a3aaf3SDag-Erling Smørgrav /* normal RR */ 67809a3aaf3SDag-Erling Smørgrav if((status=rrinternal_parse_rdf(strbuf, token, 67909a3aaf3SDag-Erling Smørgrav token_len, rr, *rr_len, &rr_cur_len, rdftype, 68009a3aaf3SDag-Erling Smørgrav rr_type, r_cnt, r_max, dname_len, origin, 68109a3aaf3SDag-Erling Smørgrav origin_len)) != 0) { 68209a3aaf3SDag-Erling Smørgrav return status; 68309a3aaf3SDag-Erling Smørgrav } 68409a3aaf3SDag-Erling Smørgrav } 68509a3aaf3SDag-Erling Smørgrav } 68609a3aaf3SDag-Erling Smørgrav if(!was_unknown_rr_format && r_cnt+1 < r_min) { 68709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_MISSING_VALUE, 68809a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 68909a3aaf3SDag-Erling Smørgrav } 69009a3aaf3SDag-Erling Smørgrav while(parens != 0) { 69109a3aaf3SDag-Erling Smørgrav /* read remainder, must be "" */ 69209a3aaf3SDag-Erling Smørgrav if(sldns_bget_token_par(strbuf, token, "\n", token_len, 69309a3aaf3SDag-Erling Smørgrav &parens, " \t") == -1) { 69409a3aaf3SDag-Erling Smørgrav if(parens != 0) 69509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_PARENTHESIS, 69609a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 69709a3aaf3SDag-Erling Smørgrav break; 69809a3aaf3SDag-Erling Smørgrav } 69909a3aaf3SDag-Erling Smørgrav if(strcmp(token, "") != 0) 70009a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_PARENTHESIS, 70109a3aaf3SDag-Erling Smørgrav sldns_buffer_position(strbuf)); 70209a3aaf3SDag-Erling Smørgrav } 70309a3aaf3SDag-Erling Smørgrav /* write rdata length */ 704bc892140SDag-Erling Smørgrav sldns_write_uint16(rr+dname_len+8, (uint16_t)(rr_cur_len-dname_len-10)); 70509a3aaf3SDag-Erling Smørgrav *rr_len = rr_cur_len; 70609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 70709a3aaf3SDag-Erling Smørgrav } 70809a3aaf3SDag-Erling Smørgrav 70909a3aaf3SDag-Erling Smørgrav /* 71009a3aaf3SDag-Erling Smørgrav * trailing spaces are allowed 71109a3aaf3SDag-Erling Smørgrav * leading spaces are not allowed 71209a3aaf3SDag-Erling Smørgrav * allow ttl to be optional 71309a3aaf3SDag-Erling Smørgrav * class is optional too 71409a3aaf3SDag-Erling Smørgrav * if ttl is missing, and default_ttl is 0, use DEF_TTL 71509a3aaf3SDag-Erling Smørgrav * allow ttl to be written as 1d3h 71609a3aaf3SDag-Erling Smørgrav * So the RR should look like. e.g. 71709a3aaf3SDag-Erling Smørgrav * miek.nl. 3600 IN MX 10 elektron.atoom.net 71809a3aaf3SDag-Erling Smørgrav * or 71909a3aaf3SDag-Erling Smørgrav * miek.nl. 1h IN MX 10 elektron.atoom.net 72009a3aaf3SDag-Erling Smørgrav * or 72109a3aaf3SDag-Erling Smørgrav * miek.nl. IN MX 10 elektron.atoom.net 72209a3aaf3SDag-Erling Smørgrav */ 72309a3aaf3SDag-Erling Smørgrav static int 72409a3aaf3SDag-Erling Smørgrav sldns_str2wire_rr_buf_internal(const char* str, uint8_t* rr, size_t* len, 72509a3aaf3SDag-Erling Smørgrav size_t* dname_len, uint32_t default_ttl, uint8_t* origin, 72609a3aaf3SDag-Erling Smørgrav size_t origin_len, uint8_t* prev, size_t prev_len, int question) 72709a3aaf3SDag-Erling Smørgrav { 72809a3aaf3SDag-Erling Smørgrav int status; 72909a3aaf3SDag-Erling Smørgrav int not_there = 0; 73009a3aaf3SDag-Erling Smørgrav char token[LDNS_MAX_RDFLEN+1]; 73109a3aaf3SDag-Erling Smørgrav uint32_t ttl = 0; 73209a3aaf3SDag-Erling Smørgrav uint16_t tp = 0, cl = 0; 73309a3aaf3SDag-Erling Smørgrav size_t ddlen = 0; 73409a3aaf3SDag-Erling Smørgrav 73509a3aaf3SDag-Erling Smørgrav /* string in buffer */ 73609a3aaf3SDag-Erling Smørgrav sldns_buffer strbuf; 73709a3aaf3SDag-Erling Smørgrav sldns_buffer_init_frm_data(&strbuf, (uint8_t*)str, strlen(str)); 73809a3aaf3SDag-Erling Smørgrav if(!dname_len) dname_len = &ddlen; 73909a3aaf3SDag-Erling Smørgrav 74009a3aaf3SDag-Erling Smørgrav /* parse the owner */ 74109a3aaf3SDag-Erling Smørgrav if((status=rrinternal_get_owner(&strbuf, rr, len, dname_len, origin, 74209a3aaf3SDag-Erling Smørgrav origin_len, prev, prev_len, token, sizeof(token))) != 0) 74309a3aaf3SDag-Erling Smørgrav return status; 74409a3aaf3SDag-Erling Smørgrav 74509a3aaf3SDag-Erling Smørgrav /* parse the [ttl] [class] <type> */ 74609a3aaf3SDag-Erling Smørgrav if((status=rrinternal_get_ttl(&strbuf, token, sizeof(token), 74709a3aaf3SDag-Erling Smørgrav ¬_there, &ttl, default_ttl)) != 0) 74809a3aaf3SDag-Erling Smørgrav return status; 74909a3aaf3SDag-Erling Smørgrav if((status=rrinternal_get_class(&strbuf, token, sizeof(token), 75009a3aaf3SDag-Erling Smørgrav ¬_there, &cl)) != 0) 75109a3aaf3SDag-Erling Smørgrav return status; 75209a3aaf3SDag-Erling Smørgrav if((status=rrinternal_get_type(&strbuf, token, sizeof(token), 75309a3aaf3SDag-Erling Smørgrav ¬_there, &tp)) != 0) 75409a3aaf3SDag-Erling Smørgrav return status; 75509a3aaf3SDag-Erling Smørgrav /* put ttl, class, type into the rr result */ 75609a3aaf3SDag-Erling Smørgrav if((status=rrinternal_write_typeclassttl(&strbuf, rr, *len, *dname_len, tp, cl, 75709a3aaf3SDag-Erling Smørgrav ttl, question)) != 0) 75809a3aaf3SDag-Erling Smørgrav return status; 75909a3aaf3SDag-Erling Smørgrav /* for a question-RR we are done, no rdata */ 76009a3aaf3SDag-Erling Smørgrav if(question) { 76109a3aaf3SDag-Erling Smørgrav *len = *dname_len + 4; 76209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 76309a3aaf3SDag-Erling Smørgrav } 76409a3aaf3SDag-Erling Smørgrav 76509a3aaf3SDag-Erling Smørgrav /* rdata */ 76609a3aaf3SDag-Erling Smørgrav if((status=rrinternal_parse_rdata(&strbuf, token, sizeof(token), 76709a3aaf3SDag-Erling Smørgrav rr, len, *dname_len, tp, origin, origin_len)) != 0) 76809a3aaf3SDag-Erling Smørgrav return status; 76909a3aaf3SDag-Erling Smørgrav 77009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 77109a3aaf3SDag-Erling Smørgrav } 77209a3aaf3SDag-Erling Smørgrav 77309a3aaf3SDag-Erling Smørgrav int sldns_str2wire_rr_buf(const char* str, uint8_t* rr, size_t* len, 77409a3aaf3SDag-Erling Smørgrav size_t* dname_len, uint32_t default_ttl, uint8_t* origin, 77509a3aaf3SDag-Erling Smørgrav size_t origin_len, uint8_t* prev, size_t prev_len) 77609a3aaf3SDag-Erling Smørgrav { 77709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_rr_buf_internal(str, rr, len, dname_len, 77809a3aaf3SDag-Erling Smørgrav default_ttl, origin, origin_len, prev, prev_len, 0); 77909a3aaf3SDag-Erling Smørgrav } 78009a3aaf3SDag-Erling Smørgrav 78109a3aaf3SDag-Erling Smørgrav int sldns_str2wire_rr_question_buf(const char* str, uint8_t* rr, size_t* len, 78209a3aaf3SDag-Erling Smørgrav size_t* dname_len, uint8_t* origin, size_t origin_len, uint8_t* prev, 78309a3aaf3SDag-Erling Smørgrav size_t prev_len) 78409a3aaf3SDag-Erling Smørgrav { 78509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_rr_buf_internal(str, rr, len, dname_len, 78609a3aaf3SDag-Erling Smørgrav 0, origin, origin_len, prev, prev_len, 1); 78709a3aaf3SDag-Erling Smørgrav } 78809a3aaf3SDag-Erling Smørgrav 78909a3aaf3SDag-Erling Smørgrav uint16_t sldns_wirerr_get_type(uint8_t* rr, size_t len, size_t dname_len) 79009a3aaf3SDag-Erling Smørgrav { 79109a3aaf3SDag-Erling Smørgrav if(len < dname_len+2) 79209a3aaf3SDag-Erling Smørgrav return 0; 79309a3aaf3SDag-Erling Smørgrav return sldns_read_uint16(rr+dname_len); 79409a3aaf3SDag-Erling Smørgrav } 79509a3aaf3SDag-Erling Smørgrav 79609a3aaf3SDag-Erling Smørgrav uint16_t sldns_wirerr_get_class(uint8_t* rr, size_t len, size_t dname_len) 79709a3aaf3SDag-Erling Smørgrav { 79809a3aaf3SDag-Erling Smørgrav if(len < dname_len+4) 79909a3aaf3SDag-Erling Smørgrav return 0; 80009a3aaf3SDag-Erling Smørgrav return sldns_read_uint16(rr+dname_len+2); 80109a3aaf3SDag-Erling Smørgrav } 80209a3aaf3SDag-Erling Smørgrav 80309a3aaf3SDag-Erling Smørgrav uint32_t sldns_wirerr_get_ttl(uint8_t* rr, size_t len, size_t dname_len) 80409a3aaf3SDag-Erling Smørgrav { 80509a3aaf3SDag-Erling Smørgrav if(len < dname_len+8) 80609a3aaf3SDag-Erling Smørgrav return 0; 80709a3aaf3SDag-Erling Smørgrav return sldns_read_uint32(rr+dname_len+4); 80809a3aaf3SDag-Erling Smørgrav } 80909a3aaf3SDag-Erling Smørgrav 81009a3aaf3SDag-Erling Smørgrav uint16_t sldns_wirerr_get_rdatalen(uint8_t* rr, size_t len, size_t dname_len) 81109a3aaf3SDag-Erling Smørgrav { 81209a3aaf3SDag-Erling Smørgrav if(len < dname_len+10) 81309a3aaf3SDag-Erling Smørgrav return 0; 81409a3aaf3SDag-Erling Smørgrav return sldns_read_uint16(rr+dname_len+8); 81509a3aaf3SDag-Erling Smørgrav } 81609a3aaf3SDag-Erling Smørgrav 81709a3aaf3SDag-Erling Smørgrav uint8_t* sldns_wirerr_get_rdata(uint8_t* rr, size_t len, size_t dname_len) 81809a3aaf3SDag-Erling Smørgrav { 81909a3aaf3SDag-Erling Smørgrav if(len < dname_len+10) 82009a3aaf3SDag-Erling Smørgrav return NULL; 82109a3aaf3SDag-Erling Smørgrav return rr+dname_len+10; 82209a3aaf3SDag-Erling Smørgrav } 82309a3aaf3SDag-Erling Smørgrav 82409a3aaf3SDag-Erling Smørgrav uint8_t* sldns_wirerr_get_rdatawl(uint8_t* rr, size_t len, size_t dname_len) 82509a3aaf3SDag-Erling Smørgrav { 82609a3aaf3SDag-Erling Smørgrav if(len < dname_len+10) 82709a3aaf3SDag-Erling Smørgrav return NULL; 82809a3aaf3SDag-Erling Smørgrav return rr+dname_len+8; 82909a3aaf3SDag-Erling Smørgrav } 83009a3aaf3SDag-Erling Smørgrav 83109a3aaf3SDag-Erling Smørgrav const char* sldns_get_errorstr_parse(int e) 83209a3aaf3SDag-Erling Smørgrav { 83309a3aaf3SDag-Erling Smørgrav sldns_lookup_table *lt; 83409a3aaf3SDag-Erling Smørgrav lt = sldns_lookup_by_id(sldns_wireparse_errors, LDNS_WIREPARSE_ERROR(e)); 83509a3aaf3SDag-Erling Smørgrav return lt?lt->name:"unknown error"; 83609a3aaf3SDag-Erling Smørgrav } 83709a3aaf3SDag-Erling Smørgrav 83809a3aaf3SDag-Erling Smørgrav /* Strip whitespace from the start and the end of <line>. */ 839*57bddd21SDag-Erling Smørgrav char * 84009a3aaf3SDag-Erling Smørgrav sldns_strip_ws(char *line) 84109a3aaf3SDag-Erling Smørgrav { 84209a3aaf3SDag-Erling Smørgrav char *s = line, *e; 84309a3aaf3SDag-Erling Smørgrav 84409a3aaf3SDag-Erling Smørgrav for (s = line; *s && isspace((unsigned char)*s); s++) 84509a3aaf3SDag-Erling Smørgrav ; 84609a3aaf3SDag-Erling Smørgrav for (e = strchr(s, 0); e > s+2 && isspace((unsigned char)e[-1]) && e[-2] != '\\'; e--) 84709a3aaf3SDag-Erling Smørgrav ; 84809a3aaf3SDag-Erling Smørgrav *e = 0; 84909a3aaf3SDag-Erling Smørgrav return s; 85009a3aaf3SDag-Erling Smørgrav } 85109a3aaf3SDag-Erling Smørgrav 85209a3aaf3SDag-Erling Smørgrav int sldns_fp2wire_rr_buf(FILE* in, uint8_t* rr, size_t* len, size_t* dname_len, 85309a3aaf3SDag-Erling Smørgrav struct sldns_file_parse_state* parse_state) 85409a3aaf3SDag-Erling Smørgrav { 85509a3aaf3SDag-Erling Smørgrav char line[LDNS_RR_BUF_SIZE+1]; 85609a3aaf3SDag-Erling Smørgrav ssize_t size; 85709a3aaf3SDag-Erling Smørgrav 85809a3aaf3SDag-Erling Smørgrav /* read an entire line in from the file */ 85909a3aaf3SDag-Erling Smørgrav if((size = sldns_fget_token_l(in, line, LDNS_PARSE_SKIP_SPACE, 86009a3aaf3SDag-Erling Smørgrav LDNS_RR_BUF_SIZE, parse_state?&parse_state->lineno:NULL)) 86109a3aaf3SDag-Erling Smørgrav == -1) { 86209a3aaf3SDag-Erling Smørgrav /* if last line was empty, we are now at feof, which is not 86309a3aaf3SDag-Erling Smørgrav * always a parse error (happens when for instance last line 86409a3aaf3SDag-Erling Smørgrav * was a comment) 86509a3aaf3SDag-Erling Smørgrav */ 86609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX; 86709a3aaf3SDag-Erling Smørgrav } 86809a3aaf3SDag-Erling Smørgrav 86909a3aaf3SDag-Erling Smørgrav /* we can have the situation, where we've read ok, but still got 87009a3aaf3SDag-Erling Smørgrav * no bytes to play with, in this case size is 0 */ 87109a3aaf3SDag-Erling Smørgrav if(size == 0) { 872c7f4d7adSDag-Erling Smørgrav if(*len > 0) 873c7f4d7adSDag-Erling Smørgrav rr[0] = 0; 87409a3aaf3SDag-Erling Smørgrav *len = 0; 87509a3aaf3SDag-Erling Smørgrav *dname_len = 0; 87609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 87709a3aaf3SDag-Erling Smørgrav } 87809a3aaf3SDag-Erling Smørgrav 87909a3aaf3SDag-Erling Smørgrav if(strncmp(line, "$ORIGIN", 7) == 0 && isspace((unsigned char)line[7])) { 88009a3aaf3SDag-Erling Smørgrav int s; 881c7f4d7adSDag-Erling Smørgrav strlcpy((char*)rr, line, *len); 88209a3aaf3SDag-Erling Smørgrav *len = 0; 88309a3aaf3SDag-Erling Smørgrav *dname_len = 0; 88409a3aaf3SDag-Erling Smørgrav if(!parse_state) return LDNS_WIREPARSE_ERR_OK; 88509a3aaf3SDag-Erling Smørgrav parse_state->origin_len = sizeof(parse_state->origin); 88609a3aaf3SDag-Erling Smørgrav s = sldns_str2wire_dname_buf(sldns_strip_ws(line+8), 88709a3aaf3SDag-Erling Smørgrav parse_state->origin, &parse_state->origin_len); 88809a3aaf3SDag-Erling Smørgrav if(s) parse_state->origin_len = 0; 88909a3aaf3SDag-Erling Smørgrav return s; 89009a3aaf3SDag-Erling Smørgrav } else if(strncmp(line, "$TTL", 4) == 0 && isspace((unsigned char)line[4])) { 89109a3aaf3SDag-Erling Smørgrav const char* end = NULL; 892c7f4d7adSDag-Erling Smørgrav strlcpy((char*)rr, line, *len); 89309a3aaf3SDag-Erling Smørgrav *len = 0; 89409a3aaf3SDag-Erling Smørgrav *dname_len = 0; 89509a3aaf3SDag-Erling Smørgrav if(!parse_state) return LDNS_WIREPARSE_ERR_OK; 89609a3aaf3SDag-Erling Smørgrav parse_state->default_ttl = sldns_str2period( 89709a3aaf3SDag-Erling Smørgrav sldns_strip_ws(line+5), &end); 89809a3aaf3SDag-Erling Smørgrav } else if (strncmp(line, "$INCLUDE", 8) == 0) { 899c7f4d7adSDag-Erling Smørgrav strlcpy((char*)rr, line, *len); 900c7f4d7adSDag-Erling Smørgrav *len = 0; 901c7f4d7adSDag-Erling Smørgrav *dname_len = 0; 902c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INCLUDE; 903c7f4d7adSDag-Erling Smørgrav } else if (strncmp(line, "$", 1) == 0) { 904c7f4d7adSDag-Erling Smørgrav strlcpy((char*)rr, line, *len); 90509a3aaf3SDag-Erling Smørgrav *len = 0; 90609a3aaf3SDag-Erling Smørgrav *dname_len = 0; 90709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INCLUDE; 90809a3aaf3SDag-Erling Smørgrav } else { 909*57bddd21SDag-Erling Smørgrav int r = sldns_str2wire_rr_buf(line, rr, len, dname_len, 91009a3aaf3SDag-Erling Smørgrav parse_state?parse_state->default_ttl:0, 91109a3aaf3SDag-Erling Smørgrav (parse_state&&parse_state->origin_len)? 91209a3aaf3SDag-Erling Smørgrav parse_state->origin:NULL, 913e2d15004SDag-Erling Smørgrav parse_state?parse_state->origin_len:0, 91409a3aaf3SDag-Erling Smørgrav (parse_state&&parse_state->prev_rr_len)? 91509a3aaf3SDag-Erling Smørgrav parse_state->prev_rr:NULL, 916e2d15004SDag-Erling Smørgrav parse_state?parse_state->prev_rr_len:0); 917*57bddd21SDag-Erling Smørgrav if(r == LDNS_WIREPARSE_ERR_OK && (*dname_len) != 0 && 918*57bddd21SDag-Erling Smørgrav parse_state && 919*57bddd21SDag-Erling Smørgrav (*dname_len) <= sizeof(parse_state->prev_rr)) { 920*57bddd21SDag-Erling Smørgrav memmove(parse_state->prev_rr, rr, *dname_len); 921*57bddd21SDag-Erling Smørgrav parse_state->prev_rr_len = (*dname_len); 922*57bddd21SDag-Erling Smørgrav } 923*57bddd21SDag-Erling Smørgrav return r; 92409a3aaf3SDag-Erling Smørgrav } 92509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 92609a3aaf3SDag-Erling Smørgrav } 92709a3aaf3SDag-Erling Smørgrav 92809a3aaf3SDag-Erling Smørgrav int sldns_str2wire_rdf_buf(const char* str, uint8_t* rd, size_t* len, 92909a3aaf3SDag-Erling Smørgrav sldns_rdf_type rdftype) 93009a3aaf3SDag-Erling Smørgrav { 93109a3aaf3SDag-Erling Smørgrav switch (rdftype) { 93209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_DNAME: 93309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_dname_buf(str, rd, len); 93409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_INT8: 93509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_int8_buf(str, rd, len); 93609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_INT16: 93709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_int16_buf(str, rd, len); 93809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_INT32: 93909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_int32_buf(str, rd, len); 94009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_A: 94109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_a_buf(str, rd, len); 94209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_AAAA: 94309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_aaaa_buf(str, rd, len); 94409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_STR: 94509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_str_buf(str, rd, len); 94609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_APL: 94709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_apl_buf(str, rd, len); 94809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_B64: 94909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_b64_buf(str, rd, len); 95009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_B32_EXT: 95109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_b32_ext_buf(str, rd, len); 95209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_HEX: 95309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_hex_buf(str, rd, len); 95409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NSEC: 95509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_nsec_buf(str, rd, len); 95609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_TYPE: 95709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_type_buf(str, rd, len); 95809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_CLASS: 95909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_class_buf(str, rd, len); 96009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_CERT_ALG: 96109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_cert_alg_buf(str, rd, len); 96209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_ALG: 96309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_alg_buf(str, rd, len); 96409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_TIME: 96509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_time_buf(str, rd, len); 96609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_PERIOD: 96709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_period_buf(str, rd, len); 968c7f4d7adSDag-Erling Smørgrav case LDNS_RDF_TYPE_TSIGTIME: 969c7f4d7adSDag-Erling Smørgrav return sldns_str2wire_tsigtime_buf(str, rd, len); 97009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_LOC: 97109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_loc_buf(str, rd, len); 97209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_WKS: 97309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_wks_buf(str, rd, len); 97409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NSAP: 97509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_nsap_buf(str, rd, len); 97609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_ATMA: 97709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_atma_buf(str, rd, len); 97809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_IPSECKEY: 97909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_ipseckey_buf(str, rd, len); 98009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NSEC3_SALT: 98109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_nsec3_salt_buf(str, rd, len); 98209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NSEC3_NEXT_OWNER: 98309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_b32_ext_buf(str, rd, len); 98409a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_ILNP64: 98509a3aaf3SDag-Erling Smørgrav return sldns_str2wire_ilnp64_buf(str, rd, len); 98609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_EUI48: 98709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_eui48_buf(str, rd, len); 98809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_EUI64: 98909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_eui64_buf(str, rd, len); 99009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_TAG: 99109a3aaf3SDag-Erling Smørgrav return sldns_str2wire_tag_buf(str, rd, len); 99209a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_LONG_STR: 99309a3aaf3SDag-Erling Smørgrav return sldns_str2wire_long_str_buf(str, rd, len); 994c7f4d7adSDag-Erling Smørgrav case LDNS_RDF_TYPE_TSIGERROR: 995c7f4d7adSDag-Erling Smørgrav return sldns_str2wire_tsigerror_buf(str, rd, len); 99609a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_HIP: 99709a3aaf3SDag-Erling Smørgrav return sldns_str2wire_hip_buf(str, rd, len); 99809a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_INT16_DATA: 99909a3aaf3SDag-Erling Smørgrav return sldns_str2wire_int16_data_buf(str, rd, len); 100009a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_UNKNOWN: 100109a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_SERVICE: 100209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_NOT_IMPL; 100309a3aaf3SDag-Erling Smørgrav case LDNS_RDF_TYPE_NONE: 100409a3aaf3SDag-Erling Smørgrav default: 100509a3aaf3SDag-Erling Smørgrav break; 100609a3aaf3SDag-Erling Smørgrav } 100709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_GENERAL; 100809a3aaf3SDag-Erling Smørgrav } 100909a3aaf3SDag-Erling Smørgrav 101009a3aaf3SDag-Erling Smørgrav int sldns_str2wire_int8_buf(const char* str, uint8_t* rd, size_t* len) 101109a3aaf3SDag-Erling Smørgrav { 101209a3aaf3SDag-Erling Smørgrav char* end; 101309a3aaf3SDag-Erling Smørgrav uint8_t r = (uint8_t)strtol((char*)str, &end, 10); 101409a3aaf3SDag-Erling Smørgrav if(*end != 0) 101509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_INT, end-(char*)str); 101609a3aaf3SDag-Erling Smørgrav if(*len < 1) 101709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 101809a3aaf3SDag-Erling Smørgrav rd[0] = r; 101909a3aaf3SDag-Erling Smørgrav *len = 1; 102009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 102109a3aaf3SDag-Erling Smørgrav } 102209a3aaf3SDag-Erling Smørgrav 102309a3aaf3SDag-Erling Smørgrav int sldns_str2wire_int16_buf(const char* str, uint8_t* rd, size_t* len) 102409a3aaf3SDag-Erling Smørgrav { 102509a3aaf3SDag-Erling Smørgrav char* end; 102609a3aaf3SDag-Erling Smørgrav uint16_t r = (uint16_t)strtol((char*)str, &end, 10); 102709a3aaf3SDag-Erling Smørgrav if(*end != 0) 102809a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_INT, end-(char*)str); 102909a3aaf3SDag-Erling Smørgrav if(*len < 2) 103009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 103109a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rd, r); 103209a3aaf3SDag-Erling Smørgrav *len = 2; 103309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 103409a3aaf3SDag-Erling Smørgrav } 103509a3aaf3SDag-Erling Smørgrav 103609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_int32_buf(const char* str, uint8_t* rd, size_t* len) 103709a3aaf3SDag-Erling Smørgrav { 103809a3aaf3SDag-Erling Smørgrav char* end; 103909a3aaf3SDag-Erling Smørgrav uint32_t r; 104009a3aaf3SDag-Erling Smørgrav errno = 0; /* must set to zero before call, 104109a3aaf3SDag-Erling Smørgrav note race condition on errno */ 104209a3aaf3SDag-Erling Smørgrav if(*str == '-') 104309a3aaf3SDag-Erling Smørgrav r = (uint32_t)strtol((char*)str, &end, 10); 104409a3aaf3SDag-Erling Smørgrav else r = (uint32_t)strtoul((char*)str, &end, 10); 104509a3aaf3SDag-Erling Smørgrav if(*end != 0) 104609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_INT, end-(char*)str); 104709a3aaf3SDag-Erling Smørgrav if(errno == ERANGE) 104809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_INTEGER_OVERFLOW; 104909a3aaf3SDag-Erling Smørgrav if(*len < 4) 105009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 105109a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd, r); 105209a3aaf3SDag-Erling Smørgrav *len = 4; 105309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 105409a3aaf3SDag-Erling Smørgrav } 105509a3aaf3SDag-Erling Smørgrav 105609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_a_buf(const char* str, uint8_t* rd, size_t* len) 105709a3aaf3SDag-Erling Smørgrav { 105809a3aaf3SDag-Erling Smørgrav struct in_addr address; 105909a3aaf3SDag-Erling Smørgrav if(inet_pton(AF_INET, (char*)str, &address) != 1) 106009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_IP4; 106109a3aaf3SDag-Erling Smørgrav if(*len < sizeof(address)) 106209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 106309a3aaf3SDag-Erling Smørgrav memmove(rd, &address, sizeof(address)); 106409a3aaf3SDag-Erling Smørgrav *len = sizeof(address); 106509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 106609a3aaf3SDag-Erling Smørgrav } 106709a3aaf3SDag-Erling Smørgrav 106809a3aaf3SDag-Erling Smørgrav int sldns_str2wire_aaaa_buf(const char* str, uint8_t* rd, size_t* len) 106909a3aaf3SDag-Erling Smørgrav { 107009a3aaf3SDag-Erling Smørgrav #ifdef AF_INET6 107109a3aaf3SDag-Erling Smørgrav uint8_t address[LDNS_IP6ADDRLEN + 1]; 107209a3aaf3SDag-Erling Smørgrav if(inet_pton(AF_INET6, (char*)str, address) != 1) 107309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_IP6; 107409a3aaf3SDag-Erling Smørgrav if(*len < LDNS_IP6ADDRLEN) 107509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 107609a3aaf3SDag-Erling Smørgrav memmove(rd, address, LDNS_IP6ADDRLEN); 107709a3aaf3SDag-Erling Smørgrav *len = LDNS_IP6ADDRLEN; 107809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 107909a3aaf3SDag-Erling Smørgrav #else 108009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_NOT_IMPL; 108109a3aaf3SDag-Erling Smørgrav #endif 108209a3aaf3SDag-Erling Smørgrav } 108309a3aaf3SDag-Erling Smørgrav 108409a3aaf3SDag-Erling Smørgrav int sldns_str2wire_str_buf(const char* str, uint8_t* rd, size_t* len) 108509a3aaf3SDag-Erling Smørgrav { 108609a3aaf3SDag-Erling Smørgrav uint8_t ch = 0; 108709a3aaf3SDag-Erling Smørgrav size_t sl = 0; 108809a3aaf3SDag-Erling Smørgrav const char* s = str; 108909a3aaf3SDag-Erling Smørgrav /* skip length byte */ 109009a3aaf3SDag-Erling Smørgrav if(*len < 1) 109109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 109209a3aaf3SDag-Erling Smørgrav 109309a3aaf3SDag-Erling Smørgrav /* read characters */ 109409a3aaf3SDag-Erling Smørgrav while(sldns_parse_char(&ch, &s)) { 109509a3aaf3SDag-Erling Smørgrav if(sl >= 255) 109609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, s-str); 109709a3aaf3SDag-Erling Smørgrav if(*len < sl+1) 109809a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 109909a3aaf3SDag-Erling Smørgrav s-str); 110009a3aaf3SDag-Erling Smørgrav rd[++sl] = ch; 110109a3aaf3SDag-Erling Smørgrav } 110209a3aaf3SDag-Erling Smørgrav if(!s) 110309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_BAD_ESCAPE; 110409a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t)sl; 110509a3aaf3SDag-Erling Smørgrav *len = sl+1; 110609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 110709a3aaf3SDag-Erling Smørgrav } 110809a3aaf3SDag-Erling Smørgrav 110909a3aaf3SDag-Erling Smørgrav int sldns_str2wire_apl_buf(const char* str, uint8_t* rd, size_t* len) 111009a3aaf3SDag-Erling Smørgrav { 111109a3aaf3SDag-Erling Smørgrav const char *my_str = str; 111209a3aaf3SDag-Erling Smørgrav 111309a3aaf3SDag-Erling Smørgrav char my_ip_str[64]; 111409a3aaf3SDag-Erling Smørgrav size_t ip_str_len; 111509a3aaf3SDag-Erling Smørgrav 111609a3aaf3SDag-Erling Smørgrav uint16_t family; 111709a3aaf3SDag-Erling Smørgrav int negation; 111809a3aaf3SDag-Erling Smørgrav size_t adflength = 0; 111909a3aaf3SDag-Erling Smørgrav uint8_t data[16+4]; 112009a3aaf3SDag-Erling Smørgrav uint8_t prefix; 112109a3aaf3SDag-Erling Smørgrav size_t i; 112209a3aaf3SDag-Erling Smørgrav 1123f61ef7f6SDag-Erling Smørgrav if(*my_str == '\0') { 112409a3aaf3SDag-Erling Smørgrav /* empty APL element, no data, no string */ 112509a3aaf3SDag-Erling Smørgrav *len = 0; 112609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 112709a3aaf3SDag-Erling Smørgrav } 112809a3aaf3SDag-Erling Smørgrav 112909a3aaf3SDag-Erling Smørgrav /* [!]afi:address/prefix */ 113009a3aaf3SDag-Erling Smørgrav if (strlen(my_str) < 2 113109a3aaf3SDag-Erling Smørgrav || strchr(my_str, ':') == NULL 113209a3aaf3SDag-Erling Smørgrav || strchr(my_str, '/') == NULL 113309a3aaf3SDag-Erling Smørgrav || strchr(my_str, ':') > strchr(my_str, '/')) { 113409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 113509a3aaf3SDag-Erling Smørgrav } 113609a3aaf3SDag-Erling Smørgrav 113709a3aaf3SDag-Erling Smørgrav if (my_str[0] == '!') { 113809a3aaf3SDag-Erling Smørgrav negation = 1; 113909a3aaf3SDag-Erling Smørgrav my_str += 1; 114009a3aaf3SDag-Erling Smørgrav } else { 114109a3aaf3SDag-Erling Smørgrav negation = 0; 114209a3aaf3SDag-Erling Smørgrav } 114309a3aaf3SDag-Erling Smørgrav 114409a3aaf3SDag-Erling Smørgrav family = (uint16_t) atoi(my_str); 114509a3aaf3SDag-Erling Smørgrav 114609a3aaf3SDag-Erling Smørgrav my_str = strchr(my_str, ':') + 1; 114709a3aaf3SDag-Erling Smørgrav 114809a3aaf3SDag-Erling Smørgrav /* need ip addr and only ip addr for inet_pton */ 114909a3aaf3SDag-Erling Smørgrav ip_str_len = (size_t) (strchr(my_str, '/') - my_str); 115009a3aaf3SDag-Erling Smørgrav if(ip_str_len+1 > sizeof(my_ip_str)) 115109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 115209a3aaf3SDag-Erling Smørgrav (void)strlcpy(my_ip_str, my_str, sizeof(my_ip_str)); 115309a3aaf3SDag-Erling Smørgrav my_ip_str[ip_str_len] = 0; 115409a3aaf3SDag-Erling Smørgrav 115509a3aaf3SDag-Erling Smørgrav if (family == 1) { 115609a3aaf3SDag-Erling Smørgrav /* ipv4 */ 115709a3aaf3SDag-Erling Smørgrav if(inet_pton(AF_INET, my_ip_str, data+4) == 0) 115809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 115909a3aaf3SDag-Erling Smørgrav for (i = 0; i < 4; i++) { 116009a3aaf3SDag-Erling Smørgrav if (data[i+4] != 0) { 116109a3aaf3SDag-Erling Smørgrav adflength = i + 1; 116209a3aaf3SDag-Erling Smørgrav } 116309a3aaf3SDag-Erling Smørgrav } 116409a3aaf3SDag-Erling Smørgrav } else if (family == 2) { 116509a3aaf3SDag-Erling Smørgrav /* ipv6 */ 116609a3aaf3SDag-Erling Smørgrav if (inet_pton(AF_INET6, my_ip_str, data+4) == 0) 116709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 116809a3aaf3SDag-Erling Smørgrav for (i = 0; i < 16; i++) { 116909a3aaf3SDag-Erling Smørgrav if (data[i+4] != 0) { 117009a3aaf3SDag-Erling Smørgrav adflength = i + 1; 117109a3aaf3SDag-Erling Smørgrav } 117209a3aaf3SDag-Erling Smørgrav } 117309a3aaf3SDag-Erling Smørgrav } else { 117409a3aaf3SDag-Erling Smørgrav /* unknown family */ 117509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 117609a3aaf3SDag-Erling Smørgrav } 117709a3aaf3SDag-Erling Smørgrav 117809a3aaf3SDag-Erling Smørgrav my_str = strchr(my_str, '/') + 1; 117909a3aaf3SDag-Erling Smørgrav prefix = (uint8_t) atoi(my_str); 118009a3aaf3SDag-Erling Smørgrav 118109a3aaf3SDag-Erling Smørgrav sldns_write_uint16(data, family); 118209a3aaf3SDag-Erling Smørgrav data[2] = prefix; 118309a3aaf3SDag-Erling Smørgrav data[3] = (uint8_t)adflength; 118409a3aaf3SDag-Erling Smørgrav if (negation) { 118509a3aaf3SDag-Erling Smørgrav /* set bit 1 of byte 3 */ 118609a3aaf3SDag-Erling Smørgrav data[3] = data[3] | 0x80; 118709a3aaf3SDag-Erling Smørgrav } 118809a3aaf3SDag-Erling Smørgrav 118909a3aaf3SDag-Erling Smørgrav if(*len < 4+adflength) 119009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 119109a3aaf3SDag-Erling Smørgrav memmove(rd, data, 4+adflength); 119209a3aaf3SDag-Erling Smørgrav *len = 4+adflength; 119309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 119409a3aaf3SDag-Erling Smørgrav } 119509a3aaf3SDag-Erling Smørgrav 119609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_b64_buf(const char* str, uint8_t* rd, size_t* len) 119709a3aaf3SDag-Erling Smørgrav { 119809a3aaf3SDag-Erling Smørgrav size_t sz = sldns_b64_pton_calculate_size(strlen(str)); 119909a3aaf3SDag-Erling Smørgrav int n; 1200971980c3SDag-Erling Smørgrav if(strcmp(str, "0") == 0) { 1201971980c3SDag-Erling Smørgrav *len = 0; 1202971980c3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 1203971980c3SDag-Erling Smørgrav } 120409a3aaf3SDag-Erling Smørgrav if(*len < sz) 120509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 120609a3aaf3SDag-Erling Smørgrav n = sldns_b64_pton(str, rd, *len); 120709a3aaf3SDag-Erling Smørgrav if(n < 0) 120809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_B64; 120909a3aaf3SDag-Erling Smørgrav *len = (size_t)n; 121009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 121109a3aaf3SDag-Erling Smørgrav } 121209a3aaf3SDag-Erling Smørgrav 121309a3aaf3SDag-Erling Smørgrav int sldns_str2wire_b32_ext_buf(const char* str, uint8_t* rd, size_t* len) 121409a3aaf3SDag-Erling Smørgrav { 121509a3aaf3SDag-Erling Smørgrav size_t slen = strlen(str); 121609a3aaf3SDag-Erling Smørgrav size_t sz = sldns_b32_pton_calculate_size(slen); 121709a3aaf3SDag-Erling Smørgrav int n; 121809a3aaf3SDag-Erling Smørgrav if(*len < 1+sz) 121909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 122009a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t)sz; 122109a3aaf3SDag-Erling Smørgrav n = sldns_b32_pton_extended_hex(str, slen, rd+1, *len-1); 122209a3aaf3SDag-Erling Smørgrav if(n < 0) 122309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_B32_EXT; 122409a3aaf3SDag-Erling Smørgrav *len = (size_t)n+1; 122509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 122609a3aaf3SDag-Erling Smørgrav } 122709a3aaf3SDag-Erling Smørgrav 122809a3aaf3SDag-Erling Smørgrav int sldns_str2wire_hex_buf(const char* str, uint8_t* rd, size_t* len) 122909a3aaf3SDag-Erling Smørgrav { 123009a3aaf3SDag-Erling Smørgrav const char* s = str; 123109a3aaf3SDag-Erling Smørgrav size_t dlen = 0; /* number of hexdigits parsed */ 123209a3aaf3SDag-Erling Smørgrav while(*s) { 123309a3aaf3SDag-Erling Smørgrav if(isspace((unsigned char)*s)) { 123409a3aaf3SDag-Erling Smørgrav s++; 123509a3aaf3SDag-Erling Smørgrav continue; 123609a3aaf3SDag-Erling Smørgrav } 1237971980c3SDag-Erling Smørgrav if(dlen == 0 && *s == '0' && *(s+1) == 0) { 1238971980c3SDag-Erling Smørgrav *len = 0; 1239971980c3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 1240971980c3SDag-Erling Smørgrav } 124109a3aaf3SDag-Erling Smørgrav if(!isxdigit((unsigned char)*s)) 124209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 124309a3aaf3SDag-Erling Smørgrav if(*len < dlen/2 + 1) 124409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 124509a3aaf3SDag-Erling Smørgrav s-str); 124609a3aaf3SDag-Erling Smørgrav if((dlen&1)==0) 124709a3aaf3SDag-Erling Smørgrav rd[dlen/2] = (uint8_t)sldns_hexdigit_to_int(*s++) * 16; 124809a3aaf3SDag-Erling Smørgrav else rd[dlen/2] += (uint8_t)sldns_hexdigit_to_int(*s++); 124909a3aaf3SDag-Erling Smørgrav dlen++; 125009a3aaf3SDag-Erling Smørgrav } 125109a3aaf3SDag-Erling Smørgrav if((dlen&1)!=0) 125209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 125309a3aaf3SDag-Erling Smørgrav *len = dlen/2; 125409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 125509a3aaf3SDag-Erling Smørgrav } 125609a3aaf3SDag-Erling Smørgrav 125709a3aaf3SDag-Erling Smørgrav int sldns_str2wire_nsec_buf(const char* str, uint8_t* rd, size_t* len) 125809a3aaf3SDag-Erling Smørgrav { 125909a3aaf3SDag-Erling Smørgrav const char *delim = "\n\t "; 126009a3aaf3SDag-Erling Smørgrav char token[64]; /* for a type name */ 126109a3aaf3SDag-Erling Smørgrav size_t type_count = 0; 126209a3aaf3SDag-Erling Smørgrav int block; 126309a3aaf3SDag-Erling Smørgrav size_t used = 0; 126409a3aaf3SDag-Erling Smørgrav uint16_t maxtype = 0; 126509a3aaf3SDag-Erling Smørgrav uint8_t typebits[8192]; /* 65536 bits */ 126609a3aaf3SDag-Erling Smørgrav uint8_t window_in_use[256]; 126709a3aaf3SDag-Erling Smørgrav 126809a3aaf3SDag-Erling Smørgrav /* string in buffer */ 126909a3aaf3SDag-Erling Smørgrav sldns_buffer strbuf; 127009a3aaf3SDag-Erling Smørgrav sldns_buffer_init_frm_data(&strbuf, (uint8_t*)str, strlen(str)); 127109a3aaf3SDag-Erling Smørgrav 127209a3aaf3SDag-Erling Smørgrav /* parse the types */ 127309a3aaf3SDag-Erling Smørgrav memset(typebits, 0, sizeof(typebits)); 127409a3aaf3SDag-Erling Smørgrav memset(window_in_use, 0, sizeof(window_in_use)); 127509a3aaf3SDag-Erling Smørgrav while(sldns_buffer_remaining(&strbuf) > 0 && 127609a3aaf3SDag-Erling Smørgrav sldns_bget_token(&strbuf, token, delim, sizeof(token)) != -1) { 127709a3aaf3SDag-Erling Smørgrav uint16_t t = sldns_get_rr_type_by_name(token); 127809a3aaf3SDag-Erling Smørgrav if(token[0] == 0) 127909a3aaf3SDag-Erling Smørgrav continue; 128009a3aaf3SDag-Erling Smørgrav if(t == 0 && strcmp(token, "TYPE0") != 0) 128109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TYPE, 128209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 128309a3aaf3SDag-Erling Smørgrav typebits[t/8] |= (0x80>>(t%8)); 128409a3aaf3SDag-Erling Smørgrav window_in_use[t/256] = 1; 128509a3aaf3SDag-Erling Smørgrav type_count++; 128609a3aaf3SDag-Erling Smørgrav if(t > maxtype) maxtype = t; 128709a3aaf3SDag-Erling Smørgrav } 128809a3aaf3SDag-Erling Smørgrav 128909a3aaf3SDag-Erling Smørgrav /* empty NSEC bitmap */ 129009a3aaf3SDag-Erling Smørgrav if(type_count == 0) { 129109a3aaf3SDag-Erling Smørgrav *len = 0; 129209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 129309a3aaf3SDag-Erling Smørgrav } 129409a3aaf3SDag-Erling Smørgrav 129509a3aaf3SDag-Erling Smørgrav /* encode windows {u8 windowblock, u8 bitmaplength, 0-32u8 bitmap}, 129609a3aaf3SDag-Erling Smørgrav * block is 0-255 upper octet of types, length if 0-32. */ 129709a3aaf3SDag-Erling Smørgrav for(block = 0; block <= (int)maxtype/256; block++) { 129809a3aaf3SDag-Erling Smørgrav int i, blocklen = 0; 129909a3aaf3SDag-Erling Smørgrav if(!window_in_use[block]) 130009a3aaf3SDag-Erling Smørgrav continue; 130109a3aaf3SDag-Erling Smørgrav for(i=0; i<32; i++) { 130209a3aaf3SDag-Erling Smørgrav if(typebits[block*32+i] != 0) 130309a3aaf3SDag-Erling Smørgrav blocklen = i+1; 130409a3aaf3SDag-Erling Smørgrav } 130509a3aaf3SDag-Erling Smørgrav if(blocklen == 0) 130609a3aaf3SDag-Erling Smørgrav continue; /* empty window should have been !in_use */ 130709a3aaf3SDag-Erling Smørgrav if(used+blocklen+2 > *len) 130809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 130909a3aaf3SDag-Erling Smørgrav rd[used+0] = (uint8_t)block; 131009a3aaf3SDag-Erling Smørgrav rd[used+1] = (uint8_t)blocklen; 131109a3aaf3SDag-Erling Smørgrav for(i=0; i<blocklen; i++) { 131209a3aaf3SDag-Erling Smørgrav rd[used+2+i] = typebits[block*32+i]; 131309a3aaf3SDag-Erling Smørgrav } 131409a3aaf3SDag-Erling Smørgrav used += blocklen+2; 131509a3aaf3SDag-Erling Smørgrav } 131609a3aaf3SDag-Erling Smørgrav *len = used; 131709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 131809a3aaf3SDag-Erling Smørgrav } 131909a3aaf3SDag-Erling Smørgrav 132009a3aaf3SDag-Erling Smørgrav int sldns_str2wire_type_buf(const char* str, uint8_t* rd, size_t* len) 132109a3aaf3SDag-Erling Smørgrav { 132209a3aaf3SDag-Erling Smørgrav uint16_t t = sldns_get_rr_type_by_name(str); 132309a3aaf3SDag-Erling Smørgrav if(t == 0 && strcmp(str, "TYPE0") != 0) 132409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TYPE; 132509a3aaf3SDag-Erling Smørgrav if(*len < 2) 132609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 132709a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rd, t); 132809a3aaf3SDag-Erling Smørgrav *len = 2; 132909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 133009a3aaf3SDag-Erling Smørgrav } 133109a3aaf3SDag-Erling Smørgrav 133209a3aaf3SDag-Erling Smørgrav int sldns_str2wire_class_buf(const char* str, uint8_t* rd, size_t* len) 133309a3aaf3SDag-Erling Smørgrav { 133409a3aaf3SDag-Erling Smørgrav uint16_t c = sldns_get_rr_class_by_name(str); 133509a3aaf3SDag-Erling Smørgrav if(c == 0 && strcmp(str, "CLASS0") != 0) 133609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_CLASS; 133709a3aaf3SDag-Erling Smørgrav if(*len < 2) 133809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 133909a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rd, c); 134009a3aaf3SDag-Erling Smørgrav *len = 2; 134109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 134209a3aaf3SDag-Erling Smørgrav } 134309a3aaf3SDag-Erling Smørgrav 134409a3aaf3SDag-Erling Smørgrav /* An certificate alg field can either be specified as a 8 bits number 134509a3aaf3SDag-Erling Smørgrav * or by its symbolic name. Handle both */ 134609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_cert_alg_buf(const char* str, uint8_t* rd, size_t* len) 134709a3aaf3SDag-Erling Smørgrav { 134809a3aaf3SDag-Erling Smørgrav sldns_lookup_table *lt = sldns_lookup_by_name(sldns_cert_algorithms, 134909a3aaf3SDag-Erling Smørgrav str); 135009a3aaf3SDag-Erling Smørgrav if(*len < 2) 135109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 135209a3aaf3SDag-Erling Smørgrav if(lt) { 135309a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rd, (uint16_t)lt->id); 135409a3aaf3SDag-Erling Smørgrav } else { 135509a3aaf3SDag-Erling Smørgrav int s = sldns_str2wire_int16_buf(str, rd, len); 135609a3aaf3SDag-Erling Smørgrav if(s) return s; 135709a3aaf3SDag-Erling Smørgrav if(sldns_read_uint16(rd) == 0) 135809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_CERT_BAD_ALGORITHM; 135909a3aaf3SDag-Erling Smørgrav } 136009a3aaf3SDag-Erling Smørgrav *len = 2; 136109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 136209a3aaf3SDag-Erling Smørgrav } 136309a3aaf3SDag-Erling Smørgrav 136409a3aaf3SDag-Erling Smørgrav /* An alg field can either be specified as a 8 bits number 136509a3aaf3SDag-Erling Smørgrav * or by its symbolic name. Handle both */ 136609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_alg_buf(const char* str, uint8_t* rd, size_t* len) 136709a3aaf3SDag-Erling Smørgrav { 136809a3aaf3SDag-Erling Smørgrav sldns_lookup_table *lt = sldns_lookup_by_name(sldns_algorithms, str); 136909a3aaf3SDag-Erling Smørgrav if(*len < 1) 137009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 137109a3aaf3SDag-Erling Smørgrav if(lt) { 137209a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t)lt->id; 137309a3aaf3SDag-Erling Smørgrav *len = 1; 137409a3aaf3SDag-Erling Smørgrav } else { 137509a3aaf3SDag-Erling Smørgrav /* try as-is (a number) */ 137609a3aaf3SDag-Erling Smørgrav return sldns_str2wire_int8_buf(str, rd, len); 137709a3aaf3SDag-Erling Smørgrav } 137809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 137909a3aaf3SDag-Erling Smørgrav } 138009a3aaf3SDag-Erling Smørgrav 1381c7f4d7adSDag-Erling Smørgrav int sldns_str2wire_tsigerror_buf(const char* str, uint8_t* rd, size_t* len) 1382c7f4d7adSDag-Erling Smørgrav { 1383c7f4d7adSDag-Erling Smørgrav sldns_lookup_table *lt = sldns_lookup_by_name(sldns_tsig_errors, str); 1384c7f4d7adSDag-Erling Smørgrav if(*len < 2) 1385c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 1386c7f4d7adSDag-Erling Smørgrav if(lt) { 1387c7f4d7adSDag-Erling Smørgrav sldns_write_uint16(rd, (uint16_t)lt->id); 1388c7f4d7adSDag-Erling Smørgrav *len = 2; 1389c7f4d7adSDag-Erling Smørgrav } else { 1390c7f4d7adSDag-Erling Smørgrav /* try as-is (a number) */ 1391c7f4d7adSDag-Erling Smørgrav return sldns_str2wire_int16_buf(str, rd, len); 1392c7f4d7adSDag-Erling Smørgrav } 1393c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 1394c7f4d7adSDag-Erling Smørgrav } 1395c7f4d7adSDag-Erling Smørgrav 139609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_time_buf(const char* str, uint8_t* rd, size_t* len) 139709a3aaf3SDag-Erling Smørgrav { 139809a3aaf3SDag-Erling Smørgrav /* convert a time YYYYDDMMHHMMSS to wireformat */ 139909a3aaf3SDag-Erling Smørgrav struct tm tm; 140009a3aaf3SDag-Erling Smørgrav if(*len < 4) 140109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 140209a3aaf3SDag-Erling Smørgrav 140309a3aaf3SDag-Erling Smørgrav /* Try to scan the time... */ 140409a3aaf3SDag-Erling Smørgrav memset(&tm, 0, sizeof(tm)); 140509a3aaf3SDag-Erling Smørgrav if (strlen(str) == 14 && sscanf(str, "%4d%2d%2d%2d%2d%2d", 140609a3aaf3SDag-Erling Smørgrav &tm.tm_year, &tm.tm_mon, &tm.tm_mday, &tm.tm_hour, 140709a3aaf3SDag-Erling Smørgrav &tm.tm_min, &tm.tm_sec) == 6) { 140809a3aaf3SDag-Erling Smørgrav tm.tm_year -= 1900; 140909a3aaf3SDag-Erling Smørgrav tm.tm_mon--; 141009a3aaf3SDag-Erling Smørgrav /* Check values */ 141109a3aaf3SDag-Erling Smørgrav if (tm.tm_year < 70) 141209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 141309a3aaf3SDag-Erling Smørgrav if (tm.tm_mon < 0 || tm.tm_mon > 11) 141409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 141509a3aaf3SDag-Erling Smørgrav if (tm.tm_mday < 1 || tm.tm_mday > 31) 141609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 141709a3aaf3SDag-Erling Smørgrav if (tm.tm_hour < 0 || tm.tm_hour > 23) 141809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 141909a3aaf3SDag-Erling Smørgrav if (tm.tm_min < 0 || tm.tm_min > 59) 142009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 142109a3aaf3SDag-Erling Smørgrav if (tm.tm_sec < 0 || tm.tm_sec > 59) 142209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TIME; 142309a3aaf3SDag-Erling Smørgrav 1424bc892140SDag-Erling Smørgrav sldns_write_uint32(rd, (uint32_t)sldns_mktime_from_utc(&tm)); 142509a3aaf3SDag-Erling Smørgrav } else { 142609a3aaf3SDag-Erling Smørgrav /* handle it as 32 bits timestamp */ 142709a3aaf3SDag-Erling Smørgrav char *end; 142809a3aaf3SDag-Erling Smørgrav uint32_t l = (uint32_t)strtol((char*)str, &end, 10); 142909a3aaf3SDag-Erling Smørgrav if(*end != 0) 143009a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TIME, 143109a3aaf3SDag-Erling Smørgrav end-(char*)str); 143209a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd, l); 143309a3aaf3SDag-Erling Smørgrav } 143409a3aaf3SDag-Erling Smørgrav *len = 4; 143509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 143609a3aaf3SDag-Erling Smørgrav } 143709a3aaf3SDag-Erling Smørgrav 1438c7f4d7adSDag-Erling Smørgrav int sldns_str2wire_tsigtime_buf(const char* str, uint8_t* rd, size_t* len) 1439c7f4d7adSDag-Erling Smørgrav { 1440c7f4d7adSDag-Erling Smørgrav char* end; 1441c7f4d7adSDag-Erling Smørgrav uint64_t t = (uint64_t)strtol((char*)str, &end, 10); 1442c7f4d7adSDag-Erling Smørgrav uint16_t high; 1443c7f4d7adSDag-Erling Smørgrav uint32_t low; 1444c7f4d7adSDag-Erling Smørgrav if(*end != 0) 1445c7f4d7adSDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TIME, end-str); 1446c7f4d7adSDag-Erling Smørgrav if(*len < 6) 1447c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 1448c7f4d7adSDag-Erling Smørgrav high = (uint16_t)(t>>32); 1449c7f4d7adSDag-Erling Smørgrav low = (uint32_t)(t); 1450c7f4d7adSDag-Erling Smørgrav sldns_write_uint16(rd, high); 1451c7f4d7adSDag-Erling Smørgrav sldns_write_uint32(rd+2, low); 1452c7f4d7adSDag-Erling Smørgrav *len = 6; 1453c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 1454c7f4d7adSDag-Erling Smørgrav } 1455c7f4d7adSDag-Erling Smørgrav 145609a3aaf3SDag-Erling Smørgrav int sldns_str2wire_period_buf(const char* str, uint8_t* rd, size_t* len) 145709a3aaf3SDag-Erling Smørgrav { 145809a3aaf3SDag-Erling Smørgrav const char* end; 145909a3aaf3SDag-Erling Smørgrav uint32_t p = sldns_str2period(str, &end); 146009a3aaf3SDag-Erling Smørgrav if(*end != 0) 146109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_PERIOD, end-str); 146209a3aaf3SDag-Erling Smørgrav if(*len < 4) 146309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 146409a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd, p); 146509a3aaf3SDag-Erling Smørgrav *len = 4; 146609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 146709a3aaf3SDag-Erling Smørgrav } 146809a3aaf3SDag-Erling Smørgrav 146909a3aaf3SDag-Erling Smørgrav /** read "<digits>[.<digits>][mM]" into mantissa exponent format for LOC type */ 147009a3aaf3SDag-Erling Smørgrav static int 147109a3aaf3SDag-Erling Smørgrav loc_parse_cm(char* my_str, char** endstr, uint8_t* m, uint8_t* e) 147209a3aaf3SDag-Erling Smørgrav { 147309a3aaf3SDag-Erling Smørgrav uint32_t meters = 0, cm = 0, val; 147409a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char)*my_str)) { 147509a3aaf3SDag-Erling Smørgrav my_str++; 147609a3aaf3SDag-Erling Smørgrav } 147709a3aaf3SDag-Erling Smørgrav meters = (uint32_t)strtol(my_str, &my_str, 10); 147809a3aaf3SDag-Erling Smørgrav if (*my_str == '.') { 147909a3aaf3SDag-Erling Smørgrav my_str++; 148009a3aaf3SDag-Erling Smørgrav cm = (uint32_t)strtol(my_str, &my_str, 10); 148109a3aaf3SDag-Erling Smørgrav } 148209a3aaf3SDag-Erling Smørgrav if (meters >= 1) { 148309a3aaf3SDag-Erling Smørgrav *e = 2; 148409a3aaf3SDag-Erling Smørgrav val = meters; 148509a3aaf3SDag-Erling Smørgrav } else { 148609a3aaf3SDag-Erling Smørgrav *e = 0; 148709a3aaf3SDag-Erling Smørgrav val = cm; 148809a3aaf3SDag-Erling Smørgrav } 148909a3aaf3SDag-Erling Smørgrav while(val >= 10) { 149009a3aaf3SDag-Erling Smørgrav (*e)++; 149109a3aaf3SDag-Erling Smørgrav val /= 10; 149209a3aaf3SDag-Erling Smørgrav } 149309a3aaf3SDag-Erling Smørgrav *m = (uint8_t)val; 149409a3aaf3SDag-Erling Smørgrav 149509a3aaf3SDag-Erling Smørgrav if (*e > 9) 149609a3aaf3SDag-Erling Smørgrav return 0; 149709a3aaf3SDag-Erling Smørgrav if (*my_str == 'm' || *my_str == 'M') { 149809a3aaf3SDag-Erling Smørgrav my_str++; 149909a3aaf3SDag-Erling Smørgrav } 150009a3aaf3SDag-Erling Smørgrav *endstr = my_str; 150109a3aaf3SDag-Erling Smørgrav return 1; 150209a3aaf3SDag-Erling Smørgrav } 150309a3aaf3SDag-Erling Smørgrav 150409a3aaf3SDag-Erling Smørgrav int sldns_str2wire_loc_buf(const char* str, uint8_t* rd, size_t* len) 150509a3aaf3SDag-Erling Smørgrav { 150609a3aaf3SDag-Erling Smørgrav uint32_t latitude = 0; 150709a3aaf3SDag-Erling Smørgrav uint32_t longitude = 0; 150809a3aaf3SDag-Erling Smørgrav uint32_t altitude = 0; 150909a3aaf3SDag-Erling Smørgrav 151009a3aaf3SDag-Erling Smørgrav uint32_t equator = (uint32_t)1<<31; /* 2**31 */ 151109a3aaf3SDag-Erling Smørgrav 151209a3aaf3SDag-Erling Smørgrav /* only support version 0 */ 151309a3aaf3SDag-Erling Smørgrav uint32_t h = 0; 151409a3aaf3SDag-Erling Smørgrav uint32_t m = 0; 151509a3aaf3SDag-Erling Smørgrav uint8_t size_b = 1, size_e = 2; 151609a3aaf3SDag-Erling Smørgrav uint8_t horiz_pre_b = 1, horiz_pre_e = 6; 151709a3aaf3SDag-Erling Smørgrav uint8_t vert_pre_b = 1, vert_pre_e = 3; 151809a3aaf3SDag-Erling Smørgrav 151909a3aaf3SDag-Erling Smørgrav double s = 0.0; 152009a3aaf3SDag-Erling Smørgrav int northerness; 152109a3aaf3SDag-Erling Smørgrav int easterness; 152209a3aaf3SDag-Erling Smørgrav 152309a3aaf3SDag-Erling Smørgrav char *my_str = (char *) str; 152409a3aaf3SDag-Erling Smørgrav 152509a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 152609a3aaf3SDag-Erling Smørgrav h = (uint32_t) strtol(my_str, &my_str, 10); 152709a3aaf3SDag-Erling Smørgrav } else { 152809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 152909a3aaf3SDag-Erling Smørgrav } 153009a3aaf3SDag-Erling Smørgrav 153109a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char) *my_str)) { 153209a3aaf3SDag-Erling Smørgrav my_str++; 153309a3aaf3SDag-Erling Smørgrav } 153409a3aaf3SDag-Erling Smørgrav 153509a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 153609a3aaf3SDag-Erling Smørgrav m = (uint32_t) strtol(my_str, &my_str, 10); 153709a3aaf3SDag-Erling Smørgrav } else if (*my_str == 'N' || *my_str == 'S') { 153809a3aaf3SDag-Erling Smørgrav goto north; 153909a3aaf3SDag-Erling Smørgrav } else { 154009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 154109a3aaf3SDag-Erling Smørgrav } 154209a3aaf3SDag-Erling Smørgrav 154309a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char) *my_str)) { 154409a3aaf3SDag-Erling Smørgrav my_str++; 154509a3aaf3SDag-Erling Smørgrav } 154609a3aaf3SDag-Erling Smørgrav 154709a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 154809a3aaf3SDag-Erling Smørgrav s = strtod(my_str, &my_str); 154909a3aaf3SDag-Erling Smørgrav } 155009a3aaf3SDag-Erling Smørgrav 15518a384985SDag-Erling Smørgrav /* skip blanks before northerness */ 155209a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char) *my_str)) { 155309a3aaf3SDag-Erling Smørgrav my_str++; 155409a3aaf3SDag-Erling Smørgrav } 155509a3aaf3SDag-Erling Smørgrav 155609a3aaf3SDag-Erling Smørgrav north: 155709a3aaf3SDag-Erling Smørgrav if (*my_str == 'N') { 155809a3aaf3SDag-Erling Smørgrav northerness = 1; 155909a3aaf3SDag-Erling Smørgrav } else if (*my_str == 'S') { 156009a3aaf3SDag-Erling Smørgrav northerness = 0; 156109a3aaf3SDag-Erling Smørgrav } else { 156209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 156309a3aaf3SDag-Erling Smørgrav } 156409a3aaf3SDag-Erling Smørgrav 156509a3aaf3SDag-Erling Smørgrav my_str++; 156609a3aaf3SDag-Erling Smørgrav 156709a3aaf3SDag-Erling Smørgrav /* store number */ 156809a3aaf3SDag-Erling Smørgrav s = 1000.0 * s; 156909a3aaf3SDag-Erling Smørgrav /* add a little to make floor in conversion a round */ 157009a3aaf3SDag-Erling Smørgrav s += 0.0005; 157109a3aaf3SDag-Erling Smørgrav latitude = (uint32_t) s; 157209a3aaf3SDag-Erling Smørgrav latitude += 1000 * 60 * m; 157309a3aaf3SDag-Erling Smørgrav latitude += 1000 * 60 * 60 * h; 157409a3aaf3SDag-Erling Smørgrav if (northerness) { 157509a3aaf3SDag-Erling Smørgrav latitude = equator + latitude; 157609a3aaf3SDag-Erling Smørgrav } else { 157709a3aaf3SDag-Erling Smørgrav latitude = equator - latitude; 157809a3aaf3SDag-Erling Smørgrav } 157909a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char)*my_str)) { 158009a3aaf3SDag-Erling Smørgrav my_str++; 158109a3aaf3SDag-Erling Smørgrav } 158209a3aaf3SDag-Erling Smørgrav 158309a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 158409a3aaf3SDag-Erling Smørgrav h = (uint32_t) strtol(my_str, &my_str, 10); 158509a3aaf3SDag-Erling Smørgrav } else { 158609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 158709a3aaf3SDag-Erling Smørgrav } 158809a3aaf3SDag-Erling Smørgrav 158909a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char) *my_str)) { 159009a3aaf3SDag-Erling Smørgrav my_str++; 159109a3aaf3SDag-Erling Smørgrav } 159209a3aaf3SDag-Erling Smørgrav 159309a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 159409a3aaf3SDag-Erling Smørgrav m = (uint32_t) strtol(my_str, &my_str, 10); 159509a3aaf3SDag-Erling Smørgrav } else if (*my_str == 'E' || *my_str == 'W') { 159609a3aaf3SDag-Erling Smørgrav goto east; 159709a3aaf3SDag-Erling Smørgrav } else { 159809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 159909a3aaf3SDag-Erling Smørgrav } 160009a3aaf3SDag-Erling Smørgrav 160109a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char)*my_str)) { 160209a3aaf3SDag-Erling Smørgrav my_str++; 160309a3aaf3SDag-Erling Smørgrav } 160409a3aaf3SDag-Erling Smørgrav 160509a3aaf3SDag-Erling Smørgrav if (isdigit((unsigned char) *my_str)) { 160609a3aaf3SDag-Erling Smørgrav s = strtod(my_str, &my_str); 160709a3aaf3SDag-Erling Smørgrav } 160809a3aaf3SDag-Erling Smørgrav 160909a3aaf3SDag-Erling Smørgrav /* skip blanks before easterness */ 161009a3aaf3SDag-Erling Smørgrav while (isblank((unsigned char)*my_str)) { 161109a3aaf3SDag-Erling Smørgrav my_str++; 161209a3aaf3SDag-Erling Smørgrav } 161309a3aaf3SDag-Erling Smørgrav 161409a3aaf3SDag-Erling Smørgrav east: 161509a3aaf3SDag-Erling Smørgrav if (*my_str == 'E') { 161609a3aaf3SDag-Erling Smørgrav easterness = 1; 161709a3aaf3SDag-Erling Smørgrav } else if (*my_str == 'W') { 161809a3aaf3SDag-Erling Smørgrav easterness = 0; 161909a3aaf3SDag-Erling Smørgrav } else { 162009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 162109a3aaf3SDag-Erling Smørgrav } 162209a3aaf3SDag-Erling Smørgrav 162309a3aaf3SDag-Erling Smørgrav my_str++; 162409a3aaf3SDag-Erling Smørgrav 162509a3aaf3SDag-Erling Smørgrav /* store number */ 162609a3aaf3SDag-Erling Smørgrav s *= 1000.0; 162709a3aaf3SDag-Erling Smørgrav /* add a little to make floor in conversion a round */ 162809a3aaf3SDag-Erling Smørgrav s += 0.0005; 162909a3aaf3SDag-Erling Smørgrav longitude = (uint32_t) s; 163009a3aaf3SDag-Erling Smørgrav longitude += 1000 * 60 * m; 163109a3aaf3SDag-Erling Smørgrav longitude += 1000 * 60 * 60 * h; 163209a3aaf3SDag-Erling Smørgrav 163309a3aaf3SDag-Erling Smørgrav if (easterness) { 163409a3aaf3SDag-Erling Smørgrav longitude += equator; 163509a3aaf3SDag-Erling Smørgrav } else { 163609a3aaf3SDag-Erling Smørgrav longitude = equator - longitude; 163709a3aaf3SDag-Erling Smørgrav } 163809a3aaf3SDag-Erling Smørgrav 163909a3aaf3SDag-Erling Smørgrav altitude = (uint32_t)(strtod(my_str, &my_str)*100.0 + 164009a3aaf3SDag-Erling Smørgrav 10000000.0 + 0.5); 164109a3aaf3SDag-Erling Smørgrav if (*my_str == 'm' || *my_str == 'M') { 164209a3aaf3SDag-Erling Smørgrav my_str++; 164309a3aaf3SDag-Erling Smørgrav } 164409a3aaf3SDag-Erling Smørgrav 164509a3aaf3SDag-Erling Smørgrav if (strlen(my_str) > 0) { 164609a3aaf3SDag-Erling Smørgrav if(!loc_parse_cm(my_str, &my_str, &size_b, &size_e)) 164709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 164809a3aaf3SDag-Erling Smørgrav } 164909a3aaf3SDag-Erling Smørgrav 165009a3aaf3SDag-Erling Smørgrav if (strlen(my_str) > 0) { 165109a3aaf3SDag-Erling Smørgrav if(!loc_parse_cm(my_str, &my_str, &horiz_pre_b, &horiz_pre_e)) 165209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 165309a3aaf3SDag-Erling Smørgrav } 165409a3aaf3SDag-Erling Smørgrav 165509a3aaf3SDag-Erling Smørgrav if (strlen(my_str) > 0) { 165609a3aaf3SDag-Erling Smørgrav if(!loc_parse_cm(my_str, &my_str, &vert_pre_b, &vert_pre_e)) 165709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 165809a3aaf3SDag-Erling Smørgrav } 165909a3aaf3SDag-Erling Smørgrav 166009a3aaf3SDag-Erling Smørgrav if(*len < 16) 166109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 166209a3aaf3SDag-Erling Smørgrav rd[0] = 0; 166309a3aaf3SDag-Erling Smørgrav rd[1] = ((size_b << 4) & 0xf0) | (size_e & 0x0f); 166409a3aaf3SDag-Erling Smørgrav rd[2] = ((horiz_pre_b << 4) & 0xf0) | (horiz_pre_e & 0x0f); 166509a3aaf3SDag-Erling Smørgrav rd[3] = ((vert_pre_b << 4) & 0xf0) | (vert_pre_e & 0x0f); 166609a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd + 4, latitude); 166709a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd + 8, longitude); 166809a3aaf3SDag-Erling Smørgrav sldns_write_uint32(rd + 12, altitude); 166909a3aaf3SDag-Erling Smørgrav *len = 16; 167009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 167109a3aaf3SDag-Erling Smørgrav } 167209a3aaf3SDag-Erling Smørgrav 167309a3aaf3SDag-Erling Smørgrav static void 167409a3aaf3SDag-Erling Smørgrav ldns_tolower_str(char* s) 167509a3aaf3SDag-Erling Smørgrav { 167609a3aaf3SDag-Erling Smørgrav if(s) { 167709a3aaf3SDag-Erling Smørgrav while(*s) { 167809a3aaf3SDag-Erling Smørgrav *s = (char)tolower((unsigned char)*s); 167909a3aaf3SDag-Erling Smørgrav s++; 168009a3aaf3SDag-Erling Smørgrav } 168109a3aaf3SDag-Erling Smørgrav } 168209a3aaf3SDag-Erling Smørgrav } 168309a3aaf3SDag-Erling Smørgrav 168409a3aaf3SDag-Erling Smørgrav int sldns_str2wire_wks_buf(const char* str, uint8_t* rd, size_t* len) 168509a3aaf3SDag-Erling Smørgrav { 168609a3aaf3SDag-Erling Smørgrav int rd_len = 1; 168709a3aaf3SDag-Erling Smørgrav int have_proto = 0; 168809a3aaf3SDag-Erling Smørgrav char token[50], proto_str[50]; 168909a3aaf3SDag-Erling Smørgrav sldns_buffer strbuf; 169009a3aaf3SDag-Erling Smørgrav sldns_buffer_init_frm_data(&strbuf, (uint8_t*)str, strlen(str)); 169109a3aaf3SDag-Erling Smørgrav proto_str[0]=0; 169209a3aaf3SDag-Erling Smørgrav 169309a3aaf3SDag-Erling Smørgrav /* check we have one byte for proto */ 169409a3aaf3SDag-Erling Smørgrav if(*len < 1) 169509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 169609a3aaf3SDag-Erling Smørgrav 169709a3aaf3SDag-Erling Smørgrav while(sldns_bget_token(&strbuf, token, "\t\n ", sizeof(token)) > 0) { 169809a3aaf3SDag-Erling Smørgrav ldns_tolower_str(token); 169909a3aaf3SDag-Erling Smørgrav if(!have_proto) { 170009a3aaf3SDag-Erling Smørgrav struct protoent *p = getprotobyname(token); 170109a3aaf3SDag-Erling Smørgrav have_proto = 1; 170209a3aaf3SDag-Erling Smørgrav if(p) rd[0] = (uint8_t)p->p_proto; 1703971980c3SDag-Erling Smørgrav else if(strcasecmp(token, "tcp")==0) rd[0]=6; 1704971980c3SDag-Erling Smørgrav else if(strcasecmp(token, "udp")==0) rd[0]=17; 170509a3aaf3SDag-Erling Smørgrav else rd[0] = (uint8_t)atoi(token); 170609a3aaf3SDag-Erling Smørgrav (void)strlcpy(proto_str, token, sizeof(proto_str)); 170709a3aaf3SDag-Erling Smørgrav } else { 170809a3aaf3SDag-Erling Smørgrav int serv_port; 170909a3aaf3SDag-Erling Smørgrav struct servent *serv = getservbyname(token, proto_str); 171009a3aaf3SDag-Erling Smørgrav if(serv) serv_port=(int)ntohs((uint16_t)serv->s_port); 1711971980c3SDag-Erling Smørgrav else if(strcasecmp(token, "domain")==0) serv_port=53; 171209a3aaf3SDag-Erling Smørgrav else { 171309a3aaf3SDag-Erling Smørgrav serv_port = atoi(token); 171409a3aaf3SDag-Erling Smørgrav if(serv_port == 0 && strcmp(token, "0") != 0) { 171509a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDSERVENT 171609a3aaf3SDag-Erling Smørgrav endservent(); 171709a3aaf3SDag-Erling Smørgrav #endif 171809a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDPROTOENT 171909a3aaf3SDag-Erling Smørgrav endprotoent(); 172009a3aaf3SDag-Erling Smørgrav #endif 172109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX, 172209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 172309a3aaf3SDag-Erling Smørgrav } 172409a3aaf3SDag-Erling Smørgrav if(serv_port < 0 || serv_port > 65535) { 172509a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDSERVENT 172609a3aaf3SDag-Erling Smørgrav endservent(); 172709a3aaf3SDag-Erling Smørgrav #endif 172809a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDPROTOENT 172909a3aaf3SDag-Erling Smørgrav endprotoent(); 173009a3aaf3SDag-Erling Smørgrav #endif 173109a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX, 173209a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 173309a3aaf3SDag-Erling Smørgrav } 173409a3aaf3SDag-Erling Smørgrav } 173509a3aaf3SDag-Erling Smørgrav if(rd_len < 1+serv_port/8+1) { 173609a3aaf3SDag-Erling Smørgrav /* bitmap is larger, init new bytes at 0 */ 173709a3aaf3SDag-Erling Smørgrav if(*len < 1+(size_t)serv_port/8+1) { 173809a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDSERVENT 173909a3aaf3SDag-Erling Smørgrav endservent(); 174009a3aaf3SDag-Erling Smørgrav #endif 174109a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDPROTOENT 174209a3aaf3SDag-Erling Smørgrav endprotoent(); 174309a3aaf3SDag-Erling Smørgrav #endif 174409a3aaf3SDag-Erling Smørgrav return RET_ERR( 174509a3aaf3SDag-Erling Smørgrav LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 174609a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 174709a3aaf3SDag-Erling Smørgrav } 174809a3aaf3SDag-Erling Smørgrav memset(rd+rd_len, 0, 1+(size_t)serv_port/8+1-rd_len); 174909a3aaf3SDag-Erling Smørgrav rd_len = 1+serv_port/8+1; 175009a3aaf3SDag-Erling Smørgrav } 175109a3aaf3SDag-Erling Smørgrav rd[1+ serv_port/8] |= (1 << (7 - serv_port % 8)); 175209a3aaf3SDag-Erling Smørgrav } 175309a3aaf3SDag-Erling Smørgrav } 175409a3aaf3SDag-Erling Smørgrav *len = (size_t)rd_len; 175509a3aaf3SDag-Erling Smørgrav 175609a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDSERVENT 175709a3aaf3SDag-Erling Smørgrav endservent(); 175809a3aaf3SDag-Erling Smørgrav #endif 175909a3aaf3SDag-Erling Smørgrav #ifdef HAVE_ENDPROTOENT 176009a3aaf3SDag-Erling Smørgrav endprotoent(); 176109a3aaf3SDag-Erling Smørgrav #endif 176209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 176309a3aaf3SDag-Erling Smørgrav } 176409a3aaf3SDag-Erling Smørgrav 176509a3aaf3SDag-Erling Smørgrav int sldns_str2wire_nsap_buf(const char* str, uint8_t* rd, size_t* len) 176609a3aaf3SDag-Erling Smørgrav { 176709a3aaf3SDag-Erling Smørgrav const char* s = str; 176809a3aaf3SDag-Erling Smørgrav size_t slen; 176909a3aaf3SDag-Erling Smørgrav size_t dlen = 0; /* number of hexdigits parsed */ 177009a3aaf3SDag-Erling Smørgrav 177109a3aaf3SDag-Erling Smørgrav /* just a hex string with optional dots? */ 177209a3aaf3SDag-Erling Smørgrav if (s[0] != '0' || s[1] != 'x') 177309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_INVALID_STR; 177409a3aaf3SDag-Erling Smørgrav s += 2; 177509a3aaf3SDag-Erling Smørgrav slen = strlen(s); 177609a3aaf3SDag-Erling Smørgrav if(slen > LDNS_MAX_RDFLEN*2) 177709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_LABEL_OVERFLOW; 177809a3aaf3SDag-Erling Smørgrav while(*s) { 177909a3aaf3SDag-Erling Smørgrav if(isspace((unsigned char)*s) || *s == '.') { 178009a3aaf3SDag-Erling Smørgrav s++; 178109a3aaf3SDag-Erling Smørgrav continue; 178209a3aaf3SDag-Erling Smørgrav } 178309a3aaf3SDag-Erling Smørgrav if(!isxdigit((unsigned char)*s)) 178409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 178509a3aaf3SDag-Erling Smørgrav if(*len < dlen/2 + 1) 178609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 178709a3aaf3SDag-Erling Smørgrav s-str); 178809a3aaf3SDag-Erling Smørgrav if((dlen&1)==0) 178909a3aaf3SDag-Erling Smørgrav rd[dlen/2] = (uint8_t)sldns_hexdigit_to_int(*s++) * 16; 179009a3aaf3SDag-Erling Smørgrav else rd[dlen/2] += sldns_hexdigit_to_int(*s++); 179109a3aaf3SDag-Erling Smørgrav dlen++; 179209a3aaf3SDag-Erling Smørgrav } 179309a3aaf3SDag-Erling Smørgrav if((dlen&1)!=0) 179409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 179509a3aaf3SDag-Erling Smørgrav *len = dlen/2; 179609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 179709a3aaf3SDag-Erling Smørgrav } 179809a3aaf3SDag-Erling Smørgrav 179909a3aaf3SDag-Erling Smørgrav int sldns_str2wire_atma_buf(const char* str, uint8_t* rd, size_t* len) 180009a3aaf3SDag-Erling Smørgrav { 180109a3aaf3SDag-Erling Smørgrav const char* s = str; 180209a3aaf3SDag-Erling Smørgrav size_t slen = strlen(str); 180309a3aaf3SDag-Erling Smørgrav size_t dlen = 0; /* number of hexdigits parsed */ 180409a3aaf3SDag-Erling Smørgrav 180509a3aaf3SDag-Erling Smørgrav /* just a hex string with optional dots? */ 180609a3aaf3SDag-Erling Smørgrav /* notimpl e.164 format */ 180709a3aaf3SDag-Erling Smørgrav if(slen > LDNS_MAX_RDFLEN*2) 180809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_LABEL_OVERFLOW; 180909a3aaf3SDag-Erling Smørgrav while(*s) { 181009a3aaf3SDag-Erling Smørgrav if(isspace((unsigned char)*s) || *s == '.') { 181109a3aaf3SDag-Erling Smørgrav s++; 181209a3aaf3SDag-Erling Smørgrav continue; 181309a3aaf3SDag-Erling Smørgrav } 181409a3aaf3SDag-Erling Smørgrav if(!isxdigit((unsigned char)*s)) 181509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 181609a3aaf3SDag-Erling Smørgrav if(*len < dlen/2 + 1) 181709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 181809a3aaf3SDag-Erling Smørgrav s-str); 181909a3aaf3SDag-Erling Smørgrav if((dlen&1)==0) 182009a3aaf3SDag-Erling Smørgrav rd[dlen/2] = (uint8_t)sldns_hexdigit_to_int(*s++) * 16; 182109a3aaf3SDag-Erling Smørgrav else rd[dlen/2] += sldns_hexdigit_to_int(*s++); 182209a3aaf3SDag-Erling Smørgrav dlen++; 182309a3aaf3SDag-Erling Smørgrav } 182409a3aaf3SDag-Erling Smørgrav if((dlen&1)!=0) 182509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, s-str); 182609a3aaf3SDag-Erling Smørgrav *len = dlen/2; 182709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 182809a3aaf3SDag-Erling Smørgrav } 182909a3aaf3SDag-Erling Smørgrav 183009a3aaf3SDag-Erling Smørgrav int sldns_str2wire_ipseckey_buf(const char* str, uint8_t* rd, size_t* len) 183109a3aaf3SDag-Erling Smørgrav { 183209a3aaf3SDag-Erling Smørgrav size_t gwlen = 0, keylen = 0; 183309a3aaf3SDag-Erling Smørgrav int s; 183409a3aaf3SDag-Erling Smørgrav uint8_t gwtype; 183509a3aaf3SDag-Erling Smørgrav char token[512]; 183609a3aaf3SDag-Erling Smørgrav sldns_buffer strbuf; 183709a3aaf3SDag-Erling Smørgrav sldns_buffer_init_frm_data(&strbuf, (uint8_t*)str, strlen(str)); 183809a3aaf3SDag-Erling Smørgrav 183909a3aaf3SDag-Erling Smørgrav if(*len < 3) 184009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 184109a3aaf3SDag-Erling Smørgrav /* precedence */ 184209a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(&strbuf, token, "\t\n ", sizeof(token)) <= 0) 184309a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 184409a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 184509a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t)atoi(token); 184609a3aaf3SDag-Erling Smørgrav /* gateway_type */ 184709a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(&strbuf, token, "\t\n ", sizeof(token)) <= 0) 184809a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 184909a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 185009a3aaf3SDag-Erling Smørgrav rd[1] = (uint8_t)atoi(token); 185109a3aaf3SDag-Erling Smørgrav gwtype = rd[1]; 185209a3aaf3SDag-Erling Smørgrav /* algorithm */ 185309a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(&strbuf, token, "\t\n ", sizeof(token)) <= 0) 185409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 185509a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 185609a3aaf3SDag-Erling Smørgrav rd[2] = (uint8_t)atoi(token); 185709a3aaf3SDag-Erling Smørgrav 185809a3aaf3SDag-Erling Smørgrav /* gateway */ 185909a3aaf3SDag-Erling Smørgrav if(sldns_bget_token(&strbuf, token, "\t\n ", sizeof(token)) <= 0) 186009a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 186109a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 186209a3aaf3SDag-Erling Smørgrav if(gwtype == 0) { 186309a3aaf3SDag-Erling Smørgrav /* NOGATEWAY */ 186409a3aaf3SDag-Erling Smørgrav if(strcmp(token, ".") != 0) 186509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 186609a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 186709a3aaf3SDag-Erling Smørgrav gwlen = 0; 186809a3aaf3SDag-Erling Smørgrav } else if(gwtype == 1) { 186909a3aaf3SDag-Erling Smørgrav /* IP4 */ 187009a3aaf3SDag-Erling Smørgrav gwlen = *len - 3; 187109a3aaf3SDag-Erling Smørgrav s = sldns_str2wire_a_buf(token, rd+3, &gwlen); 187209a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, sldns_buffer_position(&strbuf)); 187309a3aaf3SDag-Erling Smørgrav } else if(gwtype == 2) { 187409a3aaf3SDag-Erling Smørgrav /* IP6 */ 187509a3aaf3SDag-Erling Smørgrav gwlen = *len - 3; 187609a3aaf3SDag-Erling Smørgrav s = sldns_str2wire_aaaa_buf(token, rd+3, &gwlen); 187709a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, sldns_buffer_position(&strbuf)); 187809a3aaf3SDag-Erling Smørgrav } else if(gwtype == 3) { 187909a3aaf3SDag-Erling Smørgrav /* DNAME */ 188009a3aaf3SDag-Erling Smørgrav gwlen = *len - 3; 188109a3aaf3SDag-Erling Smørgrav s = sldns_str2wire_dname_buf(token, rd+3, &gwlen); 188209a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, sldns_buffer_position(&strbuf)); 188309a3aaf3SDag-Erling Smørgrav } else { 188409a3aaf3SDag-Erling Smørgrav /* unknown gateway type */ 188509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_INVALID_STR, 188609a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 188709a3aaf3SDag-Erling Smørgrav } 188809a3aaf3SDag-Erling Smørgrav /* double check for size */ 188909a3aaf3SDag-Erling Smørgrav if(*len < 3 + gwlen) 189009a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL, 189109a3aaf3SDag-Erling Smørgrav sldns_buffer_position(&strbuf)); 189209a3aaf3SDag-Erling Smørgrav 189309a3aaf3SDag-Erling Smørgrav /* publickey in remainder of strbuf */ 189409a3aaf3SDag-Erling Smørgrav keylen = *len - 3 - gwlen; 189509a3aaf3SDag-Erling Smørgrav s = sldns_str2wire_b64_buf((const char*)sldns_buffer_current(&strbuf), 189609a3aaf3SDag-Erling Smørgrav rd+3+gwlen, &keylen); 189709a3aaf3SDag-Erling Smørgrav if(s) return RET_ERR_SHIFT(s, sldns_buffer_position(&strbuf)); 189809a3aaf3SDag-Erling Smørgrav 189909a3aaf3SDag-Erling Smørgrav *len = 3 + gwlen + keylen; 190009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 190109a3aaf3SDag-Erling Smørgrav } 190209a3aaf3SDag-Erling Smørgrav 190309a3aaf3SDag-Erling Smørgrav int sldns_str2wire_nsec3_salt_buf(const char* str, uint8_t* rd, size_t* len) 190409a3aaf3SDag-Erling Smørgrav { 190509a3aaf3SDag-Erling Smørgrav int i, salt_length_str = (int)strlen(str); 190609a3aaf3SDag-Erling Smørgrav if (salt_length_str == 1 && str[0] == '-') { 190709a3aaf3SDag-Erling Smørgrav salt_length_str = 0; 190809a3aaf3SDag-Erling Smørgrav } else if (salt_length_str % 2 != 0) { 190909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_HEX; 191009a3aaf3SDag-Erling Smørgrav } 191109a3aaf3SDag-Erling Smørgrav if (salt_length_str > 512) 191209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_HEX; 191309a3aaf3SDag-Erling Smørgrav if(*len < 1+(size_t)salt_length_str / 2) 191409a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 191509a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t) (salt_length_str / 2); 191609a3aaf3SDag-Erling Smørgrav for (i = 0; i < salt_length_str; i += 2) { 191709a3aaf3SDag-Erling Smørgrav if (isxdigit((unsigned char)str[i]) && 191809a3aaf3SDag-Erling Smørgrav isxdigit((unsigned char)str[i+1])) { 191909a3aaf3SDag-Erling Smørgrav rd[1+i/2] = (uint8_t)(sldns_hexdigit_to_int(str[i])*16 192009a3aaf3SDag-Erling Smørgrav + sldns_hexdigit_to_int(str[i+1])); 192109a3aaf3SDag-Erling Smørgrav } else { 192209a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_HEX, i); 192309a3aaf3SDag-Erling Smørgrav } 192409a3aaf3SDag-Erling Smørgrav } 192509a3aaf3SDag-Erling Smørgrav *len = 1 + (size_t)rd[0]; 192609a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 192709a3aaf3SDag-Erling Smørgrav } 192809a3aaf3SDag-Erling Smørgrav 192909a3aaf3SDag-Erling Smørgrav int sldns_str2wire_ilnp64_buf(const char* str, uint8_t* rd, size_t* len) 193009a3aaf3SDag-Erling Smørgrav { 193109a3aaf3SDag-Erling Smørgrav unsigned int a, b, c, d; 193209a3aaf3SDag-Erling Smørgrav uint16_t shorts[4]; 193309a3aaf3SDag-Erling Smørgrav int l; 193409a3aaf3SDag-Erling Smørgrav if(*len < sizeof(shorts)) 193509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 193609a3aaf3SDag-Erling Smørgrav 193709a3aaf3SDag-Erling Smørgrav if (sscanf(str, "%4x:%4x:%4x:%4x%n", &a, &b, &c, &d, &l) != 4 || 193809a3aaf3SDag-Erling Smørgrav l != (int)strlen(str) || /* more data to read */ 193909a3aaf3SDag-Erling Smørgrav strpbrk(str, "+-") /* signed hexes */ 194009a3aaf3SDag-Erling Smørgrav ) 194109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_ILNP64; 194209a3aaf3SDag-Erling Smørgrav shorts[0] = htons(a); 194309a3aaf3SDag-Erling Smørgrav shorts[1] = htons(b); 194409a3aaf3SDag-Erling Smørgrav shorts[2] = htons(c); 194509a3aaf3SDag-Erling Smørgrav shorts[3] = htons(d); 194609a3aaf3SDag-Erling Smørgrav memmove(rd, &shorts, sizeof(shorts)); 194709a3aaf3SDag-Erling Smørgrav *len = sizeof(shorts); 194809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 194909a3aaf3SDag-Erling Smørgrav } 195009a3aaf3SDag-Erling Smørgrav 195109a3aaf3SDag-Erling Smørgrav int sldns_str2wire_eui48_buf(const char* str, uint8_t* rd, size_t* len) 195209a3aaf3SDag-Erling Smørgrav { 195309a3aaf3SDag-Erling Smørgrav unsigned int a, b, c, d, e, f; 195409a3aaf3SDag-Erling Smørgrav int l; 195509a3aaf3SDag-Erling Smørgrav 195609a3aaf3SDag-Erling Smørgrav if(*len < 6) 195709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 195809a3aaf3SDag-Erling Smørgrav if (sscanf(str, "%2x-%2x-%2x-%2x-%2x-%2x%n", 195909a3aaf3SDag-Erling Smørgrav &a, &b, &c, &d, &e, &f, &l) != 6 || 196009a3aaf3SDag-Erling Smørgrav l != (int)strlen(str)) 196109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_EUI48; 196209a3aaf3SDag-Erling Smørgrav rd[0] = a; 196309a3aaf3SDag-Erling Smørgrav rd[1] = b; 196409a3aaf3SDag-Erling Smørgrav rd[2] = c; 196509a3aaf3SDag-Erling Smørgrav rd[3] = d; 196609a3aaf3SDag-Erling Smørgrav rd[4] = e; 196709a3aaf3SDag-Erling Smørgrav rd[5] = f; 196809a3aaf3SDag-Erling Smørgrav *len = 6; 196909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 197009a3aaf3SDag-Erling Smørgrav } 197109a3aaf3SDag-Erling Smørgrav 197209a3aaf3SDag-Erling Smørgrav int sldns_str2wire_eui64_buf(const char* str, uint8_t* rd, size_t* len) 197309a3aaf3SDag-Erling Smørgrav { 197409a3aaf3SDag-Erling Smørgrav unsigned int a, b, c, d, e, f, g, h; 197509a3aaf3SDag-Erling Smørgrav int l; 197609a3aaf3SDag-Erling Smørgrav 197709a3aaf3SDag-Erling Smørgrav if(*len < 8) 197809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 197909a3aaf3SDag-Erling Smørgrav if (sscanf(str, "%2x-%2x-%2x-%2x-%2x-%2x-%2x-%2x%n", 198009a3aaf3SDag-Erling Smørgrav &a, &b, &c, &d, &e, &f, &g, &h, &l) != 8 || 198109a3aaf3SDag-Erling Smørgrav l != (int)strlen(str)) 198209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_EUI64; 198309a3aaf3SDag-Erling Smørgrav rd[0] = a; 198409a3aaf3SDag-Erling Smørgrav rd[1] = b; 198509a3aaf3SDag-Erling Smørgrav rd[2] = c; 198609a3aaf3SDag-Erling Smørgrav rd[3] = d; 198709a3aaf3SDag-Erling Smørgrav rd[4] = e; 198809a3aaf3SDag-Erling Smørgrav rd[5] = f; 198909a3aaf3SDag-Erling Smørgrav rd[6] = g; 199009a3aaf3SDag-Erling Smørgrav rd[7] = h; 199109a3aaf3SDag-Erling Smørgrav *len = 8; 199209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 199309a3aaf3SDag-Erling Smørgrav } 199409a3aaf3SDag-Erling Smørgrav 199509a3aaf3SDag-Erling Smørgrav int sldns_str2wire_tag_buf(const char* str, uint8_t* rd, size_t* len) 199609a3aaf3SDag-Erling Smørgrav { 199709a3aaf3SDag-Erling Smørgrav size_t slen = strlen(str); 199809a3aaf3SDag-Erling Smørgrav const char* ptr; 199909a3aaf3SDag-Erling Smørgrav 200009a3aaf3SDag-Erling Smørgrav if (slen > 255) 200109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_TAG; 200209a3aaf3SDag-Erling Smørgrav if(*len < slen+1) 200309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 200409a3aaf3SDag-Erling Smørgrav for (ptr = str; *ptr; ptr++) { 200509a3aaf3SDag-Erling Smørgrav if(!isalnum((unsigned char)*ptr)) 200609a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_TAG, ptr-str); 200709a3aaf3SDag-Erling Smørgrav } 2008bc892140SDag-Erling Smørgrav rd[0] = (uint8_t)slen; 200909a3aaf3SDag-Erling Smørgrav memmove(rd+1, str, slen); 201009a3aaf3SDag-Erling Smørgrav *len = slen+1; 201109a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 201209a3aaf3SDag-Erling Smørgrav } 201309a3aaf3SDag-Erling Smørgrav 201409a3aaf3SDag-Erling Smørgrav int sldns_str2wire_long_str_buf(const char* str, uint8_t* rd, size_t* len) 201509a3aaf3SDag-Erling Smørgrav { 201609a3aaf3SDag-Erling Smørgrav uint8_t ch = 0; 201709a3aaf3SDag-Erling Smørgrav const char* pstr = str; 201809a3aaf3SDag-Erling Smørgrav size_t length = 0; 201909a3aaf3SDag-Erling Smørgrav 202009a3aaf3SDag-Erling Smørgrav /* Fill data with parsed bytes */ 202109a3aaf3SDag-Erling Smørgrav while (sldns_parse_char(&ch, &pstr)) { 202209a3aaf3SDag-Erling Smørgrav if(*len < length+1) 202309a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 202409a3aaf3SDag-Erling Smørgrav rd[length++] = ch; 202509a3aaf3SDag-Erling Smørgrav } 202609a3aaf3SDag-Erling Smørgrav if(!pstr) 202709a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_BAD_ESCAPE; 202809a3aaf3SDag-Erling Smørgrav *len = length; 202909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 203009a3aaf3SDag-Erling Smørgrav } 203109a3aaf3SDag-Erling Smørgrav 203209a3aaf3SDag-Erling Smørgrav int sldns_str2wire_hip_buf(const char* str, uint8_t* rd, size_t* len) 203309a3aaf3SDag-Erling Smørgrav { 203409a3aaf3SDag-Erling Smørgrav char* s, *end; 203509a3aaf3SDag-Erling Smørgrav int e; 203609a3aaf3SDag-Erling Smørgrav size_t hitlen, pklen = 0; 203709a3aaf3SDag-Erling Smørgrav /* presentation format: 203809a3aaf3SDag-Erling Smørgrav * pk-algo HIThex pubkeybase64 203909a3aaf3SDag-Erling Smørgrav * wireformat: 204009a3aaf3SDag-Erling Smørgrav * hitlen[1byte] pkalgo[1byte] pubkeylen[2byte] [hit] [pubkey] */ 204109a3aaf3SDag-Erling Smørgrav if(*len < 4) 204209a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 204309a3aaf3SDag-Erling Smørgrav 204409a3aaf3SDag-Erling Smørgrav /* read PK algorithm */ 204509a3aaf3SDag-Erling Smørgrav rd[1] = (uint8_t)strtol((char*)str, &s, 10); 204609a3aaf3SDag-Erling Smørgrav if(*s != ' ') 204709a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_INT, s-(char*)str); 204809a3aaf3SDag-Erling Smørgrav s++; 204909a3aaf3SDag-Erling Smørgrav while(*s == ' ') 205009a3aaf3SDag-Erling Smørgrav s++; 205109a3aaf3SDag-Erling Smørgrav 205209a3aaf3SDag-Erling Smørgrav /* read HIT hex tag */ 205309a3aaf3SDag-Erling Smørgrav /* zero terminate the tag (replace later) */ 205409a3aaf3SDag-Erling Smørgrav end = strchr(s, ' '); 205509a3aaf3SDag-Erling Smørgrav if(!end) return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX, s-(char*)str); 205609a3aaf3SDag-Erling Smørgrav *end = 0; 205709a3aaf3SDag-Erling Smørgrav hitlen = *len - 4; 205809a3aaf3SDag-Erling Smørgrav if((e = sldns_str2wire_hex_buf(s, rd+4, &hitlen)) != 0) { 205909a3aaf3SDag-Erling Smørgrav *end = ' '; 206009a3aaf3SDag-Erling Smørgrav return RET_ERR_SHIFT(e, s-(char*)str); 206109a3aaf3SDag-Erling Smørgrav } 206209a3aaf3SDag-Erling Smørgrav if(hitlen > 255) { 206309a3aaf3SDag-Erling Smørgrav *end = ' '; 206409a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_LABEL_OVERFLOW, s-(char*)str+255*2); 206509a3aaf3SDag-Erling Smørgrav } 206609a3aaf3SDag-Erling Smørgrav rd[0] = (uint8_t)hitlen; 206709a3aaf3SDag-Erling Smørgrav *end = ' '; 206809a3aaf3SDag-Erling Smørgrav s = end+1; 206909a3aaf3SDag-Erling Smørgrav 207009a3aaf3SDag-Erling Smørgrav /* read pubkey base64 sequence */ 207109a3aaf3SDag-Erling Smørgrav pklen = *len - 4 - hitlen; 207209a3aaf3SDag-Erling Smørgrav if((e = sldns_str2wire_b64_buf(s, rd+4+hitlen, &pklen)) != 0) 207309a3aaf3SDag-Erling Smørgrav return RET_ERR_SHIFT(e, s-(char*)str); 207409a3aaf3SDag-Erling Smørgrav if(pklen > 65535) 207509a3aaf3SDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_LABEL_OVERFLOW, s-(char*)str+65535); 2076bc892140SDag-Erling Smørgrav sldns_write_uint16(rd+2, (uint16_t)pklen); 207709a3aaf3SDag-Erling Smørgrav 207809a3aaf3SDag-Erling Smørgrav *len = 4 + hitlen + pklen; 207909a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 208009a3aaf3SDag-Erling Smørgrav } 208109a3aaf3SDag-Erling Smørgrav 208209a3aaf3SDag-Erling Smørgrav int sldns_str2wire_int16_data_buf(const char* str, uint8_t* rd, size_t* len) 208309a3aaf3SDag-Erling Smørgrav { 2084c7f4d7adSDag-Erling Smørgrav char* s; 208509a3aaf3SDag-Erling Smørgrav int n; 2086c7f4d7adSDag-Erling Smørgrav n = strtol(str, &s, 10); 2087c7f4d7adSDag-Erling Smørgrav if(*len < ((size_t)n)+2) 208809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_BUFFER_TOO_SMALL; 2089c7f4d7adSDag-Erling Smørgrav if(n > 65535) 209009a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_LABEL_OVERFLOW; 2091c7f4d7adSDag-Erling Smørgrav 2092c7f4d7adSDag-Erling Smørgrav if(n == 0) { 2093c7f4d7adSDag-Erling Smørgrav sldns_write_uint16(rd, 0); 2094c7f4d7adSDag-Erling Smørgrav *len = 2; 2095c7f4d7adSDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 2096c7f4d7adSDag-Erling Smørgrav } 2097c7f4d7adSDag-Erling Smørgrav if(*s != ' ') 2098c7f4d7adSDag-Erling Smørgrav return RET_ERR(LDNS_WIREPARSE_ERR_SYNTAX_INT, s-(char*)str); 2099c7f4d7adSDag-Erling Smørgrav s++; 2100c7f4d7adSDag-Erling Smørgrav while(*s == ' ') 2101c7f4d7adSDag-Erling Smørgrav s++; 2102c7f4d7adSDag-Erling Smørgrav 2103c7f4d7adSDag-Erling Smørgrav n = sldns_b64_pton(s, rd+2, (*len)-2); 210409a3aaf3SDag-Erling Smørgrav if(n < 0) 210509a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_SYNTAX_B64; 210609a3aaf3SDag-Erling Smørgrav sldns_write_uint16(rd, (uint16_t)n); 2107c7f4d7adSDag-Erling Smørgrav *len = ((size_t)n)+2; 210809a3aaf3SDag-Erling Smørgrav return LDNS_WIREPARSE_ERR_OK; 210909a3aaf3SDag-Erling Smørgrav } 2110