X-Git-Url: https://git.distorted.org.uk/~mdw/adns/blobdiff_plain/66ade6021bca9f024d7bcd2b3ddeedf7a1b3a90c..284d78823348d01d2d3051d24e9d3b0b2e671aa1:/src/query.c

diff --git a/src/query.c b/src/query.c
index a5882f3..6a1ec75 100644
--- a/src/query.c
+++ b/src/query.c
@@ -148,6 +148,7 @@ static adns_status check_domain_name(adns_state ads, adns_queryflags flags,
 }
 
 adns_status adns__internal_submit(adns_state ads, adns_query *query_r,
+				  adns_query parent,
 				  const typeinfo *typei, adns_rrtype type,
 				  vbuf *qumsg_vb, int id,
 				  adns_queryflags flags, struct timeval now,
@@ -161,6 +162,8 @@ adns_status adns__internal_submit(adns_state ads, adns_query *query_r,
   if (!qu) { err = adns_s_nomemory; goto x_err; }
   *query_r= qu;
 
+  qu->parent= parent;
+  LIST_LINK_TAIL_PART(parent->children,qu,siblings.);
   memcpy(&qu->ctx,ctx,sizeof(qu->ctx));
   query_submit(ads,qu, typei,qumsg_vb,id,flags,now);