add experimental mISDN channel driver (issue #4077)

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

5 files changed, 5401 insertions, 0 deletions

diff --git a/channels/Makefile b/channels/Makefile
index 56cc531f8..068cbe14b 100755
--- a/channels/Makefile
+++ b/channels/Makefile
@@ -69,6 +69,10 @@ ifneq ($(wildcard h323/libchanh323.a),)
   CHANNEL_LIBS+=chan_h323.so
 endif
 
+ifneq ($(wildcard misdn/chan_misdn_lib.a),)
+  CHANNEL_LIBS+=chan_misdn.so
+endif
+
 CFLAGS+=-Wno-missing-prototypes -Wno-missing-declarations
 
 ifneq ($(wildcard $(CROSS_COMPILE_TARGET)/usr/include/alsa/asoundlib.h),)
@@ -146,6 +150,10 @@ ifneq ($(wildcard h323/Makefile.ast),)
   include h323/Makefile.ast
 endif
 
+ifneq ($(wildcard misdn/Makefile.ast),)
+  include misdn/Makefile.ast
+endif
+
 gentone: gentone.c
 	$(HOST_CC) -o gentone gentone.c -lm
 
@@ -205,6 +213,12 @@ chan_h323.so: chan_h323.o h323/libchanh323.a
 	$(CC) $(SOLINK) -o $@ $< h323/libchanh323.a $(CHANH323LIB) -L$(PWLIBDIR)/lib $(PTLIB) -L$(OPENH323DIR)/lib $(H323LIB) -L/usr/lib -lcrypto -lssl -lexpat
 endif
 
+chan_misdn.so: chan_misdn.o chan_misdn_config.o misdn/chan_misdn_lib.a
+	$(CC) -shared -Xlinker -x -o $@ $^ $(MISDNUSER)/i4lnet/libisdnnet.a $(MISDNUSER)/lib/libmISDN.a 
+
+chan_misdn_config.o: chan_misdn_config.c
+	$(CC) $(CFLAGS) -c chan_misdn_config.c
+
 
 #chan_modem.so : chan_modem.o
 #	$(CC) -rdynamic -shared -Xlinker -x -o $@ $<
diff --git a/channels/chan_misdn.c b/channels/chan_misdn.c
new file mode 100755
index 000000000..1561e558d
--- /dev/null
+++ b/channels/chan_misdn.c
@@ -0,0 +1,3700 @@
+/*
+ * Chan_Misdn -- Channel Driver for Asterisk
+ *
+ * Interface to Asterisk
+ *
+ * Copyright (C) 2004, Christian Richter
+ *
+ * Christian Richter <crich@beronet.com>
+ *
+ * This program is free software, distributed under the terms of
+ * the GNU General Public License
+ */
+
+#include <stdio.h>
+#include <pthread.h>
+#include <string.h>
+#include <sys/socket.h>
+#include <sys/time.h>
+#include <errno.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <arpa/inet.h>
+#include <fcntl.h>
+#include <sys/ioctl.h>
+#include <sys/file.h>
+
+#include <asterisk/channel.h>
+#include <asterisk/config.h>
+#include <asterisk/logger.h>
+#include <asterisk/module.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/config.h>
+#include <asterisk/file.h>
+#include <asterisk/callerid.h>
+#include <asterisk/indications.h>
+#include <asterisk/app.h>
+#include <asterisk/features.h>
+
+#include "chan_misdn_config.h"
+#include "isdn_lib.h"
+
+pthread_mutex_t release_lock_mutex;
+
+#define release_lock ast_mutex_lock(&release_lock_mutex)
+#define release_unlock ast_mutex_unlock(&release_lock_mutex)
+
+
+/* BEGIN: chan_misdn.h */
+
+enum misdn_chan_state {
+	MISDN_NOTHING, /* at beginning */
+	MISDN_WAITING4DIGS, /*  when waiting for infos */
+	MISDN_EXTCANTMATCH, /*  when asterisk couldnt match our ext */
+	MISDN_DIALING, /*  when pbx_start */
+	MISDN_PROGRESS, /*  we got a progress */
+	MISDN_CALLING, /*  when misdn_call is called */
+	MISDN_CALLING_ACKNOWLEDGE, /*  when we get SETUP_ACK */
+	MISDN_ALERTING, /*  when Alerting */
+	MISDN_BUSY, /*  when BUSY */
+	MISDN_CONNECTED, /*  when connected */
+	MISDN_BRIDGED, /*  when bridged */
+	MISDN_CLEANING, /* when hangup from * but we were connected before */
+	MISDN_HUNGUP_FROM_MISDN, /* when DISCONNECT/RELEASE/REL_COMP  cam from misdn */
+	MISDN_HUNGUP_FROM_AST, /* when DISCONNECT/RELEASE/REL_COMP came out of */
+	/* misdn_hangup */
+	MISDN_HOLDED, /* if this chan is holded */
+	MISDN_HOLD_DISCONNECT /* if this chan is holded */
+  
+};
+
+#define ORG_AST 1
+#define ORG_MISDN 2
+
+struct chan_list {
+  
+	sem_t sem;
+	pthread_mutex_t lock;
+
+	pthread_t *audio_thread;
+  
+	enum misdn_chan_state state;
+	int holded; 
+	int orginator;
+
+	int norxtone;
+	int notxtone; 
+
+	int pipe[2];
+	char ast_rd_buf[4096];
+	struct ast_frame frame;
+
+	int faxdetect;
+	int faxhandled;
+
+	int ast_dsp;
+	
+	struct ast_dsp *dsp;
+	struct ast_trans_pvt *trans;
+  
+	struct ast_channel * ast;
+  
+	struct misdn_bchannel *bc;
+	struct misdn_bchannel *holded_bc;
+
+	unsigned int l3id;
+	int addr;
+	
+	struct chan_list *peer;
+	struct chan_list *next;
+	struct chan_list *prev;
+	struct chan_list *first;
+};
+
+struct robin_list {
+	char *group;
+	int port;
+	int channel;
+	struct robin_list *next;
+	struct robin_list *prev;
+};
+static struct robin_list *robin = NULL;
+
+static inline void free_robin_list_r (struct robin_list *r)
+{
+	if (r) {
+		if (r->next) free_robin_list_r(r->next);
+		if (r->group) free(r->group);
+		free(r);
+	}
+}
+
+static void free_robin_list ()
+{
+	free_robin_list_r(robin);
+}
+
+struct robin_list* get_robin_position (char *group) 
+{
+	struct robin_list *iter = robin;
+	for (; iter; iter = iter->next) {
+		if (!strcasecmp(iter->group, group))
+			return iter;
+	}
+	struct robin_list *new = (struct robin_list *)calloc(1, sizeof(struct robin_list));
+	new->group = strndup(group, strlen(group));
+	new->channel = 1;
+	if (robin) {
+		new->next = robin;
+		robin->prev = new;
+	}
+	robin = new;
+	return robin;
+}
+
+struct ast_channel *misdn_new(struct chan_list *cl, int state, char * name, char * context, char *exten, char *callerid, int format, int port, int c);
+void send_digit_to_chan(struct chan_list *cl, char digit );
+
+
+#define AST_CID_P(ast) ast->cid.cid_num
+#define AST_BRIDGED_P(ast) ast_bridged_channel(ast) 
+#define AST_LOAD_CFG ast_config_load
+#define AST_DESTROY_CFG ast_config_destroy
+
+/* END: chan_misdn.h */
+
+#include <asterisk/strings.h>
+
+/* #define MISDN_DEBUG 1 */
+
+static  char *desc = "Channel driver for mISDN Support (Bri/Pri)";
+static  char *type = "mISDN";
+
+int tracing = 0 ;
+
+static int usecnt=0;
+
+char **misdn_key_vector=NULL;
+int misdn_key_vector_size=0;
+
+/* Only alaw and mulaw is allowed for now */
+static int prefformat =  AST_FORMAT_ALAW ; /*  AST_FORMAT_SLINEAR ;  AST_FORMAT_ULAW | */
+
+static ast_mutex_t usecnt_lock; 
+
+int *misdn_debug;
+int *misdn_debug_only;
+int max_ports;
+
+struct chan_list dummy_cl;
+
+struct chan_list *cl_te=NULL;
+pthread_mutex_t cl_te_lock;
+
+enum event_response_e
+cb_events(enum event_e event, struct misdn_bchannel *bc, void *user_data);
+
+void send_cause2ast(struct ast_channel *ast, struct misdn_bchannel*bc);
+
+void cl_queue_chan(struct chan_list **list, struct chan_list *chan);
+void cl_dequeue_chan(struct chan_list **list, struct chan_list *chan);
+struct chan_list *find_chan_by_bc(struct chan_list *list, struct misdn_bchannel *bc);
+void * audio_thread( void * data);
+void chan_misdn_log(int level, int port, char *tmpl, ...);
+void chan_misdn_trace_call(struct ast_channel *chan, int debug, char *tmpl, ...);
+
+static int start_bc_tones(struct chan_list *cl);
+static int stop_bc_tones(struct chan_list *cl);
+static void release_chan(struct misdn_bchannel *bc);
+
+static int misdn_set_opt_exec(struct ast_channel *chan, void *data);
+static int misdn_facility_exec(struct ast_channel *chan, void *data);
+
+/*************** Helpers *****************/
+
+static struct chan_list * get_chan_by_ast(struct ast_channel *ast)
+{
+	struct chan_list *tmp;
+  
+	for (tmp=cl_te; tmp; tmp = tmp->next) {
+		if ( tmp->ast == ast ) return tmp;
+	}
+  
+	return NULL;
+}
+
+static struct chan_list * get_chan_by_ast_name(char *name)
+{
+	struct chan_list *tmp;
+  
+	for (tmp=cl_te; tmp; tmp = tmp->next) {
+		if ( tmp->ast  && strcmp(tmp->ast->name,name) == 0) return tmp;
+	}
+  
+	return NULL;
+}
+
+static char* tone2str(struct misdn_bchannel *bc)
+{
+	static struct {
+		char name[16];
+		enum tone_e tone;
+	} *tone, tone_buf[] = {
+		{"NOTONE",TONE_NONE},
+		{"DIAL",TONE_DIAL},
+		{"BUSY",TONE_BUSY},
+		{"ALERT",TONE_ALERTING},
+		{"",TONE_NONE}
+	};
+  
+  
+	for (tone=&tone_buf[0]; tone->name[0]; tone++) {
+		if (tone->tone == bc->tone) return tone->name;
+	}
+	return NULL;
+}
+
+static char *bearer2str(int cap) {
+	static char *bearers[]={
+		"Speech",
+		"Audio 3.1k",
+		"Unres Digital",
+		"Res Digital",
+		"Unknown Bearer"
+	};
+	
+	switch (cap) {
+	case INFO_CAPABILITY_SPEECH:
+		return bearers[0];
+		break;
+	case INFO_CAPABILITY_AUDIO_3_1K:
+		return bearers[1];
+		break;
+	case INFO_CAPABILITY_DIGITAL_UNRESTRICTED:
+		return bearers[2];
+		break;
+	case INFO_CAPABILITY_DIGITAL_RESTRICTED:
+		return bearers[3];
+		break;
+	default:
+		return bearers[4];
+		break;
+	}
+}
+
+static void print_bearer(struct misdn_bchannel *bc) 
+{
+
+	chan_misdn_log(2, bc->stack->port, " --> Bearer: %s\n",bearer2str(bc->capability));
+	
+	switch(bc->law) {
+	case INFO_CODEC_ALAW:
+		chan_misdn_log(2, bc->stack->port, " --> Codec: Alaw\n");
+		break;
+	case INFO_CODEC_ULAW:
+		chan_misdn_log(2, bc->stack->port, " --> Codec: Ulaw\n");
+		break;
+	}
+}
+/*************** Helpers END *************/
+
+void send_digit_to_chan(struct chan_list *cl, char digit )
+{
+	static const char* dtmf_tones[] = {
+		"!941+1336/100,!0/100",	/* 0 */
+		"!697+1209/100,!0/100",	/* 1 */
+		"!697+1336/100,!0/100",	/* 2 */
+		"!697+1477/100,!0/100",	/* 3 */
+		"!770+1209/100,!0/100",	/* 4 */
+		"!770+1336/100,!0/100",	/* 5 */
+		"!770+1477/100,!0/100",	/* 6 */
+		"!852+1209/100,!0/100",	/* 7 */
+		"!852+1336/100,!0/100",	/* 8 */
+		"!852+1477/100,!0/100",	/* 9 */
+		"!697+1633/100,!0/100",	/* A */
+		"!770+1633/100,!0/100",	/* B */
+		"!852+1633/100,!0/100",	/* C */
+		"!941+1633/100,!0/100",	/* D */
+		"!941+1209/100,!0/100",	/* * */
+		"!941+1477/100,!0/100" };	/* # */
+	struct ast_channel *chan=cl->ast; 
+  
+	if (digit >= '0' && digit <='9')
+		ast_playtones_start(chan,0,dtmf_tones[digit-'0'], 0);
+	else if (digit >= 'A' && digit <= 'D')
+		ast_playtones_start(chan,0,dtmf_tones[digit-'A'+10], 0);
+	else if (digit == '*')
+		ast_playtones_start(chan,0,dtmf_tones[14], 0);
+	else if (digit == '#')
+		ast_playtones_start(chan,0,dtmf_tones[15], 0);
+	else {
+		/* not handled */
+		ast_log(LOG_DEBUG, "Unable to handle DTMF tone '%c' for '%s'\n", digit, chan->name);
+    
+    
+	}
+}
+/*** CLI HANDLING ***/
+static int misdn_set_debug(int fd, int argc, char *argv[])
+{
+	if (argc != 4 && argc != 5 && argc != 6 && argc != 7)
+		return RESULT_SHOWUSAGE; 
+
+	int level = atoi(argv[3]);
+
+	switch (argc) {
+		case 4:	
+		case 5: {
+					int only = 0;
+					if (argc == 5) {
+						if (strncasecmp(argv[4], "only", strlen(argv[4])))
+							return RESULT_SHOWUSAGE;
+						else
+							only = 1;
+					}
+					int i;
+					for (i=0; i<=max_ports; i++) {
+						misdn_debug[i] = level;
+						misdn_debug_only[i] = only;
+					}
+					ast_cli(fd, "changing debug level for all ports to %d%s\n",misdn_debug[0], only?" (only)":"");
+				}
+				break;
+		case 6: 
+		case 7: {
+					if (strncasecmp(argv[4], "port", strlen(argv[4])))
+						return RESULT_SHOWUSAGE;
+					int port = atoi(argv[5]);
+					if (port <= 0 || port > max_ports) {
+						switch (max_ports) {
+							case 0:
+								ast_cli(fd, "port number not valid! no ports available so you won't get lucky with any number here...\n");
+								break;
+							case 1:
+								ast_cli(fd, "port number not valid! only port 1 is availble.\n");
+								break;
+							default:
+								ast_cli(fd, "port number not valid! only ports 1 to %d are available.\n", max_ports);
+							}
+							return 0;
+					}
+					if (argc == 7) {
+						if (strncasecmp(argv[6], "only", strlen(argv[6])))
+							return RESULT_SHOWUSAGE;
+						else
+							misdn_debug_only[port] = 1;
+					} else
+						misdn_debug_only[port] = 0;
+					misdn_debug[port] = level;
+					ast_cli(fd, "changing debug level to %d%s for port %d\n", misdn_debug[port], misdn_debug_only[port]?" (only)":"", port);
+				}
+	}
+	return 0;
+}
+
+
+static int misdn_set_crypt_debug(int fd, int argc, char *argv[])
+{
+	if (argc != 5 )return RESULT_SHOWUSAGE; 
+
+	return 0;
+}
+
+static int misdn_flush_stack (int fd, int argc, char *argv[])
+{
+	int port, i;
+	struct misdn_stack *stack = get_misdn_stack();
+  
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+  
+	port = atoi(argv[3]);
+
+	for (;
+	     stack;
+	     stack=stack->next ) {
+		if (stack->port == port) {
+			for (i=0; i< stack->b_num; i++) {
+				struct misdn_bchannel *mybc=&stack->bc[i];
+				mybc->in_use=0;
+			}
+		}
+	}
+  
+  
+	return 0;
+}
+
+static int misdn_restart_port (int fd, int argc, char *argv[])
+{
+	int port;
+  
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+  
+	port = atoi(argv[3]);
+
+	misdn_lib_port_restart(port);
+
+	return 0;
+}
+
+static int misdn_port_up (int fd, int argc, char *argv[])
+{
+	int port;
+	
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+	
+	port = atoi(argv[3]);
+	
+	misdn_lib_get_port_up(port);
+  
+	return 0;
+}
+
+
+static int misdn_show_config (int fd, int argc, char *argv[])
+{
+	char buffer[BUFFERSIZE];
+	enum misdn_cfg_elements elem;
+	int linebreak;
+
+	int onlyport = -1;
+	if (argc >= 4) {
+		if (!sscanf(argv[3], "%d", &onlyport) || onlyport < 0) {
+			ast_cli(fd, "Unknown option: %s\n", argv[3]);
+			return RESULT_SHOWUSAGE;
+		}
+	}
+	
+	if (argc == 3 || onlyport == 0) {
+		ast_cli(fd,"Misdn General-Config: \n"); 
+		ast_cli(fd," ->  VERSION: " CHAN_MISDN_VERSION "\n");
+		
+		for (elem = MISDN_GEN_FIRST + 1, linebreak = 1; elem < MISDN_GEN_LAST; elem++, linebreak++) {
+			misdn_cfg_get_config_string( 0, elem, buffer, BUFFERSIZE);
+			ast_cli(fd, "%-36s%s", buffer, !(linebreak % 2) ? "\n" : "");
+		}
+	}
+
+	if (onlyport < 0) {
+		int port = misdn_cfg_get_next_port(0);
+		for (; port > 0; port = misdn_cfg_get_next_port(port)) {
+			ast_cli(fd, "\n[PORT %d]\n", port);
+			for (elem = MISDN_CFG_FIRST + 1, linebreak = 1; elem < MISDN_CFG_LAST; elem++, linebreak++) {
+				misdn_cfg_get_config_string( port, elem, buffer, BUFFERSIZE);
+				ast_cli(fd, "%-36s%s", buffer, !(linebreak % 2) ? "\n" : "");
+			}	
+			ast_cli(fd, "\n");
+		}
+	}
+	
+	if (onlyport > 0) {
+		if (misdn_cfg_is_port_valid(onlyport)) {
+			ast_cli(fd, "[PORT %d]\n", onlyport);
+			for (elem = MISDN_CFG_FIRST + 1, linebreak = 1; elem < MISDN_CFG_LAST; elem++, linebreak++) {
+				misdn_cfg_get_config_string( onlyport, elem, buffer, BUFFERSIZE);
+				ast_cli(fd, "%-36s%s", buffer, !(linebreak % 2) ? "\n" : "");
+			}	
+			ast_cli(fd, "\n");
+		} else {
+			ast_cli(fd, "Port %d is not active!\n", onlyport);
+		}
+	}
+	return 0;
+}
+
+
+
+struct state_struct {
+	enum misdn_chan_state state;
+	char txt[255] ;
+} ;
+
+struct state_struct state_array[] = {
+	{MISDN_NOTHING,"NOTHING"}, /* at beginning */
+	{MISDN_WAITING4DIGS,"WAITING4DIGS"}, /*  when waiting for infos */
+	{MISDN_EXTCANTMATCH,"EXTCANTMATCH"}, /*  when asterisk couldnt match our ext */
+	{MISDN_DIALING,"DIALING"}, /*  when pbx_start */
+	{MISDN_PROGRESS,"PROGRESS"}, /*  when pbx_start */
+	{MISDN_CALLING,"CALLING"}, /*  when misdn_call is called */
+	{MISDN_ALERTING,"ALERTING"}, /*  when Alerting */
+	{MISDN_BUSY,"BUSY"}, /*  when BUSY */
+	{MISDN_CONNECTED,"CONNECTED"}, /*  when connected */
+	{MISDN_BRIDGED,"BRIDGED"}, /*  when bridged */
+	{MISDN_CLEANING,"CLEANING"}, /* when hangup from * but we were connected before */
+	{MISDN_HUNGUP_FROM_MISDN,"HUNGUP_FROM_MISDN"}, /* when DISCONNECT/RELEASE/REL_COMP  cam from misdn */
+	{MISDN_HOLDED,"HOLDED"}, /* when DISCONNECT/RELEASE/REL_COMP  cam from misdn */
+	{MISDN_HOLD_DISCONNECT,"HOLD_DISCONNECT"}, /* when DISCONNECT/RELEASE/REL_COMP  cam from misdn */
+	{MISDN_HUNGUP_FROM_AST,"HUNGUP_FROM_AST"} /* when DISCONNECT/RELEASE/REL_COMP came out of */
+	/* misdn_hangup */
+};
+
+
+
+
+char *misdn_get_ch_state(struct chan_list *p) 
+{
+	int i;
+	if( !p) return NULL;
+  
+	for (i=0; i< sizeof(state_array)/sizeof(struct state_struct); i++) {
+		if ( state_array[i].state == p->state) return state_array[i].txt; 
+	}
+  
+	return NULL;
+}
+
+static int misdn_reload (int fd, int argc, char *argv[])
+{
+	int i, cfg_debug;
+	
+	ast_cli(fd, "Reloading mISDN Config\n");
+	chan_misdn_log(0, 0, "Dynamic Crypting Activation is not support during reload at the moment\n");
+	
+	free_robin_list();
+
+	misdn_cfg_reload();
+
+	{
+		char tempbuf[BUFFERSIZE];
+		misdn_cfg_get( 0, MISDN_GEN_TRACEFILE, tempbuf, BUFFERSIZE);
+		if (strlen(tempbuf))
+			tracing = 1;
+	}
+
+	misdn_cfg_get( 0, MISDN_GEN_DEBUG, &cfg_debug, sizeof(int));
+	for (i = 0;  i <= max_ports; i++) {
+		misdn_debug[i] = cfg_debug;
+		misdn_debug_only[i] = 0;
+	}
+	
+	return 0;
+}
+
+static void print_bc_info (int fd, struct chan_list* help, struct misdn_bchannel* bc)
+{
+	struct ast_channel *ast=help->ast;
+	ast_cli(fd,
+		"* Pid:%d Prt:%d Ch:%d Mode:%s Org:%s dad:%s oad:%s ctx:%s state:%s\n",
+		bc->pid, bc->stack->port, bc->channel,
+		bc->stack->mode==NT_MODE?"NT":"TE",
+		help->orginator == ORG_AST?"*":"I",
+		ast?ast->exten:NULL,
+		ast?AST_CID_P(ast):NULL,
+		ast?ast->context:NULL,
+		misdn_get_ch_state(help)
+		);
+	if (misdn_debug[bc->stack->port] > 0)
+		ast_cli(fd,
+			"  --> astname: %s\n"
+			"  --> ch_l3id: %x\n"
+			"  --> ch_addr: %x\n"
+			"  --> bc_addr: %x\n"
+			"  --> bc_l3id: %x\n"
+			"  --> display: %s\n"
+			"  --> activated: %d\n"
+			"  --> capability: %s\n"
+			"  --> echo_cancel: %d\n"
+			"  --> notone : rx %d tx:%d\n"
+			"  --> bc_hold: %d holded_bc :%d\n",
+			help->ast->name,
+			help->l3id,
+			help->addr,
+			bc->addr,
+			bc?bc->l3_id:-1,
+			bc->display,
+			
+			bc->active,
+			bearer2str(bc->capability),
+			bc->ec_enable,
+			help->norxtone,help->notxtone,
+			bc->holded, help->holded_bc?1:0
+			);
+  
+}
+
+
+static int misdn_show_cls (int fd, int argc, char *argv[])
+{
+	struct chan_list *help=cl_te;
+  
+	ast_cli(fd,"Chan List: %p\n",cl_te); 
+  
+	for (;help; help=help->next) {
+		struct misdn_bchannel *bc=help->bc;   
+		struct ast_channel *ast=help->ast;
+		if (misdn_debug[0] > 2) ast_cli(fd, "Bc:%p Ast:%p\n", bc, ast);
+		if (bc) {
+			print_bc_info(fd, help, bc);
+		} else if ( (bc=help->holded_bc) ) {
+			chan_misdn_log(0, 0, "ITS A HOLDED BC:\n");
+			print_bc_info(fd, help,  bc);
+		} else {
+			ast_cli(fd,"* Channel in unknown STATE !!! Exten:%s, Callerid:%s\n", ast->exten, AST_CID_P(ast));
+		}
+	}
+  
+  
+	return 0;
+}
+
+
+
+static int misdn_show_cl (int fd, int argc, char *argv[])
+{
+	struct chan_list *help=cl_te;
+
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+  
+	for (;help; help=help->next) {
+		struct misdn_bchannel *bc=help->bc;   
+		struct ast_channel *ast=help->ast;
+    
+		if (bc && ast) {
+			if (!strcasecmp(ast->name,argv[3])) {
+				print_bc_info(fd, help, bc);
+				break; 
+			}
+		} 
+	}
+  
+  
+	return 0;
+}
+
+pthread_mutex_t lock;
+int MAXTICS=8;
+
+static int misdn_set_tics (int fd, int argc, char *argv[])
+{
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+  
+	MAXTICS=atoi(argv[3]);
+  
+	return 0;
+}
+
+
+static int misdn_show_fullstacks (int fd, int argc, char *argv[])
+{
+	struct misdn_stack *stack = get_misdn_stack();
+	ast_cli(fd, "BEGIN STACK_LIST:\n");
+	for (;
+		stack;
+		stack=stack->next ) {
+		int i;
+		ast_cli(fd, "* Stack Addr: Uid %x Port %d Type %s Prot. %s Link %s\n",stack->upper_id, stack->upper_id & IF_CONTRMASK, stack->mode==NT_MODE?"NT":"TE", stack->ptp?"PTP":"PMP", stack->l2link?"UP":"DOWN");
+		for (i=0; i< stack->b_num; i++) {
+			struct misdn_bchannel *mybc=&stack->bc[i];
+			ast_cli(fd," --> bchan: addr %x channel %d pid %d cr %x tone %s inuse %d\n", mybc->addr,mybc->channel, mybc?mybc->pid:-1,mybc?mybc->l3_id:-1 , tone2str(mybc), mybc->in_use);
+		}
+	}
+
+	return 0;
+}
+
+static int misdn_show_stacks (int fd, int argc, char *argv[])
+{
+	struct misdn_stack *stack = get_misdn_stack();
+	int i=1;
+	
+	ast_cli(fd, "BEGIN STACK_LIST:\n");
+	for (;
+	     stack;
+	     stack=stack->next ) {
+		ast_cli(fd, "* Stack Addr: Port %d Type %s Prot. %s L2Link %s L1Link:%s Debug:%d%s\n", stack->upper_id & IF_CONTRMASK, stack->mode==NT_MODE?"NT":"TE", stack->ptp?"PTP":"PMP", stack->l2link?"UP":"DOWN", stack->l1link?"UP":"DOWN", misdn_debug[i], misdn_debug_only[i]?"(only)":"");
+		i++;
+	}
+
+	return 0;
+
+}
+
+static int misdn_show_port (int fd, int argc, char *argv[])
+{
+	struct misdn_stack *stack = get_misdn_stack();
+	int i;
+	int port;
+  
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+  
+	port = atoi(argv[3]);
+  
+	ast_cli(fd, "BEGIN STACK_LIST:\n");
+	for (;
+	     stack;
+	     stack=stack->next ) {
+		if (stack->port == port) {
+			ast_cli(fd, "* Stack Addr: %x Port %d Type %s Prot. %s L2Link %s L1Link:%s\n",stack->upper_id, stack->upper_id & IF_CONTRMASK, stack->mode==NT_MODE?"NT":"TE", stack->ptp?"PTP":"PMP", stack->l2link?"UP":"DOWN", stack->l1link?"UP":"DOWN");
+			for (i=0; i <stack->b_num; i++) {
+				ast_cli(fd,"Idx: %d stack->chan: %d Chan %d InUse:%d\n",i,stack->channels[i], i+1, stack->bc[i].in_use);
+			}
+		}
+	}
+
+	return 0;
+}
+
+static int misdn_send_cd (int fd, int argc, char *argv[])
+{
+	char *channame; 
+	char *nr; 
+  
+	if (argc != 5)
+		return RESULT_SHOWUSAGE;
+  
+	channame = argv[3];
+	nr = argv[4];
+	
+	ast_cli(fd, "Sending Calldeflection (%s) to %s\n",nr, channame);
+	
+	{
+		struct chan_list *tmp=get_chan_by_ast_name(channame);
+		
+		if (!tmp) {
+			ast_cli(fd, "Sending CD with nr %s to %s failed Channel does not exist\n",nr, channame);
+			return 0; 
+		} else {
+			
+			misdn_lib_send_facility(tmp->bc, FACILITY_CALLDEFLECT, nr);
+		}
+	}
+  
+	return 0; 
+}
+
+
+
+static int misdn_send_digit (int fd, int argc, char *argv[])
+{
+	char *channame; 
+	char *msg; 
+  
+	if (argc != 5)
+		return RESULT_SHOWUSAGE;
+  
+	channame = argv[3];
+	msg = argv[4];
+
+	ast_cli(fd, "Sending %s to %s\n",msg, channame);
+  
+	{
+		struct chan_list *tmp=get_chan_by_ast_name(channame);
+    
+		if (!tmp) {
+			ast_cli(fd, "Sending %s to %s failed Channel does not exist\n",msg, channame);
+			return 0; 
+		} else {
+#if 1
+			int i;
+			int msglen = strlen(msg);
+			for (i=0; i<msglen; i++) {
+				ast_cli(fd, "Sending: %c\n",msg[i]);
+				send_digit_to_chan(tmp, msg[i]);
+				/* res = ast_safe_sleep(tmp->ast, 250); */
+				usleep(250000);
+				/* res = ast_waitfor(tmp->ast,100); */
+			}
+#else
+			int res;
+			res = ast_dtmf_stream(tmp->ast,NULL,msg,250);
+#endif
+		}
+	}
+  
+	return 0; 
+}
+
+static int misdn_toggle_echocancel (int fd, int argc, char *argv[])
+{
+	char *channame; 
+
+	if (argc != 4)
+		return RESULT_SHOWUSAGE;
+	
+	channame = argv[3];
+  
+	ast_cli(fd, "Toggling EchoCancel on %s\n", channame);
+  
+	{
+		struct chan_list *tmp=get_chan_by_ast_name(channame);
+    
+		if (!tmp) {
+			ast_cli(fd, "Toggling EchoCancel %s failed Channel does not exist\n", channame);
+			return 0; 
+		} else {
+			tmp->bc->ec_enable=tmp->bc->ec_enable?0:1;
+
+			if (tmp->bc->ec_enable) {
+				manager_ec_enable(tmp->bc);
+			} else {
+				manager_ec_disable(tmp->bc);
+			}
+		}
+	}
+  
+	return 0; 
+}
+
+
+
+static int misdn_send_display (int fd, int argc, char *argv[])
+{
+	char *channame; 
+	char *msg; 
+  
+	if (argc != 5)
+		return RESULT_SHOWUSAGE;
+  
+	channame = argv[3];
+	msg = argv[4];
+
+	ast_cli(fd, "Sending %s to %s\n",msg, channame);
+	{
+		struct chan_list *tmp;
+		tmp=get_chan_by_ast_name(channame);
+    
+		if (tmp && tmp->bc) {
+			int l = sizeof(tmp->bc->display);
+			strncpy(tmp->bc->display, msg, l);
+			tmp->bc->display[l-1] = 0;
+			misdn_lib_send_event(tmp->bc, EVENT_INFORMATION);
+		} else {
+			ast_cli(fd,"No such channel %s\n",channame);
+			return RESULT_FAILURE;
+		}
+	}
+
+	return RESULT_SUCCESS ;
+}
+
+
+
+
+static char *complete_ch_helper(char *line, char *word, int pos, int state, int rpos)
+{
+	struct ast_channel *c;
+	int which=0;
+	char *ret;
+	if (pos != rpos)
+		return NULL;
+	c = ast_channel_walk_locked(NULL);
+	while(c) {
+		if (!strncasecmp(word, c->name, strlen(word))) {
+			if (++which > state)
+				break;
+		}
+		ast_mutex_unlock(&c->lock);
+		c = ast_channel_walk_locked(c);
+	}
+	if (c) {
+		ret = strdup(c->name);
+		ast_mutex_unlock(&c->lock);
+	} else
+		ret = NULL;
+	return ret;
+}
+
+static char *complete_ch(char *line, char *word, int pos, int state)
+{
+	return complete_ch_helper(line, word, pos, state, 3);
+}
+
+static char *complete_debug_port (char *line, char *word, int pos, int state)
+{
+	if (state)
+		return NULL;
+
+	switch (pos) {
+	case 4: if (*word == 'p')
+				return strdup("port");
+			else if (*word == 'o')
+				return strdup("only");
+			break;
+	case 6: if (*word == 'o')
+				return strdup("only");
+			break;
+	}
+	return NULL;
+}
+
+static struct ast_cli_entry cli_send_cd =
+{ {"misdn","send","calldeflect", NULL},
+  misdn_send_cd,
+  "Sends CallDeflection to mISDN Channel", 
+  "Usage: misdn send calldeflect <channel> \"<nr>\" \n",
+  complete_ch
+};
+
+
+static struct ast_cli_entry cli_send_digit =
+{ {"misdn","send","digit", NULL},
+  misdn_send_digit,
+  "Sends DTMF Digit to mISDN Channel", 
+  "Usage: misdn send digit <channel> \"<msg>\" \n"
+  "       Send <digit> to <channel> as DTMF Tone\n"
+  "       when channel is a mISDN channel\n",
+  complete_ch
+};
+
+
+static struct ast_cli_entry cli_toggle_echocancel =
+{ {"misdn","toggle","echocancel", NULL},
+  misdn_toggle_echocancel,
+  "Toggles EchoCancel on mISDN Channel", 
+  "Usage: misdn toggle echocancel <channel>\n", 
+  complete_ch
+};
+
+
+
+static struct ast_cli_entry cli_send_display =
+{ {"misdn","send","display", NULL},
+  misdn_send_display,
+  "Sends Text to mISDN Channel", 
+  "Usage: misdn send display <channel> \"<msg>\" \n"
+  "       Send <msg> to <channel> as Display Message\n"
+  "       when channel is a mISDN channel\n",
+  complete_ch
+};
+
+
+static struct ast_cli_entry cli_show_config =
+{ {"misdn","show","config", NULL},
+  misdn_show_config,
+  "Shows internal mISDN config, read from cfg-file", 
+  "Usage: misdn show config [port | 0]\n       use 0 to only print the general config.\n"
+};
+ 
+
+static struct ast_cli_entry cli_reload =
+{ {"misdn","reload", NULL},
+  misdn_reload,
+  "Reloads internal mISDN config, read from cfg-file", 
+  "Usage: misdn reload\n"
+};
+
+static struct ast_cli_entry cli_set_tics =
+{ {"misdn","set","tics", NULL},
+  misdn_set_tics,
+  "", 
+  "\n"
+};
+
+
+static struct ast_cli_entry cli_show_cls =
+{ {"misdn","show","channels", NULL},
+  misdn_show_cls,
+  "Shows internal mISDN chan_list", 
+  "Usage: misdn show channels\n"
+};
+
+static struct ast_cli_entry cli_show_cl =
+{ {"misdn","show","channel", NULL},
+  misdn_show_cl,
+  "Shows internal mISDN chan_list", 
+  "Usage: misdn show channels\n",
+  complete_ch
+};
+
+static struct ast_cli_entry cli_show_fullstacks =
+{ {"misdn","show","fullstacks", NULL},
+  misdn_show_fullstacks,
+  "Shows internal mISDN stack_list with bchannels", 
+  "Usage: misdn show fullstacks\n"
+};
+
+static struct ast_cli_entry cli_flush_stack =
+{ {"misdn","flush","stack", NULL},
+  misdn_flush_stack,
+  "Flushes the in_use flag", 
+  "Usage: misdn flush stack\n"
+};
+
+static struct ast_cli_entry cli_restart_port =
+{ {"misdn","restart","port", NULL},
+  misdn_restart_port,
+  "Restarts the given port", 
+  "Usage: misdn restart port\n"
+};
+
+
+static struct ast_cli_entry cli_port_up =
+{ {"misdn","port","up", NULL},
+  misdn_port_up,
+  "Tries to establish L1 on the given port", 
+  "Usage: misdn port up <port>\n"
+};
+
+
+static struct ast_cli_entry cli_show_stacks =
+{ {"misdn","show","stacks", NULL},
+  misdn_show_stacks,
+  "Shows internal mISDN stack_list", 
+  "Usage: misdn show stacks\n"
+};
+
+static struct ast_cli_entry cli_show_port =
+{ {"misdn","show","port", NULL},
+  misdn_show_port,
+  "Shows detailed information for given port", 
+  "Usage: misdn show port <port>\n"
+};
+
+
+
+static struct ast_cli_entry cli_set_debug =
+{ {"misdn","set","debug", NULL},
+  misdn_set_debug,
+  "Sets Debuglevel of chan_misdn",
+  "Usage: misdn set debug <level> [only] | [port <port> [only]]\n",
+  complete_debug_port
+};
+
+static struct ast_cli_entry cli_set_crypt_debug =
+{ {"misdn","set","crypt","debug", NULL},
+  misdn_set_crypt_debug,
+  "Sets CryptDebuglevel of chan_misdn, at the moment, level={1,2}", 
+  "Usage: misdn set crypt debug <level>\n"
+};
+/*** CLI END ***/
+
+
+/*****************************/
+/*** AST Indications Start ***/
+/*****************************/
+
+static int misdn_call(struct ast_channel *ast, char *dest, int timeout)
+{
+	int port=0;
+	int r;
+	struct chan_list *ch=MISDN_ASTERISK_TECH_PVT(ast);
+	struct misdn_bchannel *newbc;
+	char *opts=NULL;
+	char dest_cp[256];
+	
+	{
+		strncpy(dest_cp,dest,sizeof(dest_cp)-1);
+		dest_cp[sizeof(dest_cp)]=0;
+		opts=strchr(dest_cp,'/');
+		if ( opts && (opts=strchr(++opts,'/')) ) {
+			if (opts) {
+				opts++;
+				if (!*opts) opts=NULL;
+			}
+		}
+	}
+	
+	if (!ast) {
+		ast_log(LOG_WARNING, " --> ! misdn_call called on ast_channel *ast where ast == NULL\n");
+		return -1;
+	}
+
+	if (((ast->_state != AST_STATE_DOWN) && (ast->_state != AST_STATE_RESERVED)) || !dest  ) {
+		ast_log(LOG_WARNING, " --> ! misdn_call called on %s, neither down nor reserved (or dest==NULL)\n", ast->name);
+		ast->hangupcause=41;
+		ast_setstate(ast, AST_STATE_DOWN);
+		return -1;
+	}
+
+
+	if (!ch) {
+		ast_log(LOG_WARNING, " --> ! misdn_call called on %s, neither down nor reserved (or dest==NULL)\n", ast->name);
+		ast->hangupcause=41;
+		ast_setstate(ast, AST_STATE_DOWN);
+		return -1;
+	}
+	
+	newbc=ch->bc;
+	
+	if (!newbc) {
+		ast_log(LOG_WARNING, " --> ! misdn_call called on %s, neither down nor reserved (or dest==NULL)\n", ast->name);
+		ast->hangupcause=41;
+		ast_setstate(ast, AST_STATE_DOWN);
+		return -1;
+	}
+	
+	port=newbc->stack->port;
+	
+	chan_misdn_log(1, 0, "* CALL: %s\n",dest);
+	
+
+	chan_misdn_log(1, port, " --> * dad:%s tech:%s ctx:%s\n",ast->exten,ast->name, ast->context);
+	
+	{
+		char context[BUFFERSIZE];
+		
+		misdn_cfg_get( port, MISDN_CFG_CONTEXT, context, sizeof(ast->context));
+		{
+			int l = sizeof(ast->context);
+			strncpy(ast->context,context, l);
+			ast->context[l-1] = 0;
+		}
+		chan_misdn_log(2, port, " --> * Setting Context to %s\n",context);
+		misdn_cfg_get( port, MISDN_CFG_LANGUAGE, ast->language, BUFFERSIZE);
+		
+		misdn_cfg_get( port, MISDN_CFG_TXGAIN, &newbc->txgain, sizeof(int));
+		misdn_cfg_get( port, MISDN_CFG_RXGAIN, &newbc->rxgain, sizeof(int));
+		
+		misdn_cfg_get( port, MISDN_CFG_TE_CHOOSE_CHANNEL, &(newbc->stack->te_choose_channel), sizeof(int));
+
+
+		{
+			char callerid[BUFFERSIZE];
+			misdn_cfg_get( port, MISDN_CFG_CALLERID, callerid, BUFFERSIZE);
+			if ( ! ast_strlen_zero(callerid) ) {
+				chan_misdn_log(1, port, " --> * Setting Cid to %s\n", callerid);
+				{
+					int l = sizeof(newbc->oad);
+					strncpy(newbc->oad,callerid, l);
+					newbc->oad[l-1] = 0;
+				}
+				
+				misdn_cfg_get( port, MISDN_CFG_DIALPLAN, &newbc->dnumplan, sizeof(int));
+				switch (newbc->dnumplan) {
+				case NUMPLAN_INTERNATIONAL:
+				case NUMPLAN_NATIONAL:
+				case NUMPLAN_SUBSCRIBER:
+				case NUMPLAN_UNKNOWN:
+					/* Maybe we should cut off the prefix if present ? */
+					break;
+				default:
+					chan_misdn_log(0, port, " --> !!!! Wrong dialplan setting, please see the misdn.conf sample file\n ");
+					break;
+				}
+				
+			}
+		}
+		
+		
+		{
+			char buf[256];
+			ast_group_t pg,cg;
+
+			misdn_cfg_get( port, MISDN_CFG_PICKUPGROUP, &pg, sizeof(pg));
+			misdn_cfg_get( port, MISDN_CFG_CALLGROUP, &cg, sizeof(cg));
+			
+			chan_misdn_log(2, port, " --> * CallGrp:%s PickupGrp:%s\n",ast_print_group(buf,sizeof(buf),cg),ast_print_group(buf,sizeof(buf),pg));
+			ast->pickupgroup=pg;
+			ast->callgroup=cg;
+		}
+
+		/* Will be overridden by asterisk in head! */
+		{
+			int pres;
+			
+			misdn_cfg_get( port, MISDN_CFG_PRES, &pres, sizeof(int));
+			newbc->pres=pres?0:1;
+			
+		}
+		
+		int def_callingpres;
+		misdn_cfg_get( 0, MISDN_CFG_USE_CALLINGPRES, &def_callingpres, sizeof(int));
+		if ( def_callingpres) {
+			switch (ast->cid.cid_pres){
+			case AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED:
+				newbc->pres=1;
+				break;
+				
+			case AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN:
+				newbc->pres=0;
+				break;
+			default:
+				newbc->pres=0;
+			}
+		}
+
+		
+		{
+			int ec, ectr;
+			
+			misdn_cfg_get( port, MISDN_CFG_ECHOCANCEL, &ec, sizeof(int));
+			
+			misdn_cfg_get( port, MISDN_CFG_ECHOTRAINING, &ectr, sizeof(int));
+			if (ec == 1 ) {
+				newbc->ec_enable=1;
+			} else if ( ec > 1 ) {
+				newbc->ec_enable=1;
+				newbc->ec_deftaps=ec;
+			}
+
+			if ( !ectr ) {
+				newbc->ec_training=0;
+			}
+		}
+		
+	} 
+	
+	
+	
+	
+	chan_misdn_log(3, port, " --> * adding2newbc ext %s\n",ast->exten);
+	if (ast->exten) {
+		int l = sizeof(newbc->dad);
+		strncpy(newbc->dad,ast->exten, l);
+		newbc->dad[l-1] = 0;
+	}
+	newbc->rad[0]=0;
+	chan_misdn_log(3, port, " --> * adding2newbc callerid %s\n",AST_CID_P(ast));
+	if (ast_strlen_zero(newbc->oad) && AST_CID_P(ast) ) {
+		if (AST_CID_P(ast)) {
+			int l = sizeof(newbc->oad);
+			strncpy(newbc->oad,AST_CID_P(ast), l);
+			newbc->oad[l-1] = 0;
+		}
+	}
+	
+	{
+		struct chan_list *ch=MISDN_ASTERISK_TECH_PVT(ast);
+		if (!ch) { ast_verbose("No chan_list in misdn_call"); return -1;}
+		ch->bc = newbc;
+		ch->orginator=ORG_AST;
+		ch->ast = ast;
+		
+		MISDN_ASTERISK_TECH_PVT(ast) = ch ;
+		
+		
+      
+		newbc->capability=ast->transfercapability;
+		pbx_builtin_setvar_helper(ast,"TRANSFERCAPABILITY",ast_transfercapability2str(newbc->capability));
+		if ( ast->transfercapability == INFO_CAPABILITY_DIGITAL_UNRESTRICTED) {
+			chan_misdn_log(2, port, " --> * Call with flag Digital\n");
+		}
+		
+
+		/* Finally The Options Override Everything */
+		if (opts) misdn_set_opt_exec(ast,opts);
+		else
+			chan_misdn_log(1,0,"NO OPTS GIVEN\n");
+		
+/*		switch (newbc->pres) {
+		case 0:
+			chan_misdn_log(1, port, " --> Number Screened\n");
+			break;
+		case 1:
+			chan_misdn_log(1, port, " --> Number Not Screened\n");
+			break;
+		default:
+			chan_misdn_log(1, port, " --> Other Screened\n");
+		}*/
+		
+		cl_queue_chan(&cl_te, ch) ;
+		ch->state=MISDN_CALLING;
+
+		chan_misdn_trace_call(ast,1,"*->I: EVENT_CALL\n" );
+		
+		r=misdn_lib_send_event( newbc, EVENT_SETUP );
+		
+		/** we should have l3id after sending setup **/
+		ch->l3id=newbc->l3_id;
+	}
+	
+	if ( r == -ENOCHAN  ) {
+		chan_misdn_log(0, port, " --> * Theres no Channel at the moment .. !\n");
+		chan_misdn_log(1, port, " --> * SEND: State Down pid:%d\n",newbc?newbc->pid:-1);
+		ast->hangupcause=34;
+		ast_setstate(ast, AST_STATE_DOWN);
+		return -1;
+	}
+	
+	chan_misdn_log(1, port, " --> * SEND: State Dialing pid:%d\n",newbc?newbc->pid:1);
+
+	ast_setstate(ast, AST_STATE_DIALING);
+	
+	ast->hangupcause=16;
+	return 0; 
+}
+
+
+int misdn_answer(struct ast_channel *ast)
+{
+	struct chan_list *p;
+
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+	
+	chan_misdn_trace_call(ast,1,"*->I: EVENT_ANSWER\n");
+	
+	chan_misdn_log(1, p? (p->bc? p->bc->stack->port : 0) : 0, "* ANSWER:\n");
+	
+	if (!p) {
+		ast_log(LOG_WARNING, " --> Channel not connected ??\n");
+		ast_queue_hangup(ast);
+	}
+
+	if (!p->bc) {
+		chan_misdn_log(1, 0, " --> Got Answer, but theres no bc obj ??\n");
+
+		ast_queue_hangup(ast);
+	}
+
+	{
+		char *tmp_key = pbx_builtin_getvar_helper(p->ast, "CRYPT_KEY");
+		
+		if (tmp_key ) {
+			chan_misdn_log(1, p->bc->stack->port, " --> Connection will be BF crypted\n");
+			{
+				int l = sizeof(p->bc->crypt_key);
+				strncpy(p->bc->crypt_key,tmp_key, l);
+				p->bc->crypt_key[l-1] = 0;
+			}
+		} else {
+			chan_misdn_log(3, p->bc->stack->port, " --> Connection is without BF encryption\n");
+		}
+    
+	}
+	
+	p->state = MISDN_CONNECTED;
+	misdn_lib_send_event( p->bc, EVENT_CONNECT);
+	start_bc_tones(p);
+	
+  
+	return 0;
+}
+
+int misdn_digit(struct ast_channel *ast, char digit )
+{
+	struct chan_list *p;
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+	
+
+	struct misdn_bchannel *bc=p->bc;
+	chan_misdn_log(1, bc?bc->stack->port:0, "* IND : Digit %c\n",digit);
+	
+	if (!bc) {
+		ast_log(LOG_WARNING, " --> !! Got Digit Event withut having bchannel Object\n");
+		return -1;
+	}
+	
+	switch (p->state ) {
+		case MISDN_CALLING:
+		{
+			
+			char buf[8];
+			buf[0]=digit;
+			buf[1]=0;
+			
+			int l = sizeof(bc->infos_pending);
+			strncat(bc->infos_pending,buf,l);
+			bc->infos_pending[l-1] = 0;
+		}
+		break;
+		case MISDN_CALLING_ACKNOWLEDGE:
+		{
+			bc->info_dad[0]=digit;
+			bc->info_dad[1]=0;
+			
+			{
+				int l = sizeof(bc->dad);
+				strncat(bc->dad,bc->info_dad, l - strlen(bc->dad));
+				bc->dad[l-1] = 0;
+		}
+			{
+				int l = sizeof(p->ast->exten);
+				strncpy(p->ast->exten, bc->dad, l);
+				p->ast->exten[l-1] = 0;
+			}
+			
+			misdn_lib_send_event( bc, EVENT_INFORMATION);
+		}
+		break;
+		
+		default:
+			if ( bc->send_dtmf ) {
+				send_digit_to_chan(p,digit);
+			}
+		break;
+	}
+	
+	return 0;
+}
+
+
+int misdn_fixup(struct ast_channel *oldast, struct ast_channel *ast)
+{
+	struct chan_list *p;
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+	
+	chan_misdn_log(1, p->bc?p->bc->stack->port:0, "* IND: Got Fixup State:%s Holded:%d L3id:%x\n", misdn_get_ch_state(p), p->holded, p->l3id);
+	
+	p->ast = ast ;
+	p->state=MISDN_CONNECTED;
+  
+	return 0;
+}
+
+
+int misdn_transfer (struct ast_channel *ast, char *dest)
+{
+	struct chan_list *p;
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+
+	chan_misdn_log(1, p->bc?p->bc->stack->port:0, "* IND : Got Transfer %s\n",dest);
+	return 0;
+}
+
+
+
+int misdn_indication(struct ast_channel *ast, int cond)
+{
+	struct chan_list *p;
+
+  
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) {
+		ast_log(LOG_WARNING, "Returnded -1 in misdn_indication\n");
+		return -1;
+	}
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+	
+	if (!p->bc ) {
+		chan_misdn_log(1, 0, "* IND : Indication from %s\n",ast->exten);
+		ast_log(LOG_WARNING, "Private Pointer but no bc ?\n");
+		return -1;
+	}
+	
+	chan_misdn_log(1, p->bc->stack->port, "* IND : Indication from %s\n",ast->exten);
+	
+	switch (cond) {
+	case AST_CONTROL_BUSY:
+		chan_misdn_log(1, p->bc->stack->port, "* IND :\tbusy\n");
+		chan_misdn_log(1, p->bc->stack->port, " --> * SEND: State Busy pid:%d\n",p->bc?p->bc->pid:-1);
+		ast_setstate(ast,AST_STATE_BUSY);
+		
+		p->bc->out_cause=17;
+		if (p->state != MISDN_CONNECTED) {
+			misdn_lib_send_event( p->bc, EVENT_DISCONNECT);
+			manager_send_tone(p->bc, TONE_BUSY);
+		} else {
+			chan_misdn_log(0, p->bc->stack->port, " --> !! Got Busy in Connected State !?! port:%d ast:%s\n",
+				       p->bc->stack->port, ast->name);
+		}
+		break;
+	case AST_CONTROL_RING:
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tring pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_RINGING:
+		if ( p->state == MISDN_ALERTING) {
+			chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tringing pid:%d but I ws Ringing before, so ignoreing it\n",p->bc?p->bc->pid:-1);
+			break;
+		}
+		p->state=MISDN_ALERTING;
+		
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tringing pid:%d\n",p->bc?p->bc->pid:-1);
+		
+		misdn_lib_send_event( p->bc, EVENT_ALERTING);
+		
+		manager_send_tone(p->bc, TONE_ALERTING);
+		chan_misdn_log(1, p->bc->stack->port, " --> * SEND: State Ring pid:%d\n",p->bc?p->bc->pid:-1);
+		ast_setstate(ast,AST_STATE_RINGING);
+		break;
+		
+	case AST_CONTROL_ANSWER:
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tanswer pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_TAKEOFFHOOK:
+		chan_misdn_log(1, p->bc->stack->port, " --> *\ttakeoffhook pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_OFFHOOK:
+		chan_misdn_log(1, p->bc->stack->port, " --> *\toffhook pid:%d\n",p->bc?p->bc->pid:-1);
+		break; 
+	case AST_CONTROL_FLASH:
+		chan_misdn_log(1, p->bc->stack->port, " --> *\tflash pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_PROGRESS:
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tprogress pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_CONGESTION:
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\tcongestion pid:%d\n",p->bc?p->bc->pid:-1);
+
+		p->bc->out_cause=42;
+		if (p->state != MISDN_CONNECTED) {
+			start_bc_tones(p);
+			//misdn_lib_send_event( p->bc, EVENT_RELEASE_COMPLETE);
+			misdn_lib_send_event( p->bc, EVENT_RELEASE);
+		} else {
+			misdn_lib_send_event( p->bc, EVENT_DISCONNECT);
+		}
+		if (p->bc->stack->mode == NT_MODE) {
+			manager_send_tone(p->bc, TONE_BUSY);
+		}
+		break;
+	case -1 :
+		chan_misdn_log(1, p->bc->stack->port, " --> * IND :\t-1! pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_HOLD:
+		chan_misdn_log(1, p->bc->stack->port, " --> *\tHOLD pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	case AST_CONTROL_UNHOLD:
+		chan_misdn_log(1, p->bc->stack->port, " --> *\tUNHOLD pid:%d\n",p->bc?p->bc->pid:-1);
+		break;
+	default:
+		ast_log(LOG_WARNING, " --> * Unknown Indication:%d pid:%d\n",cond,p->bc?p->bc->pid:-1);
+	}
+  
+	return 0;
+}
+
+int misdn_hangup(struct ast_channel *ast)
+{
+	struct chan_list *p;
+	struct misdn_bchannel *bc=NULL;
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+
+	release_lock;
+
+	chan_misdn_trace_call(ast,1,"*->I: EVENT_HANGUP cause=%d\n",ast->hangupcause);
+	
+	ast_log(LOG_DEBUG, "misdn_hangup(%s)\n", ast->name);
+	
+	if (!p) {
+		chan_misdn_log(3, 0, "misdn_hangup called, without chan_list obj.\n");
+		release_unlock;
+		return 0 ;
+	}
+	
+
+	
+	MISDN_ASTERISK_TECH_PVT(ast)=NULL;
+	p->ast=NULL;
+
+	if (ast->_state == AST_STATE_RESERVED) {
+		/* between request and call */
+		MISDN_ASTERISK_TECH_PVT(ast)=NULL;
+		release_unlock;
+		
+		cl_dequeue_chan(&cl_te, p);
+		free(p);
+
+		misdn_lib_release(bc);
+		
+		return 0;
+	}
+
+	stop_bc_tones(p);
+	
+	release_unlock;
+	
+	
+	bc=p->bc;
+	
+	if (!bc) {
+		ast_log(LOG_WARNING,"Hangup with private but no bc ?\n");
+		return 0;
+	}
+	
+	{
+		char *varcause=NULL;
+		bc->cause=ast->hangupcause?ast->hangupcause:16;
+		
+		if ( (varcause=pbx_builtin_getvar_helper(ast, "HANGUPCAUSE")) ||
+		     (varcause=pbx_builtin_getvar_helper(ast, "PRI_CAUSE"))) {
+			int tmpcause=atoi(varcause);
+			bc->out_cause=tmpcause?tmpcause:16;
+		}
+    
+		chan_misdn_log(1, bc->stack->port, "* IND : HANGUP\tpid:%d ctx:%s dad:%s oad:%s State:%s\n",p->bc?p->bc->pid:-1, ast->context, ast->exten, AST_CID_P(ast), misdn_get_ch_state(p));
+		chan_misdn_log(2, bc->stack->port, " --> l3id:%x\n",p->l3id);
+		chan_misdn_log(1, bc->stack->port, " --> cause:%d\n",bc->cause);
+		chan_misdn_log(1, bc->stack->port, " --> out_cause:%d\n",bc->out_cause);
+		
+		switch (p->state) {
+		case MISDN_CALLING:
+			p->state=MISDN_CLEANING;
+			misdn_lib_send_event( bc, EVENT_RELEASE_COMPLETE);
+			break;
+		case MISDN_HOLDED:
+		case MISDN_DIALING:
+			start_bc_tones(p);
+			manager_send_tone(bc, TONE_BUSY);
+			p->state=MISDN_CLEANING;
+			
+			misdn_lib_send_event( bc, EVENT_RELEASE_COMPLETE);
+      
+			break;
+      
+		case MISDN_ALERTING:
+			chan_misdn_log(2, bc->stack->port, " --> * State Alerting\n");
+
+			if (p->orginator != ORG_AST) 
+				manager_send_tone(bc, TONE_BUSY);
+      
+			p->state=MISDN_CLEANING;
+			misdn_lib_send_event( bc, EVENT_DISCONNECT);
+			break;
+		case MISDN_CONNECTED:
+			/*  Alerting or Disconect */
+			chan_misdn_log(2, bc->stack->port, " --> * State Connected\n");
+			start_bc_tones(p);
+			manager_send_tone(bc, TONE_BUSY);
+			misdn_lib_send_event( bc, EVENT_DISCONNECT);
+      
+			p->state=MISDN_CLEANING; /* MISDN_HUNGUP_FROM_AST; */
+			break;
+
+		case MISDN_CLEANING:
+			break;
+      
+		case MISDN_HOLD_DISCONNECT:
+			/* need to send release here */
+			chan_misdn_log(2, bc->stack->port, " --> state HOLD_DISC\n");
+			chan_misdn_log(1, bc->stack->port, " --> cause %d\n",bc->cause);
+			chan_misdn_log(1, bc->stack->port, " --> out_cause %d\n",bc->out_cause);
+			
+			misdn_lib_send_event(bc,EVENT_RELEASE);
+			break;
+		default:
+			/*  Alerting or Disconect */
+			if (bc->stack->mode == NT_MODE)
+				misdn_lib_send_event(bc, EVENT_RELEASE);
+			else
+				misdn_lib_send_event(bc, EVENT_DISCONNECT);
+			p->state=MISDN_CLEANING; /* MISDN_HUNGUP_FROM_AST; */
+		}
+    
+	}
+	
+	chan_misdn_log(1, bc->stack->port, "Channel: %s hanguped\n",ast->name);
+	
+	return 0;
+}
+
+struct ast_frame  *misdn_read(struct ast_channel *ast)
+{
+	struct chan_list *tmp;
+	
+	char blah[255];
+	int len =0 ;
+	
+	if (!ast) return NULL;
+	tmp = MISDN_ASTERISK_TECH_PVT(ast);
+	if (!tmp) return NULL;
+	if (!tmp->bc) return NULL;
+	
+	
+	read(tmp->pipe[0],blah,sizeof(blah));
+	
+	len = ibuf_usedcount(tmp->bc->astbuf);
+	
+	/*shrinken len if necessary, we transmit at maximum 4k*/
+	len = len<=sizeof(tmp->ast_rd_buf)?len:sizeof(tmp->ast_rd_buf);
+	
+	ibuf_memcpy_r(tmp->ast_rd_buf, tmp->bc->astbuf,len);
+	
+	tmp->frame.frametype  = AST_FRAME_VOICE;
+	tmp->frame.subclass = AST_FORMAT_ALAW;
+	tmp->frame.datalen = len;
+	tmp->frame.samples = len ;
+	tmp->frame.mallocd =0 ;
+	tmp->frame.offset= 0 ;
+	tmp->frame.src = NULL;
+	tmp->frame.data = tmp->ast_rd_buf ;
+
+	chan_misdn_trace_call(tmp->ast,3,"*->I: EVENT_READ len=%d\n",len);
+	
+	return &tmp->frame;
+}
+
+int misdn_write(struct ast_channel *ast, struct ast_frame *frame)
+{
+	struct chan_list *p;
+	int i  = 0;
+	
+	if (!ast || ! MISDN_ASTERISK_PVT(ast)) return -1;
+	p = MISDN_ASTERISK_TECH_PVT(ast) ;
+	
+	if (!p->bc ) {
+		ast_log(LOG_WARNING, "private but no bc\n");
+		return -1;
+	}
+	
+	if (p->bc->tone != TONE_NONE)
+		manager_send_tone(p->bc,TONE_NONE);
+	
+	
+	if (p->holded ) {
+		chan_misdn_log(5, p->bc->stack->port, "misdn_write: Returning because holded\n");
+		return 0;
+	}
+	
+	if (p->notxtone) {
+		chan_misdn_log(5, p->bc->stack->port, "misdn_write: Returning because notxone\n");
+		return 0;
+	}
+	
+	if ( !(frame->subclass & prefformat)) {
+		chan_misdn_log(0, p->bc->stack->port, "Got Unsupported Frame with Format:%d\n", frame->subclass);
+	}
+	
+	
+#if MISDN_DEBUG
+	{
+		int i, max=5>frame->samples?frame->samples:5;
+		
+		printf("write2mISDN %p %d bytes: ", p, frame->samples);
+		
+		for (i=0; i<  max ; i++) printf("%2.2x ",((char*) frame->data)[i]);
+		printf ("\n");
+	}
+#endif
+	chan_misdn_trace_call(ast,3,"*->I: EVENT_WRITE len=%d\n",frame->samples);
+	
+	i= manager_tx2misdn_frm(p->bc, frame->data, frame->samples);
+	
+	return 0;
+}
+
+
+
+int misdn_bridge (struct ast_channel *c0, struct ast_channel *c1, int flags,
+		  struct ast_frame **fo, struct ast_channel **rc)
+{
+	struct chan_list *ch1,*ch2;
+	struct ast_channel *carr[2], *who;
+	int to=-1;
+	struct ast_frame *f;
+  
+	ch1=get_chan_by_ast(c0);
+	ch2=get_chan_by_ast(c1);
+
+	carr[0]=c0;
+	carr[1]=c1;
+  
+  
+	if (ch1 && ch2 ) ;
+	else
+		return -1;
+  
+
+	int bridging;
+	misdn_cfg_get( 0, MISDN_GEN_BRIDGING, &bridging, sizeof(int));
+	if (bridging) {
+		int ecwb;
+		misdn_cfg_get( ch1->bc->stack->port, MISDN_CFG_ECHOCANCELWHENBRIDGED, &ecwb, sizeof(int));
+		if ( !ecwb ) {
+			chan_misdn_log(0, ch1->bc->stack->port, "Disabling Echo Cancellor when Bridged\n");
+			ch1->bc->ec_enable=0;
+			manager_ec_disable(ch1->bc);
+		}
+		misdn_cfg_get( ch2->bc->stack->port, MISDN_CFG_ECHOCANCELWHENBRIDGED, &ecwb, sizeof(int));
+		if ( !ecwb ) {
+			chan_misdn_log(0, ch2->bc->stack->port, "Disabling Echo Cancellor when Bridged\n");
+			ch2->bc->ec_enable=0;
+			manager_ec_disable(ch2->bc);
+		}
+		
+		/* trying to make a mISDN_dsp conference */
+		chan_misdn_log(0, ch1->bc->stack->port, "I SEND: Making conference with Number:%d\n", (ch1->bc->pid<<1) +1);
+		manager_ph_control(ch1->bc, CMX_RECEIVE_OFF, 0);
+		manager_ph_control(ch2->bc, CMX_RECEIVE_OFF, 0);
+    
+
+		manager_ph_control(ch1->bc, CMX_CONF_JOIN, (ch1->bc->pid<<1) +1);
+		manager_ph_control(ch2->bc, CMX_CONF_JOIN, (ch1->bc->pid<<1) +1);
+	}
+  
+	chan_misdn_log(1, ch1->bc->stack->port, "* Makeing Native Bridge between %s and %s\n", ch1->bc->oad, ch2->bc->oad);
+  
+	while(1) {
+		to=-1;
+		who = ast_waitfor_n(carr, 2, &to);
+		f = ast_read(who);
+    
+		if (!f || f->frametype == AST_FRAME_CONTROL) {
+			/* got hangup .. */
+			*fo=f;
+			*rc=who;
+      
+			break;
+		}
+    
+    
+		if (who == c0) {
+			ast_write(c1,f);
+		}
+		else {
+			ast_write(c0,f);
+		}
+    
+	}
+  
+	if (bridging) {
+		manager_ph_control(ch1->bc, CMX_RECEIVE_ON, 0);
+		manager_ph_control(ch2->bc, CMX_RECEIVE_ON, 0);
+    
+		chan_misdn_log(0, ch1->bc->stack->port, "I SEND: Splitting conference with Number:%d\n", (ch1->bc->pid<<1) +1);
+		manager_ph_control(ch1->bc, CMX_CONF_SPLIT, (ch1->bc->pid<<1) +1);
+		manager_ph_control(ch2->bc, CMX_CONF_SPLIT, (ch1->bc->pid<<1) +1);
+	}
+  
+	return 0;
+}
+
+/** AST INDICATIONS END **/
+
+static int start_bc_tones(struct chan_list* cl)
+{
+	manager_bchannel_activate(cl->bc);
+	manager_send_tone(cl->bc ,TONE_NONE);
+	cl->notxtone=0;
+	cl->norxtone=0;
+	return 0;
+}
+
+static int stop_bc_tones(struct chan_list *cl)
+{
+	if (cl->bc) {
+		manager_bchannel_deactivate(cl->bc);
+	}
+	cl->notxtone=1;
+	cl->norxtone=1;
+	
+	return 0;
+}
+
+
+struct chan_list *init_chan_list(void)
+{
+	struct chan_list *cl=malloc(sizeof(struct chan_list));
+	
+	if (!cl) {
+		chan_misdn_log(0, 0, "misdn_request: malloc failed!");
+		return NULL;
+	}
+	
+	memset(cl,0,sizeof(struct chan_list));
+	
+	return cl;
+	
+}
+
+static struct ast_channel *misdn_request(const char *type, int format, void *data, int *cause)
+
+{
+	struct ast_channel *tmp = NULL;
+	char group[BUFFERSIZE]="";
+	char buf[128];
+	char buf2[128], *ext=NULL, *port_str;
+	char *tokb=NULL, *p=NULL;
+	int channel=0, port=0;
+	struct misdn_bchannel *newbc = NULL;
+	
+	struct chan_list *cl=init_chan_list();
+	
+	sprintf(buf,"%s/%s",type,(char*)data);
+	strncpy(buf2,data, 128);
+	buf2[127] = 0;
+	port_str=strtok_r(buf2,"/", &tokb);
+
+	ext=strtok_r(NULL,"/", &tokb);
+	
+	if (!ext) {
+		ast_log(LOG_WARNING, " --> ! IND : CALL dad:%s WITH WRONG ARGS, check extension.conf\n",ext);
+		
+		return NULL;
+	}
+ 	
+	if (port_str) {
+		if (port_str[0]=='g' && port_str[1]==':' ) {
+			/* We make a group call lets checkout which ports are in my group */
+			port_str += 2;
+			strncpy(group, port_str, BUFFERSIZE);
+			group[127] = 0;
+			chan_misdn_log(2, 0, " --> Group Call group: %s\n",group);
+		} 
+		else if ((p = strchr(port_str, ':'))) {
+			// we have a preselected channel
+			*p = 0;
+			channel = atoi(++p);
+			port = atoi(port_str);
+			chan_misdn_log(2, port, " --> Call on preselected Channel (%d) on Port %d\n", channel, port);
+		}
+		else {
+			port = atoi(port_str);
+		}
+		
+		
+	} else {
+		ast_log(LOG_WARNING, " --> ! IND : CALL dad:%s WITHOUT PORT/Group, check extension.conf\n",ext);
+		return NULL;
+	}
+
+	if (!ast_strlen_zero(group)) {
+	
+		char cfg_group[BUFFERSIZE];
+		struct robin_list *rr = NULL;
+
+		if (misdn_cfg_is_group_method(group, METHOD_ROUND_ROBIN)) {
+			chan_misdn_log(4, port, " --> STARTING ROUND ROBIN...");
+			rr = get_robin_position(group);
+		}
+		
+		if (rr) {
+			int robin_channel = rr->channel;
+			int port_start;
+			int next_chan = 1;
+
+			do {
+				port_start = 0;
+				for (port = misdn_cfg_get_next_port_spin(rr->port); port > 0 && port != port_start;
+					 port = misdn_cfg_get_next_port_spin(port)) {
+
+					if (!port_start)
+						port_start = port;
+
+					if (port >= port_start)
+						next_chan = 1;
+					
+					if (port < port_start && next_chan) {
+						if (++robin_channel >= MAX_BCHANS) {
+							robin_channel = 1;
+						}
+						next_chan = 0;
+					}
+
+					misdn_cfg_get(port, MISDN_CFG_GROUPNAME, cfg_group, BUFFERSIZE);
+					
+					if (!strcasecmp(cfg_group, group)) {
+						int l1, port_up;
+					
+						misdn_cfg_get( 0, MISDN_GEN_L1_INFO_OK, &l1, sizeof(l1));
+						port_up = misdn_lib_port_up(port);
+						
+						if ((l1 && port_up) || !l1)	{
+							newbc = misdn_lib_get_free_bc(port, robin_channel);
+							if (newbc) {
+								chan_misdn_log(4, port, " Success! Found port:%d channel:%d\n", newbc->stack->port, newbc->channel);
+								if (port_up)
+									chan_misdn_log(4, port, "def_l1:%d, portup:%d\n", l1, port_up);
+								rr->port = newbc->stack->port;
+								rr->channel = newbc->channel;
+								break;
+							}
+						}
+					}
+				}
+			} while (!newbc && robin_channel != rr->channel);
+			
+			if (!newbc)
+				chan_misdn_log(4, port, " Failed! No free channel in group %d!", group);
+		}
+		
+		else {		
+			for (port=misdn_cfg_get_next_port(0); port > 0;
+				 port=misdn_cfg_get_next_port(port)) {
+				
+				misdn_cfg_get( port, MISDN_CFG_GROUPNAME, cfg_group, BUFFERSIZE);
+				
+				if (!strcasecmp(cfg_group, group)) {
+					int l1, port_up;
+					
+					misdn_cfg_get( 0, MISDN_GEN_L1_INFO_OK, &l1, sizeof(l1));
+					port_up = misdn_lib_port_up(port);
+
+					chan_misdn_log(4, port, "def_l1:%d, portup:%d\n", l1, port_up);
+					
+					if ((l1 && port_up) || !l1)	{
+						newbc = misdn_lib_get_free_bc(port, 0);
+						if (newbc)
+							break;
+					}
+				}
+			}
+		}
+		
+	} else {
+		if (channel)
+			chan_misdn_log(1, port," --> preselected_channel: %d\n",channel);
+		newbc = misdn_lib_get_free_bc(port, channel);
+	}
+	
+	if (!newbc) {
+		chan_misdn_log(1, port, " --> ! No free channel chan ext:%s even after Group Call\n",ext);
+		chan_misdn_log(1, port, " --> SEND: State Down\n");
+		return NULL;
+	}
+	
+	cl->bc=newbc;
+	
+	tmp = misdn_new(cl, AST_STATE_RESERVED, buf, "",ext, NULL, format, port, channel);
+	
+	
+	return tmp;
+}
+
+
+struct ast_channel_tech misdn_tech = {
+	.type="mISDN",
+	.description="Channel driver for mISDN Support (Bri/Pri)",
+	.capabilities= AST_FORMAT_ALAW ,
+	.requester=misdn_request,
+	.send_digit=misdn_digit,
+	.call=misdn_call,
+	.bridge=misdn_bridge, 
+	.hangup=misdn_hangup,
+	.answer=misdn_answer,
+	.read=misdn_read,
+	.write=misdn_write,
+	.indicate=misdn_indication,
+	.fixup=misdn_fixup,
+	.properties=0
+	/* .transfer=misdn_transfer */
+};
+
+struct ast_channel_tech misdn_tech_wo_bridge = {
+	.type="mISDN",
+	.description="Channel driver for mISDN Support (Bri/Pri)",
+	.capabilities=AST_FORMAT_ALAW ,
+	.requester=misdn_request,
+	.send_digit=misdn_digit,
+	.call=misdn_call,
+	.hangup=misdn_hangup,
+	.answer=misdn_answer,
+	.read=misdn_read,
+	.write=misdn_write,
+	.indicate=misdn_indication,
+	.fixup=misdn_fixup,
+	.properties=0
+	/* .transfer=misdn_transfer */
+};
+
+
+unsigned long glob_channel=0;
+
+struct ast_channel *misdn_new(struct chan_list *chlist, int state, char * name, char * context, char *exten, char *callerid, int format, int port, int c)
+{
+	struct ast_channel *tmp;
+	
+	tmp = ast_channel_alloc(1);
+	
+	if (tmp) {
+		chan_misdn_log(2, 0, " --> * NEW CHANNEL dad:%s oad:%s ctx:%s\n",exten,callerid, context);
+		
+		
+		if (c<=0) {
+			c=glob_channel++;
+			snprintf(tmp->name, sizeof(tmp->name), "%s/%d-u%d",
+				 type, port, c);
+		} else {
+			snprintf(tmp->name, sizeof(tmp->name), "%s/%d-%d",
+				 type, port, c);
+		}
+		
+		tmp->type = type;
+    
+		tmp->nativeformats = prefformat;
+		tmp->readformat = format;
+		tmp->writeformat = format;
+    
+		tmp->tech_pvt = chlist;
+
+		int bridging;
+		misdn_cfg_get( 0, MISDN_GEN_BRIDGING, &bridging, sizeof(int));
+		if (bridging)
+			tmp->tech = &misdn_tech;
+		else
+			tmp->tech = &misdn_tech_wo_bridge;
+    
+    
+		tmp->writeformat = format;
+		tmp->readformat = format;
+		tmp->priority=1;
+    
+    
+		strncpy(tmp->context, context, sizeof(tmp->context)-1);
+		strncpy(tmp->exten, exten,  sizeof(tmp->exten) - 1);
+
+		if (callerid) {
+			char *cid_name, *cid_num;
+      
+			ast_callerid_parse(callerid, &cid_name, &cid_num);
+			if (cid_name)
+				tmp->cid.cid_name=strdup(cid_name);
+			if (cid_num)
+				tmp->cid.cid_num=strdup(cid_num);
+		}
+
+		{
+			if (pipe(chlist->pipe)<0)
+				perror("Pipe failed\n");
+			
+			tmp->fds[0]=chlist->pipe[0];
+			
+		}
+		misdn_cfg_get( 0, MISDN_CFG_LANGUAGE, tmp->language, sizeof(tmp->language));
+
+		if (chlist->bc) {
+
+			if (misdn_cfg_is_port_valid(chlist->bc->stack->port) ) {
+				{
+					char buf[256];
+					ast_group_t pg,cg;
+					
+					misdn_cfg_get( chlist->bc->stack->port, MISDN_CFG_PICKUPGROUP, &pg, sizeof(pg));
+					misdn_cfg_get( chlist->bc->stack->port, MISDN_CFG_CALLGROUP, &cg, sizeof(cg));
+					
+					chan_misdn_log(2, chlist->bc->stack->port, " --> * CallGrp:%s PickupGrp:%s\n",ast_print_group(buf,sizeof(buf),cg),ast_print_group(buf,sizeof(buf),pg));
+					tmp->pickupgroup=pg;
+					tmp->callgroup=cg;
+				}
+				misdn_cfg_get( chlist->bc->stack->port, MISDN_CFG_TXGAIN, &chlist->bc->txgain, sizeof(int));
+				misdn_cfg_get( chlist->bc->stack->port, MISDN_CFG_RXGAIN, &chlist->bc->rxgain, sizeof(int));
+				chan_misdn_log(2, chlist->bc->stack->port, " --> rxgain:%d txgain:%d\n",chlist->bc->rxgain,chlist->bc->txgain);
+				
+				
+			} else {
+				chan_misdn_log(0, 0, " --> !! Config Not found in misdn_new port:%d\n",chlist->bc->stack->port);
+			}
+
+		} else {
+			chan_misdn_log(3, 0, " --> Not Setting Pickupgroup, we have no bc yet\n");
+		}
+		
+		ast_setstate(tmp, state);
+		if (state == AST_STATE_RING)
+			tmp->rings = 1;
+		else
+			tmp->rings = 0;
+	} else
+		ast_log(LOG_WARNING, "Unable to allocate channel structure\n");
+	
+	return tmp;
+}
+
+
+
+int misdn_tx2ast_frm(struct chan_list * tmp, char * buf,  int len )
+{
+	struct ast_frame frame;
+	
+	/* If in hold state we drop frame .. */
+	if (tmp->holded || tmp->state == MISDN_CLEANING ) return 0; 
+	
+	if (tmp->norxtone) {
+		chan_misdn_log(3, tmp->bc->stack->port, "misdn_tx2ast_frm: Returning because norxtone\n");
+		return 0;
+	}
+	
+	frame.frametype  = AST_FRAME_VOICE;
+	frame.subclass = AST_FORMAT_ALAW;
+	frame.datalen = len;
+	frame.samples = len ;
+	frame.mallocd =0 ;
+	frame.offset= 0 ;
+	frame.src = NULL;
+	frame.data = buf ;
+	
+	if (tmp->faxdetect || tmp->ast_dsp ) {
+		struct ast_frame *f,*f2;
+		if (tmp->trans)
+			f2=ast_translate(tmp->trans, &frame,0);
+		else {
+			chan_misdn_log(0, tmp->bc->stack->port, "No T-Path found\n");
+			return 0;
+		}
+		
+		f = ast_dsp_process(tmp->ast, tmp->dsp, f2);
+		if (f && (f->frametype == AST_FRAME_DTMF)) {
+			ast_log(LOG_DEBUG, "Detected inband DTMF digit: %c", f->subclass);
+			if (f->subclass == 'f' && tmp->faxdetect) {
+				/* Fax tone -- Handle and return NULL */
+				struct ast_channel *ast = tmp->ast;
+				if (!tmp->faxhandled) {
+					tmp->faxhandled++;
+					if (strcmp(ast->exten, "fax")) {
+						if (ast_exists_extension(ast, ast_strlen_zero(ast->macrocontext)? ast->context : ast->macrocontext, "fax", 1, AST_CID_P(ast))) {
+							if (option_verbose > 2)
+								ast_verbose(VERBOSE_PREFIX_3 "Redirecting %s to fax extension\n", ast->name);
+							/* Save the DID/DNIS when we transfer the fax call to a "fax" extension */
+							pbx_builtin_setvar_helper(ast,"FAXEXTEN",ast->exten);
+							if (ast_async_goto(ast, ast->context, "fax", 1))
+								ast_log(LOG_WARNING, "Failed to async goto '%s' into fax of '%s'\n", ast->name, ast->context);
+						} else
+							ast_log(LOG_NOTICE, "Fax detected, but no fax extension ctx:%s exten:%s\n",ast->context, ast->exten);
+					} else
+						ast_log(LOG_DEBUG, "Already in a fax extension, not redirecting\n");
+				} else
+					ast_log(LOG_DEBUG, "Fax already handled\n");
+				frame.frametype = AST_FRAME_NULL;
+				frame.subclass = 0;
+				f = &frame;
+			}  else if ( tmp->ast_dsp) {
+				struct ast_frame fr;
+				memset(&fr, 0 , sizeof(fr));
+				fr.frametype = AST_FRAME_DTMF;
+				fr.subclass = f->subclass ;
+				fr.src=NULL;
+				fr.data = NULL ;
+				fr.datalen = 0;
+				fr.samples = 0 ;
+				fr.mallocd =0 ;
+				fr.offset= 0 ;
+				
+				chan_misdn_log(2, tmp->bc->stack->port, " --> * SEND: DTMF (AST_DSP) :%c\n",f->subclass);
+				ast_queue_frame(tmp->ast, &fr);
+				
+				frame.frametype = AST_FRAME_NULL;
+				frame.subclass = 0;
+				f = &frame;
+			}
+		}
+	}
+	
+	if (tmp && tmp->ast && MISDN_ASTERISK_PVT (tmp->ast) && MISDN_ASTERISK_TECH_PVT(tmp->ast) ) {
+#if MISDN_DEBUG
+		int i, max=5>len?len:5;
+    
+		printf("write2* %p %d bytes: ",tmp, len);
+    
+		for (i=0; i<  max ; i++) printf("%2.2x ",((char*) frame.data)[i]);
+		printf ("\n");
+#endif
+		chan_misdn_log(9, tmp->bc->stack->port, "Queueing %d bytes 2 Asterisk\n",len);
+		
+		ast_queue_frame(tmp->ast,&frame);
+		
+	}  else {
+		ast_log (LOG_WARNING, "No ast || ast->pvt || ch\n");
+	}
+	
+	return 0;
+}
+
+/** Channel Queue ***/
+
+struct chan_list *find_chan_by_l3id(struct chan_list *list, unsigned long l3id)
+{
+	struct chan_list *help=list;
+	for (;help; help=help->next) {
+		if (help->l3id == l3id ) return help;
+	}
+  
+	chan_misdn_log(4, list? (list->bc? list->bc->stack->port : 0) : 0, "$$$ find_chan: No channel found with l3id:%x\n",l3id);
+  
+	return NULL;
+}
+
+struct chan_list *find_chan_by_bc(struct chan_list *list, struct misdn_bchannel *bc)
+{
+	struct chan_list *help=list;
+	for (;help; help=help->next) {
+		if (help->bc == bc) return help;
+	}
+  
+	chan_misdn_log(4, bc->stack->port, "$$$ find_chan: No channel found for oad:%s dad:%s\n",bc->oad,bc->dad);
+  
+	return NULL;
+}
+
+
+struct chan_list *find_holded(struct chan_list *list, struct misdn_bchannel *bc)
+{
+	struct chan_list *help=list;
+	
+	chan_misdn_log(4, bc->stack->port, "$$$ find_holded: channel:%d oad:%s dad:%s\n",bc->channel, bc->oad,bc->dad);
+	for (;help; help=help->next) {
+		chan_misdn_log(4, bc->stack->port, "$$$ find_holded: --> holded:%d channel:%d\n",help->bc->holded, help->bc->channel);
+		if (help->bc->stack == bc->stack
+		    && help->bc->holded ) return help;
+	}
+	
+	chan_misdn_log(4, bc->stack->port, "$$$ find_chan: No channel found for oad:%s dad:%s\n",bc->oad,bc->dad);
+  
+	return NULL;
+}
+
+void cl_queue_chan(struct chan_list **list, struct chan_list *chan)
+{
+	chan_misdn_log(4, chan->bc? chan->bc->stack->port : 0, "* Queuing chan %p\n",chan);
+  
+	pthread_mutex_lock(&cl_te_lock);
+	if (!*list) {
+		*list = chan;
+	} else {
+		struct chan_list *help=*list;
+		for (;help->next; help=help->next); 
+		help->next=chan;
+	}
+	chan->next=NULL;
+	pthread_mutex_unlock(&cl_te_lock);
+}
+
+void cl_dequeue_chan(struct chan_list **list, struct chan_list *chan) 
+{
+	if (chan->dsp) 
+		ast_dsp_free(chan->dsp);
+	if (chan->trans)
+		ast_translator_free_path(chan->trans);
+	
+	pthread_mutex_lock(&cl_te_lock);
+	if (!*list) {
+		pthread_mutex_unlock(&cl_te_lock);
+		return;
+	}
+  
+	if (*list == chan) {
+		*list=(*list)->next;
+		pthread_mutex_unlock(&cl_te_lock);
+		return ;
+	}
+  
+	{
+		struct chan_list *help=*list;
+		for (;help->next; help=help->next) {
+			if (help->next == chan) {
+				help->next=help->next->next;
+				pthread_mutex_unlock(&cl_te_lock);
+				return;
+			}
+		}
+	}
+	
+	pthread_mutex_unlock(&cl_te_lock);
+}
+
+/** Channel Queue End **/
+
+
+
+/** Isdn asks us to release channel, pendant to misdn_hangup **/
+static void release_chan(struct misdn_bchannel *bc) {
+	struct ast_channel *ast=NULL;
+	
+	{
+		struct chan_list *ch=find_chan_by_bc(cl_te, bc);
+		if (!ch) ch=find_chan_by_l3id (cl_te, bc->l3_id);
+		
+		release_lock;
+		if (ch->ast) {
+			ast=ch->ast;
+		} 
+		release_unlock;
+		
+		chan_misdn_log(1, bc->stack->port, "Trying to Release bc with l3id: %x\n",bc->l3_id);
+		if (ch) {
+			if (ast)
+				chan_misdn_trace_call(ast,1,"I->*: EVENT_RELEASE\n");
+			
+			close(ch->pipe[0]);
+			close(ch->pipe[1]);
+			
+			if (ast && MISDN_ASTERISK_PVT(ast)) {
+				chan_misdn_log(1, bc->stack->port, "* RELEASING CHANNEL pid:%d ctx:%s dad:%s oad:%s state: %s\n",bc?bc->pid:-1, ast->context, ast->exten,AST_CID_P(ast),misdn_get_ch_state(ch));
+				chan_misdn_log(3, bc->stack->port, " --> * State Down\n");
+				/* copy cause */
+				send_cause2ast(ast,bc);
+				
+				MISDN_ASTERISK_TECH_PVT(ast)=NULL;
+				
+      
+				if (ast->_state != AST_STATE_RESERVED) {
+					chan_misdn_log(3, bc->stack->port, " --> Setting AST State to down\n");
+					ast_setstate(ast, AST_STATE_DOWN);
+				}
+				
+				switch(ch->state) {
+				case MISDN_EXTCANTMATCH:
+				case MISDN_WAITING4DIGS:
+				{
+					chan_misdn_log(3,  bc->stack->port, " --> * State Wait4dig | ExtCantMatch\n");
+					ast_hangup(ast);
+				}
+				break;
+	
+				case MISDN_CALLING:
+				case MISDN_CALLING_ACKNOWLEDGE:
+				case MISDN_DIALING:
+				case MISDN_PROGRESS:
+					chan_misdn_log(2,  bc->stack->port, "* --> In State Calling|Dialing\n");
+					chan_misdn_log(2,  bc->stack->port, "* --> Queue Hangup\n");
+	
+
+					ast_queue_control(ast, AST_CONTROL_HANGUP);
+					break;
+				case MISDN_CLEANING:
+					/* this state comes out of ast so we mustnt call a ast function ! */
+					chan_misdn_log(2,  bc->stack->port, "* --> In StateCleaning\n");
+					break;
+				case MISDN_HOLD_DISCONNECT:
+					chan_misdn_log(2,  bc->stack->port, "* --> In HOLD_DISC\n");
+					break;
+				default:
+					chan_misdn_log(2,  bc->stack->port, "* --> In State Default\n");
+					chan_misdn_log(2,  bc->stack->port, "* --> Queue Hangup\n");
+	
+					
+					if (ast && MISDN_ASTERISK_PVT(ast)) {
+						ast_queue_hangup(ast);
+					} else {
+						chan_misdn_log (0,  bc->stack->port, "!! Not really queued!\n");
+					}
+				}
+			}
+			cl_dequeue_chan(&cl_te, ch);
+			
+			free(ch);
+		} else {
+			/* chan is already cleaned, so exiting  */
+		}
+	}
+}
+/*** release end **/
+
+void misdn_transfer_bc(struct chan_list *tmp_ch, struct chan_list *holded_chan)
+{
+	chan_misdn_log(4,0,"TRANSFERING %s to %s\n",holded_chan->ast->name, tmp_ch->ast->name);
+	
+	tmp_ch->state=MISDN_HOLD_DISCONNECT;
+  
+	ast_moh_stop(AST_BRIDGED_P(holded_chan->ast));
+
+	holded_chan->state=MISDN_CONNECTED;
+	holded_chan->holded=0;
+	misdn_lib_transfer(holded_chan->bc?holded_chan->bc:holded_chan->holded_bc);
+	
+	ast_channel_masquerade(holded_chan->ast, AST_BRIDGED_P(tmp_ch->ast));
+}
+
+
+void do_immediate_setup(struct misdn_bchannel *bc,struct chan_list *ch , struct ast_channel *ast)
+{
+	char predial[256]="";
+	char *p = predial;
+  
+	struct ast_frame fr;
+  
+	strncpy(predial, ast->exten, sizeof(predial) -1 );
+  
+	ch->state=MISDN_DIALING;
+	
+	if (bc->stack->mode == NT_MODE) {
+		int ret; 
+		ret = misdn_lib_send_event(bc, EVENT_SETUP_ACKNOWLEDGE );
+	} else {
+		int ret;
+		if (bc->stack->ptp) {
+			ret = misdn_lib_send_event(bc, EVENT_SETUP_ACKNOWLEDGE );
+		} else {
+			ret = misdn_lib_send_event(bc, EVENT_PROCEEDING );
+		}
+	}
+
+	manager_send_tone(bc,TONE_DIAL);  
+  
+	chan_misdn_log(1, bc->stack->port, "* Starting Ast ctx:%s dad:%s oad:%s with 's' extension\n", ast->context, ast->exten, AST_CID_P(ast));
+  
+	strncpy(ast->exten,"s", 2);
+  
+	if (ast_pbx_start(ast)<0) {
+		ast=NULL;
+		manager_send_tone(bc,TONE_BUSY);
+		if (bc->stack->mode == NT_MODE)
+			misdn_lib_send_event(bc, EVENT_RELEASE_COMPLETE );
+		else
+			misdn_lib_send_event(bc, EVENT_DISCONNECT );
+	}
+  
+  
+	while (!ast_strlen_zero(p) ) {
+		fr.frametype = AST_FRAME_DTMF;
+		fr.subclass = *p ;
+		fr.src=NULL;
+		fr.data = NULL ;
+		fr.datalen = 0;
+		fr.samples = 0 ;
+		fr.mallocd =0 ;
+		fr.offset= 0 ;
+
+		if (ch->ast && MISDN_ASTERISK_PVT(ch->ast) && MISDN_ASTERISK_TECH_PVT(ch->ast)) {
+			ast_queue_frame(ch->ast, &fr);
+		}
+		p++;
+	}
+}
+
+
+
+void send_cause2ast(struct ast_channel *ast, struct misdn_bchannel*bc) {
+	
+	ast->hangupcause=bc->cause;
+	
+	switch ( bc->cause) {
+		
+	case 1: /** Congestion Cases **/
+	case 2:
+	case 3:
+ 	case 4:
+ 	case 22:
+ 	case 27:
+		chan_misdn_log(1, bc?bc->stack->port:0, " --> * SEND: Queue Congestion pid:%d\n", bc?bc->pid:-1);
+		
+		ast_queue_control(ast, AST_CONTROL_CONGESTION);
+		break;
+		
+	case 21:
+	case 17: /* user busy */
+		chan_misdn_log(1,  bc?bc->stack->port:0, " --> * SEND: Queue Busy pid:%d\n", bc?bc->pid:-1);
+		
+		ast_queue_control(ast, AST_CONTROL_BUSY);
+		
+		break;
+	}
+}
+
+/************************************************************/
+/*  Receive Events from isdn_lib  here                     */
+/************************************************************/
+enum event_response_e
+cb_events(enum event_e event, struct misdn_bchannel *bc, void *user_data)
+{
+	struct chan_list *ch=find_chan_by_bc(cl_te, bc);
+	
+	if (!ch)
+		ch=find_chan_by_l3id(cl_te, bc->l3_id);
+	
+	if (event != EVENT_BCHAN_DATA) { /*  Debug Only Non-Bchan */
+		chan_misdn_log(1, bc->stack->port, "I IND :%s oad:%s dad:%s port:%d\n", manager_isdn_get_info(event), bc->oad, bc->dad, bc->stack->port);
+		misdn_lib_log_ies(bc);
+	}
+	
+	if (event != EVENT_SETUP) {
+		if (!ch) {
+			if (event != EVENT_CLEANUP )
+				ast_log(LOG_WARNING, "Chan not existing at the moment bc->l3id:%x bc:%p event:%s port:%d channel:%d\n",bc->l3_id, bc, manager_isdn_get_info( event), bc->stack->port,bc->channel);
+			return -1;
+		}
+	}
+	
+	if (ch ) {
+		switch (event) {
+		case EVENT_RELEASE:
+		case EVENT_RELEASE_COMPLETE:
+		case EVENT_CLEANUP:
+			break;
+		default:
+			if ( !ch->ast  || !MISDN_ASTERISK_PVT(ch->ast) || !MISDN_ASTERISK_TECH_PVT(ch->ast)) {
+				if (event!=EVENT_BCHAN_DATA)
+					ast_log(LOG_WARNING, "No Ast or No private Pointer in Event (%d:%s)\n", event, manager_isdn_get_info(event));
+				return -1;
+			}
+		}
+	}
+	
+	
+	switch (event) {
+	case EVENT_NEW_L3ID:
+		ch->l3id=bc->l3_id;
+		break;
+
+	case EVENT_NEW_BC:
+		if (bc)
+			ch->bc=bc;
+		break;
+		
+	case EVENT_DTMF_TONE:
+	{
+		/*  sending INFOS as DTMF-Frames :) */
+		struct ast_frame fr;
+		memset(&fr, 0 , sizeof(fr));
+		fr.frametype = AST_FRAME_DTMF;
+		fr.subclass = bc->dtmf ;
+		fr.src=NULL;
+		fr.data = NULL ;
+		fr.datalen = 0;
+		fr.samples = 0 ;
+		fr.mallocd =0 ;
+		fr.offset= 0 ;
+		
+		chan_misdn_log(2, bc->stack->port, " --> DTMF:%c\n", bc->dtmf);
+		
+		ast_queue_frame(ch->ast, &fr);
+	}
+	break;
+	case EVENT_STATUS:
+		break;
+    
+	case EVENT_INFORMATION:
+	{
+		int stop_tone;
+		misdn_cfg_get( 0, MISDN_GEN_STOP_TONE, &stop_tone, sizeof(int));
+		if ( stop_tone && bc->tone != TONE_NONE) {
+			manager_send_tone(bc,TONE_NONE);
+		}
+		
+		if (ch->state == MISDN_WAITING4DIGS ) {
+			/*  Ok, incomplete Setup, waiting till extension exists */
+			{
+				int l = sizeof(bc->dad);
+				strncat(bc->dad,bc->info_dad, l);
+				bc->dad[l-1] = 0;
+			}
+			
+			
+			{
+				int l = sizeof(ch->ast->exten);
+				strncpy(ch->ast->exten, bc->dad, l);
+				ch->ast->exten[l-1] = 0;
+			}
+/*			chan_misdn_log(5, bc->stack->port, "Can Match Extension: dad:%s oad:%s\n",bc->dad,bc->oad);*/
+			
+			char bc_context[BUFFERSIZE];
+			misdn_cfg_get( bc->stack->port, MISDN_CFG_CONTEXT, bc_context, BUFFERSIZE);
+			if(!ast_canmatch_extension(ch->ast, bc_context, bc->dad, 1, bc->oad)) {
+				chan_misdn_log(0, bc->stack->port, "Extension can never match, so disconnecting\n");
+				manager_send_tone(bc,TONE_BUSY);
+				ch->state=MISDN_EXTCANTMATCH;
+				bc->out_cause=1;
+				if (bc->stack->mode == NT_MODE)
+					misdn_lib_send_event(bc, EVENT_RELEASE_COMPLETE );
+				else
+					misdn_lib_send_event(bc, EVENT_DISCONNECT );
+				break;
+			}
+			if (ast_exists_extension(ch->ast, bc_context, bc->dad, 1, bc->oad)) {
+				ch->state=MISDN_DIALING;
+	  
+				manager_send_tone(bc,TONE_NONE);
+/*				chan_misdn_log(1, bc->stack->port, " --> * Starting Ast ctx:%s\n", ch->ast->context);*/
+				if (ast_pbx_start(ch->ast)<0) {
+					chan_misdn_log(0, bc->stack->port, "ast_pbx_start returned < 0 in INFO\n");
+					manager_send_tone(bc,TONE_BUSY);
+					if (bc->stack->mode == NT_MODE)
+						misdn_lib_send_event(bc, EVENT_RELEASE_COMPLETE );
+					else
+						misdn_lib_send_event(bc, EVENT_DISCONNECT );
+				}
+			}
+	
+		} else {
+			/*  sending INFOS as DTMF-Frames :) */
+			struct ast_frame fr;
+			fr.frametype = AST_FRAME_DTMF;
+			fr.subclass = bc->info_dad[0] ;
+			fr.src=NULL;
+			fr.data = NULL ;
+			fr.datalen = 0;
+			fr.samples = 0 ;
+			fr.mallocd =0 ;
+			fr.offset= 0 ;
+
+			
+			int digits;
+			misdn_cfg_get( 0, MISDN_GEN_APPEND_DIGITS2EXTEN, &digits, sizeof(int));
+			if (ch->state != MISDN_CONNECTED && digits) {
+				{
+					int l = sizeof(bc->dad);
+					strncat(bc->dad,bc->info_dad, l);
+					bc->dad[l-1] = 0;
+				}
+				{
+					int l = sizeof(ch->ast->exten);
+					strncpy(ch->ast->exten, bc->dad, l);
+					ch->ast->exten[l-1] = 0;
+				}
+				ast_cdr_update(ch->ast);
+				
+				ast_queue_frame(ch->ast, &fr);
+				
+			}
+			
+		}
+	}
+	break;
+	case EVENT_SETUP:
+	{
+		struct chan_list *ch=find_chan_by_bc(cl_te, bc);
+		if (ch && ch->state != MISDN_NOTHING ) {
+			chan_misdn_log(1, bc->stack->port, " --> Ignoring Call we have already one\n");
+			return RESPONSE_IGNORE_SETUP_WITHOUT_CLOSE; /*  Ignore MSNs which are not in our List */
+		}
+	}
+	
+	int msn_valid = misdn_cfg_is_msn_valid(bc->stack->port, bc->dad);
+	if (bc->stack->mode == TE_MODE && ! msn_valid) {
+		chan_misdn_log(1, bc->stack->port, " --> Ignoring Call, its not in our MSN List\n");
+		return RESPONSE_IGNORE_SETUP; /*  Ignore MSNs which are not in our List */
+	}
+	
+	print_bearer(bc);
+    
+	{
+		struct chan_list *ch=init_chan_list();
+		struct ast_channel *chan;
+		char name[128];
+		if (!ch) { chan_misdn_log(0, bc->stack->port, "cb_events: malloc for chan_list failed!\n"); return 0;}
+		
+		ch->bc = bc;
+		ch->l3id=bc->l3_id;
+		ch->addr=bc->addr;
+		ch->orginator = ORG_MISDN;
+
+		
+		{
+			char prefix[BUFFERSIZE]="";
+			switch( bc->onumplan ) {
+			case NUMPLAN_INTERNATIONAL:
+				misdn_cfg_get( bc->stack->port, MISDN_CFG_INTERNATPREFIX, prefix, BUFFERSIZE);
+				break;
+	  
+			case NUMPLAN_NATIONAL:
+				misdn_cfg_get( bc->stack->port, MISDN_CFG_NATPREFIX, prefix, BUFFERSIZE);
+				break;
+	  
+	  
+			case NUMPLAN_SUBSCRIBER:
+				/* dunno what to do here ? */
+				break;
+
+			case NUMPLAN_UNKNOWN:
+				break;
+			default:
+				break;
+			}
+
+			{
+				int l = strlen(prefix) + strlen(bc->oad);
+				char tmp[l+1];
+				strcpy(tmp,prefix);
+				strcat(tmp,bc->oad);
+				strcpy(bc->oad,tmp);
+			}
+			
+			if (!ast_strlen_zero(bc->oad))
+				sprintf(name,"mISDN/%d/%s",bc->stack->port,bc->oad);
+			else
+				sprintf(name,"mISDN/%d",bc->stack->port);
+
+
+			if (!ast_strlen_zero(bc->dad)) {
+				strncpy(bc->orig_dad,bc->dad, sizeof(bc->orig_dad));
+				bc->orig_dad[sizeof(bc->orig_dad)-1] = 0;
+			}
+			
+			if ( ast_strlen_zero(bc->dad) && !ast_strlen_zero(bc->keypad)) {
+				strncpy(bc->dad,bc->keypad, sizeof(bc->dad));
+				bc->dad[sizeof(bc->dad)-1] = 0;
+			}
+			prefix[0] = 0;
+			
+			switch( bc->dnumplan ) {
+			case NUMPLAN_INTERNATIONAL:
+				misdn_cfg_get( bc->stack->port, MISDN_CFG_INTERNATPREFIX, prefix, BUFFERSIZE);
+				break;
+				
+			case NUMPLAN_NATIONAL:
+				misdn_cfg_get( bc->stack->port, MISDN_CFG_NATPREFIX, prefix, BUFFERSIZE);
+				break;
+				
+				
+			case NUMPLAN_SUBSCRIBER:
+				/* dunno what to do here ? */
+				break;
+				
+			case NUMPLAN_UNKNOWN:
+				break;
+			default:
+				break;
+			}
+		
+			{
+				int l = strlen(prefix) + strlen(bc->dad);
+				char tmp[l+1];
+				strcpy(tmp,prefix);
+				strcat(tmp,bc->dad);
+				strcpy(bc->dad,tmp);
+			}
+			
+			char bc_context[BUFFERSIZE];
+			misdn_cfg_get( bc->stack->port, MISDN_CFG_CONTEXT, bc_context, BUFFERSIZE);
+			chan=misdn_new(ch, AST_STATE_RING,name ,bc_context, bc->dad, bc->oad, AST_FORMAT_ALAW, bc->stack->port, bc->channel);
+			
+			pbx_builtin_setvar_helper(ch->ast,"REDIRECTING_NUMBER",bc->rad);
+			
+		}
+
+		ch->ast = chan;
+
+		chan_misdn_trace_call(chan,1,"I->*: EVENT_SETUP\n");
+		
+		if ( bc->pres ) {
+			chan->cid.cid_pres=AST_PRES_ALLOWED_USER_NUMBER_NOT_SCREENED;
+		}  else {
+			chan->cid.cid_pres=AST_PRES_ALLOWED_USER_NUMBER_PASSED_SCREEN;
+		}
+      
+		pbx_builtin_setvar_helper(chan, "TRANSFERCAPABILITY", ast_transfercapability2str(bc->capability));
+		chan->transfercapability=bc->capability;
+      
+		switch (bc->capability) {
+		case INFO_CAPABILITY_DIGITAL_UNRESTRICTED:
+			pbx_builtin_setvar_helper(chan,"CALLTYPE","DIGITAL");
+			break;
+		default:
+			pbx_builtin_setvar_helper(chan,"CALLTYPE","SPEECH");
+		}
+
+		/** queue new chan **/
+		cl_queue_chan(&cl_te, ch) ;
+
+		/* Check for Pickup Request first */
+		if (!strcmp(chan->exten, ast_pickup_ext())) {
+			int ret;/** Sending SETUP_ACK**/
+			ret = misdn_lib_send_event(bc, EVENT_SETUP_ACKNOWLEDGE );
+	
+			if (ast_pickup_call(chan)) {
+				ast_hangup(chan);
+			} else {
+				ch->state = MISDN_CALLING_ACKNOWLEDGE;
+	  
+				ch->ast=NULL;
+	  
+				ast_setstate(chan, AST_STATE_DOWN);
+				ast_hangup(chan); 
+	  
+				break;
+			}
+		}
+		/*
+		  added support for s extension hope it will help those poor cretains
+		  which haven't overlap dial.
+		*/
+		{
+			
+			misdn_cfg_get( bc->stack->port, MISDN_CFG_LANGUAGE, chan->language, sizeof(chan->language));
+			int ai;
+			misdn_cfg_get( bc->stack->port, MISDN_CFG_ALWAYS_IMMEDIATE, &ai, sizeof(ai));
+			if ( ai ) {
+				do_immediate_setup(bc, ch , chan);
+				break;
+			}
+
+			int immediate;
+			misdn_cfg_get( bc->stack->port, MISDN_CFG_IMMEDIATE, &immediate, sizeof(int));
+			
+			if (ast_strlen_zero(bc->orig_dad) && immediate ) {
+				do_immediate_setup(bc, ch , chan);
+				break;
+			}
+			
+		}
+
+		/** Now after we've finished configuring our channel object
+		    we'll jump into the dialplan **/
+		
+		char bc_context[BUFFERSIZE];
+		misdn_cfg_get( bc->stack->port, MISDN_CFG_CONTEXT, bc_context, BUFFERSIZE);
+		if(!ast_canmatch_extension(ch->ast, bc_context, bc->dad, 1, bc->oad)) {
+			chan_misdn_log(0, bc->stack->port, "Extension can never match, so disconnecting\n");
+			manager_send_tone(bc,TONE_BUSY);
+			ch->state=MISDN_EXTCANTMATCH;
+			bc->out_cause=1;
+			if (bc->stack->mode == NT_MODE)
+				misdn_lib_send_event(bc, EVENT_RELEASE_COMPLETE );
+			else
+				misdn_lib_send_event(bc, EVENT_DISCONNECT );
+			break;
+		}
+		
+		if (ast_exists_extension(ch->ast, bc_context, bc->dad, 1, bc->oad)) {
+			ch->state=MISDN_DIALING;
+	
+			if (bc->stack->mode == NT_MODE) {
+				int ret; 
+				ret = misdn_lib_send_event(bc, EVENT_SETUP_ACKNOWLEDGE );
+			} else {
+				int ret;
+				ret= misdn_lib_send_event(bc, EVENT_PROCEEDING );
+			}
+	
+			if (ast_pbx_start(chan)<0) {
+				chan_misdn_log(0, bc->stack->port, "ast_pbx_start returned <0 in SETUP\n");
+				chan=NULL;
+				manager_send_tone(bc,TONE_BUSY);
+				if (bc->stack->mode == NT_MODE)
+					misdn_lib_send_event(bc, EVENT_RELEASE_COMPLETE );
+				else
+					misdn_lib_send_event(bc, EVENT_DISCONNECT );
+			}
+		} else {
+			int ret= misdn_lib_send_event(bc, EVENT_SETUP_ACKNOWLEDGE );
+			if (ret == -ENOCHAN) {
+				ast_log(LOG_WARNING,"Channel was catched, before we could Acknowledge\n");
+				misdn_lib_send_event(bc,EVENT_RELEASE_COMPLETE);
+			}
+			/*  send tone to phone :) */
+			
+			int stop_tone;
+			misdn_cfg_get( 0, MISDN_GEN_STOP_TONE, &stop_tone, sizeof(int));
+			if ( (!ast_strlen_zero(bc->dad)) && stop_tone ) 
+				manager_send_tone(bc,TONE_NONE);
+			else
+				manager_send_tone(bc,TONE_DIAL);
+	
+			ch->state=MISDN_WAITING4DIGS;
+		}
+      
+	}
+	break;
+	case EVENT_SETUP_ACKNOWLEDGE:
+	{
+		ch->state = MISDN_CALLING_ACKNOWLEDGE;
+		if (!ast_strlen_zero(bc->infos_pending)) {
+			/* TX Pending Infos */
+			
+			{
+				int l = sizeof(bc->dad);
+				strncat(bc->dad,bc->infos_pending, l - strlen(bc->dad));
+				bc->dad[l-1] = 0;
+			}	
+			{
+				int l = sizeof(ch->ast->exten);
+				strncpy(ch->ast->exten, bc->dad, l);
+				ch->ast->exten[l-1] = 0;
+			}
+			{
+				int l = sizeof(bc->info_dad);
+				strncpy(bc->info_dad, bc->infos_pending, l);
+				bc->info_dad[l-1] = 0;
+			}
+			strncpy(bc->infos_pending,"", 1);
+
+			misdn_lib_send_event(bc, EVENT_INFORMATION);
+		}
+	}
+	break;
+	case EVENT_PROCEEDING:
+	{
+		
+		if ( misdn_cap_is_speech(bc->capability) &&
+		     misdn_inband_avail(bc) ) {
+			start_bc_tones(ch);
+		}
+	}
+	break;
+	case EVENT_PROGRESS:
+		if (bc->stack->mode == TE_MODE ) {
+			if ( misdn_cap_is_speech(bc->capability) &&
+			     misdn_inband_avail(bc)
+				) {
+				start_bc_tones(ch);
+			}
+			
+			ast_queue_control(ch->ast, AST_CONTROL_PROGRESS);
+			
+			ch->state=MISDN_PROGRESS;
+		}
+		break;
+		
+		
+	case EVENT_ALERTING:
+	{
+		ch->state = MISDN_ALERTING;
+		
+		chan_misdn_trace_call(ch->ast,1,"I->*: EVENT_ALERTING\n");
+		 
+		 ast_queue_control(ch->ast, AST_CONTROL_RINGING);
+		 ast_setstate(ch->ast, AST_STATE_RINGING);
+		 
+		 if ( misdn_cap_is_speech(bc->capability) && misdn_inband_avail(bc)) {
+			 start_bc_tones(ch);
+		 }
+	}
+	break;
+	case EVENT_CONNECT:
+		misdn_lib_send_event(bc,EVENT_CONNECT_ACKNOWLEDGE);
+	case EVENT_CONNECT_ACKNOWLEDGE:
+	{
+		bc->state=STATE_CONNECTED;
+		
+		ch->l3id=bc->l3_id;
+		ch->addr=bc->addr;
+		
+		start_bc_tones(ch);
+		
+		chan_misdn_trace_call(ch->ast,1,"I->*: EVENT_CONNECT\n");
+		
+		ch->state = MISDN_CONNECTED;
+		ast_queue_control(ch->ast, AST_CONTROL_ANSWER);
+	}
+	break;
+	case EVENT_DISCONNECT:
+	{
+		
+		struct chan_list *holded_ch=find_holded(cl_te, bc);
+		
+		if (holded_ch ) {
+			if  (ch->state == MISDN_CONNECTED ) {
+				misdn_transfer_bc(ch, holded_ch) ;
+				misdn_lib_send_event(bc,EVENT_RELEASE_COMPLETE);
+				break;
+			}
+		}
+
+		send_cause2ast(ch->ast,bc);
+
+		if (!misdn_inband_avail(bc)) {
+			/* If Inband Avail. In TE, wait till we get hangup from ast. */
+			stop_bc_tones(ch);
+		}
+		bc->out_cause=16;
+		misdn_lib_send_event(bc,EVENT_RELEASE);
+		
+	}
+	break;
+	
+	case EVENT_RELEASE:
+		{
+			
+			switch ( bc->cause) {
+				
+			case -1:
+				/*
+				  OK, it really sucks, this is a RELEASE from NT-Stack So we take
+				  it and return easylie, It seems that we've send a DISCONNECT
+				  before, so we should RELEASE_COMPLETE after that Disconnect
+				  (looks like ALERTING State at misdn_hangup !!
+				*/
+				return RESPONSE_OK;
+				break;
+			}
+			
+			
+			bc->out_cause=16;
+			
+			stop_bc_tones(ch);
+			release_chan(bc);
+		}
+		break;
+	case EVENT_RELEASE_COMPLETE:
+	{
+		stop_bc_tones(ch);
+		release_chan(bc);
+	}
+	break;
+	
+	case EVENT_BCHAN_DATA:
+	{
+		chan_misdn_trace_call(ch->ast,3,"I->*: EVENT_B_DATA len=%d\n",bc->bframe_len);
+		
+		if ( !misdn_cap_is_speech(ch->bc->capability) || bc->nojitter) {
+			misdn_tx2ast_frm(ch, bc->bframe, bc->bframe_len );
+		} else {
+			int len=bc->bframe_len;
+			
+			if (bc->bframe_len > ibuf_freecount(bc->astbuf)) {
+				ast_log(LOG_DEBUG, "sbuf overflow!\n");
+				len=ibuf_freecount(bc->astbuf);
+			}
+			
+			ibuf_memcpy_w(bc->astbuf, bc->bframe, len);
+			
+			{
+				char blah[1]="\0";
+#ifdef FLATTEN_JITTER
+				{
+					struct timeval tv;
+					gettimeofday(&tv,NULL);
+					
+					if (tv.tv_usec % 10000 > 0 ) {
+						write(ch->pipe[1], blah,sizeof(blah));
+						bc->time_usec=tv.tv_usec;
+					}
+				}
+#else
+				write(ch->pipe[1], blah,sizeof(blah));
+#endif
+				
+
+			}
+		}
+		
+	}
+	break;
+	case EVENT_TIMEOUT:
+		break; /* Ignore now .. */
+		{
+			switch (ch->state) {
+			case MISDN_CALLING:
+				chan_misdn_log(0, bc?bc->stack->port:0, "GOT TIMOUT AT CALING pid:%d\n", bc?bc->pid:-1);
+					break;
+			case MISDN_DIALING:
+			case MISDN_PROGRESS:
+				break;
+			default:
+				misdn_lib_send_event(bc,EVENT_RELEASE_COMPLETE);
+			}
+		}
+		break;
+	case EVENT_CLEANUP:
+	{
+		stop_bc_tones(ch);
+		release_chan(bc);
+	}
+	break;
+    
+	/***************************/
+	/** Suplementary Services **/
+	/***************************/
+	case EVENT_RETRIEVE:
+	{
+		struct ast_channel *hold_ast=AST_BRIDGED_P(ch->ast);
+		ch->state = MISDN_CONNECTED;
+		
+		//ast_moh_stop(ch->ast);
+		//start_bc_tones(ch);
+		if (hold_ast) {
+			ast_moh_stop(hold_ast);
+		}
+		
+		if ( misdn_lib_send_event(bc, EVENT_RETRIEVE_ACKNOWLEDGE) < 0)
+			misdn_lib_send_event(bc, EVENT_RETRIEVE_REJECT);
+		
+		
+	}
+	break;
+    
+	case EVENT_HOLD:
+	{
+		int hold_allowed;
+		misdn_cfg_get( bc->stack->port, MISDN_CFG_HOLD_ALLOWED, &hold_allowed, sizeof(int));
+		
+		if (!hold_allowed) {
+			chan_misdn_log(0, bc->stack->port, "Hold not allowed on port:%d\n", bc->stack->port);
+			misdn_lib_send_event(bc, EVENT_HOLD_REJECT);
+			break;
+		}
+
+		{
+			struct chan_list *holded_ch=find_holded(cl_te, bc);
+			if (holded_ch) {
+				misdn_lib_send_event(bc, EVENT_HOLD_REJECT);
+				chan_misdn_log(0, bc->stack->port, "We can't use RETRIEVE at the moment due to mISDN bug!\n");
+				break;
+			}
+		}
+		
+		if (AST_BRIDGED_P(ch->ast)){
+			ch->state = MISDN_HOLDED;
+			ch->l3id = bc->l3_id;
+			
+			ast_moh_start(AST_BRIDGED_P(ch->ast), NULL);
+			misdn_lib_send_event(bc, EVENT_HOLD_ACKNOWLEDGE);
+		} else {
+			misdn_lib_send_event(bc, EVENT_HOLD_REJECT);
+			chan_misdn_log(0, bc->stack->port, "We aren't bridged to anybody\n");
+		}
+	} 
+	break;
+	default:
+		ast_log(LOG_WARNING, "Got Unknown Event\n");
+		break;
+	}
+	
+	return RESPONSE_OK;
+}
+
+/** TE STUFF END **/
+
+/******************************************
+ *
+ *   Asterisk Channel Endpoint END
+ *
+ *
+ *******************************************/
+
+
+int clearl3_true ( void ) {
+	int default_clearl3;
+	misdn_cfg_get( 0, MISDN_GEN_CLEAR_L3, &default_clearl3, sizeof(int));
+	return default_clearl3;
+}
+
+int g_config_initialized=0;
+
+int load_module(void)
+{
+	int i;
+	
+	char ports[256]="";
+	
+	max_ports=misdn_lib_maxports_get();
+	
+	if (max_ports<=0) {
+		ast_log(LOG_ERROR, "Unable to initialize mISDN\n");
+		return -1;
+	}
+	
+	
+	misdn_cfg_init(max_ports);
+	g_config_initialized=1;
+	
+	misdn_debug = (int *)malloc(sizeof(int) * (max_ports+1));
+	misdn_cfg_get( 0, MISDN_GEN_DEBUG, &misdn_debug[0], sizeof(int));
+	for (i = 1; i <= max_ports; i++)
+		misdn_debug[i] = misdn_debug[0];
+	misdn_debug_only = (int *)calloc(max_ports + 1, sizeof(int));
+
+	
+	{
+		char tempbuf[BUFFERSIZE];
+		misdn_cfg_get( 0, MISDN_GEN_TRACEFILE, tempbuf, BUFFERSIZE);
+		if (strlen(tempbuf))
+			tracing = 1;
+	}
+
+	pthread_mutex_init(&cl_te_lock, NULL);
+	pthread_mutex_init(&release_lock_mutex, NULL);
+
+	misdn_cfg_get_ports_string(ports);
+	if (strlen(ports))
+		chan_misdn_log(0, 0, "Got: %s from get_ports\n",ports);
+	
+	{
+		struct misdn_lib_iface iface = {
+			.cb_event = cb_events,
+			.cb_log = chan_misdn_log,
+			.cb_clearl3_true = clearl3_true
+		};
+		if (misdn_lib_init(ports, &iface, NULL))
+			chan_misdn_log(0, 0, "No te ports initialized\n");
+	}
+
+
+	{
+		if (ast_channel_register(&misdn_tech)) {
+			ast_log(LOG_ERROR, "Unable to register channel class %s\n", type);
+			unload_module();
+			return -1;
+		}
+	}
+  
+	ast_cli_register(&cli_send_display);
+	ast_cli_register(&cli_send_cd);
+	ast_cli_register(&cli_send_digit);
+	ast_cli_register(&cli_toggle_echocancel);
+	ast_cli_register(&cli_set_tics);
+
+	ast_cli_register(&cli_show_cls);
+	ast_cli_register(&cli_show_cl);
+	ast_cli_register(&cli_show_config);
+	ast_cli_register(&cli_show_port);
+	ast_cli_register(&cli_show_stacks);
+	ast_cli_register(&cli_show_fullstacks);
+	ast_cli_register(&cli_flush_stack);
+	ast_cli_register(&cli_restart_port);
+	ast_cli_register(&cli_port_up);
+	ast_cli_register(&cli_set_debug);
+	ast_cli_register(&cli_set_crypt_debug);
+	ast_cli_register(&cli_reload);
+
+  
+	ast_register_application("misdn_set_opt", misdn_set_opt_exec, "misdn_set_flags",
+				 "misdn_set_opt(:<opt><optarg>:<opt><optarg>..):\n"
+				 "Sets mISDN opts. and optargs\n"
+				 "\n"
+		);
+
+	
+	ast_register_application("misdn_facility", misdn_facility_exec, "misdn_facility",
+				 "misdn_facility(<FACILITY_TYPE>|<ARG1>|..)\n"
+				 "Sends the Facility Message FACILITY_TYPE with \n"
+				 "the given Arguments to the current ISDN Channel\n"
+				 "Supported Facilities are:\n"
+				 "\n"
+				 "type=calldeflect args=Nr where to deflect\n"
+				 "\n"
+		);
+  
+	chan_misdn_log(0, 0, "-- mISDN Channel Driver Registred -- (BE AWARE THIS DRIVER IS EXPERIMENTAL!)\n");
+
+	return 0;
+}
+
+
+
+int unload_module(void)
+{
+	/* First, take us out of the channel loop */
+	chan_misdn_log(0, 0, "-- Unregistering mISDN Channel Driver --\n");
+
+	if (!g_config_initialized) return 0;
+	
+	ast_cli_unregister(&cli_send_display);
+	
+	ast_cli_unregister(&cli_send_cd);
+	
+	ast_cli_unregister(&cli_send_digit);
+	ast_cli_unregister(&cli_toggle_echocancel);
+	ast_cli_unregister(&cli_set_tics);
+  
+	ast_cli_unregister(&cli_show_cls);
+	ast_cli_unregister(&cli_show_cl);
+	ast_cli_unregister(&cli_show_config);
+	ast_cli_unregister(&cli_show_port);
+	ast_cli_unregister(&cli_show_stacks);
+	ast_cli_unregister(&cli_show_fullstacks);
+	ast_cli_unregister(&cli_flush_stack);
+	ast_cli_unregister(&cli_restart_port);
+	ast_cli_unregister(&cli_port_up);
+	ast_cli_unregister(&cli_set_debug);
+	ast_cli_unregister(&cli_set_crypt_debug);
+	ast_cli_unregister(&cli_reload);
+	/* ast_unregister_application("misdn_crypt"); */
+	ast_unregister_application("misdn_set_opt");
+	ast_unregister_application("misdn_facility");
+  
+	ast_channel_unregister(&misdn_tech);
+
+	free_robin_list();
+	misdn_cfg_destroy();
+	misdn_lib_destroy();
+  
+	if (misdn_debug)
+		free(misdn_debug);
+	if (misdn_debug_only)
+		free(misdn_debug_only);
+	
+	return 0;
+}
+
+int usecount(void)
+{
+	int res;
+	ast_mutex_lock(&usecnt_lock);
+	res = usecnt;
+	ast_mutex_unlock(&usecnt_lock);
+	return res;
+}
+
+char *description(void)
+{
+	return desc;
+}
+
+char *key(void)
+{
+	return ASTERISK_GPL_KEY;
+}
+
+void chan_misdn_log(int level, int port, char *tmpl, ...)
+{
+	if (! (0 <= port <= max_ports)) {
+		ast_console_puts("cb_log called with out-of-range port number!\n");
+		return;
+	}
+		
+	va_list ap;
+	char buf[1024];
+  
+	va_start(ap, tmpl);
+	vsnprintf( buf, 1023, tmpl, ap );
+	va_end(ap);
+	
+	if (misdn_debug_only[port] ? (level==1 && misdn_debug[port]) || (level==misdn_debug[port]) : level <= misdn_debug[port]) {
+		ast_console_puts(buf);
+	}
+	
+	if (level <= misdn_debug[0] && tracing) {
+		time_t tm = time(NULL);
+		char *tmp=ctime(&tm),*p;
+		char file[BUFFERSIZE];
+		misdn_cfg_get( 0, MISDN_GEN_TRACEFILE, file, BUFFERSIZE);
+		FILE *fp= fopen(file, "a+");
+
+		p=strchr(tmp,'\n');
+		if (p) *p=':';
+    
+		if (!fp) {
+			ast_console_puts("Error opening Tracefile: ");
+			ast_console_puts(strerror(errno));
+			ast_console_puts("\n");
+			return ;
+		}
+		
+		fputs(tmp,fp);
+		fputs(" ", fp);
+		fputs(buf, fp);
+
+		fclose(fp);
+	}
+}
+
+
+void chan_misdn_trace_call(struct ast_channel *chan, int debug, char *tmpl, ...)
+{
+	va_list ap;
+	char buf[1024];
+	char name[1024];
+
+	int trace;
+	misdn_cfg_get( 0, MISDN_GEN_TRACE_CALLS, &trace, sizeof(int));
+	if (!trace) return ;
+	
+	if (misdn_debug[0] < debug) return ; 
+	
+	char tracedir[BUFFERSIZE];
+	misdn_cfg_get( 0, MISDN_GEN_TRACE_DIR, tracedir, BUFFERSIZE);
+	sprintf(name,"%s/%s.%s",tracedir, chan->uniqueid, chan->cid.cid_num );
+	
+	va_start(ap, tmpl);
+	
+	vsprintf( buf, tmpl, ap );
+	
+	va_end(ap);
+	
+	time_t tm = time(NULL);
+	char *tmp=ctime(&tm),*p;
+	FILE *fp= fopen(name, "a");
+	int fd;
+	
+	if (!fp) {
+		ast_console_puts("Error opening Tracefile");
+		ast_console_puts(strerror(errno));
+		ast_console_puts("\n");
+		return ;
+	}
+	
+	fd=fileno(fp) ;
+	
+	flock(fd, LOCK_EX);
+	
+	p=strchr(tmp,'\n');
+	if (p) *p=':';
+	
+	
+	
+	fputs(tmp,fp);
+	fputs(" ", fp);
+	fputs(buf, fp);
+
+	flock(fd, LOCK_UN);
+	
+	fclose(fp);
+	
+}
+
+
+/*** SOME APPS ;)***/
+
+static int misdn_facility_exec(struct ast_channel *chan, void *data)
+{
+	struct chan_list *ch = MISDN_ASTERISK_TECH_PVT(chan);
+	char *tok, *tokb;
+	
+
+	if (strcasecmp(MISDN_ASTERISK_TYPE(chan),"mISDN")) {
+		ast_log(LOG_WARNING, "misdn_facility makes only sense with chan_misdn channels!\n");
+		return -1;
+	}
+	
+	if (!data || ast_strlen_zero((char *)data)) {
+		ast_log(LOG_WARNING, "misdn_facility Requires arguments\n");
+		return -1;
+	}
+	
+	tok=strtok_r((char*)data,"|", &tokb) ;
+	
+	if (!tok) {
+		ast_log(LOG_WARNING, "misdn_facility Requires arguments\n");
+		return -1;
+	}
+	
+	if (!strcasecmp(tok,"calldeflect")) {
+		tok=strtok_r(NULL,"|", &tokb) ;
+		
+		if (!tok) {
+			ast_log(LOG_WARNING, "Facility: Call Defl Requires arguments\n");
+		}
+		
+		misdn_lib_send_facility(ch->bc, FACILITY_CALLDEFLECT, tok);
+		
+	} else {
+		ast_log(LOG_WARNING, "Unknown Facility: %s\n",tok);
+	}
+	
+	return 0;
+	
+}
+
+
+static int misdn_set_opt_exec(struct ast_channel *chan, void *data)
+{
+	struct chan_list *ch = MISDN_ASTERISK_TECH_PVT(chan);
+	char *tok,*tokb;
+	int  keyidx=0;
+	int rxgain=0;
+	int txgain=0;
+
+	if (strcasecmp(MISDN_ASTERISK_TYPE(chan),"mISDN")) {
+		ast_log(LOG_WARNING, "misdn_set_opt makes only sense with chan_misdn channels!\n");
+		return -1;
+	}
+	
+	if (!data || ast_strlen_zero((char *)data)) {
+		ast_log(LOG_WARNING, "misdn_set_opt Requires arguments\n");
+		return -1;
+	}
+
+	for (tok=strtok_r((char*)data, ":",&tokb);
+	     tok;
+	     tok=strtok_r(NULL,":",&tokb) ) {
+		int neglect=0;
+		
+		if (tok[0] == '!' ) {
+			neglect=1;
+			tok++;
+		}
+		
+		switch(tok[0]) {
+			
+		case 'd' :
+			strncpy(ch->bc->display,++tok,84);
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Display:%s\n",ch->bc->display);
+			break;
+			
+		case 'n':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: No DSP\n");
+			ch->bc->nodsp=1;
+			break;
+
+		case 'j':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: No jitter\n");
+			ch->bc->nojitter=1;
+			break;
+      
+		case 'v':
+			tok++;
+
+			switch ( tok[0] ) {
+			case 'r' :
+				rxgain=atoi(++tok);
+				if (rxgain<-8) rxgain=-8;
+				if (rxgain>8) rxgain=8;
+				ch->bc->rxgain=rxgain;
+				chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Volume:%d\n",rxgain);
+				break;
+			case 't':
+				txgain=atoi(++tok);
+				if (txgain<-8) txgain=-8;
+				if (txgain>8) txgain=8;
+				ch->bc->txgain=txgain;
+				chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Volume:%d\n",txgain);
+				break;
+			}
+			break;
+      
+		case 'c':
+			keyidx=atoi(++tok);
+      
+			if (keyidx > misdn_key_vector_size  || keyidx < 0 ) {
+				ast_log(LOG_WARNING, "You entered the keyidx: %d but we have only %d keys\n",keyidx, misdn_key_vector_size );
+				continue; 
+			}
+      
+			{
+				int l = sizeof(ch->bc->crypt_key);
+				strncpy(ch->bc->crypt_key, misdn_key_vector[keyidx], l);
+				ch->bc->crypt_key[l-1] = 0;
+			}
+			chan_misdn_log(0, ch->bc->stack->port, "SETOPT: crypt with key:%s\n",misdn_key_vector[keyidx]);
+			break;
+
+		case 'e':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: EchoCancel\n");
+			
+			if (neglect) {
+				ch->bc->ec_enable=0;
+			} else {
+				ch->bc->ec_enable=1;
+				ch->bc->orig=ch->orginator;
+				tok++;
+				if (tok) {
+					ch->bc->ec_deftaps=atoi(tok);
+				}
+			}
+			
+			break;
+      
+		case 'h':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Digital\n");
+			if (strlen(tok) > 1 && tok[1]=='1') {
+				chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Digital TRANS_DIGITAL\n");
+				ch->bc->nohdlc=1;
+				ch->bc->capability=INFO_CAPABILITY_DIGITAL_UNRESTRICTED;
+			} else {
+				ch->bc->nohdlc=0;
+				ch->bc->capability=INFO_CAPABILITY_DIGITAL_UNRESTRICTED;
+			}
+			break;
+            
+		case 's':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Send DTMF\n");
+			ch->bc->send_dtmf=1;
+			break;
+			
+		case 'f':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: Faxdetect\n");
+			ch->faxdetect=1;
+			break;
+
+		case 'a':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: AST_DSP (for DTMF)\n");
+			ch->ast_dsp=1;
+			break;
+
+		case 'p':
+			chan_misdn_log(1, ch->bc->stack->port, "SETOPT: callerpres: %s\n",&tok[1]);
+			/* CRICH: callingpres!!! */
+			if (strstr(tok,"allowed") ) {
+				ch->bc->pres=0;
+			} else if (strstr(tok,"not_screened")) {
+				ch->bc->pres=1;
+			}
+			
+			
+			break;
+      
+      
+		default:
+			break;
+		}
+	}
+	
+	if (ch->faxdetect || ch->ast_dsp) {
+		
+		if (!ch->dsp) ch->dsp = ast_dsp_new();
+		if (ch->dsp) ast_dsp_set_features(ch->dsp, DSP_FEATURE_DTMF_DETECT| DSP_FEATURE_FAX_DETECT);
+		if (!ch->trans) ch->trans=ast_translator_build_path(AST_FORMAT_SLINEAR, AST_FORMAT_ALAW);
+	}
+
+	if (ch->ast_dsp) {
+		chan_misdn_log(1,ch->bc->stack->port,"SETOPT: with AST_DSP we deactivate mISDN_dsp\n");
+		ch->bc->nodsp=1;
+		ch->bc->nojitter=1;
+	}
+	
+	return 0;
+}
+
+
diff --git a/channels/chan_misdn_config.c b/channels/chan_misdn_config.c
new file mode 100755
index 000000000..61a28fa7f
--- /dev/null
+++ b/channels/chan_misdn_config.c
@@ -0,0 +1,1057 @@
+/*
+ * Chan_Misdn -- Channel Driver for Asterisk
+ *
+ * Interface to Asterisk
+ *
+ * Copyright (C) 2005, Christian Richter
+ *
+ * Christian Richter <crich@beronet.com>
+ *
+ * This program is free software, distributed under the terms of
+ * the GNU General Public License
+ */
+
+
+#include "chan_misdn_config.h"
+
+#include <asterisk/config.h>
+#include <asterisk/channel.h>
+#include <asterisk/logger.h>
+#include <asterisk/lock.h>
+#include <asterisk/strings.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <asterisk/utils.h>
+#define AST_LOAD_CFG ast_config_load
+#define AST_DESTROY_CFG ast_config_destroy
+
+#define DEF_ECHOCANCEL 128
+#define DEF_ECHOTRAINING 1
+
+struct msn_list {
+	char *msn;
+	struct msn_list *next;
+};
+
+struct port_config {
+	char *name;
+	int *rxgain;
+	int *txgain;
+	int *te_choose_channel;
+	char *context;
+	char *language;
+	char *callerid;
+	char *method;
+	int *dialplan; 
+	char *nationalprefix;
+	char *internationalprefix;
+	int *pres;
+	int *always_immediate;
+	int *immediate;
+	int *hold_allowed;
+	int *early_bconnect;
+	int *use_callingpres;
+	int *echocancel;
+	int *echocancelwhenbridged;
+	int *echotraining;
+	struct msn_list *msn_list;
+	ast_group_t *callgroup;		/* Call group */
+	ast_group_t *pickupgroup;	/* Pickup group */
+};
+
+struct general_config {
+	int *debug;
+	char *tracefile;
+	int *trace_calls;
+	char *trace_dir;
+	int *bridging;
+	int *stop_tone_after_first_digit;
+	int *append_digits2exten;
+	int *l1_info_ok;
+	int *clear_l3;
+	int *dynamic_crypt;
+	char *crypt_prefix;
+	char *crypt_keys;
+};
+
+/* array of port configs, default is at position 0. */
+static struct port_config **port_cfg;
+/* max number of available ports, is set on init */
+static int max_ports;
+/* general config */
+static struct general_config *general_cfg;
+/* storing the ptp flag separated to save memory */
+static int *ptp;
+
+static ast_mutex_t config_mutex; 
+
+
+static inline void misdn_cfg_lock (void) {
+	ast_mutex_lock(&config_mutex);
+}
+
+static inline void misdn_cfg_unlock (void) {
+	ast_mutex_unlock(&config_mutex);
+}
+
+static void free_msn_list (struct msn_list* iter) {
+	if (iter->next)
+		free_msn_list(iter->next);
+	if (iter->msn)
+		free(iter->msn);
+	free(iter);
+}
+
+static void free_port_cfg (void) {
+
+	struct port_config **free_list = (struct port_config **)calloc(max_ports + 1, sizeof(struct port_config *));
+
+	int i, j;
+
+	for (i = 0; i < max_ports; i++) {
+		if (port_cfg[i]) {
+			for (j = 0; j < max_ports && free_list[j]; j++) {
+				if (free_list[j] && free_list[j] == port_cfg[i])
+					continue; /* already in list */
+				free_list[j] = port_cfg[i];
+			}
+		}
+	}
+
+#define FREE_ELEM(elem) ({ \
+		if (free_list[i]->elem) \
+			free(free_list[i]->elem); \
+	})
+	
+	for (i = 0; i < max_ports; i++) {
+		if (free_list[i]) {
+			FREE_ELEM(name);
+			FREE_ELEM(rxgain);
+			FREE_ELEM(txgain);
+			FREE_ELEM(te_choose_channel);
+			FREE_ELEM(context);
+			FREE_ELEM(language);
+			FREE_ELEM(callerid);
+			FREE_ELEM(method);
+			FREE_ELEM(dialplan);
+			FREE_ELEM(nationalprefix);
+			FREE_ELEM(internationalprefix);
+			FREE_ELEM(pres);
+			FREE_ELEM(always_immediate);
+			FREE_ELEM(immediate);
+			FREE_ELEM(hold_allowed);
+			FREE_ELEM(early_bconnect);
+			FREE_ELEM(use_callingpres);
+			FREE_ELEM(echocancel);
+			FREE_ELEM(echocancelwhenbridged);
+			FREE_ELEM(echotraining);
+			if (free_list[i]->msn_list)
+				free_msn_list(free_list[i]->msn_list);
+			FREE_ELEM(callgroup);
+			FREE_ELEM(pickupgroup);
+			free(free_list[i]);
+		}
+	}
+	free(free_list);
+}
+
+static void free_general_cfg (void) {
+
+#define FREE_GEN_ELEM(elem) ({ \
+		if (general_cfg->elem) \
+			free(general_cfg->elem); \
+	})
+	
+	FREE_GEN_ELEM(debug);
+	FREE_GEN_ELEM(tracefile);
+	FREE_GEN_ELEM(trace_calls);
+	FREE_GEN_ELEM(trace_dir);
+	FREE_GEN_ELEM(bridging);
+	FREE_GEN_ELEM(stop_tone_after_first_digit);
+	FREE_GEN_ELEM(append_digits2exten);
+	FREE_GEN_ELEM(l1_info_ok);
+	FREE_GEN_ELEM(clear_l3);
+	FREE_GEN_ELEM(dynamic_crypt);
+	FREE_GEN_ELEM(crypt_prefix);
+	FREE_GEN_ELEM(crypt_keys);
+}
+
+#define GET_PORTCFG_STRCPY(item) ({ \
+		char *temp; \
+		if (port_cfg[port] && port_cfg[port]->item) \
+			temp = port_cfg[port]->item; \
+		else \
+			temp = port_cfg[0]->item; \
+		if (!temp || !memccpy((void *)buf, (void *)temp, '\0', bufsize)) \
+			memset(buf, 0, 1); \
+	})
+
+#define GET_GENCFG_STRCPY(item) ({ \
+		if (general_cfg && general_cfg->item) { \
+			if (!memccpy((void *)buf, (void *)general_cfg->item, '\0', bufsize)) \
+				memset(buf, 0, 1); \
+		} else \
+			memset(buf, 0, 1); \
+	})
+
+#define GET_PORTCFG_MEMCPY(item) ({ \
+		typeof(port_cfg[0]->item) temp; \
+		if (port_cfg[port] && port_cfg[port]->item) \
+			temp = port_cfg[port]->item; \
+		else \
+			temp = port_cfg[0]->item; \
+		if (temp) { \
+			int l = sizeof(*temp); \
+			if (l > bufsize) \
+				memset(buf, 0, bufsize); \
+			else \
+				memcpy(buf, temp, l); \
+		} else \
+			memset(buf, 0, bufsize); \
+	})
+
+#define GET_GENCFG_MEMCPY(item) ({ \
+		if (general_cfg && general_cfg->item) { \
+			typeof(general_cfg->item) temp = general_cfg->item; \
+			int l = sizeof(*temp); \
+			if (l > bufsize) \
+				memset(buf, 0, bufsize); \
+			else \
+				memcpy(buf, temp, l); \
+		} else \
+			memset(buf, 0, bufsize); \
+	})
+
+void misdn_cfg_get(int port, enum misdn_cfg_elements elem, void *buf, int bufsize) {
+	
+	if (!(elem > MISDN_GEN_FIRST) && !misdn_cfg_is_port_valid(port)) {
+		memset(buf, 0, bufsize);
+		ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get! Port number %d is not valid.\n", port);
+		return;
+	}
+
+	misdn_cfg_lock();
+	
+	switch (elem) {
+		
+		/* port config elements */
+			
+		case MISDN_CFG_PTP:		if (sizeof(ptp[port]) <= bufsize)
+							memcpy(buf, &ptp[port], sizeof(ptp[port]));
+						else
+							buf = 0; /* error, should not happen */
+						break;
+		case MISDN_CFG_GROUPNAME:	GET_PORTCFG_STRCPY(name);
+						break;
+		case MISDN_CFG_RXGAIN:		GET_PORTCFG_MEMCPY(rxgain);
+						break;
+		case MISDN_CFG_TXGAIN:		GET_PORTCFG_MEMCPY(txgain);
+						break;
+		case MISDN_CFG_TE_CHOOSE_CHANNEL:
+						GET_PORTCFG_MEMCPY(te_choose_channel);
+						break;
+		case MISDN_CFG_CONTEXT:		GET_PORTCFG_STRCPY(context);
+						break;
+		case MISDN_CFG_LANGUAGE:	GET_PORTCFG_STRCPY(language);
+						break;
+		case MISDN_CFG_CALLERID:	GET_PORTCFG_STRCPY(callerid);
+						break;
+		case MISDN_CFG_METHOD:		GET_PORTCFG_STRCPY(method);
+						break;
+		case MISDN_CFG_DIALPLAN:	GET_PORTCFG_MEMCPY(dialplan);
+						break;
+		case MISDN_CFG_NATPREFIX:	GET_PORTCFG_STRCPY(nationalprefix);
+						break;
+		case MISDN_CFG_INTERNATPREFIX:
+						GET_PORTCFG_STRCPY(internationalprefix);
+						break;
+		case MISDN_CFG_PRES:		GET_PORTCFG_MEMCPY(pres);
+						break;
+		case MISDN_CFG_ALWAYS_IMMEDIATE:
+						GET_PORTCFG_MEMCPY(always_immediate);
+						break;
+		case MISDN_CFG_IMMEDIATE:	GET_PORTCFG_MEMCPY(immediate);
+						break;
+		case MISDN_CFG_HOLD_ALLOWED:
+						GET_PORTCFG_MEMCPY(hold_allowed);
+						break;
+		case MISDN_CFG_EARLY_BCONNECT:
+						GET_PORTCFG_MEMCPY(early_bconnect);
+						break;
+		case MISDN_CFG_USE_CALLINGPRES:
+						GET_PORTCFG_MEMCPY(use_callingpres);
+						break;
+		case MISDN_CFG_ECHOCANCEL:
+						GET_PORTCFG_MEMCPY(echocancel );
+						break;
+		case MISDN_CFG_ECHOCANCELWHENBRIDGED:
+						GET_PORTCFG_MEMCPY(echocancelwhenbridged);
+						break;
+		case MISDN_CFG_ECHOTRAINING:
+						GET_PORTCFG_MEMCPY(echotraining);
+						break;
+		case MISDN_CFG_CALLGROUP:	GET_PORTCFG_MEMCPY(callgroup);
+						break;
+		case MISDN_CFG_PICKUPGROUP:	GET_PORTCFG_MEMCPY(pickupgroup);
+						break;
+		
+		/* general config elements */
+			
+		case MISDN_GEN_DEBUG:		GET_GENCFG_MEMCPY(debug);
+						break;
+		case MISDN_GEN_TRACEFILE:	GET_GENCFG_STRCPY(tracefile);
+						break;
+		case MISDN_GEN_TRACE_CALLS: GET_GENCFG_MEMCPY(trace_calls);
+						break;
+		case MISDN_GEN_TRACE_DIR:	GET_GENCFG_STRCPY(trace_dir);
+						break;
+		case MISDN_GEN_BRIDGING:	GET_GENCFG_MEMCPY(bridging);
+						break;
+		case MISDN_GEN_STOP_TONE:	GET_GENCFG_MEMCPY(stop_tone_after_first_digit);
+						break;
+		case MISDN_GEN_APPEND_DIGITS2EXTEN: 
+						GET_GENCFG_MEMCPY(append_digits2exten);
+						break;
+		case MISDN_GEN_L1_INFO_OK:	GET_GENCFG_MEMCPY(l1_info_ok);
+						break;
+		case MISDN_GEN_CLEAR_L3:	GET_GENCFG_MEMCPY(clear_l3);
+						break;
+		case MISDN_GEN_DYNAMIC_CRYPT:	GET_GENCFG_MEMCPY(dynamic_crypt);
+						break;
+		case MISDN_GEN_CRYPT_PREFIX:	GET_GENCFG_STRCPY(crypt_prefix);
+						break;
+		case MISDN_GEN_CRYPT_KEYS: 	GET_GENCFG_STRCPY(crypt_keys);
+						break;
+		default:			memset(buf, 0, bufsize);
+	}
+	
+	misdn_cfg_unlock();
+}
+
+int misdn_cfg_is_msn_valid (int port, char* msn) {
+	
+	if (!misdn_cfg_is_port_valid(port)) {
+		ast_log(LOG_WARNING, "Invalid call to misdn_cfg_is_msn_valid! Port number %d is not valid.\n", port);
+		return 0;
+	}
+	
+	struct msn_list *iter;
+	
+	misdn_cfg_lock();
+	
+	if (port_cfg[port]->msn_list)
+		iter = port_cfg[port]->msn_list;
+	else
+		iter = port_cfg[0]->msn_list;
+	for (; iter; iter = iter->next) 
+		if (*(iter->msn) == '*' || !strcasecmp(iter->msn, msn)) {
+			misdn_cfg_unlock();
+			return 1;
+		}
+	
+	misdn_cfg_unlock();
+	
+	return 0;
+}
+
+int misdn_cfg_is_port_valid (int port) {
+	
+	misdn_cfg_lock();
+	
+	if (port < 1 || port > max_ports) {
+		misdn_cfg_unlock();
+		return 0;
+	}
+
+	int valid = (port_cfg[port] != NULL);
+
+	misdn_cfg_unlock();
+
+	return valid;
+}
+
+int misdn_cfg_is_group_method (char *group, enum misdn_cfg_method meth) {
+
+	int i, re = 0;
+	char *method = NULL;
+
+	misdn_cfg_lock();
+	
+	for (i = 0; i < max_ports; i++) {
+		if (port_cfg[i]) {
+			if (!strcasecmp(port_cfg[i]->name, group))
+				method = port_cfg[i]->method ? port_cfg[i]->method : port_cfg[0]->method;
+		}
+	}
+
+	if (method) {
+		switch (meth) {
+		case METHOD_STANDARD:		re = !strcasecmp(method, "standard");
+									break;
+		case METHOD_ROUND_ROBIN:	re = !strcasecmp(method, "round_robin");
+									break;
+		}
+	}
+
+	misdn_cfg_unlock();
+
+	return re;
+}
+
+void misdn_cfg_get_ports_string (char *ports) {
+	*ports = 0;
+	char tmp[16];
+	int l;
+	
+	misdn_cfg_lock();
+
+	int i = 1;
+	for (; i <= max_ports; i++) {
+		if (port_cfg[i]) {
+			if (ptp[i])
+				sprintf(tmp, "%dptp,", i);
+			else
+				sprintf(tmp, "%d,", i);
+			strcat(ports, tmp);
+		}
+	}
+	
+	misdn_cfg_unlock();
+
+	if ((l = strlen(ports)))
+		ports[l-1] = 0;
+}
+
+#define GET_CFG_STRING(typestr, type) ({ \
+		if (port_cfg[port] && port_cfg[port]->type) \
+			snprintf(buf, bufsize, "%s " #typestr ": %s", begin, port_cfg[port]->type); \
+		else \
+			snprintf(buf, bufsize, "%s " #typestr ": %s", begin, port_cfg[0]->type); \
+	}) \
+
+#define GET_GEN_STRING(typestr, type) ({ \
+		snprintf(buf, bufsize, "%s " #typestr ": %s", begin, general_cfg->type ? general_cfg->type : "not set"); \
+	}) \
+
+#define GET_CFG_INT(typestr, type) ({ \
+		if (port_cfg[port] && port_cfg[port]->type) \
+			snprintf(buf, bufsize, "%s " #typestr ": %d", begin, *port_cfg[port]->type); \
+		else \
+			snprintf(buf, bufsize, "%s " #typestr ": %d", begin, *port_cfg[0]->type); \
+	}) \
+
+#define GET_GEN_INT(typestr, type) ({ \
+		snprintf(buf, bufsize, "%s " #typestr ": %d", begin, general_cfg->type ? *general_cfg->type : 0); \
+	}) \
+
+#define GET_CFG_BOOL(typestr, type, yes, no) ({ \
+		int bool; \
+		if (port_cfg[port] && port_cfg[port]->type) \
+			bool = *port_cfg[port]->type; \
+		else \
+			bool = *port_cfg[0]->type; \
+		snprintf(buf, bufsize, "%s " #typestr ": %s", begin, bool ? #yes : #no); \
+	}) \
+
+#define GET_CFG_HYBRID(typestr, type, yes, no) ({ \
+		int bool; \
+		if (port_cfg[port] && port_cfg[port]->type) \
+			bool = *port_cfg[port]->type; \
+		else \
+			bool = *port_cfg[0]->type; \
+		if (bool == 1 || bool == 0) \
+			snprintf(buf, bufsize, "%s " #typestr ": %s", begin, bool ? #yes : #no); \
+		else \
+			snprintf(buf, bufsize, "%s " #typestr ": %d", begin, bool); \
+	}) \
+
+#define GET_GEN_BOOL(typestr, type, yes, no) ({ \
+		snprintf(buf, bufsize, "%s " #typestr ": %s", begin, general_cfg->type ? (*general_cfg->type ? #yes : #no) : "not set"); \
+	}) \
+
+#define GET_CFG_AST_GROUP_T(typestr, type) ({ \
+		ast_group_t *tmp; \
+		if (port_cfg[port] && port_cfg[port]->type) \
+			tmp = port_cfg[port]->type; \
+		else \
+			tmp = port_cfg[0]->type; \
+		if (tmp) { \
+			char tmpbuf[256]; \
+			snprintf(buf, bufsize, "%s " #typestr ": %s", begin, ast_print_group(tmpbuf, sizeof(tmpbuf), *tmp)); \
+		} else \
+			snprintf(buf, bufsize, "%s " #typestr ": %s", begin, "none"); \
+	}) \
+
+void misdn_cfg_get_config_string(int port, enum misdn_cfg_elements elem, char* buf, int bufsize) {
+
+	if (!(elem > MISDN_GEN_FIRST) && !misdn_cfg_is_port_valid(port)) {
+		*buf = 0;
+		ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get_config_string! Port number %d is not valid.\n", port);
+		return;
+	}
+	
+	char begin[] = " -> ";
+	
+	misdn_cfg_lock();
+	
+	switch (elem) {
+		
+		case MISDN_CFG_PTP:		snprintf(buf, bufsize, "%s PTP: %s", begin, ptp[port] ? "yes" : "no");
+									break;
+		case MISDN_CFG_GROUPNAME:	GET_CFG_STRING(GROUPNAME, name);
+									break;
+		case MISDN_CFG_RXGAIN:		GET_CFG_INT(RXGAIN, rxgain);
+									break;
+		case MISDN_CFG_TXGAIN:		GET_CFG_INT(TXGAIN, txgain);
+									break;
+		case MISDN_CFG_TE_CHOOSE_CHANNEL:
+						GET_CFG_BOOL(TE_CHOOSE_CHANNEL, te_choose_channel, yes, no);
+									break;
+		case MISDN_CFG_CONTEXT:		GET_CFG_STRING(CONTEXT, context);
+									break;
+		case MISDN_CFG_LANGUAGE:	GET_CFG_STRING(LANGUAGE, language);
+									break;
+		case MISDN_CFG_CALLERID:	GET_CFG_STRING(CALLERID, callerid);
+									break;
+		case MISDN_CFG_METHOD:		GET_CFG_STRING(METHOD, method);
+									break;
+		case MISDN_CFG_DIALPLAN:	GET_CFG_INT(DIALPLAN, dialplan);
+									break;
+		case MISDN_CFG_NATPREFIX:	GET_CFG_STRING(NATIONALPREFIX, nationalprefix);
+									break;
+		case MISDN_CFG_INTERNATPREFIX:
+						GET_CFG_STRING(INTERNATIONALPREFIX, internationalprefix);
+									break;
+		case MISDN_CFG_PRES:		GET_CFG_BOOL(PRESENTATION, pres, allowed, not_screened);
+									break;
+		case MISDN_CFG_ALWAYS_IMMEDIATE:
+						GET_CFG_BOOL(ALWAYS_IMMEDIATE, always_immediate, yes, no);
+									break;
+		case MISDN_CFG_IMMEDIATE:	GET_CFG_BOOL(IMMEDIATE, immediate, yes, no);
+									break;
+		case MISDN_CFG_HOLD_ALLOWED:
+						GET_CFG_BOOL(HOLD_ALLOWED, hold_allowed, yes, no);
+									break;
+		case MISDN_CFG_EARLY_BCONNECT:
+						GET_CFG_BOOL(EARLY_BCONNECT, early_bconnect, yes, no);
+									break;
+		case MISDN_CFG_USE_CALLINGPRES:
+						GET_CFG_BOOL(USE_CALLINGPRES, use_callingpres, yes, no);
+									break;
+		case MISDN_CFG_ECHOCANCEL:	GET_CFG_HYBRID(ECHOCANCEL, echocancel, yes, no);
+									break;
+		case MISDN_CFG_ECHOCANCELWHENBRIDGED:
+						GET_CFG_BOOL(ECHOCANCELWHENBRIDGED, echocancelwhenbridged, yes, no);
+									break;
+		case MISDN_CFG_ECHOTRAINING:
+						GET_CFG_HYBRID(ECHOTRAINING, echotraining, yes, no);
+									break;
+		case MISDN_CFG_CALLGROUP:	GET_CFG_AST_GROUP_T(CALLINGGROUP, callgroup);
+									break;
+		case MISDN_CFG_PICKUPGROUP:	GET_CFG_AST_GROUP_T(PICKUPGROUP, pickupgroup);
+									break;
+		case MISDN_CFG_MSNS:		{
+							char tmpbuffer[BUFFERSIZE];
+							tmpbuffer[0] = 0;
+							struct msn_list *iter;
+							if (port_cfg[port]->msn_list)
+								iter = port_cfg[port]->msn_list;
+							else
+								iter = port_cfg[0]->msn_list;
+							if (iter) {
+								for (; iter; iter = iter->next)
+									sprintf(tmpbuffer, "%s%s, ", tmpbuffer, iter->msn);
+								tmpbuffer[strlen(tmpbuffer)-2] = 0;
+							}
+							snprintf(buf, bufsize, "%s MSNs: %s", begin, *tmpbuffer ? tmpbuffer : "none"); \
+						}
+						break;
+		
+		/* general config elements */
+		
+		case MISDN_GEN_DEBUG:		GET_GEN_INT(DEBUG_LEVEL, debug);
+									break;
+		case MISDN_GEN_TRACEFILE:	GET_GEN_STRING(TRACEFILE, tracefile);
+									break;
+		case MISDN_GEN_TRACE_CALLS: GET_GEN_BOOL(TRACE_CALLS, trace_calls, true, false);
+									break;
+		case MISDN_GEN_TRACE_DIR:	GET_GEN_STRING(TRACE_DIR, trace_dir);
+									break;
+		case MISDN_GEN_BRIDGING:	GET_GEN_BOOL(BRIDGING, bridging, yes, no);
+									break;
+		case MISDN_GEN_STOP_TONE:	GET_GEN_BOOL(STOP_TONE_AFTER_FIRST_DIGIT, stop_tone_after_first_digit, yes, no);
+									break;
+		case MISDN_GEN_APPEND_DIGITS2EXTEN: 
+						GET_GEN_BOOL(APPEND_DIGITS2EXTEN, append_digits2exten, yes, no);
+									break;
+		case MISDN_GEN_L1_INFO_OK:	GET_GEN_BOOL(L1_INFO_OK, l1_info_ok, yes, no);
+									break;
+		case MISDN_GEN_CLEAR_L3:	GET_GEN_BOOL(CLEAR_L3, clear_l3, yes, no);
+									break;
+		case MISDN_GEN_DYNAMIC_CRYPT:
+						GET_GEN_BOOL(DYNAMIC_CRYPT,dynamic_crypt, yes, no);
+									break;
+		case MISDN_GEN_CRYPT_PREFIX:
+						GET_GEN_STRING(CRYPT_PREFIX, crypt_prefix);
+									break;
+		case MISDN_GEN_CRYPT_KEYS:	GET_GEN_STRING(CRYPT_KEYS, crypt_keys);
+									break;
+									
+		default:			*buf = 0;
+									break;
+	}
+
+	misdn_cfg_unlock();
+}
+
+int misdn_cfg_get_next_port (int port) {
+	
+	misdn_cfg_lock();
+	
+	for (port++; port <= max_ports; port++) {
+		if (port_cfg[port]) {
+			misdn_cfg_unlock();
+			return port;
+		}
+	}
+	
+	misdn_cfg_unlock();
+	
+	return -1;
+}
+
+int misdn_cfg_get_next_port_spin (int port) {
+
+	int ret = misdn_cfg_get_next_port(port);
+
+	if (ret > 0)
+		return ret;
+
+	return misdn_cfg_get_next_port(0);
+}
+
+#define PARSE_GEN_INT(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			int temp; \
+			if (!sscanf(v->value, "%d", &temp)) { \
+				ast_log(LOG_WARNING, "Value \"%s\" for \"" #item "\" (generals section) invalid or out of range! Please edit your misdn.conf and then do a \"misdn reload\".\n", v->value); \
+			} else { \
+				general_cfg->item = (int *)malloc(sizeof(int)); \
+				memcpy(general_cfg->item, &temp, sizeof(int)); \
+			} \
+			continue; \
+		} \
+	}) \
+
+#define PARSE_GEN_BOOL(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			general_cfg->item = (int *)malloc(sizeof(int)); \
+			*(general_cfg->item) = ast_true(v->value)?1:0; \
+			continue; \
+		} \
+	})
+
+#define PARSE_GEN_STR(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			int l = strlen(v->value); \
+			if (l) { \
+				general_cfg->item = (char *)calloc(l+1, sizeof(char)); \
+				strncpy(general_cfg->item,v->value, l); \
+			} \
+			continue; \
+		} \
+	})
+
+static void build_general_config(struct ast_variable *v) {
+
+	if (!v) 
+		return;
+
+	for (; v; v = v->next) {
+
+		PARSE_GEN_INT(debug);
+		PARSE_GEN_STR(tracefile);
+		PARSE_GEN_BOOL(trace_calls);
+		PARSE_GEN_STR(trace_dir);
+		PARSE_GEN_BOOL(bridging);
+		PARSE_GEN_BOOL(stop_tone_after_first_digit);
+		PARSE_GEN_BOOL(append_digits2exten);
+		PARSE_GEN_BOOL(l1_info_ok);
+		PARSE_GEN_BOOL(clear_l3);
+		PARSE_GEN_BOOL(dynamic_crypt);
+		PARSE_GEN_STR(crypt_prefix);
+		PARSE_GEN_STR(crypt_keys);
+		
+	}
+}
+
+#define PARSE_CFG_HYBRID(item, def) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			new->item = (int *)malloc(sizeof(int)); \
+			if (!sscanf(v->value, "%d", new->item)) { \
+				if (ast_true(v->value)) \
+					*new->item = def; \
+				else \
+					*new->item = 0; \
+			} \
+			continue; \
+		} \
+	}) \
+
+#define PARSE_CFG_INT(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			new->item = (int *)malloc(sizeof(int)); \
+			if (!sscanf(v->value, "%d", new->item)) { \
+				ast_log(LOG_WARNING, "Value \"%s\" for \"" #item "\" of group \"%s\" invalid or out of range! Please edit your misdn.conf and then do a \"misdn reload\".\n", v->value, cat); \
+				free(new->item); \
+				new->item = NULL; \
+			} \
+			continue; \
+		} \
+	}) \
+
+#define PARSE_CFG_BOOL(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			new->item = (int *)malloc(sizeof(int)); \
+			*(new->item) = ast_true(v->value)?1:0; \
+			continue; \
+		} \
+	})
+
+#define PARSE_CFG_STR(item) ({ \
+		if (!strcasecmp(v->name, #item)) { \
+			int l = strlen(v->value); \
+			if (l) { \
+				new->item = (char *)calloc(l+1, sizeof(char)); \
+				strncpy(new->item,v->value,l); \
+			} \
+			continue; \
+		} \
+	})
+
+static void build_port_config(struct ast_variable *v, char *cat) {
+	if (!v || !cat)
+		return;
+
+	int cfg_for_ports[max_ports + 1];
+	int i = 0;
+	for (; i < (max_ports + 1); i++) {
+		cfg_for_ports[i] = 0;
+	}
+	
+	/* we store the default config at position 0 */
+	if (!strcasecmp(cat, "default")) {
+		cfg_for_ports[0] = 1;
+	}
+
+	struct port_config* new = (struct port_config *)calloc(1, sizeof(struct port_config));
+	
+	{
+		int l = strlen(cat);
+		new->name = (char *)calloc(l+1, sizeof(char));
+		strncpy(new->name, cat, l);
+	}
+	
+	for (; v; v=v->next) {
+		if (!strcasecmp(v->name, "ports")) {
+			/* TODO check for value not beeing set, like PORTS= */
+			char *iter;
+			char *value = v->value;
+			while ((iter = strchr(value, ',')) != NULL) {
+				*iter = 0;
+				/* strip spaces */
+				while (*value && *value == ' ') {
+					value++;
+				}
+				/* TODO check for char not 0-9 */
+
+				if (*value){
+					int p = atoi(value);
+					if (p <= max_ports && p > 0) {
+						cfg_for_ports[p] = 1;
+						if (strstr(value, "ptp"))
+							ptp[p] = 1;
+					} else
+						ast_log(LOG_WARNING, "Port value \"%s\" of group %s invalid or out of range! Please edit your misdn.conf and then do a \"misdn reload\".\n", value, cat);
+					value = ++iter;
+				}
+			}
+			/* the remaining or the only one */
+			/* strip spaces */
+			while (*value && *value == ' ') {
+				value++;
+			}
+			/* TODO check for char not 0-9 */
+			if (*value) {
+				int p = atoi(value);
+				if (p <= max_ports && p > 0) {
+					cfg_for_ports[p] = 1;
+					if (strstr(value, "ptp"))
+						ptp[p] = 1;
+				} else
+					ast_log(LOG_WARNING, "Port value \"%s\" of group %s invalid or out of range! Please edit your misdn.conf and then do a \"misdn reload\".\n", value, cat);
+			}
+			continue;
+		}
+		PARSE_CFG_STR(context);
+		PARSE_CFG_INT(dialplan);
+		PARSE_CFG_STR(nationalprefix);
+		PARSE_CFG_STR(internationalprefix);
+		PARSE_CFG_STR(language);
+		if (!strcasecmp(v->name, "presentation")) {
+			if (v->value && strlen(v->value)) {
+				new->pres = (int *)malloc(sizeof(int));
+				if (!strcasecmp(v->value, "allowed")) {
+					*(new->pres) = 1;
+				}
+				/* TODO: i assume if it is not "allowed", it is "not_screened" */
+				else {
+					*(new->pres) = 0;
+				}
+			}
+			continue;
+		}
+		PARSE_CFG_INT(rxgain);
+		PARSE_CFG_INT(txgain);
+		PARSE_CFG_BOOL(te_choose_channel);
+		PARSE_CFG_BOOL(immediate);
+		PARSE_CFG_BOOL(always_immediate);
+		PARSE_CFG_BOOL(hold_allowed);
+		PARSE_CFG_BOOL(early_bconnect);
+		PARSE_CFG_BOOL(use_callingpres);
+		PARSE_CFG_HYBRID(echocancel, DEF_ECHOCANCEL);
+		PARSE_CFG_BOOL(echocancelwhenbridged);
+		PARSE_CFG_HYBRID(echotraining, DEF_ECHOTRAINING);
+		PARSE_CFG_STR(callerid);
+		PARSE_CFG_STR(method);
+		if (!strcasecmp(v->name, "msns")) {
+			/* TODO check for value not beeing set, like msns= */
+			char *iter;
+			char *value = v->value;
+
+			while ((iter = strchr(value, ',')) != NULL) {
+				*iter = 0;
+				/* strip spaces */
+				while (*value && *value == ' ') {
+					value++;
+				}
+				/* TODO check for char not 0-9 */
+				if (*value){
+					int l = strlen(value);
+					if (l) {
+						struct msn_list *ml = (struct msn_list *)calloc(1, sizeof(struct msn_list));
+						ml->msn = (char *)calloc(l+1, sizeof(char));
+						strncpy(ml->msn,value,l);
+						ml->next = new->msn_list;
+						new->msn_list = ml;
+					}
+					value = ++iter;
+				}
+			}
+			/* the remaining or the only one */
+			/* strip spaces */
+			while (*value && *value == ' ') {
+				value++;
+			}
+			/* TODO check for char not 0-9 */
+			if (*value) {
+				int l = strlen(value);
+				if (l) {
+					struct msn_list *ml = (struct msn_list *)calloc(1, sizeof(struct msn_list));
+					ml->msn = (char *)calloc(l+1, sizeof(char));
+					strncpy(ml->msn,value,l);
+					ml->next = new->msn_list;
+					new->msn_list = ml;
+				}
+			}
+			continue;
+		}
+		if (!strcasecmp(v->name, "callgroup")) {
+			new->callgroup = (ast_group_t *)malloc(sizeof(ast_group_t));
+			*(new->callgroup)=ast_get_group(v->value);
+			continue;
+		}
+		if (!strcasecmp(v->name, "pickupgroup")) {
+			new->pickupgroup = (ast_group_t *)malloc(sizeof(ast_group_t));
+			*(new->pickupgroup)=ast_get_group(v->value);
+			continue;
+		}
+	}
+	/* store the new config in our array of port configs */
+	for (i = 0; i < (max_ports + 1); i++) {
+		if (cfg_for_ports[i])
+			port_cfg[i] = new;
+	}
+}
+
+
+static void fill_defaults (void) {
+	
+	/* general defaults */
+	if (!general_cfg->debug)
+		general_cfg->debug = (int*)calloc(1, sizeof(int));
+	if (!general_cfg->trace_calls)
+		general_cfg->trace_calls = (int*)calloc(1, sizeof(int));
+	if (!general_cfg->trace_dir) {
+		general_cfg->trace_dir = (char *)malloc(10 * sizeof(char));
+		sprintf(general_cfg->trace_dir, "/var/log/");
+	}
+	if (!general_cfg->bridging) {
+		general_cfg->bridging = (int*)malloc(sizeof(int));
+		*general_cfg->bridging = 1;
+	}
+	if (!general_cfg->stop_tone_after_first_digit) {
+		general_cfg->stop_tone_after_first_digit = (int*)malloc(sizeof(int));
+		*general_cfg->stop_tone_after_first_digit = 1;
+	}
+	if (!general_cfg->append_digits2exten) {
+		general_cfg->append_digits2exten = (int*)malloc(sizeof(int));
+		*general_cfg->append_digits2exten = 1;
+	}
+	if (!general_cfg->l1_info_ok) {
+		general_cfg->l1_info_ok = (int*)malloc(sizeof(int));
+		*general_cfg->l1_info_ok = 1;
+	}
+	if (!general_cfg->clear_l3)
+		general_cfg->clear_l3 =(int*)calloc(1, sizeof(int));
+	if (!general_cfg->dynamic_crypt)
+		general_cfg->dynamic_crypt = (int*)calloc(1, sizeof(int));
+
+	/* defaults for default port config */
+	if (!port_cfg[0])
+		port_cfg[0] = (struct port_config*)calloc(1, sizeof(struct port_config));
+	if (!port_cfg[0]->name) {
+		port_cfg[0]->name = (char *)malloc(8 * sizeof(char));
+		sprintf(port_cfg[0]->name, "default");
+	}
+	if (!port_cfg[0]->rxgain)
+		port_cfg[0]->rxgain = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->txgain)
+		port_cfg[0]->txgain = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->te_choose_channel)
+		port_cfg[0]->te_choose_channel = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->context) {
+		port_cfg[0]->context = (char *)malloc(8 * sizeof(char));
+		sprintf(port_cfg[0]->context, "default");
+	}
+	if (!port_cfg[0]->language) {
+		port_cfg[0]->language = (char *)malloc(3 * sizeof(char));
+		sprintf(port_cfg[0]->language, "en");
+	}
+	if (!port_cfg[0]->callerid)
+		port_cfg[0]->callerid = (char *)calloc(1, sizeof(char));
+	if (!port_cfg[0]->method) {
+		port_cfg[0]->method = (char *)malloc(9 * sizeof(char));
+		sprintf(port_cfg[0]->method, "standard");
+	}
+	if (!port_cfg[0]->dialplan)
+		port_cfg[0]->dialplan = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->nationalprefix) {
+		port_cfg[0]->nationalprefix = (char *)malloc(2 * sizeof(char));
+		sprintf(port_cfg[0]->nationalprefix, "0");
+	}
+	if (!port_cfg[0]->internationalprefix) {
+		port_cfg[0]->internationalprefix = (char *)malloc(3 * sizeof(char));
+		sprintf(port_cfg[0]->internationalprefix, "00");
+	}
+	if (!port_cfg[0]->pres) {
+		port_cfg[0]->pres = (int *)malloc(sizeof(int));
+		*port_cfg[0]->pres = 1;
+	}
+	if (!port_cfg[0]->always_immediate)
+		port_cfg[0]->always_immediate = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->immediate)
+		port_cfg[0]->immediate = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->hold_allowed)
+		port_cfg[0]->hold_allowed = (int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->early_bconnect) {
+		port_cfg[0]->early_bconnect = (int *)malloc(sizeof(int));
+		*port_cfg[0]->early_bconnect = 1;
+	}
+	if (!port_cfg[0]->echocancel)
+		port_cfg[0]->echocancel=(int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->echocancelwhenbridged)
+		port_cfg[0]->echocancelwhenbridged=(int *)calloc(1, sizeof(int));
+	if (!port_cfg[0]->echotraining) {
+		port_cfg[0]->echotraining=(int *)malloc(sizeof(int));
+		*port_cfg[0]->echotraining = 1;
+	}
+	if (!port_cfg[0]->use_callingpres) {
+		port_cfg[0]->use_callingpres = (int *)malloc(sizeof(int));
+		*port_cfg[0]->use_callingpres = 1;
+	}
+	if (!port_cfg[0]->msn_list) {
+		port_cfg[0]->msn_list = (struct msn_list *)malloc(sizeof(struct msn_list));
+		port_cfg[0]->msn_list->next = NULL;
+		port_cfg[0]->msn_list->msn = (char *)calloc(2, sizeof(char));
+		*(port_cfg[0]->msn_list->msn) = '*';
+	}
+}
+
+void misdn_cfg_reload (void) {
+	misdn_cfg_init (0);
+}
+
+void misdn_cfg_destroy (void) {
+
+	misdn_cfg_lock();
+	
+	free_port_cfg();
+	free_general_cfg();
+	
+	free(port_cfg);
+	free(general_cfg);
+	free(ptp);
+
+	misdn_cfg_unlock();
+	ast_mutex_destroy(&config_mutex);
+}
+
+void misdn_cfg_init (int this_max_ports)
+{
+	char config[]="misdn.conf";
+	
+	struct ast_config *cfg;
+	cfg = AST_LOAD_CFG(config);
+	if (!cfg) {
+		ast_log(LOG_WARNING,"no misdn.conf ?\n");
+		return;
+	}
+
+	misdn_cfg_lock();
+	
+	if (this_max_ports) {
+		/* this is the first run */
+		max_ports = this_max_ports;
+		port_cfg = (struct port_config **)calloc(max_ports + 1, sizeof(struct port_config *));
+		general_cfg = (struct general_config*)calloc(1, sizeof(struct general_config));
+		ptp = (int *)calloc(max_ports + 1, sizeof(int));
+	}
+	else {
+		free_port_cfg();
+		free_general_cfg();
+		port_cfg = memset(port_cfg, 0, sizeof(struct port_config *) * (max_ports + 1));
+		general_cfg = memset(general_cfg, 0, sizeof(struct general_config));
+		ptp = memset(ptp, 0, sizeof(int) * (max_ports + 1));
+	}
+	
+	char *cat;
+	cat = ast_category_browse(cfg, NULL);
+
+	while(cat) {
+		struct ast_variable *v=ast_variable_browse(cfg,cat);
+		if (!strcasecmp(cat,"general")) {
+			build_general_config (v);
+		} else {
+			build_port_config (v, cat);
+		}
+		cat=ast_category_browse(cfg,cat);
+	}
+
+	fill_defaults();
+	
+	misdn_cfg_unlock();
+	
+	AST_DESTROY_CFG(cfg);
+}
diff --git a/configs/misdn.conf.sample b/configs/misdn.conf.sample
new file mode 100755
index 000000000..fcd4c416b
--- /dev/null
+++ b/configs/misdn.conf.sample
@@ -0,0 +1,267 @@
+;
+; chan_misdn sample config
+;
+
+; general section:
+;
+; for debugging and general setup, things that are not bound to port groups
+;
+
+[general] 
+
+; set debugging flag: 
+;   0 - No Debug
+;   1 - mISDN Messages and * - Messages, and * - State changes
+;   2 - Messages + Message specific Informations (e.g. bearer capability)
+;   3 - very Verbose, the above + lots of Driver specific infos
+;   4 - even more Verbose than 3
+;
+; default value: 0
+;
+debug=0
+
+; the big trace
+;
+; default value: [not set]
+;
+;tracefile=/var/log/misdn.trace
+
+; single call trace files
+; set to true if you want to have them
+; they depend on debug level
+;
+; default values: trace_calls : false
+;                 trace_dir   : /var/log/
+;
+trace_calls=false
+trace_dir=/var/log/
+
+; set to yes if you want mISDN_dsp to bridge the calls in HW
+;
+; default value: yes
+;
+bridging=yes
+
+; stops dialtone after getting first digit on nt Port
+;
+; default value: yes
+;
+stop_tone_after_first_digit=yes
+
+; wether to append overlapdialed Digits to Extension or not 
+;
+; default value: yes
+;
+append_digits2exten=yes
+
+; set this to yes if you have jollys mISDN which sends correct L1 Infos
+;
+; default value: yes
+;
+l1_info_ok=yes
+
+; set this to yes if you want to clear the l3 in case the l2 deactivates
+; some environments have a flickering l2 which causes this option to 
+; damage active calls .. highly experimental
+; 
+; default value: no
+;
+clear_l3=no
+
+; set the method to use for channel selection:
+;   standard    - always choose the first free channel with the lowest number
+;   round_robin - use the round robin algorithm to select a channel. use this
+;                 if you want to balance your load.
+;
+; default value: standard
+;
+method=standard
+
+;;; CRYPTION STUFF
+
+; Wether to look for dynamic crypting attempt
+;
+; default value: no
+;
+dynamic_crypt=no
+
+; crypt_prefix, what is used for crypting Protocol
+;
+; default value: [not set]
+;
+crypt_prefix=**
+
+; Keys for cryption, you reference them in the dialplan
+; later also in dynamic encr.
+;
+; default value: [not set]
+;
+crypt_keys=test,muh
+
+; users sections:
+; 
+; name your sections as you which but not "general" ! 
+; the secions are Groups, you can dial out in extensions.conf
+; with Dial(mISDN/g:extern/101) where extern is a section name, 
+; chan_misdn tries every port in this section to find a 
+; new free channel
+; 
+
+; The default section is not a group section, it just contains config elements
+; which are inherited by group sections.
+;
+
+[default]
+
+; define your default context here
+;
+; default value: default
+;
+context=misdn
+
+; language
+;
+; default value: en
+;
+language=en
+
+; Prefixes for national and international, those are put before the 
+; oad if an according dialplan is set by the other end. 
+;
+; default values: nationalprefix      : 0
+;                 internationalprefix : 00
+;
+nationalprefix=0
+internationalprefix=00
+
+; set rx/tx gains between -8 and 8 to change the RX/TX Gain
+;
+; default values: rxgain: 0
+;                 txgain: 0
+;
+rxgain=0
+txgain=0
+
+; some telcos espacially in NL seem to need this set to yes, also in 
+; switzerland this seems to be important
+;
+; default value: no
+;
+te_choose_channel=no
+
+; dialplan options: 
+;
+; 0 - unknown
+; 1 - National
+; 2 - International
+; 4 - Subscriber
+;
+; This setting is used for outgoing calls
+;
+; default value: 0
+;
+dialplan=0
+
+; This is only for asterisk head and will result in only considering 
+; misdn.confs and misdn_set_opts callingpresentation informations if set to no.
+; Otherwise asterisks callingpresentation overwrites misdn.confs settings.
+;
+; default value: yes
+;
+use_callingpres=yes
+
+; uncomment the following to get into s extension at extension conf
+; there you can use DigitTimeout if you can't or don't want to use
+; isdn overlap dial. 
+; note: This will jump into the s exten for every exten!
+;
+; default value: no
+;
+;always_immediate=no
+
+; uncomment the following if you want callers which called exactly the 
+; base number (so no extension is set) jump to the s extension.
+; if the user dials something more it jumps to the correct extension 
+; instead
+;
+; default value: no
+;
+;immediate=no
+
+; uncomment the following to have hold and retrieve support
+;
+; default value: no
+;
+;hold_allowed=yes
+
+; Pickup and Callgroup
+;
+; deafult values: not set = 0
+;
+;callgroup=1
+;pickupgroup=1
+
+; Allows/Screens Callerid
+;
+; possible values: allowed,not_screened
+;
+; be aware, if you set to allowed you need to set a correct 
+; callerid in the dialplan or set it here in the misdn.conf
+; Some Telcos don't care about wrong callerids, others do !
+;
+; default value: allowed
+;
+;presentation=not_screened
+
+; this enables echocancellation, with the given number of taps
+; be aware, move this setting only to outgoing portgroups!
+; A value of zero turns echocancellation off.
+;
+; possible values are: 0,32,64,128.256,yes(=128),no(=0)
+;
+; default value: no
+;
+;echocancel=no
+
+; this disables echocancellation when the call is bridged between 
+; mISDN channels
+;
+; default value: no
+;
+echocancelwhenbridged=no
+
+; Set this to no to disable echotraining
+;
+; default value: yes
+;
+echotraining=yes
+
+[intern]
+; define your ports, e.g. 1,2 (depends on mISDN-driver loading order) 
+ports=1,2
+; context where to go to when incoming Call on one of the above ports
+context=Intern
+
+[internPP]
+; if you want to have pp Protocol on one nt Port, you need 
+; to add a ptp directly after the portnumber, you can still add 
+; more ports and multiple ptp adds in your config.
+ports=3ptp
+	
+[first_extern]
+; again port defs
+ports=4
+; again a context for incomming calls
+context=Extern1
+; msns for te ports, listen on those numbers on the above ports, and 
+; indicate the incoming calls to asterisk
+; here you can give a comma seperated list or simply an '*' for 
+; any msn. 
+msns=*
+
+; here an example with given msns
+[second_extern]
+ports=5
+context=Extern2
+callerid=15
+msns=102,144,101,104
diff --git a/doc/README.misdn b/doc/README.misdn
new file mode 100755
index 000000000..ee4e24c5f
--- /dev/null
+++ b/doc/README.misdn
@@ -0,0 +1,363 @@
+mISDN Channel Driver for Asterisk PBX
+======================================
+
+
+This package contains the mISDN Channel Driver for the Asterisk PBX. It 
+supports every mISDN Hardware and provides an interface for asterisk. 
+
+Features: 
+
+* NT and TE mode
+* PP and PMP mode
+* BRI and PRI (with BNE1 and BN2E1 Cards)
+* DTMF Detection in HW+mISDNdsp (much better than asterisks internal!)
+* Display Messages to Phones (which support display msg)
+* HOLD/RETRIEVE/TRANSFER on ISDN Phones : )
+* Screen/ Not Screen User Number
+* Basic EchoCancellation 
+* Volume Control 
+* Crypting with mISDNdsp (Blowfish)
+* Data (HDLC) callthrough 
+* Data Callin (with app_ptyfork +pppd)
+* echo cancellation
+* some other
+
+Supported Hardware:
+
+chan_misdn supports any mISDN compatible Hardware. Especially the 1-8 Port
+BRI Cards available from http://shop.beronet.com
+
+Overview
+--------
+
+- Fast Installation Guide
+- Pre-Requisites
+- Compilation 
+- Installation
+- Configuration
+- Dial and Options String
+- misdn cli commands
+- Debugging and sending Bugreports
+- Examples
+- Known working Configurations
+- Known Problems
+- Changes
+
+
+Fast Installation Guide
+-----------------------
+
+You have two options on how to install chan_misdn.
+
+(1) Requirements: 
+      - mISDN and mISDNuser from jolly (see Pre-Requisites below)
+    Installation: 
+	  - cd <asterisk-src-dir>/channels/misdn
+	  - edit Makefile so that MISDNUSER points to your mISDNuser directory
+	  - run 'make'
+	  - cd <asterisk-src-dir>
+	  - compile and install asterisk via 'make install'
+
+(2) Requirements:
+      - Asterisk headers and Kernel headers
+    Description:
+      The Makefile gets the newest mISDN and mISDNuser Sources from 
+	  jollys webpage and the newest release of chan_misdn from beronets 
+	  Servers. After that it compiles and installs everything (hopefully).
+    Installation:
+      - cd /usr/src
+      - wget http://www.beronet.com/downloads/install-misdn.tar.gz
+	  - tar zxf install-misdn.tar.gz
+	  - cd install-misdn
+	  - make install
+
+
+Pre-Requisites
+--------------
+
+To compile and install this driver, you'll need at least one mISDN Driver, the
+mISDNuser package and the asterisk includes (which will be inside of the
+sources). Chan_misdn works with both, the current stable release and the cvs-head version of Asterisk.
+
+To get the mISDN stuff please follow the instructions at
+http://www.isdn4linux.de.  Please Note that mISDN works good for the
+linux-2.6.x kernels. Some of the mISDN drivers do not compile against the
+2.4.x or older kernels, you can patch them, but than you'll get myterius
+errors.
+
+ I use Kernels > 2.6.9 and it works perfect. with kernels >= 2.6.10 there is a
+very litle bug in hfc_multi.c which causes the module not to compile, it can
+be easyly fixed by changenging pci_findsubsys to pci_getsubsys in code.
+
+Ok so far so good, now follow the compilation instructions.
+
+!! Dont forget to create the /dev/mISDN device node.
+
+Compilation 
+-----------
+
+!! Be aware, in the actual mISDNuser package theres a bug in the Makefile
+!! the compilation stops near iapplication.h, this isn't very important
+!! at this step you are ready. 
+
+After you've successfully installed mISDN, mISDNuser and asterisk, you should
+modify the Makefile in the chan_misdn source path. There you can tell the
+Makefile where to install the driver, sample-conf, and most important where it
+can find the linux kernel includes, the mISDNuser package and the asterisk
+includes.  If you use the Head-Revision of Asterisk (or at least a newer
+version than stable) uncomment the CCFLAGS+=-DASTERISK_STABLE, the stable
+version of asterisk is at the moment v1-0-X as cvs tag.
+
+Now you can type in: 
+
+make
+
+This should compile chan_misdn.so, if theres an error check the paths in the
+Makefile again.
+
+
+Installation
+------------
+
+After successful compilation of chan_misdn, you should simply type in:
+
+make install 
+
+as privileged user to put chan_misdn.so in the asterisk modules
+directory.
+
+You should see a Msg like: "Successfully installed chan_misdn". 
+Congratulations. 
+
+Theres a sample init.d script for loading the mISDN modules (mISDN.sample),
+simply copy it to /etc/init.d/ and modify it, there you can enter your cards.
+
+!! Forget to use capi together with chan_misdn. 
+
+
+
+Configuration
+-------------
+
+First of all you must configure the mISDN drivers. Each driver module has got
+an options and layermask option, which tells the driver wether to start in
+TE,NT, PP or PMP mode (there are lots more please read docs in misdn for
+that).
+
+After thinking about the above you'll probably want to configure the
+misdn.conf file which resides in the asterisk-config directory.
+
+The misdn.conf file contains a "general" Section, and user sections which
+contain misdn port settings and different asterisk contexts.
+
+The general section contains especially a variable named context with which
+the default context is set. There is also the very important debug variable
+which you can set from the asterisk cli (command line interface) or in this
+configfile, bigger numbers will lead to more debug output. Theres also a
+tracefile options, which takes a path+filename where debug output is written
+to.
+
+The user Sections have names which are unequal to "general". Those sections
+contain the ports variable which mean the mISDN Ports. Here you can add
+comma-sepperated multiple ports. 
+
+Espacially for TE-Mode Ports there is a msns variable. This variable tells the
+chan_misdn driver to listen for incomming calls with the given msns, you can
+insert a '*' as single msn, which leads in getting every incomming call (if
+you want to share on PMP TE S0 with a asterisk and a phone or isdn card you
+should insert here the msns which you'll like to give the asterisk).  Finally
+a context variable resides in the user sections, which tells chan_misdn where
+to send incomming calls to (extension.conf).
+
+In NT-Mode Ports there is a new option, directly after the port number you can
+write ptp, this enables PP Mode for this port, please look at misdn.conf for
+an example.
+
+When everything worked you should get the asterisk running.
+
+
+Dial and Options String
+-----------------------
+
+The Dialstring of chan_misdn got more complex, because we added more features,
+so the generic dialstring looks like:
+
+mISDN/<port>|g:<group>/<extension>[/<OPTIONSSTRING>]
+
+The Optionsstring looks Like:
+:<optchar1><OptParam1>:<optchar2><OptParam2>
+
+the ":" character is the delimeter.
+
+The available Optchars are: 
+	d - Send display text on called phone, text is the optparam
+	n - don't detect dtmf tones on called channel
+	h - make digital outgoing call
+	c - make crypted outgoing call, param is keyindex
+	e - perform echo cancelation on this channel, takes taps as 
+	arguments (32,64,128,256)
+	s - send Non Inband DTMF as inband
+	vr - rxgain control
+	vt - txgain control
+
+
+chan_misdn registers a new application "misdn_set_opt" when loaded. This 
+application takes the Optionsstring as argument. The Syntax is:
+
+misdn_set_opt(<OPTIONSSTRING>)
+
+
+When you set options in the dialstring, the options are set in the external
+channel. When you set options with misdn_set_opt, they are set in the current
+incoming channel. So if you like to use static encryption, the scenario looks
+as follows:
+
+Phone1 --> * Box 1 --> PSTN_TE 
+PSTN_TE --> * Box 2 --> Phone2
+
+The Encryption must be done on the PSTN sides, so the dialplan on the boxes
+are:
+
+* Box 1:
+exten => _${CRYPT_PREFIX}X.,1,Dial(mISDN/g:outbound/:c1)
+
+* Box 2:
+exten => ${CRYPT_MSN},1,misdn_set_opt(:c1)
+exten => ${CRYPT_MSN},2,dial(${PHONE2})
+
+
+
+
+misdn cli commands
+------------------
+
+At the asterisk cli you can try to type in: 
+
+misdn <tab> <tab>
+
+Now you should see the misdn cli commands: 
+
+- clean
+	-> pid 		(cleans a broken call, use with care, leads often
+			 to a segmentation fault)
+- send
+	-> display	(sends a Text Message to a asterisk channel, 
+			 this channel must be an misdn channel)
+- set
+	-> debug	(sets debug level)
+- show
+	-> config	(shows the configuration options)
+	-> channels	(shows the current active misdn channels)
+	-> channel	(shows details about the given misdn channels)
+	-> stacks	(shows the currend ports, there protocols and states)
+	-> fullstacks	(shows the current active and inactive misdn channels)
+
+- restart 
+	-> port		(restarts given port (L2 Restart) )
+
+- reload 		(reloads misdn.conf)
+
+You can only use "misdn send display" when a asterisk channel is created and
+isdn is in the corect state, correct state means that you have established a
+call to another phone (mustnt be isdn though).
+
+Then you use it like this:
+
+misdn send display mISDN/1/101 "Hello World!"
+
+where 1 is the Port of the Card where the phone is plugged in, and 101 is the
+msn (callerid) of the Phone to send the text to.
+
+
+
+Debugging and sending Bug-Reports
+---------------------------------
+
+If you encounter problems, you should set up the debugging flag, usually debug=1 should be enough. the Messages are divided in asterisk and misdn parts. Misdn Debug messages begin with an 'I', asterisk messages begin with an '*', the rest is clear I think. 
+
+Please take a trace of the problem and send this trace via mail to bugs@beronet.com
+
+
+Examples
+--------
+
+here some examples of how to use chan_misdn in the dialplan (extensions.conf): 
+
+
+[globals]
+OUT_PORT=1 ; The physical Port of the Card
+OUT_GROUP=ExternE1 ; The Group of Ports defined in misdn.conf
+
+[misdnIn]
+exten => _X.,1,Dial(mISDN/${OUT_PORT}/${EXTEN})
+exten => _0X.,1,Dial(mISDN/g:${OUT_GROUP}/${EXTEN:1})
+exten => _1X.,1,Dial(mISDN/g:${OUT_GROUP}/${EXTEN:1}/:dHello)
+exten => _1X.,1,Dial(mISDN/g:${OUT_GROUP}/${EXTEN:1}/:dHello Test:n)
+
+In the last line you will notice the last argument (Hello), this is sended
+as Display Message to the Phone.
+
+
+Known working Configurations
+----------------------------
+
+In this Section I'll put working configurations for chan_misdn. Beware It
+seems that between Kernel 2.6.3 and Kernel 2.6.8 there were lots of mISDN
+Bugs. I use Kernel 2.6.9 now, it works quite ok, Kernel 2.6.10+ has changed
+the pci_find_subgsys funktion, so hfc_multi from mISDN doesn't compile against
+it, you can just change pci_find_subsys to pci_get_subsys, this works.
+
+
+- chan_misdn-0.0.3-rc1: 	
+	* linux-kernel >= 2.6.3 (but at least 2.6) 
+	* asterisk >= v1-0 
+	* mISDN/mISDNuser since September/04
+
+- chan_misdn-0.0.3-rc3: 	
+	* linux-kernel >= 2.6.3 (but at least 2.6) 
+	* asterisk >= v1-0.2 
+	* mISDN/mISDNuser since December/04
+
+- chan_misdn-0.0.3-rc4: 	
+	* linux-kernel >= 2.6.8 (but at least 2.6) 
+	* asterisk >= v1-0.2 
+	* mISDN/mISDNuser head on cvs.isdn4linux.de
+
+- chan_misdn-0.0.3-rc6: 	
+	* linux-kernel >= 2.6.8 (but at least 2.6) 
+	* asterisk >= v1-0.2 
+	* mISDN/mISDNuser head on cvs.isdn4linux.de
+
+- chan_misdn-0.1.0
+	* linux-kernel >= 2.6.8 (but at least 2.6) 
+	* asterisk >= v1-0.2 , also CVS Head
+	* mISDN/mISDNuser (3.0-beta) from isdn.jolly.de
+
+
+Known Problems
+--------------
+
+* When I use mISDN->IAX I cannot make Trunk calls
+
+-> You need to use ztdummy as dummy zaptel interface for the iax timing in
+trunking mode, simply grab libpri, zaptel and compile them (i think you need
+to modify the makefile in zaptel to add ztdummy to the defaultly compiled
+modules) then modprobe ztdummy, this resolves the problem.
+
+
+* I cannot hear any tone after succesfull CONNECT to other end
+
+-> you forgot to load mISDNdsp, which is now needed by chan_misdn for switching
+and dtmf tone detection
+
+* I have strange ISDN behavior: sometimes I hear the other end, sometimes
+not. also i get STATUS Events with cause 100, with misdn debugging
+
+-> Please update to newest version of chan_misdn and set the te_choose_channel
+option in misdn.conf to yes
+
+Changes
+-------
+
+in the Changes File
+