4 * dns packet implementation
6 * a Net::DNS like library for C
8 * (c) NLnet Labs, 2004-2006
10 * See the file LICENSE for the license
13 #include <ldns/config.h>
15 #include <ldns/ldns.h>
21 #include <openssl/rand.h>
25 * do this as functions to get type checking
28 #define LDNS_EDNS_MASK_DO_BIT 0x8000
30 /* TODO defines for 3600 */
31 /* convert to and from numerical flag values */
32 ldns_lookup_table ldns_edns_flags[] = {
39 ldns_pkt_id(const ldns_pkt *packet)
41 return packet->_header->_id;
45 ldns_pkt_qr(const ldns_pkt *packet)
47 return packet->_header->_qr;
51 ldns_pkt_aa(const ldns_pkt *packet)
53 return packet->_header->_aa;
57 ldns_pkt_tc(const ldns_pkt *packet)
59 return packet->_header->_tc;
63 ldns_pkt_rd(const ldns_pkt *packet)
65 return packet->_header->_rd;
69 ldns_pkt_cd(const ldns_pkt *packet)
71 return packet->_header->_cd;
75 ldns_pkt_ra(const ldns_pkt *packet)
77 return packet->_header->_ra;
81 ldns_pkt_ad(const ldns_pkt *packet)
83 return packet->_header->_ad;
87 ldns_pkt_get_opcode(const ldns_pkt *packet)
89 return packet->_header->_opcode;
93 ldns_pkt_get_rcode(const ldns_pkt *packet)
95 return packet->_header->_rcode;
99 ldns_pkt_qdcount(const ldns_pkt *packet)
101 return packet->_header->_qdcount;
105 ldns_pkt_ancount(const ldns_pkt *packet)
107 return packet->_header->_ancount;
111 ldns_pkt_nscount(const ldns_pkt *packet)
113 return packet->_header->_nscount;
117 ldns_pkt_arcount(const ldns_pkt *packet)
119 return packet->_header->_arcount;
123 ldns_pkt_question(const ldns_pkt *packet)
125 return packet->_question;
129 ldns_pkt_answer(const ldns_pkt *packet)
131 return packet->_answer;
135 ldns_pkt_authority(const ldns_pkt *packet)
137 return packet->_authority;
141 ldns_pkt_additional(const ldns_pkt *packet)
143 return packet->_additional;
146 /* return ALL section concatenated */
148 ldns_pkt_all(const ldns_pkt *packet)
150 ldns_rr_list *all, *prev_all;
152 all = ldns_rr_list_cat_clone(
153 ldns_pkt_question(packet),
154 ldns_pkt_answer(packet));
156 all = ldns_rr_list_cat_clone(all,
157 ldns_pkt_authority(packet));
158 ldns_rr_list_deep_free(prev_all);
160 all = ldns_rr_list_cat_clone(all,
161 ldns_pkt_additional(packet));
162 ldns_rr_list_deep_free(prev_all);
167 ldns_pkt_all_noquestion(const ldns_pkt *packet)
169 ldns_rr_list *all, *all2;
171 all = ldns_rr_list_cat_clone(
172 ldns_pkt_answer(packet),
173 ldns_pkt_authority(packet));
174 all2 = ldns_rr_list_cat_clone(all,
175 ldns_pkt_additional(packet));
177 ldns_rr_list_deep_free(all);
182 ldns_pkt_size(const ldns_pkt *packet)
184 return packet->_size;
188 ldns_pkt_querytime(const ldns_pkt *packet)
190 return packet->_querytime;
194 ldns_pkt_answerfrom(const ldns_pkt *packet)
196 return packet->_answerfrom;
200 ldns_pkt_timestamp(const ldns_pkt *packet)
202 return packet->timestamp;
206 ldns_pkt_edns_udp_size(const ldns_pkt *packet)
208 return packet->_edns_udp_size;
212 ldns_pkt_edns_extended_rcode(const ldns_pkt *packet)
214 return packet->_edns_extended_rcode;
218 ldns_pkt_edns_version(const ldns_pkt *packet)
220 return packet->_edns_version;
224 ldns_pkt_edns_z(const ldns_pkt *packet)
226 return packet->_edns_z;
230 ldns_pkt_edns_do(const ldns_pkt *packet)
232 return (packet->_edns_z & LDNS_EDNS_MASK_DO_BIT);
236 ldns_pkt_set_edns_do(ldns_pkt *packet, bool value)
239 packet->_edns_z = packet->_edns_z | LDNS_EDNS_MASK_DO_BIT;
241 packet->_edns_z = packet->_edns_z & ~LDNS_EDNS_MASK_DO_BIT;
246 ldns_pkt_edns_data(const ldns_pkt *packet)
248 return packet->_edns_data;
251 /* return only those rr that share the ownername */
253 ldns_pkt_rr_list_by_name(const ldns_pkt *packet,
254 const ldns_rdf *ownername,
255 ldns_pkt_section sec)
265 rrs = ldns_pkt_get_section_clone(packet, sec);
268 for(i = 0; i < ldns_rr_list_rr_count(rrs); i++) {
269 if (ldns_dname_compare(ldns_rr_owner(
270 ldns_rr_list_rr(rrs, i)),
272 /* owner names match */
274 ret = ldns_rr_list_new();
276 ldns_rr_list_push_rr(ret,
278 ldns_rr_list_rr(rrs, i))
283 ldns_rr_list_deep_free(rrs);
288 /* return only those rr that share a type */
290 ldns_pkt_rr_list_by_type(const ldns_pkt *packet,
292 ldns_pkt_section sec)
302 rrs = ldns_pkt_get_section_clone(packet, sec);
303 new = ldns_rr_list_new();
305 for(i = 0; i < ldns_rr_list_rr_count(rrs); i++) {
306 if (type == ldns_rr_get_type(ldns_rr_list_rr(rrs, i))) {
308 ldns_rr_list_push_rr(new,
310 ldns_rr_list_rr(rrs, i))
314 ldns_rr_list_deep_free(rrs);
316 if (ldns_rr_list_rr_count(new) == 0) {
317 ldns_rr_list_free(new);
324 /* return only those rrs that share name and type */
326 ldns_pkt_rr_list_by_name_and_type(const ldns_pkt *packet,
327 const ldns_rdf *ownername,
329 ldns_pkt_section sec)
340 rrs = ldns_pkt_get_section_clone(packet, sec);
341 new = ldns_rr_list_new();
344 for(i = 0; i < ldns_rr_list_rr_count(rrs); i++) {
345 if (type == ldns_rr_get_type(ldns_rr_list_rr(rrs, i)) &&
346 ldns_dname_compare(ldns_rr_owner(ldns_rr_list_rr(rrs, i)),
351 ldns_rr_list_push_rr(new, ldns_rr_clone(ldns_rr_list_rr(rrs, i)));
355 ldns_rr_list_deep_free(rrs);
357 ldns_rr_list_free(new);
363 ldns_pkt_rr(const ldns_pkt *pkt, ldns_pkt_section sec, const ldns_rr *rr)
368 case LDNS_SECTION_QUESTION:
369 return ldns_rr_list_contains_rr(ldns_pkt_question(pkt), rr);
370 case LDNS_SECTION_ANSWER:
371 return ldns_rr_list_contains_rr(ldns_pkt_answer(pkt), rr);
372 case LDNS_SECTION_AUTHORITY:
373 return ldns_rr_list_contains_rr(ldns_pkt_authority(pkt), rr);
374 case LDNS_SECTION_ADDITIONAL:
375 return ldns_rr_list_contains_rr(ldns_pkt_additional(pkt), rr);
376 case LDNS_SECTION_ANY:
377 result = ldns_rr_list_contains_rr(ldns_pkt_question(pkt), rr);
378 case LDNS_SECTION_ANY_NOQUESTION:
380 || ldns_rr_list_contains_rr(ldns_pkt_answer(pkt), rr)
381 || ldns_rr_list_contains_rr(ldns_pkt_authority(pkt), rr)
382 || ldns_rr_list_contains_rr(ldns_pkt_additional(pkt), rr);
389 ldns_pkt_section_count(const ldns_pkt *packet, ldns_pkt_section s)
392 case LDNS_SECTION_QUESTION:
393 return ldns_pkt_qdcount(packet);
394 case LDNS_SECTION_ANSWER:
395 return ldns_pkt_ancount(packet);
396 case LDNS_SECTION_AUTHORITY:
397 return ldns_pkt_nscount(packet);
398 case LDNS_SECTION_ADDITIONAL:
399 return ldns_pkt_arcount(packet);
400 case LDNS_SECTION_ANY:
401 return ldns_pkt_qdcount(packet) +
402 ldns_pkt_ancount(packet) +
403 ldns_pkt_nscount(packet) +
404 ldns_pkt_arcount(packet);
405 case LDNS_SECTION_ANY_NOQUESTION:
406 return ldns_pkt_ancount(packet) +
407 ldns_pkt_nscount(packet) +
408 ldns_pkt_arcount(packet);
415 ldns_pkt_empty(ldns_pkt *p)
418 return true; /* NULL is empty? */
420 if (ldns_pkt_section_count(p, LDNS_SECTION_ANY) > 0) {
429 ldns_pkt_get_section_clone(const ldns_pkt *packet, ldns_pkt_section s)
432 case LDNS_SECTION_QUESTION:
433 return ldns_rr_list_clone(ldns_pkt_question(packet));
434 case LDNS_SECTION_ANSWER:
435 return ldns_rr_list_clone(ldns_pkt_answer(packet));
436 case LDNS_SECTION_AUTHORITY:
437 return ldns_rr_list_clone(ldns_pkt_authority(packet));
438 case LDNS_SECTION_ADDITIONAL:
439 return ldns_rr_list_clone(ldns_pkt_additional(packet));
440 case LDNS_SECTION_ANY:
441 /* these are already clones */
442 return ldns_pkt_all(packet);
443 case LDNS_SECTION_ANY_NOQUESTION:
444 return ldns_pkt_all_noquestion(packet);
450 ldns_rr *ldns_pkt_tsig(const ldns_pkt *pkt) {
451 return pkt->_tsig_rr;
456 ldns_pkt_set_id(ldns_pkt *packet, uint16_t id)
458 packet->_header->_id = id;
462 ldns_pkt_set_random_id(ldns_pkt *packet)
464 uint16_t rid = ldns_get_random();
465 ldns_pkt_set_id(packet, rid);
470 ldns_pkt_set_qr(ldns_pkt *packet, bool qr)
472 packet->_header->_qr = qr;
476 ldns_pkt_set_aa(ldns_pkt *packet, bool aa)
478 packet->_header->_aa = aa;
482 ldns_pkt_set_tc(ldns_pkt *packet, bool tc)
484 packet->_header->_tc = tc;
488 ldns_pkt_set_rd(ldns_pkt *packet, bool rd)
490 packet->_header->_rd = rd;
494 ldns_pkt_set_additional(ldns_pkt *p, ldns_rr_list *rr)
500 ldns_pkt_set_question(ldns_pkt *p, ldns_rr_list *rr)
506 ldns_pkt_set_answer(ldns_pkt *p, ldns_rr_list *rr)
512 ldns_pkt_set_authority(ldns_pkt *p, ldns_rr_list *rr)
518 ldns_pkt_set_cd(ldns_pkt *packet, bool cd)
520 packet->_header->_cd = cd;
524 ldns_pkt_set_ra(ldns_pkt *packet, bool ra)
526 packet->_header->_ra = ra;
530 ldns_pkt_set_ad(ldns_pkt *packet, bool ad)
532 packet->_header->_ad = ad;
536 ldns_pkt_set_opcode(ldns_pkt *packet, ldns_pkt_opcode opcode)
538 packet->_header->_opcode = opcode;
542 ldns_pkt_set_rcode(ldns_pkt *packet, uint8_t rcode)
544 packet->_header->_rcode = rcode;
548 ldns_pkt_set_qdcount(ldns_pkt *packet, uint16_t qdcount)
550 packet->_header->_qdcount = qdcount;
554 ldns_pkt_set_ancount(ldns_pkt *packet, uint16_t ancount)
556 packet->_header->_ancount = ancount;
560 ldns_pkt_set_nscount(ldns_pkt *packet, uint16_t nscount)
562 packet->_header->_nscount = nscount;
566 ldns_pkt_set_arcount(ldns_pkt *packet, uint16_t arcount)
568 packet->_header->_arcount = arcount;
572 ldns_pkt_set_querytime(ldns_pkt *packet, uint32_t time)
574 packet->_querytime = time;
578 ldns_pkt_set_answerfrom(ldns_pkt *packet, ldns_rdf *answerfrom)
580 packet->_answerfrom = answerfrom;
584 ldns_pkt_set_timestamp(ldns_pkt *packet, struct timeval timeval)
586 packet->timestamp.tv_sec = timeval.tv_sec;
587 packet->timestamp.tv_usec = timeval.tv_usec;
591 ldns_pkt_set_size(ldns_pkt *packet, size_t s)
597 ldns_pkt_set_edns_udp_size(ldns_pkt *packet, uint16_t s)
599 packet->_edns_udp_size = s;
603 ldns_pkt_set_edns_extended_rcode(ldns_pkt *packet, uint8_t c)
605 packet->_edns_extended_rcode = c;
609 ldns_pkt_set_edns_version(ldns_pkt *packet, uint8_t v)
611 packet->_edns_version = v;
615 ldns_pkt_set_edns_z(ldns_pkt *packet, uint16_t z)
621 ldns_pkt_set_edns_data(ldns_pkt *packet, ldns_rdf *data)
623 packet->_edns_data = data;
627 ldns_pkt_set_section_count(ldns_pkt *packet, ldns_pkt_section s, uint16_t count)
630 case LDNS_SECTION_QUESTION:
631 ldns_pkt_set_qdcount(packet, count);
633 case LDNS_SECTION_ANSWER:
634 ldns_pkt_set_ancount(packet, count);
636 case LDNS_SECTION_AUTHORITY:
637 ldns_pkt_set_nscount(packet, count);
639 case LDNS_SECTION_ADDITIONAL:
640 ldns_pkt_set_arcount(packet, count);
642 case LDNS_SECTION_ANY:
643 case LDNS_SECTION_ANY_NOQUESTION:
648 void ldns_pkt_set_tsig(ldns_pkt *pkt, ldns_rr *rr)
654 ldns_pkt_push_rr(ldns_pkt *packet, ldns_pkt_section section, ldns_rr *rr)
657 case LDNS_SECTION_QUESTION:
658 if (!ldns_rr_list_push_rr(ldns_pkt_question(packet), rr)) {
661 ldns_pkt_set_qdcount(packet, ldns_pkt_qdcount(packet) + 1);
663 case LDNS_SECTION_ANSWER:
664 if (!ldns_rr_list_push_rr(ldns_pkt_answer(packet), rr)) {
667 ldns_pkt_set_ancount(packet, ldns_pkt_ancount(packet) + 1);
669 case LDNS_SECTION_AUTHORITY:
670 if (!ldns_rr_list_push_rr(ldns_pkt_authority(packet), rr)) {
673 ldns_pkt_set_nscount(packet, ldns_pkt_nscount(packet) + 1);
675 case LDNS_SECTION_ADDITIONAL:
676 if (!ldns_rr_list_push_rr(ldns_pkt_additional(packet), rr)) {
679 ldns_pkt_set_arcount(packet, ldns_pkt_arcount(packet) + 1);
681 case LDNS_SECTION_ANY:
682 case LDNS_SECTION_ANY_NOQUESTION:
683 /* shouldn't this error? */
690 ldns_pkt_safe_push_rr(ldns_pkt *pkt, ldns_pkt_section sec, ldns_rr *rr)
693 /* check to see if its there */
694 if (ldns_pkt_rr(pkt, sec, rr)) {
698 return ldns_pkt_push_rr(pkt, sec, rr);
702 ldns_pkt_push_rr_list(ldns_pkt *p, ldns_pkt_section s, ldns_rr_list *list)
705 for(i = 0; i < ldns_rr_list_rr_count(list); i++) {
706 if (!ldns_pkt_push_rr(p, s, ldns_rr_list_rr(list, i))) {
714 ldns_pkt_safe_push_rr_list(ldns_pkt *p, ldns_pkt_section s, ldns_rr_list *list)
717 for(i = 0; i < ldns_rr_list_rr_count(list); i++) {
718 if (!ldns_pkt_safe_push_rr(p, s, ldns_rr_list_rr(list, i))) {
726 ldns_pkt_edns(const ldns_pkt *pkt) {
727 return (ldns_pkt_edns_udp_size(pkt) > 0 ||
728 ldns_pkt_edns_extended_rcode(pkt) > 0 ||
729 ldns_pkt_edns_data(pkt) ||
730 ldns_pkt_edns_do(pkt) ||
736 /* Create/destroy/convert functions
742 packet = LDNS_MALLOC(ldns_pkt);
747 packet->_header = LDNS_MALLOC(ldns_hdr);
748 if (!packet->_header) {
753 packet->_question = ldns_rr_list_new();
754 packet->_answer = ldns_rr_list_new();
755 packet->_authority = ldns_rr_list_new();
756 packet->_additional = ldns_rr_list_new();
758 /* default everything to false */
759 ldns_pkt_set_qr(packet, false);
760 ldns_pkt_set_aa(packet, false);
761 ldns_pkt_set_tc(packet, false);
762 ldns_pkt_set_rd(packet, false);
763 ldns_pkt_set_ra(packet, false);
764 ldns_pkt_set_ad(packet, false);
765 ldns_pkt_set_cd(packet, false);
767 ldns_pkt_set_opcode(packet, LDNS_PACKET_QUERY);
768 ldns_pkt_set_rcode(packet, 0);
769 ldns_pkt_set_id(packet, 0);
770 ldns_pkt_set_size(packet, 0);
771 ldns_pkt_set_querytime(packet, 0);
772 memset(&packet->timestamp, 0, sizeof(packet->timestamp));
773 ldns_pkt_set_answerfrom(packet, NULL);
774 ldns_pkt_set_section_count(packet, LDNS_SECTION_QUESTION, 0);
775 ldns_pkt_set_section_count(packet, LDNS_SECTION_ANSWER, 0);
776 ldns_pkt_set_section_count(packet, LDNS_SECTION_AUTHORITY, 0);
777 ldns_pkt_set_section_count(packet, LDNS_SECTION_ADDITIONAL, 0);
779 ldns_pkt_set_edns_udp_size(packet, 0);
780 ldns_pkt_set_edns_extended_rcode(packet, 0);
781 ldns_pkt_set_edns_version(packet, 0);
782 ldns_pkt_set_edns_z(packet, 0);
783 ldns_pkt_set_edns_data(packet, NULL);
784 packet->_edns_present = false;
786 ldns_pkt_set_tsig(packet, NULL);
792 ldns_pkt_free(ldns_pkt *packet)
795 LDNS_FREE(packet->_header);
796 ldns_rr_list_deep_free(packet->_question);
797 ldns_rr_list_deep_free(packet->_answer);
798 ldns_rr_list_deep_free(packet->_authority);
799 ldns_rr_list_deep_free(packet->_additional);
800 ldns_rr_free(packet->_tsig_rr);
801 ldns_rdf_deep_free(packet->_edns_data);
802 ldns_rdf_deep_free(packet->_answerfrom);
808 ldns_pkt_set_flags(ldns_pkt *packet, uint16_t flags)
813 if ((flags & LDNS_QR) == LDNS_QR) {
814 ldns_pkt_set_qr(packet, true);
816 if ((flags & LDNS_AA) == LDNS_AA) {
817 ldns_pkt_set_aa(packet, true);
819 if ((flags & LDNS_RD) == LDNS_RD) {
820 ldns_pkt_set_rd(packet, true);
822 if ((flags & LDNS_TC) == LDNS_TC) {
823 ldns_pkt_set_tc(packet, true);
825 if ((flags & LDNS_CD) == LDNS_CD) {
826 ldns_pkt_set_cd(packet, true);
828 if ((flags & LDNS_RA) == LDNS_RA) {
829 ldns_pkt_set_ra(packet, true);
831 if ((flags & LDNS_AD) == LDNS_AD) {
832 ldns_pkt_set_ad(packet, true);
839 ldns_pkt_authsoa(const ldns_rdf* rr_name, ldns_rr_class rr_class)
841 ldns_rr* soa_rr = ldns_rr_new();
845 ldns_rdf *serial_rdf;
846 ldns_rdf *refresh_rdf;
848 ldns_rdf *expire_rdf;
849 ldns_rdf *minimum_rdf;
854 owner_rdf = ldns_rdf_clone(rr_name);
856 ldns_rr_free(soa_rr);
860 ldns_rr_set_owner(soa_rr, owner_rdf);
861 ldns_rr_set_type(soa_rr, LDNS_RR_TYPE_SOA);
862 ldns_rr_set_class(soa_rr, rr_class);
863 ldns_rr_set_question(soa_rr, false);
865 if (ldns_str2rdf_dname(&mname_rdf, ".") != LDNS_STATUS_OK) {
866 ldns_rr_free(soa_rr);
869 ldns_rr_push_rdf(soa_rr, mname_rdf);
871 if (ldns_str2rdf_dname(&rname_rdf, ".") != LDNS_STATUS_OK) {
872 ldns_rr_free(soa_rr);
875 ldns_rr_push_rdf(soa_rr, rname_rdf);
877 serial_rdf = ldns_native2rdf_int32(LDNS_RDF_TYPE_INT32, 0);
879 ldns_rr_free(soa_rr);
882 ldns_rr_push_rdf(soa_rr, serial_rdf);
884 refresh_rdf = ldns_native2rdf_int32(LDNS_RDF_TYPE_INT32, 0);
886 ldns_rr_free(soa_rr);
889 ldns_rr_push_rdf(soa_rr, refresh_rdf);
891 retry_rdf = ldns_native2rdf_int32(LDNS_RDF_TYPE_INT32, 0);
893 ldns_rr_free(soa_rr);
896 ldns_rr_push_rdf(soa_rr, retry_rdf);
898 expire_rdf = ldns_native2rdf_int32(LDNS_RDF_TYPE_INT32, 0);
900 ldns_rr_free(soa_rr);
903 ldns_rr_push_rdf(soa_rr, expire_rdf);
905 minimum_rdf = ldns_native2rdf_int32(LDNS_RDF_TYPE_INT32, 0);
907 ldns_rr_free(soa_rr);
910 ldns_rr_push_rdf(soa_rr, minimum_rdf);
917 ldns_pkt_query_new_frm_str_internal(ldns_pkt **p, const char *name,
918 ldns_rr_type rr_type, ldns_rr_class rr_class, uint16_t flags,
922 ldns_rr *question_rr;
925 packet = ldns_pkt_new();
927 return LDNS_STATUS_MEM_ERR;
930 if (!ldns_pkt_set_flags(packet, flags)) {
931 return LDNS_STATUS_ERR;
934 question_rr = ldns_rr_new();
936 return LDNS_STATUS_MEM_ERR;
940 rr_type = LDNS_RR_TYPE_A;
943 rr_class = LDNS_RR_CLASS_IN;
946 if (ldns_str2rdf_dname(&name_rdf, name) == LDNS_STATUS_OK) {
947 ldns_rr_set_owner(question_rr, name_rdf);
948 ldns_rr_set_type(question_rr, rr_type);
949 ldns_rr_set_class(question_rr, rr_class);
950 ldns_rr_set_question(question_rr, true);
952 ldns_pkt_push_rr(packet, LDNS_SECTION_QUESTION, question_rr);
954 ldns_rr_free(question_rr);
955 ldns_pkt_free(packet);
956 return LDNS_STATUS_ERR;
960 ldns_pkt_push_rr(packet, LDNS_SECTION_AUTHORITY, authsoa_rr);
963 packet->_tsig_rr = NULL;
964 ldns_pkt_set_answerfrom(packet, NULL);
967 return LDNS_STATUS_OK;
969 ldns_pkt_free(packet);
970 return LDNS_STATUS_NULL;
975 ldns_pkt_query_new_frm_str(ldns_pkt **p, const char *name,
976 ldns_rr_type rr_type, ldns_rr_class rr_class, uint16_t flags)
978 return ldns_pkt_query_new_frm_str_internal(p, name, rr_type,
979 rr_class, flags, NULL);
983 ldns_pkt_ixfr_request_new_frm_str(ldns_pkt **p, const char *name,
984 ldns_rr_class rr_class, uint16_t flags, ldns_rr *soa)
986 ldns_rr* authsoa_rr = soa;
989 if (ldns_str2rdf_dname(&name_rdf, name) == LDNS_STATUS_OK) {
990 authsoa_rr = ldns_pkt_authsoa(name_rdf, rr_class);
992 ldns_rdf_free(name_rdf);
994 return ldns_pkt_query_new_frm_str_internal(p, name, LDNS_RR_TYPE_IXFR,
995 rr_class, flags, authsoa_rr);
999 ldns_pkt_query_new_internal(ldns_rdf *rr_name, ldns_rr_type rr_type,
1000 ldns_rr_class rr_class, uint16_t flags, ldns_rr* authsoa_rr)
1003 ldns_rr *question_rr;
1005 packet = ldns_pkt_new();
1010 if (!ldns_pkt_set_flags(packet, flags)) {
1014 question_rr = ldns_rr_new();
1016 ldns_pkt_free(packet);
1021 rr_type = LDNS_RR_TYPE_A;
1023 if (rr_class == 0) {
1024 rr_class = LDNS_RR_CLASS_IN;
1027 ldns_rr_set_owner(question_rr, rr_name);
1028 ldns_rr_set_type(question_rr, rr_type);
1029 ldns_rr_set_class(question_rr, rr_class);
1030 ldns_rr_set_question(question_rr, true);
1031 ldns_pkt_push_rr(packet, LDNS_SECTION_QUESTION, question_rr);
1034 ldns_pkt_push_rr(packet, LDNS_SECTION_AUTHORITY, authsoa_rr);
1037 packet->_tsig_rr = NULL;
1042 ldns_pkt_query_new(ldns_rdf *rr_name, ldns_rr_type rr_type,
1043 ldns_rr_class rr_class, uint16_t flags)
1045 return ldns_pkt_query_new_internal(rr_name, rr_type,
1046 rr_class, flags, NULL);
1050 ldns_pkt_ixfr_request_new(ldns_rdf *rr_name, ldns_rr_class rr_class,
1051 uint16_t flags, ldns_rr* soa)
1053 ldns_rr* authsoa_rr = soa;
1055 authsoa_rr = ldns_pkt_authsoa(rr_name, rr_class);
1057 return ldns_pkt_query_new_internal(rr_name, LDNS_RR_TYPE_IXFR,
1058 rr_class, flags, authsoa_rr);
1062 ldns_pkt_reply_type(const ldns_pkt *p)
1067 return LDNS_PACKET_UNKNOWN;
1070 if (ldns_pkt_get_rcode(p) == LDNS_RCODE_NXDOMAIN) {
1071 return LDNS_PACKET_NXDOMAIN;
1074 if (ldns_pkt_ancount(p) == 0 && ldns_pkt_arcount(p) == 0
1075 && ldns_pkt_nscount(p) == 1) {
1078 tmp = ldns_pkt_rr_list_by_type(p, LDNS_RR_TYPE_SOA,
1079 LDNS_SECTION_AUTHORITY);
1081 ldns_rr_list_deep_free(tmp);
1082 return LDNS_PACKET_NODATA;
1084 /* I have no idea ... */
1088 if (ldns_pkt_ancount(p) == 0 && ldns_pkt_nscount(p) > 0) {
1089 tmp = ldns_pkt_rr_list_by_type(p, LDNS_RR_TYPE_NS,
1090 LDNS_SECTION_AUTHORITY);
1092 /* there are nameservers here */
1093 ldns_rr_list_deep_free(tmp);
1094 return LDNS_PACKET_REFERRAL;
1096 /* I have no idea */
1098 ldns_rr_list_deep_free(tmp);
1101 /* if we cannot determine the packet type, we say it's an
1104 return LDNS_PACKET_ANSWER;
1108 ldns_pkt_clone(const ldns_pkt *pkt)
1115 new_pkt = ldns_pkt_new();
1117 ldns_pkt_set_id(new_pkt, ldns_pkt_id(pkt));
1118 ldns_pkt_set_qr(new_pkt, ldns_pkt_qr(pkt));
1119 ldns_pkt_set_aa(new_pkt, ldns_pkt_aa(pkt));
1120 ldns_pkt_set_tc(new_pkt, ldns_pkt_tc(pkt));
1121 ldns_pkt_set_rd(new_pkt, ldns_pkt_rd(pkt));
1122 ldns_pkt_set_cd(new_pkt, ldns_pkt_cd(pkt));
1123 ldns_pkt_set_ra(new_pkt, ldns_pkt_ra(pkt));
1124 ldns_pkt_set_ad(new_pkt, ldns_pkt_ad(pkt));
1125 ldns_pkt_set_opcode(new_pkt, ldns_pkt_get_opcode(pkt));
1126 ldns_pkt_set_rcode(new_pkt, ldns_pkt_get_rcode(pkt));
1127 ldns_pkt_set_qdcount(new_pkt, ldns_pkt_qdcount(pkt));
1128 ldns_pkt_set_ancount(new_pkt, ldns_pkt_ancount(pkt));
1129 ldns_pkt_set_nscount(new_pkt, ldns_pkt_nscount(pkt));
1130 ldns_pkt_set_arcount(new_pkt, ldns_pkt_arcount(pkt));
1131 if (ldns_pkt_answerfrom(pkt))
1132 ldns_pkt_set_answerfrom(new_pkt,
1133 ldns_rdf_clone(ldns_pkt_answerfrom(pkt)));
1134 ldns_pkt_set_timestamp(new_pkt, ldns_pkt_timestamp(pkt));
1135 ldns_pkt_set_querytime(new_pkt, ldns_pkt_querytime(pkt));
1136 ldns_pkt_set_size(new_pkt, ldns_pkt_size(pkt));
1137 ldns_pkt_set_tsig(new_pkt, ldns_rr_clone(ldns_pkt_tsig(pkt)));
1139 ldns_pkt_set_edns_udp_size(new_pkt, ldns_pkt_edns_udp_size(pkt));
1140 ldns_pkt_set_edns_extended_rcode(new_pkt,
1141 ldns_pkt_edns_extended_rcode(pkt));
1142 ldns_pkt_set_edns_version(new_pkt, ldns_pkt_edns_version(pkt));
1143 new_pkt->_edns_present = pkt->_edns_present;
1144 ldns_pkt_set_edns_z(new_pkt, ldns_pkt_edns_z(pkt));
1145 if(ldns_pkt_edns_data(pkt))
1146 ldns_pkt_set_edns_data(new_pkt,
1147 ldns_rdf_clone(ldns_pkt_edns_data(pkt)));
1148 ldns_pkt_set_edns_do(new_pkt, ldns_pkt_edns_do(pkt));
1150 ldns_rr_list_deep_free(new_pkt->_question);
1151 ldns_rr_list_deep_free(new_pkt->_answer);
1152 ldns_rr_list_deep_free(new_pkt->_authority);
1153 ldns_rr_list_deep_free(new_pkt->_additional);
1154 new_pkt->_question = ldns_rr_list_clone(ldns_pkt_question(pkt));
1155 new_pkt->_answer = ldns_rr_list_clone(ldns_pkt_answer(pkt));
1156 new_pkt->_authority = ldns_rr_list_clone(ldns_pkt_authority(pkt));
1157 new_pkt->_additional = ldns_rr_list_clone(ldns_pkt_additional(pkt));