2003-03-15 Roland McGrath <roland@redhat.com>
[kopensolaris-gnu/glibc.git] / resolv / 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  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  * 
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29
30 /*
31  * Portions Copyright (c) 1993 by Digital Equipment Corporation.
32  * 
33  * Permission to use, copy, modify, and distribute this software for any
34  * purpose with or without fee is hereby granted, provided that the above
35  * copyright notice and this permission notice appear in all copies, and that
36  * the name of Digital Equipment Corporation not be used in advertising or
37  * publicity pertaining to distribution of the document or software without
38  * specific, written prior permission.
39  * 
40  * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
41  * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
42  * OF MERCHANTABILITY AND FITNESS.   IN NO EVENT SHALL DIGITAL EQUIPMENT
43  * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
44  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
45  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
46  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
47  * SOFTWARE.
48  */
49
50 /*
51  * Portions Copyright (c) 1996-1999 by Internet Software Consortium.
52  *
53  * Permission to use, copy, modify, and distribute this software for any
54  * purpose with or without fee is hereby granted, provided that the above
55  * copyright notice and this permission notice appear in all copies.
56  *
57  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
58  * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
59  * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
60  * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
61  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
62  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
63  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
64  * SOFTWARE.
65  */
66
67 #if defined(LIBC_SCCS) && !defined(lint)
68 static const char sccsid[] = "@(#)res_mkquery.c 8.1 (Berkeley) 6/4/93";
69 static const char rcsid[] = "$BINDId: res_mkquery.c,v 8.12 1999/10/13 16:39:40 vixie Exp $";
70 #endif /* LIBC_SCCS and not lint */
71
72 #include <sys/types.h>
73 #include <sys/param.h>
74 #include <netinet/in.h>
75 #include <arpa/nameser.h>
76 #include <netdb.h>
77 #include <resolv.h>
78 #include <stdio.h>
79 #include <string.h>
80
81 /* Options.  Leave them on. */
82 /* #define DEBUG */
83
84 extern const char *_res_opcodes[];
85
86 /*
87  * Form all types of queries.
88  * Returns the size of the result or -1.
89  */
90 int
91 res_nmkquery(res_state statp,
92              int op,                    /* opcode of query */
93              const char *dname,         /* domain name */
94              int class, int type,       /* class and type of query */
95              const u_char *data,        /* resource record data */
96              int datalen,               /* length of data */
97              const u_char *newrr_in,    /* new rr for modify or append */
98              u_char *buf,               /* buffer to put query */
99              int buflen)                /* size of buffer */
100 {
101         register HEADER *hp;
102         register u_char *cp;
103         register int n;
104         u_char *dnptrs[20], **dpp, **lastdnptr;
105
106 #ifdef DEBUG
107         if (statp->options & RES_DEBUG)
108                 printf(";; res_nmkquery(%s, %s, %s, %s)\n",
109                        _res_opcodes[op], dname, p_class(class), p_type(type));
110 #endif
111         /*
112          * Initialize header fields.
113          */
114         if ((buf == NULL) || (buflen < HFIXEDSZ))
115                 return (-1);
116         memset(buf, 0, HFIXEDSZ);
117         hp = (HEADER *) buf;
118         hp->id = htons(++statp->id);
119         hp->opcode = op;
120         hp->rd = (statp->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                         memcpy(cp, data, datalen);
184                         cp += datalen;
185                 }
186                 hp->ancount = htons(1);
187                 break;
188
189         default:
190                 return (-1);
191         }
192         return (cp - buf);
193 }