1 3e0d8fb3 2005-12-27 devnull #include <u.h>
2 3e0d8fb3 2005-12-27 devnull #include <libc.h>
3 3e0d8fb3 2005-12-27 devnull #include <ip.h>
4 3e0d8fb3 2005-12-27 devnull #include <ctype.h>
5 3e0d8fb3 2005-12-27 devnull #include <bio.h>
6 3e0d8fb3 2005-12-27 devnull #include <ndb.h>
7 5c9f76b5 2006-02-14 devnull #include <thread.h>
8 3e0d8fb3 2005-12-27 devnull #include "dns.h"
11 3e0d8fb3 2005-12-27 devnull * Hash table for domain names. The hash is based only on the
12 3e0d8fb3 2005-12-27 devnull * first element of the domain name.
14 3e0d8fb3 2005-12-27 devnull DN *ht[HTLEN];
17 3e0d8fb3 2005-12-27 devnull static struct
20 3e0d8fb3 2005-12-27 devnull ulong names; /* names allocated */
21 3e0d8fb3 2005-12-27 devnull ulong oldest; /* longest we'll leave a name around */
22 3e0d8fb3 2005-12-27 devnull int active;
23 3e0d8fb3 2005-12-27 devnull int mutex;
25 3e0d8fb3 2005-12-27 devnull } dnvars;
27 3e0d8fb3 2005-12-27 devnull /* names of RR types */
28 3e0d8fb3 2005-12-27 devnull char *rrtname[] =
30 3e0d8fb3 2005-12-27 devnull [Ta] "ip",
31 3e0d8fb3 2005-12-27 devnull [Tns] "ns",
32 3e0d8fb3 2005-12-27 devnull [Tmd] "md",
33 3e0d8fb3 2005-12-27 devnull [Tmf] "mf",
34 3e0d8fb3 2005-12-27 devnull [Tcname] "cname",
35 3e0d8fb3 2005-12-27 devnull [Tsoa] "soa",
36 3e0d8fb3 2005-12-27 devnull [Tmb] "mb",
37 3e0d8fb3 2005-12-27 devnull [Tmg] "mg",
38 3e0d8fb3 2005-12-27 devnull [Tmr] "mr",
39 3e0d8fb3 2005-12-27 devnull [Tnull] "null",
40 3e0d8fb3 2005-12-27 devnull [Twks] "wks",
41 3e0d8fb3 2005-12-27 devnull [Tptr] "ptr",
42 3e0d8fb3 2005-12-27 devnull [Thinfo] "hinfo",
43 3e0d8fb3 2005-12-27 devnull [Tminfo] "minfo",
44 3e0d8fb3 2005-12-27 devnull [Tmx] "mx",
45 3e0d8fb3 2005-12-27 devnull [Ttxt] "txt",
46 3e0d8fb3 2005-12-27 devnull [Trp] "rp",
47 3e0d8fb3 2005-12-27 devnull [Tkey] "key",
48 3e0d8fb3 2005-12-27 devnull [Tcert] "cert",
49 3e0d8fb3 2005-12-27 devnull [Tsig] "sig",
50 3e0d8fb3 2005-12-27 devnull [Taaaa] "ipv6",
51 3e0d8fb3 2005-12-27 devnull [Tixfr] "ixfr",
52 3e0d8fb3 2005-12-27 devnull [Taxfr] "axfr",
53 3e0d8fb3 2005-12-27 devnull [Tall] "all",
57 3e0d8fb3 2005-12-27 devnull /* names of response codes */
58 3e0d8fb3 2005-12-27 devnull char *rname[Rmask+1] =
60 3e0d8fb3 2005-12-27 devnull [Rok] "ok",
61 3e0d8fb3 2005-12-27 devnull [Rformat] "format error",
62 3e0d8fb3 2005-12-27 devnull [Rserver] "server failure",
63 3e0d8fb3 2005-12-27 devnull [Rname] "bad name",
64 3e0d8fb3 2005-12-27 devnull [Runimplimented] "unimplemented",
65 3e0d8fb3 2005-12-27 devnull [Rrefused] "we don't like you",
68 3e0d8fb3 2005-12-27 devnull /* names of op codes */
69 3e0d8fb3 2005-12-27 devnull char *opname[] =
71 3e0d8fb3 2005-12-27 devnull [Oquery] "query",
72 3e0d8fb3 2005-12-27 devnull [Oinverse] "inverse",
73 3e0d8fb3 2005-12-27 devnull [Ostatus] "status",
76 3e0d8fb3 2005-12-27 devnull Lock dnlock;
78 3e0d8fb3 2005-12-27 devnull static int sencodefmt(Fmt*);
81 3e0d8fb3 2005-12-27 devnull * set up a pipe to use as a lock
84 3e0d8fb3 2005-12-27 devnull dninit(void)
86 3e0d8fb3 2005-12-27 devnull fmtinstall('E', eipfmt);
87 3e0d8fb3 2005-12-27 devnull fmtinstall('I', eipfmt);
88 3e0d8fb3 2005-12-27 devnull fmtinstall('V', eipfmt);
89 3e0d8fb3 2005-12-27 devnull fmtinstall('R', rrfmt);
90 3e0d8fb3 2005-12-27 devnull fmtinstall('Q', rravfmt);
91 3e0d8fb3 2005-12-27 devnull fmtinstall('H', sencodefmt);
93 3e0d8fb3 2005-12-27 devnull dnvars.oldest = maxage;
94 3e0d8fb3 2005-12-27 devnull dnvars.names = 0;
98 3e0d8fb3 2005-12-27 devnull * hash for a domain name
100 3e0d8fb3 2005-12-27 devnull static ulong
101 3e0d8fb3 2005-12-27 devnull dnhash(char *name)
103 3e0d8fb3 2005-12-27 devnull ulong hash;
104 3e0d8fb3 2005-12-27 devnull uchar *val = (uchar*)name;
106 3e0d8fb3 2005-12-27 devnull for(hash = 0; *val; val++)
107 3e0d8fb3 2005-12-27 devnull hash = (hash*13) + tolower(*val)-'a';
108 3e0d8fb3 2005-12-27 devnull return hash % HTLEN;
112 3e0d8fb3 2005-12-27 devnull * lookup a symbol. if enter is not zero and the name is
113 3e0d8fb3 2005-12-27 devnull * not found, create it.
116 3e0d8fb3 2005-12-27 devnull dnlookup(char *name, int class, int enter)
121 3e0d8fb3 2005-12-27 devnull l = &ht[dnhash(name)];
122 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
123 3e0d8fb3 2005-12-27 devnull for(dp = *l; dp; dp = dp->next) {
124 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
125 3e0d8fb3 2005-12-27 devnull if(dp->class == class && cistrcmp(dp->name, name) == 0){
126 3e0d8fb3 2005-12-27 devnull dp->referenced = now;
127 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
128 3e0d8fb3 2005-12-27 devnull return dp;
130 3e0d8fb3 2005-12-27 devnull l = &dp->next;
132 3e0d8fb3 2005-12-27 devnull if(enter == 0){
133 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
134 3e0d8fb3 2005-12-27 devnull return 0;
136 3e0d8fb3 2005-12-27 devnull dnvars.names++;
137 3e0d8fb3 2005-12-27 devnull dp = emalloc(sizeof(*dp));
138 3e0d8fb3 2005-12-27 devnull dp->magic = DNmagic;
139 3e0d8fb3 2005-12-27 devnull dp->name = estrdup(name);
140 3e0d8fb3 2005-12-27 devnull assert(dp->name != 0);
141 3e0d8fb3 2005-12-27 devnull dp->class = class;
142 3e0d8fb3 2005-12-27 devnull dp->rr = 0;
143 3e0d8fb3 2005-12-27 devnull dp->next = 0;
144 3e0d8fb3 2005-12-27 devnull dp->referenced = now;
145 3e0d8fb3 2005-12-27 devnull *l = dp;
146 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
148 3e0d8fb3 2005-12-27 devnull return dp;
152 3e0d8fb3 2005-12-27 devnull * dump the cache
155 3e0d8fb3 2005-12-27 devnull dndump(char *file)
158 3e0d8fb3 2005-12-27 devnull int i, fd;
161 3e0d8fb3 2005-12-27 devnull fd = open(file, OWRITE|OTRUNC);
162 3e0d8fb3 2005-12-27 devnull if(fd < 0)
164 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
165 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
166 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
167 3e0d8fb3 2005-12-27 devnull fprint(fd, "%s\n", dp->name);
168 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
169 3e0d8fb3 2005-12-27 devnull fprint(fd, " %R %c%c %lud/%lud\n", rp, rp->auth?'A':'U',
170 3e0d8fb3 2005-12-27 devnull rp->db?'D':'N', rp->expire, rp->ttl);
173 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
174 3e0d8fb3 2005-12-27 devnull close(fd);
178 3e0d8fb3 2005-12-27 devnull * purge all records
181 3e0d8fb3 2005-12-27 devnull dnpurge(void)
184 3e0d8fb3 2005-12-27 devnull RR *rp, *srp;
187 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
189 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
190 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
191 3e0d8fb3 2005-12-27 devnull srp = rp = dp->rr;
192 3e0d8fb3 2005-12-27 devnull dp->rr = nil;
193 3e0d8fb3 2005-12-27 devnull for(; rp != nil; rp = rp->next)
194 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
195 3e0d8fb3 2005-12-27 devnull rrfreelist(srp);
198 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
202 3e0d8fb3 2005-12-27 devnull * check the age of resource records, free any that have timed out
205 3e0d8fb3 2005-12-27 devnull dnage(DN *dp)
208 3e0d8fb3 2005-12-27 devnull RR *rp, *next;
209 3e0d8fb3 2005-12-27 devnull ulong diff;
211 3e0d8fb3 2005-12-27 devnull diff = now - dp->referenced;
212 3e0d8fb3 2005-12-27 devnull if(diff < Reserved)
215 3e0d8fb3 2005-12-27 devnull l = &dp->rr;
216 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = next){
217 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
218 3e0d8fb3 2005-12-27 devnull next = rp->next;
219 3e0d8fb3 2005-12-27 devnull if(!rp->db)
220 3e0d8fb3 2005-12-27 devnull if(rp->expire < now || diff > dnvars.oldest){
221 3e0d8fb3 2005-12-27 devnull *l = next;
222 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
223 3e0d8fb3 2005-12-27 devnull rrfree(rp);
224 3e0d8fb3 2005-12-27 devnull continue;
226 3e0d8fb3 2005-12-27 devnull l = &rp->next;
230 3e0d8fb3 2005-12-27 devnull #define REF(x) if(x) x->refs++
233 3e0d8fb3 2005-12-27 devnull * our target is 4000 names cached, this should be larger on large servers
235 3e0d8fb3 2005-12-27 devnull #define TARGET 4000
238 3e0d8fb3 2005-12-27 devnull * periodicly sweep for old records and remove unreferenced domain names
240 3e0d8fb3 2005-12-27 devnull * only called when all other threads are locked out
243 3e0d8fb3 2005-12-27 devnull dnageall(int doit)
245 3e0d8fb3 2005-12-27 devnull DN *dp, **l;
248 3e0d8fb3 2005-12-27 devnull static ulong nextage;
250 3e0d8fb3 2005-12-27 devnull if(dnvars.names < TARGET && now < nextage && !doit){
251 3e0d8fb3 2005-12-27 devnull dnvars.oldest = maxage;
255 3e0d8fb3 2005-12-27 devnull if(dnvars.names > TARGET)
256 3e0d8fb3 2005-12-27 devnull dnvars.oldest /= 2;
257 3e0d8fb3 2005-12-27 devnull nextage = now + maxage;
259 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
261 3e0d8fb3 2005-12-27 devnull /* time out all old entries (and set refs to 0) */
262 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
263 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
264 3e0d8fb3 2005-12-27 devnull dp->refs = 0;
265 3e0d8fb3 2005-12-27 devnull dnage(dp);
268 3e0d8fb3 2005-12-27 devnull /* mark all referenced domain names */
269 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
270 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next)
271 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
272 3e0d8fb3 2005-12-27 devnull REF(rp->owner);
273 3e0d8fb3 2005-12-27 devnull if(rp->negative){
274 3e0d8fb3 2005-12-27 devnull REF(rp->negsoaowner);
275 3e0d8fb3 2005-12-27 devnull continue;
277 3e0d8fb3 2005-12-27 devnull switch(rp->type){
278 3e0d8fb3 2005-12-27 devnull case Thinfo:
279 3e0d8fb3 2005-12-27 devnull REF(rp->cpu);
280 3e0d8fb3 2005-12-27 devnull REF(rp->os);
282 3e0d8fb3 2005-12-27 devnull case Ttxt:
284 3e0d8fb3 2005-12-27 devnull case Tcname:
285 3e0d8fb3 2005-12-27 devnull case Tmb:
286 3e0d8fb3 2005-12-27 devnull case Tmd:
287 3e0d8fb3 2005-12-27 devnull case Tmf:
288 3e0d8fb3 2005-12-27 devnull case Tns:
289 3e0d8fb3 2005-12-27 devnull REF(rp->host);
291 3e0d8fb3 2005-12-27 devnull case Tmg:
292 3e0d8fb3 2005-12-27 devnull case Tmr:
293 3e0d8fb3 2005-12-27 devnull REF(rp->mb);
295 3e0d8fb3 2005-12-27 devnull case Tminfo:
296 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
297 3e0d8fb3 2005-12-27 devnull REF(rp->mb);
299 3e0d8fb3 2005-12-27 devnull case Trp:
300 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
301 3e0d8fb3 2005-12-27 devnull REF(rp->rp);
303 3e0d8fb3 2005-12-27 devnull case Tmx:
304 3e0d8fb3 2005-12-27 devnull REF(rp->host);
306 3e0d8fb3 2005-12-27 devnull case Ta:
307 3e0d8fb3 2005-12-27 devnull case Taaaa:
308 3e0d8fb3 2005-12-27 devnull REF(rp->ip);
310 3e0d8fb3 2005-12-27 devnull case Tptr:
311 3e0d8fb3 2005-12-27 devnull REF(rp->ptr);
313 3e0d8fb3 2005-12-27 devnull case Tsoa:
314 3e0d8fb3 2005-12-27 devnull REF(rp->host);
315 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
320 3e0d8fb3 2005-12-27 devnull /* sweep and remove unreferenced domain names */
321 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
322 3e0d8fb3 2005-12-27 devnull l = &ht[i];
323 3e0d8fb3 2005-12-27 devnull for(dp = *l; dp; dp = *l){
324 3e0d8fb3 2005-12-27 devnull if(dp->rr == 0 && dp->refs == 0){
325 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
326 3e0d8fb3 2005-12-27 devnull *l = dp->next;
327 3e0d8fb3 2005-12-27 devnull if(dp->name)
328 3e0d8fb3 2005-12-27 devnull free(dp->name);
329 3e0d8fb3 2005-12-27 devnull dp->magic = ~dp->magic;
330 3e0d8fb3 2005-12-27 devnull dnvars.names--;
331 3e0d8fb3 2005-12-27 devnull free(dp);
332 3e0d8fb3 2005-12-27 devnull continue;
334 3e0d8fb3 2005-12-27 devnull l = &dp->next;
338 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
342 3e0d8fb3 2005-12-27 devnull * timeout all database records (used when rereading db)
345 3e0d8fb3 2005-12-27 devnull dnagedb(void)
351 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
353 3e0d8fb3 2005-12-27 devnull /* time out all database entries */
354 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
355 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next)
356 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
357 3e0d8fb3 2005-12-27 devnull if(rp->db)
358 3e0d8fb3 2005-12-27 devnull rp->expire = 0;
360 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
364 3e0d8fb3 2005-12-27 devnull * mark all local db records about my area as authoritative, time out any others
367 3e0d8fb3 2005-12-27 devnull dnauthdb(void)
371 3e0d8fb3 2005-12-27 devnull Area *area;
374 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
376 3e0d8fb3 2005-12-27 devnull /* time out all database entries */
377 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
378 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
379 3e0d8fb3 2005-12-27 devnull area = inmyarea(dp->name);
380 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
381 3e0d8fb3 2005-12-27 devnull if(rp->db){
382 3e0d8fb3 2005-12-27 devnull if(area){
383 3e0d8fb3 2005-12-27 devnull if(rp->ttl < area->soarr->soa->minttl)
384 3e0d8fb3 2005-12-27 devnull rp->ttl = area->soarr->soa->minttl;
385 3e0d8fb3 2005-12-27 devnull rp->auth = 1;
387 3e0d8fb3 2005-12-27 devnull if(rp->expire == 0){
388 3e0d8fb3 2005-12-27 devnull rp->db = 0;
389 3e0d8fb3 2005-12-27 devnull dp->referenced = now - Reserved - 1;
394 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
398 3e0d8fb3 2005-12-27 devnull * keep track of other processes to know if we can
399 3e0d8fb3 2005-12-27 devnull * garbage collect. block while garbage collecting.
402 3e0d8fb3 2005-12-27 devnull getactivity(Request *req)
406 5c9f76b5 2006-02-14 devnull if(traceactivity) syslog(0, "dns", "get %d by %d.%d", dnvars.active, getpid(), threadid());
407 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
408 3e0d8fb3 2005-12-27 devnull while(dnvars.mutex){
409 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
410 3e0d8fb3 2005-12-27 devnull sleep(200);
411 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
413 3e0d8fb3 2005-12-27 devnull rv = ++dnvars.active;
414 3e0d8fb3 2005-12-27 devnull now = time(0);
415 3e0d8fb3 2005-12-27 devnull req->id = ++dnvars.id;
416 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
418 3e0d8fb3 2005-12-27 devnull return rv;
421 3e0d8fb3 2005-12-27 devnull putactivity(void)
423 3e0d8fb3 2005-12-27 devnull static ulong lastclean;
425 5c9f76b5 2006-02-14 devnull if(traceactivity) syslog(0, "dns", "put %d by %d.%d", dnvars.active, getpid(), threadid());
426 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
427 3e0d8fb3 2005-12-27 devnull dnvars.active--;
428 3e0d8fb3 2005-12-27 devnull assert(dnvars.active >= 0); /* "dnvars.active %d", dnvars.active */;
431 3e0d8fb3 2005-12-27 devnull * clean out old entries and check for new db periodicly
433 3e0d8fb3 2005-12-27 devnull if(dnvars.mutex || (needrefresh == 0 && dnvars.active > 0)){
434 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
438 3e0d8fb3 2005-12-27 devnull /* wait till we're alone */
439 3e0d8fb3 2005-12-27 devnull dnvars.mutex = 1;
440 3e0d8fb3 2005-12-27 devnull while(dnvars.active > 0){
441 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
442 3e0d8fb3 2005-12-27 devnull sleep(100);
443 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
445 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
447 3e0d8fb3 2005-12-27 devnull db2cache(needrefresh);
448 3e0d8fb3 2005-12-27 devnull dnageall(0);
450 3e0d8fb3 2005-12-27 devnull /* let others back in */
451 3e0d8fb3 2005-12-27 devnull lastclean = now;
452 3e0d8fb3 2005-12-27 devnull needrefresh = 0;
453 3e0d8fb3 2005-12-27 devnull dnvars.mutex = 0;
457 3e0d8fb3 2005-12-27 devnull * Attach a single resource record to a domain name.
458 3e0d8fb3 2005-12-27 devnull * - Avoid duplicates with already present RR's
459 3e0d8fb3 2005-12-27 devnull * - Chain all RR's of the same type adjacent to one another
460 3e0d8fb3 2005-12-27 devnull * - chain authoritative RR's ahead of non-authoritative ones
462 3e0d8fb3 2005-12-27 devnull static void
463 3e0d8fb3 2005-12-27 devnull rrattach1(RR *new, int auth)
469 3e0d8fb3 2005-12-27 devnull assert(new->magic == RRmagic && !new->cached);
471 3e0d8fb3 2005-12-27 devnull if(!new->db)
472 3e0d8fb3 2005-12-27 devnull new->expire = new->ttl;
474 3e0d8fb3 2005-12-27 devnull new->expire = now + Year;
475 3e0d8fb3 2005-12-27 devnull dp = new->owner;
476 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
477 3e0d8fb3 2005-12-27 devnull new->auth |= auth;
478 3e0d8fb3 2005-12-27 devnull new->next = 0;
481 3e0d8fb3 2005-12-27 devnull * find first rr of the right type
483 3e0d8fb3 2005-12-27 devnull l = &dp->rr;
484 3e0d8fb3 2005-12-27 devnull for(rp = *l; rp; rp = *l){
485 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
486 3e0d8fb3 2005-12-27 devnull if(rp->type == new->type)
488 3e0d8fb3 2005-12-27 devnull l = &rp->next;
492 3e0d8fb3 2005-12-27 devnull * negative entries replace positive entries
493 3e0d8fb3 2005-12-27 devnull * positive entries replace negative entries
494 3e0d8fb3 2005-12-27 devnull * newer entries replace older entries with the same fields
496 3e0d8fb3 2005-12-27 devnull for(rp = *l; rp; rp = *l){
497 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
498 3e0d8fb3 2005-12-27 devnull if(rp->type != new->type)
501 3e0d8fb3 2005-12-27 devnull if(rp->db == new->db && rp->auth == new->auth){
502 3e0d8fb3 2005-12-27 devnull /* negative drives out positive and vice versa */
503 3e0d8fb3 2005-12-27 devnull if(rp->negative != new->negative){
504 3e0d8fb3 2005-12-27 devnull *l = rp->next;
505 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
506 3e0d8fb3 2005-12-27 devnull rrfree(rp);
507 3e0d8fb3 2005-12-27 devnull continue;
510 3e0d8fb3 2005-12-27 devnull /* all things equal, pick the newer one */
511 3e0d8fb3 2005-12-27 devnull if(rp->arg0 == new->arg0 && rp->arg1 == new->arg1){
512 3e0d8fb3 2005-12-27 devnull /* new drives out old */
513 3e0d8fb3 2005-12-27 devnull if(new->ttl > rp->ttl || new->expire > rp->expire){
514 3e0d8fb3 2005-12-27 devnull *l = rp->next;
515 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
516 3e0d8fb3 2005-12-27 devnull rrfree(rp);
517 3e0d8fb3 2005-12-27 devnull continue;
518 3e0d8fb3 2005-12-27 devnull } else {
519 3e0d8fb3 2005-12-27 devnull rrfree(new);
524 3e0d8fb3 2005-12-27 devnull /* Hack for pointer records. This makes sure
525 3e0d8fb3 2005-12-27 devnull * the ordering in the list reflects the ordering
526 3e0d8fb3 2005-12-27 devnull * received or read from the database
528 3e0d8fb3 2005-12-27 devnull if(rp->type == Tptr){
529 3e0d8fb3 2005-12-27 devnull if(!rp->negative && !new->negative
530 3e0d8fb3 2005-12-27 devnull && rp->ptr->ordinal > new->ptr->ordinal)
534 3e0d8fb3 2005-12-27 devnull l = &rp->next;
538 3e0d8fb3 2005-12-27 devnull * add to chain
540 3e0d8fb3 2005-12-27 devnull new->cached = 1;
541 3e0d8fb3 2005-12-27 devnull new->next = *l;
542 3e0d8fb3 2005-12-27 devnull *l = new;
546 3e0d8fb3 2005-12-27 devnull * Attach a list of resource records to a domain name.
547 3e0d8fb3 2005-12-27 devnull * - Avoid duplicates with already present RR's
548 3e0d8fb3 2005-12-27 devnull * - Chain all RR's of the same type adjacent to one another
549 3e0d8fb3 2005-12-27 devnull * - chain authoritative RR's ahead of non-authoritative ones
550 3e0d8fb3 2005-12-27 devnull * - remove any expired RR's
553 3e0d8fb3 2005-12-27 devnull rrattach(RR *rp, int auth)
555 3e0d8fb3 2005-12-27 devnull RR *next;
557 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
558 3e0d8fb3 2005-12-27 devnull for(; rp; rp = next){
559 3e0d8fb3 2005-12-27 devnull next = rp->next;
560 3e0d8fb3 2005-12-27 devnull rp->next = 0;
562 3e0d8fb3 2005-12-27 devnull /* avoid any outside spoofing */
563 3e0d8fb3 2005-12-27 devnull if(cachedb && !rp->db && inmyarea(rp->owner->name))
564 3e0d8fb3 2005-12-27 devnull rrfree(rp);
566 3e0d8fb3 2005-12-27 devnull rrattach1(rp, auth);
568 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
572 3e0d8fb3 2005-12-27 devnull * allocate a resource record of a given type
575 3e0d8fb3 2005-12-27 devnull rralloc(int type)
579 3e0d8fb3 2005-12-27 devnull rp = emalloc(sizeof(*rp));
580 3e0d8fb3 2005-12-27 devnull rp->magic = RRmagic;
581 3e0d8fb3 2005-12-27 devnull rp->pc = getcallerpc(&type);
582 3e0d8fb3 2005-12-27 devnull rp->type = type;
583 3e0d8fb3 2005-12-27 devnull switch(type){
584 3e0d8fb3 2005-12-27 devnull case Tsoa:
585 3e0d8fb3 2005-12-27 devnull rp->soa = emalloc(sizeof(*rp->soa));
586 3e0d8fb3 2005-12-27 devnull rp->soa->slaves = nil;
588 3e0d8fb3 2005-12-27 devnull case Tkey:
589 3e0d8fb3 2005-12-27 devnull rp->key = emalloc(sizeof(*rp->key));
591 3e0d8fb3 2005-12-27 devnull case Tcert:
592 3e0d8fb3 2005-12-27 devnull rp->cert = emalloc(sizeof(*rp->cert));
594 3e0d8fb3 2005-12-27 devnull case Tsig:
595 3e0d8fb3 2005-12-27 devnull rp->sig = emalloc(sizeof(*rp->sig));
597 3e0d8fb3 2005-12-27 devnull case Tnull:
598 3e0d8fb3 2005-12-27 devnull rp->null = emalloc(sizeof(*rp->null));
601 3e0d8fb3 2005-12-27 devnull rp->ttl = 0;
602 3e0d8fb3 2005-12-27 devnull rp->expire = 0;
603 3e0d8fb3 2005-12-27 devnull rp->next = 0;
604 3e0d8fb3 2005-12-27 devnull return rp;
608 3e0d8fb3 2005-12-27 devnull * free a resource record and any related structs
611 3e0d8fb3 2005-12-27 devnull rrfree(RR *rp)
614 3e0d8fb3 2005-12-27 devnull RR *nrp;
617 3e0d8fb3 2005-12-27 devnull assert(rp->magic = RRmagic);
618 3e0d8fb3 2005-12-27 devnull assert(!rp->cached);
620 3e0d8fb3 2005-12-27 devnull dp = rp->owner;
622 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
623 3e0d8fb3 2005-12-27 devnull for(nrp = dp->rr; nrp; nrp = nrp->next)
624 3e0d8fb3 2005-12-27 devnull assert(nrp != rp); /* "rrfree of live rr" */;
627 3e0d8fb3 2005-12-27 devnull switch(rp->type){
628 3e0d8fb3 2005-12-27 devnull case Tsoa:
629 3e0d8fb3 2005-12-27 devnull freeserverlist(rp->soa->slaves);
630 3e0d8fb3 2005-12-27 devnull free(rp->soa);
632 3e0d8fb3 2005-12-27 devnull case Tkey:
633 3e0d8fb3 2005-12-27 devnull free(rp->key->data);
634 3e0d8fb3 2005-12-27 devnull free(rp->key);
636 3e0d8fb3 2005-12-27 devnull case Tcert:
637 3e0d8fb3 2005-12-27 devnull free(rp->cert->data);
638 3e0d8fb3 2005-12-27 devnull free(rp->cert);
640 3e0d8fb3 2005-12-27 devnull case Tsig:
641 3e0d8fb3 2005-12-27 devnull free(rp->sig->data);
642 3e0d8fb3 2005-12-27 devnull free(rp->sig);
644 3e0d8fb3 2005-12-27 devnull case Tnull:
645 3e0d8fb3 2005-12-27 devnull free(rp->null->data);
646 3e0d8fb3 2005-12-27 devnull free(rp->null);
648 3e0d8fb3 2005-12-27 devnull case Ttxt:
649 3e0d8fb3 2005-12-27 devnull while(rp->txt != nil){
650 3e0d8fb3 2005-12-27 devnull t = rp->txt;
651 3e0d8fb3 2005-12-27 devnull rp->txt = t->next;
652 3e0d8fb3 2005-12-27 devnull free(t->p);
653 3e0d8fb3 2005-12-27 devnull free(t);
658 3e0d8fb3 2005-12-27 devnull rp->magic = ~rp->magic;
659 3e0d8fb3 2005-12-27 devnull free(rp);
663 3e0d8fb3 2005-12-27 devnull * free a list of resource records and any related structs
666 3e0d8fb3 2005-12-27 devnull rrfreelist(RR *rp)
668 3e0d8fb3 2005-12-27 devnull RR *next;
670 3e0d8fb3 2005-12-27 devnull for(; rp; rp = next){
671 3e0d8fb3 2005-12-27 devnull next = rp->next;
672 3e0d8fb3 2005-12-27 devnull rrfree(rp);
676 3e0d8fb3 2005-12-27 devnull extern RR**
677 3e0d8fb3 2005-12-27 devnull rrcopy(RR *rp, RR **last)
679 3e0d8fb3 2005-12-27 devnull RR *nrp;
680 3e0d8fb3 2005-12-27 devnull SOA *soa;
681 3e0d8fb3 2005-12-27 devnull Key *key;
682 3e0d8fb3 2005-12-27 devnull Cert *cert;
683 3e0d8fb3 2005-12-27 devnull Sig *sig;
684 3e0d8fb3 2005-12-27 devnull Null *null;
685 3e0d8fb3 2005-12-27 devnull Txt *t, *nt, **l;
687 3e0d8fb3 2005-12-27 devnull nrp = rralloc(rp->type);
688 3e0d8fb3 2005-12-27 devnull switch(rp->type){
689 3e0d8fb3 2005-12-27 devnull case Ttxt:
690 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
691 3e0d8fb3 2005-12-27 devnull l = &nrp->txt;
692 3e0d8fb3 2005-12-27 devnull *l = nil;
693 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next){
694 3e0d8fb3 2005-12-27 devnull nt = emalloc(sizeof(*nt));
695 3e0d8fb3 2005-12-27 devnull nt->p = estrdup(t->p);
696 3e0d8fb3 2005-12-27 devnull nt->next = nil;
697 3e0d8fb3 2005-12-27 devnull *l = nt;
698 3e0d8fb3 2005-12-27 devnull l = &nt->next;
701 3e0d8fb3 2005-12-27 devnull case Tsoa:
702 3e0d8fb3 2005-12-27 devnull soa = nrp->soa;
703 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
704 3e0d8fb3 2005-12-27 devnull nrp->soa = soa;
705 3e0d8fb3 2005-12-27 devnull *nrp->soa = *rp->soa;
706 3e0d8fb3 2005-12-27 devnull nrp->soa->slaves = copyserverlist(rp->soa->slaves);
708 3e0d8fb3 2005-12-27 devnull case Tkey:
709 3e0d8fb3 2005-12-27 devnull key = nrp->key;
710 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
711 3e0d8fb3 2005-12-27 devnull nrp->key = key;
712 3e0d8fb3 2005-12-27 devnull *key = *rp->key;
713 3e0d8fb3 2005-12-27 devnull key->data = emalloc(key->dlen);
714 3e0d8fb3 2005-12-27 devnull memmove(key->data, rp->key->data, rp->key->dlen);
716 3e0d8fb3 2005-12-27 devnull case Tsig:
717 3e0d8fb3 2005-12-27 devnull sig = nrp->sig;
718 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
719 3e0d8fb3 2005-12-27 devnull nrp->sig = sig;
720 3e0d8fb3 2005-12-27 devnull *sig = *rp->sig;
721 3e0d8fb3 2005-12-27 devnull sig->data = emalloc(sig->dlen);
722 3e0d8fb3 2005-12-27 devnull memmove(sig->data, rp->sig->data, rp->sig->dlen);
724 3e0d8fb3 2005-12-27 devnull case Tcert:
725 3e0d8fb3 2005-12-27 devnull cert = nrp->cert;
726 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
727 3e0d8fb3 2005-12-27 devnull nrp->cert = cert;
728 3e0d8fb3 2005-12-27 devnull *cert = *rp->cert;
729 3e0d8fb3 2005-12-27 devnull cert->data = emalloc(cert->dlen);
730 3e0d8fb3 2005-12-27 devnull memmove(cert->data, rp->cert->data, rp->cert->dlen);
732 3e0d8fb3 2005-12-27 devnull case Tnull:
733 3e0d8fb3 2005-12-27 devnull null = nrp->null;
734 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
735 3e0d8fb3 2005-12-27 devnull nrp->null = null;
736 3e0d8fb3 2005-12-27 devnull *null = *rp->null;
737 3e0d8fb3 2005-12-27 devnull null->data = emalloc(null->dlen);
738 3e0d8fb3 2005-12-27 devnull memmove(null->data, rp->null->data, rp->null->dlen);
740 3e0d8fb3 2005-12-27 devnull default:
741 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
744 3e0d8fb3 2005-12-27 devnull nrp->cached = 0;
745 3e0d8fb3 2005-12-27 devnull nrp->next = 0;
746 3e0d8fb3 2005-12-27 devnull *last = nrp;
747 3e0d8fb3 2005-12-27 devnull return &nrp->next;
751 3e0d8fb3 2005-12-27 devnull * lookup a resource record of a particular type and
752 3e0d8fb3 2005-12-27 devnull * class attached to a domain name. Return copies.
754 3e0d8fb3 2005-12-27 devnull * Priority ordering is:
755 3e0d8fb3 2005-12-27 devnull * db authoritative
756 3e0d8fb3 2005-12-27 devnull * not timed out network authoritative
757 3e0d8fb3 2005-12-27 devnull * not timed out network unauthoritative
758 3e0d8fb3 2005-12-27 devnull * unauthoritative db
760 3e0d8fb3 2005-12-27 devnull * if flag NOneg is set, don't return negative cached entries.
761 3e0d8fb3 2005-12-27 devnull * return nothing instead.
764 3e0d8fb3 2005-12-27 devnull rrlookup(DN *dp, int type, int flag)
766 3e0d8fb3 2005-12-27 devnull RR *rp, *first, **last;
768 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
770 3e0d8fb3 2005-12-27 devnull first = 0;
771 3e0d8fb3 2005-12-27 devnull last = &first;
772 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
774 3e0d8fb3 2005-12-27 devnull /* try for an authoritative db entry */
775 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
776 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
777 3e0d8fb3 2005-12-27 devnull if(rp->db)
778 3e0d8fb3 2005-12-27 devnull if(rp->auth)
779 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type))
780 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
782 3e0d8fb3 2005-12-27 devnull if(first)
783 3e0d8fb3 2005-12-27 devnull goto out;
785 3e0d8fb3 2005-12-27 devnull /* try for an living authoritative network entry */
786 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
787 3e0d8fb3 2005-12-27 devnull if(!rp->db)
788 3e0d8fb3 2005-12-27 devnull if(rp->auth)
789 3e0d8fb3 2005-12-27 devnull if(rp->ttl + 60 > now)
790 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
791 3e0d8fb3 2005-12-27 devnull if(flag == NOneg && rp->negative)
792 3e0d8fb3 2005-12-27 devnull goto out;
793 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
796 3e0d8fb3 2005-12-27 devnull if(first)
797 3e0d8fb3 2005-12-27 devnull goto out;
799 3e0d8fb3 2005-12-27 devnull /* try for an living unauthoritative network entry */
800 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
801 3e0d8fb3 2005-12-27 devnull if(!rp->db)
802 3e0d8fb3 2005-12-27 devnull if(rp->ttl + 60 > now)
803 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
804 3e0d8fb3 2005-12-27 devnull if(flag == NOneg && rp->negative)
805 3e0d8fb3 2005-12-27 devnull goto out;
806 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
809 3e0d8fb3 2005-12-27 devnull if(first)
810 3e0d8fb3 2005-12-27 devnull goto out;
812 3e0d8fb3 2005-12-27 devnull /* try for an unauthoritative db entry */
813 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
814 3e0d8fb3 2005-12-27 devnull if(rp->db)
815 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type))
816 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
818 3e0d8fb3 2005-12-27 devnull if(first)
819 3e0d8fb3 2005-12-27 devnull goto out;
821 3e0d8fb3 2005-12-27 devnull /* otherwise, settle for anything we got (except for negative caches) */
822 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
823 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
824 3e0d8fb3 2005-12-27 devnull if(rp->negative)
825 3e0d8fb3 2005-12-27 devnull goto out;
826 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
831 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
832 3e0d8fb3 2005-12-27 devnull unique(first);
833 3e0d8fb3 2005-12-27 devnull return first;
837 3e0d8fb3 2005-12-27 devnull * convert an ascii RR type name to its integer representation
840 3e0d8fb3 2005-12-27 devnull rrtype(char *atype)
844 3e0d8fb3 2005-12-27 devnull for(i = 0; i <= Tall; i++)
845 3e0d8fb3 2005-12-27 devnull if(rrtname[i] && strcmp(rrtname[i], atype) == 0)
846 3e0d8fb3 2005-12-27 devnull return i;
848 3e0d8fb3 2005-12-27 devnull // make any a synonym for all
849 3e0d8fb3 2005-12-27 devnull if(strcmp(atype, "any") == 0)
850 3e0d8fb3 2005-12-27 devnull return Tall;
851 3e0d8fb3 2005-12-27 devnull return atoi(atype);
855 3e0d8fb3 2005-12-27 devnull * convert an integer RR type to it's ascii name
858 3e0d8fb3 2005-12-27 devnull rrname(int type, char *buf, int len)
860 3e0d8fb3 2005-12-27 devnull char *t;
863 3e0d8fb3 2005-12-27 devnull if(type <= Tall)
864 3e0d8fb3 2005-12-27 devnull t = rrtname[type];
865 3e0d8fb3 2005-12-27 devnull if(t==0){
866 3e0d8fb3 2005-12-27 devnull snprint(buf, len, "%d", type);
867 3e0d8fb3 2005-12-27 devnull t = buf;
869 3e0d8fb3 2005-12-27 devnull return t;
873 3e0d8fb3 2005-12-27 devnull * return 0 if not a supported rr type
876 3e0d8fb3 2005-12-27 devnull rrsupported(int type)
878 3e0d8fb3 2005-12-27 devnull if(type < 0 || type >Tall)
879 3e0d8fb3 2005-12-27 devnull return 0;
880 3e0d8fb3 2005-12-27 devnull return rrtname[type] != 0;
884 3e0d8fb3 2005-12-27 devnull * compare 2 types
887 3e0d8fb3 2005-12-27 devnull tsame(int t1, int t2)
889 3e0d8fb3 2005-12-27 devnull return t1 == t2 || t1 == Tall;
893 3e0d8fb3 2005-12-27 devnull * Add resource records to a list, duplicate them if they are cached
894 3e0d8fb3 2005-12-27 devnull * RR's since these are shared.
897 3e0d8fb3 2005-12-27 devnull rrcat(RR **start, RR *rp)
899 3e0d8fb3 2005-12-27 devnull RR **last;
901 3e0d8fb3 2005-12-27 devnull last = start;
902 3e0d8fb3 2005-12-27 devnull while(*last != 0)
903 3e0d8fb3 2005-12-27 devnull last = &(*last)->next;
905 3e0d8fb3 2005-12-27 devnull *last = rp;
906 3e0d8fb3 2005-12-27 devnull return *start;
910 3e0d8fb3 2005-12-27 devnull * remove negative cache rr's from an rr list
913 3e0d8fb3 2005-12-27 devnull rrremneg(RR **l)
915 3e0d8fb3 2005-12-27 devnull RR **nl, *rp;
916 3e0d8fb3 2005-12-27 devnull RR *first;
918 3e0d8fb3 2005-12-27 devnull first = nil;
919 3e0d8fb3 2005-12-27 devnull nl = &first;
920 3e0d8fb3 2005-12-27 devnull while(*l != nil){
921 3e0d8fb3 2005-12-27 devnull rp = *l;
922 3e0d8fb3 2005-12-27 devnull if(rp->negative){
923 3e0d8fb3 2005-12-27 devnull *l = rp->next;
924 3e0d8fb3 2005-12-27 devnull *nl = rp;
925 3e0d8fb3 2005-12-27 devnull nl = &rp->next;
926 3e0d8fb3 2005-12-27 devnull *nl = nil;
928 3e0d8fb3 2005-12-27 devnull l = &rp->next;
931 3e0d8fb3 2005-12-27 devnull return first;
935 3e0d8fb3 2005-12-27 devnull * remove rr's of a particular type from an rr list
938 3e0d8fb3 2005-12-27 devnull rrremtype(RR **l, int type)
940 3e0d8fb3 2005-12-27 devnull RR **nl, *rp;
941 3e0d8fb3 2005-12-27 devnull RR *first;
943 3e0d8fb3 2005-12-27 devnull first = nil;
944 3e0d8fb3 2005-12-27 devnull nl = &first;
945 3e0d8fb3 2005-12-27 devnull while(*l != nil){
946 3e0d8fb3 2005-12-27 devnull rp = *l;
947 3e0d8fb3 2005-12-27 devnull if(rp->type == type){
948 3e0d8fb3 2005-12-27 devnull *l = rp->next;
949 3e0d8fb3 2005-12-27 devnull *nl = rp;
950 3e0d8fb3 2005-12-27 devnull nl = &rp->next;
951 3e0d8fb3 2005-12-27 devnull *nl = nil;
953 3e0d8fb3 2005-12-27 devnull l = &(*l)->next;
956 3e0d8fb3 2005-12-27 devnull return first;
960 3e0d8fb3 2005-12-27 devnull * print conversion for rr records
963 3e0d8fb3 2005-12-27 devnull rrfmt(Fmt *f)
966 3e0d8fb3 2005-12-27 devnull char *strp;
967 3e0d8fb3 2005-12-27 devnull Fmt fstr;
969 3e0d8fb3 2005-12-27 devnull char buf[Domlen];
970 3e0d8fb3 2005-12-27 devnull Server *s;
973 3e0d8fb3 2005-12-27 devnull fmtstrinit(&fstr);
975 3e0d8fb3 2005-12-27 devnull rp = va_arg(f->args, RR*);
976 3e0d8fb3 2005-12-27 devnull if(rp == 0){
977 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "<null>");
978 3e0d8fb3 2005-12-27 devnull goto out;
981 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s %s", rp->owner->name,
982 3e0d8fb3 2005-12-27 devnull rrname(rp->type, buf, sizeof buf));
984 3e0d8fb3 2005-12-27 devnull if(rp->negative){
985 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\tnegative - rcode %d", rp->negrcode);
986 3e0d8fb3 2005-12-27 devnull goto out;
989 3e0d8fb3 2005-12-27 devnull switch(rp->type){
990 3e0d8fb3 2005-12-27 devnull case Thinfo:
991 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->cpu->name, rp->os->name);
993 3e0d8fb3 2005-12-27 devnull case Tcname:
994 3e0d8fb3 2005-12-27 devnull case Tmb:
995 3e0d8fb3 2005-12-27 devnull case Tmd:
996 3e0d8fb3 2005-12-27 devnull case Tmf:
997 3e0d8fb3 2005-12-27 devnull case Tns:
998 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->host->name);
1000 3e0d8fb3 2005-12-27 devnull case Tmg:
1001 3e0d8fb3 2005-12-27 devnull case Tmr:
1002 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->mb->name);
1004 3e0d8fb3 2005-12-27 devnull case Tminfo:
1005 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->mb->name, rp->rmb->name);
1007 3e0d8fb3 2005-12-27 devnull case Tmx:
1008 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%lud %s", rp->pref, rp->host->name);
1010 3e0d8fb3 2005-12-27 devnull case Ta:
1011 3e0d8fb3 2005-12-27 devnull case Taaaa:
1012 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->ip->name);
1014 3e0d8fb3 2005-12-27 devnull case Tptr:
1015 3e0d8fb3 2005-12-27 devnull // fmtprint(&fstr, "\t%s(%lud)", rp->ptr->name, rp->ptr->ordinal);
1016 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->ptr->name);
1018 3e0d8fb3 2005-12-27 devnull case Tsoa:
1019 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s %lud %lud %lud %lud %lud", rp->host->name,
1020 3e0d8fb3 2005-12-27 devnull rp->rmb->name, rp->soa->serial, rp->soa->refresh, rp->soa->retry,
1021 3e0d8fb3 2005-12-27 devnull rp->soa->expire, rp->soa->minttl);
1022 3e0d8fb3 2005-12-27 devnull for(s = rp->soa->slaves; s != nil; s = s->next)
1023 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " %s", s->name);
1025 3e0d8fb3 2005-12-27 devnull case Tnull:
1026 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%.*H", rp->null->dlen, rp->null->data);
1028 3e0d8fb3 2005-12-27 devnull case Ttxt:
1029 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t");
1030 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1031 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s", t->p);
1033 3e0d8fb3 2005-12-27 devnull case Trp:
1034 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->rmb->name, rp->rp->name);
1036 3e0d8fb3 2005-12-27 devnull case Tkey:
1037 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d", rp->key->flags, rp->key->proto,
1038 3e0d8fb3 2005-12-27 devnull rp->key->alg);
1040 3e0d8fb3 2005-12-27 devnull case Tsig:
1041 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d %lud %lud %lud %d %s",
1042 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->alg, rp->sig->labels, rp->sig->ttl,
1043 3e0d8fb3 2005-12-27 devnull rp->sig->exp, rp->sig->incep, rp->sig->tag, rp->sig->signer->name);
1045 3e0d8fb3 2005-12-27 devnull case Tcert:
1046 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d",
1047 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->tag, rp->sig->alg);
1049 3e0d8fb3 2005-12-27 devnull default:
1053 3e0d8fb3 2005-12-27 devnull strp = fmtstrflush(&fstr);
1054 3e0d8fb3 2005-12-27 devnull rv = fmtstrcpy(f, strp);
1055 3e0d8fb3 2005-12-27 devnull free(strp);
1056 3e0d8fb3 2005-12-27 devnull return rv;
1060 3e0d8fb3 2005-12-27 devnull * print conversion for rr records in attribute value form
1063 3e0d8fb3 2005-12-27 devnull rravfmt(Fmt *f)
1065 3e0d8fb3 2005-12-27 devnull RR *rp;
1066 3e0d8fb3 2005-12-27 devnull char *strp;
1067 3e0d8fb3 2005-12-27 devnull Fmt fstr;
1068 3e0d8fb3 2005-12-27 devnull int rv;
1069 3e0d8fb3 2005-12-27 devnull Server *s;
1070 3e0d8fb3 2005-12-27 devnull Txt *t;
1071 3e0d8fb3 2005-12-27 devnull int quote;
1073 3e0d8fb3 2005-12-27 devnull fmtstrinit(&fstr);
1075 3e0d8fb3 2005-12-27 devnull rp = va_arg(f->args, RR*);
1076 3e0d8fb3 2005-12-27 devnull if(rp == 0){
1077 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "<null>");
1078 3e0d8fb3 2005-12-27 devnull goto out;
1081 3e0d8fb3 2005-12-27 devnull if(rp->type == Tptr)
1082 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "ptr=%s", rp->owner->name);
1084 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "dom=%s", rp->owner->name);
1086 3e0d8fb3 2005-12-27 devnull switch(rp->type){
1087 3e0d8fb3 2005-12-27 devnull case Thinfo:
1088 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " cpu=%s os=%s", rp->cpu->name, rp->os->name);
1090 3e0d8fb3 2005-12-27 devnull case Tcname:
1091 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " cname=%s", rp->host->name);
1093 3e0d8fb3 2005-12-27 devnull case Tmb:
1094 3e0d8fb3 2005-12-27 devnull case Tmd:
1095 3e0d8fb3 2005-12-27 devnull case Tmf:
1096 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s", rp->host->name);
1098 3e0d8fb3 2005-12-27 devnull case Tns:
1099 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ns=%s", rp->host->name);
1101 3e0d8fb3 2005-12-27 devnull case Tmg:
1102 3e0d8fb3 2005-12-27 devnull case Tmr:
1103 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s", rp->mb->name);
1105 3e0d8fb3 2005-12-27 devnull case Tminfo:
1106 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s mbox=%s", rp->mb->name, rp->rmb->name);
1108 3e0d8fb3 2005-12-27 devnull case Tmx:
1109 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " pref=%lud mx=%s", rp->pref, rp->host->name);
1111 3e0d8fb3 2005-12-27 devnull case Ta:
1112 3e0d8fb3 2005-12-27 devnull case Taaaa:
1113 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ip=%s", rp->ip->name);
1115 3e0d8fb3 2005-12-27 devnull case Tptr:
1116 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " dom=%s", rp->ptr->name);
1118 3e0d8fb3 2005-12-27 devnull case Tsoa:
1119 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ns=%s mbox=%s serial=%lud refresh=%lud retry=%lud expire=%lud ttl=%lud",
1120 3e0d8fb3 2005-12-27 devnull rp->host->name, rp->rmb->name, rp->soa->serial,
1121 3e0d8fb3 2005-12-27 devnull rp->soa->refresh, rp->soa->retry,
1122 3e0d8fb3 2005-12-27 devnull rp->soa->expire, rp->soa->minttl);
1123 3e0d8fb3 2005-12-27 devnull for(s = rp->soa->slaves; s != nil; s = s->next)
1124 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " dnsslave=%s", s->name);
1126 3e0d8fb3 2005-12-27 devnull case Tnull:
1127 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " null=%.*H", rp->null->dlen, rp->null->data);
1129 3e0d8fb3 2005-12-27 devnull case Ttxt:
1130 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " txt=");
1131 3e0d8fb3 2005-12-27 devnull quote = 0;
1132 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1133 3e0d8fb3 2005-12-27 devnull if(strchr(t->p, ' '))
1134 3e0d8fb3 2005-12-27 devnull quote = 1;
1135 3e0d8fb3 2005-12-27 devnull if(quote)
1136 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\"");
1137 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1138 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s", t->p);
1139 3e0d8fb3 2005-12-27 devnull if(quote)
1140 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\"");
1142 3e0d8fb3 2005-12-27 devnull case Trp:
1143 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " rp=%s txt=%s", rp->rmb->name, rp->rp->name);
1145 3e0d8fb3 2005-12-27 devnull case Tkey:
1146 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " flags=%d proto=%d alg=%d",
1147 3e0d8fb3 2005-12-27 devnull rp->key->flags, rp->key->proto, rp->key->alg);
1149 3e0d8fb3 2005-12-27 devnull case Tsig:
1150 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " type=%d alg=%d labels=%d ttl=%lud exp=%lud incep=%lud tag=%d signer=%s",
1151 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->alg, rp->sig->labels, rp->sig->ttl,
1152 3e0d8fb3 2005-12-27 devnull rp->sig->exp, rp->sig->incep, rp->sig->tag, rp->sig->signer->name);
1154 3e0d8fb3 2005-12-27 devnull case Tcert:
1155 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " type=%d tag=%d alg=%d",
1156 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->tag, rp->sig->alg);
1158 3e0d8fb3 2005-12-27 devnull default:
1162 3e0d8fb3 2005-12-27 devnull strp = fmtstrflush(&fstr);
1163 3e0d8fb3 2005-12-27 devnull rv = fmtstrcpy(f, strp);
1164 3e0d8fb3 2005-12-27 devnull free(strp);
1165 3e0d8fb3 2005-12-27 devnull return rv;
1169 3e0d8fb3 2005-12-27 devnull warning(char *fmt, ...)
1171 3e0d8fb3 2005-12-27 devnull char dnserr[128];
1172 3e0d8fb3 2005-12-27 devnull va_list arg;
1174 3e0d8fb3 2005-12-27 devnull va_start(arg, fmt);
1175 3e0d8fb3 2005-12-27 devnull vseprint(dnserr, dnserr+sizeof(dnserr), fmt, arg);
1176 3e0d8fb3 2005-12-27 devnull va_end(arg);
1177 3e0d8fb3 2005-12-27 devnull syslog(1, "dns", dnserr);
1181 3e0d8fb3 2005-12-27 devnull * chasing down double free's
1184 3e0d8fb3 2005-12-27 devnull dncheck(void *p, int dolock)
1186 3e0d8fb3 2005-12-27 devnull DN *dp;
1188 3e0d8fb3 2005-12-27 devnull RR *rp;
1190 3e0d8fb3 2005-12-27 devnull if(p != nil){
1191 3e0d8fb3 2005-12-27 devnull dp = p;
1192 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
1195 3e0d8fb3 2005-12-27 devnull if(!testing)
1196 3e0d8fb3 2005-12-27 devnull return;
1198 3e0d8fb3 2005-12-27 devnull if(dolock)
1199 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
1200 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
1201 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
1202 3e0d8fb3 2005-12-27 devnull assert(dp != p);
1203 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
1204 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
1205 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic);
1206 3e0d8fb3 2005-12-27 devnull assert(rp->cached);
1207 3e0d8fb3 2005-12-27 devnull assert(rp->owner == dp);
1210 3e0d8fb3 2005-12-27 devnull if(dolock)
1211 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
1214 3e0d8fb3 2005-12-27 devnull static int
1215 3e0d8fb3 2005-12-27 devnull rrequiv(RR *r1, RR *r2)
1217 3e0d8fb3 2005-12-27 devnull return r1->owner == r2->owner
1218 3e0d8fb3 2005-12-27 devnull && r1->type == r2->type
1219 3e0d8fb3 2005-12-27 devnull && r1->arg0 == r2->arg0
1220 3e0d8fb3 2005-12-27 devnull && r1->arg1 == r2->arg1;
1224 3e0d8fb3 2005-12-27 devnull unique(RR *rp)
1226 3e0d8fb3 2005-12-27 devnull RR **l, *nrp;
1228 3e0d8fb3 2005-12-27 devnull for(; rp; rp = rp->next){
1229 3e0d8fb3 2005-12-27 devnull l = &rp->next;
1230 3e0d8fb3 2005-12-27 devnull for(nrp = *l; nrp; nrp = *l){
1231 3e0d8fb3 2005-12-27 devnull if(rrequiv(rp, nrp)){
1232 3e0d8fb3 2005-12-27 devnull *l = nrp->next;
1233 3e0d8fb3 2005-12-27 devnull rrfree(nrp);
1235 3e0d8fb3 2005-12-27 devnull l = &nrp->next;
1241 3e0d8fb3 2005-12-27 devnull * true if second domain is subsumed by the first
1244 3e0d8fb3 2005-12-27 devnull subsume(char *higher, char *lower)
1246 3e0d8fb3 2005-12-27 devnull int hn, ln;
1248 3e0d8fb3 2005-12-27 devnull ln = strlen(lower);
1249 3e0d8fb3 2005-12-27 devnull hn = strlen(higher);
1250 3e0d8fb3 2005-12-27 devnull if(ln < hn)
1251 3e0d8fb3 2005-12-27 devnull return 0;
1253 3e0d8fb3 2005-12-27 devnull if(cistrcmp(lower + ln - hn, higher) != 0)
1254 3e0d8fb3 2005-12-27 devnull return 0;
1256 3e0d8fb3 2005-12-27 devnull if(ln > hn && hn != 0 && lower[ln - hn - 1] != '.')
1257 3e0d8fb3 2005-12-27 devnull return 0;
1259 3e0d8fb3 2005-12-27 devnull return 1;
1263 3e0d8fb3 2005-12-27 devnull * randomize the order we return items to provide some
1264 3e0d8fb3 2005-12-27 devnull * load balancing for servers.
1266 3e0d8fb3 2005-12-27 devnull * only randomize the first class of entries
1269 3e0d8fb3 2005-12-27 devnull randomize(RR *rp)
1271 3e0d8fb3 2005-12-27 devnull RR *first, *last, *x, *base;
1272 3e0d8fb3 2005-12-27 devnull ulong n;
1274 3e0d8fb3 2005-12-27 devnull if(rp == nil || rp->next == nil)
1275 3e0d8fb3 2005-12-27 devnull return rp;
1277 3e0d8fb3 2005-12-27 devnull /* just randomize addresses and mx's */
1278 3e0d8fb3 2005-12-27 devnull for(x = rp; x; x = x->next)
1279 3e0d8fb3 2005-12-27 devnull if(x->type != Ta && x->type != Tmx && x->type != Tns)
1280 3e0d8fb3 2005-12-27 devnull return rp;
1282 3e0d8fb3 2005-12-27 devnull base = rp;
1284 3e0d8fb3 2005-12-27 devnull n = rand();
1285 3e0d8fb3 2005-12-27 devnull last = first = nil;
1286 3e0d8fb3 2005-12-27 devnull while(rp != nil){
1287 3e0d8fb3 2005-12-27 devnull /* stop randomizing if we've moved past our class */
1288 3e0d8fb3 2005-12-27 devnull if(base->auth != rp->auth || base->db != rp->db){
1289 3e0d8fb3 2005-12-27 devnull last->next = rp;
1293 3e0d8fb3 2005-12-27 devnull /* unchain */
1294 3e0d8fb3 2005-12-27 devnull x = rp;
1295 3e0d8fb3 2005-12-27 devnull rp = x->next;
1296 3e0d8fb3 2005-12-27 devnull x->next = nil;
1298 3e0d8fb3 2005-12-27 devnull if(n&1){
1299 3e0d8fb3 2005-12-27 devnull /* add to tail */
1300 3e0d8fb3 2005-12-27 devnull if(last == nil)
1301 3e0d8fb3 2005-12-27 devnull first = x;
1303 3e0d8fb3 2005-12-27 devnull last->next = x;
1304 3e0d8fb3 2005-12-27 devnull last = x;
1305 3e0d8fb3 2005-12-27 devnull } else {
1306 3e0d8fb3 2005-12-27 devnull /* add to head */
1307 3e0d8fb3 2005-12-27 devnull if(last == nil)
1308 3e0d8fb3 2005-12-27 devnull last = x;
1309 3e0d8fb3 2005-12-27 devnull x->next = first;
1310 3e0d8fb3 2005-12-27 devnull first = x;
1313 3e0d8fb3 2005-12-27 devnull /* reroll the dice */
1314 3e0d8fb3 2005-12-27 devnull n >>= 1;
1316 3e0d8fb3 2005-12-27 devnull return first;
1319 3e0d8fb3 2005-12-27 devnull static int
1320 3e0d8fb3 2005-12-27 devnull sencodefmt(Fmt *f)
1322 3e0d8fb3 2005-12-27 devnull char *out;
1323 3e0d8fb3 2005-12-27 devnull char *buf;
1324 3e0d8fb3 2005-12-27 devnull int i, len;
1325 3e0d8fb3 2005-12-27 devnull int ilen;
1326 3e0d8fb3 2005-12-27 devnull int rv;
1327 3e0d8fb3 2005-12-27 devnull uchar *b;
1328 3e0d8fb3 2005-12-27 devnull char obuf[64]; // rsc optimization
1330 3e0d8fb3 2005-12-27 devnull if(!(f->flags&FmtPrec) || f->prec < 1)
1331 3e0d8fb3 2005-12-27 devnull goto error;
1333 3e0d8fb3 2005-12-27 devnull b = va_arg(f->args, uchar*);
1334 3e0d8fb3 2005-12-27 devnull if(b == nil)
1335 3e0d8fb3 2005-12-27 devnull goto error;
1337 3e0d8fb3 2005-12-27 devnull /* if it's a printable, go for it */
1338 3e0d8fb3 2005-12-27 devnull len = f->prec;
1339 3e0d8fb3 2005-12-27 devnull for(i = 0; i < len; i++)
1340 3e0d8fb3 2005-12-27 devnull if(!isprint(b[i]))
1342 3e0d8fb3 2005-12-27 devnull if(i == len){
1343 3e0d8fb3 2005-12-27 devnull if(len >= sizeof obuf)
1344 3e0d8fb3 2005-12-27 devnull len = sizeof(obuf)-1;
1345 3e0d8fb3 2005-12-27 devnull memmove(obuf, b, len);
1346 3e0d8fb3 2005-12-27 devnull obuf[len] = 0;
1347 3e0d8fb3 2005-12-27 devnull fmtstrcpy(f, obuf);
1348 3e0d8fb3 2005-12-27 devnull return 0;
1351 3e0d8fb3 2005-12-27 devnull ilen = f->prec;
1352 3e0d8fb3 2005-12-27 devnull f->prec = 0;
1353 3e0d8fb3 2005-12-27 devnull f->flags &= ~FmtPrec;
1354 3e0d8fb3 2005-12-27 devnull switch(f->r){
1355 3e0d8fb3 2005-12-27 devnull case '<':
1356 3e0d8fb3 2005-12-27 devnull len = (8*ilen+4)/5 + 3;
1358 3e0d8fb3 2005-12-27 devnull case '[':
1359 3e0d8fb3 2005-12-27 devnull len = (8*ilen+5)/6 + 4;
1361 3e0d8fb3 2005-12-27 devnull case 'H':
1362 3e0d8fb3 2005-12-27 devnull len = 2*ilen + 1;
1364 3e0d8fb3 2005-12-27 devnull default:
1365 3e0d8fb3 2005-12-27 devnull goto error;
1368 3e0d8fb3 2005-12-27 devnull if(len > sizeof(obuf)){
1369 3e0d8fb3 2005-12-27 devnull buf = malloc(len);
1370 3e0d8fb3 2005-12-27 devnull if(buf == nil)
1371 3e0d8fb3 2005-12-27 devnull goto error;
1373 3e0d8fb3 2005-12-27 devnull buf = obuf;
1375 3e0d8fb3 2005-12-27 devnull // convert
1376 3e0d8fb3 2005-12-27 devnull out = buf;
1377 3e0d8fb3 2005-12-27 devnull switch(f->r){
1378 3e0d8fb3 2005-12-27 devnull case '<':
1379 3e0d8fb3 2005-12-27 devnull rv = enc32(out, len, b, ilen);
1381 3e0d8fb3 2005-12-27 devnull case '[':
1382 3e0d8fb3 2005-12-27 devnull rv = enc64(out, len, b, ilen);
1384 3e0d8fb3 2005-12-27 devnull case 'H':
1385 3e0d8fb3 2005-12-27 devnull rv = enc16(out, len, b, ilen);
1387 3e0d8fb3 2005-12-27 devnull default:
1388 3e0d8fb3 2005-12-27 devnull rv = -1;
1391 3e0d8fb3 2005-12-27 devnull if(rv < 0)
1392 3e0d8fb3 2005-12-27 devnull goto error;
1394 3e0d8fb3 2005-12-27 devnull fmtstrcpy(f, buf);
1395 3e0d8fb3 2005-12-27 devnull if(buf != obuf)
1396 3e0d8fb3 2005-12-27 devnull free(buf);
1397 3e0d8fb3 2005-12-27 devnull return 0;
1400 3e0d8fb3 2005-12-27 devnull return fmtstrcpy(f, "<encodefmt>");
1405 3e0d8fb3 2005-12-27 devnull emalloc(int size)
1407 3e0d8fb3 2005-12-27 devnull char *x;
1409 3e0d8fb3 2005-12-27 devnull x = mallocz(size, 1);
1410 3e0d8fb3 2005-12-27 devnull if(x == nil)
1411 3e0d8fb3 2005-12-27 devnull abort();
1412 3e0d8fb3 2005-12-27 devnull setmalloctag(x, getcallerpc(&size));
1413 3e0d8fb3 2005-12-27 devnull return x;
1417 3e0d8fb3 2005-12-27 devnull estrdup(char *s)
1419 3e0d8fb3 2005-12-27 devnull int size;
1420 3e0d8fb3 2005-12-27 devnull char *p;
1422 3e0d8fb3 2005-12-27 devnull size = strlen(s)+1;
1423 3e0d8fb3 2005-12-27 devnull p = mallocz(size, 0);
1424 3e0d8fb3 2005-12-27 devnull if(p == nil)
1425 3e0d8fb3 2005-12-27 devnull abort();
1426 3e0d8fb3 2005-12-27 devnull memmove(p, s, size);
1427 3e0d8fb3 2005-12-27 devnull setmalloctag(p, getcallerpc(&s));
1428 3e0d8fb3 2005-12-27 devnull return p;
1432 3e0d8fb3 2005-12-27 devnull * create a pointer record
1434 3e0d8fb3 2005-12-27 devnull static RR*
1435 3e0d8fb3 2005-12-27 devnull mkptr(DN *dp, char *ptr, ulong ttl)
1437 3e0d8fb3 2005-12-27 devnull DN *ipdp;
1438 3e0d8fb3 2005-12-27 devnull RR *rp;
1440 3e0d8fb3 2005-12-27 devnull ipdp = dnlookup(ptr, Cin, 1);
1442 3e0d8fb3 2005-12-27 devnull rp = rralloc(Tptr);
1443 3e0d8fb3 2005-12-27 devnull rp->ptr = dp;
1444 3e0d8fb3 2005-12-27 devnull rp->owner = ipdp;
1445 3e0d8fb3 2005-12-27 devnull rp->db = 1;
1446 3e0d8fb3 2005-12-27 devnull if(ttl)
1447 3e0d8fb3 2005-12-27 devnull rp->ttl = ttl;
1448 3e0d8fb3 2005-12-27 devnull return rp;
1452 3e0d8fb3 2005-12-27 devnull * look for all ip addresses in this network and make
1453 3e0d8fb3 2005-12-27 devnull * pointer records for them.
1456 3e0d8fb3 2005-12-27 devnull dnptr(uchar *net, uchar *mask, char *dom, int bytes, int ttl)
1458 3e0d8fb3 2005-12-27 devnull int i, j;
1459 3e0d8fb3 2005-12-27 devnull DN *dp;
1460 3e0d8fb3 2005-12-27 devnull RR *rp, *nrp, *first, **l;
1461 3e0d8fb3 2005-12-27 devnull uchar ip[IPaddrlen];
1462 3e0d8fb3 2005-12-27 devnull uchar nnet[IPaddrlen];
1463 3e0d8fb3 2005-12-27 devnull char ptr[Domlen];
1464 3e0d8fb3 2005-12-27 devnull char *p, *e;
1466 3e0d8fb3 2005-12-27 devnull l = &first;
1467 3e0d8fb3 2005-12-27 devnull first = nil;
1468 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
1469 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
1470 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
1471 3e0d8fb3 2005-12-27 devnull if(rp->type != Ta || rp->negative)
1472 3e0d8fb3 2005-12-27 devnull continue;
1473 3e0d8fb3 2005-12-27 devnull parseip(ip, rp->ip->name);
1474 3e0d8fb3 2005-12-27 devnull maskip(ip, mask, nnet);
1475 3e0d8fb3 2005-12-27 devnull if(ipcmp(net, nnet) != 0)
1476 3e0d8fb3 2005-12-27 devnull continue;
1477 3e0d8fb3 2005-12-27 devnull p = ptr;
1478 3e0d8fb3 2005-12-27 devnull e = ptr+sizeof(ptr);
1479 3e0d8fb3 2005-12-27 devnull for(j = IPaddrlen-1; j >= IPaddrlen-bytes; j--)
1480 3e0d8fb3 2005-12-27 devnull p = seprint(p, e, "%d.", ip[j]);
1481 3e0d8fb3 2005-12-27 devnull seprint(p, e, "%s", dom);
1482 3e0d8fb3 2005-12-27 devnull nrp = mkptr(dp, ptr, ttl);
1483 3e0d8fb3 2005-12-27 devnull *l = nrp;
1484 3e0d8fb3 2005-12-27 devnull l = &nrp->next;
1489 3e0d8fb3 2005-12-27 devnull for(rp = first; rp != nil; rp = nrp){
1490 3e0d8fb3 2005-12-27 devnull nrp = rp->next;
1491 3e0d8fb3 2005-12-27 devnull rp->next = nil;
1492 3e0d8fb3 2005-12-27 devnull rrattach(rp, 1);
1497 3e0d8fb3 2005-12-27 devnull freeserverlist(Server *s)
1499 3e0d8fb3 2005-12-27 devnull Server *next;
1501 3e0d8fb3 2005-12-27 devnull for(; s != nil; s = next){
1502 3e0d8fb3 2005-12-27 devnull next = s->next;
1503 3e0d8fb3 2005-12-27 devnull free(s);
1508 3e0d8fb3 2005-12-27 devnull addserver(Server **l, char *name)
1510 3e0d8fb3 2005-12-27 devnull Server *s;
1512 3e0d8fb3 2005-12-27 devnull while(*l)
1513 3e0d8fb3 2005-12-27 devnull l = &(*l)->next;
1514 3e0d8fb3 2005-12-27 devnull s = malloc(sizeof(Server)+strlen(name)+1);
1515 3e0d8fb3 2005-12-27 devnull if(s == nil)
1516 3e0d8fb3 2005-12-27 devnull return;
1517 3e0d8fb3 2005-12-27 devnull s->name = (char*)(s+1);
1518 3e0d8fb3 2005-12-27 devnull strcpy(s->name, name);
1519 3e0d8fb3 2005-12-27 devnull s->next = nil;
1520 3e0d8fb3 2005-12-27 devnull *l = s;
1523 3e0d8fb3 2005-12-27 devnull Server*
1524 3e0d8fb3 2005-12-27 devnull copyserverlist(Server *s)
1526 3e0d8fb3 2005-12-27 devnull Server *ns;
1529 3e0d8fb3 2005-12-27 devnull for(ns = nil; s != nil; s = s->next)
1530 3e0d8fb3 2005-12-27 devnull addserver(&ns, s->name);
1531 3e0d8fb3 2005-12-27 devnull return ns;
