aboutsummaryrefslogtreecommitdiffstats
path: root/1.4.23-rc4/channels/iax2-provision.c
diff options
context:
space:
mode:
Diffstat (limited to '1.4.23-rc4/channels/iax2-provision.c')
-rw-r--r--1.4.23-rc4/channels/iax2-provision.c540
1 files changed, 0 insertions, 540 deletions
diff --git a/1.4.23-rc4/channels/iax2-provision.c b/1.4.23-rc4/channels/iax2-provision.c
deleted file mode 100644
index b6137a88b..000000000
--- a/1.4.23-rc4/channels/iax2-provision.c
+++ /dev/null
@@ -1,540 +0,0 @@
-/*
- * Asterisk -- An open source telephony toolkit.
- *
- * Copyright (C) 1999 - 2006, Digium, Inc.
- *
- * Mark Spencer <markster@digium.com>
- *
- * See http://www.asterisk.org for more information about
- * the Asterisk project. Please do not directly contact
- * any of the maintainers of this project for assistance;
- * the project provides a web site, mailing lists and IRC
- * channels for your use.
- *
- * This program is free software, distributed under the terms of
- * the GNU General Public License Version 2. See the LICENSE file
- * at the top of the source tree.
- */
-
-/*! \file
- *
- * \brief IAX Provisioning Protocol
- *
- * \author Mark Spencer <markster@digium.com>
- */
-
-#include "asterisk.h"
-
-ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
-
-#include <unistd.h>
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <netdb.h>
-#include <netinet/in.h>
-#include <netinet/in_systm.h>
-#include <netinet/ip.h>
-#include <sys/socket.h>
-
-#include "asterisk/config.h"
-#include "asterisk/logger.h"
-#include "asterisk/cli.h"
-#include "asterisk/lock.h"
-#include "asterisk/frame.h"
-#include "asterisk/options.h"
-#include "asterisk/md5.h"
-#include "asterisk/astdb.h"
-#include "asterisk/utils.h"
-#include "asterisk/acl.h"
-#include "iax2.h"
-#include "iax2-provision.h"
-#include "iax2-parser.h"
-
-#ifndef IPTOS_MINCOST
-#define IPTOS_MINCOST 0x02
-#endif
-
-static int provinit = 0;
-
-struct iax_template {
- int dead;
- char name[80];
- char src[80];
- struct iax_template *next;
- char user[20];
- char pass[20];
- char lang[10];
- unsigned short port;
- unsigned int server;
- unsigned short serverport;
- unsigned int altserver;
- unsigned int flags;
- unsigned int format;
- unsigned int tos;
-} *templates;
-
-static struct iax_flag {
- char *name;
- int value;
-} iax_flags[] = {
- { "register", PROV_FLAG_REGISTER },
- { "secure", PROV_FLAG_SECURE },
- { "heartbeat", PROV_FLAG_HEARTBEAT },
- { "debug", PROV_FLAG_DEBUG },
- { "disablecid", PROV_FLAG_DIS_CALLERID },
- { "disablecw", PROV_FLAG_DIS_CALLWAIT },
- { "disablecidcw", PROV_FLAG_DIS_CIDCW },
- { "disable3way", PROV_FLAG_DIS_THREEWAY },
-};
-
-char *iax_provflags2str(char *buf, int buflen, unsigned int flags)
-{
- int x;
-
- if (!buf || buflen < 1)
- return NULL;
-
- buf[0] = '\0';
-
- for (x = 0; x < sizeof(iax_flags) / sizeof(iax_flags[0]); x++) {
- if (flags & iax_flags[x].value){
- strncat(buf, iax_flags[x].name, buflen - strlen(buf) - 1);
- strncat(buf, ",", buflen - strlen(buf) - 1);
- }
- }
-
- if (!ast_strlen_zero(buf))
- buf[strlen(buf) - 1] = '\0';
- else
- strncpy(buf, "none", buflen - 1);
-
- return buf;
-}
-
-static unsigned int iax_str2flags(const char *buf)
-{
- int x;
- int len;
- int found;
- unsigned int flags = 0;
- char *e;
- while(buf && *buf) {
- e = strchr(buf, ',');
- if (e)
- len = e - buf;
- else
- len = 0;
- found = 0;
- for (x=0;x<sizeof(iax_flags) / sizeof(iax_flags[0]); x++) {
- if ((len && !strncasecmp(iax_flags[x].name, buf, len)) ||
- (!len && !strcasecmp(iax_flags[x].name, buf))) {
- flags |= iax_flags[x].value;
- break;
- }
- }
- if (e) {
- buf = e + 1;
- while(*buf && (*buf < 33))
- buf++;
- } else
- break;
- }
- return flags;
-}
-AST_MUTEX_DEFINE_STATIC(provlock);
-
-static struct iax_template *iax_template_find(const char *s, int allowdead)
-{
- struct iax_template *cur;
- cur = templates;
- while(cur) {
- if (!strcasecmp(s, cur->name)) {
- if (!allowdead && cur->dead)
- cur = NULL;
- break;
- }
- cur = cur->next;
- }
- return cur;
-}
-
-char *iax_prov_complete_template(const char *line, const char *word, int pos, int state)
-{
- struct iax_template *c;
- int which=0;
- char *ret = NULL;
- int wordlen = strlen(word);
-
- ast_mutex_lock(&provlock);
- for (c = templates; c; c = c->next) {
- if (!strncasecmp(word, c->name, wordlen) && ++which > state) {
- ret = strdup(c->name);
- break;
- }
- }
- ast_mutex_unlock(&provlock);
-
- return ret;
-}
-
-static unsigned int prov_ver_calc(struct iax_ie_data *provdata)
-{
- struct MD5Context md5;
- unsigned int tmp[4];
- MD5Init(&md5);
- MD5Update(&md5, provdata->buf, provdata->pos);
- MD5Final((unsigned char *)tmp, &md5);
- return tmp[0] ^ tmp[1] ^ tmp[2] ^ tmp[3];
-}
-
-int iax_provision_build(struct iax_ie_data *provdata, unsigned int *signature, const char *template, int force)
-{
- struct iax_template *cur;
- unsigned int sig;
- char tmp[40];
- memset(provdata, 0, sizeof(*provdata));
- ast_mutex_lock(&provlock);
- cur = iax_template_find(template, 1);
- /* If no match, try searching for '*' */
- if (!cur)
- cur = iax_template_find("*", 1);
- if (cur) {
- /* found it -- add information elements as appropriate */
- if (force || strlen(cur->user))
- iax_ie_append_str(provdata, PROV_IE_USER, cur->user);
- if (force || strlen(cur->pass))
- iax_ie_append_str(provdata, PROV_IE_PASS, cur->pass);
- if (force || strlen(cur->lang))
- iax_ie_append_str(provdata, PROV_IE_LANG, cur->lang);
- if (force || cur->port)
- iax_ie_append_short(provdata, PROV_IE_PORTNO, cur->port);
- if (force || cur->server)
- iax_ie_append_int(provdata, PROV_IE_SERVERIP, cur->server);
- if (force || cur->serverport)
- iax_ie_append_short(provdata, PROV_IE_SERVERPORT, cur->serverport);
- if (force || cur->altserver)
- iax_ie_append_int(provdata, PROV_IE_ALTSERVER, cur->altserver);
- if (force || cur->flags)
- iax_ie_append_int(provdata, PROV_IE_FLAGS, cur->flags);
- if (force || cur->format)
- iax_ie_append_int(provdata, PROV_IE_FORMAT, cur->format);
- if (force || cur->tos)
- iax_ie_append_byte(provdata, PROV_IE_TOS, cur->tos);
-
- /* Calculate checksum of message so far */
- sig = prov_ver_calc(provdata);
- if (signature)
- *signature = sig;
- /* Store signature */
- iax_ie_append_int(provdata, PROV_IE_PROVVER, sig);
- /* Cache signature for later verification so we need not recalculate all this */
- snprintf(tmp, sizeof(tmp), "v0x%08x", sig);
- ast_db_put("iax/provisioning/cache", template, tmp);
- } else
- ast_db_put("iax/provisioning/cache", template, "u");
- ast_mutex_unlock(&provlock);
- return cur ? 0 : -1;
-}
-
-int iax_provision_version(unsigned int *version, const char *template, int force)
-{
- char tmp[80] = "";
- struct iax_ie_data ied;
- int ret=0;
- memset(&ied, 0, sizeof(ied));
-
- ast_mutex_lock(&provlock);
- ast_db_get("iax/provisioning/cache", template, tmp, sizeof(tmp));
- if (sscanf(tmp, "v%x", version) != 1) {
- if (strcmp(tmp, "u")) {
- ret = iax_provision_build(&ied, version, template, force);
- if (ret)
- ast_log(LOG_DEBUG, "Unable to create provisioning packet for '%s'\n", template);
- } else
- ret = -1;
- } else if (option_debug)
- ast_log(LOG_DEBUG, "Retrieved cached version '%s' = '%08x'\n", tmp, *version);
- ast_mutex_unlock(&provlock);
- return ret;
-}
-
-static int iax_template_parse(struct iax_template *cur, struct ast_config *cfg, const char *s, const char *def)
-{
- struct ast_variable *v;
- int foundportno = 0;
- int foundserverportno = 0;
- int x;
- struct in_addr ia;
- struct hostent *hp;
- struct ast_hostent h;
- struct iax_template *src, tmp;
- const char *t;
- if (def) {
- t = ast_variable_retrieve(cfg, s ,"template");
- src = NULL;
- if (t && strlen(t)) {
- src = iax_template_find(t, 0);
- if (!src)
- ast_log(LOG_WARNING, "Unable to find base template '%s' for creating '%s'. Trying '%s'\n", t, s, def);
- else
- def = t;
- }
- if (!src) {
- src = iax_template_find(def, 0);
- if (!src)
- ast_log(LOG_WARNING, "Unable to locate default base template '%s' for creating '%s', omitting.\n", def, s);
- }
- if (!src)
- return -1;
- ast_mutex_lock(&provlock);
- /* Backup old data */
- memcpy(&tmp, cur, sizeof(tmp));
- /* Restore from src */
- memcpy(cur, src, sizeof(tmp));
- /* Restore important headers */
- memcpy(cur->name, tmp.name, sizeof(cur->name));
- cur->dead = tmp.dead;
- cur->next = tmp.next;
- ast_mutex_unlock(&provlock);
- }
- if (def)
- strncpy(cur->src, def, sizeof(cur->src) - 1);
- else
- cur->src[0] = '\0';
- v = ast_variable_browse(cfg, s);
- while(v) {
- if (!strcasecmp(v->name, "port") || !strcasecmp(v->name, "serverport")) {
- if ((sscanf(v->value, "%d", &x) == 1) && (x > 0) && (x < 65535)) {
- if (!strcasecmp(v->name, "port")) {
- cur->port = x;
- foundportno = 1;
- } else {
- cur->serverport = x;
- foundserverportno = 1;
- }
- } else
- ast_log(LOG_WARNING, "Ignoring invalid %s '%s' for '%s' at line %d\n", v->name, v->value, s, v->lineno);
- } else if (!strcasecmp(v->name, "server") || !strcasecmp(v->name, "altserver")) {
- hp = ast_gethostbyname(v->value, &h);
- if (hp) {
- memcpy(&ia, hp->h_addr, sizeof(ia));
- if (!strcasecmp(v->name, "server"))
- cur->server = ntohl(ia.s_addr);
- else
- cur->altserver = ntohl(ia.s_addr);
- } else
- ast_log(LOG_WARNING, "Ignoring invalid %s '%s' for '%s' at line %d\n", v->name, v->value, s, v->lineno);
- } else if (!strcasecmp(v->name, "codec")) {
- if ((x = ast_getformatbyname(v->value)) > 0) {
- cur->format = x;
- } else
- ast_log(LOG_WARNING, "Ignoring invalid codec '%s' for '%s' at line %d\n", v->value, s, v->lineno);
- } else if (!strcasecmp(v->name, "tos")) {
- if (ast_str2tos(v->value, &cur->tos))
- ast_log(LOG_WARNING, "Invalid tos value at line %d, see doc/ip-tos.txt for more information.\n", v->lineno);
- } else if (!strcasecmp(v->name, "user")) {
- strncpy(cur->user, v->value, sizeof(cur->user) - 1);
- if (strcmp(cur->user, v->value))
- ast_log(LOG_WARNING, "Truncating username from '%s' to '%s' for '%s' at line %d\n", v->value, cur->user, s, v->lineno);
- } else if (!strcasecmp(v->name, "pass")) {
- strncpy(cur->pass, v->value, sizeof(cur->pass) - 1);
- if (strcmp(cur->pass, v->value))
- ast_log(LOG_WARNING, "Truncating password from '%s' to '%s' for '%s' at line %d\n", v->value, cur->pass, s, v->lineno);
- } else if (!strcasecmp(v->name, "language")) {
- strncpy(cur->lang, v->value, sizeof(cur->lang) - 1);
- if (strcmp(cur->lang, v->value))
- ast_log(LOG_WARNING, "Truncating language from '%s' to '%s' for '%s' at line %d\n", v->value, cur->lang, s, v->lineno);
- } else if (!strcasecmp(v->name, "flags")) {
- cur->flags = iax_str2flags(v->value);
- } else if (!strncasecmp(v->name, "flags", 5) && strchr(v->name, '+')) {
- cur->flags |= iax_str2flags(v->value);
- } else if (!strncasecmp(v->name, "flags", 5) && strchr(v->name, '-')) {
- cur->flags &= ~iax_str2flags(v->value);
- } else if (strcasecmp(v->name, "template")) {
- ast_log(LOG_WARNING, "Unknown keyword '%s' in definition of '%s' at line %d\n", v->name, s, v->lineno);
- }
- v = v->next;
- }
- if (!foundportno)
- cur->port = IAX_DEFAULT_PORTNO;
- if (!foundserverportno)
- cur->serverport = IAX_DEFAULT_PORTNO;
- return 0;
-}
-
-static int iax_process_template(struct ast_config *cfg, char *s, char *def)
-{
- /* Find an already existing one if there */
- struct iax_template *cur;
- int mallocd = 0;
- cur = templates;
- while(cur) {
- if (!strcasecmp(cur->name, s))
- break;
- cur = cur->next;
- }
- if (!cur) {
- mallocd = 1;
- cur = malloc(sizeof(struct iax_template));
- if (!cur) {
- ast_log(LOG_WARNING, "Out of memory!\n");
- return -1;
- }
- /* Initialize entry */
- memset(cur, 0, sizeof(*cur));
- strncpy(cur->name, s, sizeof(cur->name) - 1);
- cur->dead = 1;
- }
- if (!iax_template_parse(cur, cfg, s, def))
- cur->dead = 0;
-
- /* Link if we're mallocd */
- if (mallocd) {
- ast_mutex_lock(&provlock);
- cur->next = templates;
- templates = cur;
- ast_mutex_unlock(&provlock);
- }
- return 0;
-}
-
-static char show_provisioning_usage[] =
-"Usage: iax list provisioning [template]\n"
-" Lists all known IAX provisioning templates or a\n"
-" specific one if specified.\n";
-
-static const char *ifthere(const char *s)
-{
- if (strlen(s))
- return s;
- else
- return "<unspecified>";
-}
-
-static const char *iax_server(unsigned int addr)
-{
- struct in_addr ia;
-
- if (!addr)
- return "<unspecified>";
-
- ia.s_addr = htonl(addr);
-
- return ast_inet_ntoa(ia);
-}
-
-
-static int iax_show_provisioning(int fd, int argc, char *argv[])
-{
- struct iax_template *cur;
- char server[INET_ADDRSTRLEN];
- char alternate[INET_ADDRSTRLEN];
- char flags[80]; /* Has to be big enough for 'flags' too */
- int found = 0;
- if ((argc != 3) && (argc != 4))
- return RESULT_SHOWUSAGE;
- ast_mutex_lock(&provlock);
- for (cur = templates;cur;cur = cur->next) {
- if ((argc == 3) || (!strcasecmp(argv[3], cur->name))) {
- if (found)
- ast_cli(fd, "\n");
- ast_copy_string(server, iax_server(cur->server), sizeof(server));
- ast_copy_string(alternate, iax_server(cur->altserver), sizeof(alternate));
- ast_cli(fd, "== %s ==\n", cur->name);
- ast_cli(fd, "Base Templ: %s\n", strlen(cur->src) ? cur->src : "<none>");
- ast_cli(fd, "Username: %s\n", ifthere(cur->user));
- ast_cli(fd, "Secret: %s\n", ifthere(cur->pass));
- ast_cli(fd, "Language: %s\n", ifthere(cur->lang));
- ast_cli(fd, "Bind Port: %d\n", cur->port);
- ast_cli(fd, "Server: %s\n", server);
- ast_cli(fd, "Server Port: %d\n", cur->serverport);
- ast_cli(fd, "Alternate: %s\n", alternate);
- ast_cli(fd, "Flags: %s\n", iax_provflags2str(flags, sizeof(flags), cur->flags));
- ast_cli(fd, "Format: %s\n", ast_getformatname(cur->format));
- ast_cli(fd, "TOS: 0x%x\n", cur->tos);
- found++;
- }
- }
- ast_mutex_unlock(&provlock);
- if (!found) {
- if (argc == 3)
- ast_cli(fd, "No provisioning templates found\n");
- else
- ast_cli(fd, "No provisioning template matching '%s' found\n", argv[3]);
- }
- return RESULT_SUCCESS;
-}
-
-static struct ast_cli_entry cli_iax2_provision[] = {
- { { "iax2", "show", "provisioning", NULL },
- iax_show_provisioning, "Display iax provisioning",
- show_provisioning_usage, iax_prov_complete_template, },
-};
-
-static int iax_provision_init(void)
-{
- ast_cli_register_multiple(cli_iax2_provision, sizeof(cli_iax2_provision) / sizeof(struct ast_cli_entry));
- provinit = 1;
- return 0;
-}
-
-int iax_provision_unload(void)
-{
- provinit = 0;
- ast_cli_unregister_multiple(cli_iax2_provision, sizeof(cli_iax2_provision) / sizeof(struct ast_cli_entry));
- return 0;
-}
-
-int iax_provision_reload(void)
-{
- struct ast_config *cfg;
- struct iax_template *cur, *prev, *next;
- char *cat;
- int found = 0;
- if (!provinit)
- iax_provision_init();
- /* Mark all as dead. No need for locking */
- cur = templates;
- while(cur) {
- cur->dead = 1;
- cur = cur->next;
- }
- cfg = ast_config_load("iaxprov.conf");
- if (cfg) {
- /* Load as appropriate */
- cat = ast_category_browse(cfg, NULL);
- while(cat) {
- if (strcasecmp(cat, "general")) {
- iax_process_template(cfg, cat, found ? "default" : NULL);
- found++;
- if (option_verbose > 2)
- ast_verbose(VERBOSE_PREFIX_3 "Loaded provisioning template '%s'\n", cat);
- }
- cat = ast_category_browse(cfg, cat);
- }
- ast_config_destroy(cfg);
- } else
- ast_log(LOG_NOTICE, "No IAX provisioning configuration found, IAX provisioning disabled.\n");
- ast_mutex_lock(&provlock);
- /* Drop dead entries while locked */
- prev = NULL;
- cur = templates;
- while(cur) {
- next = cur->next;
- if (cur->dead) {
- if (prev)
- prev->next = next;
- else
- templates = next;
- free(cur);
- } else
- prev = cur;
- cur = next;
- }
- ast_mutex_unlock(&provlock);
- /* Purge cached signature DB entries */
- ast_db_deltree("iax/provisioning/cache", NULL);
- return 0;
-
-}