Merge branch 'master' of ssh://jolly@www.mISDN.org/var/git/lcr
[lcr.git] / chan_lcr.c
index 9216699..6458de5 100644 (file)
@@ -40,13 +40,43 @@ with that reference.
 #include <sys/ioctl.h>
 #include <sys/socket.h>
 #include <sys/un.h>
+
+#include <pthread.h>
+#include <semaphore.h>
+
 #include "extension.h"
 #include "message.h"
-#include "admin.h"
+#include "lcrsocket.h"
 #include "cause.h"
 #include "bchannel.h"
 #include "chan_lcr.h"
 
+
+
+#include <asterisk/module.h>
+#include <asterisk/channel.h>
+#include <asterisk/config.h>
+#include <asterisk/logger.h>
+#include <asterisk/pbx.h>
+#include <asterisk/options.h>
+#include <asterisk/io.h>
+#include <asterisk/frame.h>
+#include <asterisk/translate.h>
+#include <asterisk/cli.h>
+#include <asterisk/musiconhold.h>
+#include <asterisk/dsp.h>
+#include <asterisk/translate.h>
+#include <asterisk/file.h>
+#include <asterisk/callerid.h>
+#include <asterisk/indications.h>
+#include <asterisk/app.h>
+#include <asterisk/features.h>
+#include <asterisk/sched.h>
+
+int lcr_debug=1;
+int mISDN_created=1;
+
+
 int lcr_sock = -1;
 
 struct admin_list {
@@ -112,6 +142,28 @@ void free_call(struct chan_call *call)
        }
 }
 
+unsigned short new_brige_id(void)
+{
+       struct chan_call *call;
+       unsigned short id = 1;
+
+       /* search for lowest bridge id that is not in use and not 0 */
+       while(id)
+       {
+               call = call_first;
+               while(call)
+               {
+                       if (call->bridge_id == id)
+                               break;
+                       call = call->next;
+               }
+               if (!call)
+                       break;
+               id++;
+       }
+       return(id);
+}
+
 
 /*
  * receive bchannel data
@@ -163,14 +215,14 @@ int receive_message(int message_type, unsigned long ref, union parameter *param)
                        case BCHANNEL_ASSIGN:
                        if ((bchannel = find_bchannel_handle(param->bchannel.handle)))
                        {
-                               fprintf(stderr, "error: bchannel handle %x already assigned.\n", param->bchannel.handle);
+                               fprintf(stderr, "error: bchannel handle %x already assigned.\n", (int)param->bchannel.handle);
                                return(-1);
                        }
                        /* create bchannel */
                        bchannel = alloc_bchannel(param->bchannel.handle);
                        if (!bchannel)
                        {
-                               fprintf(stderr, "error: alloc bchannel handle %x failed.\n", param->bchannel.handle);
+                               fprintf(stderr, "error: alloc bchannel handle %x failed.\n", (int)param->bchannel.handle);
                                return(-1);
                        }
 
@@ -195,6 +247,8 @@ int receive_message(int message_type, unsigned long ref, union parameter *param)
                        {
                                bchannel->ref = ref;
                                call->bchannel_handle = param->bchannel.handle;
+#warning hier muesen alle stati gesetzt werden falls sie vor dem b-kanal verfügbar waren
+                               bchannel_join(bchannel, call->bridge_id);
                        }
                        if (bchannel_create(bchannel))
                                bchannel_activate(bchannel, 1);
@@ -208,8 +262,8 @@ int receive_message(int message_type, unsigned long ref, union parameter *param)
                        case BCHANNEL_REMOVE:
                        if (!(bchannel = find_bchannel_handle(param->bchannel.handle)))
                        {
-                               alle fprintf nach ast_log
-                               fprintf(stderr, "error: bchannel handle %x not assigned.\n", param->bchannel.handle);
+                               #warning alle fprintf nach ast_log
+                               fprintf(stderr, "error: bchannel handle %x not assigned.\n", (int)param->bchannel.handle);
                                return(-1);
                        }
                        /* unlink from call */
@@ -281,56 +335,56 @@ int receive_message(int message_type, unsigned long ref, union parameter *param)
        switch(message_type)
        {
                case MESSAGE_SETUP:
-todo
+#warning todo
                break;
 
                case MESSAGE_OVERLAP:
-todo
+#warning todo
                break;
 
                case MESSAGE_PROCEEDING:
-todo
+#warning todo
                break;
 
                case MESSAGE_ALERTING:
-todo
+#warning todo
                break;
 
                case MESSAGE_CONNECT:
-todo
+#warning todo
                break;
 
                case MESSAGE_DISCONNECT:
-todo
+#warning todo
                break;
 
                case MESSAGE_RELEASE:
-todo
+#warning todo
                free_call(call);
                return(0);
 
                case MESSAGE_INFORMATION:
-todo
+#warning todo
                break;
 
                case MESSAGE_FACILITY:
-todo
+#warning todo
                break;
 
                case MESSAGE_PATTERN:
-todo
+#warning todo
                break;
 
                case MESSAGE_NOPATTERN:
-todo
+#warning todo
                break;
 
                case MESSAGE_AUDIOPATH:
-todo
+#warning todo
                break;
 
                default:
-unhandled
+#warning unhandled
        }
        return(0);
 }
@@ -347,6 +401,9 @@ int handle_socket(void)
        struct admin_message msg;
        struct admin_list *admin;
 
+       int sock;
+
+       #warning SOCKET FEHLT!
        /* read from socket */
        len = read(sock, &msg, sizeof(msg));
        if (len == 0)
@@ -422,7 +479,6 @@ int open_socket(void)
        char *socket_name = SOCKET_NAME;
        int conn;
        struct sockaddr_un sock_address;
-       int ret;
        unsigned long on = 1;
        union parameter param;
 
@@ -479,7 +535,7 @@ void lcr_thread(void)
                work = 0;
 
                /* handle socket */
-               ret = handle_socket();
+               int ret = handle_socket();
                if (ret < 0)
                        break;
                if (ret)
@@ -495,24 +551,188 @@ void lcr_thread(void)
        }
 }
 
-static struct ast_channel_tech misdn_tech = {
+static struct ast_channel *lcr_request(const char *type, int format, void *data, int *cause)
+{
+
+}
+
+
+/* call from asterisk (new instance) */
+static int lcr_call(struct ast_channel *ast, char *dest, int timeout)
+{
+        struct lcr_pvt *lcr=ast->tech_pvt;
+
+        if (!lcr) return -1;
+
+        char buf[128];
+        char *port_str, *dad, *p;
+
+        ast_copy_string(buf, dest, sizeof(buf)-1);
+        p=buf;
+        port_str=strsep(&p, "/");
+        dad=strsep(&p, "/");
+
+        if (lcr_debug)
+                ast_verbose("Call: ext:%s dest:(%s) -> dad(%s) \n", ast->exten,dest, dad);
+
+
+       return 0; 
+}
+
+static int lcr_answer(struct ast_channel *c)
+{
+        struct lcr_pvt *lcr=c->tech_pvt;
+        return 0;
+}
+
+static int lcr_hangup(struct ast_channel *c)
+{
+        struct lcr_pvt *lcr=c->tech_pvt;
+       c->tech_pvt=NULL;
+}
+
+
+static int lcr_write(struct ast_channel *c, struct ast_frame *f)
+{
+        struct lcr_pvt *lcrm= c->tech_pvt;
+}
+
+
+static struct ast_frame *lcr_read(struct ast_channel *c)
+{
+        struct lcr_pvt *lcr = c->tech_pvt;
+}
+
+static int lcr_indicate(struct ast_channel *c, int cond, const void *data, size_t datalen)
+{
+        int res = -1;
+
+        switch (cond) {
+                case AST_CONTROL_BUSY:
+                case AST_CONTROL_CONGESTION:
+                case AST_CONTROL_RINGING:
+                        return -1;
+                case -1:
+                        return 0;
+
+                case AST_CONTROL_VIDUPDATE:
+                        res = -1;
+                        break;
+                case AST_CONTROL_HOLD:
+                        ast_verbose(" << Console Has Been Placed on Hold >> \n");
+                        //ast_moh_start(c, data, g->mohinterpret);
+                        break;
+                case AST_CONTROL_UNHOLD:
+                        ast_verbose(" << Console Has Been Retrieved from Hold >> \n");
+                        //ast_moh_stop(c);
+                        break;
+
+                default:
+                        ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, c->name);
+                        return -1;
+        }
+
+        return 0;
+}
+
+static struct ast_channel_tech lcr_tech = {
        .type="lcr",
        .description="Channel driver for connecting to Linux-Call-Router",
-       .capabilities= je nach option?AST_FORMAT_ALAW:AST_FORMAT_ULAW ,
+       .capabilities=AST_FORMAT_ALAW,
        .requester=lcr_request,
-       .send_digit=lcr_digit,
+//     .send_digit=lcr_digit,
        .call=lcr_call,
-       .bridge=lcr_bridge, 
+//     .bridge=lcr_bridge, 
        .hangup=lcr_hangup,
        .answer=lcr_answer,
        .read=lcr_read,
        .write=lcr_write,
-       .indicate=lcr_indication,
-       .fixup=lcr_fixup,
-       .send_text=lcr_send_text,
+       .indicate=lcr_indicate,
+//     .fixup=lcr_fixup,
+//     .send_text=lcr_send_text,
        .properties=0
 };
 
+/*
+ * cli
+ */
+static int cli_show_lcr (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_show_calls (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_reload_routing (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_reload_interfaces (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_port_block (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_port_unblock (int fd, int argc, char *argv[])
+{
+}
+
+static int cli_port_unload (int fd, int argc, char *argv[])
+{
+}
+
+static struct ast_cli_entry cli_show_lcr =
+{ {"lcr", "show", "lcr", NULL},
+ lcr_show_lcr,
+ "Shows current states of LCR core",
+ "Usage: lcr show lcr\n",
+};
+
+static struct ast_cli_entry cli_show_calls =
+{ {"lcr", "show", "calls", NULL},
+ lcr_show_calls,
+ "Shows current calls made by LCR and Asterisk",
+ "Usage: lcr show calls\n",
+};
+
+static struct ast_cli_entry cli_reload_routing =
+{ {"lcr", "reload", "routing", NULL},
+ lcr_reload_routing,
+ "Reloads routing conf of LCR, current uncomplete calls will be disconnected",
+ "Usage: lcr reload routing\n",
+};
+
+static struct ast_cli_entry cli_reload_interfaces =
+{ {"lcr", "reload", "interfaces", NULL},
+ lcr_reload_interfaces,
+ "Reloads interfaces conf of LCR",
+ "Usage: lcr reload interfaces\n",
+};
+
+static struct ast_cli_entry cli_port_block =
+{ {"lcr", "port", "block", NULL},
+ lcr_port_block,
+ "Blocks LCR port for further calls",
+ "Usage: lcr port block \"<port>\"\n",
+};
+
+static struct ast_cli_entry cli_port_unblock =
+{ {"lcr", "port", "unblock", NULL},
+ lcr_port_unblock,
+ "Unblocks or loads LCR port, port is opened my mISDN",
+ "Usage: lcr port unblock \"<port>\"\n",
+};
+
+static struct ast_cli_entry cli_port_unload =
+{ {"lcr", "port", "unload", NULL},
+ lcr_port_unload,
+ "Unloads LCR port, port is closes by mISDN",
+ "Usage: lcr port unload \"<port>\"\n",
+};
+
 
 /*
  * module loading and destruction
@@ -524,30 +744,31 @@ int load_module(void)
 //     lcr_cfg_update_ptp();
 
        if (!(lcr_sock = open_socket())) {
-               ast_log(LOG_ERROR, "Unable to connect %s\n", misdn_type);
+               ast_log(LOG_ERROR, "Unable to connect\n");
                lcr_sock = -1;
                /* continue with closed socket */
        }
 
        if (!bchannel_initialize()) {
                ast_log(LOG_ERROR, "Unable to open mISDN device\n");
-               unload_module();
                return -1;
        }
        mISDN_created = 1;
 
        if (ast_channel_register(&lcr_tech)) {
-               ast_log(LOG_ERROR, "Unable to register channel class %s\n", misdn_type);
-               unload_module();
+               ast_log(LOG_ERROR, "Unable to register channel class\n");
                return -1;
        }
-  
-       ast_cli_register(&cli_show_cls);
-       ast_cli_register(&cli_show_cl);
-       ast_cli_register(&cli_show_config);
-
-       ast_cli_register(&cli_reload);
-
+#if 0  
+       ast_cli_register(&cli_show_lcr);
+       ast_cli_register(&cli_show_calls);
+
+       ast_cli_register(&cli_reload_routing);
+       ast_cli_register(&cli_reload_interfaces);
+       ast_cli_register(&cli_port_block);
+       ast_cli_register(&cli_port_unblock);
+       ast_cli_register(&cli_port_unload);
   
        ast_register_application("misdn_set_opt", misdn_set_opt_exec, "misdn_set_opt",
                                 "misdn_set_opt(:<opt><optarg>:<opt><optarg>..):\n"
@@ -569,6 +790,9 @@ int load_module(void)
        lcr_cfg_get( 0, LCR_GEN_TRACEFILE, global_tracefile, BUFFERSIZE);
 
        chan_lcr_log(0, 0, "-- mISDN Channel Driver Registred -- (BE AWARE THIS DRIVER IS EXPERIMENTAL!)\n");
+=======
+       //lcr_cfg_get( 0, LCR_GEN_TRACEFILE, global_tracefile, BUFFERSIZE);
+#endif
 
        return 0;
 }
@@ -578,16 +802,7 @@ int unload_module(void)
        /* First, take us out of the channel loop */
        ast_log(LOG_VERBOSE, "-- Unregistering mISDN Channel Driver --\n");
        
-       misdn_tasks_destroy();
-       
-       if (!g_config_initialized) return 0;
        
-       ast_cli_unregister(&cli_show_cls);
-       ast_cli_unregister(&cli_show_cl);
-       ast_cli_unregister(&cli_show_config);
-       ast_cli_unregister(&cli_reload);
-       ast_unregister_application("misdn_set_opt");
-  
        ast_channel_unregister(&lcr_tech);
 
        if (mISDN_created) {
@@ -600,18 +815,19 @@ int unload_module(void)
                lcr_sock = -1;
        }
 
-       was ist mit dem mutex
-       
        return 0;
 }
 
-int reload(void)
+static int reload_module(void)
 {
-       reload_config();
-
+//     reload_config();
        return 0;
 }
 
+
+ast_mutex_t usecnt_lock;
+int usecnt;
+
 int usecount(void)
 {
        int res;
@@ -621,6 +837,9 @@ int usecount(void)
        return res;
 }
 
+
+char *desc="Channel driver for lcr";
+
 char *description(void)
 {
        return desc;
@@ -631,4 +850,12 @@ char *key(void)
        return ASTERISK_GPL_KEY;
 }
 
+#define AST_MODULE "chan_lcr"
+AST_MODULE_INFO(ASTERISK_GPL_KEY,
+                                AST_MODFLAG_DEFAULT,
+                                "Channel driver for lcr",
+                                .load = load_module,
+                                .unload = unload_module,
+                                .reload = reload_module,
+                           );