int cw_slinfactory_feed(struct cw_slinfactory *sf, struct cw_frame *f)
{
struct cw_frame *frame;
if (f == NULL)
return 0;
cw_mutex_lock(&(sf->lock));
if (f->subclass != CW_FORMAT_SLINEAR)
{
if (sf->trans && f->subclass != sf->format)
{
cw_translator_free_path(sf->trans);
sf->trans = NULL;
}
if (sf->trans == NULL)
{
if ((sf->trans = cw_translator_build_path(CW_FORMAT_SLINEAR, 8000, f->subclass, 8000)) == NULL)
{
cw_log(LOG_WARNING, "Cannot build a path from %s to slin\n", cw_getformatname(f->subclass));
cw_mutex_unlock(&(sf->lock));
return 0;
}
sf->format = f->subclass;
}
}
if (sf->trans)
{
if ((frame = cw_translate(sf->trans, f, 0)))
frame = cw_frdup(frame);
}
else
{
frame = cw_frdup(f);
}
if (frame)
{
int x = ++sf->queue.count;
frame->next = NULL;
if (sf->queue.tail)
sf->queue.tail->next = frame;
else
sf->queue.head = frame;
sf->queue.tail = frame;
frame->next = NULL;
sf->size += frame->datalen;
cw_mutex_unlock(&(sf->lock));
return x;
}
cw_mutex_unlock(&(sf->lock));
return 0;
}
int cw_play_and_record(struct cw_channel *chan, const char *playfile, const char *recordfile, int maxtime, const char *fmt, int *duration, int silencethreshold, int maxsilence, const char *path)
{
int d;
char *fmts;
char comment[256];
int x, fmtcnt=1, res=-1,outmsg=0;
struct cw_frame *f;
struct cw_filestream *others[MAX_OTHER_FORMATS];
char *sfmt[MAX_OTHER_FORMATS];
char *stringp=NULL;
time_t start, end;
struct cw_dsp *sildet=NULL; /* silence detector dsp */
int totalsilence = 0;
int dspsilence = 0;
int gotsilence = 0; /* did we timeout for silence? */
int rfmt=0;
if (silencethreshold < 0)
silencethreshold = global_silence_threshold;
if (maxsilence < 0)
maxsilence = global_maxsilence;
/* barf if no pointer passed to store duration in */
if (duration == NULL) {
cw_log(LOG_WARNING, "Error play_and_record called without duration pointer\n");
return -1;
}
cw_log(LOG_DEBUG,"play_and_record: %s, %s, '%s'\n", playfile ? playfile : "<None>", recordfile, fmt);
snprintf(comment,sizeof(comment),"Playing %s, Recording to: %s on %s\n", playfile ? playfile : "<None>", recordfile, chan->name);
if (playfile) {
d = cw_play_and_wait(chan, playfile);
if (d > -1)
d = cw_streamfile(chan, "beep",chan->language);
if (!d)
d = cw_waitstream(chan,"");
if (d < 0)
return -1;
}
fmts = cw_strdupa(fmt);
stringp=fmts;
strsep(&stringp, "|,");
cw_log(LOG_DEBUG,"Recording Formats: sfmts=%s\n", fmts);
sfmt[0] = cw_strdupa(fmts);
while((fmt = strsep(&stringp, "|,"))) {
if (fmtcnt > MAX_OTHER_FORMATS - 1) {
cw_log(LOG_WARNING, "Please increase MAX_OTHER_FORMATS in app_voicemail.c\n");
break;
}
sfmt[fmtcnt++] = cw_strdupa(fmt);
}
time(&start);
end=start; /* pre-initialize end to be same as start in case we never get into loop */
for (x=0;x<fmtcnt;x++) {
others[x] = cw_writefile(recordfile, sfmt[x], comment, O_TRUNC, 0, 0700);
cw_verbose( VERBOSE_PREFIX_3 "x=%d, open writing: %s format: %s, %p\n", x, recordfile, sfmt[x], others[x]);
if (!others[x]) {
break;
}
}
if (path)
cw_unlock_path(path);
if (maxsilence > 0) {
sildet = cw_dsp_new(); /* Create the silence detector */
if (!sildet) {
cw_log(LOG_WARNING, "Unable to create silence detector :(\n");
return -1;
}
cw_dsp_set_threshold(sildet, silencethreshold);
rfmt = chan->readformat;
res = cw_set_read_format(chan, CW_FORMAT_SLINEAR);
if (res < 0) {
cw_log(LOG_WARNING, "Unable to set to linear mode, giving up\n");
cw_dsp_free(sildet);
return -1;
}
}
/* Request a video update */
cw_indicate(chan, CW_CONTROL_VIDUPDATE);
if (x == fmtcnt) {
/* Loop forever, writing the packets we read to the writer(s), until
we read a # or get a hangup */
f = NULL;
for(;;) {
res = cw_waitfor(chan, 2000);
if (!res) {
cw_log(LOG_DEBUG, "One waitfor failed, trying another\n");
/* Try one more time in case of masq */
res = cw_waitfor(chan, 2000);
if (!res) {
cw_log(LOG_WARNING, "No audio available on %s??\n", chan->name);
res = -1;
}
}
if (res < 0) {
f = NULL;
break;
}
f = cw_read(chan);
if (!f)
break;
if (f->frametype == CW_FRAME_VOICE) {
/* write each format */
for (x=0;x<fmtcnt;x++) {
res = cw_writestream(others[x], f);
}
/* Silence Detection */
if (maxsilence > 0) {
dspsilence = 0;
cw_dsp_silence(sildet, f, &dspsilence);
if (dspsilence)
totalsilence = dspsilence;
else
totalsilence = 0;
if (totalsilence > maxsilence) {
/* Ended happily with silence */
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "Recording automatically stopped after a silence of %d seconds\n", totalsilence/1000);
cw_fr_free(f);
gotsilence = 1;
outmsg=2;
break;
}
}
/* Exit on any error */
if (res) {
cw_log(LOG_WARNING, "Error writing frame\n");
cw_fr_free(f);
break;
}
} else if (f->frametype == CW_FRAME_VIDEO) {
/* Write only once */
cw_writestream(others[0], f);
} else if (f->frametype == CW_FRAME_DTMF) {
if (f->subclass == '#') {
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "User ended message by pressing %c\n", f->subclass);
res = '#';
outmsg = 2;
cw_fr_free(f);
break;
}
if (f->subclass == '0') {
/* Check for a '0' during message recording also, in case caller wants operator */
if (option_verbose > 2)
cw_verbose(VERBOSE_PREFIX_3 "User cancelled by pressing %c\n", f->subclass);
res = '0';
outmsg = 0;
cw_fr_free(f);
break;
}
}
if (maxtime) {
time(&end);
if (maxtime < (end - start)) {
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "Took too long, cutting it short...\n");
outmsg = 2;
res = 't';
cw_fr_free(f);
break;
}
}
cw_fr_free(f);
}
if (end == start) time(&end);
if (!f) {
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "User hung up\n");
res = -1;
outmsg=1;
}
} else {
cw_log(LOG_WARNING, "Error creating writestream '%s', format '%s'\n", recordfile, sfmt[x]);
}
*duration = end - start;
for (x=0;x<fmtcnt;x++) {
if (!others[x])
break;
if (res > 0) {
if (totalsilence)
cw_stream_rewind(others[x], totalsilence-200);
else
cw_stream_rewind(others[x], 200);
}
cw_truncstream(others[x]);
cw_closestream(others[x]);
}
if (rfmt) {
if (cw_set_read_format(chan, rfmt)) {
cw_log(LOG_WARNING, "Unable to restore format %s to channel '%s'\n", cw_getformatname(rfmt), chan->name);
}
}
if (outmsg > 1) {
/* Let them know recording is stopped */
if(!cw_streamfile(chan, "auth-thankyou", chan->language))
cw_waitstream(chan, "");
}
if (sildet)
cw_dsp_free(sildet);
return res;
}
int cw_play_and_prepend(struct cw_channel *chan, char *playfile, char *recordfile, int maxtime, char *fmt, int *duration, int beep, int silencethreshold, int maxsilence)
{
int d = 0;
char *fmts;
char comment[256];
int x, fmtcnt=1, res=-1,outmsg=0;
struct cw_frame *f;
struct cw_filestream *others[MAX_OTHER_FORMATS];
struct cw_filestream *realfiles[MAX_OTHER_FORMATS];
char *sfmt[MAX_OTHER_FORMATS];
char *stringp=NULL;
time_t start, end;
struct cw_dsp *sildet; /* silence detector dsp */
int totalsilence = 0;
int dspsilence = 0;
int gotsilence = 0; /* did we timeout for silence? */
int rfmt=0;
char prependfile[80];
if (silencethreshold < 0)
silencethreshold = global_silence_threshold;
if (maxsilence < 0)
maxsilence = global_maxsilence;
/* barf if no pointer passed to store duration in */
if (duration == NULL) {
cw_log(LOG_WARNING, "Error play_and_prepend called without duration pointer\n");
return -1;
}
cw_log(LOG_DEBUG,"play_and_prepend: %s, %s, '%s'\n", playfile ? playfile : "<None>", recordfile, fmt);
snprintf(comment,sizeof(comment),"Playing %s, Recording to: %s on %s\n", playfile ? playfile : "<None>", recordfile, chan->name);
if (playfile || beep) {
if (!beep)
d = cw_play_and_wait(chan, playfile);
if (d > -1)
d = cw_streamfile(chan, "beep",chan->language);
if (!d)
d = cw_waitstream(chan,"");
if (d < 0)
return -1;
}
cw_copy_string(prependfile, recordfile, sizeof(prependfile));
strncat(prependfile, "-prepend", sizeof(prependfile) - strlen(prependfile) - 1);
fmts = cw_strdupa(fmt);
stringp=fmts;
strsep(&stringp, "|,");
cw_log(LOG_DEBUG,"Recording Formats: sfmts=%s\n", fmts);
sfmt[0] = cw_strdupa(fmts);
while((fmt = strsep(&stringp, "|,"))) {
if (fmtcnt > MAX_OTHER_FORMATS - 1) {
cw_log(LOG_WARNING, "Please increase MAX_OTHER_FORMATS in app_voicemail.c\n");
break;
}
sfmt[fmtcnt++] = cw_strdupa(fmt);
}
time(&start);
end=start; /* pre-initialize end to be same as start in case we never get into loop */
for (x=0;x<fmtcnt;x++) {
others[x] = cw_writefile(prependfile, sfmt[x], comment, O_TRUNC, 0, 0700);
cw_verbose( VERBOSE_PREFIX_3 "x=%d, open writing: %s format: %s, %p\n", x, prependfile, sfmt[x], others[x]);
if (!others[x]) {
break;
}
}
sildet = cw_dsp_new(); /* Create the silence detector */
if (!sildet) {
cw_log(LOG_WARNING, "Unable to create silence detector :(\n");
return -1;
}
cw_dsp_set_threshold(sildet, silencethreshold);
if (maxsilence > 0) {
rfmt = chan->readformat;
res = cw_set_read_format(chan, CW_FORMAT_SLINEAR);
if (res < 0) {
cw_log(LOG_WARNING, "Unable to set to linear mode, giving up\n");
return -1;
}
}
if (x == fmtcnt) {
/* Loop forever, writing the packets we read to the writer(s), until
we read a # or get a hangup */
f = NULL;
for(;;) {
res = cw_waitfor(chan, 2000);
if (!res) {
cw_log(LOG_DEBUG, "One waitfor failed, trying another\n");
/* Try one more time in case of masq */
res = cw_waitfor(chan, 2000);
if (!res) {
cw_log(LOG_WARNING, "No audio available on %s??\n", chan->name);
res = -1;
}
}
if (res < 0) {
f = NULL;
break;
}
f = cw_read(chan);
if (!f)
break;
if (f->frametype == CW_FRAME_VOICE) {
/* write each format */
for (x=0;x<fmtcnt;x++) {
if (!others[x])
break;
res = cw_writestream(others[x], f);
}
/* Silence Detection */
if (maxsilence > 0) {
dspsilence = 0;
cw_dsp_silence(sildet, f, &dspsilence);
if (dspsilence)
totalsilence = dspsilence;
else
totalsilence = 0;
if (totalsilence > maxsilence) {
/* Ended happily with silence */
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "Recording automatically stopped after a silence of %d seconds\n", totalsilence/1000);
cw_fr_free(f);
gotsilence = 1;
outmsg=2;
break;
}
}
/* Exit on any error */
if (res) {
cw_log(LOG_WARNING, "Error writing frame\n");
cw_fr_free(f);
break;
}
} else if (f->frametype == CW_FRAME_VIDEO) {
/* Write only once */
cw_writestream(others[0], f);
} else if (f->frametype == CW_FRAME_DTMF) {
/* stop recording with any digit */
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "User ended message by pressing %c\n", f->subclass);
res = 't';
outmsg = 2;
cw_fr_free(f);
break;
}
if (maxtime) {
time(&end);
if (maxtime < (end - start)) {
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "Took too long, cutting it short...\n");
res = 't';
outmsg=2;
cw_fr_free(f);
break;
}
}
cw_fr_free(f);
}
if (end == start)
time(&end);
if (!f) {
if (option_verbose > 2)
cw_verbose( VERBOSE_PREFIX_3 "User hung up\n");
res = -1;
outmsg=1;
#if 0
/* delete all the prepend files */
for (x=0;x<fmtcnt;x++) {
if (!others[x])
break;
cw_closestream(others[x]);
cw_filedelete(prependfile, sfmt[x]);
}
#endif
}
} else {
cw_log(LOG_WARNING, "Error creating writestream '%s', format '%s'\n", prependfile, sfmt[x]);
}
*duration = end - start;
#if 0
if (outmsg > 1) {
#else
if (outmsg) {
#endif
struct cw_frame *fr;
for (x=0;x<fmtcnt;x++) {
snprintf(comment, sizeof(comment), "Opening the real file %s.%s\n", recordfile, sfmt[x]);
realfiles[x] = cw_readfile(recordfile, sfmt[x], comment, O_RDONLY, 0, 0);
if (!others[x] || !realfiles[x])
break;
if (totalsilence)
cw_stream_rewind(others[x], totalsilence-200);
else
cw_stream_rewind(others[x], 200);
cw_truncstream(others[x]);
/* add the original file too */
while ((fr = cw_readframe(realfiles[x]))) {
cw_writestream(others[x],fr);
}
cw_closestream(others[x]);
cw_closestream(realfiles[x]);
cw_filerename(prependfile, recordfile, sfmt[x]);
#if 0
cw_verbose("Recording Format: sfmts=%s, prependfile %s, recordfile %s\n", sfmt[x],prependfile,recordfile);
#endif
cw_filedelete(prependfile, sfmt[x]);
}
}
if (rfmt) {
if (cw_set_read_format(chan, rfmt)) {
cw_log(LOG_WARNING, "Unable to restore format %s to channel '%s'\n", cw_getformatname(rfmt), chan->name);
}
}
if (outmsg) {
if (outmsg > 1) {
/* Let them know it worked */
cw_streamfile(chan, "auth-thankyou", chan->language);
cw_waitstream(chan, "");
}
}
return res;
}
/* Channel group core functions */
int cw_app_group_split_group(char *data, char *group, int group_max, char *category, int category_max)
{
int res=0;
char tmp[256];
char *grp=NULL, *cat=NULL;
if (!cw_strlen_zero(data)) {
cw_copy_string(tmp, data, sizeof(tmp));
grp = tmp;
cat = strchr(tmp, '@');
if (cat) {
*cat = '\0';
cat++;
}
}
if (!cw_strlen_zero(grp))
cw_copy_string(group, grp, group_max);
else
res = -1;
if (cat)
snprintf(category, category_max, "%s_%s", GROUP_CATEGORY_PREFIX, cat);
else
cw_copy_string(category, GROUP_CATEGORY_PREFIX, category_max);
return res;
}
uint8_t sccp_pbx_channel_allocate(sccp_channel_t * c) {
sccp_device_t * d = c->device;
struct cw_channel * tmp;
sccp_line_t * l = c->line;
int fmt;
if (!l || !d || !d->session) {
cw_log(LOG_ERROR, "SCCP: Unable to allocate asterisk channel\n");
return 0;
}
tmp = cw_channel_alloc(1);
if (!tmp) {
cw_log(LOG_ERROR, "%s: Unable to allocate callweaver channel on line %s\n", d->id, l->name);
return 0;
}
/* need to reset the exten, otherwise it would be set to s */
memset(&tmp->exten,0,sizeof(tmp->exten));
/* let's connect the CW channel to the sccp channel */
cw_mutex_lock(&c->lock);
c->owner = tmp;
cw_mutex_unlock(&c->lock);
sccp_log(10)(VERBOSE_PREFIX_3 "%s: Global Capabilities: %d\n", d->id, GLOB(global_capability));
cw_mutex_lock(&l->lock);
cw_mutex_lock(&d->lock);
tmp->nativeformats = (d->capability ? d->capability : GLOB(global_capability));
if (tmp->nativeformats & c->format) {
fmt = c->format;
} else {
fmt = cw_codec_choose(&d->codecs, tmp->nativeformats, 1);
c->format = fmt;
}
cw_mutex_unlock(&l->lock);
cw_mutex_unlock(&d->lock);
sccp_log(2)(VERBOSE_PREFIX_3 "%s: format request: %d/%d\n", d->id, tmp->nativeformats, c->format);
snprintf(tmp->name, sizeof(tmp->name), "SCCP/%s-%08x", l->name, c->callid);
if (GLOB(debug) > 2) {
const unsigned slen=512;
char s1[slen];
char s2[slen];
sccp_log(2)(VERBOSE_PREFIX_3 "%s: Channel %s, capabilities: DEVICE %s NATIVE %s BEST %d (%s)\n",
d->id,
c->owner->name,
cw_getformatname_multiple(s1, slen, d->capability),
cw_getformatname_multiple(s2, slen, tmp->nativeformats),
fmt, cw_getformatname(fmt));
}
tmp->type = "SCCP";
tmp->nativeformats = fmt;
tmp->writeformat = fmt;
tmp->readformat = fmt;
tmp->tech = &sccp_tech;
tmp->tech_pvt = c;
tmp->adsicpe = CW_ADSI_UNAVAILABLE;
// XXX: Bridge?
// XXX: Transfer?
cw_mutex_lock(&GLOB(usecnt_lock));
GLOB(usecnt)++;
cw_mutex_unlock(&GLOB(usecnt_lock));
cw_update_use_count();
if (l->cid_num)
tmp->cid.cid_num = strdup(l->cid_num);
if (l->cid_name)
tmp->cid.cid_name = strdup(l->cid_name);
cw_copy_string(tmp->context, l->context, sizeof(tmp->context));
if (!cw_strlen_zero(l->language))
cw_copy_string(tmp->language, l->language, sizeof(tmp->language));
if (!cw_strlen_zero(l->accountcode))
cw_copy_string(tmp->accountcode, l->accountcode, sizeof(tmp->accountcode));
if (!cw_strlen_zero(l->musicclass))
cw_copy_string(tmp->musicclass, l->musicclass, sizeof(tmp->musicclass));
tmp->amaflags = l->amaflags;
tmp->callgroup = l->callgroup;
#ifdef CS_SCCP_PICKUP
tmp->pickupgroup = l->pickupgroup;
#endif
tmp->priority = 1;
sccp_log(10)(VERBOSE_PREFIX_3 "%s: Allocated callweaver channel %s-%d\n", d->id, l->name, c->callid);
return 1;
}