/* * FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application * Copyright (C) 2005-2012, Anthony Minessale II * * Version: MPL 1.1 * * The contents of this file are subject to the Mozilla Public License Version * 1.1 (the "License"); you may not use this file except in compliance with * the License. You may obtain a copy of the License at * http://www.mozilla.org/MPL/ * * Software distributed under the License is distributed on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License * for the specific language governing rights and limitations under the * License. * * The Original Code is FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application * * The Initial Developer of the Original Code is * Anthony Minessale II * Portions created by the Initial Developer are Copyright (C) * the Initial Developer. All Rights Reserved. * * Contributor(s): * * Anthony Minessale II * Michael Jerris * Travis Cross * * switch_ivr_originate.c -- IVR Library (originate) * */ #include #define QUOTED_ESC_COMMA 1 #define UNQUOTED_ESC_COMMA 2 static const switch_state_handler_table_t originate_state_handlers; static switch_status_t originate_on_consume_media_transmit(switch_core_session_t *session) { switch_channel_t *channel = switch_core_session_get_channel(session); if (!switch_channel_test_flag(channel, CF_PROXY_MODE) && switch_channel_test_flag(channel, CF_CONSUME_ON_ORIGINATE)) { while (switch_channel_test_flag(channel, CF_ORIGINATING) && switch_channel_get_state(channel) == CS_CONSUME_MEDIA && !switch_channel_test_flag(channel, CF_TAGGED)) { if (!switch_channel_media_ready(channel)) { switch_yield(10000); } else { switch_ivr_sleep(session, 10, SWITCH_FALSE, NULL); } switch_ivr_parse_all_messages(session); } } switch_channel_clear_state_handler(channel, &originate_state_handlers); return SWITCH_STATUS_FALSE; } static switch_status_t originate_on_routing(switch_core_session_t *session) { switch_channel_t *channel = switch_core_session_get_channel(session); if (switch_channel_get_state(channel) == CS_ROUTING) { /* put the channel in a passive state until it is answered */ switch_channel_set_state(channel, CS_CONSUME_MEDIA); } return SWITCH_STATUS_FALSE; } static const switch_state_handler_table_t originate_state_handlers = { /*.on_init */ NULL, /*.on_routing */ originate_on_routing, /*.on_execute */ NULL, /*.on_hangup */ NULL, /*.on_exchange_media */ NULL, /*.on_soft_execute */ originate_on_consume_media_transmit, /*.on_consume_media */ originate_on_consume_media_transmit }; typedef struct { switch_core_session_t *peer_session; switch_channel_t *peer_channel; switch_caller_profile_t *caller_profile; uint8_t ring_ready; uint8_t early_media; uint8_t answered; uint8_t tagged; uint32_t per_channel_timelimit_sec; uint32_t per_channel_progress_timelimit_sec; uint32_t per_channel_delay_start; } originate_status_t; typedef struct { switch_core_session_t *session; int32_t idx; uint32_t hups; char *file; char *error_file; int confirm_timeout; char key[80]; uint8_t early_ok; uint8_t ring_ready; uint8_t instant_ringback; uint8_t sent_ring; uint8_t progress; uint8_t return_ring_ready; uint8_t monitor_early_media_ring; uint8_t monitor_early_media_fail; uint8_t gen_ringback; uint8_t ignore_early_media; uint8_t ignore_ring_ready; int monitor_early_media_ring_count; int monitor_early_media_ring_total; int cancel_timeout; int continue_on_timeout; int ringback_ok; int sending_ringback; int bridge_early_media; switch_thread_t *ethread; switch_caller_profile_t *caller_profile_override; switch_bool_t check_vars; switch_memory_pool_t *pool; } originate_global_t; typedef enum { IDX_KEY_CANCEL = -4, IDX_TIMEOUT = -3, IDX_CANCEL = -2, IDX_NADA = -1 } abort_t; struct key_collect { char *key; char *file; char *error_file; int confirm_timeout; switch_core_session_t *session; }; static void *SWITCH_THREAD_FUNC collect_thread_run(switch_thread_t *thread, void *obj) { struct key_collect *collect = (struct key_collect *) obj; switch_channel_t *channel = switch_core_session_get_channel(collect->session); char buf[10] = SWITCH_BLANK_STRING; switch_application_interface_t *application_interface = NULL; if (collect->session) { if (switch_core_session_read_lock(collect->session) != SWITCH_STATUS_SUCCESS) { return NULL; } } else { return NULL; } switch_ivr_sleep(collect->session, 0, SWITCH_TRUE, NULL); if (!strcasecmp(collect->key, "exec")) { char *data; char *app_name, *app_data; if (!(data = collect->file)) { goto wbreak; } app_name = data; if ((app_data = strchr(app_name, ' '))) { *app_data++ = '\0'; } if ((application_interface = switch_loadable_module_get_application_interface(app_name)) == 0) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(collect->session), SWITCH_LOG_ERROR, "Invalid Application %s\n", app_name); switch_channel_hangup(channel, SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER); goto wbreak; } if (!application_interface->application_function) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(collect->session), SWITCH_LOG_ERROR, "No Function for %s\n", app_name); switch_channel_hangup(channel, SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER); goto wbreak; } switch_core_session_exec(collect->session, application_interface, app_data); if (switch_channel_up_nosig(channel)) { switch_channel_set_flag(channel, CF_WINNER); } goto wbreak; } if (!switch_channel_up_nosig(channel)) { switch_channel_hangup(channel, SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER); goto wbreak; } while (switch_channel_ready(channel)) { switch_size_t len = strlen(collect->key); const char *file = collect->file; switch_status_t status; memset(buf, 0, sizeof(buf)); if (zstr(file)) { file = "silence"; } status = switch_ivr_read(collect->session, len, len, collect->file, NULL, buf, sizeof(buf), collect->confirm_timeout, NULL, 0); if (status != SWITCH_STATUS_SUCCESS && status != SWITCH_STATUS_BREAK && status != SWITCH_STATUS_TOO_SMALL) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(collect->session), SWITCH_LOG_ERROR, "%s Error Playing File!\n", switch_channel_get_name(channel)); switch_channel_hangup(channel, SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER); } if (!strcmp(collect->key, buf)) { switch_channel_set_flag(channel, CF_WINNER); goto wbreak; } else if (collect->error_file) { switch_ivr_play_file(collect->session, NULL, collect->error_file, NULL); } } wbreak: switch_core_session_rwunlock(collect->session); UNPROTECT_INTERFACE(application_interface); return NULL; } static void launch_collect_thread(struct key_collect *collect) { switch_thread_t *thread; switch_threadattr_t *thd_attr = NULL; switch_threadattr_create(&thd_attr, switch_core_session_get_pool(collect->session)); switch_threadattr_detach_set(thd_attr, 1); switch_threadattr_stacksize_set(thd_attr, SWITCH_THREAD_STACKSIZE); switch_thread_create(&thread, thd_attr, collect_thread_run, collect, switch_core_session_get_pool(collect->session)); } static int check_per_channel_timeouts(originate_global_t *oglobals, originate_status_t *originate_status, int max, time_t start, switch_call_cause_t *force_reason) { int x = 0, i, delayed_channels = 0, active_channels = 0; uint32_t early_exit_time = 0, delayed_min = 0; time_t elapsed = switch_epoch_time_now(NULL) - start; if (oglobals->cancel_timeout > 0) { return 0; } for (i = 0; i < max; i++) { if (originate_status[i].peer_channel && switch_channel_get_state(originate_status[i].peer_channel) != CS_DESTROY && switch_channel_get_state(originate_status[i].peer_channel) != CS_REPORTING) { if (originate_status[i].per_channel_delay_start) { delayed_channels++; } else { active_channels++; } } } if (active_channels == 0 && delayed_channels) { for (i = 0; i < max; i++) { if (originate_status[i].peer_channel && originate_status[i].per_channel_delay_start && (!delayed_min || delayed_min > originate_status[i].per_channel_delay_start)) { delayed_min = originate_status[i].per_channel_delay_start; } } early_exit_time = delayed_min - (uint32_t) elapsed; } for (i = 0; i < max; i++) { if (originate_status[i].peer_channel && originate_status[i].per_channel_delay_start && (elapsed > originate_status[i].per_channel_delay_start || active_channels == 0)) { if (active_channels == 0) { if (originate_status[i].per_channel_timelimit_sec) { if (originate_status[i].per_channel_timelimit_sec > early_exit_time) { /* IN theory this check is not needed ( should just be if !0 then -= with no else), if its not 0 it should always be greater.... */ originate_status[i].per_channel_timelimit_sec -= early_exit_time; } else { originate_status[i].per_channel_timelimit_sec = 1; } } if (originate_status[i].per_channel_progress_timelimit_sec) { if (originate_status[i].per_channel_progress_timelimit_sec > early_exit_time) { /* IN theory this check is not needed ( should just be if !0 then -= with no else), if its not 0 it should always be greater.... */ originate_status[i].per_channel_progress_timelimit_sec -= early_exit_time; } else { originate_status[i].per_channel_progress_timelimit_sec = 1; } } originate_status[i].per_channel_delay_start -= delayed_min; } else { originate_status[i].per_channel_delay_start = 0; } if (!originate_status[i].per_channel_delay_start) { switch_channel_clear_flag(originate_status[i].peer_channel, CF_BLOCK_STATE); } } if (originate_status[i].peer_channel && switch_channel_up_nosig(originate_status[i].peer_channel)) { if (originate_status[i].per_channel_progress_timelimit_sec && elapsed > originate_status[i].per_channel_progress_timelimit_sec && !(switch_channel_test_flag(originate_status[i].peer_channel, CF_RING_READY) || switch_channel_test_flag(originate_status[i].peer_channel, CF_ANSWERED) || (!oglobals->monitor_early_media_ring && switch_channel_test_flag(originate_status[i].peer_channel, CF_EARLY_MEDIA)) ) ) { switch_channel_hangup(originate_status[i].peer_channel, SWITCH_CAUSE_PROGRESS_TIMEOUT); *force_reason = SWITCH_CAUSE_PROGRESS_TIMEOUT; x++; } if (originate_status[i].per_channel_timelimit_sec && elapsed > originate_status[i].per_channel_timelimit_sec) { switch_channel_hangup(originate_status[i].peer_channel, SWITCH_CAUSE_ALLOTTED_TIMEOUT); x++; } } } return x; } static switch_bool_t monitor_callback(switch_core_session_t *session, const char *app, const char *data) { if (app) { switch_channel_t *channel = switch_core_session_get_channel(session); if (!strcmp(app, "fail")) { const char *bd = switch_channel_get_variable(channel, "monitor_fail_dispo"); if (!bd) { bd = "monitor_early_media_fail"; } switch_channel_set_variable(channel, "DIALSTATUS", "BUSY"); switch_channel_set_variable(channel, "originate_disposition", bd); switch_channel_hangup(channel, data ? switch_channel_str2cause(data) : SWITCH_CAUSE_USER_BUSY); } else if (!strcmp(app, "ring")) { originate_global_t *oglobals = (originate_global_t *) switch_channel_get_private(channel, "_oglobals_"); const char *bd = switch_channel_get_variable(channel, "monitor_ring_dispo"); if (!bd) { bd = "monitor_early_media_ring"; } switch_channel_set_variable(channel, "originate_disposition", bd); switch_channel_set_variable(channel, "DIALSTATUS", "EARLY"); if (oglobals) { if (oglobals->monitor_early_media_ring_total && ++oglobals->monitor_early_media_ring_count < oglobals->monitor_early_media_ring_total) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Ring %d/%d\n", oglobals->monitor_early_media_ring_count, oglobals->monitor_early_media_ring_total); return SWITCH_TRUE; } switch_channel_set_private(channel, "_oglobals_", NULL); if (!oglobals->progress) { oglobals->progress = 1; } if (!oglobals->ring_ready && !oglobals->ignore_ring_ready) { oglobals->ring_ready = 1; } if (!oglobals->ignore_early_media && !oglobals->early_ok) { oglobals->early_ok = 1; } } } } return SWITCH_FALSE; } static void inherit_codec(switch_channel_t *caller_channel, switch_core_session_t *session) { const char *var = switch_channel_get_variable(caller_channel, "inherit_codec"); switch_channel_t *channel = switch_core_session_get_channel(session); if (switch_true(var)) { switch_codec_implementation_t impl = { 0 }; switch_codec_implementation_t video_impl = { 0 }; char tmp[128] = ""; if (switch_core_session_get_read_impl(session, &impl) == SWITCH_STATUS_SUCCESS) { const char *ep = switch_channel_get_variable(caller_channel, "ep_codec_string"); if (switch_core_session_get_video_read_impl(session, &video_impl) == SWITCH_STATUS_SUCCESS) { switch_snprintf(tmp, sizeof(tmp), "%s@%uh@%ui,%s", impl.iananame, impl.samples_per_second, impl.microseconds_per_packet / 1000, video_impl.iananame); } else { switch_snprintf(tmp, sizeof(tmp), "%s@%uh@%ui", impl.iananame, impl.samples_per_second, impl.microseconds_per_packet / 1000); } if (ep && switch_stristr(impl.iananame, ep)) { switch_channel_set_variable(caller_channel, "absolute_codec_string", tmp); switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_DEBUG, "Setting codec string on %s to %s\n", switch_channel_get_name(caller_channel), tmp); } else { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_DEBUG, "Codec string %s not supported on %s, skipping inheritance\n", tmp, switch_channel_get_name(caller_channel)); } } else { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_WARNING, "Error inheriting codec. Channel %s has no read codec yet.\n", switch_channel_get_name(channel)); } } } static uint8_t check_channel_status(originate_global_t *oglobals, originate_status_t *originate_status, uint32_t len) { uint32_t i; uint8_t rval = 0; switch_channel_t *caller_channel = NULL; int pindex = -1; char bug_key[256] = ""; int send_ringback = 0; uint8_t ring_ready_val = 0; int pickups = 0; oglobals->hups = 0; oglobals->idx = IDX_NADA; if (oglobals->session) { caller_channel = switch_core_session_get_channel(oglobals->session); if (switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { caller_channel = NULL; } } for (i = 0; i < len; i++) { if (originate_status[i].peer_channel && switch_channel_test_flag(originate_status[i].peer_channel, CF_CHANNEL_SWAP)) { const char *key = switch_channel_get_variable(originate_status[i].peer_channel, "channel_swap_uuid"); switch_core_session_t *swap_session, *old_session; if ((swap_session = switch_core_session_locate(key))) { switch_channel_clear_flag(originate_status[i].peer_channel, CF_CHANNEL_SWAP); switch_channel_hangup(originate_status[i].peer_channel, SWITCH_CAUSE_PICKED_OFF); switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(originate_status[i].peer_channel), SWITCH_LOG_DEBUG, "Swapping %s for %s\n", switch_core_session_get_name(swap_session), switch_channel_get_name(originate_status[i].peer_channel)); old_session = originate_status[i].peer_session; originate_status[i].peer_session = swap_session; originate_status[i].peer_channel = switch_core_session_get_channel(originate_status[i].peer_session); originate_status[i].caller_profile = switch_channel_get_caller_profile(originate_status[i].peer_channel); switch_channel_set_flag(originate_status[i].peer_channel, CF_ORIGINATING); switch_channel_answer(originate_status[i].peer_channel); switch_core_session_rwunlock(old_session); break; } } } for (i = 0; i < len; i++) { switch_channel_state_t state; if (originate_status[i].tagged && originate_status[i].peer_session) { switch_channel_t *channel = switch_core_session_get_channel(originate_status[i].peer_session); uint32_t j; if (switch_channel_down_nosig(channel)) { switch_call_cause_t cause = switch_channel_get_cause(channel); for (j = 0; j < len; j++) { channel = switch_core_session_get_channel(originate_status[j].peer_session); switch_channel_hangup(channel, cause); } oglobals->hups = len; rval = 0; goto end; } } if (originate_status[i].peer_channel && switch_channel_test_flag(originate_status[i].peer_channel, CF_PICKUP)) { pickups++; } if (!(originate_status[i].peer_channel && originate_status[i].peer_session)) { oglobals->hups++; continue; } if ((ring_ready_val = (uint8_t)switch_channel_test_flag(originate_status[i].peer_channel, CF_RING_READY))) { if (!originate_status[i].ring_ready) { originate_status[i].ring_ready = ring_ready_val; } if (oglobals->sending_ringback == 1) { send_ringback++; pindex = (uint32_t) i; } else { if (!oglobals->ring_ready) { oglobals->ring_ready = ring_ready_val; if (caller_channel && !oglobals->ignore_ring_ready) { if (len == 1) { switch_channel_pass_callee_id(originate_status[0].peer_channel, caller_channel); } switch_channel_ring_ready_value(caller_channel, ring_ready_val); oglobals->sent_ring = ring_ready_val; } } } } if (switch_channel_test_flag(originate_status[i].peer_channel, CF_EARLY_MEDIA)) { if (oglobals->ignore_early_media == 3 && oglobals->bridge_early_media == -1) { oglobals->bridge_early_media = i; oglobals->ringback_ok = 1; } if (oglobals->sending_ringback == 1) { send_ringback++; pindex = (uint32_t) i; } else if (!oglobals->sent_ring && oglobals->ignore_early_media == 2 && len == 1 && caller_channel && !oglobals->ignore_ring_ready) { switch_channel_pass_callee_id(originate_status[0].peer_channel, caller_channel); switch_channel_ring_ready(caller_channel); oglobals->sent_ring = 1; } if (!originate_status[i].early_media) { originate_status[i].early_media = 1; if (oglobals->early_ok) { pindex = i; } if (oglobals->monitor_early_media_fail) { const char *var = switch_channel_get_variable(originate_status[i].peer_channel, "monitor_early_media_fail"); if (!zstr(var)) { char *fail_array[128] = { 0 }; int fail_count = 0; char *fail_data = strdup(var); int fx; int y = 0; switch_assert(fail_data); fail_count = switch_separate_string(fail_data, '!', fail_array, (sizeof(fail_array) / sizeof(fail_array[0]))); for (fx = 0; fx < fail_count; fx++) { char *cause = fail_array[fx]; int hits = 2; char *p, *q; if (!(p = strchr(cause, ':'))) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } *p++ = '\0'; if (!p) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } if (!(hits = atoi(p))) { hits = 2; } if (!(p = strchr(p, ':'))) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } *p++ = '\0'; if (!p) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } for (q = p; q && *q; q++) { if (*q == '+') { *q = ','; } } switch_snprintf(bug_key, sizeof(bug_key), "monitor_early_media_fail_%d", ++y); switch_ivr_tone_detect_session(originate_status[i].peer_session, bug_key, p, "r", 0, hits, "fail", cause, monitor_callback); } switch_safe_free(fail_data); } } if (oglobals->monitor_early_media_ring) { const char *var = switch_channel_get_variable(originate_status[i].peer_channel, "monitor_early_media_ring"); const char *var_total = switch_channel_get_variable(originate_status[i].peer_channel, "monitor_early_media_ring_total"); if (!zstr(var)) { char *ring_array[128] = { 0 }; int ring_count = 0; char *ring_data = strdup(var); int fx; int y = 0; switch_assert(ring_data); ring_count = switch_separate_string(ring_data, '!', ring_array, (sizeof(ring_array) / sizeof(ring_array[0]))); for (fx = 0; fx < ring_count; fx++) { int hits = 2; char *p = ring_array[fx], *q; if (!p) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } if (!(hits = atoi(p))) { hits = 2; } if (!(p = strchr(p, ':'))) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } *p++ = '\0'; if (!p) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_ERROR, "Parse Error\n"); continue; } for (q = p; q && *q; q++) { if (*q == '+') { *q = ','; } } switch_channel_set_private(originate_status[i].peer_channel, "_oglobals_", oglobals); switch_snprintf(bug_key, sizeof(bug_key), "monitor_early_media_ring_%d", ++y); switch_ivr_tone_detect_session(originate_status[i].peer_session, bug_key, p, "r", 0, hits, "ring", NULL, monitor_callback); } if (var_total) { int tmp = atoi(var_total); if (tmp > 0 && tmp < 100) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(originate_status[i].peer_session), SWITCH_LOG_DEBUG, "%s setting ring total to %d\n", switch_channel_get_name(originate_status[i].peer_channel), tmp); oglobals->monitor_early_media_ring_total = tmp; } } switch_safe_free(ring_data); } } } if (!oglobals->monitor_early_media_ring) { if (!oglobals->progress) { oglobals->progress = 1; } if (!oglobals->ring_ready && !oglobals->ignore_ring_ready) { oglobals->ring_ready = 1; } } } if (!switch_channel_test_flag(originate_status[i].peer_channel, CF_PARK) && !switch_channel_test_flag(originate_status[i].peer_channel, CF_CONSUME_ON_ORIGINATE)) { if (switch_core_session_messages_waiting(originate_status[i].peer_session)) { if (switch_channel_test_flag(originate_status[i].peer_channel, CF_THREAD_SLEEPING)) { switch_core_session_wake_session_thread(originate_status[i].peer_session); } else { switch_ivr_parse_all_events(originate_status[i].peer_session); } } } state = switch_channel_get_state(originate_status[i].peer_channel); if (state >= CS_HANGUP || state == CS_RESET || switch_channel_test_flag(originate_status[i].peer_channel, CF_TRANSFER) || switch_channel_test_flag(originate_status[i].peer_channel, CF_REDIRECT) || switch_channel_test_flag(originate_status[i].peer_channel, CF_BRIDGED) || !switch_channel_test_flag(originate_status[i].peer_channel, CF_ORIGINATING) ) { (oglobals->hups)++; } else if ((switch_channel_test_flag(originate_status[i].peer_channel, CF_ANSWERED) || (oglobals->early_ok && switch_channel_test_flag(originate_status[i].peer_channel, CF_EARLY_MEDIA)) || (oglobals->ring_ready && oglobals->return_ring_ready && len == 1 && switch_channel_test_flag(originate_status[i].peer_channel, CF_RING_READY)) ) && !switch_channel_test_flag(originate_status[i].peer_channel, CF_TAGGED) ) { if (!zstr(oglobals->key)) { struct key_collect *collect; if (oglobals->cancel_timeout < 0) { oglobals->cancel_timeout = 1; } if ((collect = switch_core_session_alloc(originate_status[i].peer_session, sizeof(*collect)))) { switch_channel_set_flag(originate_status[i].peer_channel, CF_TAGGED); if (!zstr(oglobals->key)) { collect->key = switch_core_session_strdup(originate_status[i].peer_session, oglobals->key); } if (!zstr(oglobals->file)) { collect->file = switch_core_session_strdup(originate_status[i].peer_session, oglobals->file); } if (!zstr(oglobals->error_file)) { collect->error_file = switch_core_session_strdup(originate_status[i].peer_session, oglobals->error_file); } if (oglobals->confirm_timeout) { collect->confirm_timeout = oglobals->confirm_timeout; } else { collect->confirm_timeout = 5000; } switch_channel_audio_sync(originate_status[i].peer_channel); collect->session = originate_status[i].peer_session; launch_collect_thread(collect); } } else { oglobals->idx = i; pindex = (uint32_t) i; rval = 0; goto end; } } else if (switch_channel_test_flag(originate_status[i].peer_channel, CF_WINNER)) { oglobals->idx = i; rval = 0; pindex = (uint32_t) i; goto end; } } if (oglobals->hups + pickups == len) { rval = 0; } else { rval = 1; } end: if (pindex > -1 && caller_channel && switch_channel_ready(caller_channel) && !switch_channel_media_ready(caller_channel) && switch_channel_media_ready(originate_status[pindex].peer_channel)) { inherit_codec(caller_channel, originate_status[pindex].peer_session); } if (send_ringback) { oglobals->sending_ringback++; } return rval; } struct ringback { switch_buffer_t *audio_buffer; teletone_generation_session_t ts; switch_file_handle_t fhb; switch_file_handle_t *fh; int silence; uint8_t asis; }; typedef struct ringback ringback_t; static int teletone_handler(teletone_generation_session_t *ts, teletone_tone_map_t *map) { ringback_t *tto = ts->user_data; int wrote; if (!tto) { return -1; } wrote = teletone_mux_tones(ts, map); switch_buffer_write(tto->audio_buffer, ts->buffer, wrote * 2); return 0; } SWITCH_DECLARE(switch_status_t) switch_ivr_wait_for_answer(switch_core_session_t *session, switch_core_session_t *peer_session) { switch_channel_t *caller_channel = NULL; switch_channel_t *peer_channel = switch_core_session_get_channel(peer_session); const char *ringback_data = NULL; switch_frame_t write_frame = { 0 }; switch_codec_t write_codec = { 0 }; switch_codec_t *read_codec = switch_core_session_get_read_codec(session); uint8_t pass = 0; ringback_t ringback = { 0 }; switch_frame_t *read_frame = NULL; switch_status_t status = SWITCH_STATUS_SUCCESS; int timelimit = 60; const char *var; switch_time_t start = 0; const char *cancel_key = NULL; switch_channel_state_t wait_state = 0; switch_assert(peer_channel); if (switch_channel_get_state(peer_channel) == CS_RESET) { switch_channel_set_state(peer_channel, CS_SOFT_EXECUTE); } if (session) { caller_channel = switch_core_session_get_channel(session); } if ((switch_channel_test_flag(peer_channel, CF_ANSWERED) || switch_channel_test_flag(peer_channel, CF_EARLY_MEDIA))) { goto end; } switch_zmalloc(write_frame.data, SWITCH_RECOMMENDED_BUFFER_SIZE); write_frame.buflen = SWITCH_RECOMMENDED_BUFFER_SIZE; if (caller_channel && (var = switch_channel_get_variable(caller_channel, SWITCH_CALL_TIMEOUT_VARIABLE))) { timelimit = atoi(var); if (timelimit < 0) { timelimit = 60; } } timelimit *= 1000000; start = switch_micro_time_now(); if (caller_channel) { cancel_key = switch_channel_get_variable(caller_channel, "origination_cancel_key"); if (switch_channel_test_flag(caller_channel, CF_ANSWERED)) { ringback_data = switch_channel_get_variable(caller_channel, "transfer_ringback"); } if (!ringback_data) { ringback_data = switch_channel_get_variable(caller_channel, "ringback"); } if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE) || switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA)) { ringback_data = NULL; } else if (zstr(ringback_data)) { if ((var = switch_channel_get_variable(caller_channel, SWITCH_SEND_SILENCE_WHEN_IDLE_VARIABLE))) { int sval = atoi(var); if (sval) { ringback_data = switch_core_session_sprintf(session, "silence:%d", sval); } } } } if (read_codec && ringback_data) { if (switch_is_file_path(ringback_data)) { if (!(strrchr(ringback_data, '.') || strstr(ringback_data, SWITCH_URL_SEPARATOR))) { ringback.asis++; } } if (!ringback.asis) { if ((pass = (uint8_t) switch_test_flag(read_codec, SWITCH_CODEC_FLAG_PASSTHROUGH))) { goto no_ringback; } if (switch_core_codec_init(&write_codec, "L16", NULL, read_codec->implementation->actual_samples_per_second, read_codec->implementation->microseconds_per_packet / 1000, 1, SWITCH_CODEC_FLAG_ENCODE | SWITCH_CODEC_FLAG_DECODE, NULL, switch_core_session_get_pool(session)) != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Codec Error!\n"); if (caller_channel) { switch_channel_hangup(caller_channel, SWITCH_CAUSE_NORMAL_TEMPORARY_FAILURE); } read_codec = NULL; goto done; } else { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Raw Codec Activation Success L16@%uhz 1 channel %dms\n", read_codec->implementation->actual_samples_per_second, read_codec->implementation->microseconds_per_packet / 1000); write_frame.codec = &write_codec; write_frame.datalen = read_codec->implementation->decoded_bytes_per_packet; write_frame.samples = write_frame.datalen / 2; memset(write_frame.data, 255, write_frame.datalen); switch_core_session_set_read_codec(session, &write_codec); } } if (switch_channel_test_flag(caller_channel, CF_DISABLE_RINGBACK)) { ringback_data = NULL; } if (ringback_data) { char *tmp_data = NULL; if (switch_is_file_path(ringback_data)) { char *ext; if (ringback.asis) { write_frame.codec = read_codec; ext = read_codec->implementation->iananame; tmp_data = switch_mprintf("%s.%s", ringback_data, ext); ringback_data = tmp_data; } switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Play Ringback File [%s]\n", ringback_data); ringback.fhb.channels = read_codec->implementation->number_of_channels; ringback.fhb.samplerate = read_codec->implementation->actual_samples_per_second; if (switch_core_file_open(&ringback.fhb, ringback_data, read_codec->implementation->number_of_channels, read_codec->implementation->actual_samples_per_second, SWITCH_FILE_FLAG_READ | SWITCH_FILE_DATA_SHORT, NULL) != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Error Playing File\n"); switch_safe_free(tmp_data); goto done; } ringback.fh = &ringback.fhb; } else { if (!strncasecmp(ringback_data, "silence", 7)) { const char *p = ringback_data + 7; if (*p == ':') { p++; if (p) { ringback.silence = atoi(p); } } SWITCH_IVR_VERIFY_SILENCE_DIVISOR(ringback.silence); } else { switch_buffer_create_dynamic(&ringback.audio_buffer, 512, 1024, 0); switch_buffer_set_loops(ringback.audio_buffer, -1); teletone_init_session(&ringback.ts, 0, teletone_handler, &ringback); ringback.ts.rate = read_codec->implementation->actual_samples_per_second; switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Play Ringback Tone [%s]\n", ringback_data); if (teletone_run(&ringback.ts, ringback_data)) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Error Playing Tone\n"); teletone_destroy_session(&ringback.ts); switch_buffer_destroy(&ringback.audio_buffer); ringback_data = NULL; } } } switch_safe_free(tmp_data); } } no_ringback: if (caller_channel) { wait_state = switch_channel_get_state(caller_channel); } while (switch_channel_ready(peer_channel) && !switch_channel_media_ready(peer_channel)) { int diff = (int) (switch_micro_time_now() - start); switch_ivr_parse_all_messages(session); if (caller_channel && cancel_key) { if (switch_channel_has_dtmf(caller_channel)) { switch_dtmf_t dtmf = { 0, 0 }; if (switch_channel_dequeue_dtmf(caller_channel, &dtmf) == SWITCH_STATUS_SUCCESS) { if (dtmf.digit == *cancel_key) { status = SWITCH_STATUS_FALSE; goto done; } } } } if (caller_channel && switch_channel_get_state(caller_channel) != wait_state) { goto done; } if (diff > timelimit) { status = SWITCH_STATUS_TIMEOUT; goto done; } if (switch_channel_media_ready(caller_channel)) { status = switch_core_session_read_frame(session, &read_frame, SWITCH_IO_FLAG_NONE, 0); if (!SWITCH_READ_ACCEPTABLE(status)) { break; } } else { read_frame = NULL; } if (read_frame && !pass) { if (ringback.fh) { switch_size_t mlen, olen; unsigned int pos = 0; if (ringback.asis) { mlen = write_frame.codec->implementation->encoded_bytes_per_packet; } else { mlen = write_frame.codec->implementation->samples_per_packet; } olen = mlen; //if (ringback.fh->resampler && ringback.fh->resampler->rfactor > 1) { //olen = (switch_size_t) (olen * ringback.fh->resampler->rfactor); //} switch_core_file_read(ringback.fh, write_frame.data, &olen); if (olen == 0) { olen = mlen; ringback.fh->speed = 0; switch_core_file_seek(ringback.fh, &pos, 0, SEEK_SET); switch_core_file_read(ringback.fh, write_frame.data, &olen); if (olen == 0) { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_ERROR, "Failure to read or re-read after seeking to beginning on file [%s]\n", ringback.fh->file_path); break; } } write_frame.datalen = (uint32_t) (ringback.asis ? olen : olen * 2); } else if (ringback.audio_buffer) { if ((write_frame.datalen = (uint32_t) switch_buffer_read_loop(ringback.audio_buffer, write_frame.data, write_frame.codec->implementation->decoded_bytes_per_packet)) <= 0) { break; } } else if (ringback.silence) { write_frame.datalen = write_frame.codec->implementation->decoded_bytes_per_packet; switch_generate_sln_silence((int16_t *) write_frame.data, write_frame.datalen / 2, ringback.silence); } if ((ringback.fh || ringback.silence || ringback.audio_buffer) && write_frame.codec && write_frame.datalen) { if (switch_core_session_write_frame(session, &write_frame, SWITCH_IO_FLAG_NONE, 0) != SWITCH_STATUS_SUCCESS) { break; } } } else { switch_cond_next(); } } done: if (ringback.fh) { switch_core_file_close(ringback.fh); ringback.fh = NULL; } else if (ringback.audio_buffer) { teletone_destroy_session(&ringback.ts); switch_buffer_destroy(&ringback.audio_buffer); } switch_ivr_parse_all_events(session); switch_core_session_reset(session, SWITCH_TRUE, SWITCH_TRUE); if (switch_core_codec_ready(&write_codec)) { switch_core_codec_destroy(&write_codec); } switch_safe_free(write_frame.data); end: if (!switch_channel_media_ready(peer_channel)) { if (switch_channel_up_nosig(peer_channel)) { switch_channel_hangup(peer_channel, SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER); } status = SWITCH_STATUS_FALSE; } if (switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { switch_channel_state_t peer_state = switch_channel_get_state(peer_channel); while (switch_channel_ready(peer_channel) && switch_channel_get_state(peer_channel) == peer_state) { switch_ivr_parse_all_messages(session); switch_channel_ready(caller_channel); switch_yield(20000); } } if (caller_channel && !switch_channel_up_nosig(caller_channel)) { status = SWITCH_STATUS_FALSE; } return status; } SWITCH_DECLARE(void) switch_process_import(switch_core_session_t *session, switch_channel_t *peer_channel, const char *varname, const char *prefix) { const char *import, *val; switch_channel_t *caller_channel; switch_assert(session && peer_channel); caller_channel = switch_core_session_get_channel(session); if ((import = switch_channel_get_variable(caller_channel, varname))) { char *mydata = switch_core_session_strdup(session, import); int i, argc; char *argv[64] = { 0 }; if ((argc = switch_separate_string(mydata, ',', argv, (sizeof(argv) / sizeof(argv[0]))))) { for (i = 0; i < argc; i++) { if ((val = switch_channel_get_variable(peer_channel, argv[i]))) { if (prefix) { char *var = switch_mprintf("%s%s", prefix, argv[i]); switch_channel_set_variable(caller_channel, var, val); free(var); } else { switch_channel_set_variable(caller_channel, argv[i], val); } } } } } } static switch_status_t setup_ringback(originate_global_t *oglobals, originate_status_t *originate_status, int len, const char *ringback_data, ringback_t *ringback, switch_frame_t *write_frame, switch_codec_t *write_codec) { switch_status_t status = SWITCH_STATUS_SUCCESS; switch_channel_t *caller_channel = switch_core_session_get_channel(oglobals->session); switch_codec_t *read_codec = NULL; char *tmp_data = NULL; if (!switch_channel_test_flag(caller_channel, CF_ANSWERED) && !switch_channel_test_flag(caller_channel, CF_EARLY_MEDIA)) { if (oglobals->bridge_early_media > -1 && len == 1 && originate_status[0].peer_session && switch_channel_media_ready(originate_status[0].peer_channel)) { inherit_codec(caller_channel, originate_status[0].peer_session); } if ((status = switch_channel_pre_answer(caller_channel)) != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_DEBUG, "%s Media Establishment Failed.\n", switch_channel_get_name(caller_channel)); switch_goto_status(SWITCH_STATUS_BREAK, end); } } if (oglobals->session && (read_codec = switch_core_session_get_read_codec(oglobals->session))) { if (ringback_data && switch_is_file_path(ringback_data)) { if (!(strrchr(ringback_data, '.') || strstr(ringback_data, SWITCH_URL_SEPARATOR))) { ringback->asis++; } } else if (oglobals->bridge_early_media > -1 && zstr(ringback_data) && len == 1 && originate_status[0].peer_session) { switch_codec_implementation_t read_impl = { 0 }, write_impl = { 0 }; if (switch_channel_ready(originate_status[0].peer_channel) && switch_core_session_get_read_impl(originate_status[0].peer_session, &read_impl) == SWITCH_STATUS_SUCCESS && switch_core_session_get_write_impl(oglobals->session, &write_impl) == SWITCH_STATUS_SUCCESS) { if (read_impl.impl_id == write_impl.impl_id && read_impl.microseconds_per_packet == write_impl.microseconds_per_packet && read_impl.actual_samples_per_second == write_impl.actual_samples_per_second) { ringback->asis++; write_frame->codec = switch_core_session_get_write_codec(originate_status[0].peer_session); write_frame->datalen = write_frame->codec->implementation->decoded_bytes_per_packet; switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_DEBUG, "bridge_early_media: passthrough enabled\n"); } else { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_DEBUG, "bridge_early_media: codecs don't match (%s@%uh@%di / %s@%uh@%di)\n", read_impl.iananame, read_impl.actual_samples_per_second, read_impl.microseconds_per_packet / 1000, write_impl.iananame, write_impl.actual_samples_per_second, write_impl.microseconds_per_packet / 1000); } } } if (!ringback->asis) { if (switch_test_flag(read_codec, SWITCH_CODEC_FLAG_PASSTHROUGH)) { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_WARNING, "%s Ringback not supported in passthrough codec mode.\n", switch_channel_get_name(caller_channel)); switch_goto_status(SWITCH_STATUS_GENERR, end); } if (switch_core_codec_init(write_codec, "L16", NULL, read_codec->implementation->actual_samples_per_second, read_codec->implementation->microseconds_per_packet / 1000, 1, SWITCH_CODEC_FLAG_ENCODE | SWITCH_CODEC_FLAG_DECODE, NULL, switch_core_session_get_pool(oglobals->session)) == SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals->session), SWITCH_LOG_DEBUG, "Raw Codec Activation Success L16@%uhz 1 channel %dms\n", read_codec->implementation->actual_samples_per_second, read_codec->implementation->microseconds_per_packet / 1000); write_frame->codec = write_codec; write_frame->datalen = read_codec->implementation->decoded_bytes_per_packet; write_frame->samples = write_frame->datalen / 2; memset(write_frame->data, 255, write_frame->datalen); switch_core_session_set_read_codec(oglobals->session, write_codec); } else { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(caller_channel), SWITCH_LOG_ERROR, "Codec Error!\n"); switch_channel_hangup(caller_channel, SWITCH_CAUSE_NORMAL_TEMPORARY_FAILURE); read_codec = NULL; switch_goto_status(SWITCH_STATUS_BREAK, end); } } oglobals->gen_ringback = 1; if (zstr(ringback_data)) { switch_goto_status(SWITCH_STATUS_SUCCESS, end); } if (switch_is_file_path(ringback_data)) { char *ext; if (ringback->asis) { write_frame->codec = read_codec; ext = read_codec->implementation->iananame; tmp_data = switch_mprintf("%s.%s", ringback_data, ext); ringback_data = tmp_data; } switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals->session), SWITCH_LOG_DEBUG, "Play Ringback File [%s]\n", ringback_data); ringback->fhb.channels = read_codec->implementation->number_of_channels; ringback->fhb.samplerate = read_codec->implementation->actual_samples_per_second; if (switch_core_file_open(&ringback->fhb, ringback_data, read_codec->implementation->number_of_channels, read_codec->implementation->actual_samples_per_second, SWITCH_FILE_FLAG_READ | SWITCH_FILE_DATA_SHORT, NULL) != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals->session), SWITCH_LOG_ERROR, "Error Playing File\n"); switch_safe_free(tmp_data); switch_goto_status(SWITCH_STATUS_GENERR, end); //switch_goto_status(SWITCH_STATUS_FALSE, end); } ringback->fh = &ringback->fhb; } else if (!strncasecmp(ringback_data, "silence", 7)) { const char *c = ringback_data + 7; if (*c == ':') { c++; if (c) { ringback->silence = atoi(c); } } SWITCH_IVR_VERIFY_SILENCE_DIVISOR(ringback->silence); } else { switch_buffer_create_dynamic(&ringback->audio_buffer, 512, 1024, 0); switch_buffer_set_loops(ringback->audio_buffer, -1); teletone_init_session(&ringback->ts, 0, teletone_handler, ringback); ringback->ts.rate = read_codec->implementation->actual_samples_per_second; switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals->session), SWITCH_LOG_DEBUG, "Play Ringback Tone [%s]\n", ringback_data); /* ringback->ts.debug = 1; ringback->ts.debug_stream = switch_core_get_console(); */ if (teletone_run(&ringback->ts, ringback_data)) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals->session), SWITCH_LOG_ERROR, "Error Playing Tone\n"); teletone_destroy_session(&ringback->ts); switch_buffer_destroy(&ringback->audio_buffer); switch_goto_status(SWITCH_STATUS_GENERR, end); } } } end: switch_safe_free(tmp_data); return status; } #define MAX_PEERS 128 typedef struct { switch_core_session_t *session; switch_core_session_t *bleg; switch_call_cause_t cause; switch_call_cause_t cancel_cause; const char *bridgeto; uint32_t timelimit_sec; const switch_state_handler_table_t *table; const char *cid_name_override; const char *cid_num_override; switch_caller_profile_t *caller_profile_override; switch_event_t *ovars; switch_originate_flag_t flags; switch_status_t status; int done; switch_thread_t *thread; switch_mutex_t *mutex; } enterprise_originate_handle_t; struct ent_originate_ringback { switch_core_session_t *session; int running; const char *ringback_data; switch_thread_t *thread; }; static void *SWITCH_THREAD_FUNC enterprise_originate_thread(switch_thread_t *thread, void *obj) { enterprise_originate_handle_t *handle = (enterprise_originate_handle_t *) obj; handle->done = 0; handle->status = switch_ivr_originate(NULL, &handle->bleg, &handle->cause, handle->bridgeto, handle->timelimit_sec, handle->table, handle->cid_name_override, handle->cid_num_override, handle->caller_profile_override, handle->ovars, handle->flags, &handle->cancel_cause); handle->done = 1; switch_mutex_lock(handle->mutex); switch_mutex_unlock(handle->mutex); if (handle->done != 2) { if (handle->status == SWITCH_STATUS_SUCCESS) { switch_channel_hangup(switch_core_session_get_channel(handle->bleg), SWITCH_CAUSE_LOSE_RACE); switch_core_session_rwunlock(handle->bleg); } } return NULL; } static void *SWITCH_THREAD_FUNC enterprise_originate_ringback_thread(switch_thread_t *thread, void *obj) { struct ent_originate_ringback *rb_data = (struct ent_originate_ringback *) obj; switch_core_session_t *session = rb_data->session; switch_channel_t *channel = switch_core_session_get_channel(rb_data->session); switch_status_t status = SWITCH_STATUS_FALSE; switch_core_session_read_lock(session); while (rb_data->running && switch_channel_ready(channel)) { switch_ivr_parse_all_messages(session); if (status != SWITCH_STATUS_BREAK) { if (zstr(rb_data->ringback_data) || !strcasecmp(rb_data->ringback_data, "silence")) { status = switch_ivr_collect_digits_callback(session, NULL, 0, 0); } else if (switch_is_file_path(rb_data->ringback_data)) { status = switch_ivr_play_file(session, NULL, rb_data->ringback_data, NULL); } else { status = switch_ivr_gentones(session, rb_data->ringback_data, 0, NULL); } } if (status == SWITCH_STATUS_BREAK) { switch_channel_set_flag(channel, CF_NOT_READY); } } switch_core_session_rwunlock(session); rb_data->running = 0; return NULL; } SWITCH_DECLARE(switch_status_t) switch_ivr_enterprise_originate(switch_core_session_t *session, switch_core_session_t **bleg, switch_call_cause_t *cause, const char *bridgeto, uint32_t timelimit_sec, const switch_state_handler_table_t *table, const char *cid_name_override, const char *cid_num_override, switch_caller_profile_t *caller_profile_override, switch_event_t *ovars, switch_originate_flag_t flags, switch_call_cause_t *cancel_cause) { int x_argc = 0; char *x_argv[MAX_PEERS] = { 0 }; enterprise_originate_handle_t *hp = NULL, handles[MAX_PEERS] = { {0} }; int i; switch_caller_profile_t *cp = NULL; switch_channel_t *channel = NULL; char *data; switch_status_t status = SWITCH_STATUS_FALSE; switch_threadattr_t *thd_attr = NULL; int running = 0, over = 0; switch_status_t tstatus = SWITCH_STATUS_FALSE; switch_memory_pool_t *pool; switch_event_header_t *hi = NULL; struct ent_originate_ringback rb_data = { 0 }; const char *ringback_data = NULL; switch_event_t *var_event = NULL; switch_core_new_memory_pool(&pool); if (zstr(bridgeto)) { *cause = SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER; switch_goto_status(SWITCH_STATUS_FALSE, end); } data = switch_core_strdup(pool, bridgeto); if (session) { switch_caller_profile_t *cpp = NULL; channel = switch_core_session_get_channel(session); if ((cpp = switch_channel_get_caller_profile(channel))) { cp = switch_caller_profile_dup(pool, cpp); } } if (ovars) { var_event = ovars; } else { if (switch_event_create_plain(&var_event, SWITCH_EVENT_CHANNEL_DATA) != SWITCH_STATUS_SUCCESS) { abort(); } } if (session) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "ent_originate_aleg_uuid", switch_core_session_get_uuid(session)); } if (channel) { const char *cid; switch_channel_process_export(channel, NULL, var_event, SWITCH_EXPORT_VARS_VARIABLE); if ((cid = switch_channel_get_variable(channel, "effective_caller_id_name"))) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "origination_caller_id_name", cid); } if ((cid = switch_channel_get_variable(channel, "effective_caller_id_number"))) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "origination_caller_id_number", cid); } } /* strip leading spaces */ while (data && *data && *data == ' ') { data++; } /* extract channel variables, allowing multiple sets of braces */ switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Parsing ultra-global variables\n"); while (*data == '<') { char *parsed = NULL; if (switch_event_create_brackets(data, '<', '>', ',', &var_event, &parsed, SWITCH_FALSE) != SWITCH_STATUS_SUCCESS || !parsed) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Parse Error!\n"); switch_goto_status(SWITCH_STATUS_GENERR, done); } data = parsed; } /* strip leading spaces (again) */ while (data && *data && *data == ' ') { data++; } if (ovars && ovars != var_event) { for (hi = ovars->headers; hi; hi = hi->next) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, hi->name, hi->value); } } switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "ignore_early_media", "true"); if (!(x_argc = switch_separate_string_string(data, SWITCH_ENT_ORIGINATE_DELIM, x_argv, MAX_PEERS))) { *cause = SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER; switch_goto_status(SWITCH_STATUS_FALSE, end); } switch_threadattr_create(&thd_attr, pool); switch_threadattr_stacksize_set(thd_attr, SWITCH_THREAD_STACKSIZE); for (i = 0; i < x_argc; i++) { handles[i].session = session; handles[i].bleg = NULL; handles[i].cause = 0; handles[i].cancel_cause = 0; handles[i].bridgeto = x_argv[i]; handles[i].timelimit_sec = timelimit_sec; handles[i].table = table; handles[i].cid_name_override = cid_name_override; handles[i].cid_num_override = cid_num_override; handles[i].caller_profile_override = cp; switch_event_dup(&handles[i].ovars, var_event); handles[i].flags = flags; switch_mutex_init(&handles[i].mutex, SWITCH_MUTEX_NESTED, pool); switch_mutex_lock(handles[i].mutex); switch_thread_create(&handles[i].thread, thd_attr, enterprise_originate_thread, &handles[i], pool); } if (channel && !switch_channel_test_flag(channel, CF_PROXY_MODE) && !switch_channel_test_flag(channel, CF_PROXY_MEDIA)) { if (switch_channel_test_flag(channel, CF_ANSWERED)) { ringback_data = switch_channel_get_variable(channel, "transfer_ringback"); } if (!ringback_data) { ringback_data = switch_channel_get_variable(channel, "ringback"); } if (ringback_data || switch_channel_media_ready(channel)) { rb_data.ringback_data = ringback_data; rb_data.session = session; rb_data.running = 1; if (!switch_channel_media_ready(channel)) { if (switch_channel_pre_answer(channel) != SWITCH_STATUS_SUCCESS) { goto done; } } switch_thread_create(&rb_data.thread, thd_attr, enterprise_originate_ringback_thread, &rb_data, pool); } } for (;;) { running = 0; over = 0; if (channel && !switch_channel_ready(channel)) { break; } if (cancel_cause && *cancel_cause > 0) { break; } for (i = 0; i < x_argc; i++) { if (handles[i].done == 0) { running++; } else if (handles[i].done == 1) { if (handles[i].status == SWITCH_STATUS_SUCCESS) { handles[i].done = 2; hp = &handles[i]; goto done; } else { handles[i].done = -1; } } else { over++; } switch_yield(10000); } if (!running || over == x_argc) { break; } } done: if (hp) { *cause = hp->cause; status = hp->status; *bleg = hp->bleg; switch_mutex_unlock(hp->mutex); switch_thread_join(&tstatus, hp->thread); switch_event_destroy(&hp->ovars); } for (i = 0; i < x_argc; i++) { if (hp == &handles[i]) { continue; } if (cancel_cause && *cancel_cause > 0) { handles[i].cancel_cause = *cancel_cause; } else { handles[i].cancel_cause = SWITCH_CAUSE_LOSE_RACE; } } for (i = 0; i < x_argc; i++) { if (hp == &handles[i]) { continue; } switch_mutex_unlock(handles[i].mutex); switch_thread_join(&tstatus, handles[i].thread); switch_event_destroy(&handles[i].ovars); } if (channel && rb_data.thread) { switch_channel_set_flag(channel, CF_NOT_READY); switch_thread_join(&tstatus, rb_data.thread); switch_channel_clear_flag(channel, CF_NOT_READY); } end: if (var_event && var_event != ovars) { switch_event_destroy(&var_event); } switch_core_destroy_memory_pool(&pool); return status; } struct early_state { originate_global_t *oglobals; originate_status_t *originate_status; switch_mutex_t *mutex; switch_buffer_t *buffer; int ready; ringback_t *ringback; }; typedef struct early_state early_state_t; static void *SWITCH_THREAD_FUNC early_thread_run(switch_thread_t *thread, void *obj) { early_state_t *state = (early_state_t *) obj; originate_status_t originate_status[MAX_PEERS] = { {0} }; int16_t mux_data[SWITCH_RECOMMENDED_BUFFER_SIZE / 2] = { 0 }; int32_t sample; switch_core_session_t *session; switch_codec_t *read_codec, read_codecs[MAX_PEERS] = { {0} }; int i, x, ready = 0, answered = 0; int16_t *data; uint32_t datalen = 0; switch_status_t status; switch_frame_t *read_frame = NULL; for (i = 0; i < MAX_PEERS && (session = state->originate_status[i].peer_session); i++) { originate_status[i].peer_session = session; switch_core_session_read_lock(session); } while (state->ready) { datalen = 0; memset(mux_data, 0, sizeof(mux_data)); ready = 0; answered = 0; for (i = 0; i < MAX_PEERS && (session = originate_status[i].peer_session); i++) { switch_channel_t *channel = switch_core_session_get_channel(session); if (switch_channel_media_ready(channel)) { ready++; if (switch_channel_test_flag(channel, CF_ANSWERED)) { answered++; } if (!state->ringback->asis) { if (!switch_core_codec_ready((&read_codecs[i]))) { read_codec = switch_core_session_get_read_codec(session); if (switch_core_codec_init(&read_codecs[i], "L16", NULL, read_codec->implementation->actual_samples_per_second, read_codec->implementation->microseconds_per_packet / 1000, 1, SWITCH_CODEC_FLAG_ENCODE | SWITCH_CODEC_FLAG_DECODE, NULL, switch_core_session_get_pool(session)) != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Codec Error!\n"); } else { switch_core_session_set_read_codec(session, &read_codecs[i]); } } status = switch_core_session_read_frame(session, &read_frame, SWITCH_IO_FLAG_NONE, 0); if (SWITCH_READ_ACCEPTABLE(status)) { data = (int16_t *) read_frame->data; if (datalen < read_frame->datalen) { datalen = read_frame->datalen; } for (x = 0; x < (int) read_frame->datalen / 2; x++) { sample = data[x] + mux_data[x]; switch_normalize_to_16bit(sample); mux_data[x] = (int16_t) sample; } } } else { status = switch_core_session_read_frame(session, &read_frame, SWITCH_IO_FLAG_NONE, 0); if (SWITCH_READ_ACCEPTABLE(status)) { datalen = read_frame->datalen; } break; } } } if (state->ringback->asis && datalen) { uint16_t flen = (uint16_t)datalen; switch_mutex_lock(state->mutex); switch_buffer_write(state->buffer, &flen, sizeof(uint16_t)); switch_buffer_write(state->buffer, read_frame->data, datalen); switch_mutex_unlock(state->mutex); } else if (datalen) { switch_mutex_lock(state->mutex); switch_buffer_write(state->buffer, mux_data, datalen); switch_mutex_unlock(state->mutex); } if (!ready || answered) { break; } } for (i = 0; i < MAX_PEERS && (session = originate_status[i].peer_session); i++) { if (switch_core_codec_ready((&read_codecs[i]))) { switch_core_codec_destroy(&read_codecs[i]); } switch_core_session_reset(session, SWITCH_FALSE, SWITCH_TRUE); switch_core_session_rwunlock(session); } state->oglobals->early_ok = 1; return NULL; } #define peer_eligible(_peer) (_peer && !(switch_channel_test_flag(_peer, CF_TRANSFER) || \ switch_channel_test_flag(_peer, CF_REDIRECT) || \ switch_channel_test_flag(_peer, CF_BRIDGED) || \ switch_channel_get_state(_peer) == CS_RESET || \ !switch_channel_test_flag(_peer, CF_ORIGINATING))) static void wait_for_cause(switch_channel_t *channel) { int sanity = 5; while (--sanity > 0 && peer_eligible(channel) && switch_channel_get_cause(channel) == SWITCH_CAUSE_NONE) { switch_yield(10000); } } SWITCH_DECLARE(switch_status_t) switch_ivr_originate(switch_core_session_t *session, switch_core_session_t **bleg, switch_call_cause_t *cause, const char *bridgeto, uint32_t timelimit_sec, const switch_state_handler_table_t *table, const char *cid_name_override, const char *cid_num_override, switch_caller_profile_t *caller_profile_override, switch_event_t *ovars, switch_originate_flag_t flags, switch_call_cause_t *cancel_cause) { originate_status_t originate_status[MAX_PEERS] = { {0} }; switch_originate_flag_t dftflags = SOF_NONE, myflags = dftflags; char *pipe_names[MAX_PEERS] = { 0 }; char *data = NULL; switch_status_t status = SWITCH_STATUS_SUCCESS; switch_channel_t *caller_channel = NULL; char *peer_names[MAX_PEERS] = { 0 }; switch_core_session_t *new_session = NULL, *peer_session; switch_caller_profile_t *new_profile = NULL, *caller_caller_profile; char *chan_type = NULL, *chan_data; switch_channel_t *peer_channel = NULL; ringback_t ringback = { 0 }; time_t start; switch_frame_t *read_frame = NULL; int r = 0, i, and_argc = 0, or_argc = 0; int32_t sleep_ms = 1000, try = 0, retries = 1; switch_codec_t write_codec = { 0 }; switch_frame_t write_frame = { 0 }; char *odata, *var; switch_call_cause_t reason = SWITCH_CAUSE_NONE; switch_call_cause_t force_reason = SWITCH_CAUSE_NONE; uint8_t to = 0; char *var_val; const char *ringback_data = NULL; switch_event_t *var_event = NULL; int8_t fail_on_single_reject = 0; char *fail_on_single_reject_var = NULL; char *loop_data = NULL; uint32_t progress_timelimit_sec = 0; const char *cid_tmp, *lc; originate_global_t oglobals = { 0 }; int cdr_total = 0; int local_clobber = 0; const char *cancel_key = NULL; const char *holding = NULL; const char *soft_holding = NULL; early_state_t early_state = { 0 }; int read_packet = 0; int check_reject = 1; switch_codec_implementation_t read_impl = { 0 }; if (strstr(bridgeto, SWITCH_ENT_ORIGINATE_DELIM)) { return switch_ivr_enterprise_originate(session, bleg, cause, bridgeto, timelimit_sec, table, cid_name_override, cid_num_override, caller_profile_override, ovars, flags, cancel_cause); } oglobals.check_vars = SWITCH_TRUE; oglobals.ringback_ok = 1; oglobals.bridge_early_media = -1; oglobals.file = NULL; oglobals.error_file = NULL; switch_core_new_memory_pool(&oglobals.pool); if (caller_profile_override) { oglobals.caller_profile_override = switch_caller_profile_dup(oglobals.pool, caller_profile_override); } else if (session) { switch_caller_profile_t *cp = switch_channel_get_caller_profile(switch_core_session_get_channel(session)); if (cp) { oglobals.caller_profile_override = switch_caller_profile_dup(oglobals.pool, cp); } } if (session) { const char *to_var, *bypass_media = NULL, *proxy_media = NULL; caller_channel = switch_core_session_get_channel(session); switch_channel_set_flag(caller_channel, CF_ORIGINATOR); oglobals.session = session; switch_core_session_get_read_impl(session, &read_impl); if ((to_var = switch_channel_get_variable(caller_channel, SWITCH_CALL_TIMEOUT_VARIABLE))) { timelimit_sec = atoi(to_var); } proxy_media = switch_channel_get_variable(caller_channel, SWITCH_PROXY_MEDIA_VARIABLE); bypass_media = switch_channel_get_variable(caller_channel, SWITCH_BYPASS_MEDIA_VARIABLE); if (!zstr(proxy_media)) { if (switch_true(proxy_media)) { switch_channel_set_flag(caller_channel, CF_PROXY_MEDIA); } else if (switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA)) { switch_channel_clear_flag(caller_channel, CF_PROXY_MEDIA); } } if (bypass_media && switch_channel_test_flag(caller_channel, CF_EARLY_MEDIA) && !switch_channel_test_flag(caller_channel, CF_ANSWERED)) { switch_core_session_message_t msg = { 0 }; msg.message_id = SWITCH_MESSAGE_INDICATE_CLEAR_PROGRESS; msg.from = __FILE__; switch_core_session_receive_message(session, &msg); } if (!zstr(bypass_media) && !switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA)) { if (switch_true(bypass_media)) { switch_channel_set_flag(caller_channel, CF_PROXY_MODE); } else if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE)) { if (!switch_channel_test_flag(caller_channel, CF_ANSWERED) && switch_channel_test_flag(caller_channel, CF_EARLY_MEDIA)) { switch_channel_set_variable(caller_channel, SWITCH_B_SDP_VARIABLE, NULL); switch_channel_answer(caller_channel); switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "Must answer channel %s due to SIP PARADOX\n", switch_channel_get_name(caller_channel)); } switch_channel_set_variable(caller_channel, SWITCH_B_SDP_VARIABLE, NULL); switch_ivr_media(switch_core_session_get_uuid(session), SMF_NONE); } } if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE) && switch_channel_test_flag(caller_channel, CF_ANSWERED)) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Channel is already up, delaying proxy mode 'till both legs are answered.\n"); switch_channel_set_variable(caller_channel, "bypass_media_after_bridge", "true"); switch_channel_set_variable(caller_channel, SWITCH_BYPASS_MEDIA_VARIABLE, NULL); switch_channel_clear_flag(caller_channel, CF_PROXY_MODE); } } if (timelimit_sec <= 0) { timelimit_sec = 60; } oglobals.idx = IDX_NADA; oglobals.early_ok = 1; *bleg = NULL; switch_zmalloc(write_frame.data, SWITCH_RECOMMENDED_BUFFER_SIZE); write_frame.buflen = SWITCH_RECOMMENDED_BUFFER_SIZE; odata = strdup(bridgeto); if (!odata) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Memory Error!\n"); status = SWITCH_STATUS_MEMERR; goto done; } data = odata; /* Some channel are created from an originating channel and some aren't so not all outgoing calls have a way to get params so we will normalize dialstring params and channel variables (when there is an originator) into an event that we will use as a pseudo hash to consult for params as needed. */ if (ovars) { var_event = ovars; } else { if (switch_event_create_plain(&var_event, SWITCH_EVENT_CHANNEL_DATA) != SWITCH_STATUS_SUCCESS) { abort(); } } if (caller_channel) { switch_channel_process_export(caller_channel, NULL, var_event, SWITCH_EXPORT_VARS_VARIABLE); } /* strip leading spaces */ while (data && *data && *data == ' ') { data++; } if ((ovars && switch_true(switch_event_get_header(ovars,"origination_nested_vars"))) || (caller_channel && switch_true(switch_channel_get_variable(caller_channel, "origination_nested_vars"))) || switch_true(switch_core_get_variable("origination_nested_vars")) || switch_stristr("origination_nested_vars=true", data)) { oglobals.check_vars = SWITCH_FALSE; } /* extract channel variables, allowing multiple sets of braces */ if (*data == '<') { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Parsing ultra-global variables\n"); while (*data == '<') { char *parsed = NULL; if (switch_event_create_brackets(data, '<', '>', ',', &var_event, &parsed, SWITCH_FALSE) != SWITCH_STATUS_SUCCESS || !parsed) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Parse Error!\n"); switch_goto_status(SWITCH_STATUS_GENERR, done); } data = parsed; } } /* extract channel variables, allowing multiple sets of braces */ switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Parsing global variables\n"); while (*data == '{') { char *parsed = NULL; if (switch_event_create_brackets(data, '{', '}', ',', &var_event, &parsed, SWITCH_FALSE) != SWITCH_STATUS_SUCCESS || !parsed) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Parse Error!\n"); switch_goto_status(SWITCH_STATUS_GENERR, done); } data = parsed; } /* strip leading spaces (again) */ while (data && *data && *data == ' ') { data++; } if (zstr(data)) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "No origination URL specified!\n"); status = SWITCH_STATUS_GENERR; goto done; } if (oglobals.session) { switch_event_header_t *hi; const char *cdr_total_var; const char *cdr_var; if ((cdr_var = switch_channel_get_variable(caller_channel, "failed_xml_cdr_prefix"))) { char buf[128] = ""; switch_snprintf(buf, sizeof(buf), "%s_total", cdr_var); if ((cdr_total_var = switch_channel_get_variable(caller_channel, buf))) { int tmp = atoi(cdr_total_var); if (tmp > 0) { cdr_total = tmp; } } } /* Copy all the missing applicable channel variables from A-leg into the event */ if ((hi = switch_channel_variable_first(caller_channel))) { for (; hi; hi = hi->next) { int ok = 0; if (!strcasecmp((char *) hi->name, "group_confirm_key")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "group_confirm_file")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "group_confirm_read_timeout")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "group_confirm_cancel_timeout")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "forked_dial")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "fail_on_single_reject")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "ignore_early_media")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "bridge_early_media")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "originate_continue_on_timeout")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "ignore_ring_ready")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "monitor_early_media_ring")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "monitor_early_media_ring_total")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "monitor_early_media_fail")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "return_ring_ready")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "ring_ready")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "instant_ringback")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "progress_timeout")) { ok = 1; } else if (!strcasecmp((char *) hi->name, "language")) { ok = 1; } if (ok && !switch_event_get_header(var_event, hi->name)) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, (char *) hi->name, (char *) hi->value); } } switch_channel_variable_last(caller_channel); } /* if ((hi = switch_channel_variable_first(caller_channel))) { for (; hi; hi = switch_hash_next(hi)) { switch_hash_this(hi, &vvar, NULL, &vval); if (vvar && vval) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, (void *) vvar, (char *) vval); } } switch_channel_variable_last(caller_channel); } */ } if (caller_channel) { /* ringback is only useful when there is an originator */ ringback_data = NULL; cancel_key = switch_channel_get_variable(caller_channel, "origination_cancel_key"); if (switch_channel_test_flag(caller_channel, CF_ANSWERED)) { ringback_data = switch_channel_get_variable(caller_channel, "transfer_ringback"); } if (!ringback_data) { ringback_data = switch_channel_get_variable(caller_channel, "ringback"); } switch_channel_set_variable(caller_channel, "originate_disposition", "failure"); switch_channel_set_variable(caller_channel, "DIALSTATUS", "INVALIDARGS"); if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE) || switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA)) { ringback_data = NULL; } else if (zstr(ringback_data)) { const char *vvar; if ((vvar = switch_channel_get_variable(caller_channel, SWITCH_SEND_SILENCE_WHEN_IDLE_VARIABLE))) { int sval = atoi(vvar); if (sval) { ringback_data = switch_core_session_sprintf(oglobals.session, "silence:%d", sval); } } } } #if 0 /* changing behaviour ignore_early_media=true must also be explicitly set for previous behaviour */ if (ringback_data) { oglobals.early_ok = 0; } #endif if (switch_true(switch_event_get_header(var_event, "group_confirm_cancel_timeout"))) { oglobals.cancel_timeout = -1; } if ((var = switch_event_get_header(var_event, "group_confirm_key"))) { switch_copy_string(oglobals.key, var, sizeof(oglobals.key)); if ((var = switch_event_get_header(var_event, "group_confirm_file"))) { oglobals.file = strdup(var); } if ((var = switch_event_get_header(var_event, "group_confirm_error_file"))) { oglobals.error_file = strdup(var); } if ((var = switch_event_get_header(var_event, "group_confirm_read_timeout"))) { int tmp = atoi(var); if (tmp >= 0) { oglobals.confirm_timeout = tmp; } } } /* When using the AND operator, the fail_on_single_reject flag may be set in order to indicate that a single rejections should terminate the attempt rather than a timeout, answer, or rejection by all. If the value is set to 'true' any fail cause will end the attempt otherwise it can contain a comma (,) separated list of cause names which should be considered fatal */ if ((var = switch_event_get_header(var_event, "fail_on_single_reject"))) { fail_on_single_reject_var = strdup(var); if (switch_true(var)) { fail_on_single_reject = 1; } else { fail_on_single_reject = -1; } } if ((!zstr(oglobals.file)) && (!strcmp(oglobals.file, "undef"))) { switch_safe_free(oglobals.file); oglobals.file = NULL; } if ((!zstr(oglobals.error_file)) && (!strcmp(oglobals.error_file, "undef"))) { switch_safe_free(oglobals.error_file); oglobals.error_file = NULL; } if ((var_val = switch_event_get_header(var_event, "bridge_early_media"))) { if (switch_true(var_val)) { oglobals.early_ok = 0; oglobals.ignore_early_media = 3; } } if ((var_val = switch_event_get_header(var_event, "ignore_early_media"))) { if (switch_true(var_val)) { oglobals.early_ok = 0; oglobals.ignore_early_media = 1; } else if (!strcmp(var_val, "ring_ready")) { oglobals.early_ok = 0; oglobals.ignore_early_media = 2; } } if ((var_val = switch_event_get_header(var_event, "originate_continue_on_timeout")) && switch_true(var_val)) { oglobals.continue_on_timeout = 1; } if ((var_val = switch_event_get_header(var_event, "ignore_ring_ready")) && switch_true(var_val)) { oglobals.ignore_ring_ready = 1; } if ((var_val = switch_event_get_header(var_event, "monitor_early_media_ring"))) { oglobals.early_ok = 0; oglobals.monitor_early_media_ring = 1; } if ((var_val = switch_event_get_header(var_event, "monitor_early_media_fail"))) { oglobals.early_ok = 0; oglobals.monitor_early_media_fail = 1; } if ((var_val = switch_event_get_header(var_event, "return_ring_ready")) && switch_true(var_val)) { oglobals.return_ring_ready = 1; } if ((var_val = switch_event_get_header(var_event, "ring_ready")) && switch_true(var_val)) { oglobals.ring_ready = 1; } if ((var_val = switch_event_get_header(var_event, "instant_ringback")) && switch_true(var_val)) { oglobals.instant_ringback = 1; } if ((var_val = switch_event_get_header(var_event, "originate_timeout"))) { int tmp = atoi(var_val); if (tmp > 0) { timelimit_sec = (uint32_t) tmp; } } if ((var_val = switch_event_get_header(var_event, "progress_timeout"))) { int tmp = atoi(var_val); if (tmp > 0) { progress_timelimit_sec = (uint32_t) tmp; } } if ((var_val = switch_event_get_header(var_event, "originate_retries")) && switch_true(var_val)) { int32_t tmp; tmp = atoi(var_val); if (tmp > 0 && tmp < 101) { retries = tmp; } else { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "Invalid originate_retries setting of %d ignored, value must be between 1 and 100\n", tmp); } } if ((var_val = switch_event_get_header(var_event, "originate_retry_sleep_ms")) && switch_true(var_val)) { int32_t tmp; tmp = atoi(var_val); if (tmp >= 500 && tmp <= 60000) { sleep_ms = tmp; } else { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "Invalid originate_retry_sleep_ms setting of %d ignored, value must be between 500 and 60000\n", tmp); } } if ((cid_tmp = switch_event_get_header(var_event, "origination_caller_id_name"))) { cid_name_override = cid_tmp; } if (cid_name_override) { if (!cid_tmp) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "origination_caller_id_name", cid_name_override); } } else { cid_name_override = switch_event_get_header(var_event, "origination_caller_id_name"); } if ((cid_tmp = switch_event_get_header(var_event, "origination_caller_id_number"))) { cid_num_override = cid_tmp; } if (cid_num_override) { if (!cid_tmp) { switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "origination_caller_id_number", cid_num_override); } } else { cid_num_override = switch_event_get_header(var_event, "origination_caller_id_number"); } if (flags & SOF_NO_LIMITS) { dftflags |= SOF_NO_LIMITS; } if (cid_num_override) { dftflags |= SOF_NO_EFFECTIVE_CID_NUM; } if (cid_name_override) { dftflags |= SOF_NO_EFFECTIVE_CID_NAME; } if (!progress_timelimit_sec) { progress_timelimit_sec = timelimit_sec; } for (try = 0; try < retries; try++) { switch_safe_free(loop_data); loop_data = strdup(data); switch_assert(loop_data); or_argc = switch_separate_string(loop_data, '|', pipe_names, (sizeof(pipe_names) / sizeof(pipe_names[0]))); if ((flags & SOF_NOBLOCK) && or_argc > 1) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "Only calling the first element in the list in this mode.\n"); or_argc = 1; } for (r = 0; r < or_argc; r++) { char *p, *end = NULL; int q = 0, alt = 0; check_reject = 1; oglobals.hups = 0; reason = SWITCH_CAUSE_NONE; memset(peer_names, 0, sizeof(peer_names)); peer_session = NULL; memset(originate_status, 0, sizeof(originate_status)); new_profile = NULL; new_session = NULL; chan_type = NULL; chan_data = NULL; peer_channel = NULL; start = 0; read_frame = NULL; oglobals.ringback_ok = 1; var = NULL; to = 0; oglobals.sent_ring = 0; oglobals.progress = 0; myflags = dftflags; if (try > 0) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_NOTICE, "Originate attempt %d/%d in %d ms\n", try + 1, retries, sleep_ms); if (caller_channel) { switch_ivr_sleep(oglobals.session, sleep_ms, SWITCH_TRUE, NULL); if (!switch_channel_ready(caller_channel)) { status = SWITCH_STATUS_FALSE; goto done; } } else { switch_yield(sleep_ms * 1000); } } p = pipe_names[r]; while (p && *p) { if (*p == '[') { end = switch_find_end_paren(p, '[', ']'); if (*(p+1) == '^' && *(p + 2) == '^') { alt = 1; } else { alt = 0; } q = 0; } if (*p == '\'') { q = !q; } if (end && p < end && *p == ',') { if (q || alt) { *p = QUOTED_ESC_COMMA; } else { *p = UNQUOTED_ESC_COMMA; } } if (p == end) { end = switch_strchr_strict(p, '[', " "); } p++; } and_argc = switch_separate_string(pipe_names[r], ',', peer_names, (sizeof(peer_names) / sizeof(peer_names[0]))); if ((flags & SOF_NOBLOCK) && and_argc > 1) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_WARNING, "Only calling the first element in the list in this mode.\n"); and_argc = 1; } for (i = 0; i < and_argc; i++) { const char *current_variable; switch_event_t *local_var_event = NULL, *originate_var_event = NULL, *event = NULL; end = NULL; chan_type = peer_names[i]; /* strip leading spaces */ while (chan_type && *chan_type && *chan_type == ' ') { chan_type++; } /* extract channel variables, allowing multiple sets of braces */ if (*chan_type == '[') { switch_event_create_plain(&local_var_event, SWITCH_EVENT_CHANNEL_DATA); switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "Parsing session specific variables\n"); } while (*chan_type == '[') { char *parsed = NULL; for (p = chan_type; p && *p && *p != ']'; p++) { if (*p == QUOTED_ESC_COMMA) { *p = ','; } } if (switch_event_create_brackets(chan_type, '[', ']', UNQUOTED_ESC_COMMA, &local_var_event, &parsed, SWITCH_FALSE) != SWITCH_STATUS_SUCCESS || !parsed) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_ERROR, "Parse Error!\n"); switch_goto_status(SWITCH_STATUS_GENERR, done); } chan_type = parsed; } /* strip leading spaces (again) */ while (chan_type && *chan_type && *chan_type == ' ') { chan_type++; } if ((chan_data = strchr(chan_type, '/')) != 0) { *chan_data = '\0'; chan_data++; } if (oglobals.session) { if (!switch_channel_ready(caller_channel)) { status = SWITCH_STATUS_FALSE; goto done; } if ((caller_caller_profile = oglobals.caller_profile_override)) { new_profile = switch_caller_profile_dup(oglobals.pool, caller_caller_profile); } else { new_profile = switch_caller_profile_new(oglobals.pool, NULL, NULL, cid_name_override, cid_num_override, NULL, NULL, NULL, NULL, __FILE__, NULL, chan_data); } new_profile->uuid = SWITCH_BLANK_STRING; new_profile->chan_name = SWITCH_BLANK_STRING; new_profile->destination_number = switch_core_strdup(new_profile->pool, chan_data); if (cid_name_override) { new_profile->caller_id_name = switch_core_strdup(new_profile->pool, cid_name_override); } if (cid_num_override) { new_profile->caller_id_number = switch_core_strdup(new_profile->pool, cid_num_override); } } else { if (oglobals.caller_profile_override) { new_profile = switch_caller_profile_dup(oglobals.pool, oglobals.caller_profile_override); new_profile->destination_number = switch_core_strdup(new_profile->pool, switch_str_nil(chan_data)); new_profile->uuid = SWITCH_BLANK_STRING; new_profile->chan_name = SWITCH_BLANK_STRING; } else { if (!cid_name_override) { cid_name_override = SWITCH_DEFAULT_CLID_NAME; } if (!cid_num_override) { cid_num_override = "0000000000"; } new_profile = switch_caller_profile_new(oglobals.pool, NULL, NULL, cid_name_override, cid_num_override, NULL, NULL, NULL, NULL, __FILE__, NULL, chan_data); } } if (zstr(new_profile->destination_number)) { new_profile->destination_number = switch_core_strdup(new_profile->pool, "service"); } new_profile->callee_id_name = switch_core_strdup(new_profile->pool, "Outbound Call"); new_profile->callee_id_number = switch_sanitize_number(switch_core_strdup(new_profile->pool, new_profile->destination_number)); originate_status[i].caller_profile = NULL; originate_status[i].peer_channel = NULL; originate_status[i].peer_session = NULL; new_session = NULL; if (and_argc > 1 || or_argc > 1) { myflags |= SOF_FORKED_DIAL; } if (var_event) { const char *vvar; if ((vvar = switch_event_get_header(var_event, "forked_dial")) && switch_true(vvar)) { myflags |= SOF_FORKED_DIAL; } if ((vvar = switch_event_get_header(var_event, "no_throttle_limits")) && switch_true(vvar)) { myflags |= SOF_NO_LIMITS; } } /* Valid in both {} and [] with [] taking precedence */ /* make a special var event with mixture of the {} and the [] vars to pass down as global vars to the outgoing channel so if something like the user channel does another originate our options will be passed down properly */ switch_event_dup(&originate_var_event, var_event); if (local_var_event) { switch_event_merge(originate_var_event, local_var_event); } if ((current_variable = switch_event_get_header(originate_var_event, "origination_caller_id_number"))) { new_profile->caller_id_number = switch_core_strdup(new_profile->pool, current_variable); myflags |= SOF_NO_EFFECTIVE_CID_NUM; } if ((current_variable = switch_event_get_header(originate_var_event, "origination_caller_id_name"))) { new_profile->caller_id_name = switch_core_strdup(new_profile->pool, current_variable); myflags |= SOF_NO_EFFECTIVE_CID_NAME; } if ((current_variable = switch_event_get_header(originate_var_event, "origination_privacy"))) { new_profile->flags = SWITCH_CPF_NONE; if (switch_stristr("screen", current_variable)) { switch_set_flag(new_profile, SWITCH_CPF_SCREEN); } if (switch_stristr("hide_name", current_variable)) { switch_set_flag(new_profile, SWITCH_CPF_HIDE_NAME); } if (switch_stristr("hide_number", current_variable)) { switch_set_flag(new_profile, SWITCH_CPF_HIDE_NUMBER); } } switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "originate_early_media", oglobals.early_ok ? "true" : "false"); if (caller_channel && switch_true(switch_channel_get_variable(caller_channel, "push_channel_name"))) { char *new_name = switch_core_session_sprintf(session, "%s__B", switch_channel_get_name(caller_channel)); switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "origination_channel_name", new_name); new_name = switch_core_session_sprintf(session, "_%s", switch_channel_get_name(caller_channel)); switch_event_add_header_string(var_event, SWITCH_STACK_BOTTOM, "sip_h_X-FS-Channel-Name", new_name); } reason = switch_core_session_outgoing_channel(oglobals.session, originate_var_event, chan_type, new_profile, &new_session, NULL, myflags, cancel_cause); switch_event_destroy(&originate_var_event); if (reason != SWITCH_CAUSE_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_NOTICE, "Cannot create outgoing channel of type [%s] cause: [%s]\n", chan_type, switch_channel_cause2str(reason)); if (local_var_event) switch_event_destroy(&local_var_event); if (fail_on_single_reject_var) { const char *cause_str = switch_channel_cause2str(reason); int neg = *fail_on_single_reject_var == '!'; int pos = !!switch_stristr(cause_str, fail_on_single_reject_var); if (neg) { pos = !pos; } check_reject = 0; if (fail_on_single_reject == 1 || pos) { force_reason = reason; status = SWITCH_STATUS_FALSE; goto outer_for; } } continue; } if (switch_core_session_read_lock(new_session) != SWITCH_STATUS_SUCCESS) { status = SWITCH_STATUS_FALSE; if (local_var_event) switch_event_destroy(&local_var_event); goto done; } originate_status[i].peer_channel = switch_core_session_get_channel(new_session); originate_status[i].caller_profile = switch_channel_get_caller_profile(originate_status[i].peer_channel); originate_status[i].peer_session = new_session; switch_channel_set_flag(originate_status[i].peer_channel, CF_ORIGINATING); if (caller_channel) { switch_channel_set_variable(originate_status[i].peer_channel, "call_uuid", switch_channel_get_variable(caller_channel, "call_uuid")); } if ((lc = switch_event_get_header(var_event, "local_var_clobber"))) { local_clobber = switch_true(lc); } if (local_clobber) { if (var_event) { switch_event_header_t *header; /* install the vars from the {} params */ for (header = var_event->headers; header; header = header->next) { switch_channel_set_variable_var_check(originate_status[i].peer_channel, header->name, header->value, oglobals.check_vars); } } } /* copy local originate vars to the channel */ if (local_var_event) { switch_event_header_t *header; for (header = local_var_event->headers; header; header = header->next) { switch_channel_set_variable_var_check(originate_status[i].peer_channel, header->name, header->value, oglobals.check_vars); } switch_event_destroy(&local_var_event); } if (!local_clobber) { if (var_event) { switch_event_header_t *header; /* install the vars from the {} params */ for (header = var_event->headers; header; header = header->next) { switch_channel_set_variable_var_check(originate_status[i].peer_channel, header->name, header->value, oglobals.check_vars); } } } switch_event_create(&event, SWITCH_EVENT_CHANNEL_ORIGINATE); switch_assert(event); switch_channel_event_set_data(originate_status[i].peer_channel, event); switch_event_fire(&event); if (originate_status[i].peer_channel) { const char *vvar; if (switch_true(switch_channel_get_variable(originate_status[i].peer_channel, "leg_required"))) { originate_status[i].tagged = 1; } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "origination_channel_name"))) { switch_channel_set_name(originate_status[i].peer_channel, vvar); } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "origination_callee_id_name"))) { switch_channel_set_profile_var(originate_status[i].peer_channel, "callee_id_name", vvar); } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "origination_callee_id_number"))) { switch_channel_set_profile_var(originate_status[i].peer_channel, "callee_id_number", vvar); } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "leg_timeout"))) { int val = atoi(vvar); if (val > 0) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "%s Setting leg timeout to %d\n", switch_channel_get_name(originate_status[i].peer_channel), val); originate_status[i].per_channel_timelimit_sec = (uint32_t) val; } } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "leg_progress_timeout"))) { int val = atoi(vvar); if (val > 0) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "%s Setting leg progress timeout to %d\n", switch_channel_get_name(originate_status[i].peer_channel), val); originate_status[i].per_channel_progress_timelimit_sec = (uint32_t) val; } } if ((vvar = switch_channel_get_variable(originate_status[i].peer_channel, "leg_delay_start"))) { int val = atoi(vvar); if (val > 0) { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(session), SWITCH_LOG_DEBUG, "%s Setting leg delay start to %d\n", switch_channel_get_name(originate_status[i].peer_channel), val); originate_status[i].per_channel_delay_start = (uint32_t) val; if (originate_status[i].per_channel_progress_timelimit_sec != 0) { originate_status[i].per_channel_progress_timelimit_sec += originate_status[i].per_channel_delay_start; } if (originate_status[i].per_channel_timelimit_sec != 0) { originate_status[i].per_channel_timelimit_sec += originate_status[i].per_channel_delay_start; } } } if (session) { switch_channel_set_variable(originate_status[i].peer_channel, "originating_leg_uuid", switch_core_session_get_uuid(session)); } switch_channel_execute_on(originate_status[i].peer_channel, SWITCH_CHANNEL_EXECUTE_ON_ORIGINATE_VARIABLE); switch_channel_api_on(originate_status[i].peer_channel, SWITCH_CHANNEL_API_ON_ORIGINATE_VARIABLE); } if (table) { switch_channel_add_state_handler(originate_status[i].peer_channel, table); } if (oglobals.monitor_early_media_ring || oglobals.monitor_early_media_fail) { switch_channel_set_flag(originate_status[i].peer_channel, CF_CONSUME_ON_ORIGINATE); } switch_channel_add_state_handler(originate_status[i].peer_channel, &originate_state_handlers); if ((flags & SOF_NOBLOCK) && originate_status[i].peer_session) { status = SWITCH_STATUS_SUCCESS; *bleg = originate_status[i].peer_session; *cause = SWITCH_CAUSE_SUCCESS; goto outer_for; } if (!switch_core_session_running(originate_status[i].peer_session)) { if (originate_status[i].per_channel_delay_start) { switch_channel_set_flag(originate_status[i].peer_channel, CF_BLOCK_STATE); } switch_core_session_thread_launch(originate_status[i].peer_session); } } switch_epoch_time_now(&start); for (;;) { uint32_t valid_channels = 0; for (i = 0; i < and_argc; i++) { int state; time_t elapsed; if (!originate_status[i].peer_channel) { continue; } state = switch_channel_get_state(originate_status[i].peer_channel); if (state < CS_HANGUP) { valid_channels++; } else { continue; } if (state >= CS_ROUTING) { goto endfor1; } if (caller_channel && !switch_channel_ready(caller_channel)) { goto notready; } elapsed = switch_epoch_time_now(NULL) - start; if (elapsed > (time_t) timelimit_sec) { to++; oglobals.idx = IDX_TIMEOUT; goto notready; } if (!oglobals.sent_ring && !oglobals.ignore_ring_ready && !oglobals.progress && (progress_timelimit_sec && elapsed > (time_t) progress_timelimit_sec)) { to++; oglobals.idx = IDX_TIMEOUT; if (force_reason == SWITCH_CAUSE_NONE) { force_reason = SWITCH_CAUSE_PROGRESS_TIMEOUT; } goto notready; } switch_cond_next(); } check_per_channel_timeouts(&oglobals, originate_status, and_argc, start, &force_reason); if (valid_channels == 0) { status = SWITCH_STATUS_GENERR; goto done; } } endfor1: if (caller_channel) { if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE) || switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA) || switch_channel_test_flag(caller_channel, CF_DISABLE_RINGBACK)) { ringback_data = NULL; } } #if 0 /* changing behaviour ignore_early_media=true must also be explicitly set for previous behaviour */ if (ringback_data) { oglobals.early_ok = 0; } #endif if (ringback_data) { oglobals.sending_ringback = 1; } else { oglobals.ringback_ok = 0; } if (caller_channel) { soft_holding = switch_channel_get_variable(caller_channel, SWITCH_SOFT_HOLDING_UUID_VARIABLE); } while ((!caller_channel || switch_channel_ready(caller_channel) || switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) && check_channel_status(&oglobals, originate_status, and_argc)) { time_t elapsed = switch_epoch_time_now(NULL) - start; read_packet = 0; if (cancel_cause && *cancel_cause > 0) { if (force_reason == SWITCH_CAUSE_NONE) { force_reason = *cancel_cause; } oglobals.idx = IDX_CANCEL; goto notready; } check_per_channel_timeouts(&oglobals, originate_status, and_argc, start, &force_reason); if (oglobals.session) { switch_ivr_parse_all_events(oglobals.session); } if (!oglobals.sent_ring && !oglobals.progress && (progress_timelimit_sec && elapsed > (time_t) progress_timelimit_sec)) { oglobals.idx = IDX_TIMEOUT; if (force_reason == SWITCH_CAUSE_NONE) { force_reason = SWITCH_CAUSE_PROGRESS_TIMEOUT; } goto notready; } if ((to = (uint8_t) (elapsed >= (time_t) timelimit_sec)) || (fail_on_single_reject && oglobals.hups)) { int ok = 0; if (fail_on_single_reject_var) { if (!switch_true(fail_on_single_reject_var)) { ok = 1; for (i = 0; i < and_argc; i++) { switch_channel_t *pchannel; const char *cause_str; if (!originate_status[i].peer_session) { continue; } pchannel = switch_core_session_get_channel(originate_status[i].peer_session); if (switch_channel_down_nosig(pchannel)) { int neg, pos; cause_str = switch_channel_cause2str(switch_channel_get_cause(pchannel)); neg = *fail_on_single_reject_var == '!'; pos = !!switch_stristr(cause_str, fail_on_single_reject_var); if (neg) { pos = !pos; } if (pos) { ok = 0; break; } } } } } if (!ok) { oglobals.idx = IDX_TIMEOUT; goto notready; } } /* read from the channel while we wait if the audio is up on it */ if (oglobals.session && !switch_channel_test_flag(caller_channel, CF_PROXY_MODE) && !switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA) && !switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE) && (oglobals.ringback_ok || (switch_channel_test_flag(caller_channel, CF_ANSWERED) || switch_channel_test_flag(caller_channel, CF_EARLY_MEDIA)))) { switch_status_t tstatus = SWITCH_STATUS_SUCCESS; int silence = 0; if (caller_channel && cancel_key) { if (switch_channel_has_dtmf(caller_channel)) { switch_dtmf_t dtmf = { 0, 0 }; if (switch_channel_dequeue_dtmf(caller_channel, &dtmf) == SWITCH_STATUS_SUCCESS) { if (dtmf.digit == *cancel_key) { oglobals.idx = IDX_KEY_CANCEL; goto notready; } } } } if (switch_channel_media_ready(caller_channel)) { tstatus = switch_core_session_read_frame(oglobals.session, &read_frame, SWITCH_IO_FLAG_NONE, 0); if (!SWITCH_READ_ACCEPTABLE(tstatus)) { if (soft_holding) { switch_channel_set_flag(caller_channel, CF_XFER_ZOMBIE); } if (switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { goto do_continue; } break; } read_packet++; } else { read_frame = NULL; } if (oglobals.ringback_ok && (oglobals.ring_ready || oglobals.instant_ringback || oglobals.sending_ringback > 1 || oglobals.bridge_early_media > -1)) { if (oglobals.ringback_ok == 1) { switch_status_t rst; rst = setup_ringback(&oglobals, originate_status, and_argc, ringback_data, &ringback, &write_frame, &write_codec); if (oglobals.bridge_early_media > -1) { switch_threadattr_t *thd_attr = NULL; switch_threadattr_create(&thd_attr, switch_core_session_get_pool(session)); switch_threadattr_stacksize_set(thd_attr, SWITCH_THREAD_STACKSIZE); early_state.oglobals = &oglobals; early_state.originate_status = originate_status; early_state.ready = 1; early_state.ringback = &ringback; switch_mutex_init(&early_state.mutex, SWITCH_MUTEX_NESTED, switch_core_session_get_pool(session)); switch_buffer_create_dynamic(&early_state.buffer, 1024, 1024, 0); switch_thread_create(&oglobals.ethread, thd_attr, early_thread_run, &early_state, switch_core_session_get_pool(session)); } switch (rst) { case SWITCH_STATUS_SUCCESS: oglobals.ringback_ok++; break; case SWITCH_STATUS_FALSE: goto notready; break; case SWITCH_STATUS_BREAK: goto done; break; default: ringback_data = NULL; oglobals.ringback_ok = 0; oglobals.sending_ringback = 0; break; } goto do_continue; } if (oglobals.bridge_early_media > -1) { write_frame.datalen = 0; switch_mutex_lock(early_state.mutex); if (ringback.asis) { uint16_t mlen; switch_size_t buflen = switch_buffer_inuse(early_state.buffer); if (buflen > sizeof(uint16_t)) { switch_buffer_peek(early_state.buffer, &mlen, sizeof(uint16_t)); if (buflen >= (mlen + sizeof(uint16_t))) { switch_buffer_toss(early_state.buffer, sizeof(uint16_t)); write_frame.datalen = switch_buffer_read(early_state.buffer, write_frame.data, mlen); } } } else { if (switch_buffer_inuse(early_state.buffer) >= write_frame.codec->implementation->decoded_bytes_per_packet) { write_frame.datalen = switch_buffer_read(early_state.buffer, write_frame.data, write_frame.codec->implementation->decoded_bytes_per_packet); } } switch_mutex_unlock(early_state.mutex); } else if (ringback.fh) { switch_size_t mlen, olen; unsigned int pos = 0; if (ringback.asis) { mlen = write_frame.codec->implementation->encoded_bytes_per_packet; } else { mlen = write_frame.codec->implementation->samples_per_packet; } olen = mlen; //if (ringback.fh->resampler && ringback.fh->resampler->rfactor > 1) { //olen = (switch_size_t) (olen * ringback.fh->resampler->rfactor); //} switch_core_file_read(ringback.fh, write_frame.data, &olen); if (olen == 0) { olen = mlen; ringback.fh->speed = 0; switch_core_file_seek(ringback.fh, &pos, 0, SEEK_SET); switch_core_file_read(ringback.fh, write_frame.data, &olen); if (olen == 0) { break; } } write_frame.datalen = (uint32_t) (ringback.asis ? olen : olen * 2); } else if (ringback.audio_buffer) { if ((write_frame.datalen = (uint32_t) switch_buffer_read_loop(ringback.audio_buffer, write_frame.data, write_frame.codec->implementation->decoded_bytes_per_packet)) <= 0) { if (soft_holding) { switch_channel_set_flag(caller_channel, CF_XFER_ZOMBIE); goto do_continue; } break; } } else if (ringback.silence) { silence = ringback.silence; } } else { silence = 600; } if ((ringback.fh || silence || ringback.audio_buffer || oglobals.bridge_early_media > -1) && write_frame.codec && write_frame.datalen) { if (silence) { write_frame.datalen = read_impl.decoded_bytes_per_packet; switch_generate_sln_silence((int16_t *) write_frame.data, write_frame.datalen / 2, silence); } if (switch_core_session_write_frame(oglobals.session, &write_frame, SWITCH_IO_FLAG_NONE, 0) != SWITCH_STATUS_SUCCESS) { if (soft_holding) { switch_channel_set_flag(caller_channel, CF_XFER_ZOMBIE); } if (switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { goto do_continue; } break; } } } do_continue: if (!read_packet) { switch_cond_next(); } } notready: if (caller_channel) { holding = switch_channel_get_variable(caller_channel, SWITCH_HOLDING_UUID_VARIABLE); switch_channel_set_variable(caller_channel, SWITCH_HOLDING_UUID_VARIABLE, NULL); if (soft_holding && switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { holding = soft_holding; soft_holding = NULL; switch_channel_set_variable(caller_channel, SWITCH_SOFT_HOLDING_UUID_VARIABLE, NULL); } } if (caller_channel && !switch_channel_ready(caller_channel) && !switch_channel_test_flag(caller_channel, CF_XFER_ZOMBIE)) { oglobals.idx = IDX_CANCEL; } if (oglobals.session && (ringback_data || !(switch_channel_test_flag(caller_channel, CF_PROXY_MODE) || switch_channel_test_flag(caller_channel, CF_PROXY_MEDIA)))) { switch_core_session_reset(oglobals.session, SWITCH_FALSE, SWITCH_TRUE); } if (holding) { if (oglobals.idx > IDX_NADA) { peer_session = originate_status[oglobals.idx].peer_session; peer_channel = originate_status[oglobals.idx].peer_channel; originate_status[oglobals.idx].peer_channel = NULL; } else if (and_argc == 1) { peer_session = originate_status[0].peer_session; peer_channel = originate_status[0].peer_channel; originate_status[0].peer_channel = NULL; } else { for (i = 0; i < and_argc; i++) { if (!peer_eligible(originate_status[i].peer_channel)) { continue; } if (switch_channel_media_ready(originate_status[i].peer_channel)) { peer_session = originate_status[i].peer_session; peer_channel = originate_status[i].peer_channel; originate_status[i].peer_channel = NULL; goto end_search; } } for (i = 0; i < and_argc; i++) { if (!peer_eligible(originate_status[i].peer_channel)) { continue; } if (switch_channel_up_nosig(originate_status[i].peer_channel)) { peer_session = originate_status[i].peer_session; peer_channel = originate_status[i].peer_channel; originate_status[i].peer_channel = NULL; break; } } } end_search: if (peer_channel && switch_channel_down_nosig(peer_channel)) { switch_core_session_rwunlock(peer_session); peer_session = NULL; peer_channel = NULL; } if (oglobals.idx == IDX_TIMEOUT || to || oglobals.idx == IDX_KEY_CANCEL || oglobals.idx == IDX_CANCEL || (!peer_session && oglobals.idx == IDX_NADA)) { const char *dest = NULL; const char *context = NULL; const char *dialplan = NULL; switch_core_session_t *holding_session; if (caller_channel) { if (zstr(context)) { context = switch_channel_get_variable(caller_channel, "context"); } if (zstr(dialplan)) { dialplan = switch_channel_get_variable(caller_channel, "dialplan"); } } if (zstr(context)) { context = "default"; } if (zstr(context)) { dialplan = "XML"; } if ((holding_session = switch_core_session_locate(holding))) { switch_channel_t *holding_channel = switch_core_session_get_channel(holding_session); switch_status_t mstatus = SWITCH_STATUS_FALSE; if (caller_channel) { if ((mstatus = switch_channel_caller_extension_masquerade(caller_channel, holding_channel, 0)) == SWITCH_STATUS_SUCCESS) { switch_channel_restart(holding_channel); } } if (mstatus != SWITCH_STATUS_SUCCESS) { if (peer_channel) { dest = switch_channel_get_variable(peer_channel, "destination_number"); context = switch_channel_get_variable(peer_channel, "context"); dialplan = switch_channel_get_variable(peer_channel, "dialplan"); } else if (caller_channel) { dest = switch_channel_get_variable(caller_channel, "destination_number"); } if (dest) { switch_ivr_session_transfer(holding_session, dest, dialplan, context); } } switch_core_session_rwunlock(holding_session); holding = NULL; holding_session = NULL; } if (peer_channel) { switch_channel_hangup(peer_channel, SWITCH_CAUSE_ATTENDED_TRANSFER); switch_core_session_rwunlock(peer_session); } if (force_reason == SWITCH_CAUSE_NONE) { force_reason = SWITCH_CAUSE_ATTENDED_TRANSFER; } } else if (zstr(soft_holding)) { if (peer_channel && switch_channel_ready(peer_channel)) { switch_core_session_t *holding_session; if (force_reason == SWITCH_CAUSE_NONE) { force_reason = SWITCH_CAUSE_ATTENDED_TRANSFER; } if ((holding_session = switch_core_session_locate(holding))) { switch_channel_set_variable(switch_core_session_get_channel(holding_session), SWITCH_HANGUP_AFTER_BRIDGE_VARIABLE, "true"); switch_core_session_rwunlock(holding_session); } switch_channel_set_flag(peer_channel, CF_LAZY_ATTENDED_TRANSFER); switch_ivr_uuid_bridge(holding, switch_core_session_get_uuid(peer_session)); holding = NULL; oglobals.idx = IDX_NADA; if (caller_channel && switch_channel_up_nosig(caller_channel) && !switch_channel_test_flag(caller_channel, CF_INTERCEPTED)) { switch_channel_hangup(caller_channel, SWITCH_CAUSE_ATTENDED_TRANSFER); } caller_channel = NULL; oglobals.session = NULL; session = NULL; switch_core_session_rwunlock(peer_session); } else { switch_core_session_t *holding_session; if ((holding_session = switch_core_session_locate(holding))) { switch_channel_t *holding_channel = switch_core_session_get_channel(holding_session); if (caller_channel && switch_channel_ready(caller_channel)) { switch_channel_set_variable(holding_channel, SWITCH_HANGUP_AFTER_BRIDGE_VARIABLE, "true"); switch_ivr_uuid_bridge(holding, switch_core_session_get_uuid(session)); holding = NULL; } else { switch_channel_hangup(holding_channel, SWITCH_CAUSE_NORMAL_UNSPECIFIED); } switch_core_session_rwunlock(holding_session); } } } peer_session = NULL; peer_channel = NULL; } for (i = 0; i < and_argc; i++) { if (!peer_eligible(originate_status[i].peer_channel)) { continue; } if (i != oglobals.idx) { holding = NULL; if (oglobals.idx == IDX_TIMEOUT || to) { reason = SWITCH_CAUSE_NO_ANSWER; } else { if (oglobals.idx == IDX_CANCEL) { reason = SWITCH_CAUSE_ORIGINATOR_CANCEL; } else { if (and_argc > 1) { reason = SWITCH_CAUSE_LOSE_RACE; } else if (!switch_channel_ready(originate_status[i].peer_channel)) { wait_for_cause(originate_status[i].peer_channel); if (switch_channel_down_nosig(originate_status[i].peer_channel)) { reason = switch_channel_get_cause(originate_status[i].peer_channel); } } else { reason = SWITCH_CAUSE_NO_ANSWER; } } } if (switch_channel_up_nosig(originate_status[i].peer_channel)) { if (caller_channel && i == 0) { holding = switch_channel_get_variable(caller_channel, SWITCH_SOFT_HOLDING_UUID_VARIABLE); switch_channel_set_variable(caller_channel, SWITCH_SOFT_HOLDING_UUID_VARIABLE, NULL); } if (holding && oglobals.idx != IDX_TIMEOUT && oglobals.idx != IDX_KEY_CANCEL && oglobals.idx < 0) { switch_core_session_t *holding_session; if ((holding_session = switch_core_session_locate(holding))) { switch_channel_t *holding_channel = switch_core_session_get_channel(holding_session); switch_channel_set_variable(holding_channel, SWITCH_HANGUP_AFTER_BRIDGE_VARIABLE, "true"); if (caller_channel && switch_true(switch_channel_get_variable(caller_channel, "recording_follow_transfer"))) { switch_core_media_bug_transfer_recordings(session, originate_status[i].peer_session); } if (switch_true(switch_channel_get_variable(holding_channel, "recording_follow_transfer"))) { switch_core_media_bug_transfer_recordings(holding_session, originate_status[i].peer_session); } switch_core_session_rwunlock(holding_session); } switch_channel_set_flag(originate_status[i].peer_channel, CF_LAZY_ATTENDED_TRANSFER); switch_ivr_uuid_bridge(holding, switch_core_session_get_uuid(originate_status[i].peer_session)); holding = NULL; } else { switch_channel_hangup(originate_status[i].peer_channel, force_reason ? force_reason : reason); } } } } if (oglobals.idx > IDX_NADA) { if ((peer_session = originate_status[oglobals.idx].peer_session)) { peer_channel = switch_core_session_get_channel(originate_status[oglobals.idx].peer_session); } } else { status = SWITCH_STATUS_FALSE; if (caller_channel && peer_channel) { switch_process_import(oglobals.session, peer_channel, "import", NULL); } peer_channel = NULL; goto done; } if (caller_channel) { if (switch_channel_test_flag(peer_channel, CF_ANSWERED)) { switch_channel_pass_callee_id(peer_channel, caller_channel); if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE)) { status = SWITCH_STATUS_SUCCESS; } else { status = switch_channel_answer(caller_channel); } } else if (switch_channel_test_flag(peer_channel, CF_EARLY_MEDIA)) { if (switch_channel_test_flag(caller_channel, CF_PROXY_MODE)) { status = SWITCH_STATUS_SUCCESS; } else { status = switch_channel_pre_answer(caller_channel); } } else { status = SWITCH_STATUS_SUCCESS; } if (status != SWITCH_STATUS_SUCCESS) { switch_log_printf(SWITCH_CHANNEL_CHANNEL_LOG(peer_channel), SWITCH_LOG_DEBUG, "%s Media Establishment Failed.\n", switch_channel_get_name(caller_channel)); switch_channel_hangup(peer_channel, SWITCH_CAUSE_INCOMPATIBLE_DESTINATION); } } if (switch_channel_test_flag(peer_channel, CF_ANSWERED) || (oglobals.early_ok && switch_channel_test_flag(peer_channel, CF_EARLY_MEDIA)) || (oglobals.return_ring_ready && switch_channel_test_flag(peer_channel, CF_RING_READY)) ) { *bleg = peer_session; if (oglobals.monitor_early_media_ring || oglobals.monitor_early_media_fail) { switch_ivr_stop_tone_detect_session(peer_session); switch_channel_set_private(peer_channel, "_oglobals_", NULL); } status = SWITCH_STATUS_SUCCESS; } else { status = SWITCH_STATUS_FALSE; } done: *cause = SWITCH_CAUSE_NONE; if (caller_channel && !switch_channel_ready(caller_channel)) { status = SWITCH_STATUS_FALSE; } if (status == SWITCH_STATUS_SUCCESS) { if (caller_channel) { switch_channel_set_variable(caller_channel, "originate_disposition", "call accepted"); if (peer_channel) { switch_process_import(oglobals.session, peer_channel, "import", NULL); if (switch_channel_test_flag(peer_channel, CF_ANSWERED)) { switch_channel_set_variable(caller_channel, "DIALSTATUS", "EARLY"); } else { switch_channel_set_variable(caller_channel, "DIALSTATUS", "ANSWER"); } } } switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals.session), SWITCH_LOG_DEBUG, "Originate Resulted in Success: [%s]\n", switch_channel_get_name(peer_channel)); *cause = SWITCH_CAUSE_SUCCESS; } else { const char *cdr_var = NULL; switch_xml_t cdr = NULL; char *xml_text; char buf[128] = "", buf2[128] = ""; if (caller_channel) { cdr_var = switch_channel_get_variable(caller_channel, "failed_xml_cdr_prefix"); } if (peer_channel) { wait_for_cause(peer_channel); *cause = switch_channel_get_cause(peer_channel); } else { for (i = 0; i < and_argc; i++) { if (!originate_status[i].peer_channel) { continue; } *cause = switch_channel_get_cause(originate_status[i].peer_channel); break; } } if (cdr_var) { for (i = 0; i < and_argc; i++) { switch_channel_t *channel; if (!originate_status[i].peer_session) { continue; } channel = switch_core_session_get_channel(originate_status[i].peer_session); switch_channel_wait_for_state_timeout(channel, CS_REPORTING, 5000); if (!switch_channel_test_flag(channel, CF_TIMESTAMP_SET)) { switch_channel_set_timestamps(channel); } if (switch_ivr_generate_xml_cdr(originate_status[i].peer_session, &cdr) == SWITCH_STATUS_SUCCESS) { if ((xml_text = switch_xml_toxml(cdr, SWITCH_FALSE))) { switch_snprintf(buf, sizeof(buf), "%s_%d", cdr_var, ++cdr_total); switch_channel_set_variable(caller_channel, buf, xml_text); switch_safe_free(xml_text); } switch_xml_free(cdr); cdr = NULL; } } switch_snprintf(buf, sizeof(buf), "%s_total", cdr_var); switch_snprintf(buf2, sizeof(buf2), "%d", cdr_total ? cdr_total : 0); switch_channel_set_variable(caller_channel, buf, buf2); } if (caller_channel && switch_channel_test_flag(caller_channel, CF_INTERCEPTED)) { *cause = SWITCH_CAUSE_PICKED_OFF; } if (!*cause) { if (reason) { *cause = reason; } else if (caller_channel) { *cause = switch_channel_get_cause(caller_channel); } else { *cause = SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER; for (i = 0; i < and_argc; i++) { if (!peer_eligible(originate_status[i].peer_channel)) { continue; } wait_for_cause(originate_status[i].peer_channel); if (switch_channel_down_nosig(originate_status[i].peer_channel)) { *cause = switch_channel_get_cause(originate_status[i].peer_channel); break; } } } } if (*cause == SWITCH_CAUSE_SUCCESS || *cause == SWITCH_CAUSE_NONE) { *cause = SWITCH_CAUSE_ORIGINATOR_CANCEL; } if (oglobals.idx == IDX_CANCEL) { *cause = SWITCH_CAUSE_ORIGINATOR_CANCEL; switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals.session), SWITCH_LOG_DEBUG, "Originate Cancelled by originator termination Cause: %d [%s]\n", *cause, switch_channel_cause2str(*cause)); } else if (oglobals.idx == IDX_TIMEOUT) { *cause = SWITCH_CAUSE_NO_ANSWER; } else { switch_log_printf(SWITCH_CHANNEL_SESSION_LOG(oglobals.session), SWITCH_LOG_DEBUG, "Originate Resulted in Error Cause: %d [%s]\n", *cause, switch_channel_cause2str(*cause)); } } if (caller_channel) { switch_channel_set_variable(caller_channel, "originate_disposition", switch_channel_cause2str(*cause)); switch (*cause) { case SWITCH_CAUSE_ORIGINATOR_CANCEL: switch_channel_set_variable(caller_channel, "DIALSTATUS", "CANCEL"); break; case SWITCH_CAUSE_USER_BUSY: switch_channel_set_variable(caller_channel, "DIALSTATUS", "BUSY"); break; case SWITCH_CAUSE_NO_ANSWER: switch_channel_set_variable(caller_channel, "DIALSTATUS", "NOANSWER"); break; case SWITCH_CAUSE_DESTINATION_OUT_OF_ORDER: case SWITCH_CAUSE_INVALID_PROFILE: switch_channel_set_variable(caller_channel, "DIALSTATUS", "INVALIDARGS"); break; case SWITCH_CAUSE_CALL_REJECTED: switch_channel_set_variable(caller_channel, "DIALSTATUS", "DONTCALL"); break; default: switch_channel_set_variable(caller_channel, "DIALSTATUS", switch_channel_cause2str(*cause)); break; } } early_state.ready = 0; if (oglobals.ethread) { switch_status_t st; switch_thread_join(&st, oglobals.ethread); } if (early_state.buffer) { switch_buffer_destroy(&early_state.buffer); } if (ringback.fh) { switch_core_file_close(ringback.fh); ringback.fh = NULL; } else if (ringback.audio_buffer) { teletone_destroy_session(&ringback.ts); switch_buffer_destroy(&ringback.audio_buffer); } if (oglobals.session) { switch_core_session_reset(oglobals.session, SWITCH_FALSE, SWITCH_TRUE); } if (switch_core_codec_ready(&write_codec)) { switch_core_codec_destroy(&write_codec); } for (i = 0; i < and_argc; i++) { switch_channel_state_t state; if (!originate_status[i].peer_channel) { continue; } if (status == SWITCH_STATUS_SUCCESS) { switch_channel_clear_flag(originate_status[i].peer_channel, CF_ORIGINATING); if (bleg && *bleg && *bleg == originate_status[i].peer_session) { continue; } } else if ((state = switch_channel_get_state(originate_status[i].peer_channel)) < CS_HANGUP && switch_channel_test_flag(originate_status[i].peer_channel, CF_ORIGINATING)) { if (!(state == CS_RESET || switch_channel_test_flag(originate_status[i].peer_channel, CF_TRANSFER) || switch_channel_test_flag(originate_status[i].peer_channel, CF_REDIRECT) || switch_channel_test_flag(originate_status[i].peer_channel, CF_BRIDGED))) { if (caller_channel && switch_channel_test_flag(caller_channel, CF_INTERCEPTED)) { switch_channel_set_flag(originate_status[i].peer_channel, CF_INTERCEPT); } switch_channel_hangup(originate_status[i].peer_channel, *cause); } } switch_channel_clear_flag(originate_status[i].peer_channel, CF_ORIGINATING); switch_core_session_rwunlock(originate_status[i].peer_session); } if (status == SWITCH_STATUS_SUCCESS) { goto outer_for; } else { int ok = 1; if (fail_on_single_reject && check_reject && !switch_true(fail_on_single_reject_var)) { for (i = 0; i < and_argc; i++) { switch_channel_t *pchannel; const char *cause_str; if (!originate_status[i].peer_session) { continue; } pchannel = switch_core_session_get_channel(originate_status[i].peer_session); wait_for_cause(pchannel); if (switch_channel_down_nosig(pchannel)) { int neg, pos; cause_str = switch_channel_cause2str(switch_channel_get_cause(pchannel)); neg = *fail_on_single_reject_var == '!'; pos = !!switch_stristr(cause_str, fail_on_single_reject_var); if (neg) { pos = !pos; } if (pos) { ok = 0; break; } } } } if (!ok) { goto outer_for; } if (to && !oglobals.continue_on_timeout) { goto outer_for; } } } } outer_for: switch_safe_free(loop_data); switch_safe_free(odata); switch_safe_free(oglobals.file); switch_safe_free(oglobals.error_file); if (bleg && status != SWITCH_STATUS_SUCCESS) { *bleg = NULL; } if (*bleg) { switch_channel_t *bchan = switch_core_session_get_channel(*bleg); if (session && caller_channel) { switch_caller_profile_t *cloned_profile, *peer_profile = switch_channel_get_caller_profile(switch_core_session_get_channel(*bleg)); if (peer_profile) { if ((cloned_profile = switch_caller_profile_clone(session, peer_profile)) != 0) { switch_channel_set_originatee_caller_profile(caller_channel, cloned_profile); } } switch_channel_set_variable(caller_channel, SWITCH_SIGNAL_BOND_VARIABLE, switch_core_session_get_uuid(*bleg)); // Now main SWITCH_SIGNAL_BOND_VARIABLE is populated, don't need this one anymore... switch_channel_set_variable(caller_channel, "originate_signal_bond", NULL); } while(switch_channel_state_change_pending(bchan)) { switch_cond_next(); } switch_channel_audio_sync(bchan); if (caller_channel) { switch_channel_audio_sync(caller_channel); } } if (oglobals.session) { switch_ivr_parse_all_events(oglobals.session); } if (oglobals.session && status == SWITCH_STATUS_SUCCESS) { switch_ivr_sleep(oglobals.session, 0, SWITCH_TRUE, NULL); } if (var_event && var_event != ovars) { switch_event_destroy(&var_event); } switch_safe_free(write_frame.data); switch_safe_free(fail_on_single_reject_var); if (caller_channel) { switch_channel_clear_flag(caller_channel, CF_ORIGINATOR); switch_channel_clear_flag(caller_channel, CF_XFER_ZOMBIE); } if (force_reason != SWITCH_CAUSE_NONE) { *cause = force_reason; } switch_core_destroy_memory_pool(&oglobals.pool); return status; } /* For Emacs: * Local Variables: * mode:c * indent-tabs-mode:t * tab-width:4 * c-basic-offset:4 * End: * For VIM: * vim:set softtabstop=4 shiftwidth=4 tabstop=4: */