contrib/bind/res/res_mkquery.c

   1 /*
   2  * ++Copyright++ 1985, 1993
   3  * -
   4  * Copyright (c) 1985, 1993
   5  *    The Regents of the University of California.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. All advertising materials mentioning features or use of this software
  16  *    must display the following acknowledgement:
  17  *      This product includes software developed by the University of
  18  *      California, Berkeley and its contributors.
  19  * 4. Neither the name of the University nor the names of its contributors
  20  *    may be used to endorse or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  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  * --Copyright--
  54  */
  55
  56 #if defined(LIBC_SCCS) && !defined(lint)
  57 static char sccsid[] = "@(#)res_mkquery.c       8.1 (Berkeley) 6/4/93";
  58 static char rcsid[] = "$Id: res_mkquery.c,v 8.4 1996/08/05 08:31:35 vixie Exp $";
  59 #endif /* LIBC_SCCS and not lint */
  60
  61 #include <sys/types.h>
  62 #include <sys/param.h>
  63 #include <netinet/in.h>
  64 #include <arpa/nameser.h>
  65
  66 #include <stdio.h>
  67 #include <netdb.h>
  68 #include <resolv.h>
  69 #if defined(BSD) && (BSD >= 199103)
  70 # include <string.h>
  71 #else
  72 # include "../conf/portability.h"
  73 #endif
  74
  75 #if defined(USE_OPTIONS_H)
  76 # include <../conf/options.h>
  77 #endif
  78
  79 /*
  80  * Form all types of queries.
  81  * Returns the size of the result or -1.
  82  */
  83 int
  84 res_mkquery(op, dname, class, type, data, datalen, newrr_in, buf, buflen)
  85         int op;                 /* opcode of query */
  86         const char *dname;      /* domain name */
  87         int class, type;        /* class and type of query */
  88         const u_char *data;     /* resource record data */
  89         int datalen;            /* length of data */
  90         const u_char *newrr_in; /* new rr for modify or append */
  91         u_char *buf;            /* buffer to put query */
  92         int buflen;             /* size of buffer */
  93 {
  94         register HEADER *hp;
  95         register u_char *cp;
  96         register int n;
  97 #ifdef ALLOW_UPDATES
  98         struct rrec *newrr = (struct rrec *) newrr_in;
  99 #endif
 100         u_char *dnptrs[20], **dpp, **lastdnptr;
 101
 102         if ((_res.options & RES_INIT) == 0 && res_init() == -1) {
 103                 h_errno = NETDB_INTERNAL;
 104                 return (-1);
 105         }
 106 #ifdef DEBUG
 107         if (_res.options & RES_DEBUG)
 108                 printf(";; res_mkquery(%d, %s, %d, %d)\n",
 109                        op, dname, class, type);
 110 #endif
 111         /*
 112          * Initialize header fields.
 113          */
 114         if ((buf == NULL) || (buflen < HFIXEDSZ))
 115                 return (-1);
 116         bzero(buf, HFIXEDSZ);
 117         hp = (HEADER *) buf;
 118         hp->id = htons(++_res.id);
 119         hp->opcode = op;
 120         hp->rd = (_res.options & RES_RECURSE) != 0;
 121         hp->rcode = NOERROR;
 122         cp = buf + HFIXEDSZ;
 123         buflen -= HFIXEDSZ;
 124         dpp = dnptrs;
 125         *dpp++ = buf;
 126         *dpp++ = NULL;
 127         lastdnptr = dnptrs + sizeof dnptrs / sizeof dnptrs[0];
 128         /*
 129          * perform opcode specific processing
 130          */
 131         switch (op) {
 132         case QUERY:     /*FALLTHROUGH*/
 133         case NS_NOTIFY_OP:
 134                 if ((buflen -= QFIXEDSZ) < 0)
 135                         return (-1);
 136                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 137                         return (-1);
 138                 cp += n;
 139                 buflen -= n;
 140                 __putshort(type, cp);
 141                 cp += INT16SZ;
 142                 __putshort(class, cp);
 143                 cp += INT16SZ;
 144                 hp->qdcount = htons(1);
 145                 if (op == QUERY || data == NULL)
 146                         break;
 147                 /*
 148                  * Make an additional record for completion domain.
 149                  */
 150                 buflen -= RRFIXEDSZ;
 151                 n = dn_comp((char *)data, cp, buflen, dnptrs, lastdnptr);
 152                 if (n < 0)
 153                         return (-1);
 154                 cp += n;
 155                 buflen -= n;
 156                 __putshort(T_NULL, cp);
 157                 cp += INT16SZ;
 158                 __putshort(class, cp);
 159                 cp += INT16SZ;
 160                 __putlong(0, cp);
 161                 cp += INT32SZ;
 162                 __putshort(0, cp);
 163                 cp += INT16SZ;
 164                 hp->arcount = htons(1);
 165                 break;
 166
 167         case IQUERY:
 168                 /*
 169                  * Initialize answer section
 170                  */
 171                 if (buflen < 1 + RRFIXEDSZ + datalen)
 172                         return (-1);
 173                 *cp++ = '\0';   /* no domain name */
 174                 __putshort(type, cp);
 175                 cp += INT16SZ;
 176                 __putshort(class, cp);
 177                 cp += INT16SZ;
 178                 __putlong(0, cp);
 179                 cp += INT32SZ;
 180                 __putshort(datalen, cp);
 181                 cp += INT16SZ;
 182                 if (datalen) {
 183                         bcopy(data, cp, datalen);
 184                         cp += datalen;
 185                 }
 186                 hp->ancount = htons(1);
 187                 break;
 188
 189 #ifdef ALLOW_UPDATES
 190         /*
 191          * For UPDATEM/UPDATEMA, do UPDATED/UPDATEDA followed by UPDATEA
 192          * (Record to be modified is followed by its replacement in msg.)
 193          */
 194         case UPDATEM:
 195         case UPDATEMA:
 196
 197         case UPDATED:
 198                 /*
 199                  * The res code for UPDATED and UPDATEDA is the same; user
 200                  * calls them differently: specifies data for UPDATED; server
 201                  * ignores data if specified for UPDATEDA.
 202                  */
 203         case UPDATEDA:
 204                 buflen -= RRFIXEDSZ + datalen;
 205                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 206                         return (-1);
 207                 cp += n;
 208                 __putshort(type, cp);
 209                 cp += INT16SZ;
 210                 __putshort(class, cp);
 211                 cp += INT16SZ;
 212                 __putlong(0, cp);
 213                 cp += INT32SZ;
 214                 __putshort(datalen, cp);
 215                 cp += INT16SZ;
 216                 if (datalen) {
 217                         bcopy(data, cp, datalen);
 218                         cp += datalen;
 219                 }
 220                 if ( (op == UPDATED) || (op == UPDATEDA) ) {
 221                         hp->ancount = htons(0);
 222                         break;
 223                 }
 224                 /* Else UPDATEM/UPDATEMA, so drop into code for UPDATEA */
 225
 226         case UPDATEA:   /* Add new resource record */
 227                 buflen -= RRFIXEDSZ + datalen;
 228                 if ((n = dn_comp(dname, cp, buflen, dnptrs, lastdnptr)) < 0)
 229                         return (-1);
 230                 cp += n;
 231                 __putshort(newrr->r_type, cp);
 232                 cp += INT16SZ;
 233                 __putshort(newrr->r_class, cp);
 234                 cp += INT16SZ;
 235                 __putlong(0, cp);
 236                 cp += INT32SZ;
 237                 __putshort(newrr->r_size, cp);
 238                 cp += INT16SZ;
 239                 if (newrr->r_size) {
 240                         bcopy(newrr->r_data, cp, newrr->r_size);
 241                         cp += newrr->r_size;
 242                 }
 243                 hp->ancount = htons(0);
 244                 break;
 245 #endif /* ALLOW_UPDATES */
 246         default:
 247                 return (-1);
 248         }
 249         return (cp - buf);
 250 }