[zaptel-commits] tzafrir: branch 1.2 r1666 - in /branches/1.2/xpp: ./ utils/

zaptel-commits at lists.digium.com zaptel-commits at lists.digium.com
Thu Nov 30 14:46:12 MST 2006


Author: tzafrir
Date: Thu Nov 30 15:46:11 2006
New Revision: 1666

URL: http://svn.digium.com/view/zaptel?view=rev&rev=1666
Log:
 r2817 at boole:  oron | 2006-11-28 13:39:47 +0200
 Maintenance branch for asterisk-1.2.x
 
 

Modified:
    branches/1.2/xpp/   (props changed)
    branches/1.2/xpp/Makefile
    branches/1.2/xpp/README.Astribank
    branches/1.2/xpp/calibrate_slics
    branches/1.2/xpp/card_fxo.c
    branches/1.2/xpp/card_fxs.c
    branches/1.2/xpp/card_global.c
    branches/1.2/xpp/init_card_3_23
    branches/1.2/xpp/init_card_4_23
    branches/1.2/xpp/utils/Makefile
    branches/1.2/xpp/utils/genzaptelconf
    branches/1.2/xpp/xbus-core.c

Propchange: branches/1.2/xpp/
------------------------------------------------------------------------------
--- svk:merge (original)
+++ svk:merge Thu Nov 30 15:46:11 2006
@@ -1,3 +1,4 @@
+283159da-0705-0410-b60c-f2062b4bb6ad:/components/xpp-zaptel/branches/RELEASE-1.2.0/xpp:2817
 283159da-0705-0410-b60c-f2062b4bb6ad:/components/xpp-zaptel/trunk/xpp:2600
 f558416c-6c06-0410-9f27-dde2687782d0:/branches/1.4/xpp:1623
 f558416c-6c06-0410-9f27-dde2687782d0:/team/tzafrir/xpp_1.2/xpp:1554

Modified: branches/1.2/xpp/Makefile
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/Makefile?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/Makefile (original)
+++ branches/1.2/xpp/Makefile Thu Nov 30 15:46:11 2006
@@ -1,4 +1,4 @@
-EXTRA_CFLAGS	= -g3 -I$(SUBDIRS) -DDEBUG -DPOLL_DIGITAL_INPUTS -DWITH_ECHO_SUPPRESSION # -DSOFT_RING
+EXTRA_CFLAGS	= -g3 -I$(SUBDIRS) -DDEBUG -DPOLL_DIGITAL_INPUTS -DWITH_ECHO_SUPPRESSION
 
 obj-m		+= xpp.o xpd_fxs.o xpd_fxo.o
 

Modified: branches/1.2/xpp/README.Astribank
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/README.Astribank?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/README.Astribank (original)
+++ branches/1.2/xpp/README.Astribank Thu Nov 30 15:46:11 2006
@@ -329,6 +329,34 @@
 (There are a bunch of other status files under /proc/xpp/ )
 
 
+Zaptel Init Configuration File
+""""""""""""""""""""""""""""""
+The zaptel init.d script, genzaptelconf and the XPD init scripts source 
+the file /etc/init.d/zaptel (on Debian) or /etc/sysconfig/zaptel (on 
+RedHats). A number of useful values for there:
+
+############################### 
+# Lines beginning with '#' are considered comments and ignored.
+
+# A two-letter country code. genzaptelconf uses it to better guess 
+# the configuration it generates. E.g: the signalling of E1 spans, and 
+# a few other country-specific settings.
+lc_country=us
+
+# See genzaptelconf(8) and the script itself for a longer list of 
+# variables.
+
+# Equivalent to the parameter opermode to the module wctdm: country-specific
+# settings to the FXO lines. For a complete list of possible values, see
+# /usr/share/zaptel/init_fxo_mode .
+#opermode=FCC
+#opermode=FRANCE
+
+# If you feel like flooding your logs with debug output of the calibration 
+# process:
+#DEBUG_CALIBRATION=1
+###############################
+
 Useful Module Parameters:
 """"""""""""""""""""""""
 zap_autoreg: (xpp)

Modified: branches/1.2/xpp/calibrate_slics
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/calibrate_slics?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/calibrate_slics (original)
+++ branches/1.2/xpp/calibrate_slics Thu Nov 30 15:46:11 2006
@@ -15,9 +15,19 @@
 	exit 1
 }
 
+my $debug = 0;
+# set DEBUG_CALIBRATION in /etc/default/zaptel or similar
+if (exists $ENV{DEBUG_CALIBRATION}) {
+	$debug = 1;
+}
+
 sub logger($) {
 	print STDERR "LOG: @_\n";
 	system("logger @_");
+}
+
+sub debug($) {
+	logger(@_) if ($debug);
 }
 
 sub write_to_slic_file($) {
@@ -45,11 +55,11 @@
 	my @reply = ();
 	while(<SLICS>){
 		#if (/^ /) {
-		#	print STDERR "answer line: $_";
+		#	debug "answer line: $_";
 		#}
 		if (/^ \d*\s+[RW][DIS]\s+[[:xdigit:]]+\s+([[:xdigit:]]+)\s+([[:xdigit:]]+)/){
 			@reply = (hex($1), hex($2)); 
-			#print STDERR "got [$reply]\n";
+			#debug "got [$reply]\n";
 			last;
 		}
 	}
@@ -83,7 +93,7 @@
 		for my $slic (@SlicNums) {
 			$line .= " ".read_reg($slic, $i, 'D');
 		}
-		logger($line);
+		debug($line);
 	}
 }
 
@@ -209,17 +219,17 @@
 	# wait until all slics have finished calibration, or for timeout
 	while ($calibration_in_progress) {
 		$calibration_in_progress = 0; # until proven otherwise
-		print STDERR "ManualCalib:: ";
+		my $debug_calib_str = "ManualCalib:: ";
 		for my $slic(@SlicNums) {
 			my $value = read_reg($slic, $read_reg, 'D');
-			print STDERR " [$slic_counters[$slic]:$value]";
+			$debug_calib_str .= " [$slic_counters[$slic]:$value]";
 			if ($value != 0 && $slic_counters[$slic] >= 0) {
 				$calibration_in_progress = 1;
 				$slic_counters[$slic]--;
 				write_reg($slic,$write_reg,'D',$slic_counters[$slic]);
 			}
 		}
-		print STDERR "\n";
+		debug($debug_calib_str);
 		# TODO: unnecessary sleep in the last round:
 		sleep $ManualCalibrationSleepTime;
 	}
@@ -247,20 +257,20 @@
 	my $end_time=time() + 2;
 	my $timeout=0;
 	CALIB_LOOP: for my $slic (@SlicNums) {
-		logger("checking slic $slic");
+		debug("checking slic $slic");
 		while(1) {
 			if ((read_reg($slic, 60, 'D')) == 0) {
 				# move to next register
-				logger("slic $slic calibrated");
+				debug("slic $slic calibrated");
 				last;
 			}
 			my $time=time();
 			if ( $time > $end_time) {
 				$timeout=1;
-				logger("Exiting on timeout: $end_time < $time.");
+				debug("Exiting on timeout: $end_time < $time.");
 				last CALIB_LOOP;
 			}
-			logger("auto_calibrate not done yet: slic #$slic\n");
+			debug("auto_calibrate not done yet: slic #$slic\n");
 			sleep(0.1);
 		}
 	}
@@ -277,17 +287,17 @@
 #read_reg($slic, 0x0B, 'D'): 0x33
 #read_reg($slic, 0x40, 'D'): 0x00 (?)
 
-print STDERR "starting\n";
+debug "starting\n";
 
 init_indirect_registers();
-print STDERR "after init_indirect_registers\n";
+debug "after init_indirect_registers\n";
 init_early_direct_regs();
-print STDERR "after init_early_direct_regs\n";
+debug "after init_early_direct_regs\n";
 auto_calibrate(0x47, 0x1E);
-print STDERR "after auto_calibrate\n";
+debug "after auto_calibrate\n";
 manual_calibrate();
-print STDERR "after manul_calibrate\n";
+debug "after manul_calibrate\n";
 auto_calibrate(0x40, 0x01);
-print STDERR "after auto_calibrate 2\n";
-
-
+debug "after auto_calibrate 2\n";
+
+

Modified: branches/1.2/xpp/card_fxo.c
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/card_fxo.c?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/card_fxo.c (original)
+++ branches/1.2/xpp/card_fxo.c Thu Nov 30 15:46:11 2006
@@ -80,11 +80,6 @@
 #define	PROC_REGISTER_FNAME	"slics"
 #define	PROC_FXO_INFO_FNAME	"fxo_info"
 
-#ifdef SOFT_RING
-#define	POLL_RING_INTERVAL	2
-#define	RING_THRESHOLD		3
-#define	NORING_THRESHOLD	10
-#endif
 #define	DAA_RING_REGISTER	0x05
 
 struct FXO_priv_data {
@@ -96,15 +91,6 @@
 	xpp_line_t			ledstate[NUM_LEDS];	/* 0 - OFF, 1 - ON */
 	xpp_line_t			ledcontrol[NUM_LEDS];	/* 0 - OFF, 1 - ON */
 	int				blinking[NUM_LEDS][CHANNELS_PERXPD];
-#ifdef SOFT_RING
-	ushort				ring_thresh[CHANNELS_PERXPD];
-	ushort				noring_thresh[CHANNELS_PERXPD];
-	/* ring_sig is set when Reg5, bit 2 (Ring Detect) is set. 
-	 * While ring_sig=1 we check R5 bit 20H and 40H for ringing. 
-	 * When it drops to 0 that's the end of the ring sequence and 
-	 * we clear the ring detection variables */
-	ushort				ring_sig[CHANNELS_PERXPD];
-#endif
 };
 
 /*---------------- FXO: Static functions ----------------------------------*/
@@ -187,7 +173,7 @@
 	spin_unlock_irqrestore(&xpd->lock, flags);
 }
 
-static void mark_ring(xpd_t *xpd, lineno_t pos, bool on)
+static void mark_ring(xpd_t *xpd, lineno_t pos, bool on, bool update_zap)
 {
 	struct FXO_priv_data	*priv;
 
@@ -197,13 +183,15 @@
 		DBG("%s/%s/%d: START\n", xpd->xbus->busname, xpd->xpdname, pos);
 		xpd->ringing[pos] = 1;
 		MARK_BLINK(priv, pos, LED_GREEN, LED_BLINK);
-		update_zap_ring(xpd, pos, 1);
+		if(update_zap)
+			update_zap_ring(xpd, pos, on);
 	} else if(!on && xpd->ringing[pos]) {
 		DBG("%s/%s/%d: STOP\n", xpd->xbus->busname, xpd->xpdname, pos);
 		xpd->ringing[pos] = 0;
 		if(IS_BLINKING(priv, pos, LED_GREEN))
 			MARK_BLINK(priv, pos, LED_GREEN, 0);
-		update_zap_ring(xpd, pos, 0);
+		if(update_zap)
+			update_zap_ring(xpd, pos, on);
 	}
 }
 
@@ -224,14 +212,11 @@
 		NOTICE("%s/%s/%d: WARNING: called while battery is off\n", xbus->busname, xpd->xpdname, pos);
 	}
 	spin_lock_irqsave(&xpd->lock, flags);
-	mark_ring(xpd, pos, 0);				// No more rings
+	mark_ring(xpd, pos, 0, 0);				// No more rings
 	value = (to_offhook) ? 0x09 : 0x08;	/* Bit 3 is for CID */
 	DBG("%s/%s/%d: SETHOOK: value=0x%02X %s\n", xbus->busname, xpd->xpdname, pos, value, (to_offhook)?"OFFHOOK":"ONHOOK");
 	MARK_LED(xpd, pos, LED_GREEN, (to_offhook)?LED_ON:LED_OFF);
 	ret = DAA_DIRECT_REQUEST(xbus, xpd, pos, DAA_WRITE, DAA_RING_REGISTER, value);
-#ifdef	SOFT_RING
-	priv->ring_sig[pos] = 0;
-#endif
 	if(to_offhook) {
 		BIT_SET(xpd->offhook, pos);
 	} else {
@@ -362,7 +347,7 @@
 	MARK_LED(xpd, ALL_LINES, LED_GREEN, LED_OFF);
 	for_each_line(xpd, i) {
 		MARK_LED(xpd, i, LED_GREEN, LED_ON);
-		mdelay(50);
+		msleep(50);
 	}
 	return 0;
 }
@@ -381,7 +366,7 @@
 	DBG("%s/%s (%d)\n", xbus->busname, xpd->xpdname, on);
 	for_each_line(xpd, i) {
 		MARK_LED(xpd, i, LED_GREEN, LED_OFF);
-		mdelay(50);
+		msleep(50);
 	}
 	return 0;
 }
@@ -420,21 +405,6 @@
 	}
 }
 
-#ifdef	SOFT_RING
-static void poll_ring(xbus_t *xbus, xpd_t *xpd)
-{
-	int			i;
-	struct FXO_priv_data	*priv;
-
-	priv = xpd->priv;
-	BUG_ON(!priv);
-	for_each_line(xpd, i) {
-		if(priv->ring_sig[i])
-			DAA_DIRECT_REQUEST(xbus, xpd, i, DAA_READ, DAA_RING_REGISTER, 0);
-	}
-}
-#endif
-
 static int FXO_card_tick(xbus_t *xbus, xpd_t *xpd)
 {
 	struct FXO_priv_data	*priv;
@@ -445,10 +415,6 @@
 	if(poll_battery_interval != 0 && (priv->poll_counter % poll_battery_interval) == 0) {
 		poll_battery(xbus, xpd);
 	}
-#ifdef	SOFT_RING
-	if((priv->poll_counter % POLL_RING_INTERVAL) == 0)
-		poll_ring(xbus, xpd);
-#endif
 	handle_fxo_leds(xpd);
 	priv->poll_counter++;
 	return 0;
@@ -489,7 +455,7 @@
 				ret = handle_register_command(xpd, buf);
 				if(ret < 0)
 					return ret;
-				mdelay(1);
+				msleep(1);
 			}
 
 			DBG("-- Set echo registers successfully\n");
@@ -546,11 +512,11 @@
 	if(on) {
 		for_each_line(xpd, i) {
 			MARK_LED(xpd, i, LED_GREEN, LED_ON);
-			mdelay(20);
+			msleep(20);
 		}
 		for_each_line(xpd, i) {
 			MARK_LED(xpd, i, LED_GREEN, LED_OFF);
-			mdelay(20);
+			msleep(20);
 		}
 	}
 	return ret;
@@ -606,21 +572,7 @@
 					xbus->busname, xpd->xpdname, i);
 				continue;
 			}
-			if(IS_SET(sig_status, i)) {
-#ifdef	SOFT_RING
-				priv->ring_sig[i]=1;		/* trigger register polling */
-				/* reset ring check counters */
-				priv->ring_thresh[i] = 0;
-				priv->noring_thresh[i] = 0;
-#else
-				mark_ring(xpd, i, 1);
-#endif
-			} else {
-#ifdef	SOFT_RING
-				priv->ring_sig[i] = 0;
-#endif
-				mark_ring(xpd, i, 0);
-			}
+			mark_ring(xpd, i, IS_SET(sig_status, i), 1);
 		}
 	}
 	spin_unlock_irqrestore(&xpd->lock, flags);
@@ -667,25 +619,6 @@
 			}
 		}
 	}
-#ifdef	SOFT_RING
-	if(REG_FIELD(info, regnum) == DAA_RING_REGISTER && priv->ring_sig[chipsel]) {
-		bool		ringit = (REG_FIELD(info, data_low) & (0x20 | 0x40)) ? 1 : 0;	/* Ring positive | Ring negative */
-
-		if(ringit) {
-			if(priv->ring_thresh[chipsel] > RING_THRESHOLD) {
-				mark_ring(xpd, chipsel, 1);
-				priv->noring_thresh[chipsel] = 0;
-			} else
-				priv->ring_thresh[chipsel]++;
-		} else {
-			if(priv->noring_thresh[chipsel] > NORING_THRESHOLD) {
-				mark_ring(xpd, chipsel, 0);
-				priv->ring_thresh[chipsel] = 0;
-			} else
-				priv->noring_thresh[chipsel]++;
-		}
-	}
-#endif
 #if 0
 	DBG("DAA_REPLY: xpd #%d %s reg_num=0x%X, dataL=0x%X dataH=0x%X\n",
 			xpd->id, (info->size == 3)?"I":"D",
@@ -779,23 +712,6 @@
 		if(!IS_SET(xpd->digital_outputs, i) && !IS_SET(xpd->digital_inputs, i))
 			len += sprintf(page + len, "%2d ", IS_BLINKING(priv,i,LED_GREEN));
 	}
-#ifdef	SOFT_RING
-	len += sprintf(page + len, "\n\t%-17s: ", "ring_thresh");
-	for_each_line(xpd, i) {
-		if(!IS_SET(xpd->digital_outputs, i) && !IS_SET(xpd->digital_inputs, i))
-			len += sprintf(page + len, "%2d ", priv->ring_thresh[i]);
-	}
-	len += sprintf(page + len, "\n\t%-17s: ", "noring_thresh");
-	for_each_line(xpd, i) {
-		if(!IS_SET(xpd->digital_outputs, i) && !IS_SET(xpd->digital_inputs, i))
-			len += sprintf(page + len, "%2d ", priv->noring_thresh[i]);
-	}
-	len += sprintf(page + len, "\n\t%-17s: ", "ring_sig");
-	for_each_line(xpd, i) {
-		if(!IS_SET(xpd->digital_outputs, i) && !IS_SET(xpd->digital_inputs, i))
-			len += sprintf(page + len, "%2d ", priv->ring_sig[i]);
-	}
-#endif
 	len += sprintf(page + len, "\n\t%-17s: ", "battery");
 	for_each_line(xpd, i) {
 		len += sprintf(page + len, "%2d ", IS_SET(priv->battery, i));
@@ -942,7 +858,7 @@
 		ret = handle_register_command(xpd, buf);
 		if(ret < 0)
 			return ret;
-		mdelay(1);
+		msleep(1);
 	}
 	return count;
 }
@@ -982,11 +898,6 @@
 int __init card_fxo_startup(void)
 {
 	INFO("%s revision %s\n", THIS_MODULE->name, ZAPTEL_VERSION);
-#ifdef	SOFT_RING
-	INFO("FEATURE: %s with SOFT_RING\n", THIS_MODULE->name);
-#else
-	INFO("FEATURE: %s without SOFT_RING\n", THIS_MODULE->name);
-#endif
 	xproto_register(&PROTO_TABLE(FXO));
 	return 0;
 }

Modified: branches/1.2/xpp/card_fxs.c
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/card_fxs.c?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/card_fxs.c (original)
+++ branches/1.2/xpp/card_fxs.c Thu Nov 30 15:46:11 2006
@@ -343,7 +343,7 @@
 	spin_unlock_irqrestore(&xpd->lock, flags);
 	for_each_line(xpd, i) {
 		MARK_LED(priv, i, color, LED_ON);
-		mdelay(50);
+		msleep(50);
 	}
 	return 0;
 }
@@ -363,7 +363,7 @@
 	DBG("%s/%s (%d)\n", xbus->busname, xpd->xpdname, on);
 	for_each_line(xpd, i) {
 		MARK_LED(priv, i, color, LED_OFF);
-		mdelay(50);
+		msleep(50);
 	}
 	return 0;
 }
@@ -946,7 +946,7 @@
 		ret = handle_register_command(xpd, buf);
 		if(ret < 0)
 			return ret;
-		mdelay(1);
+		msleep(1);
 	}
 	return count;
 }

Modified: branches/1.2/xpp/card_global.c
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/card_global.c?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/card_global.c (original)
+++ branches/1.2/xpp/card_global.c Thu Nov 30 15:46:11 2006
@@ -30,15 +30,6 @@
 static const char rcsid[] = "$Id$";
 
 DEF_PARM(charp,initdir, "/usr/share/zaptel", "The directory of card initialization scripts");
-/*
- * BRI: Temporary software workaround for firmware limitation:
- *      - The BRI firmware count PCM channel number globally across subunits.
- *      - The module parameter 'bri_pcmshift' enables us to cheat and shift
- *        each B-channel, 4 bits for each subsequent subunit.
- *      - Eventually, this should be fixed in the firmware, otherwise we won't
- *        handle PRI (all the space we have is 32bits).
- */
-DEF_PARM(bool,bri_pcmshift, 1, "TESTING: shift bri PCM bits by subunit number");
 
 extern	int print_dbg;
 static bool pcm_valid(xpd_t *xpd, xpacket_t *pack);
@@ -94,7 +85,11 @@
 		}
 		buf += ZT_CHUNKSIZE;
 	}
-	if(bri_pcmshift) {	/* workaround for pcm problem in BRI */
+	/*
+	 * BRI: Software workaround for firmware limitation.
+	 *      The BRI firmware count PCM channel number globally across subunits.
+	 */
+	if(xpd->type == XPD_TYPE_BRI_NT || xpd->type == XPD_TYPE_BRI_TE) {
 		lines = lines << (xpd->addr.subunit * 4);
 		RPACKET_FIELD(pack, GLOBAL, PCM_WRITE, lines) = lines;
 	}
@@ -153,17 +148,22 @@
 	card_desc->type = type;
 	card_desc->rev = rev;
 	card_desc->xpd_addr = xpd_addr;
+	DBG("%s: xpd=%d-%d type=%d rev=%d line_status=0x%04X\n",
+			xbus->busname, xpd_addr.unit, xpd_addr.subunit, type, rev, line_status);
 	spin_lock_irqsave(&xbus->lock, flags);
-	DBG("xpd=%d-%d type=%d rev=%d line_status=0x%04X\n",
-			xpd_addr.unit, xpd_addr.subunit, type, rev, line_status);
 	if(type == XPD_TYPE_NOMODULE)
 		XBUS_COUNTER(xbus, DEV_DESC_EMPTY)++;
 	else
 		XBUS_COUNTER(xbus, DEV_DESC_FULL)++;
 	atomic_inc(&xbus->count_poll_answers);
-	wake_up(&xbus->wait_for_polls);
 	list_add_tail(&card_desc->card_list, &xbus->poll_results);
 	spin_unlock_irqrestore(&xbus->lock, flags);
+	/*
+	 * wake_up only after exiting our critical section.
+	 * We suspect that otherwise a spinlock nesting may occur
+	 * and cause a panic (if spinlock debugging is compiled in).
+	 */
+	wake_up(&xbus->wait_for_polls);
 	return 0;
 }
 
@@ -176,6 +176,7 @@
 	volatile u_char	*r;
 	unsigned long	flags;
 	int		i;
+	xpp_line_t	old_lines = lines;
 
 	BUG_ON(!xbus);
 	if(!xpd) {
@@ -188,11 +189,20 @@
 	}
 	// DBG("lines=0x%04X\n", lines);
 
-	if(bri_pcmshift) {	/* workaround for pcm problem in BRI */
+	/*
+	 * BRI: Software workaround for firmware limitation.
+	 *      The BRI firmware count PCM channel number globally across subunits.
+	 */
+	if(xpd->type == XPD_TYPE_BRI_NT || xpd->type == XPD_TYPE_BRI_TE) {
 		lines = (lines >> (xpd->addr.subunit * 4)) & 0x7;
 		RPACKET_FIELD(pack, GLOBAL, PCM_WRITE, lines) = lines;
 	}
 	if(!pcm_valid(xpd, pack)) {
+		static int	rate_limit;
+
+		if((rate_limit++ % 5001) == 0)
+			ERR("%s/%s: old_lines=0x%04X lines=0x%04X subunit=%d\n",
+				xpd->xbus->busname, xpd->xpdname, old_lines, lines, xpd->addr.subunit);
 		return -EPROTO;
 	}
 	spin_lock_irqsave(&xpd->lock, flags);
@@ -313,7 +323,8 @@
 
 		XPD_COUNTER(xpd, RECV_ERRORS)++;
 		if((rate_limit++ % 1000) <= 10) {
-			ERR("BAD PCM REPLY: pack->datalen=%d, count=%d\n", pack->datalen, count);
+			ERR("%s/%s: BAD PCM REPLY: pack->datalen=%d, count=%d\n",
+					xpd->xbus->busname, xpd->xpdname, pack->datalen, count);
 			dump_packet("BAD PCM REPLY", pack, 1);
 		}
 		return 0;

Modified: branches/1.2/xpp/init_card_3_23
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/init_card_3_23?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/init_card_3_23 (original)
+++ branches/1.2/xpp/init_card_3_23 Thu Nov 30 15:46:11 2006
@@ -46,10 +46,21 @@
 export XPP_BASE
 LOGGER="logger -s -t $me"
 
+ZAPTEL_BOOT_DEBIAN=${ZAPTEL_BOOT_DEBIAN:-/etc/default/zaptel}
+ZAPTEL_BOOT_FEDORA=${ZAPTEL_BOOT_FEDORA:-/etc/sysconfig/zaptel}
+
+# read default configuration from /etc/default/zaptel
+if [ -r $ZAPTEL_BOOT_DEBIAN ]; then . $ZAPTEL_BOOT_DEBIAN; fi
+if [ -r $ZAPTEL_BOOT_FEDORA ]; then . $ZAPTEL_BOOT_FEDORA; fi
+
+if [ "$DEBUG_CALIBRATION"=1 ]; then
+	LOGGER=":"
+fi
+
 # Always redirect stderr somewhere, otherwise the shell script will die
 # when it tries to do I/O related stuff on closed file descriptor.
 # Our default is to throw it down the bit-bucket.
-exec 2> /dev/null
+exec 2> /dev/console
 ## If you wish to trace this script:
 #exec 2> /tmp/xpp_init_$XPD_NAME
 ## Altenativly, if you have multiple XBUS'es:
@@ -65,8 +76,7 @@
 
 $LOGGER -p kern.info "$XPD_BUS/$XPD_NAME: Continue '$0'"
 
-sed -e 's/[;#].*$//' -e '/^[ 	]*$/d' <<END_OF_FILE
-
+echo "
 # Change SLICs states to "Open state"s  (Off,all transfers tristated to avoid data collision), Voltage sense
 31	WD	40	00
 
@@ -169,8 +179,7 @@
 
 #31	WD	4A 34
 #31	WD	4B 10
-
-END_OF_FILE
+" | sed -e 's/[;#].*$//' -e '/^[ 	]*$/d' 
 
 $LOGGER -p kern.info "$XPD_BUS/$XPD_NAME: Ending '$0'"
 exit 0

Modified: branches/1.2/xpp/init_card_4_23
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/init_card_4_23?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/init_card_4_23 (original)
+++ branches/1.2/xpp/init_card_4_23 Thu Nov 30 15:46:11 2006
@@ -44,10 +44,21 @@
 export XPP_BASE
 LOGGER="logger -s -t $me"
 
+ZAPTEL_BOOT_DEBIAN=${ZAPTEL_BOOT_DEBIAN:-/etc/default/zaptel}
+ZAPTEL_BOOT_FEDORA=${ZAPTEL_BOOT_FEDORA:-/etc/sysconfig/zaptel}
+
+# read default configuration from /etc/default/zaptel
+if [ -r $ZAPTEL_BOOT_DEBIAN ]; then . $ZAPTEL_BOOT_DEBIAN; fi
+if [ -r $ZAPTEL_BOOT_FEDORA ]; then . $ZAPTEL_BOOT_FEDORA; fi
+
+if [ "$DEBUG_CALIBRATION"=1 ]; then
+	LOGGER=":"
+fi
+
 # Always redirect stderr somewhere, otherwise the shell script will die
 # when it tries to do I/O related stuff on closed file descriptor.
 # Our default is to throw it down the bit-bucket.
-exec 2> /dev/null
+exec 2> /dev/console
 ## If you wish to trace this script:
 #exec 2> /tmp/xpp_init_$XPD_NAME
 ## Altenativly, if you have multiple XBUS'es:
@@ -69,12 +80,12 @@
 	. $INIT_DIR/init_fxo_modes
 	fi
 	# Our register numbers are HEXADECIMAL!
-	cat <<EOF
+	echo "
 31 WD 10 $reg16
 31 WD 1A $reg26
 31 WD 1E $reg30
 31 WD 1F $reg31
-EOF
+"
 	# for the FXS:
 	#if [ "$ring_osc" != '' ]; then
 	#	/bin/echo "31 WI __ $ring_osc"
@@ -86,7 +97,7 @@
 
 # Remove empty lines and commets. Not strictly necessary
 # but works around some limitations of the proc interface:
-sed -e 's/[;#].*$//' -e '/^[ 	]*$/d' <<END_OF_FILE
+echo "
 
 
 31	WD	21	28
@@ -141,8 +152,7 @@
 # Set tip to ring voltage to 3.5 volts while off-hook
 # instead of default of 3.1
 31	WD	1A	C0
-
-END_OF_FILE
+" | sed -e 's/[;#].*$//' -e '/^[ 	]*$/d'
 
 set_daa_country_params "$opermode"
 

Modified: branches/1.2/xpp/utils/Makefile
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/utils/Makefile?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/utils/Makefile (original)
+++ branches/1.2/xpp/utils/Makefile Thu Nov 30 15:46:11 2006
@@ -70,14 +70,14 @@
 test_parse: test_parse.o libhexfile.a
 	$(CC) -L. -o $@ $@.o $(EXTRA_LIBS) -lhexfile -lusb
 
-print_modes.o: print_modes.c wctdm_fxomodes.h
-	$(HOSTCC) $(CFLAGS) -c $<
+print_modes: print_modes.c wctdm_fxomodes.h
+	$(HOSTCC) -o $@ $(CFLAGS) $<
 
 wctdm_fxomodes.h: $(WCTDM)
 	perl -n -e 'print if (/^static struct fxo_mode {$$/ .. /};$$/)' $(WCTDM) >$@
 
 init_fxo_modes: print_modes
-	./$^ >$@
+	./$< >$@
 
 clean:
 	$(RM) *.o $(TARGETS)

Modified: branches/1.2/xpp/utils/genzaptelconf
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/utils/genzaptelconf?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/utils/genzaptelconf (original)
+++ branches/1.2/xpp/utils/genzaptelconf Thu Nov 30 15:46:11 2006
@@ -34,7 +34,7 @@
 # (redhat/centos)
 
 # /etc/default/zaptel may override the following variables
-VERSION=0.5.7
+VERSION=0.5.8
 rcsid='$Id$'
 lc_country=us
 base_exten=6000
@@ -80,6 +80,14 @@
 # - The module that will be deleted from /etc/modules , if -d -M is used
 ALL_MODULES="zaphfc qozap ztgsm wctdm wctdm24xxp wcfxo wcfxs pciradio tor2 torisa wct1xxp wct4xxp wcte11xp wanpipe wcusb xpp_usb"
 
+# What signalling to give to ZapBRI channels?
+# bri:       bri_net; bri_cpe           (Bristuffed Asterisk. No multi- support)
+# bri_ptmpi: bri_net_ptmp; bri_cpe_ptmp (Bristuffed Asterisk, multi- support)
+# pri:       pri_net; pri_cpe           (Recent Asterisk. Experimental)
+ZAPBRI_SIGNALLING=bri
+#ZAPBRI_SIGNALLING=bri_ptmp
+#ZAPBRI_SIGNALLING=pri
+
 # read default configuration from /etc/default/zaptel
 if [ -r $ZAPTEL_BOOT_DEBIAN ]; then . $ZAPTEL_BOOT_DEBIAN; fi
 if [ -r $ZAPTEL_BOOT_FEDORA ]; then . $ZAPTEL_BOOT_FEDORA; fi
@@ -110,6 +118,16 @@
 fxsdisable=no
 
 span_te_timing_counter=1
+
+case "$ZAPBRI_SIGNALLING" in
+bri)      ZAPBRI_NET=bri_net;      ZAPBRI_CPE=bri_cpe ;;
+pri)      ZAPBRI_NET=pri_net;      ZAPBRI_CPE=pri_cpe ;;
+bri_ptmp) ZAPBRI_NET=bri_net_ptmp; ZAPBRI_CPE=bri_cpe_ptmp ;;
+*) 
+  echo >&2 "Incorrect value for ZAPBRI_SIGNALLING ($ZAPBRI_SIGNALLING). Abortring"
+	exit 1
+	;;
+esac
 
 die() {
 	echo "$@" >&2
@@ -246,6 +264,7 @@
 # $1: channel number
 print_pattern() {
 	local astbank_type=''
+	local reset_values=""
 	OPTIND=1
 	while getopts 'a:' arg
 	do
@@ -303,10 +322,13 @@
 				vmbox=$cfg_vmbox
 			fi
 			echo "callerid=\"Channel $chan\" <$exten>"     >> $zapata_file
+			reset_values="$reset_values callerid"
 			echo "mailbox=$exten"                          >> $zapata_file
+			reset_values="$reset_values mailbox"
 			if [ "$group_manual" != "yes" ]
 			then 
 				echo "group=$group_phones"                   >> $zapata_file
+				reset_values="$reset_values group"
 			fi
 			if [ "$context_manual" != "yes" ]
 			then
@@ -317,11 +339,11 @@
 				else
 					echo "context=$context_phones"             >> $zapata_file
 				fi
+				reset_values="$reset_values context"
 			fi
 		else # this is an FXO (trunk/phone: FXO signalling)
 		  # we have may have set it. So reset it:
 			echo "callerid=asreceived"                     >> $zapata_file
-			echo "mailbox="                                >> $zapata_file
 			if [ "$group_manual" != "yes" ]
 			then 
 				echo "group=$group_lines"                    >> $zapata_file
@@ -329,6 +351,7 @@
 			if [ "$context_manual" != "yes" ]
 			then 
 				echo "context=$context_lines"                >> $zapata_file
+				reset_values="$reset_values context"
 			fi
 			if [ "$lc_country" = 'uk' ]
 			then
@@ -337,12 +360,14 @@
 			  *WCFXO*) echo "cidstart=history"             >> $zapata_file;;
 			  *)       echo "cidstart=polarity"            >> $zapata_file;;
 			  esac
+				reset_values="$reset_values cidsignalling cidstart"
 			fi
 			echo ";;; line=\"$line\""                      >> $zapata_file
 			# if kewlstart is not used, busydetect has to be employed:
 			if [ "$method" = 'ls' ]
-			then echo 'busydetect=yes'                     >> $zapata_file
-			else echo 'busydetect=no'                      >> $zapata_file
+			then
+			  echo 'busydetect=yes'                     >> $zapata_file
+				reset_values="$reset_values busydetect"
 			fi
 		fi
 
@@ -350,11 +375,13 @@
 		then
 			if [ "$astbank_type" = 'input' ] || \
 				( [ "$fxs_immediate" = 'yes' ] && [ "$sig" = "fxo" ] )
-			then echo 'immediate=yes'                      >> $zapata_file
-			else echo 'immediate=no'                       >> $zapata_file
+			then 
+			  echo 'immediate=yes'                      >> $zapata_file
+				reset_values="$reset_values immediate"
 			fi
 		fi
 		echo "channel => $chan"                          >> $zapata_file
+		reset_zapata_entry $zapata_file $reset_values
 		echo ""                                          >> $zapata_file
 
 		# Keep a note of what channels we have identified
@@ -535,8 +562,28 @@
 	fi	
 }
 
+# run after the channel's entry. Used to reset all the values 
+reset_zapata_entry() {
+	conf_file="$1"; shift
+	
+	for arg in "$@"; do
+		case "$arg" in
+		busydetect)      echo "busydetect=no"   >>$conf_file;;
+		callerid)        echo "callerid="       >>$conf_file;;
+		cidstart)        echo "cidstart="       >>$conf_file;;
+		cidsignalling)   echo "cidsignalling="  >>$conf_file;;
+		context)         echo "context=default" >>$conf_file;;
+		group)           echo "group="          >>$conf_file;;
+		immediate)       echo "immediate=no"    >>$conf_file;;
+		mailbox)         echo "mailbox="        >>$conf_file;;
+		esac
+	done
+}
+
+
 genconf() {
 	local mode=$1
+	local reset_values=""
 	# reset FXO list (global)
 	#say "DEBUG: resetting channels lists"
 	rm -f $tmp_dir/fx{s,o}_*
@@ -704,9 +751,9 @@
 						echo 'euroisdn'     >$tmp_dir/span_switchtype
 						if [ "`cat $tmp_dir/span_termtype`" = 'nt' 2>/dev/null ]
 						then
-							echo 'bri_net' >$tmp_dir/span_signalling 
+							echo $ZAPBRI_NET >$tmp_dir/span_signalling 
 						else
-							echo 'bri_cpe' >$tmp_dir/span_signalling
+							echo $ZAPBRI_CPE >$tmp_dir/span_signalling
 						fi
 						;;
 					*ztgsm*/*)
@@ -816,10 +863,12 @@
 					if [ "$span_termtype" = 'nt' ]
 					then
 						echo "callerid=\"Channels $span_begin - $span_end\" <$span_begin>" >> $zapata_file
+						reset_values="$reset_values callerid"
 						#echo "mailbox=$exten"
 						if [ "$group_manual" != "yes" ]
 						then 
 							echo "group=$group_phones"     >> $zapata_file
+							reset_values="$reset_values group"
 						fi
 						if [ "$context_manual" != "yes" ]
 						then 
@@ -827,20 +876,24 @@
 						fi
 					else # we have may have set it. So reset it:
 						echo "callerid=asreceived"
+						reset_values="$reset_values callerid"
 						#echo "mailbox="
 						if [ "$group_manual" != "yes" ]
 						then 
 							echo "group=$group_lines"      >> $zapata_file
+							reset_values="$reset_values group"
 						fi
 						if [ "$context_manual" != "yes" ]
 						then 
 							echo "context=$context_lines"  >> $zapata_file
+							reset_values="$reset_values context"
 						fi
 					fi
 				fi
 				echo "switchtype = $span_switchtype" >> $zapata_file
 				echo "signalling = $span_signalling" >> $zapata_file
 				echo "channel => $bchans"            >> $zapata_file
+				reset_zapata_entry $zapata_file $reset_values
 				;;
 			list)
 				echo BRI/PRI: chans: $bchans, control: $dchan

Modified: branches/1.2/xpp/xbus-core.c
URL: http://svn.digium.com/view/zaptel/branches/1.2/xpp/xbus-core.c?view=diff&rev=1666&r1=1665&r2=1666
==============================================================================
--- branches/1.2/xpp/xbus-core.c (original)
+++ branches/1.2/xpp/xbus-core.c Thu Nov 30 15:46:11 2006
@@ -33,7 +33,7 @@
 #include <linux/ctype.h>
 #endif
 #include <linux/device.h>
-#include <linux/delay.h>	/* for mdelay() to debug */
+#include <linux/delay.h>	/* for msleep() to debug */
 #include "xpd.h"
 #include "xpp_zap.h"
 #include "xbus-core.h"
@@ -42,7 +42,7 @@
 static const char rcsid[] = "$Id$";
 
 /* Defines */
-#define	POLL_TIMEOUT		(MAX_XPDS)	/* in jiffies */
+#define	POLL_TIMEOUT		(2*MAX_XPDS)	/* in jiffies */
 #define	INITIALIZATION_TIMEOUT	(40*HZ)		/* in jiffies */
 #define	PROC_XBUSES		"xbuses"
 #define	PROC_XBUS_SUMMARY	"summary"
@@ -55,6 +55,7 @@
 
 /* Command line parameters */
 extern int print_dbg;
+DEF_PARM(uint, poll_timeout, POLL_TIMEOUT,"Timeout (in jiffies) waiting for units to reply (default " __stringify(POLL_TIMEOUT) ")");
 
 /* Forward declarations */
 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,14)
@@ -226,7 +227,7 @@
 		ERR("%s is being removed...\n", xbus->busname);
 		return -EBUSY;
 	}
-	mdelay(2);	/* roundtrip for older polls */
+	msleep(2);	/* roundtrip for older polls */
 	spin_lock_irqsave(&xbus->lock, flags);
 	DBG("%s\n", xbus->busname);
 
@@ -250,16 +251,18 @@
 	/*
 	 * Wait for replies
 	 */
-	DBG("%s: Polled %d XPD's. Waiting for replies max %d jiffies\n", xbus->busname, MAX_XPDS, POLL_TIMEOUT);
-	ret = wait_event_interruptible_timeout(xbus->wait_for_polls, atomic_read(&xbus->count_poll_answers) >= MAX_XPDS, POLL_TIMEOUT);
+	DBG("%s: Polled %d XPD's. Waiting for replies max %d jiffies\n", xbus->busname, MAX_XPDS, poll_timeout);
+	ret = wait_event_interruptible_timeout(xbus->wait_for_polls, atomic_read(&xbus->count_poll_answers) >= MAX_XPDS, poll_timeout);
 	if(ret == 0) {
-		ERR("%s: Poll timeout\n", xbus->busname);
-		goto out;
+		ERR("%s: Poll timeout. Continuing anyway.\n", xbus->busname);
+		/*
+		 * Continue processing. Maybe some units did reply.
+		 */
 	} else if(ret < 0) {
 		ERR("%s: Poll interrupted %d\n", xbus->busname, ret);
 		goto out;
-	}
-	DBG("%s: Poll finished in %d jiffies. Start processing.\n", xbus->busname, POLL_TIMEOUT - ret);
+	} else
+		DBG("%s: Poll finished in %d jiffies.\n", xbus->busname, poll_timeout - ret);
 	/*
 	 * Build removals/additions lists
 	 */
@@ -288,6 +291,10 @@
 			kfree(card_desc);
 		}
 	}
+	/*
+	 * We set this *after* poll is finished, so wait_for_xpd_initialization can
+	 * tell we already know how many units we have.
+	 */
 	atomic_set(&xbus->count_xpds_to_initialize, count_added);
 	spin_unlock_irqrestore(&xbus->lock, flags);
 	INFO("%s: Poll results: removals=%d additions=%d\n", xbus->busname, count_removed, count_added);
@@ -659,7 +666,14 @@
 	if(!xbus)
 		goto out;
 	DBG("%s: Waiting for card initialization of %d XPD's max %d seconds\n", xbus->busname, MAX_XPDS, INITIALIZATION_TIMEOUT/HZ);
+	/*
+	 * xbus_poll sets count_xpds_to_initialize only when polling is finished.
+	 * To prevent race conditions we test both:
+	 *   - It is none zero -- meaning we already have the poll results.
+	 *   - And all units have finished initialization.
+	 */
 	ret = wait_event_interruptible_timeout(xbus->wait_for_xpd_initialization,
+			atomic_read(&xbus->count_xpds_to_initialize) &&
 			atomic_read(&xbus->count_xpds_initialized) >= atomic_read(&xbus->count_xpds_to_initialize),
 			INITIALIZATION_TIMEOUT);
 	if(ret == 0) {



More information about the zaptel-commits mailing list