Improve performance of the ast_event cache functionality.
[asterisk/asterisk.git] / main / event.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 2007 - 2008, Digium, Inc.
5  *
6  * Russell Bryant <russell@digium.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*! \file
20  *
21  * \brief Internal generic event system
22  *
23  * \author Russell Bryant <russell@digium.com>
24  */
25
26 #include "asterisk.h"
27
28 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
29
30 #include "asterisk/_private.h"
31
32 #include "asterisk/event.h"
33 #include "asterisk/linkedlists.h"
34 #include "asterisk/dlinkedlists.h"
35 #include "asterisk/lock.h"
36 #include "asterisk/utils.h"
37 #include "asterisk/unaligned.h"
38 #include "asterisk/utils.h"
39 #include "asterisk/taskprocessor.h"
40 #include "asterisk/astobj2.h"
41
42 struct ast_taskprocessor *event_dispatcher;
43
44 /*!
45  * \brief An event information element
46  *
47  * \note The format of this structure is important.  Since these events may
48  *       be sent directly over a network, changing this structure will break
49  *       compatibility with older versions.  However, at this point, this code
50  *       has not made it into a release, so it is still fair game for change.
51  */
52 struct ast_event_ie {
53         enum ast_event_ie_type ie_type:16;
54         /*! Total length of the IE payload */
55         uint16_t ie_payload_len;
56         unsigned char ie_payload[0];
57 } __attribute__((packed));
58
59 /*!
60  * \brief The payload for a string information element
61  */
62 struct ast_event_ie_str_payload {
63         /*! \brief A hash calculated with ast_str_hash(), to speed up comparisons */
64         uint32_t hash;
65         /*! \brief The actual string, null terminated */
66         char str[1];
67 } __attribute__((packed));
68
69 /*!
70  * \brief An event
71  *
72  * An ast_event consists of an event header (this structure), and zero or
73  * more information elements defined by ast_event_ie.
74  *
75  * \note The format of this structure is important.  Since these events may
76  *       be sent directly over a network, changing this structure will break
77  *       compatibility with older versions.  However, at this point, this code
78  *       has not made it into a release, so it is still fair game for change.
79  */
80 struct ast_event {
81         /*! Event type */
82         enum ast_event_type type:16;
83         /*! Total length of the event */
84         uint16_t event_len:16;
85         /*! The data payload of the event, made up of information elements */
86         unsigned char payload[0];
87 } __attribute__((packed));
88
89 struct ast_event_ref {
90         struct ast_event *event;
91         AST_LIST_ENTRY(ast_event_ref) entry;
92 };
93
94 struct ast_event_ie_val {
95         AST_LIST_ENTRY(ast_event_ie_val) entry;
96         enum ast_event_ie_type ie_type;
97         enum ast_event_ie_pltype ie_pltype;
98         union {
99                 uint32_t uint;
100                 struct {
101                         uint32_t hash;
102                         const char *str;
103                 };
104                 void *raw;
105         } payload;
106         size_t raw_datalen;
107 };
108
109 /*! \brief Event subscription */
110 struct ast_event_sub {
111         enum ast_event_type type;
112         ast_event_cb_t cb;
113         void *userdata;
114         uint32_t uniqueid;
115         AST_LIST_HEAD_NOLOCK(, ast_event_ie_val) ie_vals;
116         AST_RWDLLIST_ENTRY(ast_event_sub) entry;
117 };
118
119 static uint32_t sub_uniqueid;
120
121 /*! \brief Event subscriptions
122  * The event subscribers are indexed by which event they are subscribed to */
123 static AST_RWDLLIST_HEAD(ast_event_sub_list, ast_event_sub) ast_event_subs[AST_EVENT_TOTAL];
124
125 static int ast_event_cmp(void *obj, void *arg, int flags);
126 static int ast_event_hash_mwi(const void *obj, const int flags);
127 static int ast_event_hash_devstate(const void *obj, const int flags);
128 static int ast_event_hash_devstate_change(const void *obj, const int flags);
129
130 #ifdef LOW_MEMORY
131 #define NUM_CACHE_BUCKETS 17
132 #else
133 #define NUM_CACHE_BUCKETS 563
134 #endif
135
136 #define MAX_CACHE_ARGS 8
137
138 /*!
139  * \brief Event types that are kept in the cache.
140  */
141 static struct {
142         /*! 
143          * \brief Container of cached events
144          *
145          * \details This gets allocated in ast_event_init() when Asterisk starts
146          * for the event types declared as using the cache.
147          */
148         struct ao2_container *container;
149         /*! \brief Event type specific hash function */
150         ao2_hash_fn *hash_fn;
151         /*!
152          * \brief Information Elements used for caching
153          *
154          * \details This array is the set of information elements that will be unique
155          * among all events in the cache for this event type.  When a new event gets
156          * cached, a previous event with the same values for these information elements
157          * will be replaced.
158          */
159         enum ast_event_ie_type cache_args[MAX_CACHE_ARGS];
160 } ast_event_cache[AST_EVENT_TOTAL] = {
161         [AST_EVENT_MWI] = {
162                 .hash_fn = ast_event_hash_mwi,
163                 .cache_args = { AST_EVENT_IE_MAILBOX, AST_EVENT_IE_CONTEXT },
164         },
165         [AST_EVENT_DEVICE_STATE] = {
166                 .hash_fn = ast_event_hash_devstate,
167                 .cache_args = { AST_EVENT_IE_DEVICE, },
168         },
169         [AST_EVENT_DEVICE_STATE_CHANGE] = {
170                 .hash_fn = ast_event_hash_devstate_change,
171                 .cache_args = { AST_EVENT_IE_DEVICE, AST_EVENT_IE_EID, },
172         },
173 };
174
175 /*!
176  * The index of each entry _must_ match the event type number!
177  */
178 static struct event_name {
179         enum ast_event_type type;
180         const char *name;
181 } event_names[] = {
182         { 0, "" },
183         { AST_EVENT_CUSTOM,              "Custom" },
184         { AST_EVENT_MWI,                 "MWI" },
185         { AST_EVENT_SUB,                 "Subscription" },
186         { AST_EVENT_UNSUB,               "Unsubscription" },
187         { AST_EVENT_DEVICE_STATE,        "DeviceState" },
188         { AST_EVENT_DEVICE_STATE_CHANGE, "DeviceStateChange" },
189 };
190
191 /*!
192  * The index of each entry _must_ match the event ie number!
193  */
194 static struct ie_map {
195         enum ast_event_ie_type ie_type;
196         enum ast_event_ie_pltype ie_pltype;
197         const char *name;
198 } ie_maps[] = {
199         { 0, 0, "" },
200         { AST_EVENT_IE_NEWMSGS,   AST_EVENT_IE_PLTYPE_UINT, "NewMessages" },
201         { AST_EVENT_IE_OLDMSGS,   AST_EVENT_IE_PLTYPE_UINT, "OldMessages" },
202         { AST_EVENT_IE_MAILBOX,   AST_EVENT_IE_PLTYPE_STR,  "Mailbox" },
203         { AST_EVENT_IE_UNIQUEID,  AST_EVENT_IE_PLTYPE_UINT, "UniqueID" },
204         { AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, "EventType" },
205         { AST_EVENT_IE_EXISTS,    AST_EVENT_IE_PLTYPE_UINT, "Exists" },
206         { AST_EVENT_IE_DEVICE,    AST_EVENT_IE_PLTYPE_STR,  "Device" },
207         { AST_EVENT_IE_STATE,     AST_EVENT_IE_PLTYPE_UINT, "State" },
208         { AST_EVENT_IE_CONTEXT,   AST_EVENT_IE_PLTYPE_STR,  "Context" },
209         { AST_EVENT_IE_EID,       AST_EVENT_IE_PLTYPE_RAW,  "EntityID" },
210 };
211
212 const char *ast_event_get_type_name(const struct ast_event *event)
213 {
214         enum ast_event_type type;
215
216         type = ast_event_get_type(event);
217
218         if (type >= AST_EVENT_TOTAL || type < 0) {
219                 ast_log(LOG_ERROR, "Invalid event type - '%d'\n", type);
220                 return "";
221         }
222
223         return event_names[type].name;
224 }
225
226 int ast_event_str_to_event_type(const char *str, enum ast_event_type *event_type)
227 {
228         int i;
229
230         for (i = 0; i < ARRAY_LEN(event_names); i++) {
231                 if (strcasecmp(event_names[i].name, str))
232                         continue;
233
234                 *event_type = event_names[i].type;
235                 return 0;
236         }
237
238         return -1;
239 }
240
241 const char *ast_event_get_ie_type_name(enum ast_event_ie_type ie_type)
242 {
243         if (ie_type <= 0 || ie_type > AST_EVENT_IE_MAX) {
244                 ast_log(LOG_ERROR, "Invalid IE type - '%d'\n", ie_type);
245                 return "";
246         }
247
248         if (ie_maps[ie_type].ie_type != ie_type) {
249                 ast_log(LOG_ERROR, "The ie type passed in does not match the ie type defined in the ie table.\n");
250                 return "";
251         }
252
253         return ie_maps[ie_type].name;
254 }
255
256 enum ast_event_ie_pltype ast_event_get_ie_pltype(enum ast_event_ie_type ie_type)
257 {
258         if (ie_type <= 0 || ie_type > AST_EVENT_IE_MAX) {
259                 ast_log(LOG_ERROR, "Invalid IE type - '%d'\n", ie_type);
260                 return AST_EVENT_IE_PLTYPE_UNKNOWN;
261         }
262
263         if (ie_maps[ie_type].ie_type != ie_type) {
264                 ast_log(LOG_ERROR, "The ie type passed in does not match the ie type defined in the ie table.\n");
265                 return AST_EVENT_IE_PLTYPE_UNKNOWN;
266         }
267
268         return ie_maps[ie_type].ie_pltype;
269 }
270
271 int ast_event_str_to_ie_type(const char *str, enum ast_event_ie_type *ie_type)
272 {
273         int i;
274
275         for (i = 0; i < ARRAY_LEN(ie_maps); i++) {
276                 if (strcasecmp(ie_maps[i].name, str))
277                         continue;
278
279                 *ie_type = ie_maps[i].ie_type;
280                 return 0;
281         }
282
283         return -1;
284 }
285
286 size_t ast_event_get_size(const struct ast_event *event)
287 {
288         size_t res;
289
290         res = ntohs(event->event_len);
291
292         return res;
293 }
294
295 static void ast_event_ie_val_destroy(struct ast_event_ie_val *ie_val)
296 {
297         switch (ie_val->ie_pltype) {
298         case AST_EVENT_IE_PLTYPE_STR:
299                 ast_free((char *) ie_val->payload.str);
300                 break;
301         case AST_EVENT_IE_PLTYPE_RAW:
302                 ast_free(ie_val->payload.raw);
303                 break;
304         case AST_EVENT_IE_PLTYPE_UINT:
305         case AST_EVENT_IE_PLTYPE_EXISTS:
306         case AST_EVENT_IE_PLTYPE_UNKNOWN:
307                 break;
308         }
309
310         ast_free(ie_val);
311 }
312
313 enum ast_event_subscriber_res ast_event_check_subscriber(enum ast_event_type type, ...)
314 {
315         va_list ap;
316         enum ast_event_ie_type ie_type;
317         enum ast_event_subscriber_res res = AST_EVENT_SUB_NONE;
318         struct ast_event_ie_val *ie_val, *sub_ie_val;
319         struct ast_event_sub *sub;
320         AST_LIST_HEAD_NOLOCK_STATIC(ie_vals, ast_event_ie_val);
321
322         if (type >= AST_EVENT_TOTAL) {
323                 ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
324                 return res;
325         }
326
327         va_start(ap, type);
328         for (ie_type = va_arg(ap, enum ast_event_type);
329                 ie_type != AST_EVENT_IE_END;
330                 ie_type = va_arg(ap, enum ast_event_type))
331         {
332                 struct ast_event_ie_val *ie_value = alloca(sizeof(*ie_value));
333                 memset(ie_value, 0, sizeof(*ie_value));
334                 ie_value->ie_type = ie_type;
335                 ie_value->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
336                 if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
337                         ie_value->payload.uint = va_arg(ap, uint32_t);
338                 else if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
339                         ie_value->payload.str = ast_strdupa(va_arg(ap, const char *));
340                 else if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_RAW) {
341                         void *data = va_arg(ap, void *);
342                         size_t datalen = va_arg(ap, size_t);
343                         ie_value->payload.raw = alloca(datalen);
344                         memcpy(ie_value->payload.raw, data, datalen);
345                         ie_value->raw_datalen = datalen;
346                 }
347                 AST_LIST_INSERT_TAIL(&ie_vals, ie_value, entry);
348         }
349         va_end(ap);
350
351         AST_RWDLLIST_RDLOCK(&ast_event_subs[type]);
352         AST_RWDLLIST_TRAVERSE(&ast_event_subs[type], sub, entry) {
353                 AST_LIST_TRAVERSE(&ie_vals, ie_val, entry) {
354                         AST_LIST_TRAVERSE(&sub->ie_vals, sub_ie_val, entry) {
355                                 if (sub_ie_val->ie_type == ie_val->ie_type)
356                                         break;
357                         }
358                         if (!sub_ie_val) {
359                                 if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS)
360                                         break;
361                                 continue;
362                         }
363                         /* The subscriber doesn't actually care what the value is */
364                         if (sub_ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS)
365                                 continue;
366                         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT &&
367                                 ie_val->payload.uint != sub_ie_val->payload.uint)
368                                 break;
369                         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR &&
370                                 strcmp(ie_val->payload.str, sub_ie_val->payload.str))
371                                 break;
372                         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_RAW &&
373                                 memcmp(ie_val->payload.raw, sub_ie_val->payload.raw, ie_val->raw_datalen))
374                                 break;
375                 }
376                 if (!ie_val)
377                         break;
378         }
379         AST_RWDLLIST_UNLOCK(&ast_event_subs[type]);
380
381         if (sub) /* All parameters were matched */
382                 return AST_EVENT_SUB_EXISTS;
383
384         AST_RWDLLIST_RDLOCK(&ast_event_subs[AST_EVENT_ALL]);
385         if (!AST_DLLIST_EMPTY(&ast_event_subs[AST_EVENT_ALL]))
386                 res = AST_EVENT_SUB_EXISTS;
387         AST_RWDLLIST_UNLOCK(&ast_event_subs[AST_EVENT_ALL]);
388
389         return res;
390 }
391
392 static int match_ie_val(const struct ast_event *event,
393                 const struct ast_event_ie_val *ie_val, const struct ast_event *event2)
394 {
395         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT) {
396                 uint32_t val = event2 ? ast_event_get_ie_uint(event2, ie_val->ie_type) : ie_val->payload.uint;
397                 if (val == ast_event_get_ie_uint(event, ie_val->ie_type))
398                         return 1;
399                 return 0;
400         }
401
402         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR) {
403                 const char *str;
404                 uint32_t hash;
405
406                 hash = event2 ? ast_event_get_ie_str_hash(event2, ie_val->ie_type) : ie_val->payload.hash;
407                 if (hash != ast_event_get_ie_str_hash(event, ie_val->ie_type)) {
408                         return 0;
409                 }
410
411                 str = event2 ? ast_event_get_ie_str(event2, ie_val->ie_type) : ie_val->payload.str;
412                 if (str && !strcmp(str, ast_event_get_ie_str(event, ie_val->ie_type))) {
413                         return 1;
414                 }
415
416                 return 0;
417         }
418
419         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_RAW) {
420                 const void *buf = event2 ? ast_event_get_ie_raw(event2, ie_val->ie_type) : ie_val->payload.raw;
421                 if (buf && !memcmp(buf, ast_event_get_ie_raw(event, ie_val->ie_type), ie_val->raw_datalen))
422                         return 1;
423                 return 0;
424         }
425
426         if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS) {
427                 if (ast_event_get_ie_raw(event, ie_val->ie_type))
428                         return 1;
429                 return 0;
430         }
431
432         return 0;
433 }
434
435 static int dump_cache_cb(void *obj, void *arg, int flags)
436 {
437         const struct ast_event_ref *event_ref = obj;
438         const struct ast_event *event = event_ref->event;
439         const struct ast_event_sub *event_sub = arg;
440         struct ast_event_ie_val *ie_val = NULL;
441
442         AST_LIST_TRAVERSE(&event_sub->ie_vals, ie_val, entry) {
443                 if (!match_ie_val(event, ie_val, NULL)) {
444                         break;
445                 }
446         }
447
448         if (!ie_val) {
449                 /* All parameters were matched on this cache entry, so dump it */
450                 event_sub->cb(event, event_sub->userdata);
451         }
452
453         return 0;
454 }
455
456 /*! \brief Dump the event cache for the subscribed event type */
457 void ast_event_dump_cache(const struct ast_event_sub *event_sub)
458 {
459         ao2_callback(ast_event_cache[event_sub->type].container, OBJ_NODATA,
460                         dump_cache_cb, (void *) event_sub);
461 }
462
463 static struct ast_event *gen_sub_event(struct ast_event_sub *sub)
464 {
465         struct ast_event_ie_val *ie_val;
466         struct ast_event *event;
467
468         event = ast_event_new(AST_EVENT_SUB,
469                 AST_EVENT_IE_UNIQUEID,  AST_EVENT_IE_PLTYPE_UINT, sub->uniqueid,
470                 AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
471                 AST_EVENT_IE_END);
472
473         if (!event)
474                 return NULL;
475
476         AST_LIST_TRAVERSE(&sub->ie_vals, ie_val, entry) {
477                 switch (ie_val->ie_pltype) {
478                 case AST_EVENT_IE_PLTYPE_UNKNOWN:
479                         break;
480                 case AST_EVENT_IE_PLTYPE_EXISTS:
481                         ast_event_append_ie_uint(&event, AST_EVENT_IE_EXISTS, ie_val->ie_type);
482                         break;
483                 case AST_EVENT_IE_PLTYPE_UINT:
484                         ast_event_append_ie_uint(&event, ie_val->ie_type, ie_val->payload.uint);
485                         break;
486                 case AST_EVENT_IE_PLTYPE_STR:
487                         ast_event_append_ie_str(&event, ie_val->ie_type, ie_val->payload.str);
488                         break;
489                 case AST_EVENT_IE_PLTYPE_RAW:
490                         ast_event_append_ie_raw(&event, ie_val->ie_type, ie_val->payload.raw, ie_val->raw_datalen);
491                         break;
492                 }
493                 if (!event)
494                         break;
495         }
496
497         return event;
498 }
499
500 /*! \brief Send AST_EVENT_SUB events to this subscriber of ... subscriber events */
501 void ast_event_report_subs(const struct ast_event_sub *event_sub)
502 {
503         struct ast_event *event;
504         struct ast_event_sub *sub;
505         enum ast_event_type event_type = -1;
506         struct ast_event_ie_val *ie_val;
507
508         if (event_sub->type != AST_EVENT_SUB)
509                 return;
510
511         AST_LIST_TRAVERSE(&event_sub->ie_vals, ie_val, entry) {
512                 if (ie_val->ie_type == AST_EVENT_IE_EVENTTYPE) {
513                         event_type = ie_val->payload.uint;
514                         break;
515                 }
516         }
517
518         if (event_type == -1)
519                 return;
520
521         AST_RWDLLIST_RDLOCK(&ast_event_subs[event_type]);
522         AST_RWDLLIST_TRAVERSE(&ast_event_subs[event_type], sub, entry) {
523                 if (event_sub == sub)
524                         continue;
525
526                 event = gen_sub_event(sub);
527
528                 if (!event)
529                         continue;
530
531                 event_sub->cb(event, event_sub->userdata);
532
533                 ast_event_destroy(event);
534         }
535         AST_RWDLLIST_UNLOCK(&ast_event_subs[event_type]);
536 }
537
538 struct ast_event_sub *ast_event_subscribe_new(enum ast_event_type type, 
539         ast_event_cb_t cb, void *userdata)
540 {
541         struct ast_event_sub *sub;
542
543         if (type < 0 || type >= AST_EVENT_TOTAL) {
544                 ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
545                 return NULL;
546         }
547
548         if (!(sub = ast_calloc(1, sizeof(*sub))))
549                 return NULL;
550
551         sub->type = type;
552         sub->cb = cb;
553         sub->userdata = userdata;
554         sub->uniqueid = ast_atomic_fetchadd_int((int *) &sub_uniqueid, 1);
555
556         return sub;
557 }
558
559 int ast_event_sub_append_ie_uint(struct ast_event_sub *sub,
560         enum ast_event_ie_type ie_type, uint32_t unsigned_int)
561 {
562         struct ast_event_ie_val *ie_val;
563
564         if (ie_type < 0 || ie_type > AST_EVENT_IE_MAX)
565                 return -1;
566
567         if (!(ie_val = ast_calloc(1, sizeof(*ie_val))))
568                 return -1;
569
570         ie_val->ie_type = ie_type;
571         ie_val->payload.uint = unsigned_int;
572         ie_val->ie_pltype = AST_EVENT_IE_PLTYPE_UINT;
573
574         AST_LIST_INSERT_TAIL(&sub->ie_vals, ie_val, entry);
575
576         return 0;
577 }
578
579 int ast_event_sub_append_ie_exists(struct ast_event_sub *sub,
580         enum ast_event_ie_type ie_type)
581 {
582         struct ast_event_ie_val *ie_val;
583
584         if (ie_type < 0 || ie_type > AST_EVENT_IE_MAX)
585                 return -1;
586
587         if (!(ie_val = ast_calloc(1, sizeof(*ie_val))))
588                 return -1;
589
590         ie_val->ie_type = ie_type;
591         ie_val->ie_pltype = AST_EVENT_IE_PLTYPE_EXISTS;
592
593         AST_LIST_INSERT_TAIL(&sub->ie_vals, ie_val, entry);
594
595         return 0;
596 }
597
598 int ast_event_sub_append_ie_str(struct ast_event_sub *sub,      
599         enum ast_event_ie_type ie_type, const char *str)
600 {
601         struct ast_event_ie_val *ie_val;
602
603         if (ie_type < 0 || ie_type > AST_EVENT_IE_MAX)
604                 return -1;
605
606         if (!(ie_val = ast_calloc(1, sizeof(*ie_val))))
607                 return -1;
608
609         ie_val->ie_type = ie_type;
610         ie_val->ie_pltype = AST_EVENT_IE_PLTYPE_STR;
611
612         if (!(ie_val->payload.str = ast_strdup(str))) {
613                 ast_free(ie_val);
614                 return -1;
615         }
616
617         ie_val->payload.hash = ast_str_hash(str);
618
619         AST_LIST_INSERT_TAIL(&sub->ie_vals, ie_val, entry);
620
621         return 0;
622 }
623
624 int ast_event_sub_append_ie_raw(struct ast_event_sub *sub,      
625         enum ast_event_ie_type ie_type, void *data, size_t raw_datalen)
626 {
627         struct ast_event_ie_val *ie_val;
628
629         if (ie_type < 0 || ie_type > AST_EVENT_IE_MAX)
630                 return -1;
631
632         if (!(ie_val = ast_calloc(1, sizeof(*ie_val))))
633                 return -1;
634
635         ie_val->ie_type = ie_type;
636         ie_val->ie_pltype = AST_EVENT_IE_PLTYPE_RAW;
637         ie_val->raw_datalen = raw_datalen;
638
639         if (!(ie_val->payload.raw = ast_malloc(raw_datalen))) {
640                 ast_free(ie_val);
641                 return -1;
642         }
643
644         memcpy(ie_val->payload.raw, data, raw_datalen);
645
646         AST_LIST_INSERT_TAIL(&sub->ie_vals, ie_val, entry);
647
648         return 0;
649 }
650
651 int ast_event_sub_activate(struct ast_event_sub *sub)
652 {
653         if (ast_event_check_subscriber(AST_EVENT_SUB,
654                 AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
655                 AST_EVENT_IE_END) != AST_EVENT_SUB_NONE) {
656                 struct ast_event *event;
657
658                 event = gen_sub_event(sub);
659
660                 if (event)
661                         ast_event_queue(event);
662         }
663
664         AST_RWDLLIST_WRLOCK(&ast_event_subs[sub->type]);
665         AST_RWDLLIST_INSERT_TAIL(&ast_event_subs[sub->type], sub, entry);
666         AST_RWDLLIST_UNLOCK(&ast_event_subs[sub->type]);
667
668         return 0;
669 }
670
671 struct ast_event_sub *ast_event_subscribe(enum ast_event_type type, ast_event_cb_t cb, 
672         void *userdata, ...)
673 {
674         va_list ap;
675         enum ast_event_ie_type ie_type;
676         struct ast_event_sub *sub;
677
678         if (!(sub = ast_event_subscribe_new(type, cb, userdata)))
679                 return NULL;
680
681         va_start(ap, userdata);
682         for (ie_type = va_arg(ap, enum ast_event_type);
683                 ie_type != AST_EVENT_IE_END;
684                 ie_type = va_arg(ap, enum ast_event_type))
685         {
686                 enum ast_event_ie_pltype ie_pltype;
687
688                 ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
689
690                 switch (ie_pltype) {
691                 case AST_EVENT_IE_PLTYPE_UNKNOWN:
692                         break;
693                 case AST_EVENT_IE_PLTYPE_UINT:
694                 {
695                         uint32_t unsigned_int = va_arg(ap, uint32_t);
696                         ast_event_sub_append_ie_uint(sub, ie_type, unsigned_int);
697                         break;
698                 }
699                 case AST_EVENT_IE_PLTYPE_STR:
700                 {
701                         const char *str = va_arg(ap, const char *);
702                         ast_event_sub_append_ie_str(sub, ie_type, str);
703                         break;
704                 }
705                 case AST_EVENT_IE_PLTYPE_RAW:
706                 {
707                         void *data = va_arg(ap, void *);
708                         size_t data_len = va_arg(ap, size_t);
709                         ast_event_sub_append_ie_raw(sub, ie_type, data, data_len);
710                         break;
711                 }
712                 case AST_EVENT_IE_PLTYPE_EXISTS:
713                         ast_event_sub_append_ie_exists(sub, ie_type);
714                         break;
715                 }
716         }
717         va_end(ap);
718
719         ast_event_sub_activate(sub);
720
721         return sub;
722 }
723
724 void ast_event_sub_destroy(struct ast_event_sub *sub)
725 {
726         struct ast_event_ie_val *ie_val;
727
728         while ((ie_val = AST_LIST_REMOVE_HEAD(&sub->ie_vals, entry)))
729                 ast_event_ie_val_destroy(ie_val);
730
731         ast_free(sub);
732 }
733
734 struct ast_event_sub *ast_event_unsubscribe(struct ast_event_sub *sub)
735 {
736         struct ast_event *event;
737
738         AST_RWDLLIST_WRLOCK(&ast_event_subs[sub->type]);
739         AST_DLLIST_REMOVE(&ast_event_subs[sub->type], sub, entry);
740         AST_RWDLLIST_UNLOCK(&ast_event_subs[sub->type]);
741
742         if (ast_event_check_subscriber(AST_EVENT_UNSUB,
743                 AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
744                 AST_EVENT_IE_END) != AST_EVENT_SUB_NONE) {
745                 
746                 event = ast_event_new(AST_EVENT_UNSUB,
747                         AST_EVENT_IE_UNIQUEID,  AST_EVENT_IE_PLTYPE_UINT, sub->uniqueid,
748                         AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
749                         AST_EVENT_IE_END);
750
751                 if (event)
752                         ast_event_queue(event);
753         }
754
755         ast_event_sub_destroy(sub);
756
757         return NULL;
758 }
759
760 void ast_event_iterator_init(struct ast_event_iterator *iterator, const struct ast_event *event)
761 {
762         iterator->event_len = ntohs(event->event_len);
763         iterator->event = event;
764         iterator->ie = (struct ast_event_ie *) ( ((char *) event) + sizeof(*event) );
765         return;
766 }
767
768 int ast_event_iterator_next(struct ast_event_iterator *iterator)
769 {
770         iterator->ie = (struct ast_event_ie *) ( ((char *) iterator->ie) + sizeof(*iterator->ie) + ntohs(iterator->ie->ie_payload_len));
771         return ((iterator->event_len <= (((char *) iterator->ie) - ((char *) iterator->event))) ? -1 : 0);
772 }
773
774 enum ast_event_ie_type ast_event_iterator_get_ie_type(struct ast_event_iterator *iterator)
775 {
776         return ntohs(iterator->ie->ie_type);
777 }
778
779 uint32_t ast_event_iterator_get_ie_uint(struct ast_event_iterator *iterator)
780 {
781         return ntohl(get_unaligned_uint32(iterator->ie->ie_payload));
782 }
783
784 const char *ast_event_iterator_get_ie_str(struct ast_event_iterator *iterator)
785 {
786         const struct ast_event_ie_str_payload *str_payload;
787
788         str_payload = (struct ast_event_ie_str_payload *) iterator->ie->ie_payload;
789
790         return str_payload->str;
791 }
792
793 void *ast_event_iterator_get_ie_raw(struct ast_event_iterator *iterator)
794 {
795         return iterator->ie->ie_payload;
796 }
797
798 enum ast_event_type ast_event_get_type(const struct ast_event *event)
799 {
800         return ntohs(event->type);
801 }
802
803 uint32_t ast_event_get_ie_uint(const struct ast_event *event, enum ast_event_ie_type ie_type)
804 {
805         const uint32_t *ie_val;
806
807         ie_val = ast_event_get_ie_raw(event, ie_type);
808
809         return ie_val ? ntohl(get_unaligned_uint32(ie_val)) : 0;
810 }
811
812 uint32_t ast_event_get_ie_str_hash(const struct ast_event *event, enum ast_event_ie_type ie_type)
813 {
814         const struct ast_event_ie_str_payload *str_payload;
815
816         str_payload = ast_event_get_ie_raw(event, ie_type);
817
818         return str_payload->hash;
819 }
820
821 const char *ast_event_get_ie_str(const struct ast_event *event, enum ast_event_ie_type ie_type)
822 {
823         const struct ast_event_ie_str_payload *str_payload;
824
825         str_payload = ast_event_get_ie_raw(event, ie_type);
826
827         return str_payload->str;
828 }
829
830 const void *ast_event_get_ie_raw(const struct ast_event *event, enum ast_event_ie_type ie_type)
831 {
832         struct ast_event_iterator iterator;
833         int res = 0;
834
835         for (ast_event_iterator_init(&iterator, event); !res; res = ast_event_iterator_next(&iterator)) {
836                 if (ast_event_iterator_get_ie_type(&iterator) == ie_type)
837                         return ast_event_iterator_get_ie_raw(&iterator);
838         }
839
840         return NULL;
841 }
842
843 int ast_event_append_ie_str(struct ast_event **event, enum ast_event_ie_type ie_type,
844         const char *str)
845 {
846         struct ast_event_ie_str_payload *str_payload;
847         size_t payload_len;
848
849         payload_len = sizeof(*str_payload) + strlen(str);
850         str_payload = alloca(payload_len);
851
852         strcpy(str_payload->str, str);
853         str_payload->hash = ast_str_hash(str);
854
855         return ast_event_append_ie_raw(event, ie_type, str_payload, payload_len);
856 }
857
858 int ast_event_append_ie_uint(struct ast_event **event, enum ast_event_ie_type ie_type,
859         uint32_t data)
860 {
861         data = htonl(data);
862         return ast_event_append_ie_raw(event, ie_type, &data, sizeof(data));
863 }
864
865 int ast_event_append_ie_raw(struct ast_event **event, enum ast_event_ie_type ie_type,
866         const void *data, size_t data_len)
867 {
868         struct ast_event_ie *ie;
869         unsigned int extra_len;
870         uint16_t event_len;
871
872         event_len = ntohs((*event)->event_len);
873         extra_len = sizeof(*ie) + data_len;
874
875         if (!(*event = ast_realloc(*event, event_len + extra_len)))
876                 return -1;
877
878         ie = (struct ast_event_ie *) ( ((char *) *event) + event_len );
879         ie->ie_type = htons(ie_type);
880         ie->ie_payload_len = htons(data_len);
881         memcpy(ie->ie_payload, data, data_len);
882
883         (*event)->event_len = htons(event_len + extra_len);
884
885         return 0;
886 }
887
888 struct ast_event *ast_event_new(enum ast_event_type type, ...)
889 {
890         va_list ap;
891         struct ast_event *event;
892         enum ast_event_type ie_type;
893         struct ast_event_ie_val *ie_val;
894         AST_LIST_HEAD_NOLOCK_STATIC(ie_vals, ast_event_ie_val);
895
896         /* Invalid type */
897         if (type >= AST_EVENT_TOTAL) {
898                 ast_log(LOG_WARNING, "Someone tried to create an event of invalid "
899                         "type '%d'!\n", type);
900                 return NULL;
901         }
902
903         va_start(ap, type);
904         for (ie_type = va_arg(ap, enum ast_event_type);
905                 ie_type != AST_EVENT_IE_END;
906                 ie_type = va_arg(ap, enum ast_event_type))
907         {
908                 struct ast_event_ie_val *ie_value = alloca(sizeof(*ie_value));
909                 memset(ie_value, 0, sizeof(*ie_value));
910                 ie_value->ie_type = ie_type;
911                 ie_value->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
912                 if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
913                         ie_value->payload.uint = va_arg(ap, uint32_t);
914                 else if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
915                         ie_value->payload.str = ast_strdupa(va_arg(ap, const char *));
916                 else if (ie_value->ie_pltype == AST_EVENT_IE_PLTYPE_RAW) {
917                         void *data = va_arg(ap, void *);
918                         size_t datalen = va_arg(ap, size_t);
919                         ie_value->payload.raw = alloca(datalen);
920                         memcpy(ie_value->payload.raw, data, datalen);
921                         ie_value->raw_datalen = datalen;
922                 }
923                 AST_LIST_INSERT_TAIL(&ie_vals, ie_value, entry);
924         }
925         va_end(ap);
926
927         if (!(event = ast_calloc(1, sizeof(*event))))
928                 return NULL;
929
930         event->type = htons(type);
931         event->event_len = htons(sizeof(*event));
932
933         AST_LIST_TRAVERSE(&ie_vals, ie_val, entry) {
934                 if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
935                         ast_event_append_ie_str(&event, ie_val->ie_type, ie_val->payload.str);
936                 else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
937                         ast_event_append_ie_uint(&event, ie_val->ie_type, ie_val->payload.uint);
938                 else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_RAW)
939                         ast_event_append_ie_raw(&event, ie_val->ie_type, ie_val->payload.raw, ie_val->raw_datalen);
940
941                 if (!event)
942                         break;
943         }
944
945         if (!ast_event_get_ie_raw(event, AST_EVENT_IE_EID)) {
946                 /* If the event is originating on this server, add the server's
947                  * entity ID to the event. */
948                 ast_event_append_ie_raw(&event, AST_EVENT_IE_EID, &g_eid, sizeof(g_eid));
949         }
950
951         return event;
952 }
953
954 void ast_event_destroy(struct ast_event *event)
955 {
956         ast_free(event);
957 }
958
959 static void ast_event_ref_destroy(void *obj)
960 {
961         struct ast_event_ref *event_ref = obj;
962
963         ast_event_destroy(event_ref->event);
964 }
965
966 static struct ast_event *ast_event_dup(const struct ast_event *event)
967 {
968         struct ast_event *dup_event;
969         uint16_t event_len;
970
971         event_len = ast_event_get_size(event);
972
973         if (!(dup_event = ast_calloc(1, event_len))) {
974                 return NULL;
975         }
976
977         memcpy(dup_event, event, event_len);
978
979         return dup_event;
980 }
981
982 struct ast_event *ast_event_get_cached(enum ast_event_type type, ...)
983 {
984         va_list ap;
985         enum ast_event_ie_type ie_type;
986         struct ast_event *dup_event = NULL;
987         struct ast_event_ref *cached_event_ref;
988         struct ast_event *cache_arg_event;
989         struct ast_event_ref tmp_event_ref = {
990                 .event = NULL,
991         };
992         struct ao2_container *container = NULL;
993
994         if (type >= AST_EVENT_TOTAL) {
995                 ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
996                 return NULL;
997         }
998
999         if (!(container = ast_event_cache[type].container)) {
1000                 ast_log(LOG_ERROR, "%u is not a cached event type\n", type);
1001                 return NULL;
1002         }
1003
1004         if (!(cache_arg_event = ast_event_new(type, AST_EVENT_IE_END))) {
1005                 return NULL;
1006         }
1007
1008         va_start(ap, type);
1009         for (ie_type = va_arg(ap, enum ast_event_type);
1010                 ie_type != AST_EVENT_IE_END;
1011                 ie_type = va_arg(ap, enum ast_event_type))
1012         {
1013                 enum ast_event_ie_pltype ie_pltype;
1014
1015                 ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
1016
1017                 switch (ie_pltype) {
1018                 case AST_EVENT_IE_PLTYPE_UINT:
1019                         ast_event_append_ie_uint(&cache_arg_event, ie_type, va_arg(ap, uint32_t));
1020                         break;
1021                 case AST_EVENT_IE_PLTYPE_STR:
1022                         ast_event_append_ie_str(&cache_arg_event, ie_type, va_arg(ap, const char *));
1023                         break;
1024                 case AST_EVENT_IE_PLTYPE_RAW:
1025                 {
1026                         void *data = va_arg(ap, void *);
1027                         size_t datalen = va_arg(ap, size_t);
1028                         ast_event_append_ie_raw(&cache_arg_event, ie_type, data, datalen);
1029                 }
1030                 case AST_EVENT_IE_PLTYPE_EXISTS:
1031                         ast_log(LOG_WARNING, "PLTYPE_EXISTS not supported by this function\n");
1032                         break;
1033                 case AST_EVENT_IE_PLTYPE_UNKNOWN:
1034                         break;
1035                 }
1036         }
1037         va_end(ap);
1038
1039         tmp_event_ref.event = cache_arg_event;
1040
1041         cached_event_ref = ao2_find(container, &tmp_event_ref, OBJ_POINTER);
1042
1043         ast_event_destroy(cache_arg_event);
1044         cache_arg_event = NULL;
1045
1046         if (cached_event_ref) {
1047                 dup_event = ast_event_dup(cached_event_ref->event);
1048                 ao2_ref(cached_event_ref, -1);
1049                 cached_event_ref = NULL;
1050         }
1051
1052         return dup_event;
1053 }
1054
1055 static struct ast_event_ref *alloc_event_ref(void)
1056 {
1057         return ao2_alloc(sizeof(struct ast_event_ref), ast_event_ref_destroy);
1058 }
1059
1060 /*! \brief Duplicate an event and add it to the cache
1061  * \note This assumes this index in to the cache is locked */
1062 static int attribute_unused ast_event_dup_and_cache(const struct ast_event *event)
1063 {
1064         struct ast_event *dup_event;
1065         struct ast_event_ref *event_ref;
1066
1067         if (!(dup_event = ast_event_dup(event))) {
1068                 return -1;
1069         }
1070
1071         if (!(event_ref = alloc_event_ref())) {
1072                 ast_event_destroy(dup_event);
1073                 return -1;
1074         }
1075
1076         event_ref->event = dup_event;
1077
1078         ao2_link(ast_event_cache[ast_event_get_type(event)].container, event_ref);
1079
1080         ao2_ref(event_ref, -1);
1081
1082         return 0;
1083 }
1084
1085 int ast_event_queue_and_cache(struct ast_event *event)
1086 {
1087         struct ao2_container *container;
1088         struct ast_event_ref tmp_event_ref = {
1089                 .event = event,
1090         };
1091
1092         if (!(container = ast_event_cache[ast_event_get_type(event)].container)) {
1093                 ast_log(LOG_WARNING, "cache requested for non-cached event type\n");
1094                 goto queue_event;
1095         }
1096
1097         /* Remove matches from the cache */
1098         ao2_callback(container, OBJ_POINTER | OBJ_UNLINK | OBJ_MULTIPLE | OBJ_NODATA,
1099                         ast_event_cmp, &tmp_event_ref);
1100
1101 queue_event:
1102         return ast_event_queue(event);
1103 }
1104
1105 static int handle_event(void *data)
1106 {
1107         struct ast_event_ref *event_ref = data;
1108         struct ast_event_sub *sub;
1109         uint16_t host_event_type;
1110
1111         host_event_type = ntohs(event_ref->event->type);
1112
1113         /* Subscribers to this specific event first */
1114         AST_RWDLLIST_RDLOCK(&ast_event_subs[host_event_type]);
1115         AST_RWDLLIST_TRAVERSE(&ast_event_subs[host_event_type], sub, entry) {
1116                 struct ast_event_ie_val *ie_val;
1117                 AST_LIST_TRAVERSE(&sub->ie_vals, ie_val, entry) {
1118                         if (!match_ie_val(event_ref->event, ie_val, NULL)) {
1119                                 break;
1120                         }
1121                 }
1122                 if (ie_val) {
1123                         continue;
1124                 }
1125                 sub->cb(event_ref->event, sub->userdata);
1126         }
1127         AST_RWDLLIST_UNLOCK(&ast_event_subs[host_event_type]);
1128
1129         /* Now to subscribers to all event types */
1130         AST_RWDLLIST_RDLOCK(&ast_event_subs[AST_EVENT_ALL]);
1131         AST_RWDLLIST_TRAVERSE(&ast_event_subs[AST_EVENT_ALL], sub, entry) {
1132                 sub->cb(event_ref->event, sub->userdata);
1133         }
1134         AST_RWDLLIST_UNLOCK(&ast_event_subs[AST_EVENT_ALL]);
1135
1136         ao2_ref(event_ref, -1);
1137
1138         return 0;
1139 }
1140
1141 int ast_event_queue(struct ast_event *event)
1142 {
1143         struct ast_event_ref *event_ref;
1144         uint16_t host_event_type;
1145
1146         host_event_type = ntohs(event->type);
1147
1148         /* Invalid type */
1149         if (host_event_type >= AST_EVENT_TOTAL) {
1150                 ast_log(LOG_WARNING, "Someone tried to queue an event of invalid "
1151                         "type '%d'!\n", host_event_type);
1152                 return -1;
1153         }
1154
1155         /* If nobody has subscribed to this event type, throw it away now */
1156         if (ast_event_check_subscriber(host_event_type, AST_EVENT_IE_END)
1157                         == AST_EVENT_SUB_NONE) {
1158                 ast_event_destroy(event);
1159                 return 0;
1160         }
1161
1162         if (!(event_ref = alloc_event_ref())) {
1163                 return -1;
1164         }
1165
1166         event_ref->event = event;
1167
1168         return ast_taskprocessor_push(event_dispatcher, handle_event, event_ref);
1169 }
1170
1171 static int ast_event_hash_mwi(const void *obj, const int flags)
1172 {
1173         const struct ast_event *event = obj;
1174         const char *mailbox = ast_event_get_ie_str(event, AST_EVENT_IE_MAILBOX);
1175         const char *context = ast_event_get_ie_str(event, AST_EVENT_IE_CONTEXT);
1176
1177         return ast_str_hash_add(context, ast_str_hash(mailbox));
1178 }
1179
1180 /*!
1181  * \internal
1182  * \brief Hash function for AST_EVENT_DEVICE_STATE
1183  *
1184  * \param[in] obj an ast_event
1185  * \param[in] flags unused
1186  *
1187  * \return hash value
1188  */
1189 static int ast_event_hash_devstate(const void *obj, const int flags)
1190 {
1191         const struct ast_event *event = obj;
1192
1193         return ast_str_hash(ast_event_get_ie_str(event, AST_EVENT_IE_DEVICE));
1194 }
1195
1196 /*!
1197  * \internal
1198  * \brief Hash function for AST_EVENT_DEVICE_STATE_CHANGE
1199  *
1200  * \param[in] obj an ast_event
1201  * \param[in] flags unused
1202  *
1203  * \return hash value
1204  */
1205 static int ast_event_hash_devstate_change(const void *obj, const int flags)
1206 {
1207         const struct ast_event *event = obj;
1208
1209         return ast_str_hash(ast_event_get_ie_str(event, AST_EVENT_IE_DEVICE));
1210 }
1211
1212 static int ast_event_hash(const void *obj, const int flags)
1213 {
1214         const struct ast_event_ref *event_ref;
1215         const struct ast_event *event;
1216         ao2_hash_fn *hash_fn;
1217
1218         event_ref = obj;
1219         event = event_ref->event;
1220
1221         if (!(hash_fn = ast_event_cache[ast_event_get_type(event)].hash_fn)) {
1222                 return 0;
1223         }
1224
1225         return hash_fn(event, flags);
1226 }
1227
1228 /*!
1229  * \internal
1230  * \brief Compare two events
1231  *
1232  * \param[in] obj the first event, as an ast_event_ref
1233  * \param[in] arg the second event, as an ast_event_ref
1234  * \param[in] flags unused
1235  *
1236  * \pre Both events must be the same type.
1237  * \pre The event type must be declared as a cached event type in ast_event_cache
1238  *
1239  * \details This function takes two events, and determines if they are considered
1240  * equivalent.  The values of information elements specified in the cache arguments
1241  * for the event type are used to determine if the events are equivalent.
1242  *
1243  * \retval 0 No match
1244  * \retval CMP_MATCH The events are considered equivalent based on the cache arguments
1245  */
1246 static int ast_event_cmp(void *obj, void *arg, int flags)
1247 {
1248         struct ast_event_ref *event_ref, *event_ref2;
1249         struct ast_event *event, *event2;
1250         int res = CMP_MATCH;
1251         int i;
1252         enum ast_event_ie_type *cache_args;
1253
1254         event_ref = obj;
1255         event = event_ref->event;
1256
1257         event_ref2 = arg;
1258         event2 = event_ref2->event;
1259
1260         cache_args = ast_event_cache[ast_event_get_type(event)].cache_args;
1261
1262         for (i = 0; i < ARRAY_LEN(ast_event_cache[0].cache_args) && cache_args[i]; i++) {
1263                 struct ast_event_ie_val ie_val = {
1264                         .ie_type = cache_args[i],
1265                 };
1266
1267                 if (!match_ie_val(event, &ie_val, event2)) {
1268                         res = 0;
1269                         break;
1270                 }
1271         }
1272
1273         return res;
1274 }
1275
1276 int ast_event_init(void)
1277 {
1278         int i;
1279
1280         for (i = 0; i < AST_EVENT_TOTAL; i++) {
1281                 AST_RWDLLIST_HEAD_INIT(&ast_event_subs[i]);
1282         }
1283
1284         for (i = 0; i < AST_EVENT_TOTAL; i++) {
1285                 if (!ast_event_cache[i].hash_fn) {
1286                         /* This event type is not cached. */
1287                         continue;
1288                 }
1289
1290                 if (!(ast_event_cache[i].container = ao2_container_alloc(NUM_CACHE_BUCKETS,
1291                                 ast_event_hash, ast_event_cmp))) {
1292                         return -1;
1293                 }
1294         }
1295
1296         if (!(event_dispatcher = ast_taskprocessor_get("core_event_dispatcher", 0))) {
1297                 return -1;
1298         }
1299
1300         return 0;
1301 }