git-svn-id: https://origsvn.digium.com/svn/asterisk/trunk@67864 65c4cc65-6c06-0410-ace0-fbb531ad65f3
775 lines
21 KiB
C
775 lines
21 KiB
C
/*
|
|
* Asterisk -- An open source telephony toolkit.
|
|
*
|
|
* Copyright (C) 2007, Digium, Inc.
|
|
*
|
|
* Russell Bryant <russell@digium.com>
|
|
*
|
|
* See http://www.asterisk.org for more information about
|
|
* the Asterisk project. Please do not directly contact
|
|
* any of the maintainers of this project for assistance;
|
|
* the project provides a web site, mailing lists and IRC
|
|
* channels for your use.
|
|
*
|
|
* This program is free software, distributed under the terms of
|
|
* the GNU General Public License Version 2. See the LICENSE file
|
|
* at the top of the source tree.
|
|
*/
|
|
|
|
/*! \file
|
|
*
|
|
* \brief Internal generic event system
|
|
*
|
|
* \author Russell Bryant <russell@digium.com>
|
|
*/
|
|
|
|
#include "asterisk.h"
|
|
|
|
ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
#include "asterisk/event.h"
|
|
#include "asterisk/linkedlists.h"
|
|
#include "asterisk/lock.h"
|
|
#include "asterisk/utils.h"
|
|
|
|
#define NUM_EVENT_THREADS 5
|
|
|
|
struct ast_event_ie {
|
|
enum ast_event_ie_type ie_type:16;
|
|
/*! Total length of the IE payload */
|
|
uint16_t ie_payload_len;
|
|
unsigned char ie_payload[0];
|
|
} __attribute__ ((packed));
|
|
|
|
/*!
|
|
* \brief An event
|
|
*
|
|
* \note The format of this structure is important, and can not change, since
|
|
* they are sent directly over the network (via IAX2).
|
|
*
|
|
*/
|
|
struct ast_event {
|
|
/*! Event type */
|
|
enum ast_event_type type:16;
|
|
/*! Total length of the event */
|
|
uint16_t event_len:16;
|
|
/*! The data payload of the event, made up of information elements */
|
|
unsigned char payload[0];
|
|
} __attribute__ ((packed));
|
|
|
|
struct ast_event_ref {
|
|
struct ast_event *event;
|
|
AST_LIST_ENTRY(ast_event_ref) entry;
|
|
};
|
|
|
|
/*! \brief data shared between event dispatching threads */
|
|
static struct {
|
|
ast_cond_t cond;
|
|
ast_mutex_t lock;
|
|
AST_LIST_HEAD_NOLOCK(, ast_event_ref) event_q;
|
|
} event_thread = {
|
|
.lock = AST_MUTEX_INIT_VALUE,
|
|
};
|
|
|
|
struct ast_event_ie_val {
|
|
AST_LIST_ENTRY(ast_event_ie_val) entry;
|
|
enum ast_event_ie_type ie_type;
|
|
enum ast_event_ie_pltype ie_pltype;
|
|
union {
|
|
uint32_t uint;
|
|
const char *str;
|
|
} payload;
|
|
};
|
|
|
|
/*! \brief Event subscription */
|
|
struct ast_event_sub {
|
|
enum ast_event_type type;
|
|
ast_event_cb_t cb;
|
|
void *userdata;
|
|
uint32_t uniqueid;
|
|
AST_LIST_HEAD_NOLOCK(, ast_event_ie_val) ie_vals;
|
|
AST_RWLIST_ENTRY(ast_event_sub) entry;
|
|
};
|
|
|
|
static uint32_t sub_uniqueid;
|
|
|
|
/*! \brief Event subscriptions
|
|
* The event subscribers are indexed by which event they are subscribed to */
|
|
static AST_RWLIST_HEAD(ast_event_sub_list, ast_event_sub) ast_event_subs[AST_EVENT_TOTAL];
|
|
|
|
/*! \brief Cached events
|
|
* The event cache is indexed on the event type. The purpose of this is
|
|
* for events that express some sort of state. So, when someone first
|
|
* needs to know this state, it can get the last known state from the cache. */
|
|
static AST_RWLIST_HEAD(ast_event_ref_list, ast_event_ref) ast_event_cache[AST_EVENT_TOTAL];
|
|
|
|
static void ast_event_ie_val_destroy(struct ast_event_ie_val *ie_val)
|
|
{
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
|
|
ast_free((void *) ie_val->payload.str);
|
|
|
|
ast_free(ie_val);
|
|
}
|
|
|
|
enum ast_event_subscriber_res ast_event_check_subscriber(enum ast_event_type type, ...)
|
|
{
|
|
va_list ap;
|
|
enum ast_event_ie_type ie_type;
|
|
enum ast_event_subscriber_res res = AST_EVENT_SUB_NONE;
|
|
struct ast_event_ie_val *ie_val, *sub_ie_val;
|
|
struct ast_event_sub *sub;
|
|
AST_LIST_HEAD_NOLOCK_STATIC(ie_vals, ast_event_ie_val);
|
|
|
|
if (type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
|
|
return res;
|
|
}
|
|
|
|
va_start(ap, type);
|
|
for (ie_type = va_arg(ap, enum ast_event_type);
|
|
ie_type != AST_EVENT_IE_END;
|
|
ie_type = va_arg(ap, enum ast_event_type))
|
|
{
|
|
struct ast_event_ie_val *ie_val = alloca(sizeof(*ie_val));
|
|
memset(ie_val, 0, sizeof(*ie_val));
|
|
ie_val->ie_type = ie_type;
|
|
ie_val->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
|
|
ie_val->payload.uint = va_arg(ap, uint32_t);
|
|
else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
|
|
ie_val->payload.str = ast_strdupa(va_arg(ap, const char *));
|
|
AST_LIST_INSERT_TAIL(&ie_vals, ie_val, entry);
|
|
}
|
|
va_end(ap);
|
|
|
|
AST_RWLIST_RDLOCK(&ast_event_subs[type]);
|
|
AST_RWLIST_TRAVERSE(&ast_event_subs[type], sub, entry) {
|
|
AST_LIST_TRAVERSE(&ie_vals, ie_val, entry) {
|
|
AST_LIST_TRAVERSE(&sub->ie_vals, sub_ie_val, entry) {
|
|
if (sub_ie_val->ie_type == ie_val->ie_type)
|
|
break;
|
|
}
|
|
if (!sub_ie_val) {
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS)
|
|
break;
|
|
continue;
|
|
}
|
|
/* The subscriber doesn't actually care what the value is */
|
|
if (sub_ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS)
|
|
continue;
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT &&
|
|
ie_val->payload.uint != sub_ie_val->payload.uint)
|
|
break;
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR &&
|
|
strcmp(ie_val->payload.str, sub_ie_val->payload.str))
|
|
break;
|
|
}
|
|
if (!ie_val)
|
|
break;
|
|
}
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[type]);
|
|
|
|
if (sub) /* All parameters were matched */
|
|
return AST_EVENT_SUB_EXISTS;
|
|
|
|
AST_RWLIST_RDLOCK(&ast_event_subs[AST_EVENT_ALL]);
|
|
if (!AST_LIST_EMPTY(&ast_event_subs[AST_EVENT_ALL]))
|
|
res = AST_EVENT_SUB_EXISTS;
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[AST_EVENT_ALL]);
|
|
|
|
return res;
|
|
}
|
|
|
|
/*! \brief Send AST_EVENT_SUB events to this subscriber of ... subscriber events */
|
|
void ast_event_report_subs(const struct ast_event_sub *event_sub)
|
|
{
|
|
struct ast_event *event;
|
|
struct ast_event_sub *sub;
|
|
enum ast_event_type event_type = -1;
|
|
struct ast_event_ie_val *ie_val;
|
|
|
|
if (event_sub->type != AST_EVENT_SUB)
|
|
return;
|
|
|
|
AST_LIST_TRAVERSE(&event_sub->ie_vals, ie_val, entry) {
|
|
if (ie_val->ie_type == AST_EVENT_IE_EVENTTYPE) {
|
|
event_type = ie_val->payload.uint;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (event_type == -1)
|
|
return;
|
|
|
|
AST_RWLIST_RDLOCK(&ast_event_subs[event_type]);
|
|
AST_RWLIST_TRAVERSE(&ast_event_subs[event_type], sub, entry) {
|
|
if (event_sub == sub)
|
|
continue;
|
|
|
|
event = ast_event_new(AST_EVENT_SUB,
|
|
AST_EVENT_IE_UNIQUEID, AST_EVENT_IE_PLTYPE_UINT, sub->uniqueid,
|
|
AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
|
|
AST_EVENT_IE_END);
|
|
|
|
AST_LIST_TRAVERSE(&sub->ie_vals, ie_val, entry) {
|
|
switch (ie_val->ie_pltype) {
|
|
case AST_EVENT_IE_PLTYPE_EXISTS:
|
|
ast_event_append_ie_uint(&event, AST_EVENT_IE_EXISTS, ie_val->ie_type);
|
|
break;
|
|
case AST_EVENT_IE_PLTYPE_UINT:
|
|
ast_event_append_ie_uint(&event, ie_val->ie_type, ie_val->payload.uint);
|
|
break;
|
|
case AST_EVENT_IE_PLTYPE_STR:
|
|
ast_event_append_ie_str(&event, ie_val->ie_type, ie_val->payload.str);
|
|
break;
|
|
}
|
|
if (!event)
|
|
break;
|
|
}
|
|
|
|
if (!event)
|
|
continue;
|
|
|
|
event_sub->cb(event, event_sub->userdata);
|
|
|
|
ast_event_destroy(event);
|
|
}
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[event_type]);
|
|
}
|
|
|
|
struct ast_event_sub *ast_event_subscribe(enum ast_event_type type, ast_event_cb_t cb,
|
|
void *userdata, ...)
|
|
{
|
|
va_list ap;
|
|
enum ast_event_ie_type ie_type;
|
|
struct ast_event_sub *sub;
|
|
struct ast_event *event;
|
|
|
|
if (type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
|
|
return NULL;
|
|
}
|
|
|
|
if (!(sub = ast_calloc(1, sizeof(*sub))))
|
|
return NULL;
|
|
|
|
va_start(ap, userdata);
|
|
for (ie_type = va_arg(ap, enum ast_event_type);
|
|
ie_type != AST_EVENT_IE_END;
|
|
ie_type = va_arg(ap, enum ast_event_type))
|
|
{
|
|
struct ast_event_ie_val *ie_val;
|
|
if (!(ie_val = ast_calloc(1, sizeof(*ie_val))))
|
|
continue;
|
|
ie_val->ie_type = ie_type;
|
|
ie_val->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
|
|
ie_val->payload.uint = va_arg(ap, uint32_t);
|
|
else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR) {
|
|
if (!(ie_val->payload.str = ast_strdup(va_arg(ap, const char *)))) {
|
|
ast_free(ie_val);
|
|
continue;
|
|
}
|
|
}
|
|
AST_LIST_INSERT_TAIL(&sub->ie_vals, ie_val, entry);
|
|
}
|
|
va_end(ap);
|
|
|
|
sub->type = type;
|
|
sub->cb = cb;
|
|
sub->userdata = userdata;
|
|
sub->uniqueid = ast_atomic_fetchadd_int((int *) &sub_uniqueid, 1);
|
|
|
|
if (ast_event_check_subscriber(AST_EVENT_SUB,
|
|
AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, type,
|
|
AST_EVENT_IE_END) != AST_EVENT_SUB_NONE) {
|
|
struct ast_event_ie_val *ie_val;
|
|
|
|
event = ast_event_new(AST_EVENT_SUB,
|
|
AST_EVENT_IE_UNIQUEID, AST_EVENT_IE_PLTYPE_UINT, sub->uniqueid,
|
|
AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
|
|
AST_EVENT_IE_END);
|
|
|
|
AST_LIST_TRAVERSE(&sub->ie_vals, ie_val, entry) {
|
|
switch (ie_val->ie_pltype) {
|
|
case AST_EVENT_IE_PLTYPE_EXISTS:
|
|
ast_event_append_ie_uint(&event, AST_EVENT_IE_EXISTS, ie_val->ie_type);
|
|
break;
|
|
case AST_EVENT_IE_PLTYPE_UINT:
|
|
ast_event_append_ie_uint(&event, ie_val->ie_type, ie_val->payload.uint);
|
|
break;
|
|
case AST_EVENT_IE_PLTYPE_STR:
|
|
ast_event_append_ie_str(&event, ie_val->ie_type, ie_val->payload.str);
|
|
break;
|
|
}
|
|
if (!event)
|
|
break;
|
|
}
|
|
|
|
if (event)
|
|
ast_event_queue(event);
|
|
}
|
|
|
|
AST_RWLIST_WRLOCK(&ast_event_subs[type]);
|
|
AST_RWLIST_INSERT_TAIL(&ast_event_subs[type], sub, entry);
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[type]);
|
|
|
|
return sub;
|
|
}
|
|
|
|
static void ast_event_sub_destroy(struct ast_event_sub *sub)
|
|
{
|
|
struct ast_event_ie_val *ie_val;
|
|
|
|
while ((ie_val = AST_LIST_REMOVE_HEAD(&sub->ie_vals, entry)))
|
|
ast_event_ie_val_destroy(ie_val);
|
|
|
|
ast_free(sub);
|
|
}
|
|
|
|
void ast_event_unsubscribe(struct ast_event_sub *sub)
|
|
{
|
|
struct ast_event *event;
|
|
|
|
AST_RWLIST_WRLOCK(&ast_event_subs[sub->type]);
|
|
AST_LIST_REMOVE(&ast_event_subs[sub->type], sub, entry);
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[sub->type]);
|
|
|
|
if (ast_event_check_subscriber(AST_EVENT_UNSUB,
|
|
AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
|
|
AST_EVENT_IE_END) != AST_EVENT_SUB_NONE) {
|
|
|
|
event = ast_event_new(AST_EVENT_UNSUB,
|
|
AST_EVENT_IE_UNIQUEID, AST_EVENT_IE_PLTYPE_UINT, sub->uniqueid,
|
|
AST_EVENT_IE_EVENTTYPE, AST_EVENT_IE_PLTYPE_UINT, sub->type,
|
|
AST_EVENT_IE_END);
|
|
|
|
if (event)
|
|
ast_event_queue(event);
|
|
}
|
|
|
|
ast_event_sub_destroy(sub);
|
|
}
|
|
|
|
enum ast_event_type ast_event_get_type(const struct ast_event *event)
|
|
{
|
|
return ntohs(event->type);
|
|
}
|
|
|
|
uint32_t ast_event_get_ie_uint(const struct ast_event *event, enum ast_event_ie_type ie_type)
|
|
{
|
|
const uint32_t *ie_val;
|
|
|
|
ie_val = ast_event_get_ie_raw(event, ie_type);
|
|
|
|
return ie_val ? ntohl(*ie_val) : 0;
|
|
}
|
|
|
|
const char *ast_event_get_ie_str(const struct ast_event *event, enum ast_event_ie_type ie_type)
|
|
{
|
|
return ast_event_get_ie_raw(event, ie_type);
|
|
}
|
|
|
|
const void *ast_event_get_ie_raw(const struct ast_event *event, enum ast_event_ie_type ie_type)
|
|
{
|
|
struct ast_event_ie *ie;
|
|
uint16_t event_len;
|
|
|
|
ie_type = ntohs(ie_type);
|
|
event_len = ntohs(event->event_len);
|
|
|
|
ie = ((void *) event) + sizeof(*event);
|
|
|
|
while ((((void *) ie) - ((void *) event)) < event_len) {
|
|
if (ie->ie_type == ie_type)
|
|
return ie->ie_payload;
|
|
ie = ((void *) ie) + sizeof(*ie) + ntohs(ie->ie_payload_len);
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
int ast_event_append_ie_str(struct ast_event **event, enum ast_event_ie_type ie_type,
|
|
const char *str)
|
|
{
|
|
return ast_event_append_ie_raw(event, ie_type, str, strlen(str) + 1);
|
|
}
|
|
|
|
int ast_event_append_ie_uint(struct ast_event **event, enum ast_event_ie_type ie_type,
|
|
uint32_t data)
|
|
{
|
|
data = htonl(data);
|
|
return ast_event_append_ie_raw(event, ie_type, &data, sizeof(data));
|
|
}
|
|
|
|
int ast_event_append_ie_raw(struct ast_event **event, enum ast_event_ie_type ie_type,
|
|
const void *data, size_t data_len)
|
|
{
|
|
struct ast_event_ie *ie;
|
|
unsigned int extra_len;
|
|
uint16_t event_len;
|
|
|
|
event_len = ntohs((*event)->event_len);
|
|
extra_len = sizeof(*ie) + data_len;
|
|
|
|
if (!(*event = ast_realloc(*event, event_len + extra_len)))
|
|
return -1;
|
|
|
|
ie = ((void *) *event) + event_len;
|
|
ie->ie_type = htons(ie_type);
|
|
ie->ie_payload_len = htons(data_len);
|
|
memcpy(ie->ie_payload, data, data_len);
|
|
|
|
(*event)->event_len = htons(event_len + extra_len);
|
|
|
|
return 0;
|
|
}
|
|
|
|
struct ast_event *ast_event_new(enum ast_event_type type, ...)
|
|
{
|
|
va_list ap;
|
|
struct ast_event *event;
|
|
enum ast_event_type ie_type;
|
|
struct ast_event_ie_val *ie_val;
|
|
AST_LIST_HEAD_NOLOCK_STATIC(ie_vals, ast_event_ie_val);
|
|
|
|
/* Invalid type */
|
|
if (type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_WARNING, "Someone tried to create an event of invalid "
|
|
"type '%d'!\n", type);
|
|
return NULL;
|
|
}
|
|
|
|
va_start(ap, type);
|
|
for (ie_type = va_arg(ap, enum ast_event_type);
|
|
ie_type != AST_EVENT_IE_END;
|
|
ie_type = va_arg(ap, enum ast_event_type))
|
|
{
|
|
struct ast_event_ie_val *ie_val = alloca(sizeof(*ie_val));
|
|
memset(ie_val, 0, sizeof(*ie_val));
|
|
ie_val->ie_type = ie_type;
|
|
ie_val->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
|
|
ie_val->payload.uint = va_arg(ap, uint32_t);
|
|
else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
|
|
ie_val->payload.str = ast_strdupa(va_arg(ap, const char *));
|
|
AST_LIST_INSERT_TAIL(&ie_vals, ie_val, entry);
|
|
}
|
|
va_end(ap);
|
|
|
|
if (!(event = ast_calloc(1, sizeof(*event))))
|
|
return NULL;
|
|
|
|
event->type = htons(type);
|
|
event->event_len = htons(sizeof(*event));
|
|
|
|
AST_LIST_TRAVERSE(&ie_vals, ie_val, entry) {
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
|
|
ast_event_append_ie_str(&event, ie_val->ie_type, ie_val->payload.str);
|
|
else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
|
|
ast_event_append_ie_uint(&event, ie_val->ie_type, ie_val->payload.uint);
|
|
|
|
if (!event)
|
|
break;
|
|
}
|
|
|
|
return event;
|
|
}
|
|
|
|
void ast_event_destroy(struct ast_event *event)
|
|
{
|
|
ast_free(event);
|
|
}
|
|
|
|
static void ast_event_ref_destroy(struct ast_event_ref *event_ref)
|
|
{
|
|
ast_event_destroy(event_ref->event);
|
|
ast_free(event_ref);
|
|
}
|
|
|
|
static struct ast_event *ast_event_dup(const struct ast_event *event)
|
|
{
|
|
struct ast_event *dup_event;
|
|
uint16_t event_len;
|
|
|
|
event_len = ntohs(event->event_len);
|
|
|
|
if (!(dup_event = ast_calloc(1, event_len)))
|
|
return NULL;
|
|
|
|
memcpy(dup_event, event, event_len);
|
|
|
|
return dup_event;
|
|
}
|
|
|
|
struct ast_event *ast_event_get_cached(enum ast_event_type type, ...)
|
|
{
|
|
va_list ap;
|
|
enum ast_event_ie_type ie_type;
|
|
struct ast_event *dup_event = NULL;
|
|
struct ast_event_ref *event_ref;
|
|
struct cache_arg {
|
|
AST_LIST_ENTRY(cache_arg) entry;
|
|
enum ast_event_ie_type ie_type;
|
|
enum ast_event_ie_pltype ie_pltype;
|
|
union {
|
|
uint32_t uint;
|
|
const char *str;
|
|
} payload;
|
|
} *cache_arg;
|
|
AST_LIST_HEAD_NOLOCK_STATIC(cache_args, cache_arg);
|
|
|
|
if (type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_ERROR, "%u is an invalid type!\n", type);
|
|
return NULL;
|
|
}
|
|
|
|
va_start(ap, type);
|
|
for (ie_type = va_arg(ap, enum ast_event_type);
|
|
ie_type != AST_EVENT_IE_END;
|
|
ie_type = va_arg(ap, enum ast_event_type))
|
|
{
|
|
cache_arg = alloca(sizeof(*cache_arg));
|
|
memset(cache_arg, 0, sizeof(*cache_arg));
|
|
cache_arg->ie_type = ie_type;
|
|
cache_arg->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
|
|
if (cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_UINT)
|
|
cache_arg->payload.uint = va_arg(ap, uint32_t);
|
|
else if (cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_STR)
|
|
cache_arg->payload.str = ast_strdupa(va_arg(ap, const char *));
|
|
AST_LIST_INSERT_TAIL(&cache_args, cache_arg, entry);
|
|
}
|
|
va_end(ap);
|
|
|
|
if (AST_LIST_EMPTY(&cache_args)) {
|
|
ast_log(LOG_ERROR, "Events can not be retrieved from the cache without "
|
|
"specifying at least one IE type!\n");
|
|
return NULL;
|
|
}
|
|
|
|
AST_RWLIST_RDLOCK(&ast_event_cache[type]);
|
|
AST_RWLIST_TRAVERSE_SAFE_BEGIN(&ast_event_cache[type], event_ref, entry) {
|
|
AST_LIST_TRAVERSE(&cache_args, cache_arg, entry) {
|
|
if ( ! ( (cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_UINT &&
|
|
(cache_arg->payload.uint ==
|
|
ast_event_get_ie_uint(event_ref->event, cache_arg->ie_type))) ||
|
|
|
|
(cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_STR &&
|
|
(!strcmp(cache_arg->payload.str,
|
|
ast_event_get_ie_str(event_ref->event, cache_arg->ie_type)))) ||
|
|
|
|
(cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS &&
|
|
ast_event_get_ie_raw(event_ref->event, cache_arg->ie_type)) ) )
|
|
{
|
|
break;
|
|
}
|
|
}
|
|
if (!cache_arg) {
|
|
/* All parameters were matched on this cache entry, so return it */
|
|
dup_event = ast_event_dup(event_ref->event);
|
|
break;
|
|
}
|
|
}
|
|
AST_RWLIST_TRAVERSE_SAFE_END
|
|
AST_RWLIST_UNLOCK(&ast_event_cache[type]);
|
|
|
|
return dup_event;
|
|
}
|
|
|
|
/*! \brief Duplicate an event and add it to the cache
|
|
* \note This assumes this index in to the cache is locked */
|
|
static int ast_event_dup_and_cache(const struct ast_event *event)
|
|
{
|
|
struct ast_event *dup_event;
|
|
struct ast_event_ref *event_ref;
|
|
|
|
if (!(dup_event = ast_event_dup(event)))
|
|
return -1;
|
|
if (!(event_ref = ast_calloc(1, sizeof(*event_ref))))
|
|
return -1;
|
|
|
|
event_ref->event = dup_event;
|
|
|
|
AST_LIST_INSERT_TAIL(&ast_event_cache[ntohs(event->type)], event_ref, entry);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int ast_event_queue_and_cache(struct ast_event *event, ...)
|
|
{
|
|
va_list ap;
|
|
enum ast_event_type ie_type;
|
|
uint16_t host_event_type;
|
|
struct ast_event_ref *event_ref;
|
|
int res;
|
|
struct cache_arg {
|
|
AST_LIST_ENTRY(cache_arg) entry;
|
|
enum ast_event_ie_type ie_type;
|
|
enum ast_event_ie_pltype ie_pltype;
|
|
} *cache_arg;
|
|
AST_LIST_HEAD_NOLOCK_STATIC(cache_args, cache_arg);
|
|
|
|
host_event_type = ntohs(event->type);
|
|
|
|
/* Invalid type */
|
|
if (host_event_type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_WARNING, "Someone tried to queue an event of invalid "
|
|
"type '%d'!\n", host_event_type);
|
|
return -1;
|
|
}
|
|
|
|
va_start(ap, event);
|
|
for (ie_type = va_arg(ap, enum ast_event_type);
|
|
ie_type != AST_EVENT_IE_END;
|
|
ie_type = va_arg(ap, enum ast_event_type))
|
|
{
|
|
cache_arg = alloca(sizeof(*cache_arg));
|
|
memset(cache_arg, 0, sizeof(*cache_arg));
|
|
cache_arg->ie_type = ie_type;
|
|
cache_arg->ie_pltype = va_arg(ap, enum ast_event_ie_pltype);
|
|
AST_LIST_INSERT_TAIL(&cache_args, cache_arg, entry);
|
|
}
|
|
va_end(ap);
|
|
|
|
if (AST_LIST_EMPTY(&cache_args)) {
|
|
ast_log(LOG_ERROR, "Events can not be cached without specifying at "
|
|
"least one IE type!\n");
|
|
return ast_event_queue(event);
|
|
}
|
|
|
|
AST_RWLIST_WRLOCK(&ast_event_cache[host_event_type]);
|
|
AST_RWLIST_TRAVERSE_SAFE_BEGIN(&ast_event_cache[host_event_type], event_ref, entry) {
|
|
AST_LIST_TRAVERSE(&cache_args, cache_arg, entry) {
|
|
if ( ! ( (cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_UINT &&
|
|
(ast_event_get_ie_uint(event, cache_arg->ie_type) ==
|
|
ast_event_get_ie_uint(event_ref->event, cache_arg->ie_type))) ||
|
|
|
|
(cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_STR &&
|
|
(!strcmp(ast_event_get_ie_str(event, cache_arg->ie_type),
|
|
ast_event_get_ie_str(event_ref->event, cache_arg->ie_type)))) ||
|
|
|
|
(cache_arg->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS &&
|
|
ast_event_get_ie_raw(event_ref->event, cache_arg->ie_type)) ) )
|
|
{
|
|
break;
|
|
}
|
|
}
|
|
if (!cache_arg) {
|
|
/* All parameters were matched on this cache entry, so remove it */
|
|
AST_LIST_REMOVE_CURRENT(&ast_event_cache[host_event_type], entry);
|
|
ast_event_ref_destroy(event_ref);
|
|
}
|
|
}
|
|
AST_RWLIST_TRAVERSE_SAFE_END
|
|
res = ast_event_dup_and_cache(event);
|
|
AST_RWLIST_UNLOCK(&ast_event_cache[host_event_type]);
|
|
|
|
return (ast_event_queue(event) || res) ? -1 : 0;
|
|
}
|
|
|
|
int ast_event_queue(struct ast_event *event)
|
|
{
|
|
struct ast_event_ref *event_ref;
|
|
uint16_t host_event_type;
|
|
|
|
host_event_type = ntohs(event->type);
|
|
|
|
/* Invalid type */
|
|
if (host_event_type >= AST_EVENT_TOTAL) {
|
|
ast_log(LOG_WARNING, "Someone tried to queue an event of invalid "
|
|
"type '%d'!\n", host_event_type);
|
|
return -1;
|
|
}
|
|
|
|
/* If nobody has subscribed to this event type, throw it away now */
|
|
if (ast_event_check_subscriber(host_event_type, AST_EVENT_IE_END)
|
|
== AST_EVENT_SUB_NONE) {
|
|
ast_event_destroy(event);
|
|
return 0;
|
|
}
|
|
|
|
if (!(event_ref = ast_calloc(1, sizeof(*event_ref))))
|
|
return -1;
|
|
|
|
event_ref->event = event;
|
|
|
|
ast_mutex_lock(&event_thread.lock);
|
|
AST_LIST_INSERT_TAIL(&event_thread.event_q, event_ref, entry);
|
|
ast_cond_signal(&event_thread.cond);
|
|
ast_mutex_unlock(&event_thread.lock);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void *ast_event_dispatcher(void *unused)
|
|
{
|
|
for (;;) {
|
|
struct ast_event_ref *event_ref;
|
|
struct ast_event_sub *sub;
|
|
uint16_t host_event_type;
|
|
|
|
ast_mutex_lock(&event_thread.lock);
|
|
while (!(event_ref = AST_LIST_REMOVE_HEAD(&event_thread.event_q, entry)))
|
|
ast_cond_wait(&event_thread.cond, &event_thread.lock);
|
|
ast_mutex_unlock(&event_thread.lock);
|
|
|
|
host_event_type = ntohs(event_ref->event->type);
|
|
|
|
/* Subscribers to this specific event first */
|
|
AST_RWLIST_RDLOCK(&ast_event_subs[host_event_type]);
|
|
AST_RWLIST_TRAVERSE(&ast_event_subs[host_event_type], sub, entry) {
|
|
struct ast_event_ie_val *ie_val;
|
|
AST_LIST_TRAVERSE(&sub->ie_vals, ie_val, entry) {
|
|
if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_EXISTS &&
|
|
ast_event_get_ie_raw(event_ref->event, ie_val->ie_type)) {
|
|
continue;
|
|
} else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_UINT &&
|
|
ast_event_get_ie_uint(event_ref->event, ie_val->ie_type)
|
|
== ie_val->payload.uint) {
|
|
continue;
|
|
} else if (ie_val->ie_pltype == AST_EVENT_IE_PLTYPE_STR &&
|
|
!strcmp(ast_event_get_ie_str(event_ref->event, ie_val->ie_type),
|
|
ie_val->payload.str)) {
|
|
continue;
|
|
}
|
|
break;
|
|
}
|
|
if (ie_val)
|
|
continue;
|
|
sub->cb(event_ref->event, sub->userdata);
|
|
}
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[host_event_type]);
|
|
|
|
/* Now to subscribers to all event types */
|
|
AST_RWLIST_RDLOCK(&ast_event_subs[AST_EVENT_ALL]);
|
|
AST_RWLIST_TRAVERSE(&ast_event_subs[AST_EVENT_ALL], sub, entry)
|
|
sub->cb(event_ref->event, sub->userdata);
|
|
AST_RWLIST_UNLOCK(&ast_event_subs[AST_EVENT_ALL]);
|
|
|
|
ast_event_ref_destroy(event_ref);
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
void ast_event_init(void)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < AST_EVENT_TOTAL; i++)
|
|
AST_RWLIST_HEAD_INIT(&ast_event_subs[i]);
|
|
|
|
for (i = 0; i < AST_EVENT_TOTAL; i++)
|
|
AST_RWLIST_HEAD_INIT(&ast_event_cache[i]);
|
|
|
|
ast_cond_init(&event_thread.cond, NULL);
|
|
|
|
for (i = 0; i < NUM_EVENT_THREADS; i++) {
|
|
pthread_t dont_care;
|
|
ast_pthread_create_background(&dont_care, NULL, ast_event_dispatcher, NULL);
|
|
}
|
|
}
|