lib/libcr/net/res_mkquery.c

   1 /*
   2  * Copyright (c) 1985, 1993
   3  *    The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  * @(#)res_mkquery.c    8.1 (Berkeley) 6/4/93
  34  * $From: Id: res_mkquery.c,v 8.9 1997/04/24 22:22:36 vixie Exp $
  35  * $FreeBSD: src/lib/libc/net/res_mkquery.c,v 1.15.2.2 2002/09/20 10:45:35 nectar Exp $
  36  * $DragonFly: src/lib/libcr/net/Attic/res_mkquery.c,v 1.3 2004/10/25 19:38:25 drhodus Exp $
  37  */
  38
  39 /*
  40  * Portions Copyright (c) 1993 by Digital Equipment Corporation.
  41  *
  42  * Permission to use, copy, modify, and distribute this software for any
  43  * purpose with or without fee is hereby granted, provided that the above
  44  * copyright notice and this permission notice appear in all copies, and that
  45  * the name of Digital Equipment Corporation not be used in advertising or
  46  * publicity pertaining to distribution of the document or software without
  47  * specific, written prior permission.
  48  *
  49  * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
  50  * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
  51  * OF MERCHANTABILITY AND FITNESS.   IN NO EVENT SHALL DIGITAL EQUIPMENT
  52  * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
  53  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
  54  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
  55  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
  56  * SOFTWARE.
  57  */
  58
  59 /*
  60  * Portions Copyright (c) 1996 by Internet Software Consortium.
  61  *
  62  * Permission to use, copy, modify, and distribute this software for any
  63  * purpose with or without fee is hereby granted, provided that the above
  64  * copyright notice and this permission notice appear in all copies.
  65  *
  66  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
  67  * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
  68  * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
  69  * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
  70  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
  71  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
  72  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
  73  * SOFTWARE.
  74  */
  75
  76 #include <sys/types.h>
  77 #include <sys/param.h>
  78 #include <netinet/in.h>
  79 #include <arpa/nameser.h>
  80 #include <netdb.h>
  81 #include <resolv.h>
  82 #include <stdio.h>
  83 #include <string.h>
  84
  85 #include "res_config.h"
  86
  87 /*
  88  * Form all types of queries.
  89  * Returns the size of the result or -1.
  90  */
  91 int
  92 res_mkquery(op, dname, class, type, data, datalen, newrr_in, buf, buflen)
  93         int op;                 /* opcode of query */
  94         const char *dname;      /* domain name */
  95         int class, type;        /* class and type of query */
  96         const u_char *data;     /* resource record data */
  97         int datalen;            /* length of data */
  98         const u_char *newrr_in; /* new rr for modify or append */
  99         u_char *buf;            /* buffer to put query */
 100         int buflen;             /* size of buffer */
 101 {
 102         HEADER *hp;
 103         u_char *cp;
 104         int n;
 105         u_char *dnptrs[20], **dpp, **lastdnptr;
 106
 107         if ((_res.options & RES_INIT) == 0 && res_init() == -1) {
 108                 h_errno = NETDB_INTERNAL;
 109                 return (-1);
 110         }
 111 #ifdef DEBUG
 112         if (_res.options & RES_DEBUG)
 113                 printf(";; res_mkquery(%d, %s, %d, %d)\n",
 114                        op, dname, class, type);
 115 #endif
 116         /*
 117          * Initialize header fields.
 118          */
 119         if ((buf == NULL) || (buflen < HFIXEDSZ))
 120                 return (-1);
 121         memset(buf, 0, HFIXEDSZ);
 122         hp = (HEADER *) buf;
 123         hp->id = htons(++_res.id);
 124         hp->opcode = op;
 125         hp->rd = (_res.options & RES_RECURSE) != 0;
 126         hp->rcode = NOERROR;
 127         cp = buf + HFIXEDSZ;
 128         buflen -= HFIXEDSZ;
 129         dpp = dnptrs;
 130         *dpp++ = buf;
 131         *dpp++ = NULL;
 132         lastdnptr = dnptrs + sizeof dnptrs / sizeof dnptrs[0];
 133         /*
 134          * perform opcode specific processing
 135          */
 136         switch (op) {
 137         case QUERY:     /*FALLTHROUGH*/
 138         case NS_NOTIFY_OP:
 139                 if ((buflen -= QFIXEDSZ) < 0)
 140                         return (-1);
 141                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 142                         return (-1);
 143                 cp += n;
 144                 buflen -= n;
 145                 __putshort(type, cp);
 146                 cp += INT16SZ;
 147                 __putshort(class, cp);
 148                 cp += INT16SZ;
 149                 hp->qdcount = htons(1);
 150                 if (op == QUERY || data == NULL)
 151                         break;
 152                 /*
 153                  * Make an additional record for completion domain.
 154                  */
 155                 buflen -= RRFIXEDSZ;
 156                 n = dn_comp((char *)data, cp, buflen, dnptrs, lastdnptr);
 157                 if (n < 0)
 158                         return (-1);
 159                 cp += n;
 160                 buflen -= n;
 161                 __putshort(T_NULL, cp);
 162                 cp += INT16SZ;
 163                 __putshort(class, cp);
 164                 cp += INT16SZ;
 165                 __putlong(0, cp);
 166                 cp += INT32SZ;
 167                 __putshort(0, cp);
 168                 cp += INT16SZ;
 169                 hp->arcount = htons(1);
 170                 break;
 171
 172         case IQUERY:
 173                 /*
 174                  * Initialize answer section
 175                  */
 176                 if (buflen < 1 + RRFIXEDSZ + datalen)
 177                         return (-1);
 178                 *cp++ = '\0';   /* no domain name */
 179                 __putshort(type, cp);
 180                 cp += INT16SZ;
 181                 __putshort(class, cp);
 182                 cp += INT16SZ;
 183                 __putlong(0, cp);
 184                 cp += INT32SZ;
 185                 __putshort(datalen, cp);
 186                 cp += INT16SZ;
 187                 if (datalen) {
 188                         memcpy(cp, data, datalen);
 189                         cp += datalen;
 190                 }
 191                 hp->ancount = htons(1);
 192                 break;
 193
 194         default:
 195                 return (-1);
 196         }
 197         return (cp - buf);
 198 }
 199
 200 /*
 201  * Weak aliases for applications that use certain private entry points,
 202  * and fail to include <resolv.h>.
 203  */
 204 #undef res_mkquery
 205 __weak_reference(__res_mkquery, res_mkquery);
 206
 207 /* attach OPT pseudo-RR, as documented in RFC2671 (EDNS0). */
 208 int
 209 res_opt(n0, buf, buflen, anslen)
 210         int n0;
 211         u_char *buf;            /* buffer to put query */
 212         int buflen;             /* size of buffer */
 213         int anslen;             /* answer buffer length */
 214 {
 215         HEADER *hp;
 216         u_char *cp;
 217
 218         hp = (HEADER *) buf;
 219         cp = buf + n0;
 220         buflen -= n0;
 221
 222         if (buflen < 1 + RRFIXEDSZ)
 223                 return -1;
 224
 225         *cp++ = 0;      /* "." */
 226         buflen--;
 227
 228         __putshort(T_OPT, cp);  /* TYPE */
 229         cp += INT16SZ;
 230         if (anslen > 0xffff)
 231                 anslen = 0xffff;                /* limit to 16bit value */
 232         __putshort(anslen & 0xffff, cp);        /* CLASS = UDP payload size */
 233         cp += INT16SZ;
 234         *cp++ = NOERROR;        /* extended RCODE */
 235         *cp++ = 0;              /* EDNS version */
 236         __putshort(0, cp);      /* MBZ */
 237         cp += INT16SZ;
 238         __putshort(0, cp);      /* RDLEN */
 239         cp += INT16SZ;
 240         hp->arcount = htons(ntohs(hp->arcount) + 1);
 241         buflen -= RRFIXEDSZ;
 242
 243         return cp - buf;
 244 }