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
  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 static char rcsid[] = "$FreeBSD: src/lib/libc/net/res_mkquery.c,v 1.15.2.2 2002/09/20 10:45:35 nectar Exp $";
  75 #endif /* LIBC_SCCS and not lint */
  76
  77 #include <sys/types.h>
  78 #include <sys/param.h>
  79 #include <netinet/in.h>
  80 #include <arpa/nameser.h>
  81 #include <netdb.h>
  82 #include <resolv.h>
  83 #include <stdio.h>
  84 #include <string.h>
  85
  86 #include "res_config.h"
  87
  88 /*
  89  * Form all types of queries.
  90  * Returns the size of the result or -1.
  91  */
  92 int
  93 res_mkquery(op, dname, class, type, data, datalen, newrr_in, buf, buflen)
  94         int op;                 /* opcode of query */
  95         const char *dname;      /* domain name */
  96         int class, type;        /* class and type of query */
  97         const u_char *data;     /* resource record data */
  98         int datalen;            /* length of data */
  99         const u_char *newrr_in; /* new rr for modify or append */
 100         u_char *buf;            /* buffer to put query */
 101         int buflen;             /* size of buffer */
 102 {
 103         register HEADER *hp;
 104         register u_char *cp;
 105         register int n;
 106         u_char *dnptrs[20], **dpp, **lastdnptr;
 107
 108         if ((_res.options & RES_INIT) == 0 && res_init() == -1) {
 109                 h_errno = NETDB_INTERNAL;
 110                 return (-1);
 111         }
 112 #ifdef DEBUG
 113         if (_res.options & RES_DEBUG)
 114                 printf(";; res_mkquery(%d, %s, %d, %d)\n",
 115                        op, dname, class, type);
 116 #endif
 117         /*
 118          * Initialize header fields.
 119          */
 120         if ((buf == NULL) || (buflen < HFIXEDSZ))
 121                 return (-1);
 122         memset(buf, 0, HFIXEDSZ);
 123         hp = (HEADER *) buf;
 124         hp->id = htons(++_res.id);
 125         hp->opcode = op;
 126         hp->rd = (_res.options & RES_RECURSE) != 0;
 127         hp->rcode = NOERROR;
 128         cp = buf + HFIXEDSZ;
 129         buflen -= HFIXEDSZ;
 130         dpp = dnptrs;
 131         *dpp++ = buf;
 132         *dpp++ = NULL;
 133         lastdnptr = dnptrs + sizeof dnptrs / sizeof dnptrs[0];
 134         /*
 135          * perform opcode specific processing
 136          */
 137         switch (op) {
 138         case QUERY:     /*FALLTHROUGH*/
 139         case NS_NOTIFY_OP:
 140                 if ((buflen -= QFIXEDSZ) < 0)
 141                         return (-1);
 142                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 143                         return (-1);
 144                 cp += n;
 145                 buflen -= n;
 146                 __putshort(type, cp);
 147                 cp += INT16SZ;
 148                 __putshort(class, cp);
 149                 cp += INT16SZ;
 150                 hp->qdcount = htons(1);
 151                 if (op == QUERY || data == NULL)
 152                         break;
 153                 /*
 154                  * Make an additional record for completion domain.
 155                  */
 156                 buflen -= RRFIXEDSZ;
 157                 n = dn_comp((char *)data, cp, buflen, dnptrs, lastdnptr);
 158                 if (n < 0)
 159                         return (-1);
 160                 cp += n;
 161                 buflen -= n;
 162                 __putshort(T_NULL, cp);
 163                 cp += INT16SZ;
 164                 __putshort(class, cp);
 165                 cp += INT16SZ;
 166                 __putlong(0, cp);
 167                 cp += INT32SZ;
 168                 __putshort(0, cp);
 169                 cp += INT16SZ;
 170                 hp->arcount = htons(1);
 171                 break;
 172
 173         case IQUERY:
 174                 /*
 175                  * Initialize answer section
 176                  */
 177                 if (buflen < 1 + RRFIXEDSZ + datalen)
 178                         return (-1);
 179                 *cp++ = '\0';   /* no domain name */
 180                 __putshort(type, cp);
 181                 cp += INT16SZ;
 182                 __putshort(class, cp);
 183                 cp += INT16SZ;
 184                 __putlong(0, cp);
 185                 cp += INT32SZ;
 186                 __putshort(datalen, cp);
 187                 cp += INT16SZ;
 188                 if (datalen) {
 189                         memcpy(cp, data, datalen);
 190                         cp += datalen;
 191                 }
 192                 hp->ancount = htons(1);
 193                 break;
 194
 195         default:
 196                 return (-1);
 197         }
 198         return (cp - buf);
 199 }
 200
 201 /*
 202  * Weak aliases for applications that use certain private entry points,
 203  * and fail to include <resolv.h>.
 204  */
 205 #undef res_mkquery
 206 __weak_reference(__res_mkquery, res_mkquery);
 207
 208 /* attach OPT pseudo-RR, as documented in RFC2671 (EDNS0). */
 209 int
 210 res_opt(n0, buf, buflen, anslen)
 211         int n0;
 212         u_char *buf;            /* buffer to put query */
 213         int buflen;             /* size of buffer */
 214         int anslen;             /* answer buffer length */
 215 {
 216         register HEADER *hp;
 217         register u_char *cp;
 218
 219         hp = (HEADER *) buf;
 220         cp = buf + n0;
 221         buflen -= n0;
 222
 223         if (buflen < 1 + RRFIXEDSZ)
 224                 return -1;
 225
 226         *cp++ = 0;      /* "." */
 227         buflen--;
 228
 229         __putshort(T_OPT, cp);  /* TYPE */
 230         cp += INT16SZ;
 231         if (anslen > 0xffff)
 232                 anslen = 0xffff;                /* limit to 16bit value */
 233         __putshort(anslen & 0xffff, cp);        /* CLASS = UDP payload size */
 234         cp += INT16SZ;
 235         *cp++ = NOERROR;        /* extended RCODE */
 236         *cp++ = 0;              /* EDNS version */
 237         __putshort(0, cp);      /* MBZ */
 238         cp += INT16SZ;
 239         __putshort(0, cp);      /* RDLEN */
 240         cp += INT16SZ;
 241         hp->arcount = htons(ntohs(hp->arcount) + 1);
 242         buflen -= RRFIXEDSZ;
 243
 244         return cp - buf;
 245 }