[Pkg-voip-commits] r3381 - in zaptel: branches/experimental trunk
Mark Purcell
msp at alioth.debian.org
Wed Apr 11 22:12:19 UTC 2007
Author: msp
Date: 2007-04-11 22:12:19 +0000 (Wed, 11 Apr 2007)
New Revision: 3381
Added:
zaptel/trunk/cwain/
zaptel/trunk/debian/
zaptel/trunk/ds1x1f.c
zaptel/trunk/opvxa1200.c
zaptel/trunk/qozap/
zaptel/trunk/vzaphfc/
zaptel/trunk/zaphfc/
zaptel/trunk/ztgsm/
Removed:
zaptel/branches/experimental/cwain/
zaptel/branches/experimental/debian/
zaptel/branches/experimental/ds1x1f.c
zaptel/branches/experimental/opvxa1200.c
zaptel/branches/experimental/qozap/
zaptel/branches/experimental/vzaphfc/
zaptel/branches/experimental/zaphfc/
zaptel/branches/experimental/ztgsm/
Log:
Merge-experimental-trunk
Deleted: zaptel/branches/experimental/ds1x1f.c
===================================================================
--- zaptel/branches/experimental/ds1x1f.c 2007-04-11 22:08:36 UTC (rev 3380)
+++ zaptel/branches/experimental/ds1x1f.c 2007-04-11 22:12:19 UTC (rev 3381)
@@ -1,2089 +0,0 @@
-//=======================================================================
-// T1/E1 PCI card with failover DS1x1F card Driver
-//
-// Ver: 2.14 Date: 17.Jan.2007
-//
-// based of work by:
-// Mark Spencer <markster at digium.com>
-// Matthew Fredrickson <creslin at digium.com>
-// William Meadows <wmeadows at digium.com>
-//
-// Copyright (c)2006,2007 TCDG Corp.
-// All rights reserved.
-//
-// http://www.tc-dg.net
-//
-// This program is free software; you can redistribute it and/or modify
-// it under the terms of the GNU General Public License as published by
-// the Free Software Foundation; either version 2 of the License, or
-// (at your option) any later version.
-//
-// This program is distributed in the hope that it will be useful,
-// but WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-// GNU General Public License for more details.
-//
-// You should have received a copy of the GNU General Public License
-// along with this program; if not, write to the Free Software
-// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-//
-//=======================================================================
-
-
-#include <linux/interrupt.h>
-#include <linux/pci.h>
-#include <linux/delay.h>
-#include <linux/spinlock.h>
-
-#ifdef STANDALONE_ZAPATA
-#include "zaptel.h"
-#else
-#include <linux/zaptel.h>
-#endif
-
-
-#define WC_MAX_CARDS 32
-#define NUM_REGS 0xa9
-#define NUM_PCI 12
-
-#define OFS_FALC 0x0000 // pci address space offset for FALC registers 256 * 32 bit words (only 8 LSB used)
-#define OFS_TDM_WR 0x0800 // pci address space offset for TDM media shift register buffers 8 * 32 bit words
-#define OFS_TDM_RD 0x0900 // pci address space offset for TDM media shift register buffers 8 * 32 bit words
-#define OFS_CTRL 0x1000 // pci address space offset for card control register 1 * 32 bit
-#define OFS_CLK 0x1004 // pci address space offset for card clock / h.100 register 1 * 32 bit
-
-
-#define FLAG_STARTED 0x01
-#define FLAG_NMF 0x02
-#define FLAG_SENDINGYELLOW 0x04
-
-#define MODE_SW -1 // mode controlled by DIP switch
-#define MODE_T1 0x01 // T1 mode bit.0 = T1
-#define MODE_E1 0x02 // E1 mode bit.1 = E1
-#define MODE_UE1 0x82 // unchannelized E1 bit.7 = unchannelized
-#define MODE_J1 0x41 // J1 mode bit.6 = j1mode
-
-
-#define DS1_SET_REL 7 // new MAINT commands for controlling the bypass relay and monitoring, hot-standby
-#define DS1_CLR_REL 8
-#define DS1_SET_RXMON 9
-#define DS1_CLR_RXMON 10
-#define DS1_SET_TXEN 11
-#define DS1_CLR_TXEN 12
-
-
-
-//======================================= Control register bit definitions ================================
-
-#define CTRL_LOFF 0x0000 // All LED off
-#define CTRL_LGRN 0x0001 // Green LED control bit
-#define CTRL_LRED 0x0002 // Red LED control bit
-#define CTRL_REL 0x0004 // bypass relay L = bypass H = normal operation
-#define CTRL_TEST 0x0008 // relay presence test bit L = normal operation H= presence test
-#define CTRL_FRST 0x0010 // Falc reset bit L = normal operation H = Falc Reset
-#define CTRL_INTA 0x0100 // Interrupt acknowledge bit writing a '1' resets IRQ and IRM
-#define CTRL_IRQ 0x0100 // Interrupt request bit
-#define CTRL_IRM 0x0400 // Interrupt missed bit = previous interrupt has not yet been serviced when new one was triggered
-#define CTRL_RELI 0x0800 // relay presence bit H = no relay L = relay present (valid only when CTRL_TEST = H)
-#define CTRL_SW1 0x1000 // DIP switch #1
-#define CTRL_SW2 0x2000 // DIP switch #2
-#define CTRL_SW3 0x4000 // DIP switch #3
-#define CTRL_SW4 0x8000 // DIP switch #4
-
-//==================================== FALC-56 PEF-2256 register definitions ===============================
-
-#define FR_XFIFO 0x00
-#define FR_RFIFO 0x00
-#define FR_CMDR 0x02
-#define FR_MODE 0x03
-#define FR_RAH1 0x04
-#define FR_RAH2 0x05
-#define FR_RAL1 0x06
-#define FR_RAL2 0x07
-#define FR_IPC 0x08
-#define FR_CCR1 0x09
-#define FR_CCR2 0x0a
-#define FR_RTR1 0x0c
-#define FR_RTR2 0x0d
-#define FR_RTR3 0x0e
-#define FR_RTR4 0x0f
-#define FR_TTR1 0x10
-#define FR_TTR2 0x11
-#define FR_TTR3 0x12
-#define FR_TTR4 0x13
-#define FR_IMR0 0x14
-#define FR_IMR1 0x15
-#define FR_IMR2 0x16
-#define FR_IMR3 0x17
-#define FR_IMR4 0x18
-#define FR_IMR5 0x19
-#define FR_IERR 0x1b
-#define FR_FMR0 0x1c
-#define FR_FMR1 0x1d
-#define FR_FMR2 0x1e
-#define FR_LOOP 0x1f
-#define FR_FMR4 0x20
-#define FR_FMR5 0x21
-#define FR_XSW 0x20
-#define FR_XSP 0x21
-#define FR_XC0 0x22
-#define FR_XC1 0x23
-#define FR_RC0 0x24
-#define FR_RC1 0x25
-#define FR_XPM0 0x26
-#define FR_XPM1 0x27
-#define FR_XPM2 0x28
-#define FR_TSWM 0x29
-#define FR_IDLE 0x2b
-#define FR_XSA4 0x2c
-#define FR_XSA5 0x2d
-#define FR_XSA6 0x2e
-#define FR_XSA7 0x2f
-#define FR_XSA8 0x30
-#define FR_FMR3 0x31
-#define FR_CCB1 0x2f
-#define FR_CCB2 0x30
-#define FR_CCB3 0x31
-#define FR_ICB1 0x32
-#define FR_ICB2 0x33
-#define FR_ICB3 0x34
-#define FR_ICB4 0x35
-#define FR_LIM0 0x36
-#define FR_LIM1 0x37
-#define FR_PCD 0x38
-#define FR_PCR 0x39
-#define FR_LIM2 0x3a
-#define FR_LCR1 0x3b
-#define FR_LCR2 0x3c
-#define FR_LCR3 0x3d
-#define FR_SIC1 0x3e
-#define FR_SIC2 0x3f
-#define FR_SIC3 0x40
-#define FR_CMR1 0x44
-#define FR_CMR2 0x45
-#define FR_GCR 0x46
-#define FR_ESM 0x47
-#define FR_RBD 0x49
-#define FR_VSTR 0x4a
-#define FR_RES 0x4b
-#define FR_FRS0 0x4c
-#define FR_FRS1 0x4d
-#define FR_RSW 0x4e
-#define FR_RSP 0x4f
-#define FR_FECL 0x50
-#define FR_FECH 0x51
-#define FR_CVCL 0x52
-#define FR_CVCH 0x53
-#define FR_CEC1L 0x54
-#define FR_CEC1H 0x55
-#define FR_EBCL 0x56
-#define FR_EBCH 0x57
-#define FR_CEC2L 0x58
-#define FR_CEC2H 0x59
-#define FR_CEC3L 0x5a
-#define FR_CEC3H 0x5b
-#define FR_RSA4 0x5c
-#define FR_RSA5 0x5d
-#define FR_RSA6 0x5e
-#define FR_RSA7 0x5f
-#define FR_RSA8 0x60
-#define FR_DEC 0x60
-#define FR_RSA6S 0x61
-#define FR_RSP1 0x62
-#define FR_RSP2 0x63
-#define FR_SIS 0x64
-#define FR_RSIS 0x65
-#define FR_RBCL 0x66
-#define FR_RBCH 0x67
-#define FR_ISR0 0x68
-#define FR_ISR1 0x69
-#define FR_ISR2 0x6a
-#define FR_ISR3 0x6b
-#define FR_ISR4 0x6c
-#define FR_ISR5 0x6d
-#define FR_GIS 0x6e
-#define FR_XS1 0x70
-#define FR_XS2 0x71
-#define FR_XS3 0x72
-#define FR_XS4 0x73
-#define FR_XS5 0x74
-#define FR_XS6 0x75
-#define FR_XS7 0x76
-#define FR_XS8 0x77
-#define FR_XS9 0x78
-#define FR_XS10 0x79
-#define FR_XS11 0x7a
-#define FR_XS12 0x7b
-#define FR_XS13 0x7c
-#define FR_XS14 0x7d
-#define FR_XS15 0x7e
-#define FR_XS16 0x7f
-#define FR_RS1 0x70
-#define FR_RS2 0x71
-#define FR_RS3 0x72
-#define FR_RS4 0x73
-#define FR_RS5 0x74
-#define FR_RS6 0x75
-#define FR_RS7 0x76
-#define FR_RS8 0x77
-#define FR_RS9 0x78
-#define FR_RS10 0x79
-#define FR_RS11 0x7a
-#define FR_RS12 0x7b
-#define FR_RS13 0x7c
-#define FR_RS14 0x7d
-#define FR_RS15 0x7e
-#define FR_RS16 0x7f
-#define FR_PC1 0x80
-#define FR_PC2 0x81
-#define FR_PC3 0x82
-#define FR_PC4 0x83
-#define FR_PC5 0x84
-#define FR_GPC1 0x85
-#define FR_PC6 0x86
-#define FR_CMDR2 0x87
-#define FR_CMDR3 0x88
-#define FR_CMDR4 0x89
-#define FR_CCR3 0x8b
-#define FR_CCR4 0x8c
-#define FR_CCR5 0x8d
-#define FR_MODE2 0x8e
-#define FR_MODE3 0x8f
-#define FR_RBC2 0x90
-#define FR_RBC3 0x91
-#define FR_GCM1 0x92
-#define FR_GCM2 0x93
-#define FR_GCM3 0x94
-#define FR_GCM4 0x95
-#define FR_GCM5 0x96
-#define FR_GCM6 0x97
-#define FR_GCM7 0x98
-#define FR_GCM8 0x99
-#define FR_SIS2 0x98
-#define FR_RSIS2 0x99
-#define FR_SIS3 0x9a
-#define FR_RSIS3 0x9b
-#define FR_XFIFO2 0x9c
-#define FR_RFIFO2 0x9c
-#define FR_XFIFO3 0x9e
-#define FR_RFIFO3 0x9e
-#define FR_TSEO 0xa0
-#define FR_TSBS1 0xa1
-#define FR_TSBS2 0xa2
-#define FR_TSBS3 0xa3
-#define FR_TSS2 0xa4
-#define FR_TSS3 0xa5
-#define FR_TPC0 0xa8
-#define FR_WID 0xec
-
-//========================================================================================================
-
-struct t4_regs {
- unsigned int pci[NUM_PCI];
- unsigned char regs[NUM_REGS];
-};
-
-
-#define WCT4_GET_REGS _IOW (ZT_CODE, 60, struct t4_regs)
-
-
-
-static int clrtab[] = {0x80,0x40,0x20,0x10,0x8,0x4,0x2,0x1};
-
-static char name[] = {"ds1x1f"};
-
-struct t1 {
- struct pci_dev *dev;
- spinlock_t lock;
- int spantype;
- int spanflags; // Span flags
- unsigned char txsigs[16]; // Copy of tx sig registers
- int num;
- int alarmcount; // How much red alarm we've seen
- int alarmdebounce;
- char *variety;
-
- unsigned int intcount;
- int prescaler; // interrupt divider
-
- int usecount;
- int blinktimer;
- int alarmtimer;
- int loopupcnt;
- int loopdowncnt;
- unsigned char ledtestreg;
-
- void * cnaddr; // PCI and driver related parameters
- void * ioaddr;
- unsigned long iostart;
- unsigned long iolen;
- unsigned long cnstart;
- unsigned long cnlen;
- struct resource * cres;
- struct resource * ires;
-
- unsigned char txchunkptr; // pointer for rd/wr audiosamples
- unsigned char rxchunkptr;
-
- unsigned char ec_chunk1[32][ZT_CHUNKSIZE]; // echocanceller memory buffers
- unsigned char ec_chunk2[32][ZT_CHUNKSIZE];
-
- struct zt_span span; // Span
- struct zt_chan chans[32]; // Channels
-};
-
-
- // module paramter variables
-static int debug = 0; // defines debug modes 0,1,2
-static int cardmode = -1; // forces card into T1, E1, J1, UE1 mode , -1 = use DIP switches
-static int alarmdebounce = 0;
-static int loopback = 0;
-static int frames = -1; // sets the size of the cards framebuffer 1-8 frames (preferred are 1,2,4,8)
-static int extclk = -1; // controls the clock synchronization via H.100 bus connector
-static int monitor = 0; // monitor = 3 puts the card in a Hi-Z mode and enabling it to monitor T1/E1 traffic
-
-static struct t1 *cards[WC_MAX_CARDS];
-
-
-static inline void start_alarm(struct t1 *wc)
-{
- wc->blinktimer = 0;
-}
-
-
-static int ds1_open(struct zt_chan *chan)
-{
- struct t1 *wc = chan->pvt;
-
- wc->usecount++;
-
- try_module_get(THIS_MODULE);
-
- return 0;
-}
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int led_write_reg(struct t1 *wc, unsigned int val) // write to the cards 32 bit control register
-{
- unsigned int x;
-
- x = (ioread32(wc->ioaddr + OFS_CTRL) & 0xfc) | (val & 0x03); // combine LED content with all other register data
-
- iowrite32(x, wc->ioaddr + OFS_CTRL); // write back register content
-
- return x;
-}
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int ctrl_set_reg(struct t1 *wc, unsigned int val) // set bits in control register
-{
- unsigned x;
-
- x = (ioread32(wc->ioaddr + OFS_CTRL) & 0xff) | val; // OR newcontent with all other register data
-
- iowrite32(x, wc->ioaddr + OFS_CTRL); // write back register content
-
- return x;
-}
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int ctrl_clr_reg(struct t1 *wc, unsigned int val) // clear bits in control register
-{
- unsigned x;
-
- x = (ioread32(wc->ioaddr + OFS_CTRL) & 0xff) & (val ^ 0xff); // OR newcontent with all other register data
-
- iowrite32(x, wc->ioaddr + OFS_CTRL); // write back register content
-
- return x;
-}
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int ctrl_write_reg(struct t1 *wc, unsigned int val) // write to the cards 32 bit control register
-{
- iowrite32(val, wc->ioaddr + OFS_CTRL); // write back register content
-
- return val;
-}
-
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int ctrl_read_reg(struct t1 *wc) // read control register
-{
- return (ioread32(wc->ioaddr + OFS_CTRL)); // return content of control register
-}
-
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int clk_write_reg(struct t1 *wc, unsigned int val) // write to the cards 32 bit clock/ h.100 bus register
-{
- iowrite32(val, wc->ioaddr + OFS_CLK); // write back register content
-
- return val;
-}
-
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int clk_read_reg(struct t1 *wc) // read clock / h.100 bus register
-{
- return (ioread32(wc->ioaddr + OFS_CLK)); // return content of control register
-}
-
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static inline unsigned int __t1_framer_in(struct t1 *wc, const unsigned int reg) // read a Falc framer register
-{
- int loc = ((reg & 0x00ff) << 2) + OFS_FALC; // FALC registers are on doubleword boundaries
-
- return ((ioread32(wc->ioaddr + loc)) & 0xff); // return only the 8 lsb
-}
-
-
-
-static inline unsigned int t1_framer_in(struct t1 *wc, const unsigned int addr) // spinlock wrapper
-{
- unsigned long flags;
- unsigned int ret;
-
- spin_lock_irqsave(&wc->lock, flags);
-
- ret = __t1_framer_in(wc, addr);
-
- spin_unlock_irqrestore(&wc->lock, flags);
-
- return ret;
-}
-
-
-static inline void __t1_framer_out(struct t1 *wc, const unsigned int reg, const unsigned int val) // write to Falc framer register
-{
- int loc = ((reg & 0x00ff) << 2) + OFS_FALC; // FALC registers are on doubleword boundaries
- int ret;
-
- iowrite32(val, wc->ioaddr + loc); // write to register
-
- ret = (ioread32(wc->ioaddr + loc)) & 0xff; // for debugging read back register content
-
- if (debug > 1)
- {
- if (ret == val) // check if write was successful
- printk("Wrote: %02x to Adr: %02x \n", val, reg); // and print on the console
- else
- printk("Wrote: %02x to Adr: %02x but read back: %02x !!!\n", val, reg, ret); // print results on the console
- }
-}
-
-
-static inline void t1_framer_out(struct t1 *wc, const unsigned int addr, const unsigned int value) // spinlock wrapper
-{
- unsigned long flags;
-
- spin_lock_irqsave(&wc->lock, flags);
-
- __t1_framer_out(wc, addr, value);
-
- spin_unlock_irqrestore(&wc->lock, flags);
-}
-
-//-------------------------------------------------------------------------------------------------------------------------------------------
-static void ds1_release(struct t1 *wc)
-{
- zt_unregister(&wc->span);
-
- kfree(wc);
-
- printk("Freed a DS1x1F card\n");
-}
-
-
-static int ds1_close(struct zt_chan *chan)
-{
- struct t1 *wc = chan->pvt;
- wc->usecount--;
-
- module_put(THIS_MODULE);
-
- if (!wc->usecount) // If we're dead, release us now
- ds1_release(wc);
-
- return 0;
-}
-
-//----------------------------------------------------------------------------------------------------------------------------------------
-// HARDWARE INTERRUPT CONTROL Enable / Disable
-
-static void ds1_enable_interrupts(struct t1 *wc) // enable 8 kHz TDM interrupts from the pci card
-{
- iowrite32(0x00000001, wc->cnaddr + 0x1ec); // enable internal interrupt
-
- ctrl_set_reg(wc, CTRL_INTA); // clear interrupt status bit
-
- if (debug)
- printk("Enabled interrupts!\n");
-}
-
-static void ds1_disable_interrupts(struct t1 *wc) // disable all interrupts from the card
-{
- ctrl_set_reg(wc, CTRL_INTA); // clear interrupt status bit
-
- iowrite32(0x00000000, wc->cnaddr + 0x1ec); // disable internal interrupt
-
- if (debug)
- printk("Disabled interrupts!\n");
-}
-
-//----------------------------------------------------------------------------------------------------------------------------------------
-static void __ds1_set_clear(struct t1 *wc) // SELECT CLEAR CHANNEL MODE - FOR T1 ONLY
-{
- int i;
- unsigned short val;
-
- val = 0;
- for (i=0; i<8; i++) // go through channel 0-7
- {
- if (wc->span.chans[i ].flags & ZT_FLAG_CLEAR) // check if this channel is marked Clear channel
- val |= clrtab[i];
- }
- __t1_framer_out(wc, FR_CCB1, val); // write register CCB1
-
- val = 0;
- for (i=0; i<8; i++) // go through channel 8-15
- {
- if (wc->span.chans[i+ 8].flags & ZT_FLAG_CLEAR) // check if this channel is marked Clear channel
- val |= clrtab[i];
- }
- __t1_framer_out(wc, FR_CCB2, val); // write register CCB2
-
- val = 0;
- for (i=0; i<8; i++) // go through channel 16-23
- {
- if (wc->span.chans[i+16].flags & ZT_FLAG_CLEAR) // check if this channel is marked Clear channel
- val |= clrtab[i];
- }
- __t1_framer_out(wc, FR_CCB3, val); // write register CCB3
-
-
-
-}
-
-//----------------------------------------------------------------------------------------------------------------------------------------
-static int ds1_ioctl(struct zt_chan *chan, unsigned int cmd, unsigned long data)
-{
- struct t4_regs regs;
- int x;
- struct t1 *wc;
-
- wc = chan->pvt;
-
- switch(cmd)
- {
- case WCT4_GET_REGS:
- for (x=0; x<NUM_PCI; x++)
- regs.pci[x] = (ioread32(wc->ioaddr + (x << 2)));
-
- for (x=0; x<NUM_REGS; x++)
- regs.regs[x] = t1_framer_in(wc, x);
-
- if (copy_to_user((struct t4_regs *)data, ®s, sizeof(regs)))
- return -EFAULT;
- break;
-
- case DS1_SET_REL: // Turn on failover relay - normal operation
- ctrl_set_reg (wc, CTRL_REL);
- break;
-
- case DS1_CLR_REL: // turn off failover relay - bypass
- ctrl_clr_reg (wc, CTRL_REL);
- break;
-
- case DS1_SET_RXMON: // Enable receiver Hi-Z monitor mode
- __t1_framer_out(wc, FR_LIM2,__t1_framer_in(wc, FR_LIM2) & 0xFD); // LIM2: turn off AS1
- break;
-
- case DS1_CLR_RXMON: // Set receiver to normal 100 Ohm impedance
- __t1_framer_out(wc, FR_LIM2,__t1_framer_in(wc, FR_LIM2) | 0x02); // LIM2: turn on AS1
- break;
-
- case DS1_SET_TXEN: // Enable transmitter - normal operation
- __t1_framer_out(wc, FR_LIM2,__t1_framer_in(wc, FR_XPM2) & 0xBF); // XPM2: turn on line drivers
- break;
-
- case DS1_CLR_TXEN: // Disable transmitter - set to Hi-Z
- __t1_framer_out(wc, FR_LIM2,__t1_framer_in(wc, FR_XPM2) | 0x40); // XPM2: turn off line drivers
- break;
-
-
-
- default:
- return -ENOTTY;
- }
- return 0;
-}
-
-
-static int ds1_maint(struct zt_span *span, int cmd)
-{
- struct t1 *wc = span->pvt;
-
- if (wc->spantype == MODE_E1)
- {
- switch(cmd)
- {
- case ZT_MAINT_NONE:
- printk("XXX Turn off local and remote loops E1 XXX\n");
- break;
-
- case ZT_MAINT_LOCALLOOP:
- printk("XXX Turn on local loopback E1 XXX\n");
- break;
-
- case ZT_MAINT_REMOTELOOP:
- printk("XXX Turn on remote loopback E1 XXX\n");
- break;
-
- case ZT_MAINT_LOOPUP:
- printk("XXX Send loopup code E1 XXX\n");
- break;
-
- case ZT_MAINT_LOOPDOWN:
- printk("XXX Send loopdown code E1 XXX\n");
- break;
-
- case ZT_MAINT_LOOPSTOP:
- printk("XXX Stop sending loop codes E1 XXX\n");
- break;
-
- case DS1_SET_REL:
- ctrl_set_reg (wc, CTRL_REL);
- printk("XXX Turn off E1 bypass XXX\n");
- break;
-
- case DS1_CLR_REL:
- ctrl_clr_reg (wc, CTRL_REL);
- printk("XXX Turn on E1 bypass XXX\n");
- break;
-
- default:
- printk("DS1x1F: Unknown E1 maintainance command: %d\n", cmd);
- break;
- }
- }
- else
- {
- switch(cmd)
- {
- case ZT_MAINT_NONE:
- printk("XXX Turn off local and remote loops T1 XXX\n");
- break;
-
- case ZT_MAINT_LOCALLOOP:
- printk("XXX Turn on local loop and no remote loop XXX\n");
- break;
-
- case ZT_MAINT_REMOTELOOP:
- printk("XXX Turn on remote loopup XXX\n");
- break;
-
- case ZT_MAINT_LOOPUP:
- t1_framer_out(wc, FR_FMR5, 0x50); /* FMR5: Nothing but RBS mode */
- break;
-
- case ZT_MAINT_LOOPDOWN:
- t1_framer_out(wc, FR_FMR5, 0x60); /* FMR5: Nothing but RBS mode */
- break;
-
- case ZT_MAINT_LOOPSTOP:
- t1_framer_out(wc, FR_FMR5, 0x40); /* FMR5: Nothing but RBS mode */
- break;
-
- case DS1_SET_REL:
- ctrl_set_reg (wc, CTRL_REL);
- printk("XXX Turn off T1 bypass XXX\n");
- break;
-
- case DS1_CLR_REL:
- ctrl_clr_reg (wc, CTRL_REL);
- printk("XXX Turn on T1 bypass XXX\n");
- break;
-
- default:
- printk("DS1x1F: Unknown T1 maintainance command: %d\n", cmd);
- break;
- }
- }
- return 0;
-}
-
-
-static int ds1_rbsbits(struct zt_chan *chan, int bits)
-{
- u_char m,c;
- int n,b;
- struct t1 *wc = chan->pvt;
- unsigned long flags;
-
- if(debug > 2)
- printk("Setting CAS signalling bits to: %d for ch: %s\n", bits, chan->name);
-
- spin_lock_irqsave(&wc->lock, flags);
-
- if (wc->spantype == MODE_E1) // E1 CAS (R2) signalling
- {
- if (chan->chanpos == 16) // channel 16 is the signalling channel even for CAS
- {
- spin_unlock_irqrestore(&wc->lock, flags);
- return 0; // so leave it alone
- }
-
- n = chan->chanpos - 1;
-
- if (chan->chanpos > 15) // move everything above channel 16 one down
- n--;
-
- b = (n % 15);
- c = wc->txsigs[b];
- m = (n / 15) << 2; // we have to write one nibble with new bits
- c &= (0xf << m); // while keeping the other nibble as is
- c |= (bits & 0xf) << (4 - m);
-
- wc->txsigs[b] = c;
-
- __t1_framer_out(wc,FR_XS2 + b,c); // In E1 mode XS1 is not used for CAS signalling
-
- }
- else // T1 or J1 CAS mode
- {
- if (wc->span.lineconfig & ZT_CONFIG_D4) // Old D4 framin selected
- {
- n = chan->chanpos - 1;
- b = (n/4);
- c = wc->txsigs[b];
- m = ((3 - (n % 4)) << 1); // D4 only uses 2 CAS bits per channel
- c &= ~(0x3 << m); // do the nibble thing
- c |= ((bits >> 2) & 0x3) << m;
- wc->txsigs[b] = c;
- // output them to the chip */
- __t1_framer_out(wc,FR_XS1 + b ,c); // since there are only 2 bits per channel
- __t1_framer_out(wc,FR_XS6 + b ,c); // write them into the CAS registers twice
- }
- else
- {
- if (wc->span.lineconfig & ZT_CONFIG_ESF) // ESF = CAS 4 bits per channel
- {
- n = chan->chanpos - 1;
- b = (n/2);
- c = wc->txsigs[b];
- m = ((n % 2) << 2); // do the nibble thing
- c &= (0xf << m);
- c |= (bits & 0xf) << (4 - m);
- wc->txsigs[b] = c;
- // output them to the chip
- __t1_framer_out(wc,FR_XS1 + b,c); // write only once
- }
- }
- }
-
- spin_unlock_irqrestore(&wc->lock, flags);
-
- if (debug > 2)
- printk("Finished setting CAS signalling bits\n");
-
- return 0;
-}
-
-
-static void __t1_check_sigbits(struct t1 *wc) // read the current CAS bits from framerchip
-{
- int a,i,rxs;
-
- if (!(wc->span.flags & ZT_FLAG_RUNNING))
- return;
-
- if (wc->spantype == MODE_E1) // E1 CAS mode selected
- {
- for (i = 0; i < 15; i++) // do this in 16 steps
- {
- a = __t1_framer_in(wc, FR_RS2 + i); // RS1 is not used for CAS bits
- rxs = (a & 0xf);
-
- if (!(wc->span.chans[i+16].sig & ZT_SIG_CLEAR)) // get lower nibble = channel+16
- {
- if (wc->span.chans[i+16].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i+16], rxs);
- }
-
- rxs = (a >> 4) & 0xf; // get upper nibble = channel +0
-
- if (!(wc->span.chans[i].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i], rxs);
- }
- }
- }
- else // T1 or J1 mode selected
- {
- if (wc->span.lineconfig & ZT_CONFIG_D4) // D4 framing selected
- { // D4 uses only 2 CAS bits per channel
- for (i = 0; i < 24; i+=4) // do it in 6 steps
- {
- a = __t1_framer_in(wc, FR_RS1 + (i>>2));
-
- rxs = (a & 0x3) << 2; // get bits.0 and .1 = channel +3
- if (!(wc->span.chans[i+3].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i+3].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i+3], rxs);
- }
-
- rxs = (a & 0xc); // get bits.2 and .3 = channel +2
- if (!(wc->span.chans[i+2].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i+2].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i+2], rxs);
- }
-
- rxs = (a >> 2) & 0xc; // get bits.4 and .5 = channel +1
- if (!(wc->span.chans[i+1].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i+1].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i+1], rxs);
- }
-
- rxs = (a >> 4) & 0xc; // get bits.6 and .7 = channel +0
- if (!(wc->span.chans[i].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i], rxs);
- }
- }
- }
- else // ESF framing uses 4 CAS bits per channel
- {
- for (i = 0; i < 24; i+=2) // do this in 12 steps
- {
- a = __t1_framer_in(wc, FR_RS1 + (i>>1));
-
- rxs = (a & 0xf); // get lower nibble = channel +1
- if (!(wc->span.chans[i+1].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i+1].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i+1], rxs);
- }
-
- rxs = (a >> 4) & 0xf; // get upper nibble = channel +0
- if (!(wc->span.chans[i].sig & ZT_SIG_CLEAR))
- {
- if (wc->span.chans[i].rxsig != rxs)
- zt_rbsbits(&wc->span.chans[i], rxs);
- }
- }
- }
- }
-}
-
-
-static void t4_serial_setup(struct t1 *wc)
-{
- unsigned int RC,XC;
-
- switch (wc->spantype)
- {
- case MODE_E1: // E1 mode
- printk("DS1x1F: Setting global parameters for E1 \n");
- break;
-
- case MODE_UE1: // NEW - Unframed E1 mode
- printk("DS1x1F: Setting global parameters for Unchannelized E1 \n");
- break;
-
- case MODE_J1: // J1 mode
- printk("DS1x1F: Setting global parameters for J1 \n");
- break;
-
- default: // All others default to T1
- printk("DS1x1F: Setting global parameters for T1 \n");
- break;
- }
-
-
- RC = 0x000; // Rt = 4 x 125 ns cycle
- XC = 0x004; // Xt = 0 x 125 nS cycles
-
- t1_framer_out(wc, FR_GPC1, 0xe0); // GPC1: Multiplex mode enabled, FSC is output, active low, RCLK from channel 0
- t1_framer_out(wc, FR_IPC, 0x05); // IPC: Interrupt push/pull active low
-
- t1_framer_out(wc, FR_GCM1, 0x66);
- t1_framer_out(wc, FR_GCM2, 0x0e);
- t1_framer_out(wc, FR_GCM3, 0x3f);
- t1_framer_out(wc, FR_GCM4, 0x0f);
- t1_framer_out(wc, FR_GCM5, 0x04);
- t1_framer_out(wc, FR_GCM6, 0x3c);
- t1_framer_out(wc, FR_GCM7, 0x9c);
- t1_framer_out(wc, FR_GCM8, 0x90);
-
- t1_framer_out(wc, FR_GCR, 0x40); // GCR: Interrupt on Activation/Deactivation of AIX, LOS
- t1_framer_out(wc, FR_SIC1, 0x82); // SIC1: 2.048 Mhz clock/bus, double buffer receive / transmit, byte interleaved
- t1_framer_out(wc, FR_SIC2, 0x00); // SIC2: No FFS, no center receive eliastic buffer, phase 0
- t1_framer_out(wc, FR_SIC3, 0x08); // SIC3: Edges for capture tx latches with rising edge / rx changes with falling edge
- t1_framer_out(wc, FR_CMR1, 0x30); // CMR1: RCLK is at 8.192 Mhz dejittered
- t1_framer_out(wc, FR_CMR2, 0x25); // CMR2: sync and clock for tx and rx provided by FALC
-
- t1_framer_out(wc, FR_XC0, 0x00 | ((XC >> 8) & 0x07)); // XC0: Normal operation of Sa-bits
- t1_framer_out(wc, FR_XC1, XC & 0xff); // XC1: tx offset
-
- t1_framer_out(wc, FR_RC0, 0x00 | ((RC >> 8) & 0x07)); // RC0: rx offset
- t1_framer_out(wc, FR_RC1, RC & 0xff); // RC1:
-
- // ------------- Configure ports ---------------
- t1_framer_out(wc, FR_PC1, 0x10); // PC1: FMR/SPYX output/input on RPA/XPA
- t1_framer_out(wc, FR_PC2, 0x65); // PC2: unused
- t1_framer_out(wc, FR_PC3, 0x65); // PC3: unused
- t1_framer_out(wc, FR_PC4, 0x35); // PC4: unused
- t1_framer_out(wc, FR_PC5, 0x33); // PC5: XMFS active low, SCLKR is input, RCLK is output
- t1_framer_out(wc, FR_PC6, 0x01); // PC6: CLK1 is Tx Clock output, CLK2 is 2.048 Mhz from DCO-R
-
- t1_framer_out(wc, FR_LCR1, 0x00); // Clear LCR1
-
- printk("DS1x1F: Successfully initialized card\n");
-}
-
-
-static void __t1_configure_t1(struct t1 *wc, int lineconfig, int txlevel)
-{
- char *mode, *frame, *lcode;
- char as1;
- char xlt;
-
- __t1_framer_out(wc, FR_FMR1, 0xbc); // FMR1: Mode 1, T1 mode, CRC on for ESF, 2.048 Mhz system data rate, no XAIS
-
- switch (monitor) // module parameter monitor
- {
- case 1:
- as1 = 0x00; // Tx = normal / Rx = Hi-Z
- xlt = 0x00;
- break;
-
- case 2:
- as1 = 0x02; // Tx = Hi-Z / Rx = 100 Ohm
- xlt = 0x40;
- break;
-
- case 3:
- as1 = 0x00; // Tx = Hi-Z / Rx = Hi-Z
- xlt = 0x40;
- break;
-
- default: // Tx = normal / Rx = 100 Ohm
- as1 = 0x02;
- xlt = 0x00;
- break;
- }
-
- /* Configure line interface */
- if (lineconfig & ZT_CONFIG_AMI)
- {
- lcode = "AMI";
- __t1_framer_out(wc, FR_FMR0, 0xa0);
- }
- else
- {
- lcode = "B8ZS";
- __t1_framer_out(wc, FR_FMR0, 0xf0);
- }
-
- if (!(lineconfig & ZT_CONFIG_D4) && !(lineconfig & ZT_CONFIG_ESF)) // support for F4 4 frame format
- {
- frame = "F4";
- if (loopback)
- __t1_framer_out(wc, FR_FMR2, 0x26);
- else
- __t1_framer_out(wc, FR_FMR2, 0x22);
-
- if (wc->spantype == MODE_J1)
- __t1_framer_out(wc, FR_FMR4, 0x1d);
- else
- __t1_framer_out(wc, FR_FMR4, 0x0d);
- }
-
- if (!(lineconfig & ZT_CONFIG_D4) && (lineconfig & ZT_CONFIG_ESF)) // standard ESF 24 frame format
- {
- frame = "ESF";
-
- if (loopback)
- __t1_framer_out(wc, FR_FMR2, 0xe6);
- else
- __t1_framer_out(wc, FR_FMR2, 0xe2);
-
- if (wc->spantype == MODE_J1)
- __t1_framer_out(wc, FR_FMR4, 0x1e);
- else
- __t1_framer_out(wc, FR_FMR4, 0x0e);
- }
-
- if ((lineconfig & ZT_CONFIG_D4) && !(lineconfig & ZT_CONFIG_ESF)) // standard D4 12 frame format
- {
- frame = "D4";
- if (loopback)
- __t1_framer_out(wc, FR_FMR2, 0x26);
- else
- __t1_framer_out(wc, FR_FMR2, 0x22);
-
- if (wc->spantype == MODE_J1)
- __t1_framer_out(wc, FR_FMR4, 0x1c);
- else
- __t1_framer_out(wc, FR_FMR4, 0x0c);
- }
-
- if ((lineconfig & ZT_CONFIG_D4) && (lineconfig & ZT_CONFIG_ESF)) // support for SLC96 framing mode used in TR-08 circuits
- {
- frame = "SLC96";
- if (loopback)
- __t1_framer_out(wc, FR_FMR2, 0x26);
- else
- __t1_framer_out(wc, FR_FMR2, 0x22);
-
- if (wc->spantype == MODE_J1)
- __t1_framer_out(wc, FR_FMR4, 0x1f);
- else
- __t1_framer_out(wc, FR_FMR4, 0x0f);
- }
-
-
- __t1_framer_out(wc, FR_FMR5, 0x40); // FMR5: Enable RBS mode */
-
- __t1_framer_out(wc, FR_LIM1, 0xf8); // LIM1: Clear data in case of LOS, Set receiver threshold (0.5V), No remote loop, no DRS
- __t1_framer_out(wc, FR_LIM0, 0x08); // LIM0: Enable auto long haul mode, no local loop (must be set after LIM1)
-
- __t1_framer_out(wc, FR_CMDR, 0x50); // CMDR: Reset the receiver and transmitter line interface
- __t1_framer_out(wc, FR_CMDR, 0x00); // CMDR: Reset the receiver and transmitter line interface
-
- __t1_framer_out(wc, FR_PCD, 0x0a); // PCD: LOS after 176 consecutive "zeros"
- __t1_framer_out(wc, FR_PCR, 0x15); // PCR: 22 "ones" clear LOS
-
- if (wc->spantype == MODE_J1)
- {
- mode = "J1";
- __t1_framer_out(wc, FR_RC0, 0x80); // J1 overide
- }
- else
- {
- mode = "T1";
- }
-
- switch (txlevel) // Set Tx pulse mask + Rx line build out
- {
- case 7:
- __t1_framer_out(wc, FR_LIM2, 0xe1 | as1); // LIM2: LBO=3, RST=50%, LOS1=1
- __t1_framer_out(wc, FR_XPM0, 0x07); // XPM0
- __t1_framer_out(wc, FR_XPM1, 0x01); // XPM1
- __t1_framer_out(wc, FR_XPM2, 0x00 | xlt); // XPM2
- break;
-
- case 6:
- __t1_framer_out(wc, FR_LIM2, 0xa1 | as1); // LIM2: LBO=2, RST=50%, LOS1=1
- __t1_framer_out(wc, FR_XPM0, 0x8c); // XPM0
- __t1_framer_out(wc, FR_XPM1, 0x11); // XPM1
- __t1_framer_out(wc, FR_XPM2, 0x01 | xlt); // XPM2
- break;
-
- case 5:
- __t1_framer_out(wc, FR_LIM2, 0x61 | as1); // LIM2: LBO=1, RST=50%, LOS1=1
- __t1_framer_out(wc, FR_XPM0, 0x8c); // XPM0
- __t1_framer_out(wc, FR_XPM1, 0x01); // XPM1
- __t1_framer_out(wc, FR_XPM2, 0x00 | xlt); // XPM2
- break;
-
- default:
- __t1_framer_out(wc, FR_LIM2, 0x21 | as1); // LIM2: LBO=0, RST=50%, LOS1=1
- __t1_framer_out(wc, FR_XPM0, 0xd7); // XPM0
- __t1_framer_out(wc, FR_XPM1, 0x22); // XPM1
- __t1_framer_out(wc, FR_XPM2, 0x01 | xlt); // XPM2
- break;
- }
-
-
- printk("DS1x1F: Configured Mode: %s Framing: %s Linecode: %s\n", mode, frame, lcode);
-}
-
-
-static void __t1_configure_e1(struct t1 *wc, int lineconfig)
-{
- unsigned int fmr2, fmr1;
- unsigned int cas = 0;
- char *crc4 = "";
- char *frame, *lcode;
- char as1;
- char xlt;
-
- fmr1 = 0x44; /* FMR1: E1 mode, Automatic force resync, PCM30 mode, 2.048 Mhz backplane, no XAIS */
- fmr2 = 0x03; /* FMR2: Auto transmit remote alarm, auto loss of multiframe recovery, no payload loopback */
-
- switch (monitor) // module parameter monitor
- {
- case 1:
- as1 = 0x00; // Tx = normal / Rx = Hi-Z
- xlt = 0x00;
- break;
-
- case 2:
- as1 = 0x02; // Tx = Hi-Z / Rx = 100 Ohm
- xlt = 0x40;
- break;
-
- case 3:
- as1 = 0x00; // Tx = Hi-Z / Rx = Hi-Z
- xlt = 0x40;
- break;
-
- default: // Tx = normal / Rx = 100 Ohm
- as1 = 0x02;
- xlt = 0x00;
- break;
- }
-
-
- if (wc->spantype == MODE_UE1)
- fmr2 |= 0x30;
-
- if (loopback)
- fmr2 |= 0x4;
-
- if (lineconfig & ZT_CONFIG_CRC4)
- {
- fmr1 |= 0x08; /* CRC4 transmit */
- fmr2 |= 0xc0; /* CRC4 receive */
- crc4 = "/CRC4";
- }
-
- __t1_framer_out(wc, FR_FMR1, fmr1);
- __t1_framer_out(wc, FR_FMR2, fmr2);
-
-
- if (lineconfig & ZT_CONFIG_AMI) /* Configure line interface */
- {
- lcode = "AMI";
- __t1_framer_out(wc, FR_FMR0, 0xa0);
- }
- else
- {
- lcode = "HDB3";
- __t1_framer_out(wc, FR_FMR0, 0xf0);
- }
-
- if (lineconfig & ZT_CONFIG_CCS)
- {
- frame = "CCS";
- }
- else
- {
- frame = "CAS";
- cas = 0x40;
- }
-
- if (wc->spantype == MODE_UE1)
- __t1_framer_out(wc, FR_LOOP, 0x40);
-
- __t1_framer_out(wc, FR_LIM1, 0xf0); // LIM1: Clear data in case of LOS, Set receiver threshold (0.5V), No remote loop, no DRS
- __t1_framer_out(wc, FR_LIM0, 0x08); // LIM0: Enable auto long haul mode, no local loop (must be after LIM1)
-
- __t1_framer_out(wc, FR_CMDR, 0x50); // CMDR: Reset the receiver and transmitter line interface
- __t1_framer_out(wc, FR_CMDR, 0x00); // CMDR: Reset the receiver and transmitter line interface
-
- // Condition receive line interface for E1 after reset
- __t1_framer_out(wc, 0xbb, 0x17);
- __t1_framer_out(wc, 0xbc, 0x55);
- __t1_framer_out(wc, 0xbb, 0x97);
- __t1_framer_out(wc, 0xbb, 0x11);
- __t1_framer_out(wc, 0xbc, 0xaa);
- __t1_framer_out(wc, 0xbb, 0x91);
- __t1_framer_out(wc, 0xbb, 0x12);
- __t1_framer_out(wc, 0xbc, 0x55);
- __t1_framer_out(wc, 0xbb, 0x92);
- __t1_framer_out(wc, 0xbb, 0x0c);
- __t1_framer_out(wc, 0xbb, 0x00);
- __t1_framer_out(wc, 0xbb, 0x8c);
-
- __t1_framer_out(wc, FR_LIM2, 0x20 | as1); // LIM2: 50% peak amplitude is a "1"
- __t1_framer_out(wc, FR_PCD, 0x0a); // PCD: LOS after 176 consecutive "zeros"
- __t1_framer_out(wc, FR_PCR, 0x15); // PCR: 22 "ones" clear LOS
-
- __t1_framer_out(wc, FR_XSW, 0x9f); // XSW: Spare bits all to 1
-
- if (wc->spantype == MODE_UE1)
- __t1_framer_out(wc, FR_XSP, 0x3c );
- else
- __t1_framer_out(wc, FR_XSP, 0x1c | cas); // XSP: E-bit set when async. AXS auto, XSIF to 1
-
- // Generate pulse mask for E1
- __t1_framer_out(wc, FR_XPM0, 0x54); // XPM0
- __t1_framer_out(wc, FR_XPM1, 0x02); // XPM1
- __t1_framer_out(wc, FR_XPM2, 0x00 | xlt); // XPM2
-
- if (wc->spantype == MODE_UE1)
- printk("DS1x1F: Configured Mode: E1-Unchannelized Framing: %s Linecode: %s\n", frame, lcode);
- else
- printk("DS1x1F: Configured Mode: E1%s Framing: %s Linecode: %s\n", crc4, frame, lcode);
-
-}
-//-----------------------------------------------------------------------------------------------------------------------------------------
-
-
-static void ds1_framer_start(struct t1 *wc, struct zt_span *span)
-{
- int alreadyrunning = wc->span.flags & ZT_FLAG_RUNNING;
- unsigned long flags;
-
- spin_lock_irqsave(&wc->lock, flags);
-
- if (wc->spantype & MODE_E1)
- { // configure in E1/ UE1 mode
- __t1_configure_e1(wc, span->lineconfig);
- }
- else
- { // configure in T1 / J1 mode
- __t1_configure_t1(wc, span->lineconfig, span->txlevel);
- __ds1_set_clear(wc);
- }
-
- if (!alreadyrunning)
- wc->span.flags |= ZT_FLAG_RUNNING;
-
- spin_unlock_irqrestore(&wc->lock, flags);
-}
-
-
-static int ds1_startup(struct zt_span *span)
-{
- struct t1 *wc = span->pvt;
-
- int alreadyrunning = span->flags & ZT_FLAG_RUNNING;
- // initialize the start value for the entire chunk of last ec buffer
- // Reset framer with proper parameters and start
- ds1_framer_start(wc, span);
- printk("Calling startup (flags is %d)\n", span->flags);
-
- ctrl_write_reg(wc, CTRL_REL | CTRL_LRED); // now enable the relay
-
-
- if (!alreadyrunning)
- { // Only if we're not already going
- ds1_enable_interrupts(wc);
- span->flags |= ZT_FLAG_RUNNING;
- }
- return 0;
-}
-
-
-static int ds1_shutdown(struct zt_span *span)
-{
- struct t1 *wc = span->pvt;
- unsigned long flags;
-
- spin_lock_irqsave(&wc->lock, flags);
-
- __t1_framer_out(wc, FR_GCR, 0x41); // GCR: Interrupt on Activation/Deactivation of AIX, LOS
-
- ds1_disable_interrupts(wc);
-
- ctrl_write_reg(wc, CTRL_LRED); // turn off relay and turn on RED LED only
-
- span->flags &= ~ZT_FLAG_RUNNING;
- spin_unlock_irqrestore(&wc->lock, flags);
- return 0;
-}
-
-
-static int ds1_chanconfig(struct zt_chan *chan, int sigtype)
-{
- struct t1 *wc = chan->pvt;
- unsigned long flags;
- int alreadyrunning = chan->span->flags & ZT_FLAG_RUNNING;
-
- spin_lock_irqsave(&wc->lock, flags);
-
- if (alreadyrunning && (wc->spantype != MODE_E1))
- __ds1_set_clear(wc);
-
- spin_unlock_irqrestore(&wc->lock, flags);
- return 0;
-}
-
-
-static int ds1_spanconfig(struct zt_span *span, struct zt_lineconfig *lc)
-{
- span->lineconfig = lc->lineconfig;
- span->txlevel = lc->lbo;
- span->rxlevel = 0;
- /* Do we want to SYNC on receive or not */
- /* If already running, apply changes immediately */
- if (span->flags & ZT_FLAG_RUNNING)
- return ds1_startup(span);
-
- return 0;
-}
-
-
-static int ds1_software_init(struct t1 *wc)
-{
- int x; /* Find position */
-
- for (x = 0; x < WC_MAX_CARDS; x++)
- {
- if (!cards[x])
- {
- cards[x] = wc;
- break;
- }
- }
-
- if (x >= WC_MAX_CARDS)
- return -1;
-
- t4_serial_setup(wc);
- wc->num = x;
-
- sprintf(wc->span.name, "WCT1/%d" , wc->num);
- sprintf(wc->span.desc, "%s Card %d", wc->variety, wc->num);
-
- wc->span.spanconfig = ds1_spanconfig;
- wc->span.chanconfig = ds1_chanconfig;
- wc->span.startup = ds1_startup;
- wc->span.shutdown = ds1_shutdown;
- wc->span.rbsbits = ds1_rbsbits;
- wc->span.maint = ds1_maint;
- wc->span.open = ds1_open;
- wc->span.close = ds1_close;
-
- switch (wc->spantype)
- {
- case MODE_UE1:
- wc->span.channels = 32;
- break;
-
- case MODE_E1:
- wc->span.channels = 31;
- break;
-
- default:
- wc->span.channels = 24;
- break;
- }
-
- wc->span.chans = wc->chans;
- wc->span.flags = ZT_FLAG_RBS;
- wc->span.linecompat = ZT_CONFIG_AMI | ZT_CONFIG_B8ZS | ZT_CONFIG_D4 | ZT_CONFIG_ESF;
- wc->span.ioctl = ds1_ioctl;
- wc->span.pvt = wc;
-
- if (wc->spantype & MODE_E1)
- wc->span.deflaw = ZT_LAW_ALAW;
- else
- wc->span.deflaw = ZT_LAW_MULAW;
-
- init_waitqueue_head(&wc->span.maintq);
-
- for (x=0;x<wc->span.channels;x++)
- {
- sprintf(wc->chans[x].name, "WCT1/%d/%d", wc->num, x + 1);
- wc->chans[x].sigcap = ZT_SIG_EM | ZT_SIG_CLEAR | ZT_SIG_EM_E1 |
- ZT_SIG_FXSLS | ZT_SIG_FXSGS |
- ZT_SIG_FXSKS | ZT_SIG_FXOLS | ZT_SIG_DACS_RBS |
- ZT_SIG_FXOGS | ZT_SIG_FXOKS | ZT_SIG_CAS | ZT_SIG_SF;
- wc->chans[x].pvt = wc;
- wc->chans[x].chanpos = x + 1;
- }
-
- if (zt_register(&wc->span, 0))
- {
- printk("Unable to register span with zaptel\n");
- return -1;
- }
- return 0;
-}
-
-
-static inline void __handle_leds(struct t1 *wc)
-{
- int oldreg;
-
- wc->blinktimer++;
-
- if (wc->blinktimer >= 4000)
- wc->blinktimer = 0;
-
- oldreg = wc->ledtestreg;
-
- if (wc->span.alarms & ZT_ALARM_RED) // RED alarm active
- { // LOS = loss of signal
- if (wc->blinktimer < 50)
- wc->ledtestreg = CTRL_LRED;
- else
- wc->ledtestreg = CTRL_LOFF;
-
- if (wc->blinktimer >= 200) // very fast flickering
- wc->blinktimer = 0;
-
- }
- else
- {
- if (wc->span.alarms & ZT_ALARM_YELLOW) // YELLOW ALARM = RED LED flashing
- { // other side can't see our signal
- if (wc->blinktimer < 250)
- wc->ledtestreg = CTRL_LRED;
- else
- wc->ledtestreg = CTRL_LOFF;
-
- if (wc->blinktimer >= 500) // flashing
- wc->blinktimer = 0;
- }
- else
- {
- if (wc->span.alarms & ZT_ALARM_BLUE) // BLUE ALARM
- { // T1 failure in front of a repeater down the line
- if (wc->blinktimer < 250)
- wc->ledtestreg = CTRL_LGRN; // GREEN LED flashing
- else
- wc->ledtestreg = CTRL_LOFF;
-
- if (wc->blinktimer >= 500) // flashing
- wc->blinktimer = 0;
- }
- else
- { // NO ALARM
- if (wc->blinktimer < 150) // slow winking green led heartbeat
- wc->ledtestreg = CTRL_LOFF;
- else
- wc->ledtestreg = CTRL_LGRN; // GREEN LED on most of the time
- }
- }
- }
-
- if (oldreg != wc->ledtestreg) // only when some bits have changed
- led_write_reg(wc, wc->ledtestreg); // write LED bits 0,1
-}
-
-
-//====================================== SEND MEDIA DATA =====================================
-static void ds1_media(struct t1 *wc)
-{
- int x,y,ty,ry,shift;
- unsigned int tx,rx;
- char frm;
-
- frm = (clk_read_reg(wc) & 0x07) + 1; // see how many frames are to be read by card
-
- ty = wc->txchunkptr;
- ry = wc->rxchunkptr;
-
-
- for (y = 0; y < frm; y++)
- {
- int reg = y * 32;
-
- if (ty >= ZT_CHUNKSIZE)
- {
- ty = 0;
- zt_transmit(&wc->span);
- }
-
- rx = ioread32(wc->ioaddr + OFS_TDM_RD + 0 + reg); // read in first 4 channels
- tx = 0xff; // FALC-56 uses TS0 for sync purposes only
-
- for (x=1; x<=wc->span.channels; x++)
- {
- if ((x % 4) == 0)
- {
- iowrite32(tx, wc->ioaddr + OFS_TDM_WR + x - 4 + reg); // write 4 bytes (channels) of pcm data
- tx = 0;
- rx = ioread32(wc->ioaddr + OFS_TDM_RD + x + reg);
- }
-
- shift = ((x % 4) << 3);
- tx |= (wc->chans[x-1].writechunk[ty] & 0xff) << shift;
- wc->chans[x-1].readchunk [ry] = (rx >> shift) & 0xff;
- }
-
- iowrite32(tx, wc->ioaddr + OFS_TDM_WR + (x & 0xfc) + reg); // write 4 bytes (channels) of pcm data
-
- ty++;
- ry++;
-
- if (ry >= ZT_CHUNKSIZE)
- {
- ry = 0;
-
- for (x=0; x<wc->span.channels; x++) // handle echocanceller memory fill
- {
- zt_ec_chunk(&wc->chans[x], wc->chans[x].readchunk, wc->ec_chunk2[x]);
-
- memcpy(wc->ec_chunk2[x], wc->ec_chunk1[x] , ZT_CHUNKSIZE);
- memcpy(wc->ec_chunk1[x], wc->chans[x].writechunk, ZT_CHUNKSIZE);
- }
-
- zt_receive(&wc->span);
- }
- }
-
- wc->txchunkptr = ty;
- wc->rxchunkptr = ry;
-}
-
-
-
-//===============================================================================================================================================================================
-
-
-static void __t1_check_alarms(struct t1 *wc)
-{
- unsigned char c,d;
- int alarms;
- int x,j;
-
- if (!(wc->span.flags & ZT_FLAG_RUNNING))
- return;
-
- c = __t1_framer_in(wc, FR_FRS0);
- d = __t1_framer_in(wc, FR_FRS1);
-
- /* Assume no alarms */
- alarms = 0;
-
- /* And consider only carrier alarms */
- wc->span.alarms &= (ZT_ALARM_RED | ZT_ALARM_BLUE | ZT_ALARM_NOTOPEN);
-
- if (wc->spantype & MODE_E1)
- {
- if (c & 0x04)
- { /* No multiframe found, force RAI high after 400ms only if we haven't found a multiframe since last loss of frame */
- if (!(wc->spanflags & FLAG_NMF))
- {
- __t1_framer_out(wc, FR_FMR4, 0x9f | 0x20); /* FMR4: Force RAI High */
- wc->spanflags |= FLAG_NMF;
- printk("NMF workaround on!\n");
- }
-
- __t1_framer_out(wc, FR_FMR2, 0xc3); /* Reset to CRC4 mode */
- __t1_framer_out(wc, FR_FMR0, 0xf2); /* Force Resync */
- __t1_framer_out(wc, FR_FMR0, 0xf0); /* Force Resync */
- }
- else
- {
- if (!(c & 0x02))
- {
- if ((wc->spanflags & FLAG_NMF))
- {
- __t1_framer_out(wc, FR_FMR4, 0x9f); /* FMR4: Clear forced RAI */
- wc->spanflags &= ~FLAG_NMF;
- printk("NMF workaround off!\n");
- }
- }
- }
- }
- else
- { /* Detect loopup code if we're not sending one */
- if ((!wc->span.mainttimer) && (d & 0x08))
- {
- if ((wc->loopupcnt++ > 80) && (wc->span.maintstat != ZT_MAINT_REMOTELOOP)) // Loop-up code detected
- {
- __t1_framer_out(wc, FR_LIM0, 0x08); // LIM0: Disable any local loop
- __t1_framer_out(wc, FR_LIM1, 0xf6); // LIM1: Enable remote loop
-
- wc->span.maintstat = ZT_MAINT_REMOTELOOP; // maintainance status = REMOTELOOP
- }
- }
- else
- wc->loopupcnt = 0;
-
- /* Same for loopdown code */
- if ((!wc->span.mainttimer) && (d & 0x10))
- { /* Loop-down code detected */
- if ((wc->loopdowncnt++ > 80) && (wc->span.maintstat == ZT_MAINT_REMOTELOOP))
- {
- __t1_framer_out(wc, FR_LIM0, 0x08); /* LIM0: Disable any local loop */
- __t1_framer_out(wc, FR_LIM1, 0xf0); /* LIM1: Disable remote loop */
- wc->span.maintstat = ZT_MAINT_NONE;
- }
- }
- else
- wc->loopdowncnt = 0;
- }
-
- if (wc->span.lineconfig & ZT_CONFIG_NOTOPEN)
- {
- for (x=0,j=0;x < wc->span.channels;x++)
- {
- if ((wc->span.chans[x].flags & ZT_FLAG_OPEN) || (wc->span.chans[x].flags & ZT_FLAG_NETDEV))
- j++;
- }
-
- if (!j)
- alarms |= ZT_ALARM_NOTOPEN;
- }
-
- if (c & 0xa0)
- {
- if (wc->alarmcount >= alarmdebounce)
- {
- if (!(wc->spantype & 0x80))
- alarms |= ZT_ALARM_RED;
- }
- else
- wc->alarmcount++;
- }
- else
- wc->alarmcount = 0;
-
- if (c & 0x4)
- alarms |= ZT_ALARM_BLUE;
-
- /* Keep track of recovering */
- if ((!alarms) && wc->span.alarms)
- wc->alarmtimer = ZT_ALARMSETTLE_TIME;
-
- if (wc->alarmtimer)
- alarms |= ZT_ALARM_RECOVER;
-
- /* If receiving alarms, go into Yellow alarm state */
- if (alarms && !(wc->spanflags & FLAG_SENDINGYELLOW))
- {
- unsigned char fmr4;
- printk("DS1x1F: Setting yellow alarm\n");
- /* We manually do yellow alarm to handle RECOVER and NOTOPEN, otherwise it's auto anyway */
- fmr4 = __t1_framer_in(wc, FR_FMR4);
- __t1_framer_out(wc, FR_FMR4, fmr4 | 0x20);
-
- wc->spanflags |= FLAG_SENDINGYELLOW;
- }
- else
- {
- if ((!alarms) && (wc->spanflags & FLAG_SENDINGYELLOW))
- {
- unsigned char fmr4;
- printk("DS1x1F: Clearing yellow alarm\n");
- // We manually do yellow alarm to handle RECOVER
- fmr4 = __t1_framer_in(wc, FR_FMR4);
- __t1_framer_out(wc, FR_FMR4, fmr4 & ~0x20);
-
- wc->spanflags &= ~FLAG_SENDINGYELLOW;
- }
- }
- // Re-check the timing source when we enter/leave alarm, not withstanding yellow alarm
- if ((c & 0x10) && !(wc->spantype & 0x80))
- alarms |= ZT_ALARM_YELLOW;
-
- if (wc->span.mainttimer || wc->span.maintstat)
- alarms |= ZT_ALARM_LOOPBACK;
-
- wc->span.alarms = alarms;
- zt_alarm_notify(&wc->span);
-}
-
-
-static void __ds1_do_counters(struct t1 *wc)
-{
- if (wc->alarmtimer)
- {
- if (!--wc->alarmtimer)
- {
- wc->span.alarms &= ~(ZT_ALARM_RECOVER);
- zt_alarm_notify(&wc->span);
- }
- }
-}
-
-///--------------------------------------------------------------------------------------------------------------------------------
-static irqreturn_t ds1_interrupt(int irq, void *dev_id, struct pt_regs *regs)
-{
- struct t1 *wc = dev_id;
- unsigned long flags;
- unsigned int x;
- int y;
-
- x = ctrl_read_reg(wc); // read statusregister
-
- if (!(x & CTRL_IRQ))
- return IRQ_NONE;
-
- ctrl_set_reg(wc, CTRL_INTA); // clear the interrupt flag
-
- if (!wc->intcount && debug)
- printk("DS1x1F: Got interrupt\n");
-
- if (x & CTRL_IRM) // we missed at least one interrupt
- printk("DS1x1F: Missed an Interrupt !!!\n");
-
- ds1_media(wc); // handle media / audio- buffers
-
- x = clk_read_reg(wc) & 0x07; // get the current frame buffer setting
-
- spin_lock_irqsave(&wc->lock, flags);
-
- y = wc->prescaler - 1;
-
- if (y < 1)
- {
- y = 8 / (x + 1);
-
- __handle_leds(wc);
- // Count down timers
- __ds1_do_counters(wc);
-
- wc->intcount++;
-
- x = wc->intcount & 0x0f; // Do some things that we don't have to do very often
-
- switch(x)
- {
- case 0:
- case 1:
- break;
- case 2:
- __t1_check_sigbits(wc);
- break;
- case 4: // Check alarms 1/4 as frequently
- if (!(wc->intcount & 0x30))
- __t1_check_alarms(wc);
- break;
- }
- }
- wc->prescaler = y;
-
- spin_unlock_irqrestore(&wc->lock, flags);
-
- return IRQ_RETVAL(1);
-}
-
-static int memory_test(struct t1 *wc, int pattern)
-{
- int ret = 0;
- int x, y;
-
- for (x=0; x<31; x++) // clear out tx tdm memory to FF
- {
- iowrite32 (pattern, wc->ioaddr + OFS_TDM_WR + (8 * x) );
-
- y = ioread32( wc->ioaddr + OFS_TDM_WR + (8 * x) );
-
- if (y != pattern)
- {
- ret = 1;
- if (debug)
- printk("DS1x1F: TDM tx memory failure %08x / %08x @ %02x LSB\n", pattern, y, x);
- }
- else
- if (debug)
- printk("DS1x1F: TDM tx memory OK %08x / %08x @ %02x LSB\n", pattern, y, x);
-
- iowrite32 (pattern, wc->ioaddr + OFS_TDM_RD + (8 * x));
-
- y = ioread32( wc->ioaddr + OFS_TDM_RD + (8 * x));
-
- if (y != pattern)
- {
- ret = 1;
- if (debug)
- printk("DS1x1F: TDM rx memory failure %08x / %08x @ %02x MSB\n", pattern, y, x);
- }
- else
- if (debug)
- printk("DS1x1F: TDM rx memory OK %08x / %08x @ %02x MSB\n", pattern, y, x);
-
-
- }
- return (ret);
-}
-
-
-//--------------------------------------------------------------------------------------------------------------------------------------
-static int ds1_hardware_init(struct t1 *wc)
-{
- unsigned int vstr, wid;
- unsigned int x;
-
- if (frames < 1) // setting frames = 0 autoadjust to current ZT_CHUNKSIZE
- frames = ZT_CHUNKSIZE;
-
- if (frames > 8) // maximum framebuffer size is 8 frames
- frames = 8;
-
- if (extclk == -1) // extclk not specified by parameter
- {
- x = ctrl_read_reg(wc); // read DIP switch
- extclk = (x >> 14) & 0x03; // SW 3-4 => clock selection
- }
-
- switch (extclk) // external / H.100 bus clocking options
- {
- case 1: // clock derived from H.100 bus if available
- x = 0x30 | (frames - 1);
- break;
-
- case 2: // this card is bus clock master
- x = 0x20 | (frames - 1);
- break;
-
- default: // all other cases - internally clocked / no clk output
- x = frames - 1;
- break;
- }
-
- clk_write_reg (wc, x); // no loopback
-
- mdelay(10); // wait for 10 msec. for FDET settle time
-
- x = clk_read_reg(wc);
-
- switch (x & 0x30)
- {
- case 0x20:
- printk("DS1x1F: Clocking: Busmaster Framebuffer: %d frames\n",(x & 0x07) + 1);
- break;
-
- case 0x30:
- if (x & 0x00010000)
- printk("DS1x1F: Clocking: External ( clock present on bus) Framebuffer: %d frames\n",(x & 0x07) + 1);
- else
- printk("DS1x1F: Clocking: (External) no clock present on bus Framebuffer: %d frames\n",(x & 0x07) + 1);
- break;
-
- default:
- printk("DS1x1F: Clocking: Internal Framebuffer: %d frames\n",(x & 0x07) + 1);
- break;
- }
-
- ctrl_write_reg(wc, CTRL_INTA | CTRL_TEST | CTRL_FRST);
-
- mdelay(10); // wait for 10 msec.
-
- x = ctrl_read_reg(wc); // read in the controlregister
-
- ctrl_write_reg(wc, CTRL_LRED);
-
- mdelay(1); // wait for 1 msec.
-
- if (cardmode != -1)
- wc->spantype = cardmode; // read in spanmode paramter
- else
- switch (x & 0x3000) // check if SW-1 and SW-2
- {
- case 0x0000:
- wc->spantype = MODE_T1; // OFF - OFF = T1
- break;
-
- case 0x1000:
- wc->spantype = MODE_J1; // OFF - ON = J1
- break;
-
- case 0x2000:
- wc->spantype = MODE_UE1; // ON - OFF = unchannelized E1
- break;
-
- case 0x3000:
- wc->spantype = MODE_E1; // ON - ON = E1
- break;
- }
-
- if (x & CTRL_RELI)
- printk("DS1x1 Board Ver: %01x.%01x SW=%01x-%01x-%01x-%01x [%x]\n",(x>>28),((x>>20)&0xf),((x>>15)&1),((x>>14)&1),((x>>13)&1),((x>>12)&1),x);
- else
- printk("DS1x1F Board Ver: %01x.%01x SW=%01x-%01x-%01x-%01x [%x]\n",(x>>28),((x>>20)&0xf),((x>>15)&1),((x>>14)&1),((x>>13)&1),((x>>12)&1),x);
-
- vstr = t1_framer_in(wc ,FR_VSTR); // identify FALC framer chip version
- wid = t1_framer_in(wc ,FR_WID );
-
- if (vstr == 0x05)
- {
- if (wid & 0xc0)
- printk("FALC PEF-2256 Ver: 2.2 detected\n");
- else
- printk("FALC PEF-2256 Ver: 2.1 detected\n");
- }
- else
- {
- if ((wid & 0x03) == 0x03)
- printk("!!! WARNING !!! Old FALC PEB-2256 Ver: 1.2 detected\n");
- else
- printk("!!! WARNING !!! FALC Version unknown: VSTR: %02x WID: %02x\n", vstr, wid);
- }
-
- ds1_disable_interrupts(wc);
-
- x = 0;
-
- if (memory_test (wc, 0x5555aaaa)) x = 1;
- if (memory_test (wc, 0x01234567)) x = 1;
- if (memory_test (wc, 0xaaaa5555)) x = 1;
- if (memory_test (wc, 0x76543210)) x = 1;
-
- if (x)
- printk("DS1x1F: Card TDM memory test failed !!!\n");
- else
- printk("DS1x1F: Card TDM memory test completed.\n");
-
- ds1_enable_interrupts(wc);
-
- start_alarm(wc);
- return 0;
-
-}
-
-
-static int __devinit ds1_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
-{
- struct t1 *wc;
- unsigned long end;
-
-
- if (pci_enable_device(pdev))
- {
- printk (KERN_ALERT "DS1x1F: PCI enable failed\n");
- pci_disable_device (pdev);
- return (-EIO);
- }
- else
- {
- wc = kmalloc(sizeof(struct t1), GFP_KERNEL);
-
- printk("Trying to init an DS1x1F\n");
-
- if (wc)
- {
- memset(wc, 0x0, sizeof(struct t1)); // initialize structure with 0x00
- spin_lock_init(&wc->lock);
-
- wc->cnstart = pci_resource_start(pdev, 0); // read the assigned memory resources for region 0
- end = pci_resource_end (pdev, 0);
- wc->cnlen = end - wc->cnstart + 1;
- wc->cres = request_mem_region(wc->cnstart,wc->cnlen,name);
- wc->cnaddr = ioremap_nocache (wc->cnstart,wc->cnlen );
-
- if(debug)
- printk (KERN_INFO "Config resources = [0x%lx-0x%lx] (%ld) \n", wc->cnstart, end, wc->cnlen);
-
- wc->iostart = pci_resource_start(pdev, 2); // read the assigned memory resources for region 2
- end = pci_resource_end (pdev, 2);
- wc->iolen = end - wc->iostart + 1;
- wc->ires = request_mem_region(wc->iostart,wc->iolen,name);
- wc->ioaddr = ioremap_nocache (wc->iostart,wc->iolen );
-
- if(debug)
- printk (KERN_INFO "I/O resources = [0x%lx-0x%lx] (%ld) \n", wc->iostart, end, wc->iolen);
-
- wc->dev = pdev;
-
- pci_set_drvdata(pdev, wc); // keep track of our device - i.e. for later removal
-
- if (request_irq(pdev->irq, ds1_interrupt, SA_INTERRUPT | SA_SHIRQ, "ds1x1f", wc))
- {
- printk("DS1x1F: Unable to request IRQ %d\n", pdev->irq);
- kfree(wc);
- return -EIO;
- }
-
- ds1_hardware_init(wc); // Initialize hardware
-
- wc->variety = "DS1x1F T1/E1-card"; // We now know which version of card we have
- ds1_software_init(wc); // Misc. software stuff
-
- printk("Found an: %s\n", wc->variety);
- return (0);
- }
- else
- {
- printk (KERN_ALERT "DS1x1F: failed to allocate memory\n");
- return (-ENOMEM);
- }
- }
- return (0);
-}
-
-
-static void __devexit ds1_remove(struct pci_dev *pdev)
-{
- struct t1 *wc = pci_get_drvdata(pdev);
-
- if (wc)
- {
-
- ds1_disable_interrupts(wc); // In case hardware is still there
- free_irq(pdev->irq, wc); // release the interrupt resource
- mdelay(10);
-
- zt_unregister(&wc->span);
-
- if (debug)
- printk (KERN_ALERT "DS1x1F: resetting relay / falc / red led on\n");
-
- ctrl_write_reg(wc, CTRL_FRST | CTRL_LRED); // reset FALC, relay= off, Red LED = on
-
- if (wc->ioaddr != NULL) // unmap io space
- iounmap (wc->ioaddr);
-
- if (wc->cnaddr != NULL) // unmap control space
- iounmap (wc->cnaddr);
-
- release_mem_region(wc->iostart, wc->iolen); // release io memory region
- release_mem_region(wc->cnstart, wc->cnlen); // release control memory region
-
- kfree(wc);
-
- printk (KERN_ALERT "DS1x1F: disable pci device\n");
- pci_disable_device (pdev);
- }
- else
- printk (KERN_ALERT "DS1x1F: WARNING Removal Failed !!!\n");
-
-}
-
-
-static struct pci_device_id ds1_ids[] = { { PCI_DEVICE( 0x2321, 0x011f) }, { 0, }, };
-
-
-MODULE_DEVICE_TABLE(pci,ds1_ids);
-
-
-static struct pci_driver ds1_driver = {
- name: "ds1x1f",
- probe: ds1_probe,
- remove: __devexit_p(ds1_remove),
- suspend: NULL,
- resume: NULL,
- id_table: ds1_ids,
-};
-
-
-static int __init ds1_init(void)
-{
- int res;
- res = zap_pci_module(&ds1_driver);
-
- if (res)
- return -ENODEV;
-
- return 0;
-}
-
-
-static void __exit ds1_cleanup(void)
-{
- pci_unregister_driver(&ds1_driver);
-}
-
-
-
-module_param(alarmdebounce, int, 0600);
-module_param(loopback, int, 0600);
-module_param(cardmode, int, 0600);
-module_param(frames, int, 0600);
-module_param(debug, int, 0600);
-module_param(extclk, int, 0600);
-module_param(monitor, int, 0600);
-
-MODULE_DESCRIPTION("TC-DG ds1x1f Zaptel Driver");
-MODULE_AUTHOR("TCDG Corp. <tech at tc-dg.net");
-MODULE_LICENSE("GPL");
-
-module_init(ds1_init);
-module_exit(ds1_cleanup);
-
Deleted: zaptel/branches/experimental/opvxa1200.c
===================================================================
--- zaptel/branches/experimental/opvxa1200.c 2007-04-11 22:08:36 UTC (rev 3380)
+++ zaptel/branches/experimental/opvxa1200.c 2007-04-11 22:12:19 UTC (rev 3381)
@@ -1,2722 +0,0 @@
-/*
- * OpenVox A1200P FXS/FXO Interface Driver for Zapata Telephony interface
- *
- * Modify from wctdm.c by MiaoLin<miaolin at openvox.com.cn>
- *
- * All rights reserved.
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- *
- */
-
-/* Rev histroy
- *
- * Rev 0.10 initial version
- * Rev 0.11
- * fixed the led light on/off bug.
- * modify some wctdm print to opvxa1200
- * support firmware version 1.2, faster i/o operation, and better LED control.
- *
- * Rev 0.12 patched to support new pci id 0x8519
- *
- *
- *
- *
- *
- *
- *
- *
- *
- *
- *
- *
- *
- */
-
-#include <linux/kernel.h>
-#include <linux/errno.h>
-#include <linux/module.h>
-#include <linux/init.h>
-#include <linux/errno.h>
-#include <linux/pci.h>
-#include <linux/interrupt.h>
-#include <asm/io.h>
-#include "proslic.h"
-#include "wctdm.h"
-
-//miaolin
-#include <linux/string.h>
-#include <asm/uaccess.h> // get_fs(), set_fs(), KERNEL_DS
-#include <linux/file.h> // fput()
-//miaolin
-
-
-/*
- * Define for audio vs. register based ring detection
- *
- */
-/* #define AUDIO_RINGCHECK */
-
-/*
- Experimental max loop current limit for the proslic
- Loop current limit is from 20 mA to 41 mA in steps of 3
- (according to datasheet)
- So set the value below to:
- 0x00 : 20mA (default)
- 0x01 : 23mA
- 0x02 : 26mA
- 0x03 : 29mA
- 0x04 : 32mA
- 0x05 : 35mA
- 0x06 : 37mA
- 0x07 : 41mA
-*/
-static int loopcurrent = 20;
-
-static int reversepolarity = 0;
-
-static alpha indirect_regs[] =
-{
-{0,255,"DTMF_ROW_0_PEAK",0x55C2},
-{1,255,"DTMF_ROW_1_PEAK",0x51E6},
-{2,255,"DTMF_ROW2_PEAK",0x4B85},
-{3,255,"DTMF_ROW3_PEAK",0x4937},
-{4,255,"DTMF_COL1_PEAK",0x3333},
-{5,255,"DTMF_FWD_TWIST",0x0202},
-{6,255,"DTMF_RVS_TWIST",0x0202},
-{7,255,"DTMF_ROW_RATIO_TRES",0x0198},
-{8,255,"DTMF_COL_RATIO_TRES",0x0198},
-{9,255,"DTMF_ROW_2ND_ARM",0x0611},
-{10,255,"DTMF_COL_2ND_ARM",0x0202},
-{11,255,"DTMF_PWR_MIN_TRES",0x00E5},
-{12,255,"DTMF_OT_LIM_TRES",0x0A1C},
-{13,0,"OSC1_COEF",0x7B30},
-{14,1,"OSC1X",0x0063},
-{15,2,"OSC1Y",0x0000},
-{16,3,"OSC2_COEF",0x7870},
-{17,4,"OSC2X",0x007D},
-{18,5,"OSC2Y",0x0000},
-{19,6,"RING_V_OFF",0x0000},
-{20,7,"RING_OSC",0x7EF0},
-{21,8,"RING_X",0x0160},
-{22,9,"RING_Y",0x0000},
-{23,255,"PULSE_ENVEL",0x2000},
-{24,255,"PULSE_X",0x2000},
-{25,255,"PULSE_Y",0x0000},
-//{26,13,"RECV_DIGITAL_GAIN",0x4000}, // playback volume set lower
-{26,13,"RECV_DIGITAL_GAIN",0x2000}, // playback volume set lower
-{27,14,"XMIT_DIGITAL_GAIN",0x4000},
-//{27,14,"XMIT_DIGITAL_GAIN",0x2000},
-{28,15,"LOOP_CLOSE_TRES",0x1000},
-{29,16,"RING_TRIP_TRES",0x3600},
-{30,17,"COMMON_MIN_TRES",0x1000},
-{31,18,"COMMON_MAX_TRES",0x0200},
-{32,19,"PWR_ALARM_Q1Q2",0x07C0},
-{33,20,"PWR_ALARM_Q3Q4",0x2600},
-{34,21,"PWR_ALARM_Q5Q6",0x1B80},
-{35,22,"LOOP_CLOSURE_FILTER",0x8000},
-{36,23,"RING_TRIP_FILTER",0x0320},
-{37,24,"TERM_LP_POLE_Q1Q2",0x008C},
-{38,25,"TERM_LP_POLE_Q3Q4",0x0100},
-{39,26,"TERM_LP_POLE_Q5Q6",0x0010},
-{40,27,"CM_BIAS_RINGING",0x0C00},
-{41,64,"DCDC_MIN_V",0x0C00},
-{42,255,"DCDC_XTRA",0x1000},
-{43,66,"LOOP_CLOSE_TRES_LOW",0x1000},
-};
-
-static struct fxo_mode {
- char *name;
- /* FXO */
- int ohs;
- int ohs2;
- int rz;
- int rt;
- int ilim;
- int dcv;
- int mini;
- int acim;
- int ring_osc;
- int ring_x;
-} fxo_modes[] =
-{
- { "FCC", 0, 0, 0, 1, 0, 0x3, 0, 0, }, /* US, Canada */
- { "TBR21", 0, 0, 0, 0, 1, 0x3, 0, 0x2, 0x7e6c, 0x023a, },
- /* Austria, Belgium, Denmark, Finland, France, Germany,
- Greece, Iceland, Ireland, Italy, Luxembourg, Netherlands,
- Norway, Portugal, Spain, Sweden, Switzerland, and UK */
- { "ARGENTINA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "AUSTRALIA", 1, 0, 0, 0, 0, 0, 0x3, 0x3, },
- { "AUSTRIA", 0, 1, 0, 0, 1, 0x3, 0, 0x3, },
- { "BAHRAIN", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "BELGIUM", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "BRAZIL", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "BULGARIA", 0, 0, 0, 0, 1, 0x3, 0x0, 0x3, },
- { "CANADA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "CHILE", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "CHINA", 0, 0, 0, 0, 0, 0, 0x3, 0xf, },
- { "COLUMBIA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "CROATIA", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "CYRPUS", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "CZECH", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "DENMARK", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "ECUADOR", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "EGYPT", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "ELSALVADOR", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "FINLAND", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "FRANCE", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "GERMANY", 0, 1, 0, 0, 1, 0x3, 0, 0x3, },
- { "GREECE", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "GUAM", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "HONGKONG", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "HUNGARY", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "ICELAND", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "INDIA", 0, 0, 0, 0, 0, 0x3, 0, 0x4, },
- { "INDONESIA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "IRELAND", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "ISRAEL", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "ITALY", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "JAPAN", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "JORDAN", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "KAZAKHSTAN", 0, 0, 0, 0, 0, 0x3, 0, },
- { "KUWAIT", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "LATVIA", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "LEBANON", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "LUXEMBOURG", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "MACAO", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "MALAYSIA", 0, 0, 0, 0, 0, 0, 0x3, 0, }, /* Current loop >= 20ma */
- { "MALTA", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "MEXICO", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "MOROCCO", 0, 0, 0, 0, 1, 0x3, 0, 0x2, },
- { "NETHERLANDS", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "NEWZEALAND", 0, 0, 0, 0, 0, 0x3, 0, 0x4, },
- { "NIGERIA", 0, 0, 0, 0, 0x1, 0x3, 0, 0x2, },
- { "NORWAY", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "OMAN", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "PAKISTAN", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "PERU", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "PHILIPPINES", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "POLAND", 0, 0, 1, 1, 0, 0x3, 0, 0, },
- { "PORTUGAL", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "ROMANIA", 0, 0, 0, 0, 0, 3, 0, 0, },
- { "RUSSIA", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "SAUDIARABIA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "SINGAPORE", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "SLOVAKIA", 0, 0, 0, 0, 0, 0x3, 0, 0x3, },
- { "SLOVENIA", 0, 0, 0, 0, 0, 0x3, 0, 0x2, },
- { "SOUTHAFRICA", 1, 0, 1, 0, 0, 0x3, 0, 0x3, },
- { "SOUTHKOREA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "SPAIN", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "SWEDEN", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "SWITZERLAND", 0, 1, 0, 0, 1, 0x3, 0, 0x2, },
- { "SYRIA", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "TAIWAN", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "THAILAND", 0, 0, 0, 0, 0, 0, 0x3, 0, },
- { "UAE", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "UK", 0, 1, 0, 0, 1, 0x3, 0, 0x5, },
- { "USA", 0, 0, 0, 0, 0, 0x3, 0, 0, },
- { "YEMEN", 0, 0, 0, 0, 0, 0x3, 0, 0, },
-};
-
-#ifdef STANDALONE_ZAPATA
-#include "zaptel.h"
-#else
-#include <linux/zaptel.h>
-#endif
-
-#ifdef LINUX26
-#include <linux/moduleparam.h>
-#endif
-
-#define NUM_FXO_REGS 60
-
-#define WC_MAX_IFACES 128
-
-#define DELAY 0x0 /* 30 = 15 cycles, 10 = 8 cycles, 0 = 3 cycles */
-#define WC_OFFSET 4 /* Offset between transmit and receive, in bytes. */
-#define WC_SYNCFLAG 0xca1ef1ac
-
-#define WC_CNTL 0x00
-#define WC_OPER 0x01
-#define WC_AUXC 0x02
-#define WC_AUXD 0x03
-#define WC_MASK0 0x04
-#define WC_MASK1 0x05
-#define WC_INTSTAT 0x06
-#define WC_AUXR 0x07
-
-#define WC_DMAWS 0x08
-#define WC_DMAWI 0x0c
-#define WC_DMAWE 0x10
-#define WC_DMARS 0x18
-#define WC_DMARI 0x1c
-#define WC_DMARE 0x20
-
-#define WC_AUXFUNC 0x2b
-#define WC_SERCTL 0x2d
-#define WC_FSCDELAY 0x2f
-
-#define WC_REGBASE 0xc0
-
-#define WC_VER 0x0
-#define WC_CS 0x1
-#define WC_SPICTRL 0x2
-#define WC_SPIDATA 0x3
-
-#define BIT_SPI_BYHW (1 << 0)
-#define BIT_SPI_BUSY (1 << 1) // 0=can read/write spi, 1=spi working.
-#define BIT_SPI_START (1 << 2)
-
-
-#define BIT_LED_CLK (1 << 0) // MiaoLin add to control the led.
-#define BIT_LED_DATA (1 << 1) // MiaoLin add to control the led.
-
-#define BIT_CS (1 << 2)
-#define BIT_SCLK (1 << 3)
-#define BIT_SDI (1 << 4)
-#define BIT_SDO (1 << 5)
-
-#define FLAG_EMPTY 0
-#define FLAG_WRITE 1
-#define FLAG_READ 2
-
-/* the constants below control the 'debounce' periods enforced by the
- check_hook routines; these routines are called once every 4 interrupts
- (the interrupt cycles around the four modules), so the periods are
- specified in _4 millisecond_ increments
-*/
-#define RING_DEBOUNCE 4 /* Ringer Debounce (64 ms) */
-#define DEFAULT_BATT_DEBOUNCE 4 /* Battery debounce (64 ms) */
-#define POLARITY_DEBOUNCE 4 /* Polarity debounce (64 ms) */
-#define DEFAULT_BATT_THRESH 3 /* Anything under this is "no battery" */
-
-#define OHT_TIMER 6000 /* How long after RING to retain OHT */
-
-#define FLAG_3215 (1 << 0)
-
-//modify by MiaoLin from 4 to 12;
-//#define NUM_CARDS 4
-#define NUM_CARDS 12
-#define NUM_FLAG 4 //number of flag channels.
-
-// if you want to record the last 8 sec voice before the driver unload, uncomment it and rebuild.
-//#define TEST_LOG_INCOME_VOICE
-
-#define MAX_ALARMS 10
-
-#define MOD_TYPE_FXS 0
-#define MOD_TYPE_FXO 1
-
-#define MINPEGTIME 10 * 8 /* 30 ms peak to peak gets us no more than 100 Hz */
-#define PEGTIME 50 * 8 /* 50ms peak to peak gets us rings of 10 Hz or more */
-#define PEGCOUNT 5 /* 5 cycles of pegging means RING */
-
-#define NUM_CAL_REGS 12
-
-struct calregs {
- unsigned char vals[NUM_CAL_REGS];
-};
-
-enum proslic_power_warn {
- PROSLIC_POWER_UNKNOWN = 0,
- PROSLIC_POWER_ON,
- PROSLIC_POWER_WARNED,
-};
-
-#define voc_buffer_size (8000*8)
-
-struct wctdm {
- struct pci_dev *dev;
- char *variety;
- struct zt_span span;
- unsigned char ios;
- int usecount;
- unsigned int intcount;
- int dead;
- int pos;
- int flags[NUM_CARDS];
- int freeregion;
- int alt;
- int curcard;
- int cardflag; /* Bit-map of present cards */
- enum proslic_power_warn proslic_power;
- spinlock_t lock;
-
- union {
- struct {
-#ifdef AUDIO_RINGCHECK
- unsigned int pegtimer;
- int pegcount;
- int peg;
- int ring;
-#else
- int wasringing;
-#endif
- int ringdebounce;
- int offhook;
- int battdebounce;
- int nobatttimer;
- int battery;
- int lastpol;
- int polarity;
- int polaritydebounce;
- } fxo;
- struct {
- int oldrxhook;
- int debouncehook;
- int lastrxhook;
- int debounce;
- int ohttimer;
- int idletxhookstate; /* IDLE changing hook state */
- int lasttxhook;
- int palarms;
- struct calregs calregs;
- } fxs;
- } mod[NUM_CARDS];
-
- /* Receive hook state and debouncing */
- int modtype[NUM_CARDS];
- unsigned char reg0shadow[NUM_CARDS];
- unsigned char reg1shadow[NUM_CARDS];
-
- unsigned long ioaddr;
- unsigned long mem_region; /* 32 bit Region allocated to tiger320 */
- unsigned long mem_len; /* Length of 32 bit region */
- volatile unsigned long mem32; /* Virtual representation of 32 bit memory area */
-
- dma_addr_t readdma;
- dma_addr_t writedma;
- volatile unsigned char *writechunk; /* Double-word aligned write memory */
- volatile unsigned char *readchunk; /* Double-word aligned read memory */
- struct zt_chan chans[NUM_CARDS];
-
-#ifdef TEST_LOG_INCOME_VOICE
- //unsigned char tempo[NUM_CARDS + NUM_FLAG];
- char * voc_buf[NUM_CARDS + NUM_FLAG];
- int voc_ptr[NUM_CARDS + NUM_FLAG];
-#endif
- //int offset;
- int lastchan;
- unsigned short ledstate;
- unsigned char fwversion;
-};
-
-
-struct wctdm_desc {
- char *name;
- int flags;
-};
-
-static struct wctdm_desc wctdme = { "OpenVox A1200P", 0 };
-static int acim2tiss[16] = { 0x0, 0x1, 0x4, 0x5, 0x7, 0x0, 0x0, 0x6, 0x0, 0x0, 0x0, 0x2, 0x0, 0x3 };
-
-static struct wctdm *ifaces[WC_MAX_IFACES];
-
-static void wctdm_release(struct wctdm *wc);
-
-static int battdebounce = DEFAULT_BATT_DEBOUNCE;
-static int battthresh = DEFAULT_BATT_THRESH;
-static int debug = 0;
-//static int debug = 1;
-static int robust = 0;
-static int timingonly = 0;
-static int lowpower = 0;
-static int boostringer = 0;
-static int _opermode = 0;
-static char *opermode = "FCC";
-static int fxshonormode = 0;
-static int alawoverride = 0;
-static int spibyhw = 1; // MiaoLin add;
-static int usememio = 1;
-
-static int wctdm_init_proslic(struct wctdm *wc, int card, int fast , int manual, int sane);
-
-static void wctdm_set_led(struct wctdm* wc, int card, int onoff)
-{
- int i;
- unsigned char c;
-
- wc->ledstate &= ~(0x01<<card);
- wc->ledstate |= (onoff<<card);
- c = (inb(wc->ioaddr + WC_AUXD)&~BIT_LED_CLK)|BIT_LED_DATA;
- outb( c, wc->ioaddr + WC_AUXD);
- for(i=NUM_CARDS-1; i>=0; i--)
- {
- if(wc->ledstate & (0x0001<<i))
- if(wc->fwversion == 0x11)
- c &= ~BIT_LED_DATA;
- else
- c |= BIT_LED_DATA;
- else
- if(wc->fwversion == 0x11)
- c |= BIT_LED_DATA;
- else
- c &= ~BIT_LED_DATA;
-
- outb( c, wc->ioaddr + WC_AUXD);
- outb( c|BIT_LED_CLK, wc->ioaddr + WC_AUXD);
- outb( (c&~BIT_LED_CLK)|BIT_LED_DATA, wc->ioaddr + WC_AUXD);
- }
-}
-
-
-static inline void wctdm_transmitprep(struct wctdm *wc, unsigned char ints)
-{
- int x, y, chan_offset, pos;
- volatile unsigned char *txbuf;
-
- if (ints & 0x04 /*0x01*/)
- /* Write is at interrupt address. Start writing from normal offset */
- txbuf = wc->writechunk;
- else
- txbuf = wc->writechunk + ZT_CHUNKSIZE * (NUM_CARDS+NUM_FLAG);
-
- /* Calculate Transmission */
- zt_transmit(&wc->span);
-
- if(wc->lastchan == -1) // not in sync.
- return;
-
- chan_offset = (wc->lastchan*4 + 4 ) % (NUM_CARDS+NUM_FLAG);
-
- //for (x=0;x<wc->offset;x++)
- // txbuf[x] = wc->tempo[x];
- for (y=0;y<ZT_CHUNKSIZE;y++) {
-#ifdef __BIG_ENDIAN
- // operation pending...
-#else
- //for (x=0;x<(NUM_CARDS+NUM_FLAG);x++) {
- // pos = y * (NUM_CARDS+NUM_FLAG) + chanmap[(x+chan_offset)&0x0f] + wc->offset;
- // /* Put channel number as outgoing data */
- // if (pos < (NUM_CARDS+NUM_FLAG) * ZT_CHUNKSIZE)
- // txbuf[pos] = wc->chans[x].writechunk[y];
- // else
- // wc->tempo[pos - (NUM_CARDS+NUM_FLAG) * ZT_CHUNKSIZE] = wc->chans[x].writechunk[y];
- //}
- //printk("\n");
- for (x=0;x<(NUM_CARDS+NUM_FLAG);x++) {
- pos = y * (NUM_CARDS+NUM_FLAG) + ((x + chan_offset + NUM_CARDS+NUM_FLAG /*+ wc->offset*/ - WC_OFFSET)&0x0f);
- if(x<NUM_CARDS)
- txbuf[pos] = wc->chans[x].writechunk[y];
- else
- txbuf[pos] = 0;
- //if(x==2)
- // txbuf[pos] = 0x55;//trans_count;
- //else
- // txbuf[pos] = 0;
- }
-
- /*for (x=0;x<(NUM_CARDS+NUM_FLAG);x++) {
- pos = y * (NUM_CARDS+NUM_FLAG) + x + chan_offset + wc->offset - WC_OFFSET;
- if ( pos<(NUM_CARDS+NUM_FLAG)*ZT_CHUNKSIZE )
- {
- if(x<NUM_CARDS)
- txbuf[pos] = wc->chans[x].writechunk[y];
- else
- txbuf[pos] = 0;
- }
- else
- {
- if(x<NUM_CARDS)
- wc->tempo[pos - (NUM_CARDS+NUM_FLAG) * ZT_CHUNKSIZE] = wc->chans[x].writechunk[y];
- else
- wc->tempo[pos - (NUM_CARDS+NUM_FLAG) * ZT_CHUNKSIZE] = 0;
- }
- }*/
-#endif
- }
-
-}
-
-#ifdef AUDIO_RINGCHECK
-static inline void ring_check(struct wctdm *wc, int card)
-{
- int x;
- short sample;
- if (wc->modtype[card] != MOD_TYPE_FXO)
- return;
- wc->mod[card].fxo.pegtimer += ZT_CHUNKSIZE;
- for (x=0;x<ZT_CHUNKSIZE;x++) {
- /* Look for pegging to indicate ringing */
- sample = ZT_XLAW(wc->chans[card].readchunk[x], (&(wc->chans[card])));
- if ((sample > 10000) && (wc->mod[card].fxo.peg != 1)) {
- if (debug > 1) printk("High peg!\n");
- if ((wc->mod[card].fxo.pegtimer < PEGTIME) && (wc->mod[card].fxo.pegtimer > MINPEGTIME))
- wc->mod[card].fxo.pegcount++;
- wc->mod[card].fxo.pegtimer = 0;
- wc->mod[card].fxo.peg = 1;
- } else if ((sample < -10000) && (wc->mod[card].fxo.peg != -1)) {
- if (debug > 1) printk("Low peg!\n");
- if ((wc->mod[card].fxo.pegtimer < (PEGTIME >> 2)) && (wc->mod[card].fxo.pegtimer > (MINPEGTIME >> 2)))
- wc->mod[card].fxo.pegcount++;
- wc->mod[card].fxo.pegtimer = 0;
- wc->mod[card].fxo.peg = -1;
- }
- }
- if (wc->mod[card].fxo.pegtimer > PEGTIME) {
- /* Reset pegcount if our timer expires */
- wc->mod[card].fxo.pegcount = 0;
- }
- /* Decrement debouncer if appropriate */
- if (wc->mod[card].fxo.ringdebounce)
- wc->mod[card].fxo.ringdebounce--;
- if (!wc->mod[card].fxo.offhook && !wc->mod[card].fxo.ringdebounce) {
- if (!wc->mod[card].fxo.ring && (wc->mod[card].fxo.pegcount > PEGCOUNT)) {
- /* It's ringing */
- if (debug)
- printk("RING on %d/%d!\n", wc->span.spanno, card + 1);
- if (!wc->mod[card].fxo.offhook)
- zt_hooksig(&wc->chans[card], ZT_RXSIG_RING);
- wc->mod[card].fxo.ring = 1;
- }
- if (wc->mod[card].fxo.ring && !wc->mod[card].fxo.pegcount) {
- /* No more ring */
- if (debug)
- printk("NO RING on %d/%d!\n", wc->span.spanno, card + 1);
- zt_hooksig(&wc->chans[card], ZT_RXSIG_OFFHOOK);
- wc->mod[card].fxo.ring = 0;
- }
- }
-}
-#endif
-
-
-static inline void wctdm_receiveprep(struct wctdm *wc, unsigned char ints)
-{
- volatile unsigned char *rxbuf;
- int x, y, chan_offset;
-
-
- if (ints & /*0x08*/0x04)
- /* Read is at interrupt address. Valid data is available at normal offset */
- rxbuf = wc->readchunk;
- else
- rxbuf = wc->readchunk + ZT_CHUNKSIZE * (NUM_CARDS+NUM_FLAG);
-
- //search for the flag channel
- for(x=0; x<4; x++)
- {
- //printk("0x%08x ", *(int*)(rxbuf+x*4));
- if( *(int*)(rxbuf+x*4) == WC_SYNCFLAG)
- {
- //printk(" found at %d ", x);
- break;
- }
- }
-
- if(x==4)
- {
- printk("buffer sync misseed!\n");
- wc->lastchan = -1;
- return;
- }
- else if(wc->lastchan != x)
- {
-
- printk("buffer re-sync occur from %d to %d\n", wc->lastchan, x);
- wc->lastchan = x;
- }
- chan_offset = (wc->lastchan*4 + 4 ) % (NUM_CARDS+NUM_FLAG);
-
- for (x=0;x<ZT_CHUNKSIZE;x++) {
-#ifdef __BIG_ENDIAN
- // operation pending...
-#else
- for (y=0;y<NUM_CARDS;y++) {
- if (wc->cardflag & (1 << y))
- wc->chans[y].readchunk[x] = rxbuf[(NUM_CARDS+NUM_FLAG) * x + ((y + chan_offset ) & 0x0f)];
-#ifdef TEST_LOG_INCOME_VOICE
- wc->voc_buf[y][wc->voc_ptr[y]] = rxbuf[(NUM_CARDS+NUM_FLAG) * x + ((y + chan_offset) & 0x0f)];
- wc->voc_ptr[y]++;
- if(wc->voc_ptr[y] >= voc_buffer_size)
- wc->voc_ptr[y] = 0;
-#endif
- }
-
-#endif
- }
-#ifdef AUDIO_RINGCHECK
- for (x=0;x<wc->cards;x++)
- ring_check(wc, x);
-#endif
- /* XXX We're wasting 8 taps. We should get closer :( */
- for (x = 0; x < NUM_CARDS; x++) {
- if (wc->cardflag & (1 << x))
- zt_ec_chunk(&wc->chans[x], wc->chans[x].readchunk, wc->chans[x].writechunk);
- }
- zt_receive(&wc->span);
-}
-
-static void wctdm_stop_dma(struct wctdm *wc);
-static void wctdm_reset_tdm(struct wctdm *wc);
-static void wctdm_restart_dma(struct wctdm *wc);
-
-
-static unsigned char __wctdm_getcreg(struct wctdm *wc, unsigned char reg);
-static void __wctdm_setcreg(struct wctdm *wc, unsigned char reg, unsigned char val);
-
-
-static inline void __write_8bits(struct wctdm *wc, unsigned char bits)
-{
- if(spibyhw == 0)
- {
- int x;
- /* Drop chip select */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- wc->ios &= ~BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- for (x=0;x<8;x++) {
- /* Send out each bit, MSB first, drop SCLK as we do so */
- if (bits & 0x80)
- wc->ios |= BIT_SDI;
- else
- wc->ios &= ~BIT_SDI;
- wc->ios &= ~BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Now raise SCLK high again and repeat */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- bits <<= 1;
- }
- /* Finally raise CS back high again */
- wc->ios |= BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- }
- else
- {
- __wctdm_setcreg(wc, WC_SPIDATA, bits);
- __wctdm_setcreg(wc, WC_SPICTRL, BIT_SPI_BYHW | BIT_SPI_START);
- while ((__wctdm_getcreg(wc, WC_SPICTRL) & BIT_SPI_BUSY) != 0);
- __wctdm_setcreg(wc, WC_SPICTRL, BIT_SPI_BYHW);
- }
-}
-
-
-static inline void __reset_spi(struct wctdm *wc)
-{
- __wctdm_setcreg(wc, WC_SPICTRL, 0);
-
- /* Drop chip select and clock once and raise and clock once */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- wc->ios &= ~BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- wc->ios |= BIT_SDI;
- wc->ios &= ~BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Now raise SCLK high again and repeat */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Finally raise CS back high again */
- wc->ios |= BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Clock again */
- wc->ios &= ~BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Now raise SCLK high again and repeat */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
-
- __wctdm_setcreg(wc, WC_SPICTRL, spibyhw);
-
-}
-
-static inline unsigned char __read_8bits(struct wctdm *wc)
-{
- unsigned char res=0, c;
- int x;
- if(spibyhw == 0)
- {
- wc->ios &= ~BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Drop chip select */
- wc->ios &= ~BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- for (x=0;x<8;x++) {
- res <<= 1;
- /* Get SCLK */
- wc->ios &= ~BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- /* Read back the value */
- c = inb(wc->ioaddr + WC_AUXR);
- if (c & BIT_SDO)
- res |= 1;
- /* Now raise SCLK high again */
- wc->ios |= BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- }
- /* Finally raise CS back high again */
- wc->ios |= BIT_CS;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- wc->ios &= ~BIT_SCLK;
- outb(wc->ios, wc->ioaddr + WC_AUXD);
- }
- else
- {
- __wctdm_setcreg(wc, WC_SPICTRL, BIT_SPI_BYHW | BIT_SPI_START);
- while ((__wctdm_getcreg(wc, WC_SPICTRL) & BIT_SPI_BUSY) != 0);
- res = __wctdm_getcreg(wc, WC_SPIDATA);
- __wctdm_setcreg(wc, WC_SPICTRL, BIT_SPI_BYHW);
- }
-
- /* And return our result */
- return res;
-}
-
-static void __wctdm_setcreg_mem(struct wctdm *wc, unsigned char reg, unsigned char val)
-{
- unsigned int *p = (unsigned int*)(wc->mem32 + WC_REGBASE + ((reg & 0xf) << 2));
- *p = val;
-}
-
-static unsigned char __wctdm_getcreg_mem(struct wctdm *wc, unsigned char reg)
-{
- unsigned int *p = (unsigned int*)(wc->mem32 + WC_REGBASE + ((reg & 0xf) << 2));
- return (*p)&0x00ff;
-}
-
-
-static void __wctdm_setcreg(struct wctdm *wc, unsigned char reg, unsigned char val)
-{
- if(usememio)
- __wctdm_setcreg_mem(wc, reg, val);
- else
- outb(val, wc->ioaddr + WC_REGBASE + ((reg & 0xf) << 2));
-}
-
-static unsigned char __wctdm_getcreg(struct wctdm *wc, unsigned char reg)
-{
- if(usememio)
- return __wctdm_getcreg_mem(wc, reg);
- else
- return inb(wc->ioaddr + WC_REGBASE + ((reg & 0xf) << 2));
-}
-
-static inline void __wctdm_setcard(struct wctdm *wc, int card)
-{
- if (wc->curcard != card) {
- __wctdm_setcreg(wc, WC_CS, card);
- wc->curcard = card;
- //printk("Select card %d\n", card);
- }
-}
-
-static void __wctdm_setreg(struct wctdm *wc, int card, unsigned char reg, unsigned char value)
-{
- __wctdm_setcard(wc, card);
- if (wc->modtype[card] == MOD_TYPE_FXO) {
- __write_8bits(wc, 0x20);
- __write_8bits(wc, reg & 0x7f);
- } else {
- __write_8bits(wc, reg & 0x7f);
- }
- __write_8bits(wc, value);
-}
-
-static void wctdm_setreg(struct wctdm *wc, int card, unsigned char reg, unsigned char value)
-{
- unsigned long flags;
- spin_lock_irqsave(&wc->lock, flags);
- __wctdm_setreg(wc, card, reg, value);
- spin_unlock_irqrestore(&wc->lock, flags);
-}
-
-static unsigned char __wctdm_getreg(struct wctdm *wc, int card, unsigned char reg)
-{
- __wctdm_setcard(wc, card);
- if (wc->modtype[card] == MOD_TYPE_FXO) {
- __write_8bits(wc, 0x60);
- __write_8bits(wc, reg & 0x7f);
- } else {
- __write_8bits(wc, reg | 0x80);
- }
- return __read_8bits(wc);
-}
-
-static inline void reset_spi(struct wctdm *wc, int card)
-{
- unsigned long flags;
- spin_lock_irqsave(&wc->lock, flags);
- __wctdm_setcard(wc, card);
- __reset_spi(wc);
- __reset_spi(wc);
- spin_unlock_irqrestore(&wc->lock, flags);
-}
-
-static unsigned char wctdm_getreg(struct wctdm *wc, int card, unsigned char reg)
-{
- unsigned long flags;
- unsigned char res;
- spin_lock_irqsave(&wc->lock, flags);
- res = __wctdm_getreg(wc, card, reg);
- spin_unlock_irqrestore(&wc->lock, flags);
- return res;
-}
-
-static int __wait_access(struct wctdm *wc, int card)
-{
- unsigned char data = 0;
- long origjiffies;
- int count = 0;
-
- #define MAX 6000 /* attempts */
-
-
- origjiffies = jiffies;
- /* Wait for indirect access */
- while (count++ < MAX)
- {
- data = __wctdm_getreg(wc, card, I_STATUS);
-
- if (!data)
- return 0;
-
- }
-
- if(count > (MAX-1)) printk(" ##### Loop error (%02x) #####\n", data);
-
- return 0;
-}
-
-static unsigned char translate_3215(unsigned char address)
-{
- int x;
- for (x=0;x<sizeof(indirect_regs)/sizeof(indirect_regs[0]);x++) {
- if (indirect_regs[x].address == address) {
- address = indirect_regs[x].altaddr;
- break;
- }
- }
- return address;
-}
-
-static int wctdm_proslic_setreg_indirect(struct wctdm *wc, int card, unsigned char address, unsigned short data)
-{
- unsigned long flags;
- int res = -1;
- /* Translate 3215 addresses */
- if (wc->flags[card] & FLAG_3215) {
- address = translate_3215(address);
- if (address == 255)
- return 0;
- }
- spin_lock_irqsave(&wc->lock, flags);
- if(!__wait_access(wc, card)) {
- __wctdm_setreg(wc, card, IDA_LO,(unsigned char)(data & 0xFF));
- __wctdm_setreg(wc, card, IDA_HI,(unsigned char)((data & 0xFF00)>>8));
- __wctdm_setreg(wc, card, IAA,address);
- res = 0;
- };
- spin_unlock_irqrestore(&wc->lock, flags);
- return res;
-}
-
-static int wctdm_proslic_getreg_indirect(struct wctdm *wc, int card, unsigned char address)
-{
- unsigned long flags;
- int res = -1;
- char *p=NULL;
- /* Translate 3215 addresses */
- if (wc->flags[card] & FLAG_3215) {
- address = translate_3215(address);
- if (address == 255)
- return 0;
- }
- spin_lock_irqsave(&wc->lock, flags);
- if (!__wait_access(wc, card)) {
- __wctdm_setreg(wc, card, IAA, address);
- if (!__wait_access(wc, card)) {
- unsigned char data1, data2;
- data1 = __wctdm_getreg(wc, card, IDA_LO);
- data2 = __wctdm_getreg(wc, card, IDA_HI);
- res = data1 | (data2 << 8);
- } else
- p = "Failed to wait inside\n";
- } else
- p = "failed to wait\n";
- spin_unlock_irqrestore(&wc->lock, flags);
- if (p)
- printk(p);
- return res;
-}
-
-static int wctdm_proslic_init_indirect_regs(struct wctdm *wc, int card)
-{
- unsigned char i;
-
- for (i=0; i<sizeof(indirect_regs) / sizeof(indirect_regs[0]); i++)
- {
- if(wctdm_proslic_setreg_indirect(wc, card, indirect_regs[i].address,indirect_regs[i].initial))
- return -1;
- }
-
- return 0;
-}
-
-static int wctdm_proslic_verify_indirect_regs(struct wctdm *wc, int card)
-{
- int passed = 1;
- unsigned short i, initial;
- int j;
-
- for (i=0; i<sizeof(indirect_regs) / sizeof(indirect_regs[0]); i++)
- {
- if((j = wctdm_proslic_getreg_indirect(wc, card, (unsigned char) indirect_regs[i].address)) < 0) {
- printk("Failed to read indirect register %d\n", i);
- return -1;
- }
- initial= indirect_regs[i].initial;
-
- if ( j != initial && (!(wc->flags[card] & FLAG_3215) || (indirect_regs[i].altaddr != 255)))
- {
- printk("!!!!!!! %s iREG %X = %X should be %X\n",
- indirect_regs[i].name,indirect_regs[i].address,j,initial );
- passed = 0;
- }
- }
-
- if (passed) {
- if (debug)
- printk("Init Indirect Registers completed successfully.\n");
- } else {
- printk(" !!!!! Init Indirect Registers UNSUCCESSFULLY.\n");
- return -1;
- }
- return 0;
-}
-
-static inline void wctdm_proslic_recheck_sanity(struct wctdm *wc, int card)
-{
- int res;
- /* Check loopback */
- res = wc->reg1shadow[card];
- if (!res && (res != wc->mod[card].fxs.lasttxhook)) {
- res = wctdm_getreg(wc, card, 8);
- if (res) {
- printk("Ouch, part reset, quickly restoring reality (%d)\n", card);
- wctdm_init_proslic(wc, card, 1, 0, 1);
- } else {
- if (wc->mod[card].fxs.palarms++ < MAX_ALARMS) {
- printk("Power alarm on module %d, resetting!\n", card + 1);
- if (wc->mod[card].fxs.lasttxhook == 4)
- wc->mod[card].fxs.lasttxhook = 1;
- wctdm_setreg(wc, card, 64, wc->mod[card].fxs.lasttxhook);
- } else {
- if (wc->mod[card].fxs.palarms == MAX_ALARMS)
- printk("Too many power alarms on card %d, NOT resetting!\n", card + 1);
- }
- }
- }
-}
-
-static inline void wctdm_voicedaa_check_hook(struct wctdm *wc, int card)
-{
-#ifndef AUDIO_RINGCHECK
- unsigned char res;
-#endif
- signed char b;
- int poopy = 0;
- /* Try to track issues that plague slot one FXO's */
- b = wc->reg0shadow[card];
- if ((b & 0x2) || !(b & 0x8)) {
- /* Not good -- don't look at anything else */
- if (debug)
- printk("Poopy (%02x) on card %d!\n", b, card + 1);
- poopy++;
- }
- b &= 0x9b;
- if (wc->mod[card].fxo.offhook) {
- if (b != 0x9)
- wctdm_setreg(wc, card, 5, 0x9);
- } else {
- if (b != 0x8)
- wctdm_setreg(wc, card, 5, 0x8);
- }
- if (poopy)
- return;
-#ifndef AUDIO_RINGCHECK
- if (!wc->mod[card].fxo.offhook) {
- res = wc->reg0shadow[card];
- if ((res & 0x60) && wc->mod[card].fxo.battery) {
- wc->mod[card].fxo.ringdebounce += (ZT_CHUNKSIZE * 16);
- if (wc->mod[card].fxo.ringdebounce >= ZT_CHUNKSIZE * 64) {
- if (!wc->mod[card].fxo.wasringing) {
- wc->mod[card].fxo.wasringing = 1;
- zt_hooksig(&wc->chans[card], ZT_RXSIG_RING);
- if (debug)
- printk("RING on %d/%d!\n", wc->span.spanno, card + 1);
- }
- wc->mod[card].fxo.ringdebounce = ZT_CHUNKSIZE * 64;
- }
- } else {
- wc->mod[card].fxo.ringdebounce -= ZT_CHUNKSIZE * 4;
- if (wc->mod[card].fxo.ringdebounce <= 0) {
- if (wc->mod[card].fxo.wasringing) {
- wc->mod[card].fxo.wasringing = 0;
- zt_hooksig(&wc->chans[card], ZT_RXSIG_OFFHOOK);
- if (debug)
- printk("NO RING on %d/%d!\n", wc->span.spanno, card + 1);
- }
- wc->mod[card].fxo.ringdebounce = 0;
- }
-
- }
- }
-#endif
- b = wc->reg1shadow[card];
-#if 0
- {
- static int count = 0;
- if (!(count++ % 100)) {
- printk("Card %d: Voltage: %d Debounce %d\n", card + 1,
- b, wc->mod[card].fxo.battdebounce);
- }
- }
-#endif
- if (abs(b) < battthresh) {
- wc->mod[card].fxo.nobatttimer++;
-#if 0
- if (wc->mod[card].fxo.battery)
- printk("Battery loss: %d (%d debounce)\n", b, wc->mod[card].fxo.battdebounce);
-#endif
- if (wc->mod[card].fxo.battery && !wc->mod[card].fxo.battdebounce) {
- if (debug)
- printk("NO BATTERY on %d/%d!\n", wc->span.spanno, card + 1);
- wc->mod[card].fxo.battery = 0;
-#ifdef JAPAN
- if ((!wc->ohdebounce) && wc->offhook) {
- zt_hooksig(&wc->chans[card], ZT_RXSIG_ONHOOK);
- if (debug)
- printk("Signalled On Hook\n");
-#ifdef ZERO_BATT_RING
- wc->onhook++;
-#endif
- }
-#else
- zt_hooksig(&wc->chans[card], ZT_RXSIG_ONHOOK);
-#endif
- wc->mod[card].fxo.battdebounce = battdebounce;
- } else if (!wc->mod[card].fxo.battery)
- wc->mod[card].fxo.battdebounce = battdebounce;
- } else if (abs(b) > battthresh) {
- if (!wc->mod[card].fxo.battery && !wc->mod[card].fxo.battdebounce) {
- if (debug)
- printk("BATTERY on %d/%d (%s)!\n", wc->span.spanno, card + 1,
- (b < 0) ? "-" : "+");
-#ifdef ZERO_BATT_RING
- if (wc->onhook) {
- wc->onhook = 0;
- zt_hooksig(&wc->chans[card], ZT_RXSIG_OFFHOOK);
- if (debug)
- printk("Signalled Off Hook\n");
- }
-#else
- zt_hooksig(&wc->chans[card], ZT_RXSIG_OFFHOOK);
-#endif
- wc->mod[card].fxo.battery = 1;
- wc->mod[card].fxo.nobatttimer = 0;
- wc->mod[card].fxo.battdebounce = battdebounce;
- } else if (wc->mod[card].fxo.battery)
- wc->mod[card].fxo.battdebounce = battdebounce;
-
- if (wc->mod[card].fxo.lastpol >= 0) {
- if (b < 0) {
- wc->mod[card].fxo.lastpol = -1;
- wc->mod[card].fxo.polaritydebounce = POLARITY_DEBOUNCE;
- }
- }
- if (wc->mod[card].fxo.lastpol <= 0) {
- if (b > 0) {
- wc->mod[card].fxo.lastpol = 1;
- wc->mod[card].fxo.polaritydebounce = POLARITY_DEBOUNCE;
- }
- }
- } else {
- /* It's something else... */
- wc->mod[card].fxo.battdebounce = battdebounce;
- }
- if (wc->mod[card].fxo.battdebounce)
- wc->mod[card].fxo.battdebounce--;
- if (wc->mod[card].fxo.polaritydebounce) {
- wc->mod[card].fxo.polaritydebounce--;
- if (wc->mod[card].fxo.polaritydebounce < 1) {
- if (wc->mod[card].fxo.lastpol != wc->mod[card].fxo.polarity) {
- if (debug)
- printk("%lu Polarity reversed (%d -> %d)\n", jiffies,
- wc->mod[card].fxo.polarity,
- wc->mod[card].fxo.lastpol);
- if (wc->mod[card].fxo.polarity)
- zt_qevent_lock(&wc->chans[card], ZT_EVENT_POLARITY);
- wc->mod[card].fxo.polarity = wc->mod[card].fxo.lastpol;
- }
- }
- }
-}
-
-static inline void wctdm_proslic_check_hook(struct wctdm *wc, int card)
-{
- char res;
- int hook;
-
- /* For some reason we have to debounce the
- hook detector. */
-
- res = wc->reg0shadow[card];
- hook = (res & 1);
- if (hook != wc->mod[card].fxs.lastrxhook) {
- /* Reset the debounce (must be multiple of 4ms) */
- wc->mod[card].fxs.debounce = 8 * (4 * 8);
-#if 0
- printk("Resetting debounce card %d hook %d, %d\n", card, hook, wc->mod[card].fxs.debounce);
-#endif
- } else {
- if (wc->mod[card].fxs.debounce > 0) {
- wc->mod[card].fxs.debounce-= 16 * ZT_CHUNKSIZE;
-#if 0
- printk("Sustaining hook %d, %d\n", hook, wc->mod[card].fxs.debounce);
-#endif
- if (!wc->mod[card].fxs.debounce) {
-#if 0
- printk("Counted down debounce, newhook: %d...\n", hook);
-#endif
- wc->mod[card].fxs.debouncehook = hook;
- }
- if (!wc->mod[card].fxs.oldrxhook && wc->mod[card].fxs.debouncehook) {
- /* Off hook */
-#if 1
- if (debug)
-#endif
- printk("opvxa1200: Card %d Going off hook\n", card);
- zt_hooksig(&wc->chans[card], ZT_RXSIG_OFFHOOK);
- if (robust)
- wctdm_init_proslic(wc, card, 1, 0, 1);
- wc->mod[card].fxs.oldrxhook = 1;
-
- } else if (wc->mod[card].fxs.oldrxhook && !wc->mod[card].fxs.debouncehook) {
- /* On hook */
-#if 1
- if (debug)
-#endif
- printk("opvxa1200: Card %d Going on hook\n", card);
- zt_hooksig(&wc->chans[card], ZT_RXSIG_ONHOOK);
- wc->mod[card].fxs.oldrxhook = 0;
- }
- }
- }
- wc->mod[card].fxs.lastrxhook = hook;
-}
-
-#ifdef LINUX26
-static irqreturn_t wctdm_interrupt(int irq, void *dev_id, struct pt_regs *regs)
-#else
-static void wctdm_interrupt(int irq, void *dev_id, struct pt_regs *regs)
-#endif
-{
- struct wctdm *wc = dev_id;
- unsigned char ints;
- int x, y, z;
- int mode;
-
- ints = inb(wc->ioaddr + WC_INTSTAT);
- outb(ints, wc->ioaddr + WC_INTSTAT);
-
- if (!ints)
-#ifdef LINUX26
- return IRQ_NONE;
-#else
- return;
-#endif
-
- if (ints & 0x10) {
- /* Stop DMA, wait for watchdog */
- printk("TDM PCI Master abort\n");
- wctdm_stop_dma(wc);
-#ifdef LINUX26
- return IRQ_RETVAL(1);
-#else
- return;
-#endif
- }
-
- if (ints & 0x20) {
- printk("PCI Target abort\n");
-#ifdef LINUX26
- return IRQ_RETVAL(1);
-#else
- return;
-#endif
- }
-
- for (x=0;x<4*3;x++) {
- if (wc->cardflag & (1 << x) &&
- (wc->modtype[x] == MOD_TYPE_FXS)) {
- if (wc->mod[x].fxs.lasttxhook == 0x4) {
- /* RINGing, prepare for OHT */
- wc->mod[x].fxs.ohttimer = OHT_TIMER << 3;
- if (reversepolarity)
- wc->mod[x].fxs.idletxhookstate = 0x6; /* OHT mode when idle */
- else
- wc->mod[x].fxs.idletxhookstate = 0x2;
- } else {
- if (wc->mod[x].fxs.ohttimer) {
- wc->mod[x].fxs.ohttimer-= ZT_CHUNKSIZE;
- if (!wc->mod[x].fxs.ohttimer) {
- if (reversepolarity)
- wc->mod[x].fxs.idletxhookstate = 0x5; /* Switch to active */
- else
- wc->mod[x].fxs.idletxhookstate = 0x1;
- if ((wc->mod[x].fxs.lasttxhook == 0x2) || (wc->mod[x].fxs.lasttxhook = 0x6)) {
- /* Apply the change if appropriate */
- if (reversepolarity)
- wc->mod[x].fxs.lasttxhook = 0x5;
- else
- wc->mod[x].fxs.lasttxhook = 0x1;
- wctdm_setreg(wc, x, 64, wc->mod[x].fxs.lasttxhook);
- }
- }
- }
- }
- }
- }
-
- if (ints & 0x0f) {
- wc->intcount++;
- z = wc->intcount & 0x3;
- mode = wc->intcount & 0xc;
- for(y=0; y<3; y++)
- {
- x = z + y*4;
- if (wc->cardflag & (1 << x ) )
- {
- switch(mode)
- {
- case 0:
- /* Rest */
- break;
- case 4:
- /* Read first shadow reg */
- if (wc->modtype[x] == MOD_TYPE_FXS)
- wc->reg0shadow[x] = wctdm_getreg(wc, x, 68);
- else if (wc->modtype[x] == MOD_TYPE_FXO)
- wc->reg0shadow[x] = wctdm_getreg(wc, x, 5);
- break;
- case 8:
- /* Read second shadow reg */
- if (wc->modtype[x] == MOD_TYPE_FXS)
- wc->reg1shadow[x] = wctdm_getreg(wc, x, 64);
- else if (wc->modtype[x] == MOD_TYPE_FXO)
- wc->reg1shadow[x] = wctdm_getreg(wc, x, 29);
- break;
- case 12:
- /* Perform processing */
- if (wc->modtype[x] == MOD_TYPE_FXS) {
- wctdm_proslic_check_hook(wc, x);
- if (!(wc->intcount & 0xf0))
- wctdm_proslic_recheck_sanity(wc, x);
- } else if (wc->modtype[x] == MOD_TYPE_FXO) {
- wctdm_voicedaa_check_hook(wc, x);
- }
- break;
- }
- }
- }
- if (!(wc->intcount % 10000)) {
- /* Accept an alarm once per 10 seconds */
- for (x=0;x<4*3;x++)
- if (wc->modtype[x] == MOD_TYPE_FXS) {
- if (wc->mod[x].fxs.palarms)
- wc->mod[x].fxs.palarms--;
- }
- }
- wctdm_receiveprep(wc, ints);
- wctdm_transmitprep(wc, ints);
- }
-#ifdef LINUX26
- return IRQ_RETVAL(1);
-#endif
-
-}
-
-static int wctdm_voicedaa_insane(struct wctdm *wc, int card)
-{
- int blah;
- blah = wctdm_getreg(wc, card, 2);
- if (blah != 0x3)
- return -2;
- blah = wctdm_getreg(wc, card, 11);
- if (debug)
- printk("VoiceDAA System: %02x\n", blah & 0xf);
- return 0;
-}
-
-static int wctdm_proslic_insane(struct wctdm *wc, int card)
-{
- int blah,insane_report;
- insane_report=0;
-
- blah = wctdm_getreg(wc, card, 0);
- if (debug)
- printk("ProSLIC on module %d, product %d, version %d\n", card, (blah & 0x30) >> 4, (blah & 0xf));
-
-#if 0
- if ((blah & 0x30) >> 4) {
- printk("ProSLIC on module %d is not a 3210.\n", card);
- return -1;
- }
-#endif
- if (((blah & 0xf) == 0) || ((blah & 0xf) == 0xf)) {
- /* SLIC not loaded */
- return -1;
- }
- if ((blah & 0xf) < 2) {
- printk("ProSLIC 3210 version %d is too old\n", blah & 0xf);
- return -1;
- }
- if ((blah & 0xf) == 2) {
- /* ProSLIC 3215, not a 3210 */
- wc->flags[card] |= FLAG_3215;
- }
- blah = wctdm_getreg(wc, card, 8);
- if (blah != 0x2) {
- printk("ProSLIC on module %d insane (1) %d should be 2\n", card, blah);
- return -1;
- } else if ( insane_report)
- printk("ProSLIC on module %d Reg 8 Reads %d Expected is 0x2\n",card,blah);
-
- blah = wctdm_getreg(wc, card, 64);
- if (blah != 0x0) {
- printk("ProSLIC on module %d insane (2)\n", card);
- return -1;
- } else if ( insane_report)
- printk("ProSLIC on module %d Reg 64 Reads %d Expected is 0x0\n",card,blah);
-
- blah = wctdm_getreg(wc, card, 11);
- if (blah != 0x33) {
- printk("ProSLIC on module %d insane (3)\n", card);
- return -1;
- } else if ( insane_report)
- printk("ProSLIC on module %d Reg 11 Reads %d Expected is 0x33\n",card,blah);
-
- /* Just be sure it's setup right. */
- wctdm_setreg(wc, card, 30, 0);
-
- if (debug)
- printk("ProSLIC on module %d seems sane.\n", card);
- return 0;
-}
-
-static int wctdm_proslic_powerleak_test(struct wctdm *wc, int card)
-{
- unsigned long origjiffies;
- unsigned char vbat;
-
- /* Turn off linefeed */
- wctdm_setreg(wc, card, 64, 0);
-
- /* Power down */
- wctdm_setreg(wc, card, 14, 0x10);
-
- /* Wait for one second */
- origjiffies = jiffies;
-
- while((vbat = wctdm_getreg(wc, card, 82)) > 0x6) {
- if ((jiffies - origjiffies) >= (HZ/2))
- break;;
- }
-
- if (vbat < 0x06) {
- printk("Excessive leakage detected on module %d: %d volts (%02x) after %d ms\n", card,
- 376 * vbat / 1000, vbat, (int)((jiffies - origjiffies) * 1000 / HZ));
- return -1;
- } else if (debug) {
- printk("Post-leakage voltage: %d volts\n", 376 * vbat / 1000);
- }
- return 0;
-}
-
-static int wctdm_powerup_proslic(struct wctdm *wc, int card, int fast)
-{
- unsigned char vbat;
- unsigned long origjiffies;
- int lim;
-
- /* Set period of DC-DC converter to 1/64 khz */
- wctdm_setreg(wc, card, 92, 0xff /* was 0xff */);
-
- /* Wait for VBat to powerup */
- origjiffies = jiffies;
-
- /* Disable powerdown */
- wctdm_setreg(wc, card, 14, 0);
-
- /* If fast, don't bother checking anymore */
- if (fast)
- return 0;
-
- while((vbat = wctdm_getreg(wc, card, 82)) < 0xc0) {
- /* Wait no more than 500ms */
- if ((jiffies - origjiffies) > HZ/2) {
- break;
- }
- }
-
- if (vbat < 0xc0) {
- if (wc->proslic_power == PROSLIC_POWER_UNKNOWN)
- printk("ProSLIC on module %d failed to powerup within %d ms (%d mV only)\n\n -- DID YOU REMEMBER TO PLUG IN THE HD POWER CABLE TO THE A1200P??\n",
- card, (int)(((jiffies - origjiffies) * 1000 / HZ)),
- vbat * 375);
- wc->proslic_power = PROSLIC_POWER_WARNED;
- return -1;
- } else if (debug) {
- printk("ProSLIC on module %d powered up to -%d volts (%02x) in %d ms\n",
- card, vbat * 376 / 1000, vbat, (int)(((jiffies - origjiffies) * 1000 / HZ)));
- }
- wc->proslic_power = PROSLIC_POWER_ON;
-
- /* Proslic max allowed loop current, reg 71 LOOP_I_LIMIT */
- /* If out of range, just set it to the default value */
- lim = (loopcurrent - 20) / 3;
- if ( loopcurrent > 41 ) {
- lim = 0;
- if (debug)
- printk("Loop current out of range! Setting to default 20mA!\n");
- }
- else if (debug)
- printk("Loop current set to %dmA!\n",(lim*3)+20);
- wctdm_setreg(wc,card,LOOP_I_LIMIT,lim);
-
- /* Engage DC-DC converter */
- wctdm_setreg(wc, card, 93, 0x19 /* was 0x19 */);
-#if 0
- origjiffies = jiffies;
- while(0x80 & wctdm_getreg(wc, card, 93)) {
- if ((jiffies - origjiffies) > 2 * HZ) {
- printk("Timeout waiting for DC-DC calibration on module %d\n", card);
- return -1;
- }
- }
-
-#if 0
- /* Wait a full two seconds */
- while((jiffies - origjiffies) < 2 * HZ);
-
- /* Just check to be sure */
- vbat = wctdm_getreg(wc, card, 82);
- printk("ProSLIC on module %d powered up to -%d volts (%02x) in %d ms\n",
- card, vbat * 376 / 1000, vbat, (int)(((jiffies - origjiffies) * 1000 / HZ)));
-#endif
-#endif
- return 0;
-
-}
-
-static int wctdm_proslic_manual_calibrate(struct wctdm *wc, int card){
- unsigned long origjiffies;
- unsigned char i;
-
- wctdm_setreg(wc, card, 21, 0);//(0) Disable all interupts in DR21
- wctdm_setreg(wc, card, 22, 0);//(0)Disable all interupts in DR21
- wctdm_setreg(wc, card, 23, 0);//(0)Disable all interupts in DR21
- wctdm_setreg(wc, card, 64, 0);//(0)
-
- wctdm_setreg(wc, card, 97, 0x18); //(0x18)Calibrations without the ADC and DAC offset and without common mode calibration.
- wctdm_setreg(wc, card, 96, 0x47); //(0x47) Calibrate common mode and differential DAC mode DAC + ILIM
-
- origjiffies=jiffies;
- while( wctdm_getreg(wc,card,96)!=0 ){
- if((jiffies-origjiffies)>80)
- return -1;
- }
-//Initialized DR 98 and 99 to get consistant results.
-// 98 and 99 are the results registers and the search should have same intial conditions.
-
-/*******************************The following is the manual gain mismatch calibration****************************/
-/*******************************This is also available as a function *******************************************/
- // Delay 10ms
- origjiffies=jiffies;
- while((jiffies-origjiffies)<1);
- wctdm_proslic_setreg_indirect(wc, card, 88,0);
- wctdm_proslic_setreg_indirect(wc,card,89,0);
- wctdm_proslic_setreg_indirect(wc,card,90,0);
- wctdm_proslic_setreg_indirect(wc,card,91,0);
- wctdm_proslic_setreg_indirect(wc,card,92,0);
- wctdm_proslic_setreg_indirect(wc,card,93,0);
-
- wctdm_setreg(wc, card, 98,0x10); // This is necessary if the calibration occurs other than at reset time
- wctdm_setreg(wc, card, 99,0x10);
-
- for ( i=0x1f; i>0; i--)
- {
- wctdm_setreg(wc, card, 98,i);
- origjiffies=jiffies;
- while((jiffies-origjiffies)<4);
- if((wctdm_getreg(wc,card,88)) == 0)
- break;
- } // for
-
- for ( i=0x1f; i>0; i--)
- {
- wctdm_setreg(wc, card, 99,i);
- origjiffies=jiffies;
- while((jiffies-origjiffies)<4);
- if((wctdm_getreg(wc,card,89)) == 0)
- break;
- }//for
-
-/*******************************The preceding is the manual gain mismatch calibration****************************/
-/**********************************The following is the longitudinal Balance Cal***********************************/
- wctdm_setreg(wc,card,64,1);
- while((jiffies-origjiffies)<10); // Sleep 100?
-
- wctdm_setreg(wc, card, 64, 0);
- wctdm_setreg(wc, card, 23, 0x4); // enable interrupt for the balance Cal
- wctdm_setreg(wc, card, 97, 0x1); // this is a singular calibration bit for longitudinal calibration
- wctdm_setreg(wc, card, 96,0x40);
-
- wctdm_getreg(wc,card,96); /* Read Reg 96 just cause */
-
- wctdm_setreg(wc, card, 21, 0xFF);
- wctdm_setreg(wc, card, 22, 0xFF);
- wctdm_setreg(wc, card, 23, 0xFF);
-
- /**The preceding is the longitudinal Balance Cal***/
- return(0);
-
-}
-#if 1
-static int wctdm_proslic_calibrate(struct wctdm *wc, int card)
-{
- unsigned long origjiffies;
- int x;
- /* Perform all calibrations */
- wctdm_setreg(wc, card, 97, 0x1f);
-
- /* Begin, no speedup */
- wctdm_setreg(wc, card, 96, 0x5f);
-
- /* Wait for it to finish */
- origjiffies = jiffies;
- while(wctdm_getreg(wc, card, 96)) {
- if ((jiffies - origjiffies) > 2 * HZ) {
- printk("Timeout waiting for calibration of module %d\n", card);
- return -1;
- }
- }
-
- if (debug) {
- /* Print calibration parameters */
- printk("Calibration Vector Regs 98 - 107: \n");
- for (x=98;x<108;x++) {
- printk("%d: %02x\n", x, wctdm_getreg(wc, card, x));
- }
- }
- return 0;
-}
-#endif
-
-static void wait_just_a_bit(int foo)
-{
- long newjiffies;
- newjiffies = jiffies + foo;
- while(jiffies < newjiffies);
-}
-
-static int wctdm_init_voicedaa(struct wctdm *wc, int card, int fast, int manual, int sane)
-{
- unsigned char reg16=0, reg26=0, reg30=0, reg31=0;
- long newjiffies;
- wc->modtype[card] = MOD_TYPE_FXO;
-
- /* Sanity check the ProSLIC */
- reset_spi(wc, card);
- if (!sane && wctdm_voicedaa_insane(wc, card))
- return -2;
-
- /* Software reset */
- wctdm_setreg(wc, card, 1, 0x80);
-
- /* Wait just a bit */
- wait_just_a_bit(HZ/10);
-
- /* Enable PCM, ulaw */
- if (alawoverride)
- wctdm_setreg(wc, card, 33, 0x20);
- else
- wctdm_setreg(wc, card, 33, 0x28);
-
- /* Set On-hook speed, Ringer impedence, and ringer threshold */
- reg16 |= (fxo_modes[_opermode].ohs << 6);
- reg16 |= (fxo_modes[_opermode].rz << 1);
- reg16 |= (fxo_modes[_opermode].rt);
- wctdm_setreg(wc, card, 16, reg16);
-
- /* Set DC Termination:
- Tip/Ring voltage adjust, minimum operational current, current limitation */
- reg26 |= (fxo_modes[_opermode].dcv << 6);
- reg26 |= (fxo_modes[_opermode].mini << 4);
- reg26 |= (fxo_modes[_opermode].ilim << 1);
- wctdm_setreg(wc, card, 26, reg26);
-
- /* Set AC Impedence */
- reg30 = (fxo_modes[_opermode].acim);
- wctdm_setreg(wc, card, 30, reg30);
-
- /* Misc. DAA parameters */
- reg31 = 0xa3;
- reg31 |= (fxo_modes[_opermode].ohs2 << 3);
- wctdm_setreg(wc, card, 31, reg31);
-
- /* Set Transmit/Receive timeslot */
- //printk("set card %d to %d\n", card, (3-(card%4)) * 8 + (card/4) * 64);
- wctdm_setreg(wc, card, 34, (3-(card%4)) * 8 + (card/4) * 64);
- wctdm_setreg(wc, card, 35, 0x00);
- wctdm_setreg(wc, card, 36, (3-(card%4)) * 8 + (card/4) * 64);
- wctdm_setreg(wc, card, 37, 0x00);
-
- /* Enable ISO-Cap */
- wctdm_setreg(wc, card, 6, 0x00);
-
- /* Wait 1000ms for ISO-cap to come up */
- newjiffies = jiffies;
- newjiffies += 2 * HZ;
- while((jiffies < newjiffies) && !(wctdm_getreg(wc, card, 11) & 0xf0))
- wait_just_a_bit(HZ/10);
-
- if (!(wctdm_getreg(wc, card, 11) & 0xf0)) {
- printk("VoiceDAA did not bring up ISO link properly!\n");
- return -1;
- }
- if (debug)
- printk("ISO-Cap is now up, line side: %02x rev %02x\n",
- wctdm_getreg(wc, card, 11) >> 4,
- (wctdm_getreg(wc, card, 13) >> 2) & 0xf);
- /* Enable on-hook line monitor */
- wctdm_setreg(wc, card, 5, 0x08);
-
- /* NZ -- crank the tx gain up by 7 dB */
- if (!strcmp(fxo_modes[_opermode].name, "NEWZEALAND")) {
- printk("Adjusting gain\n");
- wctdm_setreg(wc, card, 38, 0x7);
- }
-
- return 0;
-
-}
-
-static int wctdm_init_proslic(struct wctdm *wc, int card, int fast, int manual, int sane)
-{
-
- unsigned short tmp[5];
- unsigned char r19;
- int x;
- int fxsmode=0;
-
-
- /* By default, don't send on hook */
- if (reversepolarity)
- wc->mod[card].fxs.idletxhookstate = 5;
- else
- wc->mod[card].fxs.idletxhookstate = 1;
-
- /* Sanity check the ProSLIC */
- if (!sane && wctdm_proslic_insane(wc, card))
- return -2;
-
- if (sane) {
- /* Make sure we turn off the DC->DC converter to prevent anything from blowing up */
- wctdm_setreg(wc, card, 14, 0x10);
- }
-
- if (wctdm_proslic_init_indirect_regs(wc, card)) {
- printk(KERN_INFO "Indirect Registers failed to initialize on module %d.\n", card);
- return -1;
- }
-
- /* Clear scratch pad area */
- wctdm_proslic_setreg_indirect(wc, card, 97,0);
-
- /* Clear digital loopback */
- wctdm_setreg(wc, card, 8, 0);
-
- /* Revision C optimization */
- wctdm_setreg(wc, card, 108, 0xeb);
-
- /* Disable automatic VBat switching for safety to prevent
- Q7 from accidently turning on and burning out. */
- wctdm_setreg(wc, card, 67, 0x17);
-
- /* Turn off Q7 */
- wctdm_setreg(wc, card, 66, 1);
-
- /* Flush ProSLIC digital filters by setting to clear, while
- saving old values */
- for (x=0;x<5;x++) {
- tmp[x] = wctdm_proslic_getreg_indirect(wc, card, x + 35);
- wctdm_proslic_setreg_indirect(wc, card, x + 35, 0x8000);
- }
-
- /* Power up the DC-DC converter */
- if (wctdm_powerup_proslic(wc, card, fast)) {
- printk("Unable to do INITIAL ProSLIC powerup on module %d\n", card);
- return -1;
- }
-
- if (!fast) {
-
- /* Check for power leaks */
- if (wctdm_proslic_powerleak_test(wc, card)) {
- printk("ProSLIC module %d failed leakage test. Check for short circuit\n", card);
- }
- /* Power up again */
- if (wctdm_powerup_proslic(wc, card, fast)) {
- printk("Unable to do FINAL ProSLIC powerup on module %d\n", card);
- return -1;
- }
-#ifndef NO_CALIBRATION
- /* Perform calibration */
- if(manual) {
- if (wctdm_proslic_manual_calibrate(wc, card)) {
- //printk("Proslic failed on Manual Calibration\n");
- if (wctdm_proslic_manual_calibrate(wc, card)) {
- printk("Proslic Failed on Second Attempt to Calibrate Manually. (Try -DNO_CALIBRATION in Makefile)\n");
- return -1;
- }
- printk("Proslic Passed Manual Calibration on Second Attempt\n");
- }
- }
- else {
- if(wctdm_proslic_calibrate(wc, card)) {
- //printk("ProSlic died on Auto Calibration.\n");
- if (wctdm_proslic_calibrate(wc, card)) {
- printk("Proslic Failed on Second Attempt to Auto Calibrate\n");
- return -1;
- }
- printk("Proslic Passed Auto Calibration on Second Attempt\n");
- }
- }
- /* Perform DC-DC calibration */
- wctdm_setreg(wc, card, 93, 0x99);
- r19 = wctdm_getreg(wc, card, 107);
- if ((r19 < 0x2) || (r19 > 0xd)) {
- printk("DC-DC cal has a surprising direct 107 of 0x%02x!\n", r19);
- wctdm_setreg(wc, card, 107, 0x8);
- }
-
- /* Save calibration vectors */
- for (x=0;x<NUM_CAL_REGS;x++)
- wc->mod[card].fxs.calregs.vals[x] = wctdm_getreg(wc, card, 96 + x);
-#endif
-
- } else {
- /* Restore calibration registers */
- for (x=0;x<NUM_CAL_REGS;x++)
- wctdm_setreg(wc, card, 96 + x, wc->mod[card].fxs.calregs.vals[x]);
- }
- /* Calibration complete, restore original values */
- for (x=0;x<5;x++) {
- wctdm_proslic_setreg_indirect(wc, card, x + 35, tmp[x]);
- }
-
- if (wctdm_proslic_verify_indirect_regs(wc, card)) {
- printk(KERN_INFO "Indirect Registers failed verification.\n");
- return -1;
- }
-
-
-#if 0
- /* Disable Auto Power Alarm Detect and other "features" */
- wctdm_setreg(wc, card, 67, 0x0e);
- blah = wctdm_getreg(wc, card, 67);
-#endif
-
-#if 0
- if (wctdm_proslic_setreg_indirect(wc, card, 97, 0x0)) { // Stanley: for the bad recording fix
- printk(KERN_INFO "ProSlic IndirectReg Died.\n");
- return -1;
- }
-#endif
-
- if (alawoverride)
- wctdm_setreg(wc, card, 1, 0x20);
- else
- wctdm_setreg(wc, card, 1, 0x28);
- // U-Law 8-bit interface
-
- //printk("set card %d to %d\n", card, (3-(card%4)) * 8 + (card/4) * 64);
- wctdm_setreg(wc, card, 2, (3-(card%4)) * 8 + (card/4) * 64); // Tx Start count low byte 0
- wctdm_setreg(wc, card, 3, 0); // Tx Start count high byte 0
- wctdm_setreg(wc, card, 4, (3-(card%4)) * 8 + (card/4) * 64); // Rx Start count low byte 0
- wctdm_setreg(wc, card, 5, 0); // Rx Start count high byte 0
- wctdm_setreg(wc, card, 18, 0xff); // clear all interrupt
- wctdm_setreg(wc, card, 19, 0xff);
- wctdm_setreg(wc, card, 20, 0xff);
- wctdm_setreg(wc, card, 73, 0x04);
- if (fxshonormode) {
- fxsmode = acim2tiss[fxo_modes[_opermode].acim];
- wctdm_setreg(wc, card, 10, 0x08 | fxsmode);
- if (fxo_modes[_opermode].ring_osc)
- wctdm_proslic_setreg_indirect(wc, card, 20, fxo_modes[_opermode].ring_osc);
- if (fxo_modes[_opermode].ring_x)
- wctdm_proslic_setreg_indirect(wc, card, 21, fxo_modes[_opermode].ring_x);
- }
- if (lowpower)
- wctdm_setreg(wc, card, 72, 0x10);
-
-#if 0
- wctdm_setreg(wc, card, 21, 0x00); // enable interrupt
- wctdm_setreg(wc, card, 22, 0x02); // Loop detection interrupt
- wctdm_setreg(wc, card, 23, 0x01); // DTMF detection interrupt
-#endif
-
-#if 0
- /* Enable loopback */
- wctdm_setreg(wc, card, 8, 0x2);
- wctdm_setreg(wc, card, 14, 0x0);
- wctdm_setreg(wc, card, 64, 0x0);
- wctdm_setreg(wc, card, 1, 0x08);
-#endif
-
- /* Beef up Ringing voltage to 89V */
- if (boostringer) {
- if (wctdm_proslic_setreg_indirect(wc, card, 21, 0x1d1))
- return -1;
- printk("Boosting ringinger on slot %d (89V peak)\n", card + 1);
- } else if (lowpower) {
- if (wctdm_proslic_setreg_indirect(wc, card, 21, 0x108))
- return -1;
- printk("Reducing ring power on slot %d (50V peak)\n", card + 1);
- }
- wctdm_setreg(wc, card, 64, 0x01);
- return 0;
-}
-
-
-static int wctdm_ioctl(struct zt_chan *chan, unsigned int cmd, unsigned long data)
-{
- struct wctdm_stats stats;
- struct wctdm_regs regs;
- struct wctdm_regop regop;
- struct wctdm_echo_coefs echoregs;
- struct wctdm *wc = chan->pvt;
- int x;
- switch (cmd) {
- case ZT_ONHOOKTRANSFER:
- if (wc->modtype[chan->chanpos - 1] != MOD_TYPE_FXS)
- return -EINVAL;
- if (get_user(x, (int *)data))
- return -EFAULT;
- wc->mod[chan->chanpos - 1].fxs.ohttimer = x << 3;
- if (reversepolarity)
- wc->mod[chan->chanpos - 1].fxs.idletxhookstate = 0x6; /* OHT mode when idle */
- else
- wc->mod[chan->chanpos - 1].fxs.idletxhookstate = 0x2;
- if (wc->mod[chan->chanpos - 1].fxs.lasttxhook == 0x1) {
- /* Apply the change if appropriate */
- if (reversepolarity)
- wc->mod[chan->chanpos - 1].fxs.lasttxhook = 0x6;
- else
- wc->mod[chan->chanpos - 1].fxs.lasttxhook = 0x2;
- wctdm_setreg(wc, chan->chanpos - 1, 64, wc->mod[chan->chanpos - 1].fxs.lasttxhook);
- }
- break;
- case ZT_SETPOLARITY:
- if (get_user(x, (int *)data))
- return -EFAULT;
- if (wc->modtype[chan->chanpos - 1] != MOD_TYPE_FXS)
- return -EINVAL;
- /* Can't change polarity while ringing or when open */
- if ((wc->mod[chan->chanpos -1 ].fxs.lasttxhook == 0x04) ||
- (wc->mod[chan->chanpos -1 ].fxs.lasttxhook == 0x00))
- return -EINVAL;
-
- if ((x && !reversepolarity) || (!x && reversepolarity))
- wc->mod[chan->chanpos - 1].fxs.lasttxhook |= 0x04;
- else
- wc->mod[chan->chanpos - 1].fxs.lasttxhook &= ~0x04;
- wctdm_setreg(wc, chan->chanpos - 1, 64, wc->mod[chan->chanpos - 1].fxs.lasttxhook);
- break;
- case WCTDM_GET_STATS:
- if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXS) {
- stats.tipvolt = wctdm_getreg(wc, chan->chanpos - 1, 80) * -376;
- stats.ringvolt = wctdm_getreg(wc, chan->chanpos - 1, 81) * -376;
- stats.batvolt = wctdm_getreg(wc, chan->chanpos - 1, 82) * -376;
- } else if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXO) {
- stats.tipvolt = (signed char)wctdm_getreg(wc, chan->chanpos - 1, 29) * 1000;
- stats.ringvolt = (signed char)wctdm_getreg(wc, chan->chanpos - 1, 29) * 1000;
- stats.batvolt = (signed char)wctdm_getreg(wc, chan->chanpos - 1, 29) * 1000;
- } else
- return -EINVAL;
- if (copy_to_user((struct wctdm_stats *)data, &stats, sizeof(stats)))
- return -EFAULT;
- break;
- case WCTDM_GET_REGS:
- if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXS) {
- for (x=0;x<NUM_INDIRECT_REGS;x++)
- regs.indirect[x] = wctdm_proslic_getreg_indirect(wc, chan->chanpos -1, x);
- for (x=0;x<NUM_REGS;x++)
- regs.direct[x] = wctdm_getreg(wc, chan->chanpos - 1, x);
- } else {
- memset(®s, 0, sizeof(regs));
- for (x=0;x<NUM_FXO_REGS;x++)
- regs.direct[x] = wctdm_getreg(wc, chan->chanpos - 1, x);
- }
- if (copy_to_user((struct wctdm_regs *)data, ®s, sizeof(regs)))
- return -EFAULT;
- break;
- case WCTDM_SET_REG:
- if (copy_from_user(®op, (struct wctdm_regop *)data, sizeof(regop)))
- return -EFAULT;
- if (regop.indirect) {
- if (wc->modtype[chan->chanpos - 1] != MOD_TYPE_FXS)
- return -EINVAL;
- printk("Setting indirect %d to 0x%04x on %d\n", regop.reg, regop.val, chan->chanpos);
- wctdm_proslic_setreg_indirect(wc, chan->chanpos - 1, regop.reg, regop.val);
- } else {
- regop.val &= 0xff;
- printk("Setting direct %d to %04x on %d\n", regop.reg, regop.val, chan->chanpos);
- wctdm_setreg(wc, chan->chanpos - 1, regop.reg, regop.val);
- }
- break;
- case WCTDM_SET_ECHOTUNE:
- printk("-- Setting echo registers: \n");
- if (copy_from_user(&echoregs, (struct wctdm_echo_coefs*)data, sizeof(echoregs)))
- return -EFAULT;
-
- if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXO) {
- /* Set the ACIM register */
- wctdm_setreg(wc, chan->chanpos - 1, 30, echoregs.acim);
-
- /* Set the digital echo canceller registers */
- wctdm_setreg(wc, chan->chanpos - 1, 45, echoregs.coef1);
- wctdm_setreg(wc, chan->chanpos - 1, 46, echoregs.coef2);
- wctdm_setreg(wc, chan->chanpos - 1, 47, echoregs.coef3);
- wctdm_setreg(wc, chan->chanpos - 1, 48, echoregs.coef4);
- wctdm_setreg(wc, chan->chanpos - 1, 49, echoregs.coef5);
- wctdm_setreg(wc, chan->chanpos - 1, 50, echoregs.coef6);
- wctdm_setreg(wc, chan->chanpos - 1, 51, echoregs.coef7);
- wctdm_setreg(wc, chan->chanpos - 1, 52, echoregs.coef8);
-
- printk("-- Set echo registers successfully\n");
-
- break;
- } else {
- return -EINVAL;
-
- }
- break;
- default:
- return -ENOTTY;
- }
- return 0;
-
-}
-
-static int wctdm_open(struct zt_chan *chan)
-{
- struct wctdm *wc = chan->pvt;
- if (!(wc->cardflag & (1 << (chan->chanpos - 1))))
- return -ENODEV;
- if (wc->dead)
- return -ENODEV;
- wc->usecount++;
-#ifndef LINUX26
- MOD_INC_USE_COUNT;
-#else
- try_module_get(THIS_MODULE);
-#endif
- return 0;
-}
-
-static int wctdm_watchdog(struct zt_span *span, int event)
-{
- printk("opvxa1200: Restarting DMA\n");
- wctdm_restart_dma(span->pvt);
- return 0;
-}
-
-static int wctdm_close(struct zt_chan *chan)
-{
- struct wctdm *wc = chan->pvt;
- wc->usecount--;
-#ifndef LINUX26
- MOD_DEC_USE_COUNT;
-#else
- module_put(THIS_MODULE);
-#endif
- if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXS) {
- if (reversepolarity)
- wc->mod[chan->chanpos - 1].fxs.idletxhookstate = 5;
- else
- wc->mod[chan->chanpos - 1].fxs.idletxhookstate = 1;
- }
- /* If we're dead, release us now */
- if (!wc->usecount && wc->dead)
- wctdm_release(wc);
- return 0;
-}
-
-static int wctdm_hooksig(struct zt_chan *chan, zt_txsig_t txsig)
-{
- struct wctdm *wc = chan->pvt;
- int reg=0;
- if (wc->modtype[chan->chanpos - 1] == MOD_TYPE_FXO) {
- /* XXX Enable hooksig for FXO XXX */
- switch(txsig) {
- case ZT_TXSIG_START:
- case ZT_TXSIG_OFFHOOK:
- wc->mod[chan->chanpos - 1].fxo.offhook = 1;
- wctdm_setreg(wc, chan->chanpos - 1, 5, 0x9);
- break;
- case ZT_TXSIG_ONHOOK:
- wc->mod[chan->chanpos - 1].fxo.offhook = 0;
- wctdm_setreg(wc, chan->chanpos - 1, 5, 0x8);
- break;
- default:
- printk("wcfxo: Can't set tx state to %d\n", txsig);
- }
- } else {
- switch(txsig) {
- case ZT_TXSIG_ONHOOK:
- switch(chan->sig) {
- case ZT_SIG_EM:
- case ZT_SIG_FXOKS:
- case ZT_SIG_FXOLS:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = wc->mod[chan->chanpos-1].fxs.idletxhookstate;
- break;
- case ZT_SIG_FXOGS:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = 3;
- break;
- }
- break;
- case ZT_TXSIG_OFFHOOK:
- switch(chan->sig) {
- case ZT_SIG_EM:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = 5;
- break;
- default:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = wc->mod[chan->chanpos-1].fxs.idletxhookstate;
- break;
- }
- break;
- case ZT_TXSIG_START:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = 4;
- break;
- case ZT_TXSIG_KEWL:
- wc->mod[chan->chanpos-1].fxs.lasttxhook = 0;
- break;
- default:
- printk("opvxa1200: Can't set tx state to %d\n", txsig);
- }
- if (debug)
- printk("Setting FXS hook state to %d (%02x)\n", txsig, reg);
-
-#if 1
- wctdm_setreg(wc, chan->chanpos - 1, 64, wc->mod[chan->chanpos-1].fxs.lasttxhook);
-#endif
- }
- return 0;
-}
-
-static int wctdm_initialize(struct wctdm *wc)
-{
- int x;
-
- /* Zapata stuff */
- sprintf(wc->span.name, "OPVXA1200/%d", wc->pos);
- sprintf(wc->span.desc, "%s Board %d", wc->variety, wc->pos + 1);
- if (alawoverride) {
- printk("ALAW override parameter detected. Device will be operating in ALAW\n");
- wc->span.deflaw = ZT_LAW_ALAW;
- } else
- wc->span.deflaw = ZT_LAW_MULAW;
- for (x = 0; x < NUM_CARDS; x++) {
- sprintf(wc->chans[x].name, "OPVXA1200/%d/%d", wc->pos, x);
- wc->chans[x].sigcap = ZT_SIG_FXOKS | ZT_SIG_FXOLS | ZT_SIG_FXOGS | ZT_SIG_SF | ZT_SIG_EM | ZT_SIG_CLEAR;
- wc->chans[x].sigcap |= ZT_SIG_FXSKS | ZT_SIG_FXSLS | ZT_SIG_SF | ZT_SIG_CLEAR;
- wc->chans[x].chanpos = x+1;
- wc->chans[x].pvt = wc;
- }
- wc->span.chans = wc->chans;
- wc->span.channels = NUM_CARDS;
- wc->span.hooksig = wctdm_hooksig;
- wc->span.open = wctdm_open;
- wc->span.close = wctdm_close;
- wc->span.flags = ZT_FLAG_RBS;
- wc->span.ioctl = wctdm_ioctl;
- wc->span.watchdog = wctdm_watchdog;
- init_waitqueue_head(&wc->span.maintq);
-
- wc->span.pvt = wc;
- if (zt_register(&wc->span, 0)) {
- printk("Unable to register span with zaptel\n");
- return -1;
- }
- return 0;
-}
-
-static void wctdm_post_initialize(struct wctdm *wc)
-{
- int x;
- /* Finalize signalling */
- for (x = 0; x < NUM_CARDS; x++) {
- if (wc->cardflag & (1 << x)) {
- if (wc->modtype[x] == MOD_TYPE_FXO)
- wc->chans[x].sigcap = ZT_SIG_FXSKS | ZT_SIG_FXSLS | ZT_SIG_SF | ZT_SIG_CLEAR;
- else
- wc->chans[x].sigcap = ZT_SIG_FXOKS | ZT_SIG_FXOLS | ZT_SIG_FXOGS | ZT_SIG_SF | ZT_SIG_EM | ZT_SIG_CLEAR;
- }
- }
-}
-
-static int wctdm_hardware_init(struct wctdm *wc)
-{
- /* Hardware stuff */
- unsigned char ver;
- unsigned char x,y;
- int failed;
- //long origjiffies; //ml.
-
- /* Signal Reset */
- //printk("before raise reset\n");
- outb(0x01, wc->ioaddr + WC_CNTL);
-
- /* Wait for 2 second */
- /*
- origjiffies = jiffies;
-
- while(1)
- {
- if ((jiffies - origjiffies) >= (HZ*5))
- break;;
- }
-
- printk("after raise reset\n");*/
-
- /* Check OpenVox chip */
- x=inb(wc->ioaddr + WC_CNTL);
- ver = __wctdm_getcreg(wc, WC_VER);
- wc->fwversion = ver;
- printk("OpenVox A1200P version: %01x.%01x\n", ver>>4, ver&0x0f);
- failed = 0;
- if (ver != 0x00) {
- for (x=0;x<16;x++) {
- /* Test registers */
- __wctdm_setcreg(wc, WC_CS, x);
- y = __wctdm_getcreg(wc, WC_CS) & 0x0f;
- if (x != y) {
- printk("%02x != %02x\n", x, y);
- failed++;
- }
- }
-
- if (!failed) {
- printk("OpenVox A1200P passed register test\n");
- } else {
- printk("OpenVox A1200P failed register test\n");
- return -1;
- }
- } else {
- printk("No OpenVox chip %02x\n", ver);
- }
-
- if (spibyhw)
- __wctdm_setcreg(wc, WC_SPICTRL, BIT_SPI_BYHW); // spi controled by hw MiaoLin;
- else
- __wctdm_setcreg(wc, WC_SPICTRL, 0);
-
- /* Reset PCI Interface chip and registers (and serial) */
- outb(0x06, wc->ioaddr + WC_CNTL);
- /* Setup our proper outputs for when we switch for our "serial" port */
- wc->ios = BIT_CS | BIT_SCLK | BIT_SDI;
-
- outb(wc->ios, wc->ioaddr + WC_AUXD);
-
- /* Set all to outputs except AUX 5, which is an input */
- outb(0xdf, wc->ioaddr + WC_AUXC);
-
- /* Select alternate function for AUX0 *///MiaoLin modify it to normal io line.
- //outb(0x4, wc->ioaddr + WC_AUXFUNC);
-
- /* Wait 1/4 of a sec */
- wait_just_a_bit(HZ/4);
-
- /* Back to normal, with automatic DMA wrap around */
- outb(0x30 | 0x01, wc->ioaddr + WC_CNTL);
- wc->ledstate = 0;
- wctdm_set_led(wc, 0, 0);
-
- /* Make sure serial port and DMA are out of reset */
- outb(inb(wc->ioaddr + WC_CNTL) & 0xf9, WC_CNTL);
-
- /* Configure serial port for MSB->LSB operation */
- //outb(0xc1, wc->ioaddr + WC_SERCTL);
- outb(0xc1, wc->ioaddr + WC_SERCTL);
-
- /* Delay FSC by 0 so it's properly aligned */
- //outb(0x0, wc->ioaddr + WC_FSCDELAY);
- outb(0x01, wc->ioaddr + WC_FSCDELAY);
-
- /* Setup DMA Addresses */
- outl(wc->writedma, wc->ioaddr + WC_DMAWS); /* Write start */
- outl(wc->writedma + ZT_CHUNKSIZE * 4 * 4 - 4, wc->ioaddr + WC_DMAWI); /* Middle (interrupt) */
- outl(wc->writedma + ZT_CHUNKSIZE * 8 * 4 - 4, wc->ioaddr + WC_DMAWE); /* End */
-
- outl(wc->readdma, wc->ioaddr + WC_DMARS); /* Read start */
- outl(wc->readdma + ZT_CHUNKSIZE * 4 * 4 - 4, wc->ioaddr + WC_DMARI); /* Middle (interrupt) */
- outl(wc->readdma + ZT_CHUNKSIZE * 8 * 4 - 4, wc->ioaddr + WC_DMARE); /* End */
-
- /* Clear interrupts */
- outb(0xff, wc->ioaddr + WC_INTSTAT);
-
- /* Wait 1/4 of a second more */
- wait_just_a_bit(HZ/4);
-
- for (x = 0; x < NUM_CARDS; x++) {
- int sane=0,ret=0,readi=0;
-#if 1
- /* Init with Auto Calibration */
- if (!(ret=wctdm_init_proslic(wc, x, 0, 0, sane))) {
- wc->cardflag |= (1 << x);
- if (debug) {
- readi = wctdm_getreg(wc,x,LOOP_I_LIMIT);
- printk("Proslic module %d loop current is %dmA\n",x,
- ((readi*3)+20));
- }
- printk("Module %d: Installed -- AUTO FXS/DPO\n",x);
- wctdm_set_led(wc, (unsigned int)x, 1);
- } else {
- if(ret!=-2) {
- sane=1;
-
- printk("Init ProSlic with Manual Calibration \n");
- /* Init with Manual Calibration */
- if (!wctdm_init_proslic(wc, x, 0, 1, sane)) {
- wc->cardflag |= (1 << x);
- if (debug) {
- readi = wctdm_getreg(wc,x,LOOP_I_LIMIT);
- printk("Proslic module %d loop current is %dmA\n",x,
- ((readi*3)+20));
- }
- printk("Module %d: Installed -- MANUAL FXS\n",x);
- } else {
- printk("Module %d: FAILED FXS (%s)\n", x, fxshonormode ? fxo_modes[_opermode].name : "FCC");
- }
- } else if (!(ret = wctdm_init_voicedaa(wc, x, 0, 0, sane))) {
- wc->cardflag |= (1 << x);
- printk("Module %d: Installed -- AUTO FXO (%s mode)\n",x, fxo_modes[_opermode].name);
- wctdm_set_led(wc, (unsigned int)x, 1);
- } else
- printk("Module %d: Not installed\n", x);
- }
-#endif
- }
-
- /* Return error if nothing initialized okay. */
- if (!wc->cardflag && !timingonly)
- return -1;
- //__wctdm_setcreg(wc, WC_SYNC, (wc->cardflag << 1) | 0x1);
- return 0;
-}
-
-static void wctdm_enable_interrupts(struct wctdm *wc)
-{
- /* Clear interrupts */
- outb(0xff, wc->ioaddr + WC_INTSTAT);
-
- /* Enable interrupts (we care about all of them) */
- outb(0x3c /*0x3f*/, wc->ioaddr + WC_MASK0);
- /* No external interrupts */
- outb(0x00, wc->ioaddr + WC_MASK1);
-}
-
-static void wctdm_restart_dma(struct wctdm *wc)
-{
- /* Reset Master and TDM */
- outb(0x01, wc->ioaddr + WC_CNTL);
- outb(0x01, wc->ioaddr + WC_OPER);
-}
-
-static void wctdm_start_dma(struct wctdm *wc)
-{
- /* Reset Master and TDM */
- outb(0x0f, wc->ioaddr + WC_CNTL);
- set_current_state(TASK_INTERRUPTIBLE);
- schedule_timeout(1);
- outb(0x01, wc->ioaddr + WC_CNTL);
- outb(0x01, wc->ioaddr + WC_OPER);
-}
-
-static void wctdm_stop_dma(struct wctdm *wc)
-{
- outb(0x00, wc->ioaddr + WC_OPER);
-}
-
-static void wctdm_reset_tdm(struct wctdm *wc)
-{
- /* Reset TDM */
- outb(0x0f, wc->ioaddr + WC_CNTL);
-}
-
-static void wctdm_disable_interrupts(struct wctdm *wc)
-{
- outb(0x00, wc->ioaddr + WC_MASK0);
- outb(0x00, wc->ioaddr + WC_MASK1);
-}
-
-static int __devinit wctdm_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
-{
- int res;
- struct wctdm *wc;
- struct wctdm_desc *d = (struct wctdm_desc *)ent->driver_data;
- int x;
- int y;
-
- static int initd_ifaces=0;
-
- if(initd_ifaces){
- memset((void *)ifaces,0,(sizeof(struct wctdm *))*WC_MAX_IFACES);
- initd_ifaces=1;
- }
- for (x=0;x<WC_MAX_IFACES;x++)
- if (!ifaces[x]) break;
- if (x >= WC_MAX_IFACES) {
- printk("Too many interfaces\n");
- return -EIO;
- }
-
- if (pci_enable_device(pdev)) {
- res = -EIO;
- } else {
- wc = kmalloc(sizeof(struct wctdm), GFP_KERNEL);
- if (wc) {
- int cardcount = 0;
-
- //wc->offset = 12; // miaolin add.
- wc->lastchan = -1; // first channel offset = -1;
- wc->ledstate = 0;
-
- ifaces[x] = wc;
- memset(wc, 0, sizeof(struct wctdm));
- spin_lock_init(&wc->lock);
- wc->curcard = -1;
- wc->ioaddr = pci_resource_start(pdev, 0);
- wc->mem_region = pci_resource_start(pdev, 1);
- wc->mem_len = pci_resource_len(pdev, 1);
- wc->mem32 = (unsigned long)ioremap(wc->mem_region, wc->mem_len);
- wc->dev = pdev;
- wc->pos = x;
- wc->variety = d->name;
- for (y=0;y<NUM_CARDS;y++)
- wc->flags[y] = d->flags;
- /* Keep track of whether we need to free the region */
- if (request_region(wc->ioaddr, 0xff, "opvxa1200"))
- wc->freeregion = 1;
- else
- wc->freeregion = 0;
-
- if (request_mem_region(wc->mem_region, wc->mem_len, "opvxa1200"))
- wc->freeregion |= 0x02;
-
- /* Allocate enough memory for two zt chunks, receive and transmit. Each sample uses
- 8 bits. */
- wc->writechunk = pci_alloc_consistent(pdev, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2, &wc->writedma);
- if (!wc->writechunk) {
- printk("opvxa1200: Unable to allocate DMA-able memory\n");
- if (wc->freeregion & 0x01)
- release_region(wc->ioaddr, 0xff);
- if (wc->freeregion & 0x02);
- {
- release_mem_region(wc->mem_region, wc->mem_len);
- iounmap((void *)wc->mem32);
- }
- return -ENOMEM;
- }
-
- wc->readchunk = wc->writechunk + ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2; /* in bytes */
- wc->readdma = wc->writedma + ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2; /* in bytes */
-
- if (wctdm_initialize(wc)) {
- printk("opvxa1200: Unable to intialize FXS\n");
- /* Set Reset Low */
- x=inb(wc->ioaddr + WC_CNTL);
- outb((~0x1)&x, wc->ioaddr + WC_CNTL);
- /* Free Resources */
- free_irq(pdev->irq, wc);
- if (wc->freeregion & 0x01)
- release_region(wc->ioaddr, 0xff);
- if (wc->freeregion & 0x02);
- {
- release_mem_region(wc->mem_region, wc->mem_len);
- iounmap((void *)wc->mem32);
- }
- pci_free_consistent(pdev, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2, (void *)wc->writechunk, wc->writedma);
- kfree(wc);
- return -EIO;
- }
-
- /* Enable bus mastering */
- pci_set_master(pdev);
-
- /* Keep track of which device we are */
- pci_set_drvdata(pdev, wc);
-
- if (request_irq(pdev->irq, wctdm_interrupt, SA_SHIRQ, "opvxa1200", wc)) {
- printk("opvxa1200: Unable to request IRQ %d\n", pdev->irq);
- if (wc->freeregion & 0x01)
- release_region(wc->ioaddr, 0xff);
- if (wc->freeregion & 0x02);
- {
- release_mem_region(wc->mem_region, wc->mem_len);
- iounmap((void *)wc->mem32);
- }
- pci_free_consistent(pdev, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2, (void *)wc->writechunk, wc->writedma);
- pci_set_drvdata(pdev, NULL);
- kfree(wc);
- return -EIO;
- }
-
-
- if (wctdm_hardware_init(wc)) {
- unsigned char x;
-
- /* Set Reset Low */
- x=inb(wc->ioaddr + WC_CNTL);
- outb((~0x1)&x, wc->ioaddr + WC_CNTL);
- /* Free Resources */
- free_irq(pdev->irq, wc);
- if (wc->freeregion & 0x01)
- release_region(wc->ioaddr, 0xff);
- if (wc->freeregion & 0x02);
- {
- release_mem_region(wc->mem_region, wc->mem_len);
- iounmap((void *)wc->mem32);
- }
- pci_free_consistent(pdev, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2, (void *)wc->writechunk, wc->writedma);
- pci_set_drvdata(pdev, NULL);
- zt_unregister(&wc->span);
- kfree(wc);
- return -EIO;
-
- }
-
-#ifdef TEST_LOG_INCOME_VOICE
- for(i=0; i<NUM_CARDS+NUM_FLAG; i++)
- {
- wc->voc_buf[i] = kmalloc(voc_buffer_size, GFP_KERNEL);
- wc->voc_ptr[i] = 0;
- }
-#endif
-
- wctdm_post_initialize(wc);
-
- /* Enable interrupts */
- wctdm_enable_interrupts(wc);
- /* Initialize Write/Buffers to all blank data */
- memset((void *)wc->writechunk,0, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2);
-
- /* Start DMA */
- wctdm_start_dma(wc);
-
- for (x = 0; x < NUM_CARDS; x++) {
- if (wc->cardflag & (1 << x))
- cardcount++;
- }
-
- printk("Found a OpenVox A1200P: Version %01x.%01x (%d modules)\n", wc->fwversion>>4, wc->fwversion&0x0f, cardcount);
-
- res = 0;
- } else
- res = -ENOMEM;
- }
- return res;
-}
-
-static void wctdm_release(struct wctdm *wc)
-{
-#ifdef TEST_LOG_INCOME_VOICE
- struct file * f = NULL;
- mm_segment_t orig_fs;
- int i;
- char fname[20];
-#endif
-
- zt_unregister(&wc->span);
- if (wc->freeregion & 0x01)
- release_region(wc->ioaddr, 0xff);
- if (wc->freeregion & 0x02);
- {
- release_mem_region(wc->mem_region, wc->mem_len);
- iounmap((void *)wc->mem32);
- }
-
-#ifdef TEST_LOG_INCOME_VOICE
- for(i=0; i<NUM_CARDS + NUM_FLAG; i++)
- {
- sprintf(fname, "//usr//%d.pcm", i);
- f = filp_open(fname, O_RDWR|O_CREAT, 00);
-
- if (!f || !f->f_op || !f->f_op->read)
- {
- printk("WARNING: File (read) object is a null pointer!!!\n");
- continue;
- }
-
- f->f_pos = 0;
-
- orig_fs = get_fs();
- set_fs(KERNEL_DS);
-
- if(wc->voc_buf[i])
- {
- f->f_op->write(f, wc->voc_buf[i], voc_buffer_size, &f->f_pos);
- kfree(wc->voc_buf[i]);
- }
-
- set_fs(orig_fs);
- fput(f);
- }
-#endif
-
- kfree(wc);
- printk("Freed a OpenVox A1200 card\n");
-}
-
-static void __devexit wctdm_remove_one(struct pci_dev *pdev)
-{
- struct wctdm *wc = pci_get_drvdata(pdev);
- if (wc) {
-
- /* Stop any DMA */
- wctdm_stop_dma(wc);
- wctdm_reset_tdm(wc);
-
- /* In case hardware is still there */
- wctdm_disable_interrupts(wc);
-
- /* Immediately free resources */
- pci_free_consistent(pdev, ZT_MAX_CHUNKSIZE * (NUM_CARDS+NUM_FLAG) * 2 * 2, (void *)wc->writechunk, wc->writedma);
- free_irq(pdev->irq, wc);
-
- /* Reset PCI chip and registers */
- if(wc->fwversion > 0x11)
- outb(0x0e, wc->ioaddr + WC_CNTL);
- else
- {
- wc->ledstate = 0;
- wctdm_set_led(wc,0,0); // power off all leds.
- }
-
- /* Release span, possibly delayed */
- if (!wc->usecount)
- wctdm_release(wc);
- else
- wc->dead = 1;
- }
-}
-
-static struct pci_device_id wctdm_pci_tbl[] = {
- { 0xe159, 0x0001, 0x9100, PCI_ANY_ID, 0, 0, (unsigned long) &wctdme },
- { 0xe159, 0x0001, 0x9519, PCI_ANY_ID, 0, 0, (unsigned long) &wctdme },
- { 0xe159, 0x0001, 0x95D9, PCI_ANY_ID, 0, 0, (unsigned long) &wctdme },
- { 0xe159, 0x0001, 0x8519, PCI_ANY_ID, 0, 0, (unsigned long) &wctdme },
- { 0 }
-};
-
-MODULE_DEVICE_TABLE(pci, wctdm_pci_tbl);
-
-static struct pci_driver wctdm_driver = {
- name: "opvxa1200",
- probe: wctdm_init_one,
-#ifdef LINUX26
- remove: __devexit_p(wctdm_remove_one),
-#else
- remove: wctdm_remove_one,
-#endif
- suspend: NULL,
- resume: NULL,
- id_table: wctdm_pci_tbl,
-};
-
-static int __init wctdm_init(void)
-{
- int res;
- int x;
- for (x=0;x<(sizeof(fxo_modes) / sizeof(fxo_modes[0])); x++) {
- if (!strcmp(fxo_modes[x].name, opermode))
- break;
- }
- if (x < sizeof(fxo_modes) / sizeof(fxo_modes[0])) {
- _opermode = x;
- } else {
- printk("Invalid/unknown operating mode '%s' specified. Please choose one of:\n", opermode);
- for (x=0;x<sizeof(fxo_modes) / sizeof(fxo_modes[0]); x++)
- printk(" %s\n", fxo_modes[x].name);
- printk("Note this option is CASE SENSITIVE!\n");
- return -ENODEV;
- }
-
- res = zap_pci_module(&wctdm_driver);
- if (res)
- return -ENODEV;
- return 0;
-}
-
-static void __exit wctdm_cleanup(void)
-{
- pci_unregister_driver(&wctdm_driver);
-}
-
-#ifdef LINUX26
-module_param(debug, int, 0600);
-module_param(loopcurrent, int, 0600);
-module_param(reversepolarity, int, 0600);
-module_param(robust, int, 0600);
-module_param(_opermode, int, 0600);
-module_param(opermode, charp, 0600);
-module_param(timingonly, int, 0600);
-module_param(lowpower, int, 0600);
-module_param(boostringer, int, 0600);
-module_param(fxshonormode, int, 0600);
-module_param(battdebounce, int, 0600);
-module_param(battthresh, int, 0600);
-module_param(alawoverride, int, 0600);
-module_param(spibyhw, int, 0600);
-module_param(usememio, int, 0600);
-#else
-MODULE_PARM(debug, "i");
-MODULE_PARM(loopcurrent, "i");
-MODULE_PARM(reversepolarity, "i");
-MODULE_PARM(robust, "i");
-MODULE_PARM(_opermode, "i");
-MODULE_PARM(opermode, "s");
-MODULE_PARM(timingonly, "i");
-MODULE_PARM(lowpower, "i");
-MODULE_PARM(boostringer, "i");
-MODULE_PARM(fxshonormode, "i");
-MODULE_PARM(battdebounce, "i");
-MODULE_PARM(battthresh, "i");
-MODULE_PARM(alawoverride, "i");
-MODULE_PARM(spibyhw, "i");
-MODULE_PARM(usememio, "i");
-#endif
-MODULE_DESCRIPTION("OpenVox A1200 Zaptel Driver");
-MODULE_AUTHOR("MiaoLin <miaolin at openvox.com.cn>");
-#ifdef MODULE_LICENSE
-MODULE_LICENSE("GPL");
-#endif
-
-module_init(wctdm_init);
-module_exit(wctdm_cleanup);
Copied: zaptel/trunk/cwain (from rev 3378, zaptel/branches/experimental/cwain)
Copied: zaptel/trunk/debian (from rev 3378, zaptel/branches/experimental/debian)
Copied: zaptel/trunk/ds1x1f.c (from rev 3378, zaptel/branches/experimental/ds1x1f.c)
Copied: zaptel/trunk/opvxa1200.c (from rev 3378, zaptel/branches/experimental/opvxa1200.c)
Copied: zaptel/trunk/qozap (from rev 3378, zaptel/branches/experimental/qozap)
Copied: zaptel/trunk/vzaphfc (from rev 3378, zaptel/branches/experimental/vzaphfc)
Copied: zaptel/trunk/zaphfc (from rev 3378, zaptel/branches/experimental/zaphfc)
Copied: zaptel/trunk/ztgsm (from rev 3378, zaptel/branches/experimental/ztgsm)
More information about the Pkg-voip-commits
mailing list