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 226d80b8 2006-04-01 devnull char *rrtname[Tall+2] =
71 226d80b8 2006-04-01 devnull /* 40 */ nil, nil, nil, nil, nil, nil, nil, nil,
72 226d80b8 2006-04-01 devnull /* 48 */ nil, nil, nil, nil, nil, nil, nil, nil,
73 226d80b8 2006-04-01 devnull /* 56 */ nil, nil, nil, nil, nil, nil, nil, nil,
74 226d80b8 2006-04-01 devnull /* 64 */ nil, nil, nil, nil, nil, nil, nil, nil,
75 226d80b8 2006-04-01 devnull /* 72 */ nil, nil, nil, nil, nil, nil, nil, nil,
76 226d80b8 2006-04-01 devnull /* 80 */ nil, nil, nil, nil, nil, nil, nil, nil,
77 226d80b8 2006-04-01 devnull /* 88 */ nil, nil, nil, nil, nil, nil, nil, nil,
78 226d80b8 2006-04-01 devnull /* 96 */ nil, nil, nil, nil, nil, nil, nil, nil,
79 226d80b8 2006-04-01 devnull /* 104 */ nil, nil, nil, nil, nil, nil, nil, nil,
80 226d80b8 2006-04-01 devnull /* 112 */ nil, nil, nil, nil, nil, nil, nil, nil,
81 226d80b8 2006-04-01 devnull /* 120 */ nil, nil, nil, nil, nil, nil, nil, nil,
82 226d80b8 2006-04-01 devnull /* 128 */ nil, nil, nil, nil, nil, nil, nil, nil,
83 226d80b8 2006-04-01 devnull /* 136 */ nil, nil, nil, nil, nil, nil, nil, nil,
84 226d80b8 2006-04-01 devnull /* 144 */ nil, nil, nil, nil, nil, nil, nil, nil,
85 226d80b8 2006-04-01 devnull /* 152 */ nil, nil, nil, nil, nil, nil, nil, nil,
86 226d80b8 2006-04-01 devnull /* 160 */ nil, nil, nil, nil, nil, nil, nil, nil,
87 226d80b8 2006-04-01 devnull /* 168 */ nil, nil, nil, nil, nil, nil, nil, nil,
88 226d80b8 2006-04-01 devnull /* 176 */ nil, nil, nil, nil, nil, nil, nil, nil,
89 226d80b8 2006-04-01 devnull /* 184 */ nil, nil, nil, nil, nil, nil, nil, nil,
90 226d80b8 2006-04-01 devnull /* 192 */ nil, nil, nil, nil, nil, nil, nil, nil,
91 226d80b8 2006-04-01 devnull /* 200 */ nil, nil, nil, nil, nil, nil, nil, nil,
92 226d80b8 2006-04-01 devnull /* 208 */ nil, nil, nil, nil, nil, nil, nil, nil,
93 226d80b8 2006-04-01 devnull /* 216 */ nil, nil, nil, nil, nil, nil, nil, nil,
94 226d80b8 2006-04-01 devnull /* 224 */ nil, nil, nil, nil, nil, nil, nil, nil,
95 226d80b8 2006-04-01 devnull /* 232 */ nil, nil, nil, nil, nil, nil, nil, nil,
96 226d80b8 2006-04-01 devnull /* 240 */ nil, nil, nil, nil, nil, nil, nil, nil,
97 fa325e9b 2020-01-10 cross /* 248 */ nil, nil, nil,
101 226d80b8 2006-04-01 devnull "mailb",
107 3e0d8fb3 2005-12-27 devnull /* names of response codes */
108 3e0d8fb3 2005-12-27 devnull char *rname[Rmask+1] =
111 226d80b8 2006-04-01 devnull "format error",
112 226d80b8 2006-04-01 devnull "server failure",
113 226d80b8 2006-04-01 devnull "bad name",
114 226d80b8 2006-04-01 devnull "unimplemented",
115 cbeb0b26 2006-04-01 devnull "we don't like you"
118 3e0d8fb3 2005-12-27 devnull Lock dnlock;
120 3e0d8fb3 2005-12-27 devnull static int sencodefmt(Fmt*);
123 3e0d8fb3 2005-12-27 devnull * set up a pipe to use as a lock
126 3e0d8fb3 2005-12-27 devnull dninit(void)
128 3e0d8fb3 2005-12-27 devnull fmtinstall('E', eipfmt);
129 3e0d8fb3 2005-12-27 devnull fmtinstall('I', eipfmt);
130 3e0d8fb3 2005-12-27 devnull fmtinstall('V', eipfmt);
131 3e0d8fb3 2005-12-27 devnull fmtinstall('R', rrfmt);
132 3e0d8fb3 2005-12-27 devnull fmtinstall('Q', rravfmt);
133 3e0d8fb3 2005-12-27 devnull fmtinstall('H', sencodefmt);
135 3e0d8fb3 2005-12-27 devnull dnvars.oldest = maxage;
136 3e0d8fb3 2005-12-27 devnull dnvars.names = 0;
140 3e0d8fb3 2005-12-27 devnull * hash for a domain name
142 3e0d8fb3 2005-12-27 devnull static ulong
143 3e0d8fb3 2005-12-27 devnull dnhash(char *name)
145 3e0d8fb3 2005-12-27 devnull ulong hash;
146 3e0d8fb3 2005-12-27 devnull uchar *val = (uchar*)name;
148 3e0d8fb3 2005-12-27 devnull for(hash = 0; *val; val++)
149 3e0d8fb3 2005-12-27 devnull hash = (hash*13) + tolower(*val)-'a';
150 3e0d8fb3 2005-12-27 devnull return hash % HTLEN;
154 3e0d8fb3 2005-12-27 devnull * lookup a symbol. if enter is not zero and the name is
155 3e0d8fb3 2005-12-27 devnull * not found, create it.
158 3e0d8fb3 2005-12-27 devnull dnlookup(char *name, int class, int enter)
163 3e0d8fb3 2005-12-27 devnull l = &ht[dnhash(name)];
164 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
165 3e0d8fb3 2005-12-27 devnull for(dp = *l; dp; dp = dp->next) {
166 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
167 3e0d8fb3 2005-12-27 devnull if(dp->class == class && cistrcmp(dp->name, name) == 0){
168 3e0d8fb3 2005-12-27 devnull dp->referenced = now;
169 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
170 3e0d8fb3 2005-12-27 devnull return dp;
172 3e0d8fb3 2005-12-27 devnull l = &dp->next;
174 3e0d8fb3 2005-12-27 devnull if(enter == 0){
175 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
176 3e0d8fb3 2005-12-27 devnull return 0;
178 3e0d8fb3 2005-12-27 devnull dnvars.names++;
179 3e0d8fb3 2005-12-27 devnull dp = emalloc(sizeof(*dp));
180 3e0d8fb3 2005-12-27 devnull dp->magic = DNmagic;
181 3e0d8fb3 2005-12-27 devnull dp->name = estrdup(name);
182 3e0d8fb3 2005-12-27 devnull assert(dp->name != 0);
183 3e0d8fb3 2005-12-27 devnull dp->class = class;
184 3e0d8fb3 2005-12-27 devnull dp->rr = 0;
185 3e0d8fb3 2005-12-27 devnull dp->next = 0;
186 3e0d8fb3 2005-12-27 devnull dp->referenced = now;
187 3e0d8fb3 2005-12-27 devnull *l = dp;
188 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
190 3e0d8fb3 2005-12-27 devnull return dp;
194 3e0d8fb3 2005-12-27 devnull * dump the cache
197 3e0d8fb3 2005-12-27 devnull dndump(char *file)
200 3e0d8fb3 2005-12-27 devnull int i, fd;
203 3e0d8fb3 2005-12-27 devnull fd = open(file, OWRITE|OTRUNC);
204 3e0d8fb3 2005-12-27 devnull if(fd < 0)
206 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
207 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
208 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
209 3e0d8fb3 2005-12-27 devnull fprint(fd, "%s\n", dp->name);
210 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
211 3e0d8fb3 2005-12-27 devnull fprint(fd, " %R %c%c %lud/%lud\n", rp, rp->auth?'A':'U',
212 3e0d8fb3 2005-12-27 devnull rp->db?'D':'N', rp->expire, rp->ttl);
215 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
216 3e0d8fb3 2005-12-27 devnull close(fd);
220 3e0d8fb3 2005-12-27 devnull * purge all records
223 3e0d8fb3 2005-12-27 devnull dnpurge(void)
226 3e0d8fb3 2005-12-27 devnull RR *rp, *srp;
229 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
231 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
232 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
233 3e0d8fb3 2005-12-27 devnull srp = rp = dp->rr;
234 3e0d8fb3 2005-12-27 devnull dp->rr = nil;
235 3e0d8fb3 2005-12-27 devnull for(; rp != nil; rp = rp->next)
236 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
237 3e0d8fb3 2005-12-27 devnull rrfreelist(srp);
240 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
244 3e0d8fb3 2005-12-27 devnull * check the age of resource records, free any that have timed out
247 3e0d8fb3 2005-12-27 devnull dnage(DN *dp)
250 3e0d8fb3 2005-12-27 devnull RR *rp, *next;
251 3e0d8fb3 2005-12-27 devnull ulong diff;
253 3e0d8fb3 2005-12-27 devnull diff = now - dp->referenced;
254 3e0d8fb3 2005-12-27 devnull if(diff < Reserved)
257 3e0d8fb3 2005-12-27 devnull l = &dp->rr;
258 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = next){
259 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
260 3e0d8fb3 2005-12-27 devnull next = rp->next;
261 3e0d8fb3 2005-12-27 devnull if(!rp->db)
262 3e0d8fb3 2005-12-27 devnull if(rp->expire < now || diff > dnvars.oldest){
263 3e0d8fb3 2005-12-27 devnull *l = next;
264 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
265 3e0d8fb3 2005-12-27 devnull rrfree(rp);
266 3e0d8fb3 2005-12-27 devnull continue;
268 3e0d8fb3 2005-12-27 devnull l = &rp->next;
272 3e0d8fb3 2005-12-27 devnull #define REF(x) if(x) x->refs++
275 3e0d8fb3 2005-12-27 devnull * our target is 4000 names cached, this should be larger on large servers
277 3e0d8fb3 2005-12-27 devnull #define TARGET 4000
280 3e0d8fb3 2005-12-27 devnull * periodicly sweep for old records and remove unreferenced domain names
282 3e0d8fb3 2005-12-27 devnull * only called when all other threads are locked out
285 3e0d8fb3 2005-12-27 devnull dnageall(int doit)
287 3e0d8fb3 2005-12-27 devnull DN *dp, **l;
290 3e0d8fb3 2005-12-27 devnull static ulong nextage;
292 3e0d8fb3 2005-12-27 devnull if(dnvars.names < TARGET && now < nextage && !doit){
293 3e0d8fb3 2005-12-27 devnull dnvars.oldest = maxage;
297 3e0d8fb3 2005-12-27 devnull if(dnvars.names > TARGET)
298 3e0d8fb3 2005-12-27 devnull dnvars.oldest /= 2;
299 3e0d8fb3 2005-12-27 devnull nextage = now + maxage;
301 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
303 3e0d8fb3 2005-12-27 devnull /* time out all old entries (and set refs to 0) */
304 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
305 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
306 3e0d8fb3 2005-12-27 devnull dp->refs = 0;
307 3e0d8fb3 2005-12-27 devnull dnage(dp);
310 3e0d8fb3 2005-12-27 devnull /* mark all referenced domain names */
311 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
312 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next)
313 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
314 3e0d8fb3 2005-12-27 devnull REF(rp->owner);
315 3e0d8fb3 2005-12-27 devnull if(rp->negative){
316 3e0d8fb3 2005-12-27 devnull REF(rp->negsoaowner);
317 3e0d8fb3 2005-12-27 devnull continue;
319 3e0d8fb3 2005-12-27 devnull switch(rp->type){
320 3e0d8fb3 2005-12-27 devnull case Thinfo:
321 3e0d8fb3 2005-12-27 devnull REF(rp->cpu);
322 3e0d8fb3 2005-12-27 devnull REF(rp->os);
324 3e0d8fb3 2005-12-27 devnull case Ttxt:
326 3e0d8fb3 2005-12-27 devnull case Tcname:
327 3e0d8fb3 2005-12-27 devnull case Tmb:
328 3e0d8fb3 2005-12-27 devnull case Tmd:
329 3e0d8fb3 2005-12-27 devnull case Tmf:
330 3e0d8fb3 2005-12-27 devnull case Tns:
331 3e0d8fb3 2005-12-27 devnull REF(rp->host);
333 3e0d8fb3 2005-12-27 devnull case Tmg:
334 3e0d8fb3 2005-12-27 devnull case Tmr:
335 3e0d8fb3 2005-12-27 devnull REF(rp->mb);
337 3e0d8fb3 2005-12-27 devnull case Tminfo:
338 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
339 3e0d8fb3 2005-12-27 devnull REF(rp->mb);
341 3e0d8fb3 2005-12-27 devnull case Trp:
342 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
343 3e0d8fb3 2005-12-27 devnull REF(rp->rp);
345 3e0d8fb3 2005-12-27 devnull case Tmx:
346 3e0d8fb3 2005-12-27 devnull REF(rp->host);
348 3e0d8fb3 2005-12-27 devnull case Ta:
349 3e0d8fb3 2005-12-27 devnull case Taaaa:
350 3e0d8fb3 2005-12-27 devnull REF(rp->ip);
352 3e0d8fb3 2005-12-27 devnull case Tptr:
353 3e0d8fb3 2005-12-27 devnull REF(rp->ptr);
355 3e0d8fb3 2005-12-27 devnull case Tsoa:
356 3e0d8fb3 2005-12-27 devnull REF(rp->host);
357 3e0d8fb3 2005-12-27 devnull REF(rp->rmb);
362 3e0d8fb3 2005-12-27 devnull /* sweep and remove unreferenced domain names */
363 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
364 3e0d8fb3 2005-12-27 devnull l = &ht[i];
365 3e0d8fb3 2005-12-27 devnull for(dp = *l; dp; dp = *l){
366 3e0d8fb3 2005-12-27 devnull if(dp->rr == 0 && dp->refs == 0){
367 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
368 3e0d8fb3 2005-12-27 devnull *l = dp->next;
369 3e0d8fb3 2005-12-27 devnull if(dp->name)
370 3e0d8fb3 2005-12-27 devnull free(dp->name);
371 3e0d8fb3 2005-12-27 devnull dp->magic = ~dp->magic;
372 3e0d8fb3 2005-12-27 devnull dnvars.names--;
373 3e0d8fb3 2005-12-27 devnull free(dp);
374 3e0d8fb3 2005-12-27 devnull continue;
376 3e0d8fb3 2005-12-27 devnull l = &dp->next;
380 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
384 3e0d8fb3 2005-12-27 devnull * timeout all database records (used when rereading db)
387 3e0d8fb3 2005-12-27 devnull dnagedb(void)
393 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
395 3e0d8fb3 2005-12-27 devnull /* time out all database entries */
396 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
397 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next)
398 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
399 3e0d8fb3 2005-12-27 devnull if(rp->db)
400 3e0d8fb3 2005-12-27 devnull rp->expire = 0;
402 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
406 3e0d8fb3 2005-12-27 devnull * mark all local db records about my area as authoritative, time out any others
409 3e0d8fb3 2005-12-27 devnull dnauthdb(void)
413 3e0d8fb3 2005-12-27 devnull Area *area;
416 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
418 3e0d8fb3 2005-12-27 devnull /* time out all database entries */
419 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
420 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
421 3e0d8fb3 2005-12-27 devnull area = inmyarea(dp->name);
422 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next)
423 3e0d8fb3 2005-12-27 devnull if(rp->db){
424 3e0d8fb3 2005-12-27 devnull if(area){
425 3e0d8fb3 2005-12-27 devnull if(rp->ttl < area->soarr->soa->minttl)
426 3e0d8fb3 2005-12-27 devnull rp->ttl = area->soarr->soa->minttl;
427 3e0d8fb3 2005-12-27 devnull rp->auth = 1;
429 3e0d8fb3 2005-12-27 devnull if(rp->expire == 0){
430 3e0d8fb3 2005-12-27 devnull rp->db = 0;
431 3e0d8fb3 2005-12-27 devnull dp->referenced = now - Reserved - 1;
436 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
440 3e0d8fb3 2005-12-27 devnull * keep track of other processes to know if we can
441 3e0d8fb3 2005-12-27 devnull * garbage collect. block while garbage collecting.
444 3e0d8fb3 2005-12-27 devnull getactivity(Request *req)
448 5c9f76b5 2006-02-14 devnull if(traceactivity) syslog(0, "dns", "get %d by %d.%d", dnvars.active, getpid(), threadid());
449 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
450 3e0d8fb3 2005-12-27 devnull while(dnvars.mutex){
451 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
452 3e0d8fb3 2005-12-27 devnull sleep(200);
453 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
455 3e0d8fb3 2005-12-27 devnull rv = ++dnvars.active;
456 3e0d8fb3 2005-12-27 devnull now = time(0);
457 3e0d8fb3 2005-12-27 devnull req->id = ++dnvars.id;
458 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
460 3e0d8fb3 2005-12-27 devnull return rv;
463 3e0d8fb3 2005-12-27 devnull putactivity(void)
465 5c9f76b5 2006-02-14 devnull if(traceactivity) syslog(0, "dns", "put %d by %d.%d", dnvars.active, getpid(), threadid());
466 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
467 3e0d8fb3 2005-12-27 devnull dnvars.active--;
468 3e0d8fb3 2005-12-27 devnull assert(dnvars.active >= 0); /* "dnvars.active %d", dnvars.active */;
471 3e0d8fb3 2005-12-27 devnull * clean out old entries and check for new db periodicly
473 3e0d8fb3 2005-12-27 devnull if(dnvars.mutex || (needrefresh == 0 && dnvars.active > 0)){
474 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
478 3e0d8fb3 2005-12-27 devnull /* wait till we're alone */
479 3e0d8fb3 2005-12-27 devnull dnvars.mutex = 1;
480 3e0d8fb3 2005-12-27 devnull while(dnvars.active > 0){
481 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
482 3e0d8fb3 2005-12-27 devnull sleep(100);
483 3e0d8fb3 2005-12-27 devnull lock(&dnvars.lk);
485 3e0d8fb3 2005-12-27 devnull unlock(&dnvars.lk);
487 3e0d8fb3 2005-12-27 devnull db2cache(needrefresh);
488 3e0d8fb3 2005-12-27 devnull dnageall(0);
490 3e0d8fb3 2005-12-27 devnull /* let others back in */
491 3e0d8fb3 2005-12-27 devnull needrefresh = 0;
492 3e0d8fb3 2005-12-27 devnull dnvars.mutex = 0;
496 3e0d8fb3 2005-12-27 devnull * Attach a single resource record to a domain name.
497 3e0d8fb3 2005-12-27 devnull * - Avoid duplicates with already present RR's
498 3e0d8fb3 2005-12-27 devnull * - Chain all RR's of the same type adjacent to one another
499 3e0d8fb3 2005-12-27 devnull * - chain authoritative RR's ahead of non-authoritative ones
501 3e0d8fb3 2005-12-27 devnull static void
502 3e0d8fb3 2005-12-27 devnull rrattach1(RR *new, int auth)
508 3e0d8fb3 2005-12-27 devnull assert(new->magic == RRmagic && !new->cached);
510 3e0d8fb3 2005-12-27 devnull if(!new->db)
511 3e0d8fb3 2005-12-27 devnull new->expire = new->ttl;
513 3e0d8fb3 2005-12-27 devnull new->expire = now + Year;
514 3e0d8fb3 2005-12-27 devnull dp = new->owner;
515 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
516 3e0d8fb3 2005-12-27 devnull new->auth |= auth;
517 3e0d8fb3 2005-12-27 devnull new->next = 0;
520 3e0d8fb3 2005-12-27 devnull * find first rr of the right type
522 3e0d8fb3 2005-12-27 devnull l = &dp->rr;
523 3e0d8fb3 2005-12-27 devnull for(rp = *l; rp; rp = *l){
524 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
525 3e0d8fb3 2005-12-27 devnull if(rp->type == new->type)
527 3e0d8fb3 2005-12-27 devnull l = &rp->next;
531 3e0d8fb3 2005-12-27 devnull * negative entries replace positive entries
532 3e0d8fb3 2005-12-27 devnull * positive entries replace negative entries
533 3e0d8fb3 2005-12-27 devnull * newer entries replace older entries with the same fields
535 3e0d8fb3 2005-12-27 devnull for(rp = *l; rp; rp = *l){
536 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
537 3e0d8fb3 2005-12-27 devnull if(rp->type != new->type)
540 3e0d8fb3 2005-12-27 devnull if(rp->db == new->db && rp->auth == new->auth){
541 3e0d8fb3 2005-12-27 devnull /* negative drives out positive and vice versa */
542 3e0d8fb3 2005-12-27 devnull if(rp->negative != new->negative){
543 3e0d8fb3 2005-12-27 devnull *l = rp->next;
544 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
545 3e0d8fb3 2005-12-27 devnull rrfree(rp);
546 3e0d8fb3 2005-12-27 devnull continue;
549 3e0d8fb3 2005-12-27 devnull /* all things equal, pick the newer one */
550 3e0d8fb3 2005-12-27 devnull if(rp->arg0 == new->arg0 && rp->arg1 == new->arg1){
551 3e0d8fb3 2005-12-27 devnull /* new drives out old */
552 3e0d8fb3 2005-12-27 devnull if(new->ttl > rp->ttl || new->expire > rp->expire){
553 3e0d8fb3 2005-12-27 devnull *l = rp->next;
554 3e0d8fb3 2005-12-27 devnull rp->cached = 0;
555 3e0d8fb3 2005-12-27 devnull rrfree(rp);
556 3e0d8fb3 2005-12-27 devnull continue;
557 3e0d8fb3 2005-12-27 devnull } else {
558 3e0d8fb3 2005-12-27 devnull rrfree(new);
563 3e0d8fb3 2005-12-27 devnull /* Hack for pointer records. This makes sure
564 3e0d8fb3 2005-12-27 devnull * the ordering in the list reflects the ordering
565 3e0d8fb3 2005-12-27 devnull * received or read from the database
567 3e0d8fb3 2005-12-27 devnull if(rp->type == Tptr){
568 3e0d8fb3 2005-12-27 devnull if(!rp->negative && !new->negative
569 3e0d8fb3 2005-12-27 devnull && rp->ptr->ordinal > new->ptr->ordinal)
573 3e0d8fb3 2005-12-27 devnull l = &rp->next;
577 3e0d8fb3 2005-12-27 devnull * add to chain
579 3e0d8fb3 2005-12-27 devnull new->cached = 1;
580 3e0d8fb3 2005-12-27 devnull new->next = *l;
581 3e0d8fb3 2005-12-27 devnull *l = new;
585 3e0d8fb3 2005-12-27 devnull * Attach a list of resource records to a domain name.
586 3e0d8fb3 2005-12-27 devnull * - Avoid duplicates with already present RR's
587 3e0d8fb3 2005-12-27 devnull * - Chain all RR's of the same type adjacent to one another
588 3e0d8fb3 2005-12-27 devnull * - chain authoritative RR's ahead of non-authoritative ones
589 3e0d8fb3 2005-12-27 devnull * - remove any expired RR's
592 3e0d8fb3 2005-12-27 devnull rrattach(RR *rp, int auth)
594 3e0d8fb3 2005-12-27 devnull RR *next;
596 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
597 3e0d8fb3 2005-12-27 devnull for(; rp; rp = next){
598 3e0d8fb3 2005-12-27 devnull next = rp->next;
599 3e0d8fb3 2005-12-27 devnull rp->next = 0;
601 3e0d8fb3 2005-12-27 devnull /* avoid any outside spoofing */
602 3e0d8fb3 2005-12-27 devnull if(cachedb && !rp->db && inmyarea(rp->owner->name))
603 3e0d8fb3 2005-12-27 devnull rrfree(rp);
605 3e0d8fb3 2005-12-27 devnull rrattach1(rp, auth);
607 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
611 3e0d8fb3 2005-12-27 devnull * allocate a resource record of a given type
614 3e0d8fb3 2005-12-27 devnull rralloc(int type)
618 3e0d8fb3 2005-12-27 devnull rp = emalloc(sizeof(*rp));
619 3e0d8fb3 2005-12-27 devnull rp->magic = RRmagic;
620 3e0d8fb3 2005-12-27 devnull rp->pc = getcallerpc(&type);
621 3e0d8fb3 2005-12-27 devnull rp->type = type;
622 3e0d8fb3 2005-12-27 devnull switch(type){
623 3e0d8fb3 2005-12-27 devnull case Tsoa:
624 3e0d8fb3 2005-12-27 devnull rp->soa = emalloc(sizeof(*rp->soa));
625 3e0d8fb3 2005-12-27 devnull rp->soa->slaves = nil;
627 3e0d8fb3 2005-12-27 devnull case Tkey:
628 3e0d8fb3 2005-12-27 devnull rp->key = emalloc(sizeof(*rp->key));
630 3e0d8fb3 2005-12-27 devnull case Tcert:
631 3e0d8fb3 2005-12-27 devnull rp->cert = emalloc(sizeof(*rp->cert));
633 3e0d8fb3 2005-12-27 devnull case Tsig:
634 3e0d8fb3 2005-12-27 devnull rp->sig = emalloc(sizeof(*rp->sig));
636 3e0d8fb3 2005-12-27 devnull case Tnull:
637 3e0d8fb3 2005-12-27 devnull rp->null = emalloc(sizeof(*rp->null));
640 3e0d8fb3 2005-12-27 devnull rp->ttl = 0;
641 3e0d8fb3 2005-12-27 devnull rp->expire = 0;
642 3e0d8fb3 2005-12-27 devnull rp->next = 0;
643 3e0d8fb3 2005-12-27 devnull return rp;
647 3e0d8fb3 2005-12-27 devnull * free a resource record and any related structs
650 3e0d8fb3 2005-12-27 devnull rrfree(RR *rp)
653 3e0d8fb3 2005-12-27 devnull RR *nrp;
656 3e0d8fb3 2005-12-27 devnull assert(rp->magic = RRmagic);
657 3e0d8fb3 2005-12-27 devnull assert(!rp->cached);
659 3e0d8fb3 2005-12-27 devnull dp = rp->owner;
661 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
662 3e0d8fb3 2005-12-27 devnull for(nrp = dp->rr; nrp; nrp = nrp->next)
663 3e0d8fb3 2005-12-27 devnull assert(nrp != rp); /* "rrfree of live rr" */;
666 3e0d8fb3 2005-12-27 devnull switch(rp->type){
667 3e0d8fb3 2005-12-27 devnull case Tsoa:
668 3e0d8fb3 2005-12-27 devnull freeserverlist(rp->soa->slaves);
669 3e0d8fb3 2005-12-27 devnull free(rp->soa);
671 3e0d8fb3 2005-12-27 devnull case Tkey:
672 3e0d8fb3 2005-12-27 devnull free(rp->key->data);
673 3e0d8fb3 2005-12-27 devnull free(rp->key);
675 3e0d8fb3 2005-12-27 devnull case Tcert:
676 3e0d8fb3 2005-12-27 devnull free(rp->cert->data);
677 3e0d8fb3 2005-12-27 devnull free(rp->cert);
679 3e0d8fb3 2005-12-27 devnull case Tsig:
680 3e0d8fb3 2005-12-27 devnull free(rp->sig->data);
681 3e0d8fb3 2005-12-27 devnull free(rp->sig);
683 3e0d8fb3 2005-12-27 devnull case Tnull:
684 3e0d8fb3 2005-12-27 devnull free(rp->null->data);
685 3e0d8fb3 2005-12-27 devnull free(rp->null);
687 3e0d8fb3 2005-12-27 devnull case Ttxt:
688 3e0d8fb3 2005-12-27 devnull while(rp->txt != nil){
689 3e0d8fb3 2005-12-27 devnull t = rp->txt;
690 3e0d8fb3 2005-12-27 devnull rp->txt = t->next;
691 3e0d8fb3 2005-12-27 devnull free(t->p);
692 3e0d8fb3 2005-12-27 devnull free(t);
697 3e0d8fb3 2005-12-27 devnull rp->magic = ~rp->magic;
698 3e0d8fb3 2005-12-27 devnull free(rp);
702 3e0d8fb3 2005-12-27 devnull * free a list of resource records and any related structs
705 3e0d8fb3 2005-12-27 devnull rrfreelist(RR *rp)
707 3e0d8fb3 2005-12-27 devnull RR *next;
709 3e0d8fb3 2005-12-27 devnull for(; rp; rp = next){
710 3e0d8fb3 2005-12-27 devnull next = rp->next;
711 3e0d8fb3 2005-12-27 devnull rrfree(rp);
715 3e0d8fb3 2005-12-27 devnull extern RR**
716 3e0d8fb3 2005-12-27 devnull rrcopy(RR *rp, RR **last)
718 3e0d8fb3 2005-12-27 devnull RR *nrp;
719 3e0d8fb3 2005-12-27 devnull SOA *soa;
720 3e0d8fb3 2005-12-27 devnull Key *key;
721 3e0d8fb3 2005-12-27 devnull Cert *cert;
722 3e0d8fb3 2005-12-27 devnull Sig *sig;
723 3e0d8fb3 2005-12-27 devnull Null *null;
724 3e0d8fb3 2005-12-27 devnull Txt *t, *nt, **l;
726 3e0d8fb3 2005-12-27 devnull nrp = rralloc(rp->type);
727 3e0d8fb3 2005-12-27 devnull switch(rp->type){
728 3e0d8fb3 2005-12-27 devnull case Ttxt:
729 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
730 3e0d8fb3 2005-12-27 devnull l = &nrp->txt;
731 3e0d8fb3 2005-12-27 devnull *l = nil;
732 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next){
733 3e0d8fb3 2005-12-27 devnull nt = emalloc(sizeof(*nt));
734 3e0d8fb3 2005-12-27 devnull nt->p = estrdup(t->p);
735 3e0d8fb3 2005-12-27 devnull nt->next = nil;
736 3e0d8fb3 2005-12-27 devnull *l = nt;
737 3e0d8fb3 2005-12-27 devnull l = &nt->next;
740 3e0d8fb3 2005-12-27 devnull case Tsoa:
741 3e0d8fb3 2005-12-27 devnull soa = nrp->soa;
742 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
743 3e0d8fb3 2005-12-27 devnull nrp->soa = soa;
744 3e0d8fb3 2005-12-27 devnull *nrp->soa = *rp->soa;
745 3e0d8fb3 2005-12-27 devnull nrp->soa->slaves = copyserverlist(rp->soa->slaves);
747 3e0d8fb3 2005-12-27 devnull case Tkey:
748 3e0d8fb3 2005-12-27 devnull key = nrp->key;
749 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
750 3e0d8fb3 2005-12-27 devnull nrp->key = key;
751 3e0d8fb3 2005-12-27 devnull *key = *rp->key;
752 3e0d8fb3 2005-12-27 devnull key->data = emalloc(key->dlen);
753 3e0d8fb3 2005-12-27 devnull memmove(key->data, rp->key->data, rp->key->dlen);
755 3e0d8fb3 2005-12-27 devnull case Tsig:
756 3e0d8fb3 2005-12-27 devnull sig = nrp->sig;
757 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
758 3e0d8fb3 2005-12-27 devnull nrp->sig = sig;
759 3e0d8fb3 2005-12-27 devnull *sig = *rp->sig;
760 3e0d8fb3 2005-12-27 devnull sig->data = emalloc(sig->dlen);
761 3e0d8fb3 2005-12-27 devnull memmove(sig->data, rp->sig->data, rp->sig->dlen);
763 3e0d8fb3 2005-12-27 devnull case Tcert:
764 3e0d8fb3 2005-12-27 devnull cert = nrp->cert;
765 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
766 3e0d8fb3 2005-12-27 devnull nrp->cert = cert;
767 3e0d8fb3 2005-12-27 devnull *cert = *rp->cert;
768 3e0d8fb3 2005-12-27 devnull cert->data = emalloc(cert->dlen);
769 3e0d8fb3 2005-12-27 devnull memmove(cert->data, rp->cert->data, rp->cert->dlen);
771 3e0d8fb3 2005-12-27 devnull case Tnull:
772 3e0d8fb3 2005-12-27 devnull null = nrp->null;
773 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
774 3e0d8fb3 2005-12-27 devnull nrp->null = null;
775 3e0d8fb3 2005-12-27 devnull *null = *rp->null;
776 3e0d8fb3 2005-12-27 devnull null->data = emalloc(null->dlen);
777 3e0d8fb3 2005-12-27 devnull memmove(null->data, rp->null->data, rp->null->dlen);
779 3e0d8fb3 2005-12-27 devnull default:
780 3e0d8fb3 2005-12-27 devnull *nrp = *rp;
783 3e0d8fb3 2005-12-27 devnull nrp->cached = 0;
784 3e0d8fb3 2005-12-27 devnull nrp->next = 0;
785 3e0d8fb3 2005-12-27 devnull *last = nrp;
786 3e0d8fb3 2005-12-27 devnull return &nrp->next;
790 3e0d8fb3 2005-12-27 devnull * lookup a resource record of a particular type and
791 3e0d8fb3 2005-12-27 devnull * class attached to a domain name. Return copies.
793 3e0d8fb3 2005-12-27 devnull * Priority ordering is:
794 3e0d8fb3 2005-12-27 devnull * db authoritative
795 3e0d8fb3 2005-12-27 devnull * not timed out network authoritative
796 3e0d8fb3 2005-12-27 devnull * not timed out network unauthoritative
797 3e0d8fb3 2005-12-27 devnull * unauthoritative db
799 3e0d8fb3 2005-12-27 devnull * if flag NOneg is set, don't return negative cached entries.
800 3e0d8fb3 2005-12-27 devnull * return nothing instead.
803 3e0d8fb3 2005-12-27 devnull rrlookup(DN *dp, int type, int flag)
805 3e0d8fb3 2005-12-27 devnull RR *rp, *first, **last;
807 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
809 3e0d8fb3 2005-12-27 devnull first = 0;
810 3e0d8fb3 2005-12-27 devnull last = &first;
811 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
813 3e0d8fb3 2005-12-27 devnull /* try for an authoritative db entry */
814 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
815 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic && rp->cached);
816 3e0d8fb3 2005-12-27 devnull if(rp->db)
817 3e0d8fb3 2005-12-27 devnull if(rp->auth)
818 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type))
819 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
821 3e0d8fb3 2005-12-27 devnull if(first)
822 3e0d8fb3 2005-12-27 devnull goto out;
824 3e0d8fb3 2005-12-27 devnull /* try for an living authoritative network entry */
825 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
826 3e0d8fb3 2005-12-27 devnull if(!rp->db)
827 3e0d8fb3 2005-12-27 devnull if(rp->auth)
828 3e0d8fb3 2005-12-27 devnull if(rp->ttl + 60 > now)
829 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
830 3e0d8fb3 2005-12-27 devnull if(flag == NOneg && rp->negative)
831 3e0d8fb3 2005-12-27 devnull goto out;
832 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
835 3e0d8fb3 2005-12-27 devnull if(first)
836 3e0d8fb3 2005-12-27 devnull goto out;
838 3e0d8fb3 2005-12-27 devnull /* try for an living unauthoritative network entry */
839 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
840 3e0d8fb3 2005-12-27 devnull if(!rp->db)
841 3e0d8fb3 2005-12-27 devnull if(rp->ttl + 60 > now)
842 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
843 3e0d8fb3 2005-12-27 devnull if(flag == NOneg && rp->negative)
844 3e0d8fb3 2005-12-27 devnull goto out;
845 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
848 3e0d8fb3 2005-12-27 devnull if(first)
849 3e0d8fb3 2005-12-27 devnull goto out;
851 3e0d8fb3 2005-12-27 devnull /* try for an unauthoritative db entry */
852 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
853 3e0d8fb3 2005-12-27 devnull if(rp->db)
854 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type))
855 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
857 3e0d8fb3 2005-12-27 devnull if(first)
858 3e0d8fb3 2005-12-27 devnull goto out;
860 3e0d8fb3 2005-12-27 devnull /* otherwise, settle for anything we got (except for negative caches) */
861 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
862 3e0d8fb3 2005-12-27 devnull if(tsame(type, rp->type)){
863 3e0d8fb3 2005-12-27 devnull if(rp->negative)
864 3e0d8fb3 2005-12-27 devnull goto out;
865 3e0d8fb3 2005-12-27 devnull last = rrcopy(rp, last);
870 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
871 3e0d8fb3 2005-12-27 devnull unique(first);
872 3e0d8fb3 2005-12-27 devnull return first;
876 3e0d8fb3 2005-12-27 devnull * convert an ascii RR type name to its integer representation
879 3e0d8fb3 2005-12-27 devnull rrtype(char *atype)
883 3e0d8fb3 2005-12-27 devnull for(i = 0; i <= Tall; i++)
884 3e0d8fb3 2005-12-27 devnull if(rrtname[i] && strcmp(rrtname[i], atype) == 0)
885 3e0d8fb3 2005-12-27 devnull return i;
887 226d80b8 2006-04-01 devnull /* make any a synonym for all */
888 3e0d8fb3 2005-12-27 devnull if(strcmp(atype, "any") == 0)
889 3e0d8fb3 2005-12-27 devnull return Tall;
890 3e0d8fb3 2005-12-27 devnull return atoi(atype);
894 3e0d8fb3 2005-12-27 devnull * convert an integer RR type to it's ascii name
897 3e0d8fb3 2005-12-27 devnull rrname(int type, char *buf, int len)
899 3e0d8fb3 2005-12-27 devnull char *t;
902 3e0d8fb3 2005-12-27 devnull if(type <= Tall)
903 3e0d8fb3 2005-12-27 devnull t = rrtname[type];
904 3e0d8fb3 2005-12-27 devnull if(t==0){
905 3e0d8fb3 2005-12-27 devnull snprint(buf, len, "%d", type);
906 3e0d8fb3 2005-12-27 devnull t = buf;
908 3e0d8fb3 2005-12-27 devnull return t;
912 3e0d8fb3 2005-12-27 devnull * return 0 if not a supported rr type
915 3e0d8fb3 2005-12-27 devnull rrsupported(int type)
917 3e0d8fb3 2005-12-27 devnull if(type < 0 || type >Tall)
918 3e0d8fb3 2005-12-27 devnull return 0;
919 3e0d8fb3 2005-12-27 devnull return rrtname[type] != 0;
923 3e0d8fb3 2005-12-27 devnull * compare 2 types
926 3e0d8fb3 2005-12-27 devnull tsame(int t1, int t2)
928 3e0d8fb3 2005-12-27 devnull return t1 == t2 || t1 == Tall;
932 3e0d8fb3 2005-12-27 devnull * Add resource records to a list, duplicate them if they are cached
933 3e0d8fb3 2005-12-27 devnull * RR's since these are shared.
936 3e0d8fb3 2005-12-27 devnull rrcat(RR **start, RR *rp)
938 3e0d8fb3 2005-12-27 devnull RR **last;
940 3e0d8fb3 2005-12-27 devnull last = start;
941 3e0d8fb3 2005-12-27 devnull while(*last != 0)
942 3e0d8fb3 2005-12-27 devnull last = &(*last)->next;
944 3e0d8fb3 2005-12-27 devnull *last = rp;
945 3e0d8fb3 2005-12-27 devnull return *start;
949 3e0d8fb3 2005-12-27 devnull * remove negative cache rr's from an rr list
952 3e0d8fb3 2005-12-27 devnull rrremneg(RR **l)
954 3e0d8fb3 2005-12-27 devnull RR **nl, *rp;
955 3e0d8fb3 2005-12-27 devnull RR *first;
957 3e0d8fb3 2005-12-27 devnull first = nil;
958 3e0d8fb3 2005-12-27 devnull nl = &first;
959 3e0d8fb3 2005-12-27 devnull while(*l != nil){
960 3e0d8fb3 2005-12-27 devnull rp = *l;
961 3e0d8fb3 2005-12-27 devnull if(rp->negative){
962 3e0d8fb3 2005-12-27 devnull *l = rp->next;
963 3e0d8fb3 2005-12-27 devnull *nl = rp;
964 3e0d8fb3 2005-12-27 devnull nl = &rp->next;
965 3e0d8fb3 2005-12-27 devnull *nl = nil;
967 3e0d8fb3 2005-12-27 devnull l = &rp->next;
970 3e0d8fb3 2005-12-27 devnull return first;
974 3e0d8fb3 2005-12-27 devnull * remove rr's of a particular type from an rr list
977 3e0d8fb3 2005-12-27 devnull rrremtype(RR **l, int type)
979 3e0d8fb3 2005-12-27 devnull RR **nl, *rp;
980 3e0d8fb3 2005-12-27 devnull RR *first;
982 3e0d8fb3 2005-12-27 devnull first = nil;
983 3e0d8fb3 2005-12-27 devnull nl = &first;
984 3e0d8fb3 2005-12-27 devnull while(*l != nil){
985 3e0d8fb3 2005-12-27 devnull rp = *l;
986 3e0d8fb3 2005-12-27 devnull if(rp->type == type){
987 3e0d8fb3 2005-12-27 devnull *l = rp->next;
988 3e0d8fb3 2005-12-27 devnull *nl = rp;
989 3e0d8fb3 2005-12-27 devnull nl = &rp->next;
990 3e0d8fb3 2005-12-27 devnull *nl = nil;
992 3e0d8fb3 2005-12-27 devnull l = &(*l)->next;
995 3e0d8fb3 2005-12-27 devnull return first;
999 3e0d8fb3 2005-12-27 devnull * print conversion for rr records
1002 3e0d8fb3 2005-12-27 devnull rrfmt(Fmt *f)
1004 3e0d8fb3 2005-12-27 devnull RR *rp;
1005 3e0d8fb3 2005-12-27 devnull char *strp;
1006 3e0d8fb3 2005-12-27 devnull Fmt fstr;
1007 3e0d8fb3 2005-12-27 devnull int rv;
1008 3e0d8fb3 2005-12-27 devnull char buf[Domlen];
1009 3e0d8fb3 2005-12-27 devnull Server *s;
1010 3e0d8fb3 2005-12-27 devnull Txt *t;
1012 3e0d8fb3 2005-12-27 devnull fmtstrinit(&fstr);
1014 3e0d8fb3 2005-12-27 devnull rp = va_arg(f->args, RR*);
1015 3e0d8fb3 2005-12-27 devnull if(rp == 0){
1016 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "<null>");
1017 3e0d8fb3 2005-12-27 devnull goto out;
1020 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s %s", rp->owner->name,
1021 3e0d8fb3 2005-12-27 devnull rrname(rp->type, buf, sizeof buf));
1023 3e0d8fb3 2005-12-27 devnull if(rp->negative){
1024 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\tnegative - rcode %d", rp->negrcode);
1025 3e0d8fb3 2005-12-27 devnull goto out;
1028 3e0d8fb3 2005-12-27 devnull switch(rp->type){
1029 3e0d8fb3 2005-12-27 devnull case Thinfo:
1030 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->cpu->name, rp->os->name);
1032 3e0d8fb3 2005-12-27 devnull case Tcname:
1033 3e0d8fb3 2005-12-27 devnull case Tmb:
1034 3e0d8fb3 2005-12-27 devnull case Tmd:
1035 3e0d8fb3 2005-12-27 devnull case Tmf:
1036 3e0d8fb3 2005-12-27 devnull case Tns:
1037 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->host->name);
1039 3e0d8fb3 2005-12-27 devnull case Tmg:
1040 3e0d8fb3 2005-12-27 devnull case Tmr:
1041 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->mb->name);
1043 3e0d8fb3 2005-12-27 devnull case Tminfo:
1044 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->mb->name, rp->rmb->name);
1046 3e0d8fb3 2005-12-27 devnull case Tmx:
1047 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%lud %s", rp->pref, rp->host->name);
1049 3e0d8fb3 2005-12-27 devnull case Ta:
1050 3e0d8fb3 2005-12-27 devnull case Taaaa:
1051 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->ip->name);
1053 3e0d8fb3 2005-12-27 devnull case Tptr:
1054 226d80b8 2006-04-01 devnull /* fmtprint(&fstr, "\t%s(%lud)", rp->ptr->name, rp->ptr->ordinal); */
1055 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s", rp->ptr->name);
1057 3e0d8fb3 2005-12-27 devnull case Tsoa:
1058 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s %lud %lud %lud %lud %lud", rp->host->name,
1059 3e0d8fb3 2005-12-27 devnull rp->rmb->name, rp->soa->serial, rp->soa->refresh, rp->soa->retry,
1060 3e0d8fb3 2005-12-27 devnull rp->soa->expire, rp->soa->minttl);
1061 3e0d8fb3 2005-12-27 devnull for(s = rp->soa->slaves; s != nil; s = s->next)
1062 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " %s", s->name);
1064 3e0d8fb3 2005-12-27 devnull case Tnull:
1065 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%.*H", rp->null->dlen, rp->null->data);
1067 3e0d8fb3 2005-12-27 devnull case Ttxt:
1068 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t");
1069 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1070 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s", t->p);
1072 3e0d8fb3 2005-12-27 devnull case Trp:
1073 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%s %s", rp->rmb->name, rp->rp->name);
1075 3e0d8fb3 2005-12-27 devnull case Tkey:
1076 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d", rp->key->flags, rp->key->proto,
1077 3e0d8fb3 2005-12-27 devnull rp->key->alg);
1079 3e0d8fb3 2005-12-27 devnull case Tsig:
1080 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d %lud %lud %lud %d %s",
1081 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->alg, rp->sig->labels, rp->sig->ttl,
1082 3e0d8fb3 2005-12-27 devnull rp->sig->exp, rp->sig->incep, rp->sig->tag, rp->sig->signer->name);
1084 3e0d8fb3 2005-12-27 devnull case Tcert:
1085 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\t%d %d %d",
1086 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->tag, rp->sig->alg);
1088 3e0d8fb3 2005-12-27 devnull default:
1092 3e0d8fb3 2005-12-27 devnull strp = fmtstrflush(&fstr);
1093 3e0d8fb3 2005-12-27 devnull rv = fmtstrcpy(f, strp);
1094 3e0d8fb3 2005-12-27 devnull free(strp);
1095 3e0d8fb3 2005-12-27 devnull return rv;
1099 3e0d8fb3 2005-12-27 devnull * print conversion for rr records in attribute value form
1102 3e0d8fb3 2005-12-27 devnull rravfmt(Fmt *f)
1104 3e0d8fb3 2005-12-27 devnull RR *rp;
1105 3e0d8fb3 2005-12-27 devnull char *strp;
1106 3e0d8fb3 2005-12-27 devnull Fmt fstr;
1107 3e0d8fb3 2005-12-27 devnull int rv;
1108 3e0d8fb3 2005-12-27 devnull Server *s;
1109 3e0d8fb3 2005-12-27 devnull Txt *t;
1110 3e0d8fb3 2005-12-27 devnull int quote;
1112 3e0d8fb3 2005-12-27 devnull fmtstrinit(&fstr);
1114 3e0d8fb3 2005-12-27 devnull rp = va_arg(f->args, RR*);
1115 3e0d8fb3 2005-12-27 devnull if(rp == 0){
1116 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "<null>");
1117 3e0d8fb3 2005-12-27 devnull goto out;
1120 3e0d8fb3 2005-12-27 devnull if(rp->type == Tptr)
1121 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "ptr=%s", rp->owner->name);
1123 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "dom=%s", rp->owner->name);
1125 3e0d8fb3 2005-12-27 devnull switch(rp->type){
1126 3e0d8fb3 2005-12-27 devnull case Thinfo:
1127 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " cpu=%s os=%s", rp->cpu->name, rp->os->name);
1129 3e0d8fb3 2005-12-27 devnull case Tcname:
1130 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " cname=%s", rp->host->name);
1132 3e0d8fb3 2005-12-27 devnull case Tmb:
1133 3e0d8fb3 2005-12-27 devnull case Tmd:
1134 3e0d8fb3 2005-12-27 devnull case Tmf:
1135 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s", rp->host->name);
1137 3e0d8fb3 2005-12-27 devnull case Tns:
1138 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ns=%s", rp->host->name);
1140 3e0d8fb3 2005-12-27 devnull case Tmg:
1141 3e0d8fb3 2005-12-27 devnull case Tmr:
1142 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s", rp->mb->name);
1144 3e0d8fb3 2005-12-27 devnull case Tminfo:
1145 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " mbox=%s mbox=%s", rp->mb->name, rp->rmb->name);
1147 3e0d8fb3 2005-12-27 devnull case Tmx:
1148 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " pref=%lud mx=%s", rp->pref, rp->host->name);
1150 3e0d8fb3 2005-12-27 devnull case Ta:
1151 3e0d8fb3 2005-12-27 devnull case Taaaa:
1152 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ip=%s", rp->ip->name);
1154 3e0d8fb3 2005-12-27 devnull case Tptr:
1155 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " dom=%s", rp->ptr->name);
1157 3e0d8fb3 2005-12-27 devnull case Tsoa:
1158 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " ns=%s mbox=%s serial=%lud refresh=%lud retry=%lud expire=%lud ttl=%lud",
1159 3e0d8fb3 2005-12-27 devnull rp->host->name, rp->rmb->name, rp->soa->serial,
1160 3e0d8fb3 2005-12-27 devnull rp->soa->refresh, rp->soa->retry,
1161 3e0d8fb3 2005-12-27 devnull rp->soa->expire, rp->soa->minttl);
1162 3e0d8fb3 2005-12-27 devnull for(s = rp->soa->slaves; s != nil; s = s->next)
1163 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " dnsslave=%s", s->name);
1165 3e0d8fb3 2005-12-27 devnull case Tnull:
1166 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " null=%.*H", rp->null->dlen, rp->null->data);
1168 3e0d8fb3 2005-12-27 devnull case Ttxt:
1169 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " txt=");
1170 3e0d8fb3 2005-12-27 devnull quote = 0;
1171 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1172 3e0d8fb3 2005-12-27 devnull if(strchr(t->p, ' '))
1173 3e0d8fb3 2005-12-27 devnull quote = 1;
1174 3e0d8fb3 2005-12-27 devnull if(quote)
1175 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\"");
1176 3e0d8fb3 2005-12-27 devnull for(t = rp->txt; t != nil; t = t->next)
1177 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "%s", t->p);
1178 3e0d8fb3 2005-12-27 devnull if(quote)
1179 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, "\"");
1181 3e0d8fb3 2005-12-27 devnull case Trp:
1182 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " rp=%s txt=%s", rp->rmb->name, rp->rp->name);
1184 3e0d8fb3 2005-12-27 devnull case Tkey:
1185 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " flags=%d proto=%d alg=%d",
1186 3e0d8fb3 2005-12-27 devnull rp->key->flags, rp->key->proto, rp->key->alg);
1188 3e0d8fb3 2005-12-27 devnull case Tsig:
1189 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " type=%d alg=%d labels=%d ttl=%lud exp=%lud incep=%lud tag=%d signer=%s",
1190 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->alg, rp->sig->labels, rp->sig->ttl,
1191 3e0d8fb3 2005-12-27 devnull rp->sig->exp, rp->sig->incep, rp->sig->tag, rp->sig->signer->name);
1193 3e0d8fb3 2005-12-27 devnull case Tcert:
1194 3e0d8fb3 2005-12-27 devnull fmtprint(&fstr, " type=%d tag=%d alg=%d",
1195 3e0d8fb3 2005-12-27 devnull rp->sig->type, rp->sig->tag, rp->sig->alg);
1197 3e0d8fb3 2005-12-27 devnull default:
1201 3e0d8fb3 2005-12-27 devnull strp = fmtstrflush(&fstr);
1202 3e0d8fb3 2005-12-27 devnull rv = fmtstrcpy(f, strp);
1203 3e0d8fb3 2005-12-27 devnull free(strp);
1204 3e0d8fb3 2005-12-27 devnull return rv;
1208 3e0d8fb3 2005-12-27 devnull warning(char *fmt, ...)
1210 3e0d8fb3 2005-12-27 devnull char dnserr[128];
1211 3e0d8fb3 2005-12-27 devnull va_list arg;
1213 3e0d8fb3 2005-12-27 devnull va_start(arg, fmt);
1214 3e0d8fb3 2005-12-27 devnull vseprint(dnserr, dnserr+sizeof(dnserr), fmt, arg);
1215 3e0d8fb3 2005-12-27 devnull va_end(arg);
1216 3e0d8fb3 2005-12-27 devnull syslog(1, "dns", dnserr);
1220 3e0d8fb3 2005-12-27 devnull * chasing down double free's
1223 3e0d8fb3 2005-12-27 devnull dncheck(void *p, int dolock)
1225 3e0d8fb3 2005-12-27 devnull DN *dp;
1227 3e0d8fb3 2005-12-27 devnull RR *rp;
1229 3e0d8fb3 2005-12-27 devnull if(p != nil){
1230 3e0d8fb3 2005-12-27 devnull dp = p;
1231 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
1234 3e0d8fb3 2005-12-27 devnull if(!testing)
1235 3e0d8fb3 2005-12-27 devnull return;
1237 3e0d8fb3 2005-12-27 devnull if(dolock)
1238 3e0d8fb3 2005-12-27 devnull lock(&dnlock);
1239 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++)
1240 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
1241 3e0d8fb3 2005-12-27 devnull assert(dp != p);
1242 3e0d8fb3 2005-12-27 devnull assert(dp->magic == DNmagic);
1243 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
1244 3e0d8fb3 2005-12-27 devnull assert(rp->magic == RRmagic);
1245 3e0d8fb3 2005-12-27 devnull assert(rp->cached);
1246 3e0d8fb3 2005-12-27 devnull assert(rp->owner == dp);
1249 3e0d8fb3 2005-12-27 devnull if(dolock)
1250 3e0d8fb3 2005-12-27 devnull unlock(&dnlock);
1253 3e0d8fb3 2005-12-27 devnull static int
1254 3e0d8fb3 2005-12-27 devnull rrequiv(RR *r1, RR *r2)
1256 3e0d8fb3 2005-12-27 devnull return r1->owner == r2->owner
1257 3e0d8fb3 2005-12-27 devnull && r1->type == r2->type
1258 3e0d8fb3 2005-12-27 devnull && r1->arg0 == r2->arg0
1259 3e0d8fb3 2005-12-27 devnull && r1->arg1 == r2->arg1;
1263 3e0d8fb3 2005-12-27 devnull unique(RR *rp)
1265 3e0d8fb3 2005-12-27 devnull RR **l, *nrp;
1267 3e0d8fb3 2005-12-27 devnull for(; rp; rp = rp->next){
1268 3e0d8fb3 2005-12-27 devnull l = &rp->next;
1269 3e0d8fb3 2005-12-27 devnull for(nrp = *l; nrp; nrp = *l){
1270 3e0d8fb3 2005-12-27 devnull if(rrequiv(rp, nrp)){
1271 3e0d8fb3 2005-12-27 devnull *l = nrp->next;
1272 3e0d8fb3 2005-12-27 devnull rrfree(nrp);
1274 3e0d8fb3 2005-12-27 devnull l = &nrp->next;
1280 3e0d8fb3 2005-12-27 devnull * true if second domain is subsumed by the first
1283 3e0d8fb3 2005-12-27 devnull subsume(char *higher, char *lower)
1285 3e0d8fb3 2005-12-27 devnull int hn, ln;
1287 3e0d8fb3 2005-12-27 devnull ln = strlen(lower);
1288 3e0d8fb3 2005-12-27 devnull hn = strlen(higher);
1289 3e0d8fb3 2005-12-27 devnull if(ln < hn)
1290 3e0d8fb3 2005-12-27 devnull return 0;
1292 3e0d8fb3 2005-12-27 devnull if(cistrcmp(lower + ln - hn, higher) != 0)
1293 3e0d8fb3 2005-12-27 devnull return 0;
1295 3e0d8fb3 2005-12-27 devnull if(ln > hn && hn != 0 && lower[ln - hn - 1] != '.')
1296 3e0d8fb3 2005-12-27 devnull return 0;
1298 3e0d8fb3 2005-12-27 devnull return 1;
1302 3e0d8fb3 2005-12-27 devnull * randomize the order we return items to provide some
1303 3e0d8fb3 2005-12-27 devnull * load balancing for servers.
1305 3e0d8fb3 2005-12-27 devnull * only randomize the first class of entries
1308 3e0d8fb3 2005-12-27 devnull randomize(RR *rp)
1310 3e0d8fb3 2005-12-27 devnull RR *first, *last, *x, *base;
1311 3e0d8fb3 2005-12-27 devnull ulong n;
1313 3e0d8fb3 2005-12-27 devnull if(rp == nil || rp->next == nil)
1314 3e0d8fb3 2005-12-27 devnull return rp;
1316 3e0d8fb3 2005-12-27 devnull /* just randomize addresses and mx's */
1317 3e0d8fb3 2005-12-27 devnull for(x = rp; x; x = x->next)
1318 3e0d8fb3 2005-12-27 devnull if(x->type != Ta && x->type != Tmx && x->type != Tns)
1319 3e0d8fb3 2005-12-27 devnull return rp;
1321 fa325e9b 2020-01-10 cross base = rp;
1323 3e0d8fb3 2005-12-27 devnull n = rand();
1324 3e0d8fb3 2005-12-27 devnull last = first = nil;
1325 3e0d8fb3 2005-12-27 devnull while(rp != nil){
1326 3e0d8fb3 2005-12-27 devnull /* stop randomizing if we've moved past our class */
1327 3e0d8fb3 2005-12-27 devnull if(base->auth != rp->auth || base->db != rp->db){
1328 3e0d8fb3 2005-12-27 devnull last->next = rp;
1332 3e0d8fb3 2005-12-27 devnull /* unchain */
1333 3e0d8fb3 2005-12-27 devnull x = rp;
1334 3e0d8fb3 2005-12-27 devnull rp = x->next;
1335 3e0d8fb3 2005-12-27 devnull x->next = nil;
1337 3e0d8fb3 2005-12-27 devnull if(n&1){
1338 3e0d8fb3 2005-12-27 devnull /* add to tail */
1339 3e0d8fb3 2005-12-27 devnull if(last == nil)
1340 3e0d8fb3 2005-12-27 devnull first = x;
1342 3e0d8fb3 2005-12-27 devnull last->next = x;
1343 3e0d8fb3 2005-12-27 devnull last = x;
1344 3e0d8fb3 2005-12-27 devnull } else {
1345 3e0d8fb3 2005-12-27 devnull /* add to head */
1346 3e0d8fb3 2005-12-27 devnull if(last == nil)
1347 3e0d8fb3 2005-12-27 devnull last = x;
1348 3e0d8fb3 2005-12-27 devnull x->next = first;
1349 3e0d8fb3 2005-12-27 devnull first = x;
1352 3e0d8fb3 2005-12-27 devnull /* reroll the dice */
1353 3e0d8fb3 2005-12-27 devnull n >>= 1;
1355 3e0d8fb3 2005-12-27 devnull return first;
1358 3e0d8fb3 2005-12-27 devnull static int
1359 3e0d8fb3 2005-12-27 devnull sencodefmt(Fmt *f)
1361 3e0d8fb3 2005-12-27 devnull char *out;
1362 3e0d8fb3 2005-12-27 devnull char *buf;
1363 3e0d8fb3 2005-12-27 devnull int i, len;
1364 3e0d8fb3 2005-12-27 devnull int ilen;
1365 3e0d8fb3 2005-12-27 devnull int rv;
1366 3e0d8fb3 2005-12-27 devnull uchar *b;
1367 226d80b8 2006-04-01 devnull char obuf[64]; /* rsc optimization */
1369 3e0d8fb3 2005-12-27 devnull if(!(f->flags&FmtPrec) || f->prec < 1)
1370 3e0d8fb3 2005-12-27 devnull goto error;
1372 3e0d8fb3 2005-12-27 devnull b = va_arg(f->args, uchar*);
1373 3e0d8fb3 2005-12-27 devnull if(b == nil)
1374 3e0d8fb3 2005-12-27 devnull goto error;
1376 3e0d8fb3 2005-12-27 devnull /* if it's a printable, go for it */
1377 3e0d8fb3 2005-12-27 devnull len = f->prec;
1378 3e0d8fb3 2005-12-27 devnull for(i = 0; i < len; i++)
1379 3e0d8fb3 2005-12-27 devnull if(!isprint(b[i]))
1381 3e0d8fb3 2005-12-27 devnull if(i == len){
1382 3e0d8fb3 2005-12-27 devnull if(len >= sizeof obuf)
1383 3e0d8fb3 2005-12-27 devnull len = sizeof(obuf)-1;
1384 3e0d8fb3 2005-12-27 devnull memmove(obuf, b, len);
1385 3e0d8fb3 2005-12-27 devnull obuf[len] = 0;
1386 3e0d8fb3 2005-12-27 devnull fmtstrcpy(f, obuf);
1387 3e0d8fb3 2005-12-27 devnull return 0;
1390 3e0d8fb3 2005-12-27 devnull ilen = f->prec;
1391 3e0d8fb3 2005-12-27 devnull f->prec = 0;
1392 3e0d8fb3 2005-12-27 devnull f->flags &= ~FmtPrec;
1393 3e0d8fb3 2005-12-27 devnull switch(f->r){
1394 3e0d8fb3 2005-12-27 devnull case '<':
1395 3e0d8fb3 2005-12-27 devnull len = (8*ilen+4)/5 + 3;
1397 3e0d8fb3 2005-12-27 devnull case '[':
1398 3e0d8fb3 2005-12-27 devnull len = (8*ilen+5)/6 + 4;
1400 3e0d8fb3 2005-12-27 devnull case 'H':
1401 3e0d8fb3 2005-12-27 devnull len = 2*ilen + 1;
1403 3e0d8fb3 2005-12-27 devnull default:
1404 3e0d8fb3 2005-12-27 devnull goto error;
1407 3e0d8fb3 2005-12-27 devnull if(len > sizeof(obuf)){
1408 3e0d8fb3 2005-12-27 devnull buf = malloc(len);
1409 3e0d8fb3 2005-12-27 devnull if(buf == nil)
1410 3e0d8fb3 2005-12-27 devnull goto error;
1412 3e0d8fb3 2005-12-27 devnull buf = obuf;
1414 226d80b8 2006-04-01 devnull /* convert */
1415 3e0d8fb3 2005-12-27 devnull out = buf;
1416 3e0d8fb3 2005-12-27 devnull switch(f->r){
1417 3e0d8fb3 2005-12-27 devnull case '<':
1418 3e0d8fb3 2005-12-27 devnull rv = enc32(out, len, b, ilen);
1420 3e0d8fb3 2005-12-27 devnull case '[':
1421 3e0d8fb3 2005-12-27 devnull rv = enc64(out, len, b, ilen);
1423 3e0d8fb3 2005-12-27 devnull case 'H':
1424 3e0d8fb3 2005-12-27 devnull rv = enc16(out, len, b, ilen);
1426 3e0d8fb3 2005-12-27 devnull default:
1427 3e0d8fb3 2005-12-27 devnull rv = -1;
1430 3e0d8fb3 2005-12-27 devnull if(rv < 0)
1431 3e0d8fb3 2005-12-27 devnull goto error;
1433 3e0d8fb3 2005-12-27 devnull fmtstrcpy(f, buf);
1434 3e0d8fb3 2005-12-27 devnull if(buf != obuf)
1435 3e0d8fb3 2005-12-27 devnull free(buf);
1436 3e0d8fb3 2005-12-27 devnull return 0;
1439 3e0d8fb3 2005-12-27 devnull return fmtstrcpy(f, "<encodefmt>");
1444 3e0d8fb3 2005-12-27 devnull emalloc(int size)
1446 3e0d8fb3 2005-12-27 devnull char *x;
1448 3e0d8fb3 2005-12-27 devnull x = mallocz(size, 1);
1449 3e0d8fb3 2005-12-27 devnull if(x == nil)
1450 3e0d8fb3 2005-12-27 devnull abort();
1451 3e0d8fb3 2005-12-27 devnull setmalloctag(x, getcallerpc(&size));
1452 3e0d8fb3 2005-12-27 devnull return x;
1456 3e0d8fb3 2005-12-27 devnull estrdup(char *s)
1458 3e0d8fb3 2005-12-27 devnull int size;
1459 3e0d8fb3 2005-12-27 devnull char *p;
1461 3e0d8fb3 2005-12-27 devnull size = strlen(s)+1;
1462 3e0d8fb3 2005-12-27 devnull p = mallocz(size, 0);
1463 3e0d8fb3 2005-12-27 devnull if(p == nil)
1464 3e0d8fb3 2005-12-27 devnull abort();
1465 3e0d8fb3 2005-12-27 devnull memmove(p, s, size);
1466 3e0d8fb3 2005-12-27 devnull setmalloctag(p, getcallerpc(&s));
1467 3e0d8fb3 2005-12-27 devnull return p;
1471 3e0d8fb3 2005-12-27 devnull * create a pointer record
1473 3e0d8fb3 2005-12-27 devnull static RR*
1474 3e0d8fb3 2005-12-27 devnull mkptr(DN *dp, char *ptr, ulong ttl)
1476 3e0d8fb3 2005-12-27 devnull DN *ipdp;
1477 3e0d8fb3 2005-12-27 devnull RR *rp;
1479 3e0d8fb3 2005-12-27 devnull ipdp = dnlookup(ptr, Cin, 1);
1481 3e0d8fb3 2005-12-27 devnull rp = rralloc(Tptr);
1482 3e0d8fb3 2005-12-27 devnull rp->ptr = dp;
1483 3e0d8fb3 2005-12-27 devnull rp->owner = ipdp;
1484 3e0d8fb3 2005-12-27 devnull rp->db = 1;
1485 3e0d8fb3 2005-12-27 devnull if(ttl)
1486 3e0d8fb3 2005-12-27 devnull rp->ttl = ttl;
1487 3e0d8fb3 2005-12-27 devnull return rp;
1491 3e0d8fb3 2005-12-27 devnull * look for all ip addresses in this network and make
1492 3e0d8fb3 2005-12-27 devnull * pointer records for them.
1495 3e0d8fb3 2005-12-27 devnull dnptr(uchar *net, uchar *mask, char *dom, int bytes, int ttl)
1497 3e0d8fb3 2005-12-27 devnull int i, j;
1498 3e0d8fb3 2005-12-27 devnull DN *dp;
1499 3e0d8fb3 2005-12-27 devnull RR *rp, *nrp, *first, **l;
1500 3e0d8fb3 2005-12-27 devnull uchar ip[IPaddrlen];
1501 3e0d8fb3 2005-12-27 devnull uchar nnet[IPaddrlen];
1502 3e0d8fb3 2005-12-27 devnull char ptr[Domlen];
1503 3e0d8fb3 2005-12-27 devnull char *p, *e;
1505 3e0d8fb3 2005-12-27 devnull l = &first;
1506 3e0d8fb3 2005-12-27 devnull first = nil;
1507 3e0d8fb3 2005-12-27 devnull for(i = 0; i < HTLEN; i++){
1508 3e0d8fb3 2005-12-27 devnull for(dp = ht[i]; dp; dp = dp->next){
1509 3e0d8fb3 2005-12-27 devnull for(rp = dp->rr; rp; rp = rp->next){
1510 3e0d8fb3 2005-12-27 devnull if(rp->type != Ta || rp->negative)
1511 3e0d8fb3 2005-12-27 devnull continue;
1512 3e0d8fb3 2005-12-27 devnull parseip(ip, rp->ip->name);
1513 3e0d8fb3 2005-12-27 devnull maskip(ip, mask, nnet);
1514 3e0d8fb3 2005-12-27 devnull if(ipcmp(net, nnet) != 0)
1515 3e0d8fb3 2005-12-27 devnull continue;
1516 3e0d8fb3 2005-12-27 devnull p = ptr;
1517 3e0d8fb3 2005-12-27 devnull e = ptr+sizeof(ptr);
1518 3e0d8fb3 2005-12-27 devnull for(j = IPaddrlen-1; j >= IPaddrlen-bytes; j--)
1519 3e0d8fb3 2005-12-27 devnull p = seprint(p, e, "%d.", ip[j]);
1520 3e0d8fb3 2005-12-27 devnull seprint(p, e, "%s", dom);
1521 3e0d8fb3 2005-12-27 devnull nrp = mkptr(dp, ptr, ttl);
1522 3e0d8fb3 2005-12-27 devnull *l = nrp;
1523 3e0d8fb3 2005-12-27 devnull l = &nrp->next;
1528 3e0d8fb3 2005-12-27 devnull for(rp = first; rp != nil; rp = nrp){
1529 3e0d8fb3 2005-12-27 devnull nrp = rp->next;
1530 3e0d8fb3 2005-12-27 devnull rp->next = nil;
1531 3e0d8fb3 2005-12-27 devnull rrattach(rp, 1);
1536 3e0d8fb3 2005-12-27 devnull freeserverlist(Server *s)
1538 3e0d8fb3 2005-12-27 devnull Server *next;
1540 3e0d8fb3 2005-12-27 devnull for(; s != nil; s = next){
1541 3e0d8fb3 2005-12-27 devnull next = s->next;
1542 3e0d8fb3 2005-12-27 devnull free(s);
1547 3e0d8fb3 2005-12-27 devnull addserver(Server **l, char *name)
1549 3e0d8fb3 2005-12-27 devnull Server *s;
1551 3e0d8fb3 2005-12-27 devnull while(*l)
1552 3e0d8fb3 2005-12-27 devnull l = &(*l)->next;
1553 3e0d8fb3 2005-12-27 devnull s = malloc(sizeof(Server)+strlen(name)+1);
1554 3e0d8fb3 2005-12-27 devnull if(s == nil)
1555 3e0d8fb3 2005-12-27 devnull return;
1556 3e0d8fb3 2005-12-27 devnull s->name = (char*)(s+1);
1557 3e0d8fb3 2005-12-27 devnull strcpy(s->name, name);
1558 3e0d8fb3 2005-12-27 devnull s->next = nil;
1559 3e0d8fb3 2005-12-27 devnull *l = s;
1562 3e0d8fb3 2005-12-27 devnull Server*
1563 3e0d8fb3 2005-12-27 devnull copyserverlist(Server *s)
1565 3e0d8fb3 2005-12-27 devnull Server *ns;
1568 3e0d8fb3 2005-12-27 devnull for(ns = nil; s != nil; s = s->next)
1569 3e0d8fb3 2005-12-27 devnull addserver(&ns, s->name);
1570 3e0d8fb3 2005-12-27 devnull return ns;