lib/libc/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
  34 /*
  35  * Portions Copyright (c) 1993 by Digital Equipment Corporation.
  36  *
  37  * Permission to use, copy, modify, and distribute this software for any
  38  * purpose with or without fee is hereby granted, provided that the above
  39  * copyright notice and this permission notice appear in all copies, and that
  40  * the name of Digital Equipment Corporation not be used in advertising or
  41  * publicity pertaining to distribution of the document or software without
  42  * specific, written prior permission.
  43  *
  44  * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
  45  * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
  46  * OF MERCHANTABILITY AND FITNESS.   IN NO EVENT SHALL DIGITAL EQUIPMENT
  47  * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
  48  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
  49  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
  50  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
  51  * SOFTWARE.
  52  */
  53
  54 /*
  55  * Portions Copyright (c) 1996 by Internet Software Consortium.
  56  *
  57  * Permission to use, copy, modify, and distribute this software for any
  58  * purpose with or without fee is hereby granted, provided that the above
  59  * copyright notice and this permission notice appear in all copies.
  60  *
  61  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
  62  * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
  63  * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
  64  * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
  65  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
  66  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
  67  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
  68  * SOFTWARE.
  69  */
  70
  71 #if defined(LIBC_SCCS) && !defined(lint)
  72 static char sccsid[] = "@(#)res_mkquery.c       8.1 (Berkeley) 6/4/93";
  73 static char orig_rcsid[] = "From: Id: res_mkquery.c,v 8.9 1997/04/24 22:22:36 vixie Exp $";
  74 #endif /* LIBC_SCCS and not lint */
  75 #include <sys/cdefs.h>
  76 __FBSDID("$FreeBSD$");
  77
  78 #include <sys/types.h>
  79 #include <sys/param.h>
  80 #include <netinet/in.h>
  81 #include <arpa/nameser.h>
  82 #include <netdb.h>
  83 #include <resolv.h>
  84 #include <stdio.h>
  85 #include <string.h>
  86
  87 #include "res_config.h"
  88
  89 /*
  90  * Form all types of queries.
  91  * Returns the size of the result or -1.
  92  */
  93 int
  94 res_mkquery(op, dname, class, type, data, datalen, newrr_in, buf, buflen)
  95         int op;                 /* opcode of query */
  96         const char *dname;      /* domain name */
  97         int class, type;        /* class and type of query */
  98         const u_char *data;     /* resource record data */
  99         int datalen;            /* length of data */
 100         const u_char *newrr_in; /* new rr for modify or append */
 101         u_char *buf;            /* buffer to put query */
 102         int buflen;             /* size of buffer */
 103 {
 104         HEADER *hp;
 105         u_char *cp;
 106         int n;
 107         u_char *dnptrs[20], **dpp, **lastdnptr;
 108
 109         if ((_res.options & RES_INIT) == 0 && res_init() == -1) {
 110                 h_errno = NETDB_INTERNAL;
 111                 return (-1);
 112         }
 113 #ifdef DEBUG
 114         if (_res.options & RES_DEBUG)
 115                 printf(";; res_mkquery(%d, %s, %d, %d)\n",
 116                        op, dname, class, type);
 117 #endif
 118         /*
 119          * Initialize header fields.
 120          */
 121         if ((buf == NULL) || (buflen < HFIXEDSZ))
 122                 return (-1);
 123         memset(buf, 0, HFIXEDSZ);
 124         hp = (HEADER *) buf;
 125         hp->id = htons(++_res.id);
 126         hp->opcode = op;
 127         hp->rd = (_res.options & RES_RECURSE) != 0;
 128         hp->rcode = NOERROR;
 129         cp = buf + HFIXEDSZ;
 130         buflen -= HFIXEDSZ;
 131         dpp = dnptrs;
 132         *dpp++ = buf;
 133         *dpp++ = NULL;
 134         lastdnptr = dnptrs + sizeof dnptrs / sizeof dnptrs[0];
 135         /*
 136          * perform opcode specific processing
 137          */
 138         switch (op) {
 139         case QUERY:     /*FALLTHROUGH*/
 140         case NS_NOTIFY_OP:
 141                 if ((buflen -= QFIXEDSZ) < 0)
 142                         return (-1);
 143                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 144                         return (-1);
 145                 cp += n;
 146                 buflen -= n;
 147                 __putshort(type, cp);
 148                 cp += INT16SZ;
 149                 __putshort(class, cp);
 150                 cp += INT16SZ;
 151                 hp->qdcount = htons(1);
 152                 if (op == QUERY || data == NULL)
 153                         break;
 154                 /*
 155                  * Make an additional record for completion domain.
 156                  */
 157                 buflen -= RRFIXEDSZ;
 158                 n = dn_comp((char *)data, cp, buflen, dnptrs, lastdnptr);
 159                 if (n < 0)
 160                         return (-1);
 161                 cp += n;
 162                 buflen -= n;
 163                 __putshort(T_NULL, cp);
 164                 cp += INT16SZ;
 165                 __putshort(class, cp);
 166                 cp += INT16SZ;
 167                 __putlong(0, cp);
 168                 cp += INT32SZ;
 169                 __putshort(0, cp);
 170                 cp += INT16SZ;
 171                 hp->arcount = htons(1);
 172                 break;
 173
 174         case IQUERY:
 175                 /*
 176                  * Initialize answer section
 177                  */
 178                 if (buflen < 1 + RRFIXEDSZ + datalen)
 179                         return (-1);
 180                 *cp++ = '\0';   /* no domain name */
 181                 __putshort(type, cp);
 182                 cp += INT16SZ;
 183                 __putshort(class, cp);
 184                 cp += INT16SZ;
 185                 __putlong(0, cp);
 186                 cp += INT32SZ;
 187                 __putshort(datalen, cp);
 188                 cp += INT16SZ;
 189                 if (datalen) {
 190                         memcpy(cp, data, datalen);
 191                         cp += datalen;
 192                 }
 193                 hp->ancount = htons(1);
 194                 break;
 195
 196         default:
 197                 return (-1);
 198         }
 199         return (cp - buf);
 200 }
 201
 202 /*
 203  * Weak aliases for applications that use certain private entry points,
 204  * and fail to include <resolv.h>.
 205  */
 206 #undef res_mkquery
 207 __weak_reference(__res_mkquery, res_mkquery);
 208
 209 /* attach OPT pseudo-RR, as documented in RFC2671 (EDNS0). */
 210 int
 211 res_opt(n0, buf, buflen, anslen)
 212         int n0;
 213         u_char *buf;            /* buffer to put query */
 214         int buflen;             /* size of buffer */
 215         int anslen;             /* answer buffer length */
 216 {
 217         HEADER *hp;
 218         u_char *cp;
 219
 220         hp = (HEADER *) buf;
 221         cp = buf + n0;
 222         buflen -= n0;
 223
 224         if (buflen < 1 + RRFIXEDSZ)
 225                 return -1;
 226
 227         *cp++ = 0;      /* "." */
 228         buflen--;
 229
 230         __putshort(T_OPT, cp);  /* TYPE */
 231         cp += INT16SZ;
 232         if (anslen > 0xffff)
 233                 anslen = 0xffff;                /* limit to 16bit value */
 234         __putshort(anslen & 0xffff, cp);        /* CLASS = UDP payload size */
 235         cp += INT16SZ;
 236         *cp++ = NOERROR;        /* extended RCODE */
 237         *cp++ = 0;              /* EDNS version */
 238         __putshort(0, cp);      /* MBZ */
 239         cp += INT16SZ;
 240         __putshort(0, cp);      /* RDLEN */
 241         cp += INT16SZ;
 242         hp->arcount = htons(ntohs(hp->arcount) + 1);
 243         buflen -= RRFIXEDSZ;
 244
 245         return cp - buf;
 246 }