← Back to branch summary

~ubuntu-branches/ubuntu/maverick/telepathy-salut/maverick

« back to all changes in this revision

Viewing changes to lib/gibber/gibber-resolver.c

  • Committer: Bazaar Package Importer
  • Author(s): Laurent Bigonville
  • Date: 2008-09-17 19:03:47 UTC
  • mfrom: (7.1.8 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080917190347-fhkvbcpf8jp8wxkw
Tags: 0.3.3-2
* Use my debian.org address in Uploaders
* debian/patches/fix-activity-announce.patch:
  - Only announce OLPC activity we actually joined (dev.laptop.org #8441)

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/gibber/gibber-resolver.c
 
1
/*
 
2
 * gibber-resolver.c - Source for GibberResolver
 
3
 * Copyright (C) 2008 Collabora Ltd.
 
4
 * @author Sjoerd Simons <sjoerd.simons@collabora.co.uk>
 
5
 *
 
6
 * This library is free software; you can redistribute it and/or
 
7
 * modify it under the terms of the GNU Lesser General Public
 
8
 * License as published by the Free Software Foundation; either
 
9
 * version 2.1 of the License, or (at your option) any later version.
 
10
 *
 
11
 * This library is distributed in the hope that it will be useful,
 
12
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 
14
 * Lesser General Public License for more details.
 
15
 *
 
16
 * You should have received a copy of the GNU Lesser General Public
 
17
 * License along with this library; if not, write to the Free Software
 
18
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 
19
 */
 
20
 
 
21
#include <stdio.h>
 
22
#include <stdlib.h>
 
23
 
 
24
#include <string.h>
 
25
#include <netinet/in.h>
 
26
#include <arpa/nameser.h>
 
27
#include <resolv.h>
 
28
#include <sys/types.h>
 
29
#include <netdb.h>
 
30
 
 
31
#include <errno.h>
 
32
 
 
33
#include "config.h"
 
34
#include "gibber-resolver.h"
 
35
 
 
36
#ifdef HAVE_LIBASYNCNS
 
37
  #include "gibber-resolver-asyncns.h"
 
38
#endif
 
39
 
 
40
static GibberResolver *resolver_singleton = NULL;
 
41
static GType resolver_singleton_type = 0;
 
42
 
 
43
GibberResolver *
 
44
gibber_resolver_get_resolver (void)
 
45
{
 
46
 
 
47
  if (resolver_singleton_type == 0)
 
48
#ifdef HAVE_LIBASYNCNS
 
49
    resolver_singleton_type = GIBBER_TYPE_RESOLVER_ASYNCNS;
 
50
#else
 
51
    resolver_singleton_type = GIBBER_TYPE_RESOLVER;
 
52
#endif
 
53
 
 
54
  if (resolver_singleton == NULL)
 
55
    resolver_singleton = g_object_new (resolver_singleton_type, NULL);
 
56
 
 
57
  return resolver_singleton;
 
58
}
 
59
 
 
60
void
 
61
gibber_resolver_set_resolver (GType object_type)
 
62
{
 
63
  if (resolver_singleton_type != object_type && resolver_singleton != NULL)
 
64
    {
 
65
      g_object_unref (resolver_singleton);
 
66
      resolver_singleton = NULL;
 
67
    }
 
68
 
 
69
  resolver_singleton_type = object_type;
 
70
}
 
71
 
 
72
 
 
73
 
 
74
G_DEFINE_TYPE(GibberResolver, gibber_resolver, G_TYPE_OBJECT)
 
75
 
 
76
typedef struct {
 
77
  guint jobid;
 
78
  GibberResolver *resolver;
 
79
 
 
80
  /* Data the user would like us to remember */
 
81
  GCallback callback;
 
82
  GDestroyNotify destroy;
 
83
  gpointer user_data;
 
84
  GObject *weak_object;
 
85
 
 
86
  /* Field settable by implementations of GibberResolver */
 
87
  gpointer data;
 
88
} GibberResolverJob;
 
89
 
 
90
/* private structure */
 
91
typedef struct _GibberResolverPrivate GibberResolverPrivate;
 
92
 
 
93
struct _GibberResolverPrivate
 
94
{
 
95
  gboolean dispose_has_run;
 
96
  /* guint * -> GibberResolverJob struct */
 
97
  GHashTable *jobs;
 
98
};
 
99
 
 
100
static gboolean resolver_resolv_srv (GibberResolver *resolver, guint id,
 
101
  const gchar *service_name, const char *service,
 
102
  GibberResolverServiceType type);
 
103
 
 
104
static gboolean resolver_resolv_addrinfo (GibberResolver *resolver, guint id,
 
105
  const gchar *hostname, const char *port, int address_family, int sock_type,
 
106
  int protocol, int flags);
 
107
 
 
108
static gboolean resolver_resolv_nameinfo (GibberResolver *resolver, guint id,
 
109
  const struct sockaddr *sa, socklen_t salen, gint flags);
 
110
 
 
111
static void resolver_resolv_cancel (GibberResolver *resolver, guint id);
 
112
 
 
113
static void free_job (gpointer data);
 
114
 
 
115
#define GIBBER_RESOLVER_GET_PRIVATE(o)  \
 
116
    (G_TYPE_INSTANCE_GET_PRIVATE ((o), GIBBER_TYPE_RESOLVER, \
 
117
      GibberResolverPrivate))
 
118
 
 
119
GQuark
 
120
gibber_resolver_error_quark (void)
 
121
{
 
122
  static GQuark quark = 0;
 
123
 
 
124
  if (!quark)
 
125
    quark = g_quark_from_static_string ("gibber_resolver_error");
 
126
 
 
127
  return quark;
 
128
}
 
129
 
 
130
static void
 
131
gibber_resolver_init (GibberResolver *obj)
 
132
{
 
133
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (obj);
 
134
 
 
135
  /* allocate any data required by the object here */
 
136
  priv->jobs = g_hash_table_new_full (g_int_hash, g_int_equal,
 
137
      NULL, free_job);
 
138
}
 
139
 
 
140
static void gibber_resolver_dispose (GObject *object);
 
141
static void gibber_resolver_finalize (GObject *object);
 
142
 
 
143
static void
 
144
gibber_resolver_class_init (GibberResolverClass *gibber_resolver_class)
 
145
{
 
146
  GObjectClass *object_class = G_OBJECT_CLASS (gibber_resolver_class);
 
147
 
 
148
  g_type_class_add_private (gibber_resolver_class,
 
149
      sizeof (GibberResolverPrivate));
 
150
 
 
151
  object_class->dispose = gibber_resolver_dispose;
 
152
  object_class->finalize = gibber_resolver_finalize;
 
153
 
 
154
  gibber_resolver_class->resolv_srv = resolver_resolv_srv;
 
155
  gibber_resolver_class->resolv_addrinfo = resolver_resolv_addrinfo;
 
156
  gibber_resolver_class->resolv_nameinfo = resolver_resolv_nameinfo;
 
157
  gibber_resolver_class->resolv_cancel = resolver_resolv_cancel;
 
158
}
 
159
 
 
160
void
 
161
gibber_resolver_dispose (GObject *object)
 
162
{
 
163
  GibberResolver *self = GIBBER_RESOLVER (object);
 
164
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (self);
 
165
 
 
166
  if (priv->dispose_has_run)
 
167
    return;
 
168
 
 
169
  priv->dispose_has_run = TRUE;
 
170
 
 
171
  if (priv->jobs != NULL)
 
172
    g_hash_table_destroy (priv->jobs);
 
173
  priv->jobs = NULL;
 
174
 
 
175
  /* release any references held by the object here */
 
176
  if (G_OBJECT_CLASS (gibber_resolver_parent_class)->dispose)
 
177
    G_OBJECT_CLASS (gibber_resolver_parent_class)->dispose (object);
 
178
}
 
179
 
 
180
void
 
181
gibber_resolver_finalize (GObject *object)
 
182
{
 
183
 
 
184
  /* free any data held directly by the object here */
 
185
 
 
186
  G_OBJECT_CLASS (gibber_resolver_parent_class)->finalize (object);
 
187
}
 
188
 
 
189
static void
 
190
weak_object_destroyed (gpointer data, GObject *old_object)
 
191
{
 
192
  GibberResolverJob *job = (GibberResolverJob *) data;
 
193
 
 
194
  g_assert (job->weak_object == old_object);
 
195
 
 
196
  job->weak_object = NULL;
 
197
 
 
198
  gibber_resolver_cancel (job->resolver, job->jobid);
 
199
}
 
200
 
 
201
static guint
 
202
gibber_resolver_job_add (GibberResolver *resolver,
 
203
                         GCallback callback,
 
204
                         gpointer user_data,
 
205
                         GDestroyNotify destroy,
 
206
                         GObject *weak_object)
 
207
{
 
208
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
209
  GibberResolverJob *job;
 
210
 
 
211
  job = g_slice_new0 (GibberResolverJob);
 
212
  job->resolver = g_object_ref (resolver);
 
213
 
 
214
  job->callback = callback;
 
215
  job->destroy = destroy;
 
216
  job->user_data = user_data;
 
217
  job->weak_object = weak_object;
 
218
 
 
219
  /* Now decide on a decent job id.. The pointer is a pretty good initial
 
220
   * guess. A nicer solution would be to use an intset */
 
221
  job->jobid = GPOINTER_TO_UINT (job);
 
222
 
 
223
  /* Be carefull to skip 0 */
 
224
  while (job->jobid == 0 ||
 
225
      g_hash_table_lookup (priv->jobs, &(job->jobid)) != NULL)
 
226
    job->jobid++;
 
227
 
 
228
  g_hash_table_insert (priv->jobs, &(job->jobid), job);
 
229
 
 
230
  if (weak_object != NULL)
 
231
    {
 
232
      g_object_weak_ref (weak_object, weak_object_destroyed, job);
 
233
    }
 
234
 
 
235
  return job->jobid;
 
236
}
 
237
 
 
238
static void free_job (gpointer data)
 
239
{
 
240
  GibberResolverJob *job = (GibberResolverJob *)data;
 
241
 
 
242
  if (job->destroy)
 
243
    job->destroy (job->user_data);
 
244
 
 
245
  if (job->weak_object)
 
246
    g_object_weak_unref (job->weak_object, weak_object_destroyed, job);
 
247
 
 
248
  g_object_unref (job->resolver);
 
249
  g_slice_free (GibberResolverJob, job);
 
250
}
 
251
 
 
252
GibberResolverAddrInfo *
 
253
gibber_resolver_addrinfo_new (gint address_family,
 
254
                              gint socket_type,
 
255
                              gint protocol,
 
256
                              struct sockaddr *addr,
 
257
                              gsize sockaddr_len)
 
258
{
 
259
  GibberResolverAddrInfo *result;
 
260
 
 
261
  result = g_slice_new (GibberResolverAddrInfo);
 
262
 
 
263
  result->address_family = address_family;
 
264
  result->socket_type = socket_type;
 
265
  result->protocol = protocol;
 
266
  memcpy (&(result->sockaddr), addr, sockaddr_len);
 
267
  result->sockaddr_len = sockaddr_len;
 
268
 
 
269
  return result;
 
270
}
 
271
 
 
272
void
 
273
gibber_resolver_addrinfo_free (GibberResolverAddrInfo *addrinfo)
 
274
{
 
275
  g_slice_free (GibberResolverAddrInfo, addrinfo);
 
276
}
 
277
 
 
278
void
 
279
gibber_resolver_addrinfo_list_free (GList *addrinfo_list)
 
280
{
 
281
  GList *t;
 
282
  GibberResolverAddrInfo *a;
 
283
 
 
284
  for (t = addrinfo_list ; t != NULL; t = g_list_delete_link (t, t))
 
285
    {
 
286
      a = (GibberResolverAddrInfo *)t->data;
 
287
      gibber_resolver_addrinfo_free (a);
 
288
    }
 
289
}
 
290
 
 
291
GibberResolverSrvRecord *
 
292
gibber_resolver_srv_record_new (gchar *hostname,
 
293
                                guint16 port,
 
294
                                guint16 priority,
 
295
                                guint16 weight)
 
296
{
 
297
  GibberResolverSrvRecord *result;
 
298
 
 
299
  result = g_slice_new (GibberResolverSrvRecord);
 
300
  result->hostname = g_strdup (hostname);
 
301
  result->port = port;
 
302
  result->priority = priority;
 
303
  result->weight = weight;
 
304
 
 
305
  return result;
 
306
}
 
307
 
 
308
void
 
309
gibber_resolver_srv_free (GibberResolverSrvRecord *srvrecord)
 
310
{
 
311
   g_free (srvrecord->hostname);
 
312
   g_slice_free (GibberResolverSrvRecord, srvrecord);
 
313
}
 
314
 
 
315
void
 
316
gibber_resolver_srv_list_free (GList *srv_list)
 
317
{
 
318
  GList *t;
 
319
  GibberResolverSrvRecord *s;
 
320
 
 
321
  for (t = srv_list ; t != NULL; t = g_list_delete_link (t, t))
 
322
    {
 
323
      s = (GibberResolverSrvRecord *) t->data;
 
324
      gibber_resolver_srv_free (s);
 
325
    }
 
326
}
 
327
 
 
328
 
 
329
guint
 
330
gibber_resolver_srv (GibberResolver *resolver,
 
331
                     const gchar *service_name,
 
332
                     const char *service,
 
333
                     GibberResolverServiceType type,
 
334
                     gibber_resolver_srv_cb callback,
 
335
                     gpointer user_data,
 
336
                     GDestroyNotify destroy,
 
337
                     GObject *weak_object)
 
338
{
 
339
  GibberResolverClass *cls = GIBBER_RESOLVER_GET_CLASS (resolver);
 
340
  gboolean ret;
 
341
  guint jobid;
 
342
 
 
343
  jobid = gibber_resolver_job_add (resolver, G_CALLBACK (callback), user_data,
 
344
    destroy, weak_object);
 
345
 
 
346
  ret = cls->resolv_srv (resolver, jobid, service_name, service, type);
 
347
 
 
348
  return ret ? jobid : 0;
 
349
}
 
350
 
 
351
guint
 
352
gibber_resolver_addrinfo (GibberResolver *resolver,
 
353
                          const gchar *hostname,
 
354
                          const char *port,
 
355
                          int address_family,
 
356
                          int sock_type,
 
357
                          int protocol,
 
358
                          int flags,
 
359
                          gibber_resolver_addrinfo_cb callback,
 
360
                          gpointer user_data,
 
361
                          GDestroyNotify destroy,
 
362
                          GObject *weak_object)
 
363
{
 
364
  GibberResolverClass *cls = GIBBER_RESOLVER_GET_CLASS (resolver);
 
365
  gboolean ret;
 
366
  guint jobid;
 
367
 
 
368
  jobid = gibber_resolver_job_add (resolver, G_CALLBACK (callback),
 
369
    user_data, destroy, weak_object);
 
370
 
 
371
  ret = cls->resolv_addrinfo (resolver, jobid, hostname, port, address_family,
 
372
    sock_type, protocol, flags);
 
373
 
 
374
  return ret ? jobid : 0;
 
375
}
 
376
 
 
377
guint
 
378
gibber_resolver_nameinfo (GibberResolver *resolver,
 
379
                          const struct sockaddr *sa,
 
380
                          socklen_t salen,
 
381
                          gint flags,
 
382
                          gibber_resolver_nameinfo_cb callback,
 
383
                          gpointer user_data,
 
384
                          GDestroyNotify destroy,
 
385
                          GObject *weak_object)
 
386
{
 
387
  GibberResolverClass *cls = GIBBER_RESOLVER_GET_CLASS (resolver);
 
388
  gboolean ret;
 
389
  guint jobid;
 
390
 
 
391
  jobid = gibber_resolver_job_add (resolver, G_CALLBACK (callback), user_data,
 
392
    destroy, weak_object);
 
393
 
 
394
  ret = cls->resolv_nameinfo (resolver, jobid, sa, salen, flags);
 
395
 
 
396
  return ret ? jobid : 0;
 
397
}
 
398
 
 
399
void
 
400
gibber_resolver_cancel (GibberResolver *resolver, guint id)
 
401
{
 
402
  GibberResolverClass *cls = GIBBER_RESOLVER_GET_CLASS (resolver);
 
403
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
404
 
 
405
  if (g_hash_table_lookup (priv->jobs, &id) == NULL)
 
406
    {
 
407
      g_warning ("Trying to cancel a non-existing resolver jobs");
 
408
      return;
 
409
    }
 
410
 
 
411
  cls->resolv_cancel (resolver, id);
 
412
  g_hash_table_remove (priv->jobs, &id);
 
413
}
 
414
 
 
415
gboolean
 
416
gibber_resolver_sockaddr_to_str (const struct sockaddr *sa,
 
417
                                 gsize salen,
 
418
                                 gchar **address,
 
419
                                 gchar **service,
 
420
                                 GError **error)
 
421
{
 
422
  int ret;
 
423
  gchar name[NI_MAXHOST], servicename[NI_MAXSERV];
 
424
 
 
425
  ret = getnameinfo (sa, salen, name, NI_MAXHOST, servicename, NI_MAXSERV,
 
426
    NI_NUMERICHOST | NI_NUMERICSERV);
 
427
 
 
428
  if (ret != 0)
 
429
    {
 
430
      g_set_error (error, GIBBER_RESOLVER_ERROR, ret,
 
431
        "getnameinfo failed: %s", gai_strerror (ret));
 
432
      return FALSE;
 
433
    }
 
434
 
 
435
  if (address != NULL)
 
436
    *address = g_strdup (name);
 
437
 
 
438
  if (service != NULL)
 
439
    *service = g_strdup (servicename);
 
440
 
 
441
  return TRUE;
 
442
}
 
443
 
 
444
/* Utility function for classed implementing GibberResolver */
 
445
void
 
446
gibber_resolver_set_data (GibberResolver *resolver, guint id, gpointer data)
 
447
{
 
448
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
449
  GibberResolverJob *job;
 
450
 
 
451
  job = g_hash_table_lookup (priv->jobs, &id);
 
452
 
 
453
  g_assert (job != NULL);
 
454
 
 
455
  job->data = data;
 
456
}
 
457
 
 
458
gpointer
 
459
gibber_resolver_get_data (GibberResolver *resolver, guint id)
 
460
{
 
461
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
462
  GibberResolverJob *job;
 
463
 
 
464
  job = g_hash_table_lookup (priv->jobs, &id);
 
465
 
 
466
  g_assert (job != NULL);
 
467
 
 
468
  return job->data;
 
469
}
 
470
 
 
471
static gint
 
472
compare_srv_record (gconstpointer a, gconstpointer b)
 
473
{
 
474
  GibberResolverSrvRecord *asrv = (GibberResolverSrvRecord *) a;
 
475
  GibberResolverSrvRecord *bsrv = (GibberResolverSrvRecord *) b;
 
476
 
 
477
  if (asrv->priority != bsrv->priority)
 
478
    return asrv->priority < bsrv->priority ? -1 : 1;
 
479
 
 
480
  if (asrv->weight != 0 || bsrv->weight != 0)
 
481
    return asrv->weight == 0 ?  -1 : 1;
 
482
 
 
483
  return 0;
 
484
}
 
485
 
 
486
 
 
487
static GList *
 
488
weight_sort_srv_list_total (GList *srv_list, gint total)
 
489
{
 
490
  GList *l, *s;
 
491
  gint num;
 
492
  GibberResolverSrvRecord *srv;
 
493
 
 
494
  if (srv_list == NULL)
 
495
    return NULL;
 
496
 
 
497
  num = g_random_int_range (0, total + 1);
 
498
 
 
499
  for (l = srv_list ; l != NULL; l = g_list_next (l))
 
500
    {
 
501
      srv = (GibberResolverSrvRecord *) l->data;
 
502
      num -= srv->weight;
 
503
      if (num <= 0)
 
504
        break;
 
505
    }
 
506
 
 
507
  g_assert (l != NULL);
 
508
 
 
509
  s = g_list_remove_link (srv_list, l);
 
510
 
 
511
  return g_list_concat (l,
 
512
    weight_sort_srv_list_total (s, total - srv->weight));
 
513
}
 
514
 
 
515
static GList *
 
516
weight_sort_srv_list (GList *srv_list)
 
517
{
 
518
  GList *l;
 
519
  gint total = 0;
 
520
  GibberResolverSrvRecord *srv;
 
521
 
 
522
  /* Sort srv list of equal priority but with weight as specified in RFC2782 */
 
523
  srv = (GibberResolverSrvRecord *) srv_list->data;
 
524
 
 
525
  g_assert (srv_list != NULL);
 
526
 
 
527
  for (l = srv_list; l != NULL; l = g_list_next (l))
 
528
    {
 
529
      srv = (GibberResolverSrvRecord *) l->data;
 
530
      total += srv->weight;
 
531
    }
 
532
 
 
533
  return weight_sort_srv_list_total (srv_list, total);
 
534
}
 
535
 
 
536
static void
 
537
cut_list (GList *link)
 
538
{
 
539
  if (link->prev != NULL)
 
540
    link->prev->next = NULL;
 
541
  link->prev = NULL;
 
542
}
 
543
 
 
544
static GList *
 
545
sort_srv_list (GList *srv_list)
 
546
{
 
547
  GList *result = NULL;
 
548
  GList *start, *end;
 
549
  GList *sorted;
 
550
  guint16 priority = 0;
 
551
 
 
552
  sorted = g_list_sort (srv_list, compare_srv_record);
 
553
 
 
554
  while (sorted != NULL)
 
555
    {
 
556
      end = NULL;
 
557
 
 
558
      /* Find the start entry with a non-zero weight */
 
559
      for (start = sorted ; start != NULL &&
 
560
        ((GibberResolverSrvRecord *)start->data)->weight == 0;
 
561
        start = start->next)
 
562
        /* nothing */;
 
563
 
 
564
      if (start != sorted)
 
565
        result = g_list_concat (result, sorted);
 
566
 
 
567
      if (start != NULL)
 
568
        {
 
569
          cut_list (start);
 
570
          priority = ((GibberResolverSrvRecord *)start->data)->priority;
 
571
        }
 
572
 
 
573
      for (end = start ; end != NULL &&
 
574
        ((GibberResolverSrvRecord *)end->data)->priority == priority;
 
575
        end = end->next)
 
576
        /* nothing */;
 
577
 
 
578
      if (end != NULL)
 
579
        cut_list (end);
 
580
 
 
581
      sorted = end;
 
582
 
 
583
      if (start != NULL)
 
584
        {
 
585
        /* We know have a sublist of entries with the same priority but
 
586
         * different weights */
 
587
          start = weight_sort_srv_list (start);
 
588
          result = g_list_concat (result, start);
 
589
        }
 
590
    }
 
591
 
 
592
  return result;
 
593
}
 
594
 
 
595
void
 
596
gibber_resolver_srv_result (GibberResolver *resolver,
 
597
                            guint jobid,
 
598
  GList *srv_list, GError *error)
 
599
{
 
600
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
601
  GibberResolverJob *job;
 
602
  gibber_resolver_srv_cb callback;
 
603
 
 
604
  job = g_hash_table_lookup (priv->jobs, &jobid);
 
605
 
 
606
  g_assert (job != NULL);
 
607
 
 
608
  srv_list = sort_srv_list (srv_list);
 
609
 
 
610
  callback = (gibber_resolver_srv_cb) job->callback;
 
611
  callback (resolver, srv_list, error, job->user_data, job->weak_object);
 
612
 
 
613
  g_hash_table_remove (priv->jobs, &jobid);
 
614
}
 
615
 
 
616
void
 
617
gibber_resolver_addrinfo_result (GibberResolver *resolver,
 
618
                                 guint jobid,
 
619
                                 GList *entries,
 
620
                                 GError *error)
 
621
{
 
622
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
623
  GibberResolverJob *job;
 
624
  gibber_resolver_addrinfo_cb callback;
 
625
 
 
626
  job = g_hash_table_lookup (priv->jobs, &jobid);
 
627
 
 
628
  g_assert (job != NULL);
 
629
 
 
630
  callback = (gibber_resolver_addrinfo_cb)job->callback;
 
631
  callback (resolver, entries, error, job->user_data, job->weak_object);
 
632
 
 
633
  g_hash_table_remove (priv->jobs, &jobid);
 
634
}
 
635
 
 
636
void
 
637
gibber_resolver_nameinfo_result (GibberResolver *resolver,
 
638
                                 guint jobid,
 
639
                                 const gchar *hostname,
 
640
                                 const gchar *port,
 
641
                                 GError *error)
 
642
{
 
643
  GibberResolverPrivate *priv = GIBBER_RESOLVER_GET_PRIVATE (resolver);
 
644
  GibberResolverJob *job;
 
645
  gibber_resolver_nameinfo_cb callback;
 
646
 
 
647
  job = g_hash_table_lookup (priv->jobs, &jobid);
 
648
 
 
649
  g_assert (job != NULL);
 
650
 
 
651
  callback = (gibber_resolver_nameinfo_cb) job->callback;
 
652
  callback (resolver, hostname, port, error,
 
653
    job->user_data, job->weak_object);
 
654
 
 
655
  g_hash_table_remove (priv->jobs, &jobid);
 
656
}
 
657
 
 
658
 
 
659
#define ANSWER_BUFSIZE 10240
 
660
GList *
 
661
gibber_resolver_res_query_to_list (guchar *answer, int length)
 
662
{
 
663
  GList *list = NULL;
 
664
  int qdcount;
 
665
  int ancount;
 
666
  int len;
 
667
  const unsigned char *pos = answer + sizeof (HEADER);
 
668
  unsigned char *end = answer + length;
 
669
  HEADER *head = (HEADER *)answer;
 
670
  char name[256];
 
671
 
 
672
  qdcount = ntohs (head->qdcount);
 
673
  ancount = ntohs (head->ancount);
 
674
 
 
675
  /* Ignore the questions */
 
676
  while (qdcount-- > 0 && (len = dn_expand (answer, end, pos, name, 255)) >= 0)
 
677
    {
 
678
       pos += len + QFIXEDSZ;
 
679
     }
 
680
 
 
681
   /* Parse the answers */
 
682
   while (ancount-- > 0
 
683
       && (len = dn_expand (answer, end, pos, name, 255)) >= 0)
 
684
     {
 
685
       uint16_t pref, weight, port, class, type;
 
686
 
 
687
       /* Ignore the initial string, which has the query in it */
 
688
       pos += len;
 
689
       NS_GET16 (type, pos);
 
690
       NS_GET16 (class, pos);
 
691
 
 
692
       if (type != T_SRV || class != C_IN)
 
693
         goto failed;
 
694
 
 
695
       /* skip ttl and dlen */
 
696
       pos += 6;
 
697
 
 
698
       NS_GET16 (pref, pos);
 
699
       NS_GET16 (weight, pos);
 
700
       NS_GET16 (port, pos);
 
701
       len = dn_expand (answer, end, pos, name, 255);
 
702
 
 
703
       list = g_list_prepend (list,
 
704
         gibber_resolver_srv_record_new (name, port, pref, weight));
 
705
 
 
706
       pos += len;
 
707
    }
 
708
 
 
709
  return list;
 
710
 
 
711
failed:
 
712
 gibber_resolver_srv_list_free (list);
 
713
 return NULL;
 
714
}
 
715
 
 
716
GError *
 
717
gibber_resolver_gai_error_to_g_error (int error)
 
718
{
 
719
  gint code;
 
720
 
 
721
  switch (error) {
 
722
    case EAI_BADFLAGS:
 
723
    case EAI_SOCKTYPE:
 
724
    case EAI_FAMILY:
 
725
    case EAI_SERVICE:
 
726
      code = GIBBER_RESOLVER_ERROR_INVALID_ARGUMENT;
 
727
      break;
 
728
 
 
729
    case EAI_AGAIN:
 
730
      code = GIBBER_RESOLVER_ERROR_RESOLVE_TEMPORARY_FAILURE;
 
731
      break;
 
732
    case EAI_FAIL:
 
733
    case EAI_NONAME:
 
734
      code = GIBBER_RESOLVER_ERROR_RESOLVE_FAILURE;
 
735
      break;
 
736
 
 
737
    case EAI_MEMORY:
 
738
    case EAI_OVERFLOW:
 
739
      code = GIBBER_RESOLVER_ERROR_MEMORY;
 
740
      break;
 
741
 
 
742
    case EAI_SYSTEM:
 
743
    default:
 
744
      code = GIBBER_RESOLVER_ERROR_UNKNOWN;
 
745
  }
 
746
 
 
747
  return g_error_new (GIBBER_RESOLVER_ERROR, code, gai_strerror (error));
 
748
}
 
749
 
 
750
GError *
 
751
gibber_resolver_h_error_to_g_error (int error)
 
752
{
 
753
  gint code;
 
754
  gchar *message;
 
755
 
 
756
  switch (error) {
 
757
    case NO_RECOVERY:
 
758
      code = GIBBER_RESOLVER_ERROR_RESOLVE_FAILURE,
 
759
      message = "Non-recoverable error";
 
760
      break;
 
761
    case HOST_NOT_FOUND:
 
762
      code = GIBBER_RESOLVER_ERROR_RESOLVE_FAILURE,
 
763
      message = "Authoritative Answer Host not found";
 
764
      break;
 
765
    case NO_DATA:
 
766
      code = GIBBER_RESOLVER_ERROR_RESOLVE_FAILURE;
 
767
      message = "Valid name, no data record of requested type.";
 
768
      break;
 
769
    case TRY_AGAIN:
 
770
      code = GIBBER_RESOLVER_ERROR_RESOLVE_TEMPORARY_FAILURE,
 
771
      message = "Temporary resolver failure";
 
772
      break;
 
773
    default:
 
774
      code = GIBBER_RESOLVER_ERROR_UNKNOWN;
 
775
      message = "Unknown error";
 
776
  }
 
777
 
 
778
  return g_error_new (GIBBER_RESOLVER_ERROR, code, message);
 
779
}
 
780
 
 
781
 
 
782
/* Default GibberResolver implementation (blocking) */
 
783
static gboolean
 
784
resolver_resolv_srv (GibberResolver *resolver,
 
785
                     guint id,
 
786
                     const gchar *service_name,
 
787
                     const char *service,
 
788
                     GibberResolverServiceType type)
 
789
{
 
790
  gchar *srv_str;
 
791
  int ret;
 
792
  GList *entries = NULL;
 
793
  GError *error = NULL;
 
794
  guchar answer[ANSWER_BUFSIZE];
 
795
 
 
796
  srv_str = g_strdup_printf ("_%s._%s.%s", service,
 
797
    type == GIBBER_RESOLVER_SERVICE_TYPE_TCP ? "tcp" : "udp", service_name);
 
798
 
 
799
  ret = res_query (srv_str, C_IN, T_SRV, answer, ANSWER_BUFSIZE);
 
800
 
 
801
  if (ret < 0)
 
802
    error = gibber_resolver_h_error_to_g_error (h_errno);
 
803
  else
 
804
    {
 
805
      entries = gibber_resolver_res_query_to_list (answer, ret);
 
806
      if (entries == NULL)
 
807
        error = g_error_new (GIBBER_RESOLVER_ERROR,
 
808
          GIBBER_RESOLVER_ERROR_RESOLVE_FAILURE, "Invalid reply received");
 
809
    }
 
810
 
 
811
  gibber_resolver_srv_result (resolver, id, entries, error);
 
812
 
 
813
  if (error != NULL)
 
814
    g_error_free (error);
 
815
 
 
816
  g_free (srv_str);
 
817
 
 
818
  return FALSE;
 
819
}
 
820
 
 
821
static gboolean
 
822
resolver_resolv_addrinfo (GibberResolver *resolver,
 
823
                          guint id,
 
824
                          const gchar *hostname,
 
825
                          const char *port,
 
826
                          int address_family,
 
827
                          int sock_type,
 
828
                          int protocol,
 
829
                          int flags)
 
830
{
 
831
  struct addrinfo req, *ans = NULL, *tmpaddr;
 
832
  int ret;
 
833
  GList *entries = NULL;
 
834
 
 
835
  memset (&req, 0, sizeof (req));
 
836
  req.ai_family = address_family;
 
837
  req.ai_socktype = sock_type;
 
838
  req.ai_protocol = protocol;
 
839
  req.ai_flags = flags;
 
840
 
 
841
  ret = getaddrinfo (hostname, port, &req, &ans);
 
842
 
 
843
  if (ret != 0)
 
844
    {
 
845
      GError *e = gibber_resolver_gai_error_to_g_error (ret);
 
846
      gibber_resolver_addrinfo_result (resolver, id, NULL, e);
 
847
      g_error_free (e);
 
848
      return FALSE;
 
849
    }
 
850
 
 
851
  for (tmpaddr = ans; tmpaddr != NULL; tmpaddr = tmpaddr->ai_next)
 
852
    {
 
853
      entries = g_list_append (entries,
 
854
        gibber_resolver_addrinfo_new (tmpaddr->ai_family,
 
855
          tmpaddr->ai_socktype, tmpaddr->ai_protocol,
 
856
          tmpaddr->ai_addr, tmpaddr->ai_addrlen));
 
857
    }
 
858
 
 
859
  freeaddrinfo (ans);
 
860
 
 
861
  gibber_resolver_addrinfo_result (resolver, id, entries, NULL);
 
862
 
 
863
  return FALSE;
 
864
}
 
865
 
 
866
static gboolean
 
867
resolver_resolv_nameinfo (GibberResolver *resolver,
 
868
                          guint id,
 
869
                          const struct sockaddr *sa,
 
870
                          socklen_t salen,
 
871
                          gint flags)
 
872
{
 
873
  int ret;
 
874
  gchar name[NI_MAXHOST], servicename[NI_MAXSERV];
 
875
 
 
876
  ret = getnameinfo (sa, salen, name, NI_MAXHOST, servicename, NI_MAXSERV,
 
877
    flags);
 
878
 
 
879
  if (ret != 0)
 
880
    {
 
881
      GError *e = gibber_resolver_gai_error_to_g_error (ret);
 
882
 
 
883
      gibber_resolver_nameinfo_result (resolver, id, NULL, NULL, e);
 
884
      g_error_free (e);
 
885
      return FALSE;
 
886
    }
 
887
 
 
888
  gibber_resolver_nameinfo_result (resolver, id, g_strdup (name),
 
889
    g_strdup (servicename), NULL);
 
890
 
 
891
  return FALSE;
 
892
}
 
893
 
 
894
static void
 
895
resolver_resolv_cancel (GibberResolver *resolver, guint id)
 
896
{
 
897
  return;
 
898
}