Version 0.3.0 from FTP

git-svn-id: http://svn.digium.com/svn/asterisk/trunk@563 f38db490-d61c-443f-a65b-d21fe96a405b

1 files changed, 251 insertions, 0 deletions

diff --git a/apps/app_parkandannounce.c b/apps/app_parkandannounce.c
new file mode 100755
index 000000000..fc18f092f
--- /dev/null
+++ b/apps/app_parkandannounce.c
@@ -0,0 +1,251 @@
+/*
+ * Asterisk -- A telephony toolkit for Linux.
+ *
+ * ParkAndAnnounce application for Asterisk
+ * Author: Ben Miller <bgmiller@dccinc.com>
+ *    With TONS of help from Mark!
+ * 
+ * Asterisk is Copyrighted as follows
+ * Copyright (C) 1999, Mark Spencer
+ *
+ * Mark Spencer <markster@linux-support.net>
+ *
+ * This program is free software, distributed under the terms of
+ * the GNU General Public License
+ */
+
+#include <asterisk/file.h>
+#include <asterisk/logger.h>
+#include <asterisk/channel.h>
+#include <asterisk/channel_pvt.h>
+#include <asterisk/pbx.h>
+#include <asterisk/module.h>
+#include <asterisk/parking.h>
+#include <asterisk/options.h>
+#include <asterisk/logger.h>
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <stdlib.h>
+
+#include <pthread.h>
+
+static char *tdesc = "Call Parking and Announce Application";
+
+static char *app = "ParkAndAnnounce";
+
+static char *synopsis = "Park and Announce";
+
+static char *descrip =
+"  ParkAndAnnounce(announce:template|timeout|dial|[return_context]):\n"
+"Park a call into the parkinglot and announce the call over the console.\n"
+"announce template: colon seperated list of files to announce, the word PARKED\n"
+"                   will be replaced by a say_digits of the ext the call is parked in\n"
+"timeout: time in seconds before the call returns into the return context.\n"
+"dial: The app_dial style resource to call to make the announcement. Console/dsp calls the console.\n"
+"return_context: the goto style label to jump the call back into after timeout. default=prio+1\n";
+
+
+STANDARD_LOCAL_USER;
+
+LOCAL_USER_DECL;
+
+static int parkandannounce_exec(struct ast_channel *chan, void *data)
+{
+  int res=0;
+  char *return_context;
+  int l, lot, timeout, dres;
+  char *working, *context, *exten, *priority, *dial, *dialtech, *dialstr;
+  char *template, *tpl_working, *tpl_current;
+  char *tmp[100];
+  int looptemp=0,i=0;
+  char *s,*orig_s;
+
+  struct ast_channel *dchan;
+  int outstate;
+
+  struct localuser *u;
+  if (!data) {
+    ast_log(LOG_WARNING, "Park requires an argument (parkinglot)\n");
+    return -1;
+  }
+  
+  l=strlen(data)+2;
+  orig_s=malloc(l);
+  s=orig_s;
+  strncpy(s,data,l);
+
+  template=strsep(&s,"|");
+  if (! template) {
+    ast_log(LOG_WARNING, "PARK: An announce template must be defined\n");
+    free(orig_s);
+    return -1;
+  }
+  
+  timeout = atoi(strsep(&s, "|"));
+  timeout *= 1000;
+
+  dial=strsep(&s, "|");
+  if (! dial) {
+    ast_log(LOG_WARNING, "PARK: A dial resouce must be specified i.e: Console/dsp or Zap/g1/5551212\n");
+    free(orig_s);
+    return -1;
+  }
+  else {
+    dialtech=strsep(&dial, "/");
+    dialstr=dial;
+    ast_verbose( VERBOSE_PREFIX_3 "Dial Tech,String: (%s,%s)\n", dialtech,dialstr);
+  }
+
+  return_context = s;
+  
+  if (return_context != NULL) {
+    /* set the return context. Code borrowed from the Goto builtin */
+    
+    working = return_context;
+    context = strsep(&working, "|");
+    exten = strsep(&working, "|");
+    if (!exten) {
+      /* Only a priority in this one */
+      priority = context;
+      exten = NULL;
+      context = NULL;
+    } else {
+      priority = strsep(&working, "|");
+      if (!priority) {
+	/* Only an extension and priority in this one */
+	priority = exten;
+	exten = context;
+	context = NULL;
+      }
+    }
+    if (atoi(priority) < 0) {
+      ast_log(LOG_WARNING, "Priority '%s' must be a number > 0\n", priority);
+      free(orig_s);
+      return -1;
+    }
+    /* At this point we have a priority and maybe an extension and a context */
+    chan->priority = atoi(priority);
+    if (exten && strcasecmp(exten, "BYEXTENSION"))
+      strncpy(chan->exten, exten, sizeof(chan->exten)-1);
+    if (context)
+      strncpy(chan->context, context, sizeof(chan->context)-1);
+  }
+  else {  /* increment the priority by default*/
+    chan->priority++;
+  }
+
+
+  if (option_verbose > 2) {
+    ast_verbose( VERBOSE_PREFIX_3 "Return Context: (%s,%s,%d) ID: %s\n", chan->context,chan->exten, chan->priority, chan->callerid);
+    if (!ast_exists_extension(chan, chan->context, chan->exten, chan->priority, chan->callerid)) {
+      ast_verbose( VERBOSE_PREFIX_3 "Warning: Return Context Invalid, call will return to default|s\n");
+    }
+  }
+  
+  LOCAL_USER_ADD(u);
+
+  /* we are using masq_park here to protect * from touching the channel once we park it.  If the channel comes out of timeout
+     before we are done announcing and the channel is messed with, Kablooeee.  So we use Masq to prevent this.  */
+
+  ast_masq_park_call(chan, NULL, timeout, &lot);
+
+  res=-1; 
+
+  ast_verbose( VERBOSE_PREFIX_3 "Call Parking Called, lot: %d, timeout: %d, context: %s\n", lot, timeout, return_context);
+
+  /* Now place the call to the extention */
+
+  dchan = ast_request_and_dial(dialtech, AST_FORMAT_SLINEAR, dialstr,30000, &outstate, chan->callerid);
+
+  if (dchan) {
+    if (dchan->_state == AST_STATE_UP) {
+      if (option_verbose > 3)
+	ast_verbose(VERBOSE_PREFIX_4 "Channel %s was answered.\n", dchan->name);
+    } else {
+      if (option_verbose > 3)
+	ast_verbose(VERBOSE_PREFIX_4 "Channel %s was never answered.\n", dchan->name);
+        ast_log(LOG_WARNING, "PARK: Channel %s was never answered for the announce.\n", dchan->name);
+      ast_hangup(dchan);
+      free(orig_s);
+      LOCAL_USER_REMOVE(u);
+      return -1;
+    }
+  }
+  else {
+    ast_log(LOG_WARNING, "PARK: Unable to allocate announce channel.\n");
+    free(orig_s);
+    LOCAL_USER_REMOVE(u);
+    return -1; 
+  }
+
+  ast_stopstream(dchan);
+
+  /* now we have the call placed and are ready to play stuff to it */
+
+  ast_verbose(VERBOSE_PREFIX_4 "Announce Template:%s\n", template);
+
+  tpl_working = template;
+  tpl_current=strsep(&tpl_working, ":");
+
+  while ( tpl_current && looptemp < sizeof(tmp)) {
+    tmp[looptemp]=tpl_current;
+    looptemp++;
+    tpl_current=strsep(&tpl_working,":");
+  }
+
+  for(i=0; i<looptemp; i++) {
+    ast_verbose(VERBOSE_PREFIX_4 "Announce:%s\n", tmp[i]);
+    if (!strcmp(tmp[i], "PARKED")) {
+      ast_say_digits(dchan, lot, "", dchan->language);
+    }
+    else {
+      dres = ast_streamfile(dchan, tmp[i], dchan->language);
+      if (!dres)
+	dres = ast_waitstream(dchan, "");
+      else {
+	ast_log(LOG_WARNING, "ast_streamfile of %s failed on %s\n", tmp[i], dchan->name);
+	dres = 0;
+      }
+    }
+  }
+
+  ast_stopstream(dchan);  
+  ast_hangup(dchan);
+
+  LOCAL_USER_REMOVE(u);
+  free(orig_s);
+  return res;
+}
+
+
+
+int unload_module(void)
+{
+	STANDARD_HANGUP_LOCALUSERS;
+	return ast_unregister_application(app);
+}
+
+int load_module(void)
+{
+  /*	return ast_register_application(app, park_exec); */
+  return ast_register_application(app, parkandannounce_exec, synopsis, descrip);
+}
+
+char *description(void)
+{
+	return tdesc;
+}
+
+int usecount(void)
+{
+	int res;
+	STANDARD_USECOUNT(res);
+	return res;
+}
+
+char *key()
+{
+	return ASTERISK_GPL_KEY;
+}