+
+static adns_status pap_findaddrs(adns_query qu, int serv, adns_rr_hostaddr *ha,
+ const byte *dgram, int dglen, int *cbyte_io,
+ int dmstart, int count) {
+ int rri, nrrs;
+ int type, class, rdlen, rdstart, ownermatched;
+
+ for (rri=0, nrrs=-1; rri<count; rri++) {
+ st= adns__findrr_anychk(qu,serv,dgram,dglen,cbyte_io,
+ &type,&class,&rdlen,&rdstart,
+ dgram,dglen,dmstart,
+ &ownermatched);
+ if (st) return st;
+ if (class != DNS_CLASS_IN) continue;
+ if (type != adns_r_a) continue;
+ if (nrrs == -1) {
+ qu->vb.used= 0;
+ nrrs= 0;
+ }
+ if (!adns__vbuf_ensure(&qu->vb,qu->vb.used+sizeof(adns_addr)))
+ return adns_s_nolocalmem;
+ st= pa_addr(qu,serv, dgram,dglen, rdstart,rdstart+rdlen,
+ qu->vb.buf + qu->vb.used);
+ if (st) return st;
+ qu->vb.used += sizeof(adns_addr);
+ nrrs++;
+ }
+ if (nrrs >= 0) {
+ ha->rrs= adns__alloc_interim(qu,qu->vb.used);
+ if (!ha->rrs) return adns_s_nolocalmem;
+ ha->nrrs= nrrs;
+ ha->astatus= adns_s_ok;
+ }
+ return adns_s_ok;
+}
+
+static adns_status pap_hostaddr(adns_query qu, int serv,
+ const byte *dgram, int dglen, int *cbyte_io, int max,
+ int nsstart, int nscount, int arcount, void *datap) {
+ adns_rr_hostaddr **rrp= datap;
+ adns_status st;
+ int dmstart, cbyte;
+
+ dmstart= cbyte= *cbyte_io;
+ st= pap_domain(qu,serv,
+ qu->flags & adns_qf_quoteok_anshost ? pdf_quoteok : 0,
+ dgram,dglen,&cbyte,max,&rrp->dm);
+ if (st) return st;
+ *cbyte_io= cbyte;
+
+ rrp->astatus= adns_s_ok;
+ rrp->naddrs= -1;
+ rrp->addrs= 0;
+
+ cbyte= nsstart;
+
+ st= pap_findaddrs(qu, rrp, dgram,dglen,&cbyte, dmstart);
+ if (st) return st;
+ if (rrp->naddrs != -1) return adns_s_ok;
+
+ st= pap_findaddrs(qu, rrp, dgram,dglen,&cbyte, dmstart);
+ if (st) return st;
+ if (rrp->naddrs != -1) return adns_s_ok;
+}
+
+static adns_status pa_hostaddr(adns_query qu, int serv,
+ const byte *dgram, int dglen, int cbyte, int max,
+ int nsstart, void *datap) {
+ adns_rr_hostaddr **rrp= datap;
+ adns_status st;
+ int dmstart;
+
+ dmstart= cbyte;
+ st= pap_domain(qu,serv,
+ qu->flags & adns_qf_quoteok_anshost ? pdf_quoteok : 0,
+ dgram,dglen,&cbyte,max,&rrp->dm);
+ if (st) return st;
+ if (cbyte != max) return adns_s_invaliddata;
+
+ rrp->astatus= adns_s_ok;
+ rrp->naddrs= -1;
+ rrp->addrs= 0;
+
+ cbyte= nsstart;
+
+ st= pap_findaddrs(qu, rrp, dgram,dglen, dmstart,&cbyte);
+ if (st) return st;
+ if (rrp->naddrs != -1) return adns_s_ok;
+
+ st= pap_findaddrs(qu, rrp, dgram,dglen, dmstart,&cbyte);
+ if (st) return st;
+ if (rrp->naddrs != -1) return adns_s_ok;
+
+ assert(!"additional section didn't have required data");
+}
+