res_rtp_asterisk: Avoid close the rtp/rtcp fd twice.
[asterisk/asterisk.git] / apps / app_bridgewait.c
index 070fe84..b17cddf 100644 (file)
@@ -34,8 +34,6 @@
 
 #include "asterisk.h"
 
-ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
-
 #include "asterisk/file.h"
 #include "asterisk/channel.h"
 #include "asterisk/pbx.h"
@@ -47,6 +45,8 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 #include "asterisk/app.h"
 #include "asterisk/bridge.h"
 #include "asterisk/musiconhold.h"
+#include "asterisk/astobj2.h"
+#include "asterisk/causes.h"
 
 /*** DOCUMENTATION
        <application name="BridgeWait" language="en_US">
@@ -54,6 +54,12 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
                        Put a call into the holding bridge.
                </synopsis>
                <syntax>
+                       <parameter name="name">
+                               <para>Name of the holding bridge to join. This is a handle for <literal>BridgeWait</literal>
+                               only and does not affect the actual bridges that are created. If not provided,
+                               the reserved name <literal>default</literal> will be used.
+                               </para>
+                       </parameter>
                        <parameter name="role" required="false">
                                <para>Defines the channel's purpose for entering the holding bridge. Values are case sensitive.
                                </para>
@@ -99,19 +105,82 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
                </syntax>
                <description>
                        <para>This application places the incoming channel into a holding bridge.
-                       The channel will then wait in the holding bridge until some
-                       event occurs which removes it from the holding bridge.</para>
+                       The channel will then wait in the holding bridge until some event occurs
+                       which removes it from the holding bridge.</para>
+                       <note><para>This application will answer calls which haven't already
+                       been answered.</para></note>
                </description>
        </application>
  ***/
-/* BUGBUG Add bridge name/id parameter to specify which holding bridge to join (required) */
-/* BUGBUG The channel may or may not be answered with the r option. */
-/* BUGBUG You should not place an announcer into a holding bridge with unanswered channels. */
 
-static char *app = "BridgeWait";
-static struct ast_bridge *holding_bridge;
+#define APP_NAME "BridgeWait"
+#define DEFAULT_BRIDGE_NAME "default"
+
+static struct ao2_container *wait_bridge_wrappers;
+
+struct wait_bridge_wrapper {
+       struct ast_bridge *bridge;     /*!< Bridge being wrapped by this wrapper */
+       char name[0];                  /*!< Name of the holding bridge wrapper */
+};
+
+static void wait_bridge_wrapper_destructor(void *obj)
+{
+       struct wait_bridge_wrapper *wrapper = obj;
+
+       if (wrapper->bridge) {
+               ast_bridge_destroy(wrapper->bridge, 0);
+       }
+}
+
+static struct wait_bridge_wrapper *wait_bridge_wrapper_find_by_name(const char *bridge_name)
+{
+       return ao2_find(wait_bridge_wrappers, bridge_name, OBJ_KEY);
+}
 
-AST_MUTEX_DEFINE_STATIC(bridgewait_lock);
+static int wait_bridge_hash_fn(const void *obj, const int flags)
+{
+       const struct wait_bridge_wrapper *entry;
+       const char *key;
+
+       switch (flags & (OBJ_POINTER | OBJ_KEY | OBJ_PARTIAL_KEY)) {
+       case OBJ_KEY:
+               key = obj;
+               return ast_str_hash(key);
+       case OBJ_POINTER:
+               entry = obj;
+               return ast_str_hash(entry->name);
+       default:
+               /* Hash can only work on something with a full key. */
+               ast_assert(0);
+               return 0;
+       }
+}
+
+static int wait_bridge_sort_fn(const void *obj_left, const void *obj_right, const int flags)
+{
+       const struct wait_bridge_wrapper *left = obj_left;
+       const struct wait_bridge_wrapper *right = obj_right;
+       const char *right_key = obj_right;
+       int cmp;
+
+       switch (flags & (OBJ_POINTER | OBJ_KEY | OBJ_PARTIAL_KEY)) {
+       case OBJ_POINTER:
+               right_key = right->name;
+               /* Fall through */
+       case OBJ_KEY:
+               cmp = strcmp(left->name, right_key);
+               break;
+       case OBJ_PARTIAL_KEY:
+               cmp = strncmp(left->name, right_key, strlen(right_key));
+               break;
+       default:
+               /* Sort can only work on something with a full or partial key. */
+               ast_assert(0);
+               cmp = 0;
+               break;
+       }
+       return cmp;
+}
 
 enum bridgewait_flags {
        MUXFLAG_MOHCLASS = (1 << 0),
@@ -132,32 +201,35 @@ AST_APP_OPTIONS(bridgewait_opts, {
        AST_APP_OPTION_ARG('S', MUXFLAG_TIMEOUT, OPT_ARG_TIMEOUT),
 });
 
+static int bridgewait_timeout_callback(struct ast_bridge_channel *bridge_channel, void *hook_pvt)
+{
+       ast_verb(3, "Channel %s timed out.\n", ast_channel_name(bridge_channel->chan));
+       ast_bridge_channel_leave_bridge(bridge_channel, BRIDGE_CHANNEL_STATE_END,
+               AST_CAUSE_NORMAL_CLEARING);
+       return -1;
+}
+
 static int apply_option_timeout(struct ast_bridge_features *features, char *duration_arg)
 {
-       struct ast_bridge_features_limits hold_limits;
+       unsigned int duration;
 
        if (ast_strlen_zero(duration_arg)) {
-               ast_log(LOG_ERROR, "No duration value provided for the timeout ('S') option.\n");
+               ast_log(LOG_ERROR, "Timeout option 'S': No value provided.\n");
                return -1;
        }
-
-       if (ast_bridge_features_limits_construct(&hold_limits)) {
-               ast_log(LOG_ERROR, "Could not construct duration limits. Bridge canceled.\n");
+       if (sscanf(duration_arg, "%u", &duration) != 1 || duration == 0) {
+               ast_log(LOG_ERROR, "Timeout option 'S': Invalid value provided '%s'.\n",
+                       duration_arg);
                return -1;
        }
 
-       if (sscanf(duration_arg, "%u", &hold_limits.duration) != 1
-               || hold_limits.duration == 0) {
-               ast_log(LOG_ERROR, "Duration value provided for the timeout ('S') option must be greater than 0\n");
-               ast_bridge_features_limits_destroy(&hold_limits);
+       duration *= 1000;
+       if (ast_bridge_interval_hook(features, 0, duration, bridgewait_timeout_callback,
+               NULL, NULL, AST_BRIDGE_HOOK_REMOVE_ON_PULL)) {
+               ast_log(LOG_ERROR, "Timeout option 'S': Could not create timer.\n");
                return -1;
        }
 
-       /* Limits struct holds time as milliseconds, so muliply 1000x */
-       hold_limits.duration *= 1000;
-       ast_bridge_features_set_limits(features, &hold_limits, AST_BRIDGE_HOOK_REMOVE_ON_PULL);
-       ast_bridge_features_limits_destroy(&hold_limits);
-
        return 0;
 }
 
@@ -169,6 +241,7 @@ static int apply_option_moh(struct ast_channel *chan, const char *class_arg)
 static int apply_option_entertainment(struct ast_channel *chan, const char *entertainment_arg)
 {
        char entertainment = entertainment_arg[0];
+
        switch (entertainment) {
        case 'm':
                return ast_channel_set_bridge_role_option(chan, "holding_participant", "idle_mode", "musiconhold");
@@ -232,6 +305,103 @@ static int process_options(struct ast_channel *chan, struct ast_flags *flags, ch
        return 0;
 }
 
+/*!
+ * \internal
+ * \since 12.0.0
+ * \brief Allocate a new holding bridge wrapper with the given bridge name and bridge ID.
+ *
+ * \param bridge_name name of the bridge wrapper
+ * \param bridge the bridge being wrapped
+ *
+ * \retval Pointer to the newly allocated holding bridge wrapper
+ * \retval NULL if allocation failed. The bridge will be destroyed if this function fails.
+ */
+static struct wait_bridge_wrapper *wait_bridge_wrapper_alloc(const char *bridge_name, struct ast_bridge *bridge)
+{
+       struct wait_bridge_wrapper *bridge_wrapper;
+
+       bridge_wrapper = ao2_alloc_options(sizeof(*bridge_wrapper) + strlen(bridge_name) + 1,
+               wait_bridge_wrapper_destructor, AO2_ALLOC_OPT_LOCK_NOLOCK);
+       if (!bridge_wrapper) {
+               ast_bridge_destroy(bridge, 0);
+               return NULL;
+       }
+
+       strcpy(bridge_wrapper->name, bridge_name);
+       bridge_wrapper->bridge = bridge;
+
+       if (!ao2_link(wait_bridge_wrappers, bridge_wrapper)) {
+               ao2_cleanup(bridge_wrapper);
+               return NULL;
+       }
+
+       return bridge_wrapper;
+}
+
+static struct wait_bridge_wrapper *get_wait_bridge_wrapper(const char *bridge_name)
+{
+       struct wait_bridge_wrapper * wrapper;
+       struct ast_bridge *bridge = NULL;
+
+       SCOPED_AO2LOCK(lock, wait_bridge_wrappers);
+
+       if ((wrapper = wait_bridge_wrapper_find_by_name(bridge_name))) {
+               return wrapper;
+       }
+
+       /*
+        * Holding bridges can allow local channel move/swap
+        * optimization to the bridge.  However, we cannot allow it for
+        * this holding bridge because the call will lose the channel
+        * roles and dialplan location as a result.
+        */
+       bridge = ast_bridge_base_new(AST_BRIDGE_CAPABILITY_HOLDING,
+               AST_BRIDGE_FLAG_MERGE_INHIBIT_TO | AST_BRIDGE_FLAG_MERGE_INHIBIT_FROM
+               | AST_BRIDGE_FLAG_SWAP_INHIBIT_TO | AST_BRIDGE_FLAG_SWAP_INHIBIT_FROM
+               | AST_BRIDGE_FLAG_TRANSFER_PROHIBITED, APP_NAME, bridge_name, NULL);
+
+       if (!bridge) {
+               return NULL;
+       }
+
+       /* The bridge reference is unconditionally passed. */
+       return wait_bridge_wrapper_alloc(bridge_name, bridge);
+}
+
+/*!
+ * \internal
+ * \since 12.0.0
+ * \brief If we are down to the last reference of a wrapper and it's still contained within the list, remove it from the list.
+ *
+ * \param wrapper reference to wait bridge wrapper being checked for list culling - will be cleared on exit
+ */
+static void wait_wrapper_removal(struct wait_bridge_wrapper *wrapper)
+{
+       if (!wrapper) {
+               return;
+       }
+
+       ao2_lock(wait_bridge_wrappers);
+       if (ao2_ref(wrapper, 0) == 2) {
+               /* Either we have the only real reference or else wrapper isn't in the container anyway. */
+               ao2_unlink(wait_bridge_wrappers, wrapper);
+       }
+       ao2_unlock(wait_bridge_wrappers);
+
+       ao2_cleanup(wrapper);
+}
+
+/*!
+ * \internal
+ * \since 12.0.0
+ * \brief Application callback for the bridgewait application
+ *
+ * \param chan channel running the application
+ * \param data Arguments to the application
+ *
+ * \retval 0 Ran successfully and the call didn't hang up
+ * \retval -1 Failed or the call was hung up by the time the channel exited the holding bridge
+ */
 static enum wait_bridge_roles validate_role(const char *role)
 {
        if (!strcmp(role, "participant")) {
@@ -245,33 +415,29 @@ static enum wait_bridge_roles validate_role(const char *role)
 
 static int bridgewait_exec(struct ast_channel *chan, const char *data)
 {
+       char *bridge_name = DEFAULT_BRIDGE_NAME;
        struct ast_bridge_features chan_features;
        struct ast_flags flags = { 0 };
        char *parse;
        enum wait_bridge_roles role = ROLE_PARTICIPANT;
        char *opts[OPT_ARG_ARRAY_SIZE] = { NULL, };
+       struct wait_bridge_wrapper *bridge_wrapper;
+       int res;
 
        AST_DECLARE_APP_ARGS(args,
+               AST_APP_ARG(name);
                AST_APP_ARG(role);
                AST_APP_ARG(options);
                AST_APP_ARG(other);             /* Any remaining unused arguments */
        );
 
-       ast_mutex_lock(&bridgewait_lock);
-       if (!holding_bridge) {
-               holding_bridge = ast_bridge_base_new(AST_BRIDGE_CAPABILITY_HOLDING,
-                       AST_BRIDGE_FLAG_MERGE_INHIBIT_TO | AST_BRIDGE_FLAG_MERGE_INHIBIT_FROM
-                               | AST_BRIDGE_FLAG_SWAP_INHIBIT_FROM | AST_BRIDGE_FLAG_TRANSFER_PROHIBITED);
-       }
-       ast_mutex_unlock(&bridgewait_lock);
-       if (!holding_bridge) {
-               ast_log(LOG_ERROR, "Could not create holding bridge for '%s'.\n", ast_channel_name(chan));
-               return -1;
-       }
-
        parse = ast_strdupa(data);
        AST_STANDARD_APP_ARGS(args, parse);
 
+       if (!ast_strlen_zero(args.name)) {
+               bridge_name = args.name;
+       }
+
        if (!ast_strlen_zero(args.role)) {
                role = validate_role(args.role);
                if (role == ROLE_INVALID) {
@@ -282,6 +448,8 @@ static int bridgewait_exec(struct ast_channel *chan, const char *data)
 
        if (ast_bridge_features_init(&chan_features)) {
                ast_bridge_features_cleanup(&chan_features);
+               ast_log(LOG_ERROR, "'%s' failed to enter the waiting bridge - could not set up channel features\n",
+                       ast_channel_name(chan));
                return -1;
        }
 
@@ -289,28 +457,56 @@ static int bridgewait_exec(struct ast_channel *chan, const char *data)
                ast_app_parse_options(bridgewait_opts, &flags, opts, args.options);
        }
 
+       /* Answer the channel if needed */
+       if (ast_channel_state(chan) != AST_STATE_UP) {
+               ast_answer(chan);
+       }
+
        if (process_options(chan, &flags, opts, &chan_features, role)) {
                ast_bridge_features_cleanup(&chan_features);
                return -1;
        }
 
-       ast_bridge_join(holding_bridge, chan, NULL, &chan_features, NULL, 0);
+       bridge_wrapper = get_wait_bridge_wrapper(bridge_name);
+       if (!bridge_wrapper) {
+               ast_log(LOG_WARNING, "Failed to find or create waiting bridge '%s' for '%s'.\n", bridge_name, ast_channel_name(chan));
+               ast_bridge_features_cleanup(&chan_features);
+               return -1;
+       }
 
+       ast_verb(3, "%s is entering waiting bridge %s:%s\n", ast_channel_name(chan), bridge_name, bridge_wrapper->bridge->uniqueid);
+       res = ast_bridge_join(bridge_wrapper->bridge, chan, NULL, &chan_features, NULL, 0);
+       wait_wrapper_removal(bridge_wrapper);
        ast_bridge_features_cleanup(&chan_features);
-       return ast_check_hangup_locked(chan) ? -1 : 0;
+
+       if (res) {
+               /* For the lifetime of the bridge wrapper the bridge itself will be valid, if an error occurs it is because
+                * of extreme situations.
+                */
+               ast_log(LOG_WARNING, "Failed to join waiting bridge '%s' for '%s'.\n", bridge_name, ast_channel_name(chan));
+       }
+
+       return (res || ast_check_hangup_locked(chan)) ? -1 : 0;
 }
 
 static int unload_module(void)
 {
-       ao2_cleanup(holding_bridge);
-       holding_bridge = NULL;
+       ao2_cleanup(wait_bridge_wrappers);
 
-       return ast_unregister_application(app);
+       return ast_unregister_application(APP_NAME);
 }
 
 static int load_module(void)
 {
-       return ast_register_application_xml(app, bridgewait_exec);
+       wait_bridge_wrappers = ao2_container_alloc_hash(
+               AO2_ALLOC_OPT_LOCK_MUTEX, AO2_CONTAINER_ALLOC_OPT_DUPS_REJECT,
+               37, wait_bridge_hash_fn, wait_bridge_sort_fn, NULL);
+
+       if (!wait_bridge_wrappers) {
+               return -1;
+       }
+
+       return ast_register_application_xml(APP_NAME, bridgewait_exec);
 }
 
 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Place the channel into a holding bridge application");