static char *complete_context_add_ignorepat(char *line, char *word, int pos, int state) { if (pos == 3) return state == 0 ? strdup("into") : NULL; if (pos == 4) { struct ast_context *c; int which = 0; char *dupline, *duplinet, *ignorepat = NULL; dupline = strdup(line); duplinet = dupline; if (duplinet) { strsep(&duplinet, " "); /* skip 'add' */ strsep(&duplinet, " "); /* skip 'ignorepat' */ ignorepat = strsep(&duplinet, " "); } if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock contexts list\n"); return NULL; } c = ast_walk_contexts(NULL); while (c) { if (!strncmp(ast_get_context_name(c), word, strlen(word))) { int serve_context = 1; if (ignorepat) { if (!ast_lock_context(c)) { struct ast_ignorepat *ip; ip = ast_walk_context_ignorepats(c, NULL); while (ip && serve_context) { if (!strcmp(ast_get_ignorepat_name(ip), ignorepat)) serve_context = 0; ip = ast_walk_context_ignorepats(c, ip); } ast_unlock_context(c); } } if (serve_context) { if (++which > state) { char *context = strdup(ast_get_context_name(c)); if (dupline) free(dupline); ast_unlock_contexts(); return context; } } } c = ast_walk_contexts(c); } if (dupline) free(dupline); ast_unlock_contexts(); return NULL; } return NULL; }
/* add extension 6123,1,Dial,IAX/212.71.138.13/6123 into local */ static char *complete_context_add_extension(char *line, char *word, int pos, int state) { int which = 0; /* complete 'into' word ... */ if (pos == 3) { if (state == 0) return strdup("into"); return NULL; } /* complete context */ if (pos == 4) { struct ast_context *c; /* try to lock contexts list ... */ if (ast_lock_contexts()) { ast_log(LOG_WARNING, "Failed to lock contexts list\n"); return NULL; } /* walk through all contexts */ c = ast_walk_contexts(NULL); while (c) { /* matching context? */ if (!strncmp(ast_get_context_name(c), word, strlen(word))) { if (++which > state) { char *res = strdup(ast_get_context_name(c)); ast_unlock_contexts(); return res; } } c = ast_walk_contexts(c); } ast_unlock_contexts(); return NULL; } if (pos == 5) return state == 0 ? strdup("replace") : NULL; return NULL; }
static int find_matching_endwhile(struct ast_channel *chan) { struct ast_context *c; int res=-1; if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock contexts list\n"); return -1; } for (c=ast_walk_contexts(NULL); c; c=ast_walk_contexts(c)) { struct ast_exten *e; if (!ast_lock_context(c)) { if (!strcmp(ast_get_context_name(c), chan->context)) { /* This is the matching context we want */ int cur_priority = chan->priority + 1, level=1; for (e = find_matching_priority(c, chan->exten, cur_priority, chan->cid.cid_num); e; e = find_matching_priority(c, chan->exten, ++cur_priority, chan->cid.cid_num)) { if (!strcasecmp(ast_get_extension_app(e), "WHILE")) { level++; } else if (!strcasecmp(ast_get_extension_app(e), "ENDWHILE")) { level--; } if (level == 0) { res = cur_priority; break; } } } ast_unlock_context(c); if (res > 0) { break; } } } ast_unlock_contexts(); return res; }
/* * 'save dialplan' CLI command implementation functions ... */ static int handle_save_dialplan(int fd, int argc, char *argv[]) { char filename[256]; struct ast_context *c; struct ast_config *cfg; struct ast_variable *v; int context_header_written; int incomplete = 0; /* incomplete config write? */ FILE *output; if (! (static_config && !write_protect_config)) { ast_cli(fd, "I can't save dialplan now, see '%s' example file.\n", config); return RESULT_FAILURE; } if (argc != 2 && argc != 3) return RESULT_SHOWUSAGE; if (ast_mutex_lock(&save_dialplan_lock)) { ast_cli(fd, "Failed to lock dialplan saving (another proccess saving?)\n"); return RESULT_FAILURE; } /* have config path? */ if (argc == 3) { /* is there extension.conf too? */ if (!strstr(argv[2], ".conf")) { /* no, only directory path, check for last '/' occurence */ if (*(argv[2] + strlen(argv[2]) -1) == '/') snprintf(filename, sizeof(filename), "%s%s", argv[2], config); else /* without config extensions.conf, add it */ snprintf(filename, sizeof(filename), "%s/%s", argv[2], config); } else /* there is an .conf */ snprintf(filename, sizeof(filename), argv[2]); } else /* no config file, default one */ snprintf(filename, sizeof(filename), "%s/%s", (char *)ast_config_AST_CONFIG_DIR, config); cfg = ast_load("extensions.conf"); /* try to lock contexts list */ if (ast_lock_contexts()) { ast_cli(fd, "Failed to lock contexts list\n"); ast_mutex_unlock(&save_dialplan_lock); ast_destroy(cfg); return RESULT_FAILURE; } /* create new file ... */ if (!(output = fopen(filename, "wt"))) { ast_cli(fd, "Failed to create file '%s'\n", filename); ast_unlock_contexts(); ast_mutex_unlock(&save_dialplan_lock); ast_destroy(cfg); return RESULT_FAILURE; } /* fireout general info */ fprintf(output, "[general]\nstatic=%s\nwriteprotect=%s\n\n", static_config ? "yes" : "no", write_protect_config ? "yes" : "no"); if ((v = ast_variable_browse(cfg, "globals"))) { fprintf(output, "[globals]\n"); while(v) { fprintf(output, "%s => %s\n", v->name, v->value); v = v->next; } fprintf(output, "\n"); } ast_destroy(cfg); /* walk all contexts */ c = ast_walk_contexts(NULL); while (c) { context_header_written = 0; /* try to lock context and fireout all info */ if (!ast_lock_context(c)) { struct ast_exten *e, *last_written_e = NULL; struct ast_include *i; struct ast_ignorepat *ip; struct ast_sw *sw; /* registered by this module? */ if (!strcmp(ast_get_context_registrar(c), registrar)) { fprintf(output, "[%s]\n", ast_get_context_name(c)); context_header_written = 1; } /* walk extensions ... */ e = ast_walk_context_extensions(c, NULL); while (e) { struct ast_exten *p; /* fireout priorities */ p = ast_walk_extension_priorities(e, NULL); while (p) { if (!strcmp(ast_get_extension_registrar(p), registrar)) { /* make empty line between different extensions */ if (last_written_e != NULL && strcmp(ast_get_extension_name(last_written_e), ast_get_extension_name(p))) fprintf(output, "\n"); last_written_e = p; if (!context_header_written) { fprintf(output, "[%s]\n", ast_get_context_name(c)); context_header_written = 1; } if (ast_get_extension_priority(p)!=PRIORITY_HINT) { char *tempdata = NULL, *startdata; tempdata = strdup((char *)ast_get_extension_app_data(p)); if (tempdata) { startdata = tempdata; while (*tempdata) { if (*tempdata == '|') *tempdata = ','; tempdata++; } tempdata = startdata; } if (ast_get_extension_matchcid(p)) fprintf(output, "exten => %s/%s,%d,%s(%s)\n", ast_get_extension_name(p), ast_get_extension_cidmatch(p), ast_get_extension_priority(p), ast_get_extension_app(p), tempdata); else fprintf(output, "exten => %s,%d,%s(%s)\n", ast_get_extension_name(p), ast_get_extension_priority(p), ast_get_extension_app(p), tempdata); if (tempdata) free(tempdata); } else fprintf(output, "exten => %s,hint,%s\n", ast_get_extension_name(p), ast_get_extension_app(p)); } p = ast_walk_extension_priorities(e, p); } e = ast_walk_context_extensions(c, e); } /* written any extensions? ok, write space between exten & inc */ if (last_written_e) fprintf(output, "\n"); /* walk through includes */ i = ast_walk_context_includes(c, NULL); while (i) { if (!strcmp(ast_get_include_registrar(i), registrar)) { if (!context_header_written) { fprintf(output, "[%s]\n", ast_get_context_name(c)); context_header_written = 1; } fprintf(output, "include => %s\n", ast_get_include_name(i)); } i = ast_walk_context_includes(c, i); } if (ast_walk_context_includes(c, NULL)) fprintf(output, "\n"); /* walk through switches */ sw = ast_walk_context_switches(c, NULL); while (sw) { if (!strcmp(ast_get_switch_registrar(sw), registrar)) { if (!context_header_written) { fprintf(output, "[%s]\n", ast_get_context_name(c)); context_header_written = 1; } fprintf(output, "switch => %s/%s\n", ast_get_switch_name(sw), ast_get_switch_data(sw)); } sw = ast_walk_context_switches(c, sw); } if (ast_walk_context_switches(c, NULL)) fprintf(output, "\n"); /* fireout ignorepats ... */ ip = ast_walk_context_ignorepats(c, NULL); while (ip) { if (!strcmp(ast_get_ignorepat_registrar(ip), registrar)) { if (!context_header_written) { fprintf(output, "[%s]\n", ast_get_context_name(c)); context_header_written = 1; } fprintf(output, "ignorepat => %s\n", ast_get_ignorepat_name(ip)); } ip = ast_walk_context_ignorepats(c, ip); } ast_unlock_context(c); } else incomplete = 1; c = ast_walk_contexts(c); } ast_unlock_contexts(); ast_mutex_unlock(&save_dialplan_lock); fclose(output); if (incomplete) { ast_cli(fd, "Saved dialplan is incomplete\n"); return RESULT_FAILURE; } ast_cli(fd, "Dialplane successfully saved into '%s'\n", filename); return RESULT_SUCCESS; }
static char *complete_context_add_include(char *line, char *word, int pos, int state) { struct ast_context *c; int which = 0; /* server context for inclusion ... */ if (pos == 1) { if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); return NULL; } /* server all contexts */ c = ast_walk_contexts(NULL); while (c) { if ((!strlen(word) || !strncmp(ast_get_context_name(c), word, strlen(word))) && ++which > state) { char *context = strdup(ast_get_context_name(c)); ast_unlock_contexts(); return context; } c = ast_walk_contexts(c); } ast_unlock_contexts(); } /* complete 'in' only if context exist ... */ if (pos == 2) { char *context, *dupline, *duplinet; if (state != 0) return NULL; /* parse context from line ... */ if (!(dupline = strdup(line))) { ast_log(LOG_ERROR, "Out of free memory\n"); if (state == 0) return strdup("in"); return NULL; } duplinet = dupline; strsep(&duplinet, " "); context = strsep(&duplinet, " "); if (context) { struct ast_context *c; int context_existence = 0; /* check for context existence ... */ if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); free(dupline); /* our fault, we can't check, so complete 'in' ... */ return strdup("in"); } c = ast_walk_contexts(NULL); while (c && !context_existence) { if (!strcmp(context, ast_get_context_name(c))) { context_existence = 1; continue; } c = ast_walk_contexts(c); } /* if context exists, return 'into' ... */ if (context_existence) { free(dupline); ast_unlock_contexts(); return strdup("into"); } ast_unlock_contexts(); } free(dupline); return NULL; } /* serve context into which we include another context */ if (pos == 3) { char *context, *dupline, *duplinet, *in; int context_existence = 0; if (!(dupline = strdup(line))) { ast_log(LOG_ERROR, "Out of free memory\n"); return NULL; } duplinet = dupline; strsep(&duplinet, " "); /* skip 'include' */ context = strsep(&duplinet, " "); in = strsep(&duplinet, " "); /* given some context and third word is in? */ if (!strlen(context) || strcmp(in, "in")) { free(dupline); return NULL; } if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); free(dupline); return NULL; } /* check for context existence ... */ c = ast_walk_contexts(NULL); while (c && !context_existence) { if (!strcmp(context, ast_get_context_name(c))) { context_existence = 1; continue; } c = ast_walk_contexts(c); } if (!context_existence) { free(dupline); ast_unlock_contexts(); return NULL; } /* go through all contexts ... */ c = ast_walk_contexts(NULL); while (c) { /* must be different contexts ... */ if (strcmp(context, ast_get_context_name(c))) { if (!ast_lock_context(c)) { struct ast_include *i; int included = 0; /* check for duplicity inclusion ... */ i = ast_walk_context_includes(c, NULL); while (i && !included) { if (!strcmp(ast_get_include_name(i), context)) included = 1; i = ast_walk_context_includes(c, i); } ast_unlock_context(c); /* not included yet, so show possibility ... */ if (!included && !strncmp(ast_get_context_name(c), word, strlen(word))){ if (++which > state) { char *res = strdup(ast_get_context_name(c)); free(dupline); ast_unlock_contexts(); return res; } } } } c = ast_walk_contexts(c); } ast_unlock_contexts(); free(dupline); return NULL; } return NULL; }
static char *complete_context_remove_extension(char *line, char *word, int pos, int state) { char *ret = NULL; int which = 0; #ifdef BROKEN_READLINE /* * Fix arguments, *word is a new allocated structure, REMEMBER to * free *word when you want to return from this function ... */ if (fix_complete_args(line, &word, &pos)) { ast_log(LOG_ERROR, "Out of free memory\n"); return NULL; } #endif /* * exten@context completion ... */ if (pos == 2) { struct ast_context *c; struct ast_exten *e; char *context = NULL, *exten = NULL, *delim = NULL; /* now, parse values from word = exten@context */ if ((delim = strchr(word, (int)'@'))) { /* check for duplicity ... */ if (delim != strrchr(word, (int)'@')) { #ifdef BROKEN_READLINE free(word); #endif return NULL; } *delim = '\0'; exten = strdup(word); context = strdup(delim + 1); *delim = '@'; } else { exten = strdup(word); } #ifdef BROKEN_READLINE free(word); #endif if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); free(context); free(exten); return NULL; } /* find our context ... */ c = ast_walk_contexts(NULL); while (c) { /* our context? */ if ( (!context || !strlen(context)) || /* if no input, all contexts ... */ (context && !strncmp(ast_get_context_name(c), context, strlen(context))) ) { /* if input, compare ... */ /* try to complete extensions ... */ e = ast_walk_context_extensions(c, NULL); while (e) { /* our extension? */ if ( (!exten || !strlen(exten)) || /* if not input, all extensions ... */ (exten && !strncmp(ast_get_extension_name(e), exten, strlen(exten))) ) { /* if input, compare ... */ if (++which > state) { /* If there is an extension then return * exten@context. */ if (exten) { ret = malloc(strlen(ast_get_extension_name(e)) + strlen(ast_get_context_name(c)) + 2); if (ret) sprintf(ret, "%s@%s", ast_get_extension_name(e), ast_get_context_name(c)); } free(exten); free(context); ast_unlock_contexts(); return ret; } } e = ast_walk_context_extensions(c, e); } } c = ast_walk_contexts(c); } ast_unlock_contexts(); free(exten); free(context); return NULL; } /* * Complete priority ... */ if (pos == 3) { char *delim, *exten, *context, *dupline, *duplinet, *ec; struct ast_context *c; dupline = strdup(line); if (!dupline) { #ifdef BROKEN_READLINE free(word); #endif return NULL; } duplinet = dupline; strsep(&duplinet, " "); /* skip 'remove' */ strsep(&duplinet, " "); /* skip 'extension */ if (!(ec = strsep(&duplinet, " "))) { free(dupline); #ifdef BROKEN_READLINE free(word); #endif return NULL; } /* wrong exten@context format? */ if (!(delim = strchr(ec, (int)'@')) || (strchr(ec, (int)'@') != strrchr(ec, (int)'@'))) { #ifdef BROKEN_READLINE free(word); #endif free(dupline); return NULL; } /* check if there is exten and context too ... */ *delim = '\0'; if ((!strlen(ec)) || (!strlen(delim + 1))) { #ifdef BROKEN_READLINE free(word); #endif free(dupline); return NULL; } exten = strdup(ec); context = strdup(delim + 1); free(dupline); if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); #ifdef BROKEN_READLINE free(word); #endif free(exten); free(context); return NULL; } /* walk contexts */ c = ast_walk_contexts(NULL); while (c) { if (!strcmp(ast_get_context_name(c), context)) { struct ast_exten *e; /* walk extensions */ free(context); e = ast_walk_context_extensions(c, NULL); while (e) { if (!strcmp(ast_get_extension_name(e), exten)) { struct ast_exten *priority; char buffer[10]; free(exten); priority = ast_walk_extension_priorities(e, NULL); /* serve priorities */ do { snprintf(buffer, 10, "%u", ast_get_extension_priority(priority)); if (!strncmp(word, buffer, strlen(word))) { if (++which > state) { #ifdef BROKEN_READLINE free(word); #endif ast_unlock_contexts(); return strdup(buffer); } } priority = ast_walk_extension_priorities(e, priority); } while (priority); #ifdef BROKEN_READLINE free(word); #endif ast_unlock_contexts(); return NULL; } e = ast_walk_context_extensions(c, e); } #ifdef BROKEN_READLINE free(word); #endif free(exten); ast_unlock_contexts(); return NULL; } c = ast_walk_contexts(c); } #ifdef BROKEN_READLINE free(word); #endif free(exten); free(context); ast_unlock_contexts(); return NULL; } #ifdef BROKEN_READLINE free(word); #endif return NULL; }
static char *complete_context_dont_include(char *line, char *word, int pos, int state) { int which = 0; /* * Context completion ... */ if (pos == 2) { struct ast_context *c; if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); return NULL; } /* walk pbx_get_contexts ... */ c = ast_walk_contexts(NULL); while (c) { struct ast_include *i; if (ast_lock_context(c)) { c = ast_walk_contexts(c); continue; } i = ast_walk_context_includes(c, NULL); while (i) { if (!strlen(word) || !strncmp(ast_get_include_name(i), word, strlen(word))) { struct ast_context *nc; int already_served = 0; /* check if this include is already served or not */ /* go through all contexts again till we reach actuall * context or already_served = 1 */ nc = ast_walk_contexts(NULL); while (nc && nc != c && !already_served) { if (!ast_lock_context(nc)) { struct ast_include *ni; ni = ast_walk_context_includes(nc, NULL); while (ni && !already_served) { if (!strcmp(ast_get_include_name(i), ast_get_include_name(ni))) already_served = 1; ni = ast_walk_context_includes(nc, ni); } ast_unlock_context(nc); } nc = ast_walk_contexts(nc); } if (!already_served) { if (++which > state) { char *res = strdup(ast_get_include_name(i)); ast_unlock_context(c); ast_unlock_contexts(); return res; } } } i = ast_walk_context_includes(c, i); } ast_unlock_context(c); c = ast_walk_contexts(c); } ast_unlock_contexts(); return NULL; } /* * 'in' completion ... (complete only if previous context is really * included somewhere) */ if (pos == 3) { struct ast_context *c; char *context, *dupline, *duplinet; if (state > 0) return NULL; /* take 'context' from line ... */ if (!(dupline = strdup(line))) { ast_log(LOG_ERROR, "Out of free memory\n"); return NULL; } duplinet = dupline; strsep(&duplinet, " "); /* skip 'dont' */ strsep(&duplinet, " "); /* skip 'include' */ context = strsep(&duplinet, " "); if (!context) { free(dupline); return NULL; } if (ast_lock_contexts()) { ast_log(LOG_WARNING, "Failed to lock contexts list\n"); free(dupline); return NULL; } /* go through all contexts and check if is included ... */ c = ast_walk_contexts(NULL); while (c) { struct ast_include *i; if (ast_lock_context(c)) { free(dupline); ast_unlock_contexts(); return NULL; } i = ast_walk_context_includes(c, NULL); while (i) { /* is it our context? */ if (!strcmp(ast_get_include_name(i), context)) { /* yes, it is, context is really included, so * complete "in" command */ free(dupline); ast_unlock_context(c); ast_unlock_contexts(); return strdup("in"); } i = ast_walk_context_includes(c, i); } ast_unlock_context(c); c = ast_walk_contexts(c); } free(dupline); ast_unlock_contexts(); return NULL; } /* * Context from which we removing include ... */ if (pos == 4) { struct ast_context *c; char *context, *dupline, *duplinet, *in; if (!(dupline = strdup(line))) { ast_log(LOG_ERROR, "Out of free memory\n"); return NULL; } duplinet = dupline; strsep(&duplinet, " "); /* skip 'dont' */ strsep(&duplinet, " "); /* skip 'include' */ if (!(context = strsep(&duplinet, " "))) { free(dupline); return NULL; } /* third word must be in */ in = strsep(&duplinet, " "); if (!in || strcmp(in, "in")) { free(dupline); return NULL; } if (ast_lock_contexts()) { ast_log(LOG_ERROR, "Failed to lock context list\n"); free(dupline); return NULL; } /* walk through all contexts ... */ c = ast_walk_contexts(NULL); while (c) { struct ast_include *i; if (ast_lock_context(c)) { free(dupline); return NULL; } /* walk through all includes and check if it is our context */ i = ast_walk_context_includes(c, NULL); while (i) { /* is in this context included another on which we want to * remove? */ if (!strcmp(context, ast_get_include_name(i))) { /* yes, it's included, is matching our word too? */ if (!strncmp(ast_get_context_name(c), word, strlen(word))) { /* check state for completion */ if (++which > state) { char *res = strdup(ast_get_context_name(c)); free(dupline); ast_unlock_context(c); ast_unlock_contexts(); return res; } } break; } i = ast_walk_context_includes(c, i); } ast_unlock_context(c); c = ast_walk_contexts(c); } free(dupline); ast_unlock_contexts(); return NULL; } return NULL; }
static char *complete_context_remove_ignorepat(char *line, char *word, int pos, int state) { struct ast_context *c; int which = 0; if (pos == 2) { if (ast_lock_contexts()) { ast_log(LOG_WARNING, "Failed to lock contexts list\n"); return NULL; } c = ast_walk_contexts(NULL); while (c) { if (!ast_lock_context(c)) { struct ast_ignorepat *ip; ip = ast_walk_context_ignorepats(c, NULL); while (ip) { if (!strncmp(ast_get_ignorepat_name(ip), word, strlen(word))) { if (which + 1 > state) { struct ast_context *cw; int already_served = 0; cw = ast_walk_contexts(NULL); while (cw && cw != c && !already_served) { if (!ast_lock_context(cw)) { struct ast_ignorepat *ipw; ipw = ast_walk_context_ignorepats(cw, NULL); while (ipw) { if (!strcmp(ast_get_ignorepat_name(ipw), ast_get_ignorepat_name(ip))) already_served = 1; ipw = ast_walk_context_ignorepats(cw, ipw); } ast_unlock_context(cw); } cw = ast_walk_contexts(cw); } if (!already_served) { char *ret = strdup(ast_get_ignorepat_name(ip)); ast_unlock_context(c); ast_unlock_contexts(); return ret; } } else which++; } ip = ast_walk_context_ignorepats(c, ip); } ast_unlock_context(c); } c = ast_walk_contexts(c); } ast_unlock_contexts(); return NULL; } if (pos == 3) return state == 0 ? strdup("from") : NULL; if (pos == 4) { char *dupline, *duplinet, *ignorepat; dupline = strdup(line); if (!dupline) { ast_log(LOG_WARNING, "Out of free memory\n"); return NULL; } duplinet = dupline; strsep(&duplinet, " "); strsep(&duplinet, " "); ignorepat = strsep(&duplinet, " "); if (!ignorepat) { free(dupline); return NULL; } if (ast_lock_contexts()) { ast_log(LOG_WARNING, "Failed to lock contexts list\n"); free(dupline); return NULL; } c = ast_walk_contexts(NULL); while (c) { if (!ast_lock_context(c)) { struct ast_ignorepat *ip; ip = ast_walk_context_ignorepats(c, NULL); while (ip) { if (!strcmp(ast_get_ignorepat_name(ip), ignorepat)) { if (!strncmp(ast_get_context_name(c), word, strlen(word))) { if (++which > state) { char *ret = strdup(ast_get_context_name(c)); free(dupline); ast_unlock_context(c); ast_unlock_contexts(); return ret; } } } ip = ast_walk_context_ignorepats(c, ip); } ast_unlock_context(c); } c = ast_walk_contexts(c); } free(dupline); ast_unlock_contexts(); return NULL; } return NULL; }