static struct ast_channel_tech lcr_tech;
+void lock_debug(char *text)
+{
+ pthread_t tid = pthread_self();
+// printf("%s|%03x\n", text, ((tid>>6) | (tid>>3) | tid) & 0xfff); fflush(stdout);
+ printf(" %s(%x) ", text, (int)tid); fflush(stdout);
+}
+
/*
* logging
*/
char ast_text[128] = "NULL";
va_list args;
+ lock_debug("L+");
ast_mutex_lock(&log_lock);
+ lock_debug("L-");
va_start(args,fmt);
vsnprintf(buffer,sizeof(buffer)-1,fmt,args);
ast_log(type, file, line, function, "[call=%s ast=%s] %s", call_text, ast_text, buffer);
ast_mutex_unlock(&log_lock);
+ lock_debug("l");
}
/*
{
union parameter newparam;
struct ast_channel *ast = call->ast;
+ const char *tmp;
if (!call->ast || !call->ref)
return;
default:
newparam.setup.callerinfo.ntype = INFO_NTYPE_UNKNOWN;
}
+ tmp = pbx_builtin_getvar_helper(ast, "LCR_TRANSFERCAPABILITY");
+ if (tmp && *tmp)
+ ast->transfercapability = atoi(tmp);
newparam.setup.capainfo.bearer_capa = ast->transfercapability;
newparam.setup.capainfo.bearer_mode = INFO_BMODE_CIRCUIT;
if (call->hdlc)
if (param->setup.callerinfo.name[0])
ast->cid.cid_name = strdup(param->setup.callerinfo.name);
if (param->setup.redirinfo.id[0])
- ast->cid.cid_name = strdup(numberrize_callerinfo(param->setup.callerinfo.id, param->setup.callerinfo.ntype, options.national, options.international));
+ ast->cid.cid_rdnis = strdup(numberrize_callerinfo(param->setup.redirinfo.id, param->setup.redirinfo.ntype, options.national, options.international));
switch (param->setup.callerinfo.present) {
case INFO_PRESENT_ALLOWED:
ast->cid.cid_pres = AST_PRES_ALLOWED;
p = call->queue_string;
ast = call->ast;
if (*p && ast) {
+ lock_debug("A1+");
ast_channel_lock(ast);
+ lock_debug("A1-");
while(*p) {
switch (*p) {
case 'T':
}
call->queue_string[0] = '\0';
ast_channel_unlock(ast);
+ lock_debug("a1");
}
call = call->next;
}
void lock_chan(void)
{
+ lock_debug("C+");
ast_mutex_lock(&chan_lock);
+ lock_debug("C-");
}
void unlock_chan(void)
{
ast_mutex_unlock(&chan_lock);
+ lock_debug("c");
}
/* chan_lcr thread */
/* open socket the first time */
handle_retry(NULL, NULL, 0);
+ lock_debug("A2+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A2-");
while(!quit) {
handle_queue();
CERROR(NULL, NULL, "Thread exit.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a2");
return NULL;
}
struct ast_channel *ast;
struct chan_call *call;
+ lock_debug("A3+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A3-");
CDEBUG(NULL, NULL, "Received request from Asterisk. (data=%s)\n", (char *)data);
/* if socket is closed */
if (lcr_sock < 0) {
CERROR(NULL, NULL, "Rejecting call from Asterisk, because LCR not running.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a3");
return NULL;
}
if (!call) {
/* failed to create instance */
ast_mutex_unlock(&chan_lock);
+ lock_debug("a3");
return NULL;
}
free_call(call);
/* failed to create instance */
ast_mutex_unlock(&chan_lock);
+ lock_debug("a3");
return NULL;
}
ast->tech = &lcr_tech;
apply_opt(call, (char *)opt);
ast_mutex_unlock(&chan_lock);
+ lock_debug("a3");
return ast;
}
union parameter newparam;
struct chan_call *call;
+ lock_debug("A4+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A4-");
call = ast->tech_pvt;
#ifdef LCR_FOR_CALLWEAVER
if (!call) {
CERROR(NULL, ast, "Received call from Asterisk, but call instance does not exist.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a4");
return -1;
}
sizeof(call->cid_rdnis)-1);
ast_mutex_unlock(&chan_lock);
+ lock_debug("a4");
return 0;
}
if (digit > 126 || digit < 32)
return 0;
+ lock_debug("A5+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A5-");
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received digit from Asterisk, but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a5");
return -1;
}
}
ast_mutex_unlock(&chan_lock);
+ lock_debug("a5");
#ifdef LCR_FOR_ASTERISK
return 0;
struct chan_call *call;
#endif
+ lock_debug("A6+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A6-");
call = ast->tech_pvt;
"Received digit from Asterisk, "
"but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a6");
return -1;
}
}
ast_mutex_unlock(&chan_lock);
+ lock_debug("a6");
if (inband_dtmf) {
CDEBUG(call, ast, "-> sending '%c' inband.\n", digit);
union parameter newparam;
struct chan_call *call;
+ lock_debug("A7+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A7-");
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received answer from Asterisk, but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a7");
return -1;
}
// send_message(MESSAGE_ENABLEKEYPAD, call->ref, &newparam);
ast_mutex_unlock(&chan_lock);
+ lock_debug("a7");
return 0;
}
struct chan_call *call;
pthread_t tid = pthread_self();
- if (!pthread_equal(tid, chan_tid))
+ if (!pthread_equal(tid, chan_tid)) {
+ lock_debug("H+");
ast_mutex_lock(&chan_lock);
+ lock_debug("H-");
+ }
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received hangup from Asterisk, but no call instance exists.\n");
- if (!pthread_equal(tid, chan_tid))
+ if (!pthread_equal(tid, chan_tid)) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("h");
+ }
return -1;
}
send_release_and_import(call, CAUSE_NORMAL, LOCATION_PRIVATE_LOCAL);
/* remove call */
free_call(call);
- if (!pthread_equal(tid, chan_tid))
+ if (!pthread_equal(tid, chan_tid)) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("h");
+ }
return 0;
} else {
/* ref is not set, due to prepare setup or release */
call->ast = NULL;
}
}
- if (!pthread_equal(tid, chan_tid))
+ if (!pthread_equal(tid, chan_tid)) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("h");
+ }
return 0;
}
if (!(f->subclass & ast->nativeformats))
CDEBUG(NULL, ast, "Unexpected format.\n");
+ lock_debug("A8+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A8-");
call = ast->tech_pvt;
if (!call) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("a8");
return -1;
}
if (call->bchannel && f->samples)
bchannel_transmit(call->bchannel, *((unsigned char **)&(f->data)), f->samples);
ast_mutex_unlock(&chan_lock);
+ lock_debug("a8");
return 0;
}
struct chan_call *call;
int len;
+ lock_debug("A9+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A9-");
call = ast->tech_pvt;
if (!call) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("a9");
return NULL;
}
if (call->pipe[0] > -1) {
if (call->rebuffer && !call->hdlc) {
/* Make sure we have a complete 20ms (160byte) frame */
+ lock_debug("*1");
len=read(call->pipe[0],call->read_buff + call->framepos, 160 - call->framepos);
if (len > 0) {
call->framepos += len;
}
} else {
+ lock_debug("*2");
len = read(call->pipe[0], call->read_buff, sizeof(call->read_buff));
}
+ lock_debug("*3");
if (len < 0 && errno == EAGAIN) {
ast_mutex_unlock(&chan_lock);
+ lock_debug("a9");
#ifdef LCR_FOR_ASTERISK
return &ast_null_frame;
call->pipe[0] = -1;
global_change = 1;
ast_mutex_unlock(&chan_lock);
+ lock_debug("a9");
return NULL;
} else if (call->rebuffer && call->framepos < 160) {
/* Not a complete frame, so we send a null-frame */
ast_mutex_unlock(&chan_lock);
+ lock_debug("a9");
return &ast_null_frame;
}
}
call->read_fr.delivery = ast_tv(0,0);
*((unsigned char **)&(call->read_fr.data)) = call->read_buff;
ast_mutex_unlock(&chan_lock);
+ lock_debug("a9");
return &call->read_fr;
}
union parameter newparam;
int res = 0;
struct chan_call *call;
+ const struct tone_zone_sound *ts = NULL;
+ lock_debug("A0+");
ast_mutex_lock(&chan_lock);
+ lock_debug("A0-");
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received indicate from Asterisk, but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("a0");
return -1;
}
send_message(MESSAGE_DISCONNECT, call->ref, &newparam);
/* change state */
call->state = CHAN_LCR_STATE_OUT_DISCONNECT;
+ } else {
+ CDEBUG(call, ast, "Using Asterisk 'busy' indication\n");
+ ts = ast_get_indication_tone(ast->zone, "busy");
}
break;
case AST_CONTROL_CONGESTION:
send_message(MESSAGE_DISCONNECT, call->ref, &newparam);
/* change state */
call->state = CHAN_LCR_STATE_OUT_DISCONNECT;
+ } else {
+ CDEBUG(call, ast, "Using Asterisk 'congestion' indication\n");
+ ts = ast_get_indication_tone(ast->zone, "congestion");
}
break;
case AST_CONTROL_PROCEEDING:
send_message(MESSAGE_ALERTING, call->ref, &newparam);
/* change state */
call->state = CHAN_LCR_STATE_IN_ALERTING;
+ } else {
+ CDEBUG(call, ast, "Using Asterisk 'ring' indication\n");
+ ts = ast_get_indication_tone(ast->zone, "ring");
}
break;
case AST_CONTROL_PROGRESS:
break;
case -1:
CDEBUG(call, ast, "Received indicate -1.\n");
+ ast_playtones_stop(ast);
res = -1;
break;
break;
#ifdef AST_CONTROL_SRCUPDATE
case AST_CONTROL_SRCUPDATE:
+#else
+ case 20:
+#endif
CDEBUG(call, ast, "Received AST_CONTROL_SRCUPDATE from Asterisk.\n");
break;
-#endif
default:
CERROR(call, ast, "Received indicate from Asterisk with unknown condition %d.\n", cond);
res = -1;
break;
}
+ if (ts && ts->data[0]) {
+ ast_playtones_start(ast, 0, ts->data, 1);
+ }
+
/* return */
ast_mutex_unlock(&chan_lock);
+ lock_debug("a0");
return res;
}
return -1;
}
+ lock_debug("Af+");
ast_mutex_lock(&chan_lock);
+ lock_debug("Af-");
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received fixup from Asterisk, but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("af");
return -1;
}
CDEBUG(call, ast, "Received fixup from Asterisk.\n");
call->ast = ast;
ast_mutex_unlock(&chan_lock);
+ lock_debug("af");
return 0;
}
struct chan_call *call;
union parameter newparam;
+ lock_debug("At+");
ast_mutex_lock(&chan_lock);
+ lock_debug("At-");
call = ast->tech_pvt;
if (!call) {
CERROR(NULL, ast, "Received send_text from Asterisk, but no call instance exists.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("at");
return -1;
}
memset(&newparam, 0, sizeof(union parameter));
strncpy(newparam.notifyinfo.display, text, sizeof(newparam.notifyinfo.display)-1);
send_message(MESSAGE_NOTIFY, call->ref, &newparam);
- ast_mutex_lock(&chan_lock);
+ ast_mutex_unlock(&chan_lock);
+ lock_debug("at");
return 0;
}
carr[1] = ast2;
/* join via dsp (if the channels are currently open) */
+ lock_debug("Ab+");
ast_mutex_lock(&chan_lock);
+ lock_debug("Ab-");
call1 = ast1->tech_pvt;
call2 = ast2->tech_pvt;
if (!call1 || !call2) {
CDEBUG(NULL, NULL, "Bridge, but we don't have two call instances, exitting.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("ab");
return AST_BRIDGE_COMPLETE;
}
}
ast_mutex_unlock(&chan_lock);
+ lock_debug("ab");
while(1) {
to = -1;
CDEBUG(NULL, NULL, "Releasing bridge.\n");
/* split channels */
+ lock_debug("Ab+");
ast_mutex_lock(&chan_lock);
+ lock_debug("Ab-");
call1 = ast1->tech_pvt;
call2 = ast2->tech_pvt;
if (call1 && call1->bridge_id) {
call2->bridge_call = NULL;
ast_mutex_unlock(&chan_lock);
+ lock_debug("ab");
return AST_BRIDGE_COMPLETE;
}
static struct ast_channel_tech lcr_tech = {
{
struct chan_call *call;
+ lock_debug("Ae+");
ast_mutex_lock(&chan_lock);
+ lock_debug("Ae-");
#ifdef LCR_FOR_ASTERISK
CDEBUG(NULL, ast, "Received lcr_config (data=%s)\n", (char *)data);
CERROR(NULL, ast, "lcr_config app not called by chan_lcr channel.\n");
ast_mutex_unlock(&chan_lock);
+ lock_debug("ae");
return 0;
}
int load_module(void)
{
u_short i;
+ char options_error[256];
for (i = 0; i < 256; i++) {
flip_bits[i] = (i>>7) | ((i>>5)&2) | ((i>>3)&4) | ((i>>1)&8)
| (i<<7) | ((i&2)<<5) | ((i&4)<<3) | ((i&8)<<1);
}
- if (read_options() == 0) {
+ if (read_options(options_error) == 0) {
CERROR(NULL, NULL, "%s", options_error);
#ifdef LCR_FOR_ASTERISK
" vt - txgain control\n"
" Volume changes at factor 2 ^ optarg.\n"
" k - use keypad to dial this call.\n"
+ "\n"
+ "set LCR_TRANSFERCAPABILITY to the numerical bearer capabilty in order to alter caller's capability\n"
+ " -> use 16 for fax (3.1k audio)\n"
+ "\n"
+ "To send a fax, you need to set LCR_TRANSFERCAPABILITY environment to 16, also you need to set\n"
+ "options: \"n:t:q250\" for seamless audio transmission.\n"
);
hae
{
int res;
+ lock_debug("U+");
ast_mutex_lock(&usecnt_lock);
+ lock_debug("U-");
res = usecnt;
ast_mutex_unlock(&usecnt_lock);
+ lock_debug("u");
return res;
}
#endif