git.meshlink.io Git - catta/blob - server.c

   1 #include <sys/socket.h>
   2 #include <arpa/inet.h>
   3 #include <string.h>
   4 #include <sys/utsname.h>
   5 #include <unistd.h>
   6
   7 #include "server.h"
   8 #include "util.h"
   9 #include "iface.h"
  10 #include "socket.h"
  11 #include "subscribe.h"
  12
  13 static void free_entry(flxServer*s, flxEntry *e) {
  14     flxEntry *t;
  15
  16     g_assert(s);
  17     g_assert(e);
  18
  19     flx_goodbye_entry(s, e, TRUE);
  20
  21     /* Remove from linked list */
  22     FLX_LLIST_REMOVE(flxEntry, entries, s->entries, e);
  23
  24     /* Remove from hash table indexed by name */
  25     t = g_hash_table_lookup(s->entries_by_key, e->record->key);
  26     FLX_LLIST_REMOVE(flxEntry, by_key, t, e);
  27     if (t)
  28         g_hash_table_replace(s->entries_by_key, t->record->key, t);
  29     else
  30         g_hash_table_remove(s->entries_by_key, e->record->key);
  31
  32     /* Remove from associated group */
  33     if (e->group)
  34         FLX_LLIST_REMOVE(flxEntry, by_group, e->group->entries, e);
  35
  36     flx_record_unref(e->record);
  37     g_free(e);
  38 }
  39
  40 static void free_group(flxServer *s, flxEntryGroup *g) {
  41     g_assert(s);
  42     g_assert(g);
  43
  44     while (g->entries)
  45         free_entry(s, g->entries);
  46
  47     FLX_LLIST_REMOVE(flxEntryGroup, groups, s->groups, g);
  48     g_free(g);
  49 }
  50
  51 static void cleanup_dead(flxServer *s) {
  52     flxEntryGroup *g, *ng;
  53     flxEntry *e, *ne;
  54     g_assert(s);
  55
  56
  57     if (s->need_group_cleanup) {
  58         for (g = s->groups; g; g = ng) {
  59             ng = g->groups_next;
  60
  61             if (g->dead)
  62                 free_group(s, g);
  63         }
  64
  65         s->need_group_cleanup = FALSE;
  66     }
  67
  68     if (s->need_entry_cleanup) {
  69         for (e = s->entries; e; e = ne) {
  70             ne = e->entries_next;
  71
  72             if (e->dead)
  73                 free_entry(s, e);
  74         }
  75
  76         s->need_entry_cleanup = FALSE;
  77     }
  78 }
  79
  80 static void handle_query_key(flxServer *s, flxKey *k, flxInterface *i, const flxAddress *a) {
  81     flxEntry *e;
  82     gchar *txt;
  83
  84     g_assert(s);
  85     g_assert(k);
  86     g_assert(i);
  87     g_assert(a);
  88
  89     g_message("Handling query: %s", txt = flx_key_to_string(k));
  90     g_free(txt);
  91
  92     flx_packet_scheduler_incoming_query(i->scheduler, k);
  93
  94     if (k->type == FLX_DNS_TYPE_ANY) {
  95
  96         /* Handle ANY query */
  97
  98         for (e = s->entries; e; e = e->entries_next)
  99             if (!e->dead && flx_key_pattern_match(k, e->record->key) && flx_entry_registered(s, e, i))
 100                 flx_interface_post_response(i, a, e->record, e->flags & FLX_ENTRY_UNIQUE, FALSE);
 101     } else {
 102
 103         /* Handle all other queries */
 104
 105         for (e = g_hash_table_lookup(s->entries_by_key, k); e; e = e->by_key_next)
 106             if (!e->dead && flx_entry_registered(s, e, i))
 107                 flx_interface_post_response(i, a, e->record, e->flags & FLX_ENTRY_UNIQUE, FALSE);
 108     }
 109 }
 110
 111 static void withdraw_entry(flxServer *s, flxEntry *e) {
 112     g_assert(s);
 113     g_assert(e);
 114
 115     e->dead = TRUE;
 116     s->need_entry_cleanup = TRUE;
 117
 118     flx_goodbye_entry(s, e, FALSE);
 119
 120     if (e->group)
 121         flx_entry_group_run_callback(e->group, FLX_ENTRY_GROUP_COLLISION);
 122 }
 123
 124 static void incoming_probe(flxServer *s, flxRecord *record, flxInterface *i) {
 125     flxEntry *e, *n;
 126     gchar *t;
 127
 128     g_assert(s);
 129     g_assert(record);
 130     g_assert(i);
 131
 132     t = flx_record_to_string(record);
 133
 134     for (e = g_hash_table_lookup(s->entries_by_key, record->key); e; e = n) {
 135         n = e->by_key_next;
 136
 137         if (e->dead || !flx_record_equal_no_ttl(record, e->record))
 138             continue;
 139
 140         if (flx_entry_registering(s, e, i)) {
 141
 142             if (flx_record_lexicographical_compare(record, e->record) > 0) {
 143                 withdraw_entry(s, e);
 144                 g_message("Recieved conflicting probe [%s]. Local host lost. Withdrawing.", t);
 145             } else
 146                 g_message("Recieved conflicting probe [%s]. Local host won.", t);
 147         }
 148     }
 149
 150     g_free(t);
 151 }
 152
 153 static void handle_query(flxServer *s, flxDnsPacket *p, flxInterface *i, const flxAddress *a) {
 154     guint n;
 155
 156     g_assert(s);
 157     g_assert(p);
 158     g_assert(i);
 159     g_assert(a);
 160
 161     /* Handle the questions */
 162     for (n = flx_dns_packet_get_field(p, FLX_DNS_FIELD_QDCOUNT); n > 0; n --) {
 163         flxKey *key;
 164
 165         if (!(key = flx_dns_packet_consume_key(p))) {
 166             g_warning("Packet too short (1)");
 167             return;
 168         }
 169
 170         handle_query_key(s, key, i, a);
 171         flx_key_unref(key);
 172     }
 173
 174     /* Known Answer Suppresion */
 175     for (n = flx_dns_packet_get_field(p, FLX_DNS_FIELD_ANCOUNT); n > 0; n --) {
 176         flxRecord *record;
 177         gboolean unique = FALSE;
 178
 179         if (!(record = flx_dns_packet_consume_record(p, &unique))) {
 180             g_warning("Packet too short (2)");
 181             return;
 182         }
 183
 184         flx_packet_scheduler_incoming_known_answer(i->scheduler, record, a);
 185         flx_record_unref(record);
 186     }
 187
 188     /* Probe record */
 189     for (n = flx_dns_packet_get_field(p, FLX_DNS_FIELD_NSCOUNT); n > 0; n --) {
 190         flxRecord *record;
 191         gboolean unique = FALSE;
 192
 193         if (!(record = flx_dns_packet_consume_record(p, &unique))) {
 194             g_warning("Packet too short (3)");
 195             return;
 196         }
 197
 198         if (record->key->type != FLX_DNS_TYPE_ANY)
 199             incoming_probe(s, record, i);
 200
 201         flx_record_unref(record);
 202     }
 203 }
 204
 205 static gboolean handle_conflict(flxServer *s, flxInterface *i, flxRecord *record, const flxAddress *a) {
 206     gboolean valid = TRUE;
 207     flxEntry *e, *n;
 208     gchar *t;
 209
 210     g_assert(s);
 211     g_assert(i);
 212     g_assert(record);
 213
 214     t = flx_record_to_string(record);
 215
 216     for (e = g_hash_table_lookup(s->entries_by_key, record->key); e; e = n) {
 217         n = e->by_key_next;
 218
 219         if (e->dead)
 220             continue;
 221
 222         if (flx_entry_registered(s, e, i)) {
 223
 224             gboolean equal = flx_record_equal_no_ttl(record, e->record);
 225
 226             /* Check whether there is a unique record conflict */
 227             if (!equal && (e->flags & FLX_ENTRY_UNIQUE)) {
 228
 229                 /* The lexicographically later data wins. */
 230                 if (flx_record_lexicographical_compare(record, e->record) > 0) {
 231                     withdraw_entry(s, e);
 232                     g_message("Recieved conflicting record [%s]. Local host lost. Withdrawing.", t);
 233                 } else {
 234                     /* Tell the other host that our entry is lexicographically later */
 235                     valid = FALSE;
 236                     flx_interface_post_response(i, a, e->record, e->flags & FLX_ENTRY_UNIQUE, TRUE);
 237                     g_message("Recieved conflicting record [%s]. Local host won. Refreshing.", t);
 238                 }
 239
 240                 /* Check wheter there is a TTL conflict */
 241             } else if (equal && record->ttl <= e->record->ttl/2) {
 242                 /* Correct the TTL */
 243                 valid = FALSE;
 244                 flx_interface_post_response(i, a, e->record, e->flags & FLX_ENTRY_UNIQUE, TRUE);
 245                 g_message("Recieved record with bad TTL [%s]. Refreshing.", t);
 246             }
 247         }
 248     }
 249
 250     g_free(t);
 251
 252     return valid;
 253 }
 254
 255 static void handle_response(flxServer *s, flxDnsPacket *p, flxInterface *i, const flxAddress *a) {
 256     guint n;
 257
 258     g_assert(s);
 259     g_assert(p);
 260     g_assert(i);
 261     g_assert(a);
 262
 263     for (n = flx_dns_packet_get_field(p, FLX_DNS_FIELD_ANCOUNT) +
 264              flx_dns_packet_get_field(p, FLX_DNS_FIELD_ARCOUNT); n > 0; n--) {
 265         flxRecord *record;
 266         gboolean cache_flush = FALSE;
 267         gchar *txt;
 268
 269         if (!(record = flx_dns_packet_consume_record(p, &cache_flush))) {
 270             g_warning("Packet too short (4)");
 271             return;
 272         }
 273
 274         if (record->key->type != FLX_DNS_TYPE_ANY) {
 275
 276             g_message("Handling response: %s", txt = flx_record_to_string(record));
 277             g_free(txt);
 278
 279             if (handle_conflict(s, i, record, a)) {
 280                 flx_cache_update(i->cache, record, cache_flush, a);
 281                 flx_packet_scheduler_incoming_response(i->scheduler, record);
 282             }
 283         }
 284
 285         flx_record_unref(record);
 286     }
 287 }
 288
 289 static void dispatch_packet(flxServer *s, flxDnsPacket *p, struct sockaddr *sa, gint iface, gint ttl) {
 290     flxInterface *i;
 291     flxAddress a;
 292
 293     g_assert(s);
 294     g_assert(p);
 295     g_assert(sa);
 296     g_assert(iface > 0);
 297
 298     g_message("new packet recieved.");
 299
 300     if (!(i = flx_interface_monitor_get_interface(s->monitor, iface, sa->sa_family))) {
 301         g_warning("Recieved packet from invalid interface.");
 302         return;
 303     }
 304
 305     if (ttl != 255) {
 306         g_warning("Recieved packet with invalid TTL on interface '%s.%i'.", i->hardware->name, i->protocol);
 307         if (!s->ignore_bad_ttl)
 308             return;
 309     }
 310
 311     if (sa->sa_family == AF_INET6) {
 312         static const unsigned char ipv4_in_ipv6[] = {
 313             0x00, 0x00, 0x00, 0x00,
 314             0x00, 0x00, 0x00, 0x00,
 315             0xFF, 0xFF, 0xFF, 0xFF };
 316
 317         if (memcmp(((struct sockaddr_in6*) sa)->sin6_addr.s6_addr, ipv4_in_ipv6, sizeof(ipv4_in_ipv6)) == 0) {
 318
 319             /* This is an IPv4 address encapsulated in IPv6, so let's ignore it. */
 320             return;
 321         }
 322     }
 323
 324     if (flx_dns_packet_check_valid(p) < 0) {
 325         g_warning("Recieved invalid packet.");
 326         return;
 327     }
 328
 329     flx_address_from_sockaddr(sa, &a);
 330
 331     if (flx_dns_packet_is_query(p)) {
 332
 333         if (flx_dns_packet_get_field(p, FLX_DNS_FIELD_QDCOUNT) == 0 ||
 334             flx_dns_packet_get_field(p, FLX_DNS_FIELD_ARCOUNT) != 0) {
 335             g_warning("Invalid query packet.");
 336             return;
 337         }
 338
 339         handle_query(s, p, i, &a);
 340         g_message("Handled query");
 341     } else {
 342         if (flx_dns_packet_get_field(p, FLX_DNS_FIELD_QDCOUNT) != 0 ||
 343             flx_dns_packet_get_field(p, FLX_DNS_FIELD_ANCOUNT) == 0 ||
 344             flx_dns_packet_get_field(p, FLX_DNS_FIELD_NSCOUNT) != 0) {
 345             g_warning("Invalid response packet.");
 346             return;
 347         }
 348
 349         handle_response(s, p, i, &a);
 350         g_message("Handled response");
 351     }
 352 }
 353
 354 static void work(flxServer *s) {
 355     struct sockaddr_in6 sa6;
 356     struct sockaddr_in sa;
 357     flxDnsPacket *p;
 358     gint iface = -1;
 359     guint8 ttl;
 360
 361     g_assert(s);
 362
 363     if (s->pollfd_ipv4.revents & G_IO_IN) {
 364         if ((p = flx_recv_dns_packet_ipv4(s->fd_ipv4, &sa, &iface, &ttl))) {
 365             dispatch_packet(s, p, (struct sockaddr*) &sa, iface, ttl);
 366             flx_dns_packet_free(p);
 367         }
 368     }
 369
 370     if (s->pollfd_ipv6.revents & G_IO_IN) {
 371         if ((p = flx_recv_dns_packet_ipv6(s->fd_ipv6, &sa6, &iface, &ttl))) {
 372             dispatch_packet(s, p, (struct sockaddr*) &sa6, iface, ttl);
 373             flx_dns_packet_free(p);
 374         }
 375     }
 376 }
 377
 378 static gboolean prepare_func(GSource *source, gint *timeout) {
 379     g_assert(source);
 380     g_assert(timeout);
 381
 382     *timeout = -1;
 383     return FALSE;
 384 }
 385
 386 static gboolean check_func(GSource *source) {
 387     flxServer* s;
 388     g_assert(source);
 389
 390     s = *((flxServer**) (((guint8*) source) + sizeof(GSource)));
 391     g_assert(s);
 392
 393     return (s->pollfd_ipv4.revents | s->pollfd_ipv6.revents) & (G_IO_IN | G_IO_HUP | G_IO_ERR);
 394 }
 395
 396 static gboolean dispatch_func(GSource *source, GSourceFunc callback, gpointer user_data) {
 397     flxServer* s;
 398     g_assert(source);
 399
 400     s = *((flxServer**) (((guint8*) source) + sizeof(GSource)));
 401     g_assert(s);
 402
 403     work(s);
 404     cleanup_dead(s);
 405
 406     return TRUE;
 407 }
 408
 409 static void add_default_entries(flxServer *s) {
 410     gint length = 0;
 411     struct utsname utsname;
 412     gchar *hinfo;
 413     flxAddress a;
 414     flxRecord *r;
 415
 416     g_assert(s);
 417
 418     /* Fill in HINFO rr */
 419     r = flx_record_new_full(s->hostname, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_HINFO);
 420     uname(&utsname);
 421     r->data.hinfo.cpu = g_strdup(g_strup(utsname.machine));
 422     r->data.hinfo.os = g_strdup(g_strup(utsname.sysname));
 423     flx_server_add(s, NULL, 0, AF_UNSPEC, FLX_ENTRY_UNIQUE | FLX_ENTRY_NOANNOUNCE | FLX_ENTRY_NOPROBE, r);
 424     flx_record_unref(r);
 425
 426     /* Add localhost entries */
 427     flx_address_parse("127.0.0.1", AF_INET, &a);
 428     flx_server_add_address(s, NULL, 0, AF_UNSPEC, FLX_ENTRY_UNIQUE|FLX_ENTRY_NOPROBE|FLX_ENTRY_NOANNOUNCE, "localhost", &a);
 429
 430     flx_address_parse("::1", AF_INET6, &a);
 431     flx_server_add_address(s, NULL, 0, AF_UNSPEC, FLX_ENTRY_UNIQUE|FLX_ENTRY_NOPROBE|FLX_ENTRY_NOANNOUNCE, "ip6-localhost", &a);
 432 }
 433
 434 flxServer *flx_server_new(GMainContext *c) {
 435     gchar *hn, *e;
 436     flxServer *s;
 437
 438     static GSourceFuncs source_funcs = {
 439         prepare_func,
 440         check_func,
 441         dispatch_func,
 442         NULL,
 443         NULL,
 444         NULL
 445     };
 446
 447     s = g_new(flxServer, 1);
 448
 449     s->ignore_bad_ttl = FALSE;
 450     s->need_entry_cleanup = s->need_group_cleanup = FALSE;
 451
 452     s->fd_ipv4 = flx_open_socket_ipv4();
 453     s->fd_ipv6 = -1 /*flx_open_socket_ipv6() */;
 454
 455     if (s->fd_ipv6 < 0 && s->fd_ipv4 < 0) {
 456         g_critical("Failed to create IP sockets.\n");
 457         g_free(s);
 458         return NULL;
 459     }
 460
 461     if (s->fd_ipv4 < 0)
 462         g_message("Failed to create IPv4 socket, proceeding in IPv6 only mode");
 463     else if (s->fd_ipv6 < 0)
 464         g_message("Failed to create IPv6 socket, proceeding in IPv4 only mode");
 465
 466     if (c)
 467         g_main_context_ref(s->context = c);
 468     else
 469         s->context = g_main_context_default();
 470
 471     FLX_LLIST_HEAD_INIT(flxEntry, s->entries);
 472     s->entries_by_key = g_hash_table_new((GHashFunc) flx_key_hash, (GEqualFunc) flx_key_equal);
 473     FLX_LLIST_HEAD_INIT(flxGroup, s->groups);
 474
 475     FLX_LLIST_HEAD_INIT(flxSubscription, s->subscriptions);
 476     s->subscription_hashtable = g_hash_table_new((GHashFunc) flx_key_hash, (GEqualFunc) flx_key_equal);
 477
 478     /* Get host name */
 479     hn = flx_get_host_name();
 480     hn[strcspn(hn, ".")] = 0;
 481
 482     s->hostname = g_strdup_printf("%s.local.", hn);
 483     g_free(hn);
 484
 485     s->time_event_queue = flx_time_event_queue_new(s->context, G_PRIORITY_DEFAULT+10); /* Slightly less priority than the FDs */
 486     s->monitor = flx_interface_monitor_new(s);
 487     flx_interface_monitor_sync(s->monitor);
 488     add_default_entries(s);
 489
 490     /* Prepare IO source registration */
 491     s->source = g_source_new(&source_funcs, sizeof(GSource) + sizeof(flxServer*));
 492     *((flxServer**) (((guint8*) s->source) + sizeof(GSource))) = s;
 493
 494     memset(&s->pollfd_ipv4, 0, sizeof(s->pollfd_ipv4));
 495     s->pollfd_ipv4.fd = s->fd_ipv4;
 496     s->pollfd_ipv4.events = G_IO_IN|G_IO_ERR|G_IO_HUP;
 497     g_source_add_poll(s->source, &s->pollfd_ipv4);
 498
 499     memset(&s->pollfd_ipv6, 0, sizeof(s->pollfd_ipv6));
 500     s->pollfd_ipv6.fd = s->fd_ipv6;
 501     s->pollfd_ipv6.events = G_IO_IN|G_IO_ERR|G_IO_HUP;
 502     g_source_add_poll(s->source, &s->pollfd_ipv6);
 503
 504     g_source_attach(s->source, s->context);
 505
 506     return s;
 507 }
 508
 509 void flx_server_free(flxServer* s) {
 510     g_assert(s);
 511
 512     while(s->entries)
 513         free_entry(s, s->entries);
 514
 515     flx_interface_monitor_free(s->monitor);
 516
 517     while (s->groups)
 518         free_group(s, s->groups);
 519
 520     while (s->subscriptions)
 521         flx_subscription_free(s->subscriptions);
 522     g_hash_table_destroy(s->subscription_hashtable);
 523
 524     g_hash_table_destroy(s->entries_by_key);
 525
 526     flx_time_event_queue_free(s->time_event_queue);
 527
 528     if (s->fd_ipv4 >= 0)
 529         close(s->fd_ipv4);
 530     if (s->fd_ipv6 >= 0)
 531         close(s->fd_ipv6);
 532
 533     g_free(s->hostname);
 534
 535     g_source_destroy(s->source);
 536     g_source_unref(s->source);
 537     g_main_context_unref(s->context);
 538
 539     g_free(s);
 540 }
 541
 542 void flx_server_add(
 543     flxServer *s,
 544     flxEntryGroup *g,
 545     gint interface,
 546     guchar protocol,
 547     flxEntryFlags flags,
 548     flxRecord *r) {
 549
 550     flxEntry *e, *t;
 551     g_assert(s);
 552     g_assert(r);
 553
 554     g_assert(r->key->type != FLX_DNS_TYPE_ANY);
 555
 556     e = g_new(flxEntry, 1);
 557     e->server = s;
 558     e->record = flx_record_ref(r);
 559     e->group = g;
 560     e->interface = interface;
 561     e->protocol = protocol;
 562     e->flags = flags;
 563     e->dead = FALSE;
 564
 565     FLX_LLIST_HEAD_INIT(flxAnnouncement, e->announcements);
 566
 567     FLX_LLIST_PREPEND(flxEntry, entries, s->entries, e);
 568
 569     /* Insert into hash table indexed by name */
 570     t = g_hash_table_lookup(s->entries_by_key, e->record->key);
 571     FLX_LLIST_PREPEND(flxEntry, by_key, t, e);
 572     g_hash_table_replace(s->entries_by_key, e->record->key, t);
 573
 574     /* Insert into group list */
 575     if (g)
 576         FLX_LLIST_PREPEND(flxEntry, by_group, g->entries, e);
 577
 578     flx_announce_entry(s, e);
 579 }
 580 const flxRecord *flx_server_iterate(flxServer *s, flxEntryGroup *g, void **state) {
 581     flxEntry **e = (flxEntry**) state;
 582     g_assert(s);
 583     g_assert(e);
 584
 585     if (!*e)
 586         *e = g ? g->entries : s->entries;
 587
 588     while (*e && (*e)->dead)
 589         *e = g ? (*e)->by_group_next : (*e)->entries_next;
 590
 591     if (!*e)
 592         return NULL;
 593
 594     return flx_record_ref((*e)->record);
 595 }
 596
 597 void flx_server_dump(flxServer *s, FILE *f) {
 598     flxEntry *e;
 599     g_assert(s);
 600     g_assert(f);
 601
 602     fprintf(f, "\n;;; ZONE DUMP FOLLOWS ;;;\n");
 603
 604     for (e = s->entries; e; e = e->entries_next) {
 605         gchar *t;
 606
 607         if (e->dead)
 608             continue;
 609
 610         t = flx_record_to_string(e->record);
 611         fprintf(f, "%s ; iface=%i proto=%i\n", t, e->interface, e->protocol);
 612         g_free(t);
 613     }
 614
 615     flx_dump_caches(s->monitor, f);
 616 }
 617
 618 void flx_server_add_ptr(
 619     flxServer *s,
 620     flxEntryGroup *g,
 621     gint interface,
 622     guchar protocol,
 623     flxEntryFlags flags,
 624     const gchar *name,
 625     const gchar *dest) {
 626
 627     flxRecord *r;
 628
 629     g_assert(dest);
 630
 631     r = flx_record_new_full(name ? name : s->hostname, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_PTR);
 632     r->data.ptr.name = flx_normalize_name(dest);
 633     flx_server_add(s, g, interface, protocol, flags, r);
 634     flx_record_unref(r);
 635 }
 636
 637 void flx_server_add_address(
 638     flxServer *s,
 639     flxEntryGroup *g,
 640     gint interface,
 641     guchar protocol,
 642     flxEntryFlags flags,
 643     const gchar *name,
 644     flxAddress *a) {
 645
 646     gchar *n = NULL;
 647     g_assert(s);
 648     g_assert(a);
 649
 650     name = name ? (n = flx_normalize_name(name)) : s->hostname;
 651
 652     if (a->family == AF_INET) {
 653         gchar *reverse;
 654         flxRecord  *r;
 655
 656         r = flx_record_new_full(name, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_A);
 657         r->data.a.address = a->data.ipv4;
 658         flx_server_add(s, g, interface, protocol, flags, r);
 659         flx_record_unref(r);
 660
 661         reverse = flx_reverse_lookup_name_ipv4(&a->data.ipv4);
 662         g_assert(reverse);
 663         flx_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
 664         g_free(reverse);
 665
 666     } else {
 667         gchar *reverse;
 668         flxRecord *r;
 669
 670         r = flx_record_new_full(name, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_AAAA);
 671         r->data.aaaa.address = a->data.ipv6;
 672         flx_server_add(s, g, interface, protocol, flags, r);
 673         flx_record_unref(r);
 674
 675         reverse = flx_reverse_lookup_name_ipv6_arpa(&a->data.ipv6);
 676         g_assert(reverse);
 677         flx_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
 678         g_free(reverse);
 679
 680         reverse = flx_reverse_lookup_name_ipv6_int(&a->data.ipv6);
 681         g_assert(reverse);
 682         flx_server_add_ptr(s, g, interface, protocol, flags, reverse, name);
 683         g_free(reverse);
 684     }
 685
 686     g_free(n);
 687 }
 688
 689 void flx_server_add_text_va(
 690     flxServer *s,
 691     flxEntryGroup *g,
 692     gint interface,
 693     guchar protocol,
 694     flxEntryFlags flags,
 695     const gchar *name,
 696     va_list va) {
 697
 698     flxRecord *r;
 699
 700     g_assert(s);
 701
 702     r = flx_record_new_full(name ? name : s->hostname, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_TXT);
 703     r->data.txt.string_list = flx_string_list_new_va(va);
 704     flx_server_add(s, g, interface, protocol, flags, r);
 705     flx_record_unref(r);
 706 }
 707
 708 void flx_server_add_text(
 709     flxServer *s,
 710     flxEntryGroup *g,
 711     gint interface,
 712     guchar protocol,
 713     flxEntryFlags flags,
 714     const gchar *name,
 715     ...) {
 716
 717     va_list va;
 718
 719     g_assert(s);
 720
 721     va_start(va, name);
 722     flx_server_add_text_va(s, g, interface, protocol, flags, name, va);
 723     va_end(va);
 724 }
 725
 726 static void escape_service_name(gchar *d, guint size, const gchar *s) {
 727     g_assert(d);
 728     g_assert(size);
 729     g_assert(s);
 730
 731     while (*s && size >= 2) {
 732         if (*s == '.' || *s == '\\') {
 733             if (size < 3)
 734                 break;
 735
 736             *(d++) = '\\';
 737             size--;
 738         }
 739
 740         *(d++) = *(s++);
 741         size--;
 742     }
 743
 744     g_assert(size > 0);
 745     *(d++) = 0;
 746 }
 747
 748
 749 void flx_server_add_service_va(
 750     flxServer *s,
 751     flxEntryGroup *g,
 752     gint interface,
 753     guchar protocol,
 754     const gchar *type,
 755     const gchar *name,
 756     const gchar *domain,
 757     const gchar *host,
 758     guint16 port,
 759     va_list va) {
 760
 761     gchar ptr_name[256], svc_name[256], ename[64], enum_ptr[256];
 762     flxRecord *r;
 763
 764     g_assert(s);
 765     g_assert(type);
 766     g_assert(name);
 767
 768     escape_service_name(ename, sizeof(ename), name);
 769
 770     if (domain) {
 771         while (domain[0] == '.')
 772             domain++;
 773     } else
 774         domain = "local";
 775
 776     if (!host)
 777         host = s->hostname;
 778
 779     snprintf(ptr_name, sizeof(ptr_name), "%s.%s", type, domain);
 780     snprintf(svc_name, sizeof(svc_name), "%s.%s.%s", ename, type, domain);
 781
 782     flx_server_add_ptr(s, g, interface, protocol, FALSE, ptr_name, svc_name);
 783
 784     r = flx_record_new_full(svc_name, FLX_DNS_CLASS_IN, FLX_DNS_TYPE_SRV);
 785     r->data.srv.priority = 0;
 786     r->data.srv.weight = 0;
 787     r->data.srv.port = port;
 788     r->data.srv.name = flx_normalize_name(host);
 789     flx_server_add(s, g, interface, protocol, TRUE, r);
 790     flx_record_unref(r);
 791
 792     flx_server_add_text_va(s, g, interface, protocol, FALSE, svc_name, va);
 793
 794     snprintf(enum_ptr, sizeof(enum_ptr), "_services._dns-sd._udp.%s", domain);
 795     flx_server_add_ptr(s, g, interface, protocol, FALSE, enum_ptr, ptr_name);
 796 }
 797
 798 void flx_server_add_service(
 799     flxServer *s,
 800     flxEntryGroup *g,
 801     gint interface,
 802     guchar protocol,
 803     const gchar *type,
 804     const gchar *name,
 805     const gchar *domain,
 806     const gchar *host,
 807     guint16 port,
 808     ... ){
 809
 810     va_list va;
 811
 812     g_assert(s);
 813     g_assert(type);
 814     g_assert(name);
 815
 816     va_start(va, port);
 817     flx_server_add_service_va(s, g, interface, protocol, type, name, domain, host, port, va);
 818     va_end(va);
 819 }
 820
 821 static void post_query_callback(flxInterfaceMonitor *m, flxInterface *i, gpointer userdata) {
 822     flxKey *k = userdata;
 823
 824     g_assert(m);
 825     g_assert(i);
 826     g_assert(k);
 827
 828     flx_interface_post_query(i, k, FALSE);
 829 }
 830
 831 void flx_server_post_query(flxServer *s, gint interface, guchar protocol, flxKey *key) {
 832     g_assert(s);
 833     g_assert(key);
 834
 835     flx_interface_monitor_walk(s->monitor, interface, protocol, post_query_callback, key);
 836 }
 837
 838 struct tmpdata {
 839     flxRecord *record;
 840     gboolean flush_cache;
 841 };
 842
 843 static void post_response_callback(flxInterfaceMonitor *m, flxInterface *i, gpointer userdata) {
 844     struct tmpdata *tmpdata = userdata;
 845
 846     g_assert(m);
 847     g_assert(i);
 848     g_assert(tmpdata);
 849
 850     flx_interface_post_response(i, NULL, tmpdata->record, tmpdata->flush_cache, FALSE);
 851 }
 852
 853 void flx_server_post_response(flxServer *s, gint interface, guchar protocol, flxRecord *record, gboolean flush_cache) {
 854     struct tmpdata tmpdata;
 855
 856     g_assert(s);
 857     g_assert(record);
 858
 859     tmpdata.record = record;
 860     tmpdata.flush_cache = flush_cache;
 861
 862     flx_interface_monitor_walk(s->monitor, interface, protocol, post_response_callback, &tmpdata);
 863 }
 864
 865 void flx_entry_group_run_callback(flxEntryGroup *g, flxEntryGroupStatus status) {
 866     g_assert(g);
 867
 868     if (g->callback) {
 869         g->callback(g->server, g, status, g->userdata);
 870         return;
 871     }
 872
 873     if (status == FLX_ENTRY_GROUP_COLLISION)
 874         flx_entry_group_free(g);
 875
 876     /* Ignore the rest */
 877 }
 878
 879 flxEntryGroup *flx_entry_group_new(flxServer *s, flxEntryGroupCallback callback, gpointer userdata) {
 880     flxEntryGroup *g;
 881
 882     g_assert(s);
 883
 884     g = g_new(flxEntryGroup, 1);
 885     g->server = s;
 886     g->callback = callback;
 887     g->userdata = userdata;
 888     g->dead = FALSE;
 889     g->status = FLX_ENTRY_GROUP_UNCOMMITED;
 890     g->n_probing = 0;
 891     FLX_LLIST_HEAD_INIT(flxEntry, g->entries);
 892
 893     FLX_LLIST_PREPEND(flxEntryGroup, groups, s->groups, g);
 894     return g;
 895 }
 896
 897 void flx_entry_group_free(flxEntryGroup *g) {
 898     g_assert(g);
 899     g_assert(g->server);
 900
 901     g->dead = TRUE;
 902     g->server->need_group_cleanup = TRUE;
 903 }
 904
 905 void flx_entry_group_commit(flxEntryGroup *g) {
 906     flxEntry *e;
 907
 908     g_assert(g);
 909     g_assert(!g->dead);
 910
 911     if (g->status != FLX_ENTRY_GROUP_UNCOMMITED)
 912         return;
 913
 914     flx_entry_group_run_callback(g, g->status = FLX_ENTRY_GROUP_REGISTERING);
 915     flx_announce_group(g->server, g);
 916     flx_entry_group_check_probed(g, FALSE);
 917 }
 918
 919 gboolean flx_entry_commited(flxEntry *e) {
 920     g_assert(e);
 921     g_assert(!e->dead);
 922
 923     return !e->group ||
 924         e->group->status == FLX_ENTRY_GROUP_REGISTERING ||
 925         e->group->status == FLX_ENTRY_GROUP_ESTABLISHED;
 926 }
 927
 928 flxEntryGroupStatus flx_entry_group_get_status(flxEntryGroup *g) {
 929     g_assert(g);
 930     g_assert(!g->dead);
 931
 932     return g->status;
 933 }