]> git.meshlink.io Git - catta/blob - avahi-core/server.c
* abstract MTU stuff for packet generation
[catta] / avahi-core / server.c
1 /* $Id$ */
2
3 /***
4   This file is part of avahi.
5  
6   avahi is free software; you can redistribute it and/or modify it
7   under the terms of the GNU Lesser General Public License as
8   published by the Free Software Foundation; either version 2.1 of the
9   License, or (at your option) any later version.
10  
11   avahi is distributed in the hope that it will be useful, but WITHOUT
12   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13   or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
14   Public License for more details.
15  
16   You should have received a copy of the GNU Lesser General Public
17   License along with avahi; if not, write to the Free Software
18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
19   USA.
20 ***/
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include <sys/socket.h>
27 #include <arpa/inet.h>
28 #include <string.h>
29 #include <sys/utsname.h>
30 #include <unistd.h>
31
32 #include "server.h"
33 #include "util.h"
34 #include "iface.h"
35 #include "socket.h"
36 #include "subscribe.h"
37
38 static void free_entry(AvahiServer*s, AvahiEntry *e) {
39     AvahiEntry *t;
40
41     g_assert(s);
42     g_assert(e);
43
44     avahi_goodbye_entry(s, e, TRUE);
45
46     /* Remove from linked list */
47     AVAHI_LLIST_REMOVE(AvahiEntry, entries, s->entries, e);
48
49     /* Remove from hash table indexed by name */
50     t = g_hash_table_lookup(s->entries_by_key, e->record->key);
51     AVAHI_LLIST_REMOVE(AvahiEntry, by_key, t, e);
52     if (t)
53         g_hash_table_replace(s->entries_by_key, t->record->key, t);
54     else
55         g_hash_table_remove(s->entries_by_key, e->record->key);
56
57     /* Remove from associated group */
58     if (e->group)
59         AVAHI_LLIST_REMOVE(AvahiEntry, by_group, e->group->entries, e);
60
61     avahi_record_unref(e->record);
62     g_free(e);
63 }
64
65 static void free_group(AvahiServer *s, AvahiEntryGroup *g) {
66     g_assert(s);
67     g_assert(g);
68
69     while (g->entries)
70         free_entry(s, g->entries);
71
72     AVAHI_LLIST_REMOVE(AvahiEntryGroup, groups, s->groups, g);
73     g_free(g);
74 }
75
76 static void cleanup_dead(AvahiServer *s) {
77     AvahiEntryGroup *g, *ng;
78     AvahiEntry *e, *ne;
79     g_assert(s);
80
81
82     if (s->need_group_cleanup) {
83         for (g = s->groups; g; g = ng) {
84             ng = g->groups_next;
85             
86             if (g->dead)
87                 free_group(s, g);
88         }
89
90         s->need_group_cleanup = FALSE;
91     }
92
93     if (s->need_entry_cleanup) {
94         for (e = s->entries; e; e = ne) {
95             ne = e->entries_next;
96             
97             if (e->dead)
98                 free_entry(s, e);
99         }
100
101         s->need_entry_cleanup = FALSE;
102     }
103 }
104
105 static void send_unicast_response_packet(AvahiServer *s, AvahiInterface *i, const AvahiAddress *a, guint16 port) {
106     g_assert(s);
107     g_assert(a);
108     g_assert(port > 0);
109     g_assert(s->unicast_packet);
110
111     if (avahi_dns_packet_get_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT) != 0)
112         avahi_interface_send_packet_unicast(i, s->unicast_packet, a, port);
113
114     avahi_dns_packet_free(s->unicast_packet);
115     s->unicast_packet = NULL;
116 }
117
118 static void post_response(AvahiServer *s, AvahiDnsPacket *p, AvahiInterface *i, const AvahiAddress *a, guint16 port, AvahiRecord *r, gboolean flush_cache, gboolean legacy_unicast, gboolean unicast_response) {
119     g_assert(s);
120     g_assert(a);
121     g_assert(port > 0);
122     g_assert(r);
123
124     if (legacy_unicast) {
125
126         /* Respond with a legacy unicast packet */
127         
128         if (!(s->unicast_packet))
129             s->unicast_packet = avahi_dns_packet_new_reply(p, 512 /* unicast DNS maximum packet size is 512 */ , TRUE, TRUE);
130
131         if (avahi_dns_packet_append_record(s->unicast_packet, r, FALSE, 10))
132
133             /* Increment the ANCOUNT field */
134             
135             avahi_dns_packet_set_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT,
136                                        avahi_dns_packet_get_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT)+1);
137
138         /* If there's no space left for this response we simply don't send it */
139         
140     } else {
141
142         if (!avahi_interface_post_response(i, a, r, flush_cache, FALSE) && unicast_response) {
143             
144             /* Due to some reasons the record has not been scheduled.
145              * The client requested an unicast response in that
146              * case. Therefore we prepare such a response */
147
148             for (;;) {
149                 
150                 if (!(s->unicast_packet))
151                     s->unicast_packet = avahi_dns_packet_new_reply(p, i->hardware->mtu, FALSE, FALSE);
152                 
153                 if (avahi_dns_packet_append_record(s->unicast_packet, r, flush_cache, 0)) {
154
155                     /* Appending this record succeeded, so incremeant
156                      * the specific header field, and return to the caller */
157                     
158                     avahi_dns_packet_set_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT,
159                                                avahi_dns_packet_get_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT)+1);
160
161                     break;
162                 }
163
164                 if (avahi_dns_packet_get_field(s->unicast_packet, AVAHI_DNS_FIELD_ANCOUNT) == 0) {
165                     g_warning("Record too large, doesn't fit in any packet!");
166                     return;
167                 }
168
169                 /* Appending the record didn't succeeed, so let's send this packet, and create a new one */
170
171                 send_unicast_response_packet(s, i, a, port);
172                 
173                 avahi_dns_packet_free(s->unicast_packet);
174                 s->unicast_packet = NULL;
175             }
176             
177         }
178     }
179 }
180
181 static void handle_query_key(AvahiServer *s, AvahiDnsPacket *p, AvahiKey *k, AvahiInterface *i, const AvahiAddress *a, guint16 port, gboolean legacy_unicast, gboolean unicast_response) {
182     AvahiEntry *e;
183     gchar *txt;
184     
185     g_assert(s);
186     g_assert(k);
187     g_assert(i);
188     g_assert(a);
189
190     g_message("Handling query: %s", txt = avahi_key_to_string(k));
191     g_free(txt);
192
193     avahi_packet_scheduler_incoming_query(i->scheduler, k);
194
195     if (k->type == AVAHI_DNS_TYPE_ANY) {
196
197         /* Handle ANY query */
198         
199         for (e = s->entries; e; e = e->entries_next)
200             if (!e->dead && avahi_key_pattern_match(k, e->record->key) && avahi_entry_registered(s, e, i))
201                 post_response(s, p, i, a, port, e->record, e->flags & AVAHI_ENTRY_UNIQUE, legacy_unicast, unicast_response);
202
203     } else {
204
205         /* Handle all other queries */
206         
207         for (e = g_hash_table_lookup(s->entries_by_key, k); e; e = e->by_key_next)
208             if (!e->dead && avahi_entry_registered(s, e, i))
209                 post_response(s, p, i, a, port, e->record, e->flags & AVAHI_ENTRY_UNIQUE, legacy_unicast, unicast_response);
210     }
211 }
212
213 static void withdraw_entry(AvahiServer *s, AvahiEntry *e) {
214     g_assert(s);
215     g_assert(e);
216
217     
218     if (e->group) {
219         AvahiEntry *k;
220         
221         for (k = e->group->entries; k; k = k->by_group_next) {
222             avahi_goodbye_entry(s, k, FALSE);
223             k->dead = TRUE;
224         }
225         
226         avahi_entry_group_change_state(e->group, AVAHI_ENTRY_GROUP_COLLISION);
227     } else {
228         avahi_goodbye_entry(s, e, FALSE);
229         e->dead = TRUE;
230     }
231
232     s->need_entry_cleanup = TRUE;
233 }
234
235 static void incoming_probe(AvahiServer *s, AvahiRecord *record, AvahiInterface *i) {
236     AvahiEntry *e, *n;
237     gchar *t;
238     
239     g_assert(s);
240     g_assert(record);
241     g_assert(i);
242
243     t = avahi_record_to_string(record);
244
245 /*     g_message("PROBE: [%s]", t); */
246     
247     for (e = g_hash_table_lookup(s->entries_by_key, record->key); e; e = n) {
248         n = e->by_key_next;
249
250         if (e->dead || avahi_record_equal_no_ttl(record, e->record))
251             continue;
252
253         if (avahi_entry_registering(s, e, i)) {
254             gint cmp;
255
256             if ((cmp = avahi_record_lexicographical_compare(record, e->record)) > 0) {
257                 withdraw_entry(s, e);
258                 g_message("Recieved conflicting probe [%s]. Local host lost. Withdrawing.", t);
259             } else if (cmp < 0)
260                 g_message("Recieved conflicting probe [%s]. Local host won.", t);
261
262         }
263     }
264
265     g_free(t);
266 }
267
268 static void handle_query(AvahiServer *s, AvahiDnsPacket *p, AvahiInterface *i, const AvahiAddress *a, guint16 port, gboolean legacy_unicast) {
269     guint n;
270     
271     g_assert(s);
272     g_assert(p);
273     g_assert(i);
274     g_assert(a);
275
276     g_assert(!s->unicast_packet);
277
278     /* Handle the questions */
279     for (n = avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_QDCOUNT); n > 0; n --) {
280         AvahiKey *key;
281         gboolean unicast_response = FALSE;
282
283         if (!(key = avahi_dns_packet_consume_key(p, &unicast_response))) {
284             g_warning("Packet too short (1)");
285             return;
286         }
287
288         handle_query_key(s, p, key, i, a, port, legacy_unicast, unicast_response);
289         avahi_key_unref(key);
290     }
291
292     /* Known Answer Suppression */
293     for (n = avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ANCOUNT); n > 0; n --) {
294         AvahiRecord *record;
295         gboolean unique = FALSE;
296
297         if (!(record = avahi_dns_packet_consume_record(p, &unique))) {
298             g_warning("Packet too short (2)");
299             return;
300         }
301
302         avahi_packet_scheduler_incoming_known_answer(i->scheduler, record, a);
303         avahi_record_unref(record);
304     }
305
306     /* Probe record */
307     for (n = avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_NSCOUNT); n > 0; n --) {
308         AvahiRecord *record;
309         gboolean unique = FALSE;
310
311         if (!(record = avahi_dns_packet_consume_record(p, &unique))) {
312             g_warning("Packet too short (3)");
313             return;
314         }
315
316         if (record->key->type != AVAHI_DNS_TYPE_ANY)
317             incoming_probe(s, record, i);
318         
319         avahi_record_unref(record);
320     }
321
322     if (s->unicast_packet)
323         send_unicast_response_packet(s, i, a, port);
324 }
325
326 static gboolean handle_conflict(AvahiServer *s, AvahiInterface *i, AvahiRecord *record, gboolean unique, const AvahiAddress *a) {
327     gboolean valid = TRUE;
328     AvahiEntry *e, *n;
329     gchar *t;
330     
331     g_assert(s);
332     g_assert(i);
333     g_assert(record);
334
335     t = avahi_record_to_string(record);
336
337 /*     g_message("CHECKING FOR CONFLICT: [%s]", t); */
338
339     for (e = g_hash_table_lookup(s->entries_by_key, record->key); e; e = n) {
340         n = e->by_key_next;
341
342         if (e->dead)
343             continue;
344         
345         if (avahi_entry_registered(s, e, i)) {
346
347             gboolean equal = avahi_record_equal_no_ttl(record, e->record);
348                 
349             /* Check whether there is a unique record conflict */
350             if (!equal && ((e->flags & AVAHI_ENTRY_UNIQUE) || unique)) {
351                 gint cmp;
352                 
353                 /* The lexicographically later data wins. */
354                 if ((cmp = avahi_record_lexicographical_compare(record, e->record)) > 0) {
355                     g_message("Recieved conflicting record [%s]. Local host lost. Withdrawing.", t);
356                     withdraw_entry(s, e);
357                 } else if (cmp < 0) {
358                     /* Tell the other host that our entry is lexicographically later */
359
360                     g_message("Recieved conflicting record [%s]. Local host won. Refreshing.", t);
361
362                     valid = FALSE;
363                     avahi_interface_post_response(i, a, e->record, e->flags & AVAHI_ENTRY_UNIQUE, TRUE);
364                 }
365                 
366                 /* Check wheter there is a TTL conflict */
367             } else if (equal && record->ttl <= e->record->ttl/2) {
368                 /* Correct the TTL */
369                 valid = FALSE;
370                 avahi_interface_post_response(i, a, e->record, e->flags & AVAHI_ENTRY_UNIQUE, TRUE);
371                 g_message("Recieved record with bad TTL [%s]. Refreshing.", t);
372             }
373             
374         } else if (avahi_entry_registering(s, e, i)) {
375
376             if (!avahi_record_equal_no_ttl(record, e->record) && ((e->flags & AVAHI_ENTRY_UNIQUE) || unique)) {
377
378                 /* We are currently registering a matching record, but
379                  * someone else already claimed it, so let's
380                  * withdraw */
381                 
382                 g_message("Recieved conflicting record [%s] with local record to be. Withdrawing.", t);
383                 withdraw_entry(s, e);
384             }
385         }
386     }
387
388     g_free(t);
389
390     return valid;
391 }
392
393 static void handle_response(AvahiServer *s, AvahiDnsPacket *p, AvahiInterface *i, const AvahiAddress *a) {
394     guint n;
395     
396     g_assert(s);
397     g_assert(p);
398     g_assert(i);
399     g_assert(a);
400     
401     for (n = avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ANCOUNT) +
402              avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ARCOUNT); n > 0; n--) {
403         AvahiRecord *record;
404         gboolean cache_flush = FALSE;
405         gchar *txt;
406         
407         if (!(record = avahi_dns_packet_consume_record(p, &cache_flush))) {
408             g_warning("Packet too short (4)");
409             return;
410         }
411
412         if (record->key->type != AVAHI_DNS_TYPE_ANY) {
413
414             g_message("Handling response: %s", txt = avahi_record_to_string(record));
415             g_free(txt);
416             
417             if (handle_conflict(s, i, record, cache_flush, a)) {
418                 avahi_cache_update(i->cache, record, cache_flush, a);
419                 avahi_packet_scheduler_incoming_response(i->scheduler, record);
420             }
421         }
422             
423         avahi_record_unref(record);
424     }
425 }
426
427 static void dispatch_packet(AvahiServer *s, AvahiDnsPacket *p, struct sockaddr *sa, gint iface, gint ttl) {
428     AvahiInterface *i;
429     AvahiAddress a;
430     guint16 port;
431     
432     g_assert(s);
433     g_assert(p);
434     g_assert(sa);
435     g_assert(iface > 0);
436
437     if (!(i = avahi_interface_monitor_get_interface(s->monitor, iface, sa->sa_family))) {
438         g_warning("Recieved packet from invalid interface.");
439         return;
440     }
441
442     g_message("new packet recieved on interface '%s.%i'.", i->hardware->name, i->protocol);
443
444     if (sa->sa_family == AF_INET6) {
445         static const guint8 ipv4_in_ipv6[] = {
446             0x00, 0x00, 0x00, 0x00,
447             0x00, 0x00, 0x00, 0x00,
448             0xFF, 0xFF, 0xFF, 0xFF };
449
450         /* This is an IPv4 address encapsulated in IPv6, so let's ignore it. */
451
452         if (memcmp(((struct sockaddr_in6*) sa)->sin6_addr.s6_addr, ipv4_in_ipv6, sizeof(ipv4_in_ipv6)) == 0)
453             return;
454     }
455
456     if (avahi_dns_packet_check_valid(p) < 0) {
457         g_warning("Recieved invalid packet.");
458         return;
459     }
460
461     port = avahi_port_from_sockaddr(sa);
462     avahi_address_from_sockaddr(sa, &a);
463
464     if (avahi_dns_packet_is_query(p)) {
465         gboolean legacy_unicast = FALSE;
466
467         if (avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_QDCOUNT) == 0 ||
468             avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ARCOUNT) != 0) {
469             g_warning("Invalid query packet.");
470             return;
471         }
472
473         if (port != AVAHI_MDNS_PORT) {
474             /* Legacy Unicast */
475
476             if ((avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ANCOUNT) != 0 ||
477                  avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_NSCOUNT) != 0)) {
478                 g_warning("Invalid legacy unicast query packet.");
479                 return;
480             }
481         
482             legacy_unicast = TRUE;
483         }
484
485         handle_query(s, p, i, &a, port, legacy_unicast);
486         
487         g_message("Handled query");
488     } else {
489
490         if (port != AVAHI_MDNS_PORT) {
491             g_warning("Recieved repsonse with invalid source port %u on interface '%s.%i'", port, i->hardware->name, i->protocol);
492             return;
493         }
494
495         if (ttl != 255) {
496             g_warning("Recieved response with invalid TTL %u on interface '%s.%i'.", ttl, i->hardware->name, i->protocol);
497             if (!s->ignore_bad_ttl)
498                 return;
499         }
500
501         if (avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_QDCOUNT) != 0 ||
502             avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_ANCOUNT) == 0 ||
503             avahi_dns_packet_get_field(p, AVAHI_DNS_FIELD_NSCOUNT) != 0) {
504             g_warning("Invalid response packet.");
505             return;
506         }
507
508         handle_response(s, p, i, &a);
509         g_message("Handled response");
510     }
511 }
512
513 static void work(AvahiServer *s) {
514     struct sockaddr_in6 sa6;
515     struct sockaddr_in sa;
516     AvahiDnsPacket *p;
517     gint iface = -1;
518     guint8 ttl;
519         
520     g_assert(s);
521
522     if (s->pollfd_ipv4.revents & G_IO_IN) {
523         if ((p = avahi_recv_dns_packet_ipv4(s->fd_ipv4, &sa, &iface, &ttl))) {
524             dispatch_packet(s, p, (struct sockaddr*) &sa, iface, ttl);
525             avahi_dns_packet_free(p);
526         }
527     }
528
529     if (s->pollfd_ipv6.revents & G_IO_IN) {
530         if ((p = avahi_recv_dns_packet_ipv6(s->fd_ipv6, &sa6, &iface, &ttl))) {
531             dispatch_packet(s, p, (struct sockaddr*) &sa6, iface, ttl);
532             avahi_dns_packet_free(p);
533         }
534     }
535 }
536
537 static gboolean prepare_func(GSource *source, gint *timeout) {
538     g_assert(source);
539     g_assert(timeout);
540     
541     *timeout = -1;
542     return FALSE;
543 }
544
545 static gboolean check_func(GSource *source) {
546     AvahiServer* s;
547     g_assert(source);
548
549     s = *((AvahiServer**) (((guint8*) source) + sizeof(GSource)));
550     g_assert(s);
551     
552     return (s->pollfd_ipv4.revents | s->pollfd_ipv6.revents) & (G_IO_IN | G_IO_HUP | G_IO_ERR);
553 }
554
555 static gboolean dispatch_func(GSource *source, GSourceFunc callback, gpointer user_data) {
556     AvahiServer* s;
557     g_assert(source);
558
559     s = *((AvahiServer**) (((guint8*) source) + sizeof(GSource)));
560     g_assert(s);
561
562     work(s);
563     cleanup_dead(s);
564
565     return TRUE;
566 }
567
568 static void add_default_entries(AvahiServer *s) {
569     struct utsname utsname;
570     AvahiAddress a;
571     AvahiRecord *r;
572     
573     g_assert(s);
574     
575     /* Fill in HINFO rr */
576     r = avahi_record_new_full(s->hostname, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_HINFO);
577     uname(&utsname);
578     r->data.hinfo.cpu = g_strdup(g_strup(utsname.machine));
579     r->data.hinfo.os = g_strdup(g_strup(utsname.sysname));
580     avahi_server_add(s, NULL, 0, AF_UNSPEC, AVAHI_ENTRY_UNIQUE, r);
581     avahi_record_unref(r);
582
583     /* Add localhost entries */
584     avahi_address_parse("127.0.0.1", AF_INET, &a);
585     avahi_server_add_address(s, NULL, 0, AF_UNSPEC, AVAHI_ENTRY_UNIQUE|AVAHI_ENTRY_NOPROBE|AVAHI_ENTRY_NOANNOUNCE, "localhost", &a);
586
587     avahi_address_parse("::1", AF_INET6, &a);
588     avahi_server_add_address(s, NULL, 0, AF_UNSPEC, AVAHI_ENTRY_UNIQUE|AVAHI_ENTRY_NOPROBE|AVAHI_ENTRY_NOANNOUNCE, "ip6-localhost", &a);
589 }
590
591 AvahiServer *avahi_server_new(GMainContext *c) {
592     gchar *hn;
593     AvahiServer *s;
594     
595     static GSourceFuncs source_funcs = {
596         prepare_func,
597         check_func,
598         dispatch_func,
599         NULL,
600         NULL,
601         NULL
602     };
603
604     s = g_new(AvahiServer, 1);
605
606     s->ignore_bad_ttl = FALSE;
607     s->need_entry_cleanup = s->need_group_cleanup = FALSE;
608     
609     s->fd_ipv4 = avahi_open_socket_ipv4();
610     s->fd_ipv6 = avahi_open_socket_ipv6();
611     
612     if (s->fd_ipv6 < 0 && s->fd_ipv4 < 0) {
613         g_critical("Failed to create IP sockets.\n");
614         g_free(s);
615         return NULL;
616     }
617
618     if (s->fd_ipv4 < 0)
619         g_message("Failed to create IPv4 socket, proceeding in IPv6 only mode");
620     else if (s->fd_ipv6 < 0)
621         g_message("Failed to create IPv6 socket, proceeding in IPv4 only mode");
622     
623     if (c)
624         g_main_context_ref(s->context = c);
625     else
626         s->context = g_main_context_default();
627     
628     AVAHI_LLIST_HEAD_INIT(AvahiEntry, s->entries);
629     s->entries_by_key = g_hash_table_new((GHashFunc) avahi_key_hash, (GEqualFunc) avahi_key_equal);
630     AVAHI_LLIST_HEAD_INIT(AvahiGroup, s->groups);
631
632     AVAHI_LLIST_HEAD_INIT(AvahiSubscription, s->subscriptions);
633     s->subscription_hashtable = g_hash_table_new((GHashFunc) avahi_key_hash, (GEqualFunc) avahi_key_equal);
634
635     /* Get host name */
636     hn = avahi_get_host_name();
637     hn[strcspn(hn, ".")] = 0;
638
639     s->hostname = g_strdup_printf("%s.local.", hn);
640     g_free(hn);
641
642     s->unicast_packet = NULL;
643
644     s->time_event_queue = avahi_time_event_queue_new(s->context, G_PRIORITY_DEFAULT+10); /* Slightly less priority than the FDs */
645     s->monitor = avahi_interface_monitor_new(s);
646     avahi_interface_monitor_sync(s->monitor);
647     add_default_entries(s);
648     
649     /* Prepare IO source registration */
650     s->source = g_source_new(&source_funcs, sizeof(GSource) + sizeof(AvahiServer*));
651     *((AvahiServer**) (((guint8*) s->source) + sizeof(GSource))) = s;
652
653     memset(&s->pollfd_ipv4, 0, sizeof(s->pollfd_ipv4));
654     s->pollfd_ipv4.fd = s->fd_ipv4;
655     s->pollfd_ipv4.events = G_IO_IN|G_IO_ERR|G_IO_HUP;
656     g_source_add_poll(s->source, &s->pollfd_ipv4);
657     
658     memset(&s->pollfd_ipv6, 0, sizeof(s->pollfd_ipv6));
659     s->pollfd_ipv6.fd = s->fd_ipv6;
660     s->pollfd_ipv6.events = G_IO_IN|G_IO_ERR|G_IO_HUP;
661     g_source_add_poll(s->source, &s->pollfd_ipv6);
662
663     g_source_attach(s->source, s->context);
664
665     return s;
666 }
667
668 void avahi_server_free(AvahiServer* s) {
669     g_assert(s);
670
671     while(s->entries)
672         free_entry(s, s->entries);
673
674     avahi_interface_monitor_free(s->monitor);
675
676     while (s->groups)
677         free_group(s, s->groups);
678
679     while (s->subscriptions)
680         avahi_subscription_free(s->subscriptions);
681     g_hash_table_destroy(s->subscription_hashtable);
682
683     g_hash_table_destroy(s->entries_by_key);
684
685     avahi_time_event_queue_free(s->time_event_queue);
686
687     if (s->fd_ipv4 >= 0)
688         close(s->fd_ipv4);
689     if (s->fd_ipv6 >= 0)
690         close(s->fd_ipv6);
691     
692     g_free(s->hostname);
693
694     g_source_destroy(s->source);
695     g_source_unref(s->source);
696     g_main_context_unref(s->context);
697
698     if (s->unicast_packet)
699         avahi_dns_packet_free(s->unicast_packet);
700
701     g_free(s);
702 }
703
704 void avahi_server_add(
705     AvahiServer *s,
706     AvahiEntryGroup *g,
707     gint interface,
708     guchar protocol,
709     AvahiEntryFlags flags,
710     AvahiRecord *r) {
711     
712     AvahiEntry *e, *t;
713     g_assert(s);
714     g_assert(r);
715
716     g_assert(r->key->type != AVAHI_DNS_TYPE_ANY);
717
718     e = g_new(AvahiEntry, 1);
719     e->server = s;
720     e->record = avahi_record_ref(r);
721     e->group = g;
722     e->interface = interface;
723     e->protocol = protocol;
724     e->flags = flags;
725     e->dead = FALSE;
726
727     AVAHI_LLIST_HEAD_INIT(AvahiAnnouncement, e->announcements);
728
729     AVAHI_LLIST_PREPEND(AvahiEntry, entries, s->entries, e);
730
731     /* Insert into hash table indexed by name */
732     t = g_hash_table_lookup(s->entries_by_key, e->record->key);
733     AVAHI_LLIST_PREPEND(AvahiEntry, by_key, t, e);
734     g_hash_table_replace(s->entries_by_key, e->record->key, t);
735
736     /* Insert into group list */
737     if (g)
738         AVAHI_LLIST_PREPEND(AvahiEntry, by_group, g->entries, e); 
739
740     avahi_announce_entry(s, e);
741 }
742 const AvahiRecord *avahi_server_iterate(AvahiServer *s, AvahiEntryGroup *g, void **state) {
743     AvahiEntry **e = (AvahiEntry**) state;
744     g_assert(s);
745     g_assert(e);
746
747     if (!*e)
748         *e = g ? g->entries : s->entries;
749     
750     while (*e && (*e)->dead)
751         *e = g ? (*e)->by_group_next : (*e)->entries_next;
752         
753     if (!*e)
754         return NULL;
755
756     return avahi_record_ref((*e)->record);
757 }
758
759 void avahi_server_dump(AvahiServer *s, FILE *f) {
760     AvahiEntry *e;
761     g_assert(s);
762     g_assert(f);
763
764     fprintf(f, "\n;;; ZONE DUMP FOLLOWS ;;;\n");
765
766     for (e = s->entries; e; e = e->entries_next) {
767         gchar *t;
768
769         if (e->dead)
770             continue;
771         
772         t = avahi_record_to_string(e->record);
773         fprintf(f, "%s ; iface=%i proto=%i\n", t, e->interface, e->protocol);
774         g_free(t);
775     }
776
777     avahi_dump_caches(s->monitor, f);
778 }
779
780 void avahi_server_add_ptr(
781     AvahiServer *s,
782     AvahiEntryGroup *g,
783     gint interface,
784     guchar protocol,
785     AvahiEntryFlags flags,
786     const gchar *name,
787     const gchar *dest) {
788
789     AvahiRecord *r;
790
791     g_assert(dest);
792
793     r = avahi_record_new_full(name ? name : s->hostname, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_PTR);
794     r->data.ptr.name = avahi_normalize_name(dest);
795     avahi_server_add(s, g, interface, protocol, flags, r);
796     avahi_record_unref(r);
797 }
798
799 void avahi_server_add_address(
800     AvahiServer *s,
801     AvahiEntryGroup *g,
802     gint interface,
803     guchar protocol,
804     AvahiEntryFlags flags,
805     const gchar *name,
806     AvahiAddress *a) {
807
808     gchar *n = NULL;
809     g_assert(s);
810     g_assert(a);
811
812     name = name ? (n = avahi_normalize_name(name)) : s->hostname;
813     
814     if (a->family == AF_INET) {
815         gchar *reverse;
816         AvahiRecord  *r;
817
818         r = avahi_record_new_full(name, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_A);
819         r->data.a.address = a->data.ipv4;
820         avahi_server_add(s, g, interface, protocol, flags, r);
821         avahi_record_unref(r);
822         
823         reverse = avahi_reverse_lookup_name_ipv4(&a->data.ipv4);
824         g_assert(reverse);
825         avahi_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
826         g_free(reverse);
827         
828     } else {
829         gchar *reverse;
830         AvahiRecord *r;
831             
832         r = avahi_record_new_full(name, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_AAAA);
833         r->data.aaaa.address = a->data.ipv6;
834         avahi_server_add(s, g, interface, protocol, flags, r);
835         avahi_record_unref(r);
836
837         reverse = avahi_reverse_lookup_name_ipv6_arpa(&a->data.ipv6);
838         g_assert(reverse);
839         avahi_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
840         g_free(reverse);
841     
842         reverse = avahi_reverse_lookup_name_ipv6_int(&a->data.ipv6);
843         g_assert(reverse);
844         avahi_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
845         g_free(reverse);
846     }
847     
848     g_free(n);
849 }
850
851 void avahi_server_add_text_strlst(
852     AvahiServer *s,
853     AvahiEntryGroup *g,
854     gint interface,
855     guchar protocol,
856     AvahiEntryFlags flags,
857     const gchar *name,
858     AvahiStringList *strlst) {
859
860     AvahiRecord *r;
861     
862     g_assert(s);
863     
864     r = avahi_record_new_full(name ? name : s->hostname, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_TXT);
865     r->data.txt.string_list = strlst;
866     avahi_server_add(s, g, interface, protocol, flags, r);
867     avahi_record_unref(r);
868 }
869
870 void avahi_server_add_text_va(
871     AvahiServer *s,
872     AvahiEntryGroup *g,
873     gint interface,
874     guchar protocol,
875     AvahiEntryFlags flags,
876     const gchar *name,
877     va_list va) {
878     
879     g_assert(s);
880
881     avahi_server_add_text_strlst(s, g, interface, protocol, flags, name, avahi_string_list_new_va(va));
882 }
883
884 void avahi_server_add_text(
885     AvahiServer *s,
886     AvahiEntryGroup *g,
887     gint interface,
888     guchar protocol,
889     AvahiEntryFlags flags,
890     const gchar *name,
891     ...) {
892
893     va_list va;
894     
895     g_assert(s);
896
897     va_start(va, name);
898     avahi_server_add_text_va(s, g, interface, protocol, flags, name, va);
899     va_end(va);
900 }
901
902 static void escape_service_name(gchar *d, guint size, const gchar *s) {
903     g_assert(d);
904     g_assert(size);
905     g_assert(s);
906
907     while (*s && size >= 2) {
908         if (*s == '.' || *s == '\\') {
909             if (size < 3)
910                 break;
911
912             *(d++) = '\\';
913             size--;
914         }
915             
916         *(d++) = *(s++);
917         size--;
918     }
919
920     g_assert(size > 0);
921     *(d++) = 0;
922 }
923
924 void avahi_server_add_service_strlst(
925     AvahiServer *s,
926     AvahiEntryGroup *g,
927     gint interface,
928     guchar protocol,
929     const gchar *type,
930     const gchar *name,
931     const gchar *domain,
932     const gchar *host,
933     guint16 port,
934     AvahiStringList *strlst) {
935
936     gchar ptr_name[256], svc_name[256], ename[64], enum_ptr[256];
937     AvahiRecord *r;
938     
939     g_assert(s);
940     g_assert(type);
941     g_assert(name);
942
943     escape_service_name(ename, sizeof(ename), name);
944
945     if (domain) {
946         while (domain[0] == '.')
947             domain++;
948     } else
949         domain = "local";
950
951     if (!host)
952         host = s->hostname;
953
954     snprintf(ptr_name, sizeof(ptr_name), "%s.%s", type, domain);
955     snprintf(svc_name, sizeof(svc_name), "%s.%s.%s", ename, type, domain);
956     
957     avahi_server_add_ptr(s, g, interface, protocol, AVAHI_ENTRY_NULL, ptr_name, svc_name);
958
959     r = avahi_record_new_full(svc_name, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_SRV);
960     r->data.srv.priority = 0;
961     r->data.srv.weight = 0;
962     r->data.srv.port = port;
963     r->data.srv.name = avahi_normalize_name(host);
964     avahi_server_add(s, g, interface, protocol, AVAHI_ENTRY_UNIQUE, r);
965     avahi_record_unref(r);
966
967     avahi_server_add_text_strlst(s, g, interface, protocol, AVAHI_ENTRY_UNIQUE, svc_name, strlst);
968
969     snprintf(enum_ptr, sizeof(enum_ptr), "_services._dns-sd._udp.%s", domain);
970     avahi_server_add_ptr(s, g, interface, protocol, AVAHI_ENTRY_NULL, enum_ptr, ptr_name);
971 }
972
973 void avahi_server_add_service_va(
974     AvahiServer *s,
975     AvahiEntryGroup *g,
976     gint interface,
977     guchar protocol,
978     const gchar *type,
979     const gchar *name,
980     const gchar *domain,
981     const gchar *host,
982     guint16 port,
983     va_list va){
984
985     g_assert(s);
986     g_assert(type);
987     g_assert(name);
988
989     avahi_server_add_service(s, g, interface, protocol, type, name, domain, host, port, avahi_string_list_new_va(va));
990 }
991
992 void avahi_server_add_service(
993     AvahiServer *s,
994     AvahiEntryGroup *g,
995     gint interface,
996     guchar protocol,
997     const gchar *type,
998     const gchar *name,
999     const gchar *domain,
1000     const gchar *host,
1001     guint16 port,
1002     ... ){
1003
1004     va_list va;
1005     
1006     g_assert(s);
1007     g_assert(type);
1008     g_assert(name);
1009
1010     va_start(va, port);
1011     avahi_server_add_service_va(s, g, interface, protocol, type, name, domain, host, port, va);
1012     va_end(va);
1013 }
1014
1015 static void post_query_callback(AvahiInterfaceMonitor *m, AvahiInterface *i, gpointer userdata) {
1016     AvahiKey *k = userdata;
1017
1018     g_assert(m);
1019     g_assert(i);
1020     g_assert(k);
1021
1022     avahi_interface_post_query(i, k, FALSE);
1023 }
1024
1025 void avahi_server_post_query(AvahiServer *s, gint interface, guchar protocol, AvahiKey *key) {
1026     g_assert(s);
1027     g_assert(key);
1028
1029     avahi_interface_monitor_walk(s->monitor, interface, protocol, post_query_callback, key);
1030 }
1031
1032 struct tmpdata {
1033     AvahiRecord *record;
1034     gboolean flush_cache;
1035 };
1036
1037 static void post_response_callback(AvahiInterfaceMonitor *m, AvahiInterface *i, gpointer userdata) {
1038     struct tmpdata *tmpdata = userdata;
1039
1040     g_assert(m);
1041     g_assert(i);
1042     g_assert(tmpdata);
1043
1044     avahi_interface_post_response(i, NULL, tmpdata->record, tmpdata->flush_cache, FALSE);
1045 }
1046
1047 void avahi_server_post_response(AvahiServer *s, gint interface, guchar protocol, AvahiRecord *record, gboolean flush_cache) {
1048     struct tmpdata tmpdata;
1049     
1050     g_assert(s);
1051     g_assert(record);
1052
1053     tmpdata.record = record;
1054     tmpdata.flush_cache = flush_cache;
1055
1056     avahi_interface_monitor_walk(s->monitor, interface, protocol, post_response_callback, &tmpdata);
1057 }
1058
1059 void avahi_entry_group_change_state(AvahiEntryGroup *g, AvahiEntryGroupState state) {
1060     g_assert(g);
1061
1062     g->state = state;
1063     
1064     if (g->callback) {
1065         g->callback(g->server, g, state, g->userdata);
1066         return;
1067     }
1068 }
1069
1070 AvahiEntryGroup *avahi_entry_group_new(AvahiServer *s, AvahiEntryGroupCallback callback, gpointer userdata) {
1071     AvahiEntryGroup *g;
1072     
1073     g_assert(s);
1074
1075     g = g_new(AvahiEntryGroup, 1);
1076     g->server = s;
1077     g->callback = callback;
1078     g->userdata = userdata;
1079     g->dead = FALSE;
1080     g->state = AVAHI_ENTRY_GROUP_UNCOMMITED;
1081     g->n_probing = 0;
1082     AVAHI_LLIST_HEAD_INIT(AvahiEntry, g->entries);
1083
1084     AVAHI_LLIST_PREPEND(AvahiEntryGroup, groups, s->groups, g);
1085     return g;
1086 }
1087
1088 void avahi_entry_group_free(AvahiEntryGroup *g) {
1089     g_assert(g);
1090     g_assert(g->server);
1091
1092     g->dead = TRUE;
1093     g->server->need_group_cleanup = TRUE;
1094 }
1095
1096 void avahi_entry_group_commit(AvahiEntryGroup *g) {
1097     g_assert(g);
1098     g_assert(!g->dead);
1099
1100     if (g->state != AVAHI_ENTRY_GROUP_UNCOMMITED)
1101         return;
1102
1103     avahi_entry_group_change_state(g, AVAHI_ENTRY_GROUP_REGISTERING);
1104     avahi_announce_group(g->server, g);
1105     avahi_entry_group_check_probed(g, FALSE);
1106 }
1107
1108 gboolean avahi_entry_commited(AvahiEntry *e) {
1109     g_assert(e);
1110     g_assert(!e->dead);
1111
1112     return !e->group ||
1113         e->group->state == AVAHI_ENTRY_GROUP_REGISTERING ||
1114         e->group->state == AVAHI_ENTRY_GROUP_ESTABLISHED;
1115 }
1116
1117 AvahiEntryGroupState avahi_entry_group_get_state(AvahiEntryGroup *g) {
1118     g_assert(g);
1119     g_assert(!g->dead);
1120
1121     return g->state;
1122 }