00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026 #include "asterisk.h"
00027
00028 ASTERISK_FILE_VERSION(__FILE__, "$Revision: 257544 $")
00029
00030 #include <stdio.h>
00031 #include <stdlib.h>
00032 #include <string.h>
00033 #include <sys/time.h>
00034 #include <signal.h>
00035 #include <errno.h>
00036 #include <unistd.h>
00037 #include <dirent.h>
00038 #include <sys/types.h>
00039 #include <sys/stat.h>
00040 #include <regex.h>
00041
00042 #include "asterisk/channel.h"
00043 #include "asterisk/pbx.h"
00044 #include "asterisk/file.h"
00045 #include "asterisk/app.h"
00046 #include "asterisk/dsp.h"
00047 #include "asterisk/logger.h"
00048 #include "asterisk/options.h"
00049 #include "asterisk/utils.h"
00050 #include "asterisk/lock.h"
00051 #include "asterisk/indications.h"
00052 #include "asterisk/linkedlists.h"
00053
00054 #define AST_MAX_FORMATS 10
00055
00056 static AST_LIST_HEAD_STATIC(groups, ast_group_info);
00057
00058
00059
00060
00061
00062
00063
00064
00065 int ast_app_dtget(struct ast_channel *chan, const char *context, char *collect, size_t size, int maxlen, int timeout)
00066 {
00067 struct tone_zone_sound *ts;
00068 int res=0, x=0;
00069
00070 if (maxlen > size)
00071 maxlen = size;
00072
00073 if (!timeout && chan->pbx)
00074 timeout = chan->pbx->dtimeout;
00075 else if (!timeout)
00076 timeout = 5;
00077
00078 ts = ast_get_indication_tone(chan->zone,"dial");
00079 if (ts && ts->data[0])
00080 res = ast_playtones_start(chan, 0, ts->data, 0);
00081 else
00082 ast_log(LOG_NOTICE,"Huh....? no dial for indications?\n");
00083
00084 for (x = strlen(collect); x < maxlen; ) {
00085 res = ast_waitfordigit(chan, timeout);
00086 if (!ast_ignore_pattern(context, collect))
00087 ast_playtones_stop(chan);
00088 if (res < 1)
00089 break;
00090 if (res == '#')
00091 break;
00092 collect[x++] = res;
00093 if (!ast_matchmore_extension(chan, context, collect, 1, chan->cid.cid_num))
00094 break;
00095 }
00096 if (res >= 0)
00097 res = ast_exists_extension(chan, context, collect, 1, chan->cid.cid_num) ? 1 : 0;
00098 return res;
00099 }
00100
00101
00102
00103
00104
00105
00106
00107 int ast_app_getdata(struct ast_channel *c, char *prompt, char *s, int maxlen, int timeout)
00108 {
00109 int res,to,fto;
00110
00111 if (maxlen)
00112 s[0] = '\0';
00113 if (prompt) {
00114 res = ast_streamfile(c, prompt, c->language);
00115 if (res < 0)
00116 return res;
00117 }
00118 fto = c->pbx ? c->pbx->rtimeout * 1000 : 6000;
00119 to = c->pbx ? c->pbx->dtimeout * 1000 : 2000;
00120
00121 if (timeout > 0)
00122 fto = to = timeout;
00123 if (timeout < 0)
00124 fto = to = 1000000000;
00125 res = ast_readstring(c, s, maxlen, to, fto, "#");
00126 return res;
00127 }
00128
00129
00130 int ast_app_getdata_full(struct ast_channel *c, char *prompt, char *s, int maxlen, int timeout, int audiofd, int ctrlfd)
00131 {
00132 int res, to, fto;
00133 if (prompt) {
00134 res = ast_streamfile(c, prompt, c->language);
00135 if (res < 0)
00136 return res;
00137 }
00138 fto = 6000;
00139 to = 2000;
00140 if (timeout > 0)
00141 fto = to = timeout;
00142 if (timeout < 0)
00143 fto = to = 1000000000;
00144 res = ast_readstring_full(c, s, maxlen, to, fto, "#", audiofd, ctrlfd);
00145 return res;
00146 }
00147
00148 static int (*ast_has_voicemail_func)(const char *mailbox, const char *folder) = NULL;
00149 static int (*ast_inboxcount_func)(const char *mailbox, int *newmsgs, int *oldmsgs) = NULL;
00150 static int (*ast_messagecount_func)(const char *context, const char *mailbox, const char *folder) = NULL;
00151
00152 void ast_install_vm_functions(int (*has_voicemail_func)(const char *mailbox, const char *folder),
00153 int (*inboxcount_func)(const char *mailbox, int *newmsgs, int *oldmsgs),
00154 int (*messagecount_func)(const char *context, const char *mailbox, const char *folder))
00155 {
00156 ast_has_voicemail_func = has_voicemail_func;
00157 ast_inboxcount_func = inboxcount_func;
00158 ast_messagecount_func = messagecount_func;
00159 }
00160
00161 void ast_uninstall_vm_functions(void)
00162 {
00163 ast_has_voicemail_func = NULL;
00164 ast_inboxcount_func = NULL;
00165 ast_messagecount_func = NULL;
00166 }
00167
00168 int ast_app_has_voicemail(const char *mailbox, const char *folder)
00169 {
00170 static int warned = 0;
00171 if (ast_has_voicemail_func)
00172 return ast_has_voicemail_func(mailbox, folder);
00173
00174 if ((option_verbose > 2) && !warned) {
00175 ast_verbose(VERBOSE_PREFIX_3 "Message check requested for mailbox %s/folder %s but voicemail not loaded.\n", mailbox, folder ? folder : "INBOX");
00176 warned++;
00177 }
00178 return 0;
00179 }
00180
00181
00182 int ast_app_inboxcount(const char *mailbox, int *newmsgs, int *oldmsgs)
00183 {
00184 static int warned = 0;
00185 if (newmsgs)
00186 *newmsgs = 0;
00187 if (oldmsgs)
00188 *oldmsgs = 0;
00189 if (ast_inboxcount_func)
00190 return ast_inboxcount_func(mailbox, newmsgs, oldmsgs);
00191
00192 if (!warned && (option_verbose > 2)) {
00193 warned++;
00194 ast_verbose(VERBOSE_PREFIX_3 "Message count requested for mailbox %s but voicemail not loaded.\n", mailbox);
00195 }
00196
00197 return 0;
00198 }
00199
00200 int ast_app_messagecount(const char *context, const char *mailbox, const char *folder)
00201 {
00202 static int warned = 0;
00203 if (ast_messagecount_func)
00204 return ast_messagecount_func(context, mailbox, folder);
00205
00206 if (!warned && (option_verbose > 2)) {
00207 warned++;
00208 ast_verbose(VERBOSE_PREFIX_3 "Message count requested for mailbox %s@%s/%s but voicemail not loaded.\n", mailbox, context, folder);
00209 }
00210
00211 return 0;
00212 }
00213
00214 int ast_dtmf_stream(struct ast_channel *chan, struct ast_channel *peer, const char *digits, int between)
00215 {
00216 const char *ptr;
00217 int res = 0;
00218 struct ast_silence_generator *silgen = NULL;
00219
00220 if (!between)
00221 between = 100;
00222
00223 if (peer)
00224 res = ast_autoservice_start(peer);
00225
00226 if (!res)
00227 res = ast_waitfor(chan, 100);
00228
00229
00230 if (res < 0) {
00231 if (peer) {
00232 ast_autoservice_stop(peer);
00233 }
00234 return res;
00235 }
00236
00237 if (ast_opt_transmit_silence) {
00238 silgen = ast_channel_start_silence_generator(chan);
00239 }
00240
00241 for (ptr = digits; *ptr; ptr++) {
00242 if (*ptr == 'w') {
00243
00244 if ((res = ast_safe_sleep(chan, 500)))
00245 break;
00246 } else if (strchr("0123456789*#abcdfABCDF", *ptr)) {
00247
00248 if (*ptr == 'f' || *ptr == 'F') {
00249
00250 ast_indicate(chan, AST_CONTROL_FLASH);
00251 } else
00252 ast_senddigit(chan, *ptr);
00253
00254 if ((res = ast_safe_sleep(chan, between)))
00255 break;
00256 } else
00257 ast_log(LOG_WARNING, "Illegal DTMF character '%c' in string. (0-9*#aAbBcCdD allowed)\n",*ptr);
00258 }
00259
00260 if (peer) {
00261
00262
00263 if (ast_autoservice_stop(peer) && !res)
00264 res = -1;
00265 }
00266
00267 if (silgen) {
00268 ast_channel_stop_silence_generator(chan, silgen);
00269 }
00270
00271 return res;
00272 }
00273
00274 struct linear_state {
00275 int fd;
00276 int autoclose;
00277 int allowoverride;
00278 int origwfmt;
00279 };
00280
00281 static void linear_release(struct ast_channel *chan, void *params)
00282 {
00283 struct linear_state *ls = params;
00284 if (ls->origwfmt && ast_set_write_format(chan, ls->origwfmt)) {
00285 ast_log(LOG_WARNING, "Unable to restore channel '%s' to format '%d'\n", chan->name, ls->origwfmt);
00286 }
00287 if (ls->autoclose)
00288 close(ls->fd);
00289 free(params);
00290 }
00291
00292 static int linear_generator(struct ast_channel *chan, void *data, int len, int samples)
00293 {
00294 struct ast_frame f;
00295 short buf[2048 + AST_FRIENDLY_OFFSET / 2];
00296 struct linear_state *ls = data;
00297 int res;
00298 len = samples * 2;
00299 if (len > sizeof(buf) - AST_FRIENDLY_OFFSET) {
00300 ast_log(LOG_WARNING, "Can't generate %d bytes of data!\n" ,len);
00301 len = sizeof(buf) - AST_FRIENDLY_OFFSET;
00302 }
00303 memset(&f, 0, sizeof(f));
00304 res = read(ls->fd, buf + AST_FRIENDLY_OFFSET/2, len);
00305 if (res > 0) {
00306 f.frametype = AST_FRAME_VOICE;
00307 f.subclass = AST_FORMAT_SLINEAR;
00308 f.data = buf + AST_FRIENDLY_OFFSET/2;
00309 f.datalen = res;
00310 f.samples = res / 2;
00311 f.offset = AST_FRIENDLY_OFFSET;
00312 ast_write(chan, &f);
00313 if (res == len)
00314 return 0;
00315 }
00316 return -1;
00317 }
00318
00319 static void *linear_alloc(struct ast_channel *chan, void *params)
00320 {
00321 struct linear_state *ls;
00322
00323 if (params) {
00324 ls = params;
00325 if (ls->allowoverride)
00326 ast_set_flag(chan, AST_FLAG_WRITE_INT);
00327 else
00328 ast_clear_flag(chan, AST_FLAG_WRITE_INT);
00329 ls->origwfmt = chan->writeformat;
00330 if (ast_set_write_format(chan, AST_FORMAT_SLINEAR)) {
00331 ast_log(LOG_WARNING, "Unable to set '%s' to linear format (write)\n", chan->name);
00332 free(ls);
00333 ls = params = NULL;
00334 }
00335 }
00336 return params;
00337 }
00338
00339 static struct ast_generator linearstream =
00340 {
00341 alloc: linear_alloc,
00342 release: linear_release,
00343 generate: linear_generator,
00344 };
00345
00346 int ast_linear_stream(struct ast_channel *chan, const char *filename, int fd, int allowoverride)
00347 {
00348 struct linear_state *lin;
00349 char tmpf[256];
00350 int res = -1;
00351 int autoclose = 0;
00352 if (fd < 0) {
00353 if (ast_strlen_zero(filename))
00354 return -1;
00355 autoclose = 1;
00356 if (filename[0] == '/')
00357 ast_copy_string(tmpf, filename, sizeof(tmpf));
00358 else
00359 snprintf(tmpf, sizeof(tmpf), "%s/%s/%s", (char *)ast_config_AST_DATA_DIR, "sounds", filename);
00360 fd = open(tmpf, O_RDONLY);
00361 if (fd < 0){
00362 ast_log(LOG_WARNING, "Unable to open file '%s': %s\n", tmpf, strerror(errno));
00363 return -1;
00364 }
00365 }
00366 if ((lin = ast_calloc(1, sizeof(*lin)))) {
00367 lin->fd = fd;
00368 lin->allowoverride = allowoverride;
00369 lin->autoclose = autoclose;
00370 res = ast_activate_generator(chan, &linearstream, lin);
00371 }
00372 return res;
00373 }
00374
00375 int ast_control_streamfile(struct ast_channel *chan, const char *file,
00376 const char *fwd, const char *rev,
00377 const char *stop, const char *pause,
00378 const char *restart, int skipms)
00379 {
00380 char *breaks = NULL;
00381 char *end = NULL;
00382 int blen = 2;
00383 int res;
00384 long pause_restart_point = 0;
00385
00386 if (stop)
00387 blen += strlen(stop);
00388 if (pause)
00389 blen += strlen(pause);
00390 if (restart)
00391 blen += strlen(restart);
00392
00393 if (blen > 2) {
00394 breaks = alloca(blen + 1);
00395 breaks[0] = '\0';
00396 if (stop)
00397 strcat(breaks, stop);
00398 if (pause)
00399 strcat(breaks, pause);
00400 if (restart)
00401 strcat(breaks, restart);
00402 }
00403 if (chan->_state != AST_STATE_UP)
00404 res = ast_answer(chan);
00405
00406 if (file) {
00407 if ((end = strchr(file,':'))) {
00408 if (!strcasecmp(end, ":end")) {
00409 *end = '\0';
00410 end++;
00411 }
00412 }
00413 }
00414
00415 for (;;) {
00416 ast_stopstream(chan);
00417 res = ast_streamfile(chan, file, chan->language);
00418 if (!res) {
00419 if (pause_restart_point) {
00420 ast_seekstream(chan->stream, pause_restart_point, SEEK_SET);
00421 pause_restart_point = 0;
00422 }
00423 else if (end) {
00424 ast_seekstream(chan->stream, 0, SEEK_END);
00425 end = NULL;
00426 };
00427 res = ast_waitstream_fr(chan, breaks, fwd, rev, skipms);
00428 }
00429
00430 if (res < 1)
00431 break;
00432
00433
00434 if (restart && strchr(restart, res)) {
00435 if (option_debug)
00436 ast_log(LOG_DEBUG, "we'll restart the stream here at next loop\n");
00437 pause_restart_point = 0;
00438 continue;
00439 }
00440
00441 if (pause && strchr(pause, res)) {
00442 pause_restart_point = ast_tellstream(chan->stream);
00443 for (;;) {
00444 ast_stopstream(chan);
00445 res = ast_waitfordigit(chan, 1000);
00446 if (!res)
00447 continue;
00448 else if (res == -1 || strchr(pause, res) || (stop && strchr(stop, res)))
00449 break;
00450 }
00451 if (res == *pause) {
00452 res = 0;
00453 continue;
00454 }
00455 }
00456
00457 if (res == -1)
00458 break;
00459
00460
00461 if (stop && strchr(stop, res))
00462 break;
00463 }
00464
00465
00466 if (res > 0 || chan->stream)
00467 res = (char)res;
00468
00469 ast_stopstream(chan);
00470
00471 return res;
00472 }
00473
00474 int ast_play_and_wait(struct ast_channel *chan, const char *fn)
00475 {
00476 int d;
00477 d = ast_streamfile(chan, fn, chan->language);
00478 if (d)
00479 return d;
00480 d = ast_waitstream(chan, AST_DIGIT_ANY);
00481 ast_stopstream(chan);
00482 return d;
00483 }
00484
00485 static int global_silence_threshold = 128;
00486 static int global_maxsilence = 0;
00487
00488
00489
00490
00491
00492
00493
00494
00495
00496
00497
00498
00499
00500
00501
00502
00503
00504 static int __ast_play_and_record(struct ast_channel *chan, const char *playfile, const char *recordfile, int maxtime, const char *fmt, int *duration, int beep, int silencethreshold, int maxsilence, const char *path, int prepend, const char *acceptdtmf, const char *canceldtmf)
00505 {
00506 int d = 0;
00507 char *fmts;
00508 char comment[256];
00509 int x, fmtcnt = 1, res = -1, outmsg = 0;
00510 struct ast_filestream *others[AST_MAX_FORMATS];
00511 char *sfmt[AST_MAX_FORMATS];
00512 char *stringp = NULL;
00513 time_t start, end;
00514 struct ast_dsp *sildet = NULL;
00515 int totalsilence = 0;
00516 int rfmt = 0;
00517 struct ast_silence_generator *silgen = NULL;
00518 char prependfile[80];
00519
00520 if (silencethreshold < 0)
00521 silencethreshold = global_silence_threshold;
00522
00523 if (maxsilence < 0)
00524 maxsilence = global_maxsilence;
00525
00526
00527 if (duration == NULL) {
00528 ast_log(LOG_WARNING, "Error play_and_record called without duration pointer\n");
00529 return -1;
00530 }
00531
00532 if (option_debug)
00533 ast_log(LOG_DEBUG,"play_and_record: %s, %s, '%s'\n", playfile ? playfile : "<None>", recordfile, fmt);
00534 snprintf(comment, sizeof(comment), "Playing %s, Recording to: %s on %s\n", playfile ? playfile : "<None>", recordfile, chan->name);
00535
00536 if (playfile || beep) {
00537 if (!beep)
00538 d = ast_play_and_wait(chan, playfile);
00539 if (d > -1)
00540 d = ast_stream_and_wait(chan, "beep", chan->language, "");
00541 if (d < 0)
00542 return -1;
00543 }
00544
00545 if (prepend) {
00546 ast_copy_string(prependfile, recordfile, sizeof(prependfile));
00547 strncat(prependfile, "-prepend", sizeof(prependfile) - strlen(prependfile) - 1);
00548 }
00549
00550 fmts = ast_strdupa(fmt);
00551
00552 stringp = fmts;
00553 strsep(&stringp, "|");
00554 if (option_debug)
00555 ast_log(LOG_DEBUG, "Recording Formats: sfmts=%s\n", fmts);
00556 sfmt[0] = ast_strdupa(fmts);
00557
00558 while ((fmt = strsep(&stringp, "|"))) {
00559 if (fmtcnt > AST_MAX_FORMATS - 1) {
00560 ast_log(LOG_WARNING, "Please increase AST_MAX_FORMATS in file.h\n");
00561 break;
00562 }
00563 sfmt[fmtcnt++] = ast_strdupa(fmt);
00564 }
00565
00566 end = start = time(NULL);
00567 for (x = 0; x < fmtcnt; x++) {
00568 others[x] = ast_writefile(prepend ? prependfile : recordfile, sfmt[x], comment, O_TRUNC, 0, 0777);
00569 if (option_verbose > 2)
00570 ast_verbose(VERBOSE_PREFIX_3 "x=%d, open writing: %s format: %s, %p\n", x, prepend ? prependfile : recordfile, sfmt[x], others[x]);
00571
00572 if (!others[x])
00573 break;
00574 }
00575
00576 if (path)
00577 ast_unlock_path(path);
00578
00579 if (maxsilence > 0) {
00580 sildet = ast_dsp_new();
00581 if (!sildet) {
00582 ast_log(LOG_WARNING, "Unable to create silence detector :(\n");
00583 return -1;
00584 }
00585 ast_dsp_set_threshold(sildet, silencethreshold);
00586 rfmt = chan->readformat;
00587 res = ast_set_read_format(chan, AST_FORMAT_SLINEAR);
00588 if (res < 0) {
00589 ast_log(LOG_WARNING, "Unable to set to linear mode, giving up\n");
00590 ast_dsp_free(sildet);
00591 return -1;
00592 }
00593 }
00594
00595 if (!prepend) {
00596
00597 ast_indicate(chan, AST_CONTROL_VIDUPDATE);
00598
00599 if (ast_opt_transmit_silence)
00600 silgen = ast_channel_start_silence_generator(chan);
00601 }
00602
00603 if (x == fmtcnt) {
00604
00605
00606 struct ast_frame *f;
00607 for (;;) {
00608 res = ast_waitfor(chan, 2000);
00609 if (!res) {
00610 if (option_debug)
00611 ast_log(LOG_DEBUG, "One waitfor failed, trying another\n");
00612
00613 res = ast_waitfor(chan, 2000);
00614 if (!res) {
00615 ast_log(LOG_WARNING, "No audio available on %s??\n", chan->name);
00616 res = -1;
00617 }
00618 }
00619
00620 if (res < 0) {
00621 f = NULL;
00622 break;
00623 }
00624 f = ast_read(chan);
00625 if (!f)
00626 break;
00627 if (f->frametype == AST_FRAME_VOICE) {
00628
00629 for (x = 0; x < fmtcnt; x++) {
00630 if (prepend && !others[x])
00631 break;
00632 res = ast_writestream(others[x], f);
00633 }
00634
00635
00636 if (maxsilence > 0) {
00637 int dspsilence = 0;
00638 ast_dsp_silence(sildet, f, &dspsilence);
00639 if (dspsilence)
00640 totalsilence = dspsilence;
00641 else
00642 totalsilence = 0;
00643
00644 if (totalsilence > maxsilence) {
00645
00646 if (option_verbose > 2)
00647 ast_verbose( VERBOSE_PREFIX_3 "Recording automatically stopped after a silence of %d seconds\n", totalsilence/1000);
00648 res = 'S';
00649 outmsg = 2;
00650 break;
00651 }
00652 }
00653
00654 if (res) {
00655 ast_log(LOG_WARNING, "Error writing frame\n");
00656 break;
00657 }
00658 } else if (f->frametype == AST_FRAME_VIDEO) {
00659
00660 ast_writestream(others[0], f);
00661 } else if (f->frametype == AST_FRAME_DTMF) {
00662 if (prepend) {
00663
00664 if (option_verbose > 2)
00665 ast_verbose(VERBOSE_PREFIX_3 "User ended message by pressing %c\n", f->subclass);
00666 res = 't';
00667 outmsg = 2;
00668 break;
00669 }
00670 if (strchr(acceptdtmf, f->subclass)) {
00671 if (option_verbose > 2)
00672 ast_verbose(VERBOSE_PREFIX_3 "User ended message by pressing %c\n", f->subclass);
00673 res = f->subclass;
00674 outmsg = 2;
00675 break;
00676 }
00677 if (strchr(canceldtmf, f->subclass)) {
00678 if (option_verbose > 2)
00679 ast_verbose(VERBOSE_PREFIX_3 "User cancelled message by pressing %c\n", f->subclass);
00680 res = f->subclass;
00681 outmsg = 0;
00682 break;
00683 }
00684 }
00685 if (maxtime) {
00686 end = time(NULL);
00687 if (maxtime < (end - start)) {
00688 if (option_verbose > 2)
00689 ast_verbose(VERBOSE_PREFIX_3 "Took too long, cutting it short...\n");
00690 res = 't';
00691 outmsg = 2;
00692 break;
00693 }
00694 }
00695 ast_frfree(f);
00696 }
00697 if (!f) {
00698 if (option_verbose > 2)
00699 ast_verbose(VERBOSE_PREFIX_3 "User hung up\n");
00700 res = -1;
00701 outmsg = 1;
00702 } else {
00703 ast_frfree(f);
00704 }
00705 } else {
00706 ast_log(LOG_WARNING, "Error creating writestream '%s', format '%s'\n", recordfile, sfmt[x]);
00707 }
00708
00709 if (!prepend) {
00710 if (silgen)
00711 ast_channel_stop_silence_generator(chan, silgen);
00712 }
00713
00714
00715
00716
00717
00718
00719
00720
00721
00722
00723 *duration = others[0] ? ast_tellstream(others[0]) / 8000 : 0;
00724
00725 if (!prepend) {
00726 for (x = 0; x < fmtcnt; x++) {
00727 if (!others[x])
00728 break;
00729
00730
00731
00732
00733
00734 if (res > 0 && totalsilence) {
00735 ast_stream_rewind(others[x], totalsilence - 200);
00736
00737 if (x == 0 && *duration) {
00738 *duration -= (totalsilence - 200) / 1000;
00739 if (*duration < 0) {
00740 *duration = 0;
00741 }
00742 }
00743 }
00744 ast_truncstream(others[x]);
00745 ast_closestream(others[x]);
00746 }
00747 }
00748
00749 if (prepend && outmsg) {
00750 struct ast_filestream *realfiles[AST_MAX_FORMATS];
00751 struct ast_frame *fr;
00752
00753 for (x = 0; x < fmtcnt; x++) {
00754 snprintf(comment, sizeof(comment), "Opening the real file %s.%s\n", recordfile, sfmt[x]);
00755 realfiles[x] = ast_readfile(recordfile, sfmt[x], comment, O_RDONLY, 0, 0);
00756 if (!others[x] || !realfiles[x])
00757 break;
00758
00759 if (totalsilence)
00760 ast_stream_rewind(others[x], totalsilence - 200);
00761 ast_truncstream(others[x]);
00762
00763 while ((fr = ast_readframe(realfiles[x]))) {
00764 ast_writestream(others[x], fr);
00765 ast_frfree(fr);
00766 }
00767 ast_closestream(others[x]);
00768 ast_closestream(realfiles[x]);
00769 ast_filerename(prependfile, recordfile, sfmt[x]);
00770 if (option_verbose > 3)
00771 ast_verbose(VERBOSE_PREFIX_4 "Recording Format: sfmts=%s, prependfile %s, recordfile %s\n", sfmt[x], prependfile, recordfile);
00772 ast_filedelete(prependfile, sfmt[x]);
00773 }
00774 }
00775 if (rfmt && ast_set_read_format(chan, rfmt)) {
00776 ast_log(LOG_WARNING, "Unable to restore format %s to channel '%s'\n", ast_getformatname(rfmt), chan->name);
00777 }
00778 if (outmsg == 2) {
00779 ast_stream_and_wait(chan, "auth-thankyou", chan->language, "");
00780 }
00781 if (sildet)
00782 ast_dsp_free(sildet);
00783 return res;
00784 }
00785
00786 static char default_acceptdtmf[] = "#";
00787 static char default_canceldtmf[] = "";
00788
00789 int ast_play_and_record_full(struct ast_channel *chan, const char *playfile, const char *recordfile, int maxtime, const char *fmt, int *duration, int silencethreshold, int maxsilence, const char *path, const char *acceptdtmf, const char *canceldtmf)
00790 {
00791 return __ast_play_and_record(chan, playfile, recordfile, maxtime, fmt, duration, 0, silencethreshold, maxsilence, path, 0, S_OR(acceptdtmf, default_acceptdtmf), S_OR(canceldtmf, default_canceldtmf));
00792 }
00793
00794 int ast_play_and_record(struct ast_channel *chan, const char *playfile, const char *recordfile, int maxtime, const char *fmt, int *duration, int silencethreshold, int maxsilence, const char *path)
00795 {
00796 return __ast_play_and_record(chan, playfile, recordfile, maxtime, fmt, duration, 0, silencethreshold, maxsilence, path, 0, default_acceptdtmf, default_canceldtmf);
00797 }
00798
00799 int ast_play_and_prepend(struct ast_channel *chan, char *playfile, char *recordfile, int maxtime, char *fmt, int *duration, int beep, int silencethreshold, int maxsilence)
00800 {
00801 return __ast_play_and_record(chan, playfile, recordfile, maxtime, fmt, duration, beep, silencethreshold, maxsilence, NULL, 1, default_acceptdtmf, default_canceldtmf);
00802 }
00803
00804
00805
00806 int ast_app_group_split_group(const char *data, char *group, int group_max, char *category, int category_max)
00807 {
00808 int res=0;
00809 char tmp[256];
00810 char *grp=NULL, *cat=NULL;
00811
00812 if (!ast_strlen_zero(data)) {
00813 ast_copy_string(tmp, data, sizeof(tmp));
00814 grp = tmp;
00815 cat = strchr(tmp, '@');
00816 if (cat) {
00817 *cat = '\0';
00818 cat++;
00819 }
00820 }
00821
00822 if (!ast_strlen_zero(grp))
00823 ast_copy_string(group, grp, group_max);
00824 else
00825 *group = '\0';
00826
00827 if (!ast_strlen_zero(cat))
00828 ast_copy_string(category, cat, category_max);
00829
00830 return res;
00831 }
00832
00833 int ast_app_group_set_channel(struct ast_channel *chan, const char *data)
00834 {
00835 int res = 0;
00836 char group[80] = "", category[80] = "";
00837 struct ast_group_info *gi = NULL;
00838 size_t len = 0;
00839
00840 if (ast_app_group_split_group(data, group, sizeof(group), category, sizeof(category)))
00841 return -1;
00842
00843
00844 len = sizeof(*gi) + strlen(group) + 1;
00845 if (!ast_strlen_zero(category))
00846 len += strlen(category) + 1;
00847
00848 AST_LIST_LOCK(&groups);
00849 AST_LIST_TRAVERSE_SAFE_BEGIN(&groups, gi, list) {
00850 if ((gi->chan == chan) && ((ast_strlen_zero(category) && ast_strlen_zero(gi->category)) || (!ast_strlen_zero(gi->category) && !strcasecmp(gi->category, category)))) {
00851 AST_LIST_REMOVE_CURRENT(&groups, list);
00852 free(gi);
00853 break;
00854 }
00855 }
00856 AST_LIST_TRAVERSE_SAFE_END
00857
00858 if (ast_strlen_zero(group)) {
00859
00860 } else if ((gi = calloc(1, len))) {
00861 gi->chan = chan;
00862 gi->group = (char *) gi + sizeof(*gi);
00863 strcpy(gi->group, group);
00864 if (!ast_strlen_zero(category)) {
00865 gi->category = (char *) gi + sizeof(*gi) + strlen(group) + 1;
00866 strcpy(gi->category, category);
00867 }
00868 AST_LIST_INSERT_TAIL(&groups, gi, list);
00869 } else {
00870 res = -1;
00871 }
00872
00873 AST_LIST_UNLOCK(&groups);
00874
00875 return res;
00876 }
00877
00878 int ast_app_group_get_count(const char *group, const char *category)
00879 {
00880 struct ast_group_info *gi = NULL;
00881 int count = 0;
00882
00883 if (ast_strlen_zero(group))
00884 return 0;
00885
00886 AST_LIST_LOCK(&groups);
00887 AST_LIST_TRAVERSE(&groups, gi, list) {
00888 if (!strcasecmp(gi->group, group) && (ast_strlen_zero(category) || (!ast_strlen_zero(gi->category) && !strcasecmp(gi->category, category))))
00889 count++;
00890 }
00891 AST_LIST_UNLOCK(&groups);
00892
00893 return count;
00894 }
00895
00896 int ast_app_group_match_get_count(const char *groupmatch, const char *category)
00897 {
00898 struct ast_group_info *gi = NULL;
00899 regex_t regexbuf;
00900 int count = 0;
00901
00902 if (ast_strlen_zero(groupmatch))
00903 return 0;
00904
00905
00906 if (regcomp(®exbuf, groupmatch, REG_EXTENDED | REG_NOSUB))
00907 return 0;
00908
00909 AST_LIST_LOCK(&groups);
00910 AST_LIST_TRAVERSE(&groups, gi, list) {
00911 if (!regexec(®exbuf, gi->group, 0, NULL, 0) && (ast_strlen_zero(category) || (!ast_strlen_zero(gi->category) && !strcasecmp(gi->category, category))))
00912 count++;
00913 }
00914 AST_LIST_UNLOCK(&groups);
00915
00916 regfree(®exbuf);
00917
00918 return count;
00919 }
00920
00921 int ast_app_group_update(struct ast_channel *old, struct ast_channel *new)
00922 {
00923 struct ast_group_info *gi = NULL;
00924
00925 AST_LIST_LOCK(&groups);
00926 AST_LIST_TRAVERSE_SAFE_BEGIN(&groups, gi, list) {
00927 if (gi->chan == old) {
00928 gi->chan = new;
00929 } else if (gi->chan == new) {
00930 AST_LIST_REMOVE_CURRENT(&groups, list);
00931 free(gi);
00932 }
00933 }
00934 AST_LIST_TRAVERSE_SAFE_END
00935 AST_LIST_UNLOCK(&groups);
00936
00937 return 0;
00938 }
00939
00940 int ast_app_group_discard(struct ast_channel *chan)
00941 {
00942 struct ast_group_info *gi = NULL;
00943
00944 AST_LIST_LOCK(&groups);
00945 AST_LIST_TRAVERSE_SAFE_BEGIN(&groups, gi, list) {
00946 if (gi->chan == chan) {
00947 AST_LIST_REMOVE_CURRENT(&groups, list);
00948 free(gi);
00949 }
00950 }
00951 AST_LIST_TRAVERSE_SAFE_END
00952 AST_LIST_UNLOCK(&groups);
00953
00954 return 0;
00955 }
00956
00957 int ast_app_group_list_lock(void)
00958 {
00959 return AST_LIST_LOCK(&groups);
00960 }
00961
00962 struct ast_group_info *ast_app_group_list_head(void)
00963 {
00964 return AST_LIST_FIRST(&groups);
00965 }
00966
00967 int ast_app_group_list_unlock(void)
00968 {
00969 return AST_LIST_UNLOCK(&groups);
00970 }
00971
00972 unsigned int ast_app_separate_args(char *buf, char delim, char **array, int arraylen)
00973 {
00974 int argc;
00975 char *scan, *wasdelim = NULL;
00976 int paren = 0, quote = 0;
00977
00978 if (!buf || !array || !arraylen)
00979 return 0;
00980
00981 memset(array, 0, arraylen * sizeof(*array));
00982
00983 scan = buf;
00984
00985 for (argc = 0; *scan && (argc < arraylen - 1); argc++) {
00986 array[argc] = scan;
00987 for (; *scan; scan++) {
00988 if (*scan == '(')
00989 paren++;
00990 else if (*scan == ')') {
00991 if (paren)
00992 paren--;
00993 } else if (*scan == '"' && delim != '"') {
00994 quote = quote ? 0 : 1;
00995
00996 memmove(scan, scan + 1, strlen(scan));
00997 scan--;
00998 } else if (*scan == '\\') {
00999
01000 memmove(scan, scan + 1, strlen(scan));
01001 } else if ((*scan == delim) && !paren && !quote) {
01002 wasdelim = scan;
01003 *scan++ = '\0';
01004 break;
01005 }
01006 }
01007 }
01008
01009
01010
01011 if (*scan || (scan > buf && (scan - 1) == wasdelim)) {
01012 array[argc++] = scan;
01013 }
01014
01015 return argc;
01016 }
01017
01018 enum AST_LOCK_RESULT ast_lock_path(const char *path)
01019 {
01020 char *s;
01021 char *fs;
01022 int res;
01023 int fd;
01024 int lp = strlen(path);
01025 time_t start;
01026
01027 if (!(s = alloca(lp + 10)) || !(fs = alloca(lp + 20))) {
01028 ast_log(LOG_WARNING, "Out of memory!\n");
01029 return AST_LOCK_FAILURE;
01030 }
01031
01032 snprintf(fs, strlen(path) + 19, "%s/.lock-%08lx", path, ast_random());
01033 fd = open(fs, O_WRONLY | O_CREAT | O_EXCL, 0600);
01034 if (fd < 0) {
01035 ast_log(LOG_ERROR, "Unable to create lock file '%s': %s\n", path, strerror(errno));
01036 return AST_LOCK_PATH_NOT_FOUND;
01037 }
01038 close(fd);
01039
01040 snprintf(s, strlen(path) + 9, "%s/.lock", path);
01041 start = time(NULL);
01042 while (((res = link(fs, s)) < 0) && (errno == EEXIST) && (time(NULL) - start < 5))
01043 usleep(1);
01044
01045 unlink(fs);
01046
01047 if (res) {
01048 ast_log(LOG_WARNING, "Failed to lock path '%s': %s\n", path, strerror(errno));
01049 return AST_LOCK_TIMEOUT;
01050 } else {
01051 if (option_debug)
01052 ast_log(LOG_DEBUG, "Locked path '%s'\n", path);
01053 return AST_LOCK_SUCCESS;
01054 }
01055 }
01056
01057 int ast_unlock_path(const char *path)
01058 {
01059 char *s;
01060 int res;
01061
01062 if (!(s = alloca(strlen(path) + 10))) {
01063 ast_log(LOG_WARNING, "Out of memory!\n");
01064 return -1;
01065 }
01066
01067 snprintf(s, strlen(path) + 9, "%s/%s", path, ".lock");
01068
01069 if ((res = unlink(s)))
01070 ast_log(LOG_ERROR, "Could not unlock path '%s': %s\n", path, strerror(errno));
01071 else {
01072 if (option_debug)
01073 ast_log(LOG_DEBUG, "Unlocked path '%s'\n", path);
01074 }
01075
01076 return res;
01077 }
01078
01079 int ast_record_review(struct ast_channel *chan, const char *playfile, const char *recordfile, int maxtime, const char *fmt, int *duration, const char *path)
01080 {
01081 int silencethreshold = 128;
01082 int maxsilence=0;
01083 int res = 0;
01084 int cmd = 0;
01085 int max_attempts = 3;
01086 int attempts = 0;
01087 int recorded = 0;
01088 int message_exists = 0;
01089
01090
01091
01092 if (duration == NULL) {
01093 ast_log(LOG_WARNING, "Error ast_record_review called without duration pointer\n");
01094 return -1;
01095 }
01096
01097 cmd = '3';
01098
01099 while ((cmd >= 0) && (cmd != 't')) {
01100 switch (cmd) {
01101 case '1':
01102 if (!message_exists) {
01103
01104 cmd = '3';
01105 break;
01106 } else {
01107 ast_stream_and_wait(chan, "vm-msgsaved", chan->language, "");
01108 cmd = 't';
01109 return res;
01110 }
01111 case '2':
01112
01113 ast_verbose(VERBOSE_PREFIX_3 "Reviewing the recording\n");
01114 cmd = ast_stream_and_wait(chan, recordfile, chan->language, AST_DIGIT_ANY);
01115 break;
01116 case '3':
01117 message_exists = 0;
01118
01119 if (recorded == 1)
01120 ast_verbose(VERBOSE_PREFIX_3 "Re-recording\n");
01121 else
01122 ast_verbose(VERBOSE_PREFIX_3 "Recording\n");
01123 recorded = 1;
01124 cmd = ast_play_and_record(chan, playfile, recordfile, maxtime, fmt, duration, silencethreshold, maxsilence, path);
01125 if (cmd == -1) {
01126
01127 return cmd;
01128 }
01129 if (cmd == '0') {
01130 break;
01131 } else if (cmd == '*') {
01132 break;
01133 }
01134 else {
01135
01136 message_exists = 1;
01137 cmd = 0;
01138 }
01139 break;
01140 case '4':
01141 case '5':
01142 case '6':
01143 case '7':
01144 case '8':
01145 case '9':
01146 case '*':
01147 case '#':
01148 cmd = ast_play_and_wait(chan, "vm-sorry");
01149 break;
01150 default:
01151 if (message_exists) {
01152 cmd = ast_play_and_wait(chan, "vm-review");
01153 }
01154 else {
01155 cmd = ast_play_and_wait(chan, "vm-torerecord");
01156 if (!cmd)
01157 cmd = ast_waitfordigit(chan, 600);
01158 }
01159
01160 if (!cmd)
01161 cmd = ast_waitfordigit(chan, 6000);
01162 if (!cmd) {
01163 attempts++;
01164 }
01165 if (attempts > max_attempts) {
01166 cmd = 't';
01167 }
01168 }
01169 }
01170 if (cmd == 't')
01171 cmd = 0;
01172 return cmd;
01173 }
01174
01175 #define RES_UPONE (1 << 16)
01176 #define RES_EXIT (1 << 17)
01177 #define RES_REPEAT (1 << 18)
01178 #define RES_RESTART ((1 << 19) | RES_REPEAT)
01179
01180 static int ast_ivr_menu_run_internal(struct ast_channel *chan, struct ast_ivr_menu *menu, void *cbdata);
01181
01182 static int ivr_dispatch(struct ast_channel *chan, struct ast_ivr_option *option, char *exten, void *cbdata)
01183 {
01184 int res;
01185 int (*ivr_func)(struct ast_channel *, void *);
01186 char *c;
01187 char *n;
01188
01189 switch(option->action) {
01190 case AST_ACTION_UPONE:
01191 return RES_UPONE;
01192 case AST_ACTION_EXIT:
01193 return RES_EXIT | (((unsigned long)(option->adata)) & 0xffff);
01194 case AST_ACTION_REPEAT:
01195 return RES_REPEAT | (((unsigned long)(option->adata)) & 0xffff);
01196 case AST_ACTION_RESTART:
01197 return RES_RESTART ;
01198 case AST_ACTION_NOOP:
01199 return 0;
01200 case AST_ACTION_BACKGROUND:
01201 res = ast_stream_and_wait(chan, (char *)option->adata, chan->language, AST_DIGIT_ANY);
01202 if (res < 0) {
01203 ast_log(LOG_NOTICE, "Unable to find file '%s'!\n", (char *)option->adata);
01204 res = 0;
01205 }
01206 return res;
01207 case AST_ACTION_PLAYBACK:
01208 res = ast_stream_and_wait(chan, (char *)option->adata, chan->language, "");
01209 if (res < 0) {
01210 ast_log(LOG_NOTICE, "Unable to find file '%s'!\n", (char *)option->adata);
01211 res = 0;
01212 }
01213 return res;
01214 case AST_ACTION_MENU:
01215 res = ast_ivr_menu_run_internal(chan, (struct ast_ivr_menu *)option->adata, cbdata);
01216
01217 if (res == -2)
01218 res = 0;
01219 return res;
01220 case AST_ACTION_WAITOPTION:
01221 res = ast_waitfordigit(chan, 1000 * (chan->pbx ? chan->pbx->rtimeout : 10));
01222 if (!res)
01223 return 't';
01224 return res;
01225 case AST_ACTION_CALLBACK:
01226 ivr_func = option->adata;
01227 res = ivr_func(chan, cbdata);
01228 return res;
01229 case AST_ACTION_TRANSFER:
01230 res = ast_parseable_goto(chan, option->adata);
01231 return 0;
01232 case AST_ACTION_PLAYLIST:
01233 case AST_ACTION_BACKLIST:
01234 res = 0;
01235 c = ast_strdupa(option->adata);
01236 while ((n = strsep(&c, ";"))) {
01237 if ((res = ast_stream_and_wait(chan, n, chan->language,
01238 (option->action == AST_ACTION_BACKLIST) ? AST_DIGIT_ANY : "")))
01239 break;
01240 }
01241 ast_stopstream(chan);
01242 return res;
01243 default:
01244 ast_log(LOG_NOTICE, "Unknown dispatch function %d, ignoring!\n", option->action);
01245 return 0;
01246 };
01247 return -1;
01248 }
01249
01250 static int option_exists(struct ast_ivr_menu *menu, char *option)
01251 {
01252 int x;
01253 for (x = 0; menu->options[x].option; x++)
01254 if (!strcasecmp(menu->options[x].option, option))
01255 return x;
01256 return -1;
01257 }
01258
01259 static int option_matchmore(struct ast_ivr_menu *menu, char *option)
01260 {
01261 int x;
01262 for (x = 0; menu->options[x].option; x++)
01263 if ((!strncasecmp(menu->options[x].option, option, strlen(option))) &&
01264 (menu->options[x].option[strlen(option)]))
01265 return x;
01266 return -1;
01267 }
01268
01269 static int read_newoption(struct ast_channel *chan, struct ast_ivr_menu *menu, char *exten, int maxexten)
01270 {
01271 int res=0;
01272 int ms;
01273 while (option_matchmore(menu, exten)) {
01274 ms = chan->pbx ? chan->pbx->dtimeout : 5000;
01275 if (strlen(exten) >= maxexten - 1)
01276 break;
01277 res = ast_waitfordigit(chan, ms);
01278 if (res < 1)
01279 break;
01280 exten[strlen(exten) + 1] = '\0';
01281 exten[strlen(exten)] = res;
01282 }
01283 return res > 0 ? 0 : res;
01284 }
01285
01286 static int ast_ivr_menu_run_internal(struct ast_channel *chan, struct ast_ivr_menu *menu, void *cbdata)
01287 {
01288
01289 int res=0;
01290 int pos = 0;
01291 int retries = 0;
01292 char exten[AST_MAX_EXTENSION] = "s";
01293 if (option_exists(menu, "s") < 0) {
01294 strcpy(exten, "g");
01295 if (option_exists(menu, "g") < 0) {
01296 ast_log(LOG_WARNING, "No 's' nor 'g' extension in menu '%s'!\n", menu->title);
01297 return -1;
01298 }
01299 }
01300 while(!res) {
01301 while(menu->options[pos].option) {
01302 if (!strcasecmp(menu->options[pos].option, exten)) {
01303 res = ivr_dispatch(chan, menu->options + pos, exten, cbdata);
01304 if (option_debug)
01305 ast_log(LOG_DEBUG, "IVR Dispatch of '%s' (pos %d) yields %d\n", exten, pos, res);
01306 if (res < 0)
01307 break;
01308 else if (res & RES_UPONE)
01309 return 0;
01310 else if (res & RES_EXIT)
01311 return res;
01312 else if (res & RES_REPEAT) {
01313 int maxretries = res & 0xffff;
01314 if ((res & RES_RESTART) == RES_RESTART) {
01315 retries = 0;
01316 } else
01317 retries++;
01318 if (!maxretries)
01319 maxretries = 3;
01320 if ((maxretries > 0) && (retries >= maxretries)) {
01321 if (option_debug)
01322 ast_log(LOG_DEBUG, "Max retries %d exceeded\n", maxretries);
01323 return -2;
01324 } else {
01325 if (option_exists(menu, "g") > -1)
01326 strcpy(exten, "g");
01327 else if (option_exists(menu, "s") > -1)
01328 strcpy(exten, "s");
01329 }
01330 pos = 0;
01331 continue;
01332 } else if (res && strchr(AST_DIGIT_ANY, res)) {
01333 if (option_debug)
01334 ast_log(LOG_DEBUG, "Got start of extension, %c\n", res);
01335 exten[1] = '\0';
01336 exten[0] = res;
01337 if ((res = read_newoption(chan, menu, exten, sizeof(exten))))
01338 break;
01339 if (option_exists(menu, exten) < 0) {
01340 if (option_exists(menu, "i")) {
01341 if (option_debug)
01342 ast_log(LOG_DEBUG, "Invalid extension entered, going to 'i'!\n");
01343 strcpy(exten, "i");
01344 pos = 0;
01345 continue;
01346 } else {
01347 if (option_debug)
01348 ast_log(LOG_DEBUG, "Aborting on invalid entry, with no 'i' option!\n");
01349 res = -2;
01350 break;
01351 }
01352 } else {
01353 if (option_debug)
01354 ast_log(LOG_DEBUG, "New existing extension: %s\n", exten);
01355 pos = 0;
01356 continue;
01357 }
01358 }
01359 }
01360 pos++;
01361 }
01362 if (option_debug)
01363 ast_log(LOG_DEBUG, "Stopping option '%s', res is %d\n", exten, res);
01364 pos = 0;
01365 if (!strcasecmp(exten, "s"))
01366 strcpy(exten, "g");
01367 else
01368 break;
01369 }
01370 return res;
01371 }
01372
01373 int ast_ivr_menu_run(struct ast_channel *chan, struct ast_ivr_menu *menu, void *cbdata)
01374 {
01375 int res = ast_ivr_menu_run_internal(chan, menu, cbdata);
01376
01377 return res > 0 ? 0 : res;
01378 }
01379
01380 char *ast_read_textfile(const char *filename)
01381 {
01382 int fd;
01383 char *output = NULL;
01384 struct stat filesize;
01385 int count = 0;
01386 int res;
01387 if (stat(filename, &filesize) == -1) {
01388 ast_log(LOG_WARNING, "Error can't stat %s\n", filename);
01389 return NULL;
01390 }
01391 count = filesize.st_size + 1;
01392 fd = open(filename, O_RDONLY);
01393 if (fd < 0) {
01394 ast_log(LOG_WARNING, "Cannot open file '%s' for reading: %s\n", filename, strerror(errno));
01395 return NULL;
01396 }
01397 if ((output = ast_malloc(count))) {
01398 res = read(fd, output, count - 1);
01399 if (res == count - 1) {
01400 output[res] = '\0';
01401 } else {
01402 ast_log(LOG_WARNING, "Short read of %s (%d of %d): %s\n", filename, res, count - 1, strerror(errno));
01403 free(output);
01404 output = NULL;
01405 }
01406 }
01407 close(fd);
01408 return output;
01409 }
01410
01411 void ast_app_options2str(const struct ast_app_option *options, struct ast_flags *flags, char *buf, size_t len)
01412 {
01413 unsigned int i, found = 0;
01414
01415 for (i = 32; i < 128 && found < len;i++) {
01416 if (ast_test_flag(flags, options[i].flag)) {
01417 buf[found++] = i;
01418 }
01419 }
01420 buf[found] = '\0';
01421 }
01422
01423 int ast_app_parse_options(const struct ast_app_option *options, struct ast_flags *flags, char **args, char *optstr)
01424 {
01425 char *s;
01426 int curarg;
01427 unsigned int argloc;
01428 char *arg;
01429 int res = 0;
01430
01431 ast_clear_flag(flags, AST_FLAGS_ALL);
01432
01433 if (!optstr)
01434 return 0;
01435
01436 s = optstr;
01437 while (*s) {
01438 curarg = *s++ & 0x7f;
01439 argloc = options[curarg].arg_index;
01440 if (*s == '(') {
01441 int paren = 1, quote = 0;
01442 int parsequotes = (s[1] == '"') ? 1 : 0;
01443
01444
01445 arg = ++s;
01446 for (; *s; s++) {
01447 if (*s == '(' && !quote) {
01448 paren++;
01449 } else if (*s == ')' && !quote) {
01450
01451 paren--;
01452 } else if (*s == '"' && parsequotes) {
01453
01454 quote = quote ? 0 : 1;
01455 ast_copy_string(s, s + 1, INT_MAX);
01456 s--;
01457 } else if (*s == '\\') {
01458 if (!quote) {
01459
01460 ast_copy_string(s, s + 1, INT_MAX);
01461 } else if (quote && s[1] == '"') {
01462
01463 ast_copy_string(s, s + 1, INT_MAX);
01464 } else {
01465
01466 s++;
01467 }
01468 }
01469
01470 if (paren == 0) {
01471 break;
01472 }
01473 }
01474
01475 if ((s = strchr(s, ')'))) {
01476 if (argloc)
01477 args[argloc - 1] = arg;
01478 *s++ = '\0';
01479 } else {
01480 ast_log(LOG_WARNING, "Missing closing parenthesis for argument '%c' in string '%s'\n", curarg, arg);
01481 res = -1;
01482 break;
01483 }
01484 } else if (argloc) {
01485 args[argloc - 1] = "";
01486 }
01487 ast_set_flag(flags, options[curarg].flag);
01488 }
01489
01490 return res;
01491 }
01492