Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/jikos/hid
[linux-2.6] / drivers / net / wan / pc300_drv.c
1 #define USE_PCI_CLOCK
2 static char rcsid[] = 
3 "Revision: 3.4.5 Date: 2002/03/07 ";
4
5 /*
6  * pc300.c      Cyclades-PC300(tm) Driver.
7  *
8  * Author:      Ivan Passos <ivan@cyclades.com>
9  * Maintainer:  PC300 Maintainer <pc300@cyclades.com>
10  *
11  * Copyright:   (c) 1999-2003 Cyclades Corp.
12  *
13  *      This program is free software; you can redistribute it and/or
14  *      modify it under the terms of the GNU General Public License
15  *      as published by the Free Software Foundation; either version
16  *      2 of the License, or (at your option) any later version.
17  *      
18  *      Using tabstop = 4.
19  * 
20  * $Log: pc300_drv.c,v $
21  * Revision 3.23  2002/03/20 13:58:40  henrique
22  * Fixed ortographic mistakes
23  *
24  * Revision 3.22  2002/03/13 16:56:56  henrique
25  * Take out the debug messages
26  *
27  * Revision 3.21  2002/03/07 14:17:09  henrique
28  * License data fixed
29  *
30  * Revision 3.20  2002/01/17 17:58:52  ivan
31  * Support for PC300-TE/M (PMC).
32  *
33  * Revision 3.19  2002/01/03 17:08:47  daniela
34  * Enables DMA reception when the SCA-II disables it improperly.
35  *
36  * Revision 3.18  2001/12/03 18:47:50  daniela
37  * Esthetic changes.
38  *
39  * Revision 3.17  2001/10/19 16:50:13  henrique
40  * Patch to kernel 2.4.12 and new generic hdlc.
41  *
42  * Revision 3.16  2001/10/16 15:12:31  regina
43  * clear statistics
44  *
45  * Revision 3.11 to 3.15  2001/10/11 20:26:04  daniela
46  * More DMA fixes for noisy lines.
47  * Return the size of bad frames in dma_get_rx_frame_size, so that the Rx buffer
48  * descriptors can be cleaned by dma_buf_read (called in cpc_net_rx).
49  * Renamed dma_start routine to rx_dma_start. Improved Rx statistics.
50  * Fixed BOF interrupt treatment. Created dma_start routine.
51  * Changed min and max to cpc_min and cpc_max.
52  *
53  * Revision 3.10  2001/08/06 12:01:51  regina
54  * Fixed problem in DSR_DE bit.
55  *
56  * Revision 3.9  2001/07/18 19:27:26  daniela
57  * Added some history comments.
58  *
59  * Revision 3.8  2001/07/12 13:11:19  regina
60  * bug fix - DCD-OFF in pc300 tty driver
61  *
62  * Revision 3.3 to 3.7  2001/07/06 15:00:20  daniela
63  * Removing kernel 2.4.3 and previous support.
64  * DMA transmission bug fix.
65  * MTU check in cpc_net_rx fixed.
66  * Boot messages reviewed.
67  * New configuration parameters (line code, CRC calculation and clock).
68  *
69  * Revision 3.2 2001/06/22 13:13:02  regina
70  * MLPPP implementation. Changed the header of message trace to include
71  * the device name. New format : "hdlcX[R/T]: ".
72  * Default configuration changed.
73  *
74  * Revision 3.1 2001/06/15 regina
75  * in cpc_queue_xmit, netif_stop_queue is called if don't have free descriptor
76  * upping major version number
77  *
78  * Revision 1.1.1.1  2001/06/13 20:25:04  daniela
79  * PC300 initial CVS version (3.4.0-pre1)
80  *
81  * Revision 3.0.1.2 2001/06/08 daniela
82  * Did some changes in the DMA programming implementation to avoid the 
83  * occurrence of a SCA-II bug when CDA is accessed during a DMA transfer.
84  *
85  * Revision 3.0.1.1 2001/05/02 daniela
86  * Added kernel 2.4.3 support.
87  * 
88  * Revision 3.0.1.0 2001/03/13 daniela, henrique
89  * Added Frame Relay Support.
90  * Driver now uses HDLC generic driver to provide protocol support.
91  * 
92  * Revision 3.0.0.8 2001/03/02 daniela
93  * Fixed ram size detection. 
94  * Changed SIOCGPC300CONF ioctl, to give hw information to pc300util.
95  * 
96  * Revision 3.0.0.7 2001/02/23 daniela
97  * netif_stop_queue called before the SCA-II transmition commands in 
98  * cpc_queue_xmit, and with interrupts disabled to avoid race conditions with 
99  * transmition interrupts.
100  * Fixed falc_check_status for Unframed E1.
101  * 
102  * Revision 3.0.0.6 2000/12/13 daniela
103  * Implemented pc300util support: trace, statistics, status and loopback
104  * tests for the PC300 TE boards.
105  * 
106  * Revision 3.0.0.5 2000/12/12 ivan
107  * Added support for Unframed E1.
108  * Implemented monitor mode.
109  * Fixed DCD sensitivity on the second channel.
110  * Driver now complies with new PCI kernel architecture.
111  *
112  * Revision 3.0.0.4 2000/09/28 ivan
113  * Implemented DCD sensitivity.
114  * Moved hardware-specific open to the end of cpc_open, to avoid race
115  * conditions with early reception interrupts.
116  * Included code for [request|release]_mem_region().
117  * Changed location of pc300.h .
118  * Minor code revision (contrib. of Jeff Garzik).
119  *
120  * Revision 3.0.0.3 2000/07/03 ivan
121  * Previous bugfix for the framing errors with external clock made X21
122  * boards stop working. This version fixes it.
123  *
124  * Revision 3.0.0.2 2000/06/23 ivan
125  * Revisited cpc_queue_xmit to prevent race conditions on Tx DMA buffer
126  * handling when Tx timeouts occur.
127  * Revisited Rx statistics.
128  * Fixed a bug in the SCA-II programming that would cause framing errors
129  * when external clock was configured.
130  *
131  * Revision 3.0.0.1 2000/05/26 ivan
132  * Added logic in the SCA interrupt handler so that no board can monopolize
133  * the driver.
134  * Request PLX I/O region, although driver doesn't use it, to avoid
135  * problems with other drivers accessing it.
136  *
137  * Revision 3.0.0.0 2000/05/15 ivan
138  * Did some changes in the DMA programming implementation to avoid the
139  * occurrence of a SCA-II bug in the second channel.
140  * Implemented workaround for PLX9050 bug that would cause a system lockup
141  * in certain systems, depending on the MMIO addresses allocated to the
142  * board.
143  * Fixed the FALC chip programming to avoid synchronization problems in the
144  * second channel (TE only).
145  * Implemented a cleaner and faster Tx DMA descriptor cleanup procedure in
146  * cpc_queue_xmit().
147  * Changed the built-in driver implementation so that the driver can use the
148  * general 'hdlcN' naming convention instead of proprietary device names.
149  * Driver load messages are now device-centric, instead of board-centric.
150  * Dynamic allocation of net_device structures.
151  * Code is now compliant with the new module interface (module_[init|exit]).
152  * Make use of the PCI helper functions to access PCI resources.
153  *
154  * Revision 2.0.0.0 2000/04/15 ivan
155  * Added support for the PC300/TE boards (T1/FT1/E1/FE1).
156  *
157  * Revision 1.1.0.0 2000/02/28 ivan
158  * Major changes in the driver architecture.
159  * Softnet compliancy implemented.
160  * Driver now reports physical instead of virtual memory addresses.
161  * Added cpc_change_mtu function.
162  *
163  * Revision 1.0.0.0 1999/12/16 ivan
164  * First official release.
165  * Support for 1- and 2-channel boards (which use distinct PCI Device ID's).
166  * Support for monolythic installation (i.e., drv built into the kernel).
167  * X.25 additional checking when lapb_[dis]connect_request returns an error.
168  * SCA programming now covers X.21 as well.
169  *
170  * Revision 0.3.1.0 1999/11/18 ivan
171  * Made X.25 support configuration-dependent (as it depends on external 
172  * modules to work).
173  * Changed X.25-specific function names to comply with adopted convention.
174  * Fixed typos in X.25 functions that would cause compile errors (Daniela).
175  * Fixed bug in ch_config that would disable interrupts on a previously 
176  * enabled channel if the other channel on the same board was enabled later.
177  *
178  * Revision 0.3.0.0 1999/11/16 daniela
179  * X.25 support.
180  *
181  * Revision 0.2.3.0 1999/11/15 ivan
182  * Function cpc_ch_status now provides more detailed information.
183  * Added support for X.21 clock configuration.
184  * Changed TNR1 setting in order to prevent Tx FIFO overaccesses by the SCA.
185  * Now using PCI clock instead of internal oscillator clock for the SCA.
186  *
187  * Revision 0.2.2.0 1999/11/10 ivan
188  * Changed the *_dma_buf_check functions so that they would print only 
189  * the useful info instead of the whole buffer descriptor bank.
190  * Fixed bug in cpc_queue_xmit that would eventually crash the system 
191  * in case of a packet drop.
192  * Implemented TX underrun handling.
193  * Improved SCA fine tuning to boost up its performance.
194  *
195  * Revision 0.2.1.0 1999/11/03 ivan
196  * Added functions *dma_buf_pt_init to allow independent initialization 
197  * of the next-descr. and DMA buffer pointers on the DMA descriptors.
198  * Kernel buffer release and tbusy clearing is now done in the interrupt 
199  * handler.
200  * Fixed bug in cpc_open that would cause an interface reopen to fail.
201  * Added a protocol-specific code section in cpc_net_rx.
202  * Removed printk level defs (they might be added back after the beta phase).
203  *
204  * Revision 0.2.0.0 1999/10/28 ivan
205  * Revisited the code so that new protocols can be easily added / supported. 
206  *
207  * Revision 0.1.0.1 1999/10/20 ivan
208  * Mostly "esthetic" changes.
209  *
210  * Revision 0.1.0.0 1999/10/11 ivan
211  * Initial version.
212  *
213  */
214
215 #include <linux/module.h>
216 #include <linux/kernel.h>
217 #include <linux/mm.h>
218 #include <linux/ioport.h>
219 #include <linux/pci.h>
220 #include <linux/errno.h>
221 #include <linux/string.h>
222 #include <linux/init.h>
223 #include <linux/delay.h>
224 #include <linux/net.h>
225 #include <linux/skbuff.h>
226 #include <linux/if_arp.h>
227 #include <linux/netdevice.h>
228 #include <linux/spinlock.h>
229 #include <linux/if.h>
230 #include <net/arp.h>
231
232 #include <asm/io.h>
233 #include <asm/uaccess.h>
234
235 #include "pc300.h"
236
237 #define CPC_LOCK(card,flags)            \
238                 do {                                            \
239                 spin_lock_irqsave(&card->card_lock, flags);     \
240                 } while (0)
241
242 #define CPC_UNLOCK(card,flags)                  \
243                 do {                                                    \
244                 spin_unlock_irqrestore(&card->card_lock, flags);        \
245                 } while (0)
246
247 #undef  PC300_DEBUG_PCI
248 #undef  PC300_DEBUG_INTR
249 #undef  PC300_DEBUG_TX
250 #undef  PC300_DEBUG_RX
251 #undef  PC300_DEBUG_OTHER
252
253 static struct pci_device_id cpc_pci_dev_id[] __devinitdata = {
254         /* PC300/RSV or PC300/X21, 2 chan */
255         {0x120e, 0x300, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x300},
256         /* PC300/RSV or PC300/X21, 1 chan */
257         {0x120e, 0x301, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x301},
258         /* PC300/TE, 2 chan */
259         {0x120e, 0x310, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x310},
260         /* PC300/TE, 1 chan */
261         {0x120e, 0x311, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x311},
262         /* PC300/TE-M, 2 chan */
263         {0x120e, 0x320, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x320},
264         /* PC300/TE-M, 1 chan */
265         {0x120e, 0x321, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0x321},
266         /* End of table */
267         {0,},
268 };
269 MODULE_DEVICE_TABLE(pci, cpc_pci_dev_id);
270
271 #ifndef cpc_min
272 #define cpc_min(a,b)    (((a)<(b))?(a):(b))
273 #endif
274 #ifndef cpc_max
275 #define cpc_max(a,b)    (((a)>(b))?(a):(b))
276 #endif
277
278 /* prototypes */
279 static void tx_dma_buf_pt_init(pc300_t *, int);
280 static void tx_dma_buf_init(pc300_t *, int);
281 static void rx_dma_buf_pt_init(pc300_t *, int);
282 static void rx_dma_buf_init(pc300_t *, int);
283 static void tx_dma_buf_check(pc300_t *, int);
284 static void rx_dma_buf_check(pc300_t *, int);
285 static irqreturn_t cpc_intr(int, void *);
286 static int clock_rate_calc(u32, u32, int *);
287 static u32 detect_ram(pc300_t *);
288 static void plx_init(pc300_t *);
289 static void cpc_trace(struct net_device *, struct sk_buff *, char);
290 static int cpc_attach(struct net_device *, unsigned short, unsigned short);
291 static int cpc_close(struct net_device *dev);
292
293 #ifdef CONFIG_PC300_MLPPP
294 void cpc_tty_init(pc300dev_t * dev);
295 void cpc_tty_unregister_service(pc300dev_t * pc300dev);
296 void cpc_tty_receive(pc300dev_t * pc300dev);
297 void cpc_tty_trigger_poll(pc300dev_t * pc300dev);
298 void cpc_tty_reset_var(void);
299 #endif
300
301 /************************/
302 /***   DMA Routines   ***/
303 /************************/
304 static void tx_dma_buf_pt_init(pc300_t * card, int ch)
305 {
306         int i;
307         int ch_factor = ch * N_DMA_TX_BUF;
308         volatile pcsca_bd_t __iomem *ptdescr = (card->hw.rambase
309                                        + DMA_TX_BD_BASE + ch_factor * sizeof(pcsca_bd_t));
310
311         for (i = 0; i < N_DMA_TX_BUF; i++, ptdescr++) {
312                 cpc_writel(&ptdescr->next, (u32)(DMA_TX_BD_BASE +
313                         (ch_factor + ((i + 1) & (N_DMA_TX_BUF - 1))) * sizeof(pcsca_bd_t)));
314                 cpc_writel(&ptdescr->ptbuf,
315                            (u32)(DMA_TX_BASE + (ch_factor + i) * BD_DEF_LEN));
316         }
317 }
318
319 static void tx_dma_buf_init(pc300_t * card, int ch)
320 {
321         int i;
322         int ch_factor = ch * N_DMA_TX_BUF;
323         volatile pcsca_bd_t __iomem *ptdescr = (card->hw.rambase
324                                + DMA_TX_BD_BASE + ch_factor * sizeof(pcsca_bd_t));
325
326         for (i = 0; i < N_DMA_TX_BUF; i++, ptdescr++) {
327                 memset_io(ptdescr, 0, sizeof(pcsca_bd_t));
328                 cpc_writew(&ptdescr->len, 0);
329                 cpc_writeb(&ptdescr->status, DST_OSB);
330         }
331         tx_dma_buf_pt_init(card, ch);
332 }
333
334 static void rx_dma_buf_pt_init(pc300_t * card, int ch)
335 {
336         int i;
337         int ch_factor = ch * N_DMA_RX_BUF;
338         volatile pcsca_bd_t __iomem *ptdescr = (card->hw.rambase
339                                        + DMA_RX_BD_BASE + ch_factor * sizeof(pcsca_bd_t));
340
341         for (i = 0; i < N_DMA_RX_BUF; i++, ptdescr++) {
342                 cpc_writel(&ptdescr->next, (u32)(DMA_RX_BD_BASE +
343                         (ch_factor + ((i + 1) & (N_DMA_RX_BUF - 1))) * sizeof(pcsca_bd_t)));
344                 cpc_writel(&ptdescr->ptbuf,
345                            (u32)(DMA_RX_BASE + (ch_factor + i) * BD_DEF_LEN));
346         }
347 }
348
349 static void rx_dma_buf_init(pc300_t * card, int ch)
350 {
351         int i;
352         int ch_factor = ch * N_DMA_RX_BUF;
353         volatile pcsca_bd_t __iomem *ptdescr = (card->hw.rambase
354                                        + DMA_RX_BD_BASE + ch_factor * sizeof(pcsca_bd_t));
355
356         for (i = 0; i < N_DMA_RX_BUF; i++, ptdescr++) {
357                 memset_io(ptdescr, 0, sizeof(pcsca_bd_t));
358                 cpc_writew(&ptdescr->len, 0);
359                 cpc_writeb(&ptdescr->status, 0);
360         }
361         rx_dma_buf_pt_init(card, ch);
362 }
363
364 static void tx_dma_buf_check(pc300_t * card, int ch)
365 {
366         volatile pcsca_bd_t __iomem *ptdescr;
367         int i;
368         u16 first_bd = card->chan[ch].tx_first_bd;
369         u16 next_bd = card->chan[ch].tx_next_bd;
370
371         printk("#CH%d: f_bd = %d(0x%08zx), n_bd = %d(0x%08zx)\n", ch,
372                first_bd, TX_BD_ADDR(ch, first_bd),
373                next_bd, TX_BD_ADDR(ch, next_bd));
374         for (i = first_bd,
375              ptdescr = (card->hw.rambase + TX_BD_ADDR(ch, first_bd));
376              i != ((next_bd + 1) & (N_DMA_TX_BUF - 1));
377              i = (i + 1) & (N_DMA_TX_BUF - 1), 
378                  ptdescr = (card->hw.rambase + TX_BD_ADDR(ch, i))) {
379                 printk("\n CH%d TX%d: next=0x%x, ptbuf=0x%x, ST=0x%x, len=%d",
380                        ch, i, cpc_readl(&ptdescr->next),
381                        cpc_readl(&ptdescr->ptbuf),
382                        cpc_readb(&ptdescr->status), cpc_readw(&ptdescr->len));
383         }
384         printk("\n");
385 }
386
387 #ifdef  PC300_DEBUG_OTHER
388 /* Show all TX buffer descriptors */
389 static void tx1_dma_buf_check(pc300_t * card, int ch)
390 {
391         volatile pcsca_bd_t __iomem *ptdescr;
392         int i;
393         u16 first_bd = card->chan[ch].tx_first_bd;
394         u16 next_bd = card->chan[ch].tx_next_bd;
395         u32 scabase = card->hw.scabase;
396
397         printk ("\nnfree_tx_bd = %d \n", card->chan[ch].nfree_tx_bd);
398         printk("#CH%d: f_bd = %d(0x%08x), n_bd = %d(0x%08x)\n", ch,
399                first_bd, TX_BD_ADDR(ch, first_bd),
400                next_bd, TX_BD_ADDR(ch, next_bd));
401         printk("TX_CDA=0x%08x, TX_EDA=0x%08x\n",
402                cpc_readl(scabase + DTX_REG(CDAL, ch)),
403                cpc_readl(scabase + DTX_REG(EDAL, ch)));
404         for (i = 0; i < N_DMA_TX_BUF; i++) {
405                 ptdescr = (card->hw.rambase + TX_BD_ADDR(ch, i));
406                 printk("\n CH%d TX%d: next=0x%x, ptbuf=0x%x, ST=0x%x, len=%d",
407                        ch, i, cpc_readl(&ptdescr->next),
408                        cpc_readl(&ptdescr->ptbuf),
409                        cpc_readb(&ptdescr->status), cpc_readw(&ptdescr->len));
410         }
411         printk("\n");
412 }
413 #endif
414
415 static void rx_dma_buf_check(pc300_t * card, int ch)
416 {
417         volatile pcsca_bd_t __iomem *ptdescr;
418         int i;
419         u16 first_bd = card->chan[ch].rx_first_bd;
420         u16 last_bd = card->chan[ch].rx_last_bd;
421         int ch_factor;
422
423         ch_factor = ch * N_DMA_RX_BUF;
424         printk("#CH%d: f_bd = %d, l_bd = %d\n", ch, first_bd, last_bd);
425         for (i = 0, ptdescr = (card->hw.rambase +
426                                               DMA_RX_BD_BASE + ch_factor * sizeof(pcsca_bd_t));
427              i < N_DMA_RX_BUF; i++, ptdescr++) {
428                 if (cpc_readb(&ptdescr->status) & DST_OSB)
429                         printk ("\n CH%d RX%d: next=0x%x, ptbuf=0x%x, ST=0x%x, len=%d",
430                                  ch, i, cpc_readl(&ptdescr->next),
431                                  cpc_readl(&ptdescr->ptbuf),
432                                  cpc_readb(&ptdescr->status),
433                                  cpc_readw(&ptdescr->len));
434         }
435         printk("\n");
436 }
437
438 static int dma_get_rx_frame_size(pc300_t * card, int ch)
439 {
440         volatile pcsca_bd_t __iomem *ptdescr;
441         u16 first_bd = card->chan[ch].rx_first_bd;
442         int rcvd = 0;
443         volatile u8 status;
444
445         ptdescr = (card->hw.rambase + RX_BD_ADDR(ch, first_bd));
446         while ((status = cpc_readb(&ptdescr->status)) & DST_OSB) {
447                 rcvd += cpc_readw(&ptdescr->len);
448                 first_bd = (first_bd + 1) & (N_DMA_RX_BUF - 1);
449                 if ((status & DST_EOM) || (first_bd == card->chan[ch].rx_last_bd)) {
450                         /* Return the size of a good frame or incomplete bad frame 
451                         * (dma_buf_read will clean the buffer descriptors in this case). */
452                         return (rcvd);
453                 }
454                 ptdescr = (card->hw.rambase + cpc_readl(&ptdescr->next));
455         }
456         return (-1);
457 }
458
459 /*
460  * dma_buf_write: writes a frame to the Tx DMA buffers
461  * NOTE: this function writes one frame at a time.
462  */
463 static int dma_buf_write(pc300_t *card, int ch, u8 *ptdata, int len)
464 {
465         int i, nchar;
466         volatile pcsca_bd_t __iomem *ptdescr;
467         int tosend = len;
468         u8 nbuf = ((len - 1) / BD_DEF_LEN) + 1;
469
470         if (nbuf >= card->chan[ch].nfree_tx_bd) {
471                 return -ENOMEM;
472         }
473
474         for (i = 0; i < nbuf; i++) {
475                 ptdescr = (card->hw.rambase +
476                                           TX_BD_ADDR(ch, card->chan[ch].tx_next_bd));
477                 nchar = cpc_min(BD_DEF_LEN, tosend);
478                 if (cpc_readb(&ptdescr->status) & DST_OSB) {
479                         memcpy_toio((card->hw.rambase + cpc_readl(&ptdescr->ptbuf)),
480                                     &ptdata[len - tosend], nchar);
481                         cpc_writew(&ptdescr->len, nchar);
482                         card->chan[ch].nfree_tx_bd--;
483                         if ((i + 1) == nbuf) {
484                                 /* This must be the last BD to be used */
485                                 cpc_writeb(&ptdescr->status, DST_EOM);
486                         } else {
487                                 cpc_writeb(&ptdescr->status, 0);
488                         }
489                 } else {
490                         return -ENOMEM;
491                 }
492                 tosend -= nchar;
493                 card->chan[ch].tx_next_bd =
494                         (card->chan[ch].tx_next_bd + 1) & (N_DMA_TX_BUF - 1);
495         }
496         /* If it gets to here, it means we have sent the whole frame */
497         return 0;
498 }
499
500 /*
501  * dma_buf_read: reads a frame from the Rx DMA buffers
502  * NOTE: this function reads one frame at a time.
503  */
504 static int dma_buf_read(pc300_t * card, int ch, struct sk_buff *skb)
505 {
506         int nchar;
507         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
508         volatile pcsca_bd_t __iomem *ptdescr;
509         int rcvd = 0;
510         volatile u8 status;
511
512         ptdescr = (card->hw.rambase +
513                                   RX_BD_ADDR(ch, chan->rx_first_bd));
514         while ((status = cpc_readb(&ptdescr->status)) & DST_OSB) {
515                 nchar = cpc_readw(&ptdescr->len);
516                 if ((status & (DST_OVR | DST_CRC | DST_RBIT | DST_SHRT | DST_ABT))
517                     || (nchar > BD_DEF_LEN)) {
518
519                         if (nchar > BD_DEF_LEN)
520                                 status |= DST_RBIT;
521                         rcvd = -status;
522                         /* Discard remaining descriptors used by the bad frame */
523                         while (chan->rx_first_bd != chan->rx_last_bd) {
524                                 cpc_writeb(&ptdescr->status, 0);
525                                 chan->rx_first_bd = (chan->rx_first_bd+1) & (N_DMA_RX_BUF-1);
526                                 if (status & DST_EOM)
527                                         break;
528                                 ptdescr = (card->hw.rambase +
529                                                           cpc_readl(&ptdescr->next));
530                                 status = cpc_readb(&ptdescr->status);
531                         }
532                         break;
533                 }
534                 if (nchar != 0) {
535                         if (skb) {
536                                 memcpy_fromio(skb_put(skb, nchar),
537                                  (card->hw.rambase+cpc_readl(&ptdescr->ptbuf)),nchar);
538                         }
539                         rcvd += nchar;
540                 }
541                 cpc_writeb(&ptdescr->status, 0);
542                 cpc_writeb(&ptdescr->len, 0);
543                 chan->rx_first_bd = (chan->rx_first_bd + 1) & (N_DMA_RX_BUF - 1);
544
545                 if (status & DST_EOM)
546                         break;
547
548                 ptdescr = (card->hw.rambase + cpc_readl(&ptdescr->next));
549         }
550
551         if (rcvd != 0) {
552                 /* Update pointer */
553                 chan->rx_last_bd = (chan->rx_first_bd - 1) & (N_DMA_RX_BUF - 1);
554                 /* Update EDA */
555                 cpc_writel(card->hw.scabase + DRX_REG(EDAL, ch),
556                            RX_BD_ADDR(ch, chan->rx_last_bd));
557         }
558         return (rcvd);
559 }
560
561 static void tx_dma_stop(pc300_t * card, int ch)
562 {
563         void __iomem *scabase = card->hw.scabase;
564         u8 drr_ena_bit = 1 << (5 + 2 * ch);
565         u8 drr_rst_bit = 1 << (1 + 2 * ch);
566
567         /* Disable DMA */
568         cpc_writeb(scabase + DRR, drr_ena_bit);
569         cpc_writeb(scabase + DRR, drr_rst_bit & ~drr_ena_bit);
570 }
571
572 static void rx_dma_stop(pc300_t * card, int ch)
573 {
574         void __iomem *scabase = card->hw.scabase;
575         u8 drr_ena_bit = 1 << (4 + 2 * ch);
576         u8 drr_rst_bit = 1 << (2 * ch);
577
578         /* Disable DMA */
579         cpc_writeb(scabase + DRR, drr_ena_bit);
580         cpc_writeb(scabase + DRR, drr_rst_bit & ~drr_ena_bit);
581 }
582
583 static void rx_dma_start(pc300_t * card, int ch)
584 {
585         void __iomem *scabase = card->hw.scabase;
586         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
587         
588         /* Start DMA */
589         cpc_writel(scabase + DRX_REG(CDAL, ch),
590                    RX_BD_ADDR(ch, chan->rx_first_bd));
591         if (cpc_readl(scabase + DRX_REG(CDAL,ch)) !=
592                                   RX_BD_ADDR(ch, chan->rx_first_bd)) {
593                 cpc_writel(scabase + DRX_REG(CDAL, ch),
594                                    RX_BD_ADDR(ch, chan->rx_first_bd));
595         }
596         cpc_writel(scabase + DRX_REG(EDAL, ch),
597                    RX_BD_ADDR(ch, chan->rx_last_bd));
598         cpc_writew(scabase + DRX_REG(BFLL, ch), BD_DEF_LEN);
599         cpc_writeb(scabase + DSR_RX(ch), DSR_DE);
600         if (!(cpc_readb(scabase + DSR_RX(ch)) & DSR_DE)) {
601         cpc_writeb(scabase + DSR_RX(ch), DSR_DE);
602         }
603 }
604
605 /*************************/
606 /***   FALC Routines   ***/
607 /*************************/
608 static void falc_issue_cmd(pc300_t *card, int ch, u8 cmd)
609 {
610         void __iomem *falcbase = card->hw.falcbase;
611         unsigned long i = 0;
612
613         while (cpc_readb(falcbase + F_REG(SIS, ch)) & SIS_CEC) {
614                 if (i++ >= PC300_FALC_MAXLOOP) {
615                         printk("%s: FALC command locked(cmd=0x%x).\n",
616                                card->chan[ch].d.name, cmd);
617                         break;
618                 }
619         }
620         cpc_writeb(falcbase + F_REG(CMDR, ch), cmd);
621 }
622
623 static void falc_intr_enable(pc300_t * card, int ch)
624 {
625         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
626         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
627         falc_t *pfalc = (falc_t *) & chan->falc;
628         void __iomem *falcbase = card->hw.falcbase;
629
630         /* Interrupt pins are open-drain */
631         cpc_writeb(falcbase + F_REG(IPC, ch),
632                    cpc_readb(falcbase + F_REG(IPC, ch)) & ~IPC_IC0);
633         /* Conters updated each second */
634         cpc_writeb(falcbase + F_REG(FMR1, ch),
635                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_ECM);
636         /* Enable SEC and ES interrupts  */
637         cpc_writeb(falcbase + F_REG(IMR3, ch),
638                    cpc_readb(falcbase + F_REG(IMR3, ch)) & ~(IMR3_SEC | IMR3_ES));
639         if (conf->fr_mode == PC300_FR_UNFRAMED) {
640                 cpc_writeb(falcbase + F_REG(IMR4, ch),
641                            cpc_readb(falcbase + F_REG(IMR4, ch)) & ~(IMR4_LOS));
642         } else {
643                 cpc_writeb(falcbase + F_REG(IMR4, ch),
644                            cpc_readb(falcbase + F_REG(IMR4, ch)) &
645                            ~(IMR4_LFA | IMR4_AIS | IMR4_LOS | IMR4_SLIP));
646         }
647         if (conf->media == IF_IFACE_T1) {
648                 cpc_writeb(falcbase + F_REG(IMR3, ch),
649                            cpc_readb(falcbase + F_REG(IMR3, ch)) & ~IMR3_LLBSC);
650         } else {
651                 cpc_writeb(falcbase + F_REG(IPC, ch),
652                            cpc_readb(falcbase + F_REG(IPC, ch)) | IPC_SCI);
653                 if (conf->fr_mode == PC300_FR_UNFRAMED) {
654                         cpc_writeb(falcbase + F_REG(IMR2, ch),
655                                    cpc_readb(falcbase + F_REG(IMR2, ch)) & ~(IMR2_LOS));
656                 } else {
657                         cpc_writeb(falcbase + F_REG(IMR2, ch),
658                                    cpc_readb(falcbase + F_REG(IMR2, ch)) &
659                                    ~(IMR2_FAR | IMR2_LFA | IMR2_AIS | IMR2_LOS));
660                         if (pfalc->multiframe_mode) {
661                                 cpc_writeb(falcbase + F_REG(IMR2, ch),
662                                            cpc_readb(falcbase + F_REG(IMR2, ch)) & 
663                                            ~(IMR2_T400MS | IMR2_MFAR));
664                         } else {
665                                 cpc_writeb(falcbase + F_REG(IMR2, ch),
666                                            cpc_readb(falcbase + F_REG(IMR2, ch)) | 
667                                            IMR2_T400MS | IMR2_MFAR);
668                         }
669                 }
670         }
671 }
672
673 static void falc_open_timeslot(pc300_t * card, int ch, int timeslot)
674 {
675         void __iomem *falcbase = card->hw.falcbase;
676         u8 tshf = card->chan[ch].falc.offset;
677
678         cpc_writeb(falcbase + F_REG((ICB1 + (timeslot - tshf) / 8), ch),
679                    cpc_readb(falcbase + F_REG((ICB1 + (timeslot - tshf) / 8), ch)) & 
680                         ~(0x80 >> ((timeslot - tshf) & 0x07)));
681         cpc_writeb(falcbase + F_REG((TTR1 + timeslot / 8), ch),
682                    cpc_readb(falcbase + F_REG((TTR1 + timeslot / 8), ch)) | 
683                         (0x80 >> (timeslot & 0x07)));
684         cpc_writeb(falcbase + F_REG((RTR1 + timeslot / 8), ch),
685                    cpc_readb(falcbase + F_REG((RTR1 + timeslot / 8), ch)) | 
686                         (0x80 >> (timeslot & 0x07)));
687 }
688
689 static void falc_close_timeslot(pc300_t * card, int ch, int timeslot)
690 {
691         void __iomem *falcbase = card->hw.falcbase;
692         u8 tshf = card->chan[ch].falc.offset;
693
694         cpc_writeb(falcbase + F_REG((ICB1 + (timeslot - tshf) / 8), ch),
695                    cpc_readb(falcbase + F_REG((ICB1 + (timeslot - tshf) / 8), ch)) | 
696                    (0x80 >> ((timeslot - tshf) & 0x07)));
697         cpc_writeb(falcbase + F_REG((TTR1 + timeslot / 8), ch),
698                    cpc_readb(falcbase + F_REG((TTR1 + timeslot / 8), ch)) & 
699                    ~(0x80 >> (timeslot & 0x07)));
700         cpc_writeb(falcbase + F_REG((RTR1 + timeslot / 8), ch),
701                    cpc_readb(falcbase + F_REG((RTR1 + timeslot / 8), ch)) & 
702                    ~(0x80 >> (timeslot & 0x07)));
703 }
704
705 static void falc_close_all_timeslots(pc300_t * card, int ch)
706 {
707         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
708         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
709         void __iomem *falcbase = card->hw.falcbase;
710
711         cpc_writeb(falcbase + F_REG(ICB1, ch), 0xff);
712         cpc_writeb(falcbase + F_REG(TTR1, ch), 0);
713         cpc_writeb(falcbase + F_REG(RTR1, ch), 0);
714         cpc_writeb(falcbase + F_REG(ICB2, ch), 0xff);
715         cpc_writeb(falcbase + F_REG(TTR2, ch), 0);
716         cpc_writeb(falcbase + F_REG(RTR2, ch), 0);
717         cpc_writeb(falcbase + F_REG(ICB3, ch), 0xff);
718         cpc_writeb(falcbase + F_REG(TTR3, ch), 0);
719         cpc_writeb(falcbase + F_REG(RTR3, ch), 0);
720         if (conf->media == IF_IFACE_E1) {
721                 cpc_writeb(falcbase + F_REG(ICB4, ch), 0xff);
722                 cpc_writeb(falcbase + F_REG(TTR4, ch), 0);
723                 cpc_writeb(falcbase + F_REG(RTR4, ch), 0);
724         }
725 }
726
727 static void falc_open_all_timeslots(pc300_t * card, int ch)
728 {
729         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
730         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
731         void __iomem *falcbase = card->hw.falcbase;
732
733         cpc_writeb(falcbase + F_REG(ICB1, ch), 0);
734         if (conf->fr_mode == PC300_FR_UNFRAMED) {
735                 cpc_writeb(falcbase + F_REG(TTR1, ch), 0xff);
736                 cpc_writeb(falcbase + F_REG(RTR1, ch), 0xff);
737         } else {
738                 /* Timeslot 0 is never enabled */
739                 cpc_writeb(falcbase + F_REG(TTR1, ch), 0x7f);
740                 cpc_writeb(falcbase + F_REG(RTR1, ch), 0x7f);
741         }
742         cpc_writeb(falcbase + F_REG(ICB2, ch), 0);
743         cpc_writeb(falcbase + F_REG(TTR2, ch), 0xff);
744         cpc_writeb(falcbase + F_REG(RTR2, ch), 0xff);
745         cpc_writeb(falcbase + F_REG(ICB3, ch), 0);
746         cpc_writeb(falcbase + F_REG(TTR3, ch), 0xff);
747         cpc_writeb(falcbase + F_REG(RTR3, ch), 0xff);
748         if (conf->media == IF_IFACE_E1) {
749                 cpc_writeb(falcbase + F_REG(ICB4, ch), 0);
750                 cpc_writeb(falcbase + F_REG(TTR4, ch), 0xff);
751                 cpc_writeb(falcbase + F_REG(RTR4, ch), 0xff);
752         } else {
753                 cpc_writeb(falcbase + F_REG(ICB4, ch), 0xff);
754                 cpc_writeb(falcbase + F_REG(TTR4, ch), 0x80);
755                 cpc_writeb(falcbase + F_REG(RTR4, ch), 0x80);
756         }
757 }
758
759 static void falc_init_timeslot(pc300_t * card, int ch)
760 {
761         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
762         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
763         falc_t *pfalc = (falc_t *) & chan->falc;
764         int tslot;
765
766         for (tslot = 0; tslot < pfalc->num_channels; tslot++) {
767                 if (conf->tslot_bitmap & (1 << tslot)) {
768                         // Channel enabled
769                         falc_open_timeslot(card, ch, tslot + 1);
770                 } else {
771                         // Channel disabled
772                         falc_close_timeslot(card, ch, tslot + 1);
773                 }
774         }
775 }
776
777 static void falc_enable_comm(pc300_t * card, int ch)
778 {
779         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
780         falc_t *pfalc = (falc_t *) & chan->falc;
781
782         if (pfalc->full_bandwidth) {
783                 falc_open_all_timeslots(card, ch);
784         } else {
785                 falc_init_timeslot(card, ch);
786         }
787         // CTS/DCD ON
788         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
789                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) &
790                    ~((CPLD_REG1_FALC_DCD | CPLD_REG1_FALC_CTS) << (2 * ch)));
791 }
792
793 static void falc_disable_comm(pc300_t * card, int ch)
794 {
795         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
796         falc_t *pfalc = (falc_t *) & chan->falc;
797
798         if (pfalc->loop_active != 2) {
799                 falc_close_all_timeslots(card, ch);
800         }
801         // CTS/DCD OFF
802         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
803                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) |
804                    ((CPLD_REG1_FALC_DCD | CPLD_REG1_FALC_CTS) << (2 * ch)));
805 }
806
807 static void falc_init_t1(pc300_t * card, int ch)
808 {
809         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
810         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
811         falc_t *pfalc = (falc_t *) & chan->falc;
812         void __iomem *falcbase = card->hw.falcbase;
813         u8 dja = (ch ? (LIM2_DJA2 | LIM2_DJA1) : 0);
814
815         /* Switch to T1 mode (PCM 24) */
816         cpc_writeb(falcbase + F_REG(FMR1, ch), FMR1_PMOD);
817
818         /* Wait 20 us for setup */
819         udelay(20);
820
821         /* Transmit Buffer Size (1 frame) */
822         cpc_writeb(falcbase + F_REG(SIC1, ch), SIC1_XBS0);
823
824         /* Clock mode */
825         if (conf->phys_settings.clock_type == CLOCK_INT) { /* Master mode */
826                 cpc_writeb(falcbase + F_REG(LIM0, ch),
827                            cpc_readb(falcbase + F_REG(LIM0, ch)) | LIM0_MAS);
828         } else { /* Slave mode */
829                 cpc_writeb(falcbase + F_REG(LIM0, ch),
830                            cpc_readb(falcbase + F_REG(LIM0, ch)) & ~LIM0_MAS);
831                 cpc_writeb(falcbase + F_REG(LOOP, ch),
832                            cpc_readb(falcbase + F_REG(LOOP, ch)) & ~LOOP_RTM);
833         }
834
835         cpc_writeb(falcbase + F_REG(IPC, ch), IPC_SCI);
836         cpc_writeb(falcbase + F_REG(FMR0, ch),
837                    cpc_readb(falcbase + F_REG(FMR0, ch)) &
838                    ~(FMR0_XC0 | FMR0_XC1 | FMR0_RC0 | FMR0_RC1));
839
840         switch (conf->lcode) {
841                 case PC300_LC_AMI:
842                         cpc_writeb(falcbase + F_REG(FMR0, ch),
843                                    cpc_readb(falcbase + F_REG(FMR0, ch)) |
844                                    FMR0_XC1 | FMR0_RC1);
845                         /* Clear Channel register to ON for all channels */
846                         cpc_writeb(falcbase + F_REG(CCB1, ch), 0xff);
847                         cpc_writeb(falcbase + F_REG(CCB2, ch), 0xff);
848                         cpc_writeb(falcbase + F_REG(CCB3, ch), 0xff);
849                         break;
850
851                 case PC300_LC_B8ZS:
852                         cpc_writeb(falcbase + F_REG(FMR0, ch),
853                                    cpc_readb(falcbase + F_REG(FMR0, ch)) |
854                                    FMR0_XC0 | FMR0_XC1 | FMR0_RC0 | FMR0_RC1);
855                         break;
856
857                 case PC300_LC_NRZ:
858                         cpc_writeb(falcbase + F_REG(FMR0, ch),
859                                    cpc_readb(falcbase + F_REG(FMR0, ch)) | 0x00);
860                         break;
861         }
862
863         cpc_writeb(falcbase + F_REG(LIM0, ch),
864                    cpc_readb(falcbase + F_REG(LIM0, ch)) | LIM0_ELOS);
865         cpc_writeb(falcbase + F_REG(LIM0, ch),
866                    cpc_readb(falcbase + F_REG(LIM0, ch)) & ~(LIM0_SCL1 | LIM0_SCL0));
867         /* Set interface mode to 2 MBPS */
868         cpc_writeb(falcbase + F_REG(FMR1, ch),
869                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_IMOD);
870
871         switch (conf->fr_mode) {
872                 case PC300_FR_ESF:
873                         pfalc->multiframe_mode = 0;
874                         cpc_writeb(falcbase + F_REG(FMR4, ch),
875                                    cpc_readb(falcbase + F_REG(FMR4, ch)) | FMR4_FM1);
876                         cpc_writeb(falcbase + F_REG(FMR1, ch),
877                                    cpc_readb(falcbase + F_REG(FMR1, ch)) | 
878                                    FMR1_CRC | FMR1_EDL);
879                         cpc_writeb(falcbase + F_REG(XDL1, ch), 0);
880                         cpc_writeb(falcbase + F_REG(XDL2, ch), 0);
881                         cpc_writeb(falcbase + F_REG(XDL3, ch), 0);
882                         cpc_writeb(falcbase + F_REG(FMR0, ch),
883                                    cpc_readb(falcbase + F_REG(FMR0, ch)) & ~FMR0_SRAF);
884                         cpc_writeb(falcbase + F_REG(FMR2, ch),
885                                    cpc_readb(falcbase + F_REG(FMR2,ch)) | FMR2_MCSP | FMR2_SSP);
886                         break;
887
888                 case PC300_FR_D4:
889                         pfalc->multiframe_mode = 1;
890                         cpc_writeb(falcbase + F_REG(FMR4, ch),
891                                    cpc_readb(falcbase + F_REG(FMR4, ch)) &
892                                    ~(FMR4_FM1 | FMR4_FM0));
893                         cpc_writeb(falcbase + F_REG(FMR0, ch),
894                                    cpc_readb(falcbase + F_REG(FMR0, ch)) | FMR0_SRAF);
895                         cpc_writeb(falcbase + F_REG(FMR2, ch),
896                                    cpc_readb(falcbase + F_REG(FMR2, ch)) & ~FMR2_SSP);
897                         break;
898         }
899
900         /* Enable Automatic Resynchronization */
901         cpc_writeb(falcbase + F_REG(FMR4, ch),
902                    cpc_readb(falcbase + F_REG(FMR4, ch)) | FMR4_AUTO);
903
904         /* Transmit Automatic Remote Alarm */
905         cpc_writeb(falcbase + F_REG(FMR2, ch),
906                    cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_AXRA);
907
908         /* Channel translation mode 1 : one to one */
909         cpc_writeb(falcbase + F_REG(FMR1, ch),
910                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_CTM);
911
912         /* No signaling */
913         cpc_writeb(falcbase + F_REG(FMR1, ch),
914                    cpc_readb(falcbase + F_REG(FMR1, ch)) & ~FMR1_SIGM);
915         cpc_writeb(falcbase + F_REG(FMR5, ch),
916                    cpc_readb(falcbase + F_REG(FMR5, ch)) &
917                    ~(FMR5_EIBR | FMR5_SRS));
918         cpc_writeb(falcbase + F_REG(CCR1, ch), 0);
919
920         cpc_writeb(falcbase + F_REG(LIM1, ch),
921                    cpc_readb(falcbase + F_REG(LIM1, ch)) | LIM1_RIL0 | LIM1_RIL1);
922
923         switch (conf->lbo) {
924                         /* Provides proper Line Build Out */
925                 case PC300_LBO_0_DB:
926                         cpc_writeb(falcbase + F_REG(LIM2, ch), (LIM2_LOS1 | dja));
927                         cpc_writeb(falcbase + F_REG(XPM0, ch), 0x5a);
928                         cpc_writeb(falcbase + F_REG(XPM1, ch), 0x8f);
929                         cpc_writeb(falcbase + F_REG(XPM2, ch), 0x20);
930                         break;
931                 case PC300_LBO_7_5_DB:
932                         cpc_writeb(falcbase + F_REG(LIM2, ch), (0x40 | LIM2_LOS1 | dja));
933                         cpc_writeb(falcbase + F_REG(XPM0, ch), 0x11);
934                         cpc_writeb(falcbase + F_REG(XPM1, ch), 0x02);
935                         cpc_writeb(falcbase + F_REG(XPM2, ch), 0x20);
936                         break;
937                 case PC300_LBO_15_DB:
938                         cpc_writeb(falcbase + F_REG(LIM2, ch), (0x80 | LIM2_LOS1 | dja));
939                         cpc_writeb(falcbase + F_REG(XPM0, ch), 0x8e);
940                         cpc_writeb(falcbase + F_REG(XPM1, ch), 0x01);
941                         cpc_writeb(falcbase + F_REG(XPM2, ch), 0x20);
942                         break;
943                 case PC300_LBO_22_5_DB:
944                         cpc_writeb(falcbase + F_REG(LIM2, ch), (0xc0 | LIM2_LOS1 | dja));
945                         cpc_writeb(falcbase + F_REG(XPM0, ch), 0x09);
946                         cpc_writeb(falcbase + F_REG(XPM1, ch), 0x01);
947                         cpc_writeb(falcbase + F_REG(XPM2, ch), 0x20);
948                         break;
949         }
950
951         /* Transmit Clock-Slot Offset */
952         cpc_writeb(falcbase + F_REG(XC0, ch),
953                    cpc_readb(falcbase + F_REG(XC0, ch)) | 0x01);
954         /* Transmit Time-slot Offset */
955         cpc_writeb(falcbase + F_REG(XC1, ch), 0x3e);
956         /* Receive  Clock-Slot offset */
957         cpc_writeb(falcbase + F_REG(RC0, ch), 0x05);
958         /* Receive  Time-slot offset */
959         cpc_writeb(falcbase + F_REG(RC1, ch), 0x00);
960
961         /* LOS Detection after 176 consecutive 0s */
962         cpc_writeb(falcbase + F_REG(PCDR, ch), 0x0a);
963         /* LOS Recovery after 22 ones in the time window of PCD */
964         cpc_writeb(falcbase + F_REG(PCRR, ch), 0x15);
965
966         cpc_writeb(falcbase + F_REG(IDLE, ch), 0x7f);
967
968         if (conf->fr_mode == PC300_FR_ESF_JAPAN) {
969                 cpc_writeb(falcbase + F_REG(RC1, ch),
970                            cpc_readb(falcbase + F_REG(RC1, ch)) | 0x80);
971         }
972
973         falc_close_all_timeslots(card, ch);
974 }
975
976 static void falc_init_e1(pc300_t * card, int ch)
977 {
978         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
979         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
980         falc_t *pfalc = (falc_t *) & chan->falc;
981         void __iomem *falcbase = card->hw.falcbase;
982         u8 dja = (ch ? (LIM2_DJA2 | LIM2_DJA1) : 0);
983
984         /* Switch to E1 mode (PCM 30) */
985         cpc_writeb(falcbase + F_REG(FMR1, ch),
986                    cpc_readb(falcbase + F_REG(FMR1, ch)) & ~FMR1_PMOD);
987
988         /* Clock mode */
989         if (conf->phys_settings.clock_type == CLOCK_INT) { /* Master mode */
990                 cpc_writeb(falcbase + F_REG(LIM0, ch),
991                            cpc_readb(falcbase + F_REG(LIM0, ch)) | LIM0_MAS);
992         } else { /* Slave mode */
993                 cpc_writeb(falcbase + F_REG(LIM0, ch),
994                            cpc_readb(falcbase + F_REG(LIM0, ch)) & ~LIM0_MAS);
995         }
996         cpc_writeb(falcbase + F_REG(LOOP, ch),
997                    cpc_readb(falcbase + F_REG(LOOP, ch)) & ~LOOP_SFM);
998
999         cpc_writeb(falcbase + F_REG(IPC, ch), IPC_SCI);
1000         cpc_writeb(falcbase + F_REG(FMR0, ch),
1001                    cpc_readb(falcbase + F_REG(FMR0, ch)) &
1002                    ~(FMR0_XC0 | FMR0_XC1 | FMR0_RC0 | FMR0_RC1));
1003
1004         switch (conf->lcode) {
1005                 case PC300_LC_AMI:
1006                         cpc_writeb(falcbase + F_REG(FMR0, ch),
1007                                    cpc_readb(falcbase + F_REG(FMR0, ch)) |
1008                                    FMR0_XC1 | FMR0_RC1);
1009                         break;
1010
1011                 case PC300_LC_HDB3:
1012                         cpc_writeb(falcbase + F_REG(FMR0, ch),
1013                                    cpc_readb(falcbase + F_REG(FMR0, ch)) |
1014                                    FMR0_XC0 | FMR0_XC1 | FMR0_RC0 | FMR0_RC1);
1015                         break;
1016
1017                 case PC300_LC_NRZ:
1018                         break;
1019         }
1020
1021         cpc_writeb(falcbase + F_REG(LIM0, ch),
1022                    cpc_readb(falcbase + F_REG(LIM0, ch)) & ~(LIM0_SCL1 | LIM0_SCL0));
1023         /* Set interface mode to 2 MBPS */
1024         cpc_writeb(falcbase + F_REG(FMR1, ch),
1025                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_IMOD);
1026
1027         cpc_writeb(falcbase + F_REG(XPM0, ch), 0x18);
1028         cpc_writeb(falcbase + F_REG(XPM1, ch), 0x03);
1029         cpc_writeb(falcbase + F_REG(XPM2, ch), 0x00);
1030
1031         switch (conf->fr_mode) {
1032                 case PC300_FR_MF_CRC4:
1033                         pfalc->multiframe_mode = 1;
1034                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1035                                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_XFS);
1036                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1037                                    cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_RFS1);
1038                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1039                                    cpc_readb(falcbase + F_REG(FMR2, ch)) & ~FMR2_RFS0);
1040                         cpc_writeb(falcbase + F_REG(FMR3, ch),
1041                                    cpc_readb(falcbase + F_REG(FMR3, ch)) & ~FMR3_EXTIW);
1042
1043                         /* MultiFrame Resynchronization */
1044                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1045                                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_MFCS);
1046
1047                         /* Automatic Loss of Multiframe > 914 CRC errors */
1048                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1049                                    cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_ALMF);
1050
1051                         /* S1 and SI1/SI2 spare Bits set to 1 */
1052                         cpc_writeb(falcbase + F_REG(XSP, ch),
1053                                    cpc_readb(falcbase + F_REG(XSP, ch)) & ~XSP_AXS);
1054                         cpc_writeb(falcbase + F_REG(XSP, ch),
1055                                    cpc_readb(falcbase + F_REG(XSP, ch)) | XSP_EBP);
1056                         cpc_writeb(falcbase + F_REG(XSP, ch),
1057                                    cpc_readb(falcbase + F_REG(XSP, ch)) | XSP_XS13 | XSP_XS15);
1058
1059                         /* Automatic Force Resynchronization */
1060                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1061                                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_AFR);
1062
1063                         /* Transmit Automatic Remote Alarm */
1064                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1065                                    cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_AXRA);
1066
1067                         /* Transmit Spare Bits for National Use (Y, Sn, Sa) */
1068                         cpc_writeb(falcbase + F_REG(XSW, ch),
1069                                    cpc_readb(falcbase + F_REG(XSW, ch)) |
1070                                    XSW_XY0 | XSW_XY1 | XSW_XY2 | XSW_XY3 | XSW_XY4);
1071                         break;
1072
1073                 case PC300_FR_MF_NON_CRC4:
1074                 case PC300_FR_D4:
1075                         pfalc->multiframe_mode = 0;
1076                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1077                                    cpc_readb(falcbase + F_REG(FMR1, ch)) & ~FMR1_XFS);
1078                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1079                                    cpc_readb(falcbase + F_REG(FMR2, ch)) & 
1080                                    ~(FMR2_RFS1 | FMR2_RFS0));
1081                         cpc_writeb(falcbase + F_REG(XSW, ch),
1082                                    cpc_readb(falcbase + F_REG(XSW, ch)) | XSW_XSIS);
1083                         cpc_writeb(falcbase + F_REG(XSP, ch),
1084                                    cpc_readb(falcbase + F_REG(XSP, ch)) | XSP_XSIF);
1085
1086                         /* Automatic Force Resynchronization */
1087                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1088                                    cpc_readb(falcbase + F_REG(FMR1, ch)) | FMR1_AFR);
1089
1090                         /* Transmit Automatic Remote Alarm */
1091                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1092                                    cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_AXRA);
1093
1094                         /* Transmit Spare Bits for National Use (Y, Sn, Sa) */
1095                         cpc_writeb(falcbase + F_REG(XSW, ch),
1096                                    cpc_readb(falcbase + F_REG(XSW, ch)) |
1097                                    XSW_XY0 | XSW_XY1 | XSW_XY2 | XSW_XY3 | XSW_XY4);
1098                         break;
1099
1100                 case PC300_FR_UNFRAMED:
1101                         pfalc->multiframe_mode = 0;
1102                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1103                                    cpc_readb(falcbase + F_REG(FMR1, ch)) & ~FMR1_XFS);
1104                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1105                                    cpc_readb(falcbase + F_REG(FMR2, ch)) & 
1106                                    ~(FMR2_RFS1 | FMR2_RFS0));
1107                         cpc_writeb(falcbase + F_REG(XSP, ch),
1108                                    cpc_readb(falcbase + F_REG(XSP, ch)) | XSP_TT0);
1109                         cpc_writeb(falcbase + F_REG(XSW, ch),
1110                                    cpc_readb(falcbase + F_REG(XSW, ch)) & 
1111                                    ~(XSW_XTM|XSW_XY0|XSW_XY1|XSW_XY2|XSW_XY3|XSW_XY4));
1112                         cpc_writeb(falcbase + F_REG(TSWM, ch), 0xff);
1113                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1114                                    cpc_readb(falcbase + F_REG(FMR2, ch)) |
1115                                    (FMR2_RTM | FMR2_DAIS));
1116                         cpc_writeb(falcbase + F_REG(FMR2, ch),
1117                                    cpc_readb(falcbase + F_REG(FMR2, ch)) & ~FMR2_AXRA);
1118                         cpc_writeb(falcbase + F_REG(FMR1, ch),
1119                                    cpc_readb(falcbase + F_REG(FMR1, ch)) & ~FMR1_AFR);
1120                         pfalc->sync = 1;
1121                         cpc_writeb(falcbase + card->hw.cpld_reg2,
1122                                    cpc_readb(falcbase + card->hw.cpld_reg2) |
1123                                    (CPLD_REG2_FALC_LED2 << (2 * ch)));
1124                         break;
1125         }
1126
1127         /* No signaling */
1128         cpc_writeb(falcbase + F_REG(XSP, ch),
1129                    cpc_readb(falcbase + F_REG(XSP, ch)) & ~XSP_CASEN);
1130         cpc_writeb(falcbase + F_REG(CCR1, ch), 0);
1131
1132         cpc_writeb(falcbase + F_REG(LIM1, ch),
1133                    cpc_readb(falcbase + F_REG(LIM1, ch)) | LIM1_RIL0 | LIM1_RIL1);
1134         cpc_writeb(falcbase + F_REG(LIM2, ch), (LIM2_LOS1 | dja));
1135
1136         /* Transmit Clock-Slot Offset */
1137         cpc_writeb(falcbase + F_REG(XC0, ch),
1138                    cpc_readb(falcbase + F_REG(XC0, ch)) | 0x01);
1139         /* Transmit Time-slot Offset */
1140         cpc_writeb(falcbase + F_REG(XC1, ch), 0x3e);
1141         /* Receive  Clock-Slot offset */
1142         cpc_writeb(falcbase + F_REG(RC0, ch), 0x05);
1143         /* Receive  Time-slot offset */
1144         cpc_writeb(falcbase + F_REG(RC1, ch), 0x00);
1145
1146         /* LOS Detection after 176 consecutive 0s */
1147         cpc_writeb(falcbase + F_REG(PCDR, ch), 0x0a);
1148         /* LOS Recovery after 22 ones in the time window of PCD */
1149         cpc_writeb(falcbase + F_REG(PCRR, ch), 0x15);
1150
1151         cpc_writeb(falcbase + F_REG(IDLE, ch), 0x7f);
1152
1153         falc_close_all_timeslots(card, ch);
1154 }
1155
1156 static void falc_init_hdlc(pc300_t * card, int ch)
1157 {
1158         void __iomem *falcbase = card->hw.falcbase;
1159         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1160         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1161
1162         /* Enable transparent data transfer */
1163         if (conf->fr_mode == PC300_FR_UNFRAMED) {
1164                 cpc_writeb(falcbase + F_REG(MODE, ch), 0);
1165         } else {
1166                 cpc_writeb(falcbase + F_REG(MODE, ch),
1167                            cpc_readb(falcbase + F_REG(MODE, ch)) |
1168                            (MODE_HRAC | MODE_MDS2));
1169                 cpc_writeb(falcbase + F_REG(RAH2, ch), 0xff);
1170                 cpc_writeb(falcbase + F_REG(RAH1, ch), 0xff);
1171                 cpc_writeb(falcbase + F_REG(RAL2, ch), 0xff);
1172                 cpc_writeb(falcbase + F_REG(RAL1, ch), 0xff);
1173         }
1174
1175         /* Tx/Rx reset  */
1176         falc_issue_cmd(card, ch, CMDR_RRES | CMDR_XRES | CMDR_SRES);
1177
1178         /* Enable interrupt sources */
1179         falc_intr_enable(card, ch);
1180 }
1181
1182 static void te_config(pc300_t * card, int ch)
1183 {
1184         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1185         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1186         falc_t *pfalc = (falc_t *) & chan->falc;
1187         void __iomem *falcbase = card->hw.falcbase;
1188         u8 dummy;
1189         unsigned long flags;
1190
1191         memset(pfalc, 0, sizeof(falc_t));
1192         switch (conf->media) {
1193                 case IF_IFACE_T1:
1194                         pfalc->num_channels = NUM_OF_T1_CHANNELS;
1195                         pfalc->offset = 1;
1196                         break;
1197                 case IF_IFACE_E1:
1198                         pfalc->num_channels = NUM_OF_E1_CHANNELS;
1199                         pfalc->offset = 0;
1200                         break;
1201         }
1202         if (conf->tslot_bitmap == 0xffffffffUL)
1203                 pfalc->full_bandwidth = 1;
1204         else
1205                 pfalc->full_bandwidth = 0;
1206
1207         CPC_LOCK(card, flags);
1208         /* Reset the FALC chip */
1209         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
1210                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) |
1211                    (CPLD_REG1_FALC_RESET << (2 * ch)));
1212         udelay(10000);
1213         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
1214                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) &
1215                    ~(CPLD_REG1_FALC_RESET << (2 * ch)));
1216
1217         if (conf->media == IF_IFACE_T1) {
1218                 falc_init_t1(card, ch);
1219         } else {
1220                 falc_init_e1(card, ch);
1221         }
1222         falc_init_hdlc(card, ch);
1223         if (conf->rx_sens == PC300_RX_SENS_SH) {
1224                 cpc_writeb(falcbase + F_REG(LIM0, ch),
1225                            cpc_readb(falcbase + F_REG(LIM0, ch)) & ~LIM0_EQON);
1226         } else {
1227                 cpc_writeb(falcbase + F_REG(LIM0, ch),
1228                            cpc_readb(falcbase + F_REG(LIM0, ch)) | LIM0_EQON);
1229         }
1230         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
1231                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg2) |
1232                    ((CPLD_REG2_FALC_TX_CLK | CPLD_REG2_FALC_RX_CLK) << (2 * ch)));
1233
1234         /* Clear all interrupt registers */
1235         dummy = cpc_readb(falcbase + F_REG(FISR0, ch)) +
1236                 cpc_readb(falcbase + F_REG(FISR1, ch)) +
1237                 cpc_readb(falcbase + F_REG(FISR2, ch)) +
1238                 cpc_readb(falcbase + F_REG(FISR3, ch));
1239         CPC_UNLOCK(card, flags);
1240 }
1241
1242 static void falc_check_status(pc300_t * card, int ch, unsigned char frs0)
1243 {
1244         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1245         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1246         falc_t *pfalc = (falc_t *) & chan->falc;
1247         void __iomem *falcbase = card->hw.falcbase;
1248
1249         /* Verify LOS */
1250         if (frs0 & FRS0_LOS) {
1251                 if (!pfalc->red_alarm) {
1252                         pfalc->red_alarm = 1;
1253                         pfalc->los++;
1254                         if (!pfalc->blue_alarm) {
1255                                 // EVENT_FALC_ABNORMAL
1256                                 if (conf->media == IF_IFACE_T1) {
1257                                         /* Disable this interrupt as it may otherwise interfere 
1258                                          * with other working boards. */
1259                                         cpc_writeb(falcbase + F_REG(IMR0, ch), 
1260                                                    cpc_readb(falcbase + F_REG(IMR0, ch))
1261                                                    | IMR0_PDEN);
1262                                 }
1263                                 falc_disable_comm(card, ch);
1264                                 // EVENT_FALC_ABNORMAL
1265                         }
1266                 }
1267         } else {
1268                 if (pfalc->red_alarm) {
1269                         pfalc->red_alarm = 0;
1270                         pfalc->losr++;
1271                 }
1272         }
1273
1274         if (conf->fr_mode != PC300_FR_UNFRAMED) {
1275                 /* Verify AIS alarm */
1276                 if (frs0 & FRS0_AIS) {
1277                         if (!pfalc->blue_alarm) {
1278                                 pfalc->blue_alarm = 1;
1279                                 pfalc->ais++;
1280                                 // EVENT_AIS
1281                                 if (conf->media == IF_IFACE_T1) {
1282                                         /* Disable this interrupt as it may otherwise interfere with                       other working boards. */
1283                                         cpc_writeb(falcbase + F_REG(IMR0, ch),
1284                                                    cpc_readb(falcbase + F_REG(IMR0, ch)) | IMR0_PDEN);
1285                                 }
1286                                 falc_disable_comm(card, ch);
1287                                 // EVENT_AIS
1288                         }
1289                 } else {
1290                         pfalc->blue_alarm = 0;
1291                 }
1292
1293                 /* Verify LFA */
1294                 if (frs0 & FRS0_LFA) {
1295                         if (!pfalc->loss_fa) {
1296                                 pfalc->loss_fa = 1;
1297                                 pfalc->lfa++;
1298                                 if (!pfalc->blue_alarm && !pfalc->red_alarm) {
1299                                         // EVENT_FALC_ABNORMAL
1300                                         if (conf->media == IF_IFACE_T1) {
1301                                                 /* Disable this interrupt as it may otherwise 
1302                                                  * interfere with other working boards. */
1303                                                 cpc_writeb(falcbase + F_REG(IMR0, ch),
1304                                                            cpc_readb(falcbase + F_REG(IMR0, ch))
1305                                                            | IMR0_PDEN);
1306                                         }
1307                                         falc_disable_comm(card, ch);
1308                                         // EVENT_FALC_ABNORMAL
1309                                 }
1310                         }
1311                 } else {
1312                         if (pfalc->loss_fa) {
1313                                 pfalc->loss_fa = 0;
1314                                 pfalc->farec++;
1315                         }
1316                 }
1317
1318                 /* Verify LMFA */
1319                 if (pfalc->multiframe_mode && (frs0 & FRS0_LMFA)) {
1320                         /* D4 or CRC4 frame mode */
1321                         if (!pfalc->loss_mfa) {
1322                                 pfalc->loss_mfa = 1;
1323                                 pfalc->lmfa++;
1324                                 if (!pfalc->blue_alarm && !pfalc->red_alarm &&
1325                                     !pfalc->loss_fa) {
1326                                         // EVENT_FALC_ABNORMAL
1327                                         if (conf->media == IF_IFACE_T1) {
1328                                                 /* Disable this interrupt as it may otherwise 
1329                                                  * interfere with other working boards. */
1330                                                 cpc_writeb(falcbase + F_REG(IMR0, ch),
1331                                                            cpc_readb(falcbase + F_REG(IMR0, ch))
1332                                                            | IMR0_PDEN);
1333                                         }
1334                                         falc_disable_comm(card, ch);
1335                                         // EVENT_FALC_ABNORMAL
1336                                 }
1337                         }
1338                 } else {
1339                         pfalc->loss_mfa = 0;
1340                 }
1341
1342                 /* Verify Remote Alarm */
1343                 if (frs0 & FRS0_RRA) {
1344                         if (!pfalc->yellow_alarm) {
1345                                 pfalc->yellow_alarm = 1;
1346                                 pfalc->rai++;
1347                                 if (pfalc->sync) {
1348                                         // EVENT_RAI
1349                                         falc_disable_comm(card, ch);
1350                                         // EVENT_RAI
1351                                 }
1352                         }
1353                 } else {
1354                         pfalc->yellow_alarm = 0;
1355                 }
1356         } /* if !PC300_UNFRAMED */
1357
1358         if (pfalc->red_alarm || pfalc->loss_fa ||
1359             pfalc->loss_mfa || pfalc->blue_alarm) {
1360                 if (pfalc->sync) {
1361                         pfalc->sync = 0;
1362                         chan->d.line_off++;
1363                         cpc_writeb(falcbase + card->hw.cpld_reg2,
1364                                    cpc_readb(falcbase + card->hw.cpld_reg2) &
1365                                    ~(CPLD_REG2_FALC_LED2 << (2 * ch)));
1366                 }
1367         } else {
1368                 if (!pfalc->sync) {
1369                         pfalc->sync = 1;
1370                         chan->d.line_on++;
1371                         cpc_writeb(falcbase + card->hw.cpld_reg2,
1372                                    cpc_readb(falcbase + card->hw.cpld_reg2) |
1373                                    (CPLD_REG2_FALC_LED2 << (2 * ch)));
1374                 }
1375         }
1376
1377         if (pfalc->sync && !pfalc->yellow_alarm) {
1378                 if (!pfalc->active) {
1379                         // EVENT_FALC_NORMAL
1380                         if (pfalc->loop_active) {
1381                                 return;
1382                         }
1383                         if (conf->media == IF_IFACE_T1) {
1384                                 cpc_writeb(falcbase + F_REG(IMR0, ch),
1385                                            cpc_readb(falcbase + F_REG(IMR0, ch)) & ~IMR0_PDEN);
1386                         }
1387                         falc_enable_comm(card, ch);
1388                         // EVENT_FALC_NORMAL
1389                         pfalc->active = 1;
1390                 }
1391         } else {
1392                 if (pfalc->active) {
1393                         pfalc->active = 0;
1394                 }
1395         }
1396 }
1397
1398 static void falc_update_stats(pc300_t * card, int ch)
1399 {
1400         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1401         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1402         falc_t *pfalc = (falc_t *) & chan->falc;
1403         void __iomem *falcbase = card->hw.falcbase;
1404         u16 counter;
1405
1406         counter = cpc_readb(falcbase + F_REG(FECL, ch));
1407         counter |= cpc_readb(falcbase + F_REG(FECH, ch)) << 8;
1408         pfalc->fec += counter;
1409
1410         counter = cpc_readb(falcbase + F_REG(CVCL, ch));
1411         counter |= cpc_readb(falcbase + F_REG(CVCH, ch)) << 8;
1412         pfalc->cvc += counter;
1413
1414         counter = cpc_readb(falcbase + F_REG(CECL, ch));
1415         counter |= cpc_readb(falcbase + F_REG(CECH, ch)) << 8;
1416         pfalc->cec += counter;
1417
1418         counter = cpc_readb(falcbase + F_REG(EBCL, ch));
1419         counter |= cpc_readb(falcbase + F_REG(EBCH, ch)) << 8;
1420         pfalc->ebc += counter;
1421
1422         if (cpc_readb(falcbase + F_REG(LCR1, ch)) & LCR1_EPRM) {
1423                 mdelay(10);
1424                 counter = cpc_readb(falcbase + F_REG(BECL, ch));
1425                 counter |= cpc_readb(falcbase + F_REG(BECH, ch)) << 8;
1426                 pfalc->bec += counter;
1427
1428                 if (((conf->media == IF_IFACE_T1) &&
1429                      (cpc_readb(falcbase + F_REG(FRS1, ch)) & FRS1_LLBAD) &&
1430                      (!(cpc_readb(falcbase + F_REG(FRS1, ch)) & FRS1_PDEN)))
1431                     ||
1432                     ((conf->media == IF_IFACE_E1) &&
1433                      (cpc_readb(falcbase + F_REG(RSP, ch)) & RSP_LLBAD))) {
1434                         pfalc->prbs = 2;
1435                 } else {
1436                         pfalc->prbs = 1;
1437                 }
1438         }
1439 }
1440
1441 /*----------------------------------------------------------------------------
1442  * falc_remote_loop
1443  *----------------------------------------------------------------------------
1444  * Description: In the remote loopback mode the clock and data recovered
1445  *              from the line inputs RL1/2 or RDIP/RDIN are routed back
1446  *              to the line outputs XL1/2 or XDOP/XDON via the analog
1447  *              transmitter. As in normal mode they are processsed by
1448  *              the synchronizer and then sent to the system interface.
1449  *----------------------------------------------------------------------------
1450  */
1451 static void falc_remote_loop(pc300_t * card, int ch, int loop_on)
1452 {
1453         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1454         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1455         falc_t *pfalc = (falc_t *) & chan->falc;
1456         void __iomem *falcbase = card->hw.falcbase;
1457
1458         if (loop_on) {
1459                 // EVENT_FALC_ABNORMAL
1460                 if (conf->media == IF_IFACE_T1) {
1461                         /* Disable this interrupt as it may otherwise interfere with 
1462                          * other working boards. */
1463                         cpc_writeb(falcbase + F_REG(IMR0, ch),
1464                                    cpc_readb(falcbase + F_REG(IMR0, ch)) | IMR0_PDEN);
1465                 }
1466                 falc_disable_comm(card, ch);
1467                 // EVENT_FALC_ABNORMAL
1468                 cpc_writeb(falcbase + F_REG(LIM1, ch),
1469                            cpc_readb(falcbase + F_REG(LIM1, ch)) | LIM1_RL);
1470                 pfalc->loop_active = 1;
1471         } else {
1472                 cpc_writeb(falcbase + F_REG(LIM1, ch),
1473                            cpc_readb(falcbase + F_REG(LIM1, ch)) & ~LIM1_RL);
1474                 pfalc->sync = 0;
1475                 cpc_writeb(falcbase + card->hw.cpld_reg2,
1476                            cpc_readb(falcbase + card->hw.cpld_reg2) &
1477                            ~(CPLD_REG2_FALC_LED2 << (2 * ch)));
1478                 pfalc->active = 0;
1479                 falc_issue_cmd(card, ch, CMDR_XRES);
1480                 pfalc->loop_active = 0;
1481         }
1482 }
1483
1484 /*----------------------------------------------------------------------------
1485  * falc_local_loop
1486  *----------------------------------------------------------------------------
1487  * Description: The local loopback mode disconnects the receive lines 
1488  *              RL1/RL2 resp. RDIP/RDIN from the receiver. Instead of the
1489  *              signals coming from the line the data provided by system
1490  *              interface are routed through the analog receiver back to
1491  *              the system interface. The unipolar bit stream will be
1492  *              undisturbed transmitted on the line. Receiver and transmitter
1493  *              coding must be identical.
1494  *----------------------------------------------------------------------------
1495  */
1496 static void falc_local_loop(pc300_t * card, int ch, int loop_on)
1497 {
1498         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1499         falc_t *pfalc = (falc_t *) & chan->falc;
1500         void __iomem *falcbase = card->hw.falcbase;
1501
1502         if (loop_on) {
1503                 cpc_writeb(falcbase + F_REG(LIM0, ch),
1504                            cpc_readb(falcbase + F_REG(LIM0, ch)) | LIM0_LL);
1505                 pfalc->loop_active = 1;
1506         } else {
1507                 cpc_writeb(falcbase + F_REG(LIM0, ch),
1508                            cpc_readb(falcbase + F_REG(LIM0, ch)) & ~LIM0_LL);
1509                 pfalc->loop_active = 0;
1510         }
1511 }
1512
1513 /*----------------------------------------------------------------------------
1514  * falc_payload_loop
1515  *----------------------------------------------------------------------------
1516  * Description: This routine allows to enable/disable payload loopback.
1517  *              When the payload loop is activated, the received 192 bits
1518  *              of payload data will be looped back to the transmit
1519  *              direction. The framing bits, CRC6 and DL bits are not 
1520  *              looped. They are originated by the FALC-LH transmitter.
1521  *----------------------------------------------------------------------------
1522  */
1523 static void falc_payload_loop(pc300_t * card, int ch, int loop_on)
1524 {
1525         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1526         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1527         falc_t *pfalc = (falc_t *) & chan->falc;
1528         void __iomem *falcbase = card->hw.falcbase;
1529
1530         if (loop_on) {
1531                 // EVENT_FALC_ABNORMAL
1532                 if (conf->media == IF_IFACE_T1) {
1533                         /* Disable this interrupt as it may otherwise interfere with 
1534                          * other working boards. */
1535                         cpc_writeb(falcbase + F_REG(IMR0, ch),
1536                                    cpc_readb(falcbase + F_REG(IMR0, ch)) | IMR0_PDEN);
1537                 }
1538                 falc_disable_comm(card, ch);
1539                 // EVENT_FALC_ABNORMAL
1540                 cpc_writeb(falcbase + F_REG(FMR2, ch),
1541                            cpc_readb(falcbase + F_REG(FMR2, ch)) | FMR2_PLB);
1542                 if (conf->media == IF_IFACE_T1) {
1543                         cpc_writeb(falcbase + F_REG(FMR4, ch),
1544                                    cpc_readb(falcbase + F_REG(FMR4, ch)) | FMR4_TM);
1545                 } else {
1546                         cpc_writeb(falcbase + F_REG(FMR5, ch),
1547                                    cpc_readb(falcbase + F_REG(FMR5, ch)) | XSP_TT0);
1548                 }
1549                 falc_open_all_timeslots(card, ch);
1550                 pfalc->loop_active = 2;
1551         } else {
1552                 cpc_writeb(falcbase + F_REG(FMR2, ch),
1553                            cpc_readb(falcbase + F_REG(FMR2, ch)) & ~FMR2_PLB);
1554                 if (conf->media == IF_IFACE_T1) {
1555                         cpc_writeb(falcbase + F_REG(FMR4, ch),
1556                                    cpc_readb(falcbase + F_REG(FMR4, ch)) & ~FMR4_TM);
1557                 } else {
1558                         cpc_writeb(falcbase + F_REG(FMR5, ch),
1559                                    cpc_readb(falcbase + F_REG(FMR5, ch)) & ~XSP_TT0);
1560                 }
1561                 pfalc->sync = 0;
1562                 cpc_writeb(falcbase + card->hw.cpld_reg2,
1563                            cpc_readb(falcbase + card->hw.cpld_reg2) &
1564                            ~(CPLD_REG2_FALC_LED2 << (2 * ch)));
1565                 pfalc->active = 0;
1566                 falc_issue_cmd(card, ch, CMDR_XRES);
1567                 pfalc->loop_active = 0;
1568         }
1569 }
1570
1571 /*----------------------------------------------------------------------------
1572  * turn_off_xlu
1573  *----------------------------------------------------------------------------
1574  * Description: Turns XLU bit off in the proper register
1575  *----------------------------------------------------------------------------
1576  */
1577 static void turn_off_xlu(pc300_t * card, int ch)
1578 {
1579         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1580         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1581         void __iomem *falcbase = card->hw.falcbase;
1582
1583         if (conf->media == IF_IFACE_T1) {
1584                 cpc_writeb(falcbase + F_REG(FMR5, ch),
1585                            cpc_readb(falcbase + F_REG(FMR5, ch)) & ~FMR5_XLU);
1586         } else {
1587                 cpc_writeb(falcbase + F_REG(FMR3, ch),
1588                            cpc_readb(falcbase + F_REG(FMR3, ch)) & ~FMR3_XLU);
1589         }
1590 }
1591
1592 /*----------------------------------------------------------------------------
1593  * turn_off_xld
1594  *----------------------------------------------------------------------------
1595  * Description: Turns XLD bit off in the proper register
1596  *----------------------------------------------------------------------------
1597  */
1598 static void turn_off_xld(pc300_t * card, int ch)
1599 {
1600         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1601         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1602         void __iomem *falcbase = card->hw.falcbase;
1603
1604         if (conf->media == IF_IFACE_T1) {
1605                 cpc_writeb(falcbase + F_REG(FMR5, ch),
1606                            cpc_readb(falcbase + F_REG(FMR5, ch)) & ~FMR5_XLD);
1607         } else {
1608                 cpc_writeb(falcbase + F_REG(FMR3, ch),
1609                            cpc_readb(falcbase + F_REG(FMR3, ch)) & ~FMR3_XLD);
1610         }
1611 }
1612
1613 /*----------------------------------------------------------------------------
1614  * falc_generate_loop_up_code
1615  *----------------------------------------------------------------------------
1616  * Description: This routine writes the proper FALC chip register in order
1617  *              to generate a LOOP activation code over a T1/E1 line.
1618  *----------------------------------------------------------------------------
1619  */
1620 static void falc_generate_loop_up_code(pc300_t * card, int ch)
1621 {
1622         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1623         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1624         falc_t *pfalc = (falc_t *) & chan->falc;
1625         void __iomem *falcbase = card->hw.falcbase;
1626
1627         if (conf->media == IF_IFACE_T1) {
1628                 cpc_writeb(falcbase + F_REG(FMR5, ch),
1629                            cpc_readb(falcbase + F_REG(FMR5, ch)) | FMR5_XLU);
1630         } else {
1631                 cpc_writeb(falcbase + F_REG(FMR3, ch),
1632                            cpc_readb(falcbase + F_REG(FMR3, ch)) | FMR3_XLU);
1633         }
1634         // EVENT_FALC_ABNORMAL
1635         if (conf->media == IF_IFACE_T1) {
1636                 /* Disable this interrupt as it may otherwise interfere with 
1637                  * other working boards. */
1638                 cpc_writeb(falcbase + F_REG(IMR0, ch),
1639                            cpc_readb(falcbase + F_REG(IMR0, ch)) | IMR0_PDEN);
1640         }
1641         falc_disable_comm(card, ch);
1642         // EVENT_FALC_ABNORMAL
1643         pfalc->loop_gen = 1;
1644 }
1645
1646 /*----------------------------------------------------------------------------
1647  * falc_generate_loop_down_code
1648  *----------------------------------------------------------------------------
1649  * Description: This routine writes the proper FALC chip register in order
1650  *              to generate a LOOP deactivation code over a T1/E1 line.
1651  *----------------------------------------------------------------------------
1652  */
1653 static void falc_generate_loop_down_code(pc300_t * card, int ch)
1654 {
1655         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1656         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1657         falc_t *pfalc = (falc_t *) & chan->falc;
1658         void __iomem *falcbase = card->hw.falcbase;
1659
1660         if (conf->media == IF_IFACE_T1) {
1661                 cpc_writeb(falcbase + F_REG(FMR5, ch),
1662                            cpc_readb(falcbase + F_REG(FMR5, ch)) | FMR5_XLD);
1663         } else {
1664                 cpc_writeb(falcbase + F_REG(FMR3, ch),
1665                            cpc_readb(falcbase + F_REG(FMR3, ch)) | FMR3_XLD);
1666         }
1667         pfalc->sync = 0;
1668         cpc_writeb(falcbase + card->hw.cpld_reg2,
1669                    cpc_readb(falcbase + card->hw.cpld_reg2) &
1670                    ~(CPLD_REG2_FALC_LED2 << (2 * ch)));
1671         pfalc->active = 0;
1672 //?    falc_issue_cmd(card, ch, CMDR_XRES);
1673         pfalc->loop_gen = 0;
1674 }
1675
1676 /*----------------------------------------------------------------------------
1677  * falc_pattern_test
1678  *----------------------------------------------------------------------------
1679  * Description: This routine generates a pattern code and checks
1680  *              it on the reception side.
1681  *----------------------------------------------------------------------------
1682  */
1683 static void falc_pattern_test(pc300_t * card, int ch, unsigned int activate)
1684 {
1685         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1686         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
1687         falc_t *pfalc = (falc_t *) & chan->falc;
1688         void __iomem *falcbase = card->hw.falcbase;
1689
1690         if (activate) {
1691                 pfalc->prbs = 1;
1692                 pfalc->bec = 0;
1693                 if (conf->media == IF_IFACE_T1) {
1694                         /* Disable local loop activation/deactivation detect */
1695                         cpc_writeb(falcbase + F_REG(IMR3, ch),
1696                                    cpc_readb(falcbase + F_REG(IMR3, ch)) | IMR3_LLBSC);
1697                 } else {
1698                         /* Disable local loop activation/deactivation detect */
1699                         cpc_writeb(falcbase + F_REG(IMR1, ch),
1700                                    cpc_readb(falcbase + F_REG(IMR1, ch)) | IMR1_LLBSC);
1701                 }
1702                 /* Activates generation and monitoring of PRBS 
1703                  * (Pseudo Random Bit Sequence) */
1704                 cpc_writeb(falcbase + F_REG(LCR1, ch),
1705                            cpc_readb(falcbase + F_REG(LCR1, ch)) | LCR1_EPRM | LCR1_XPRBS);
1706         } else {
1707                 pfalc->prbs = 0;
1708                 /* Deactivates generation and monitoring of PRBS 
1709                  * (Pseudo Random Bit Sequence) */
1710                 cpc_writeb(falcbase + F_REG(LCR1, ch),
1711                            cpc_readb(falcbase+F_REG(LCR1,ch)) & ~(LCR1_EPRM | LCR1_XPRBS));
1712                 if (conf->media == IF_IFACE_T1) {
1713                         /* Enable local loop activation/deactivation detect */
1714                         cpc_writeb(falcbase + F_REG(IMR3, ch),
1715                                    cpc_readb(falcbase + F_REG(IMR3, ch)) & ~IMR3_LLBSC);
1716                 } else {
1717                         /* Enable local loop activation/deactivation detect */
1718                         cpc_writeb(falcbase + F_REG(IMR1, ch),
1719                                    cpc_readb(falcbase + F_REG(IMR1, ch)) & ~IMR1_LLBSC);
1720                 }
1721         }
1722 }
1723
1724 /*----------------------------------------------------------------------------
1725  * falc_pattern_test_error
1726  *----------------------------------------------------------------------------
1727  * Description: This routine returns the bit error counter value
1728  *----------------------------------------------------------------------------
1729  */
1730 static u16 falc_pattern_test_error(pc300_t * card, int ch)
1731 {
1732         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
1733         falc_t *pfalc = (falc_t *) & chan->falc;
1734
1735         return (pfalc->bec);
1736 }
1737
1738 /**********************************/
1739 /***   Net Interface Routines   ***/
1740 /**********************************/
1741
1742 static void
1743 cpc_trace(struct net_device *dev, struct sk_buff *skb_main, char rx_tx)
1744 {
1745         struct sk_buff *skb;
1746
1747         if ((skb = dev_alloc_skb(10 + skb_main->len)) == NULL) {
1748                 printk("%s: out of memory\n", dev->name);
1749                 return;
1750         }
1751         skb_put(skb, 10 + skb_main->len);
1752
1753         skb->dev = dev;
1754         skb->protocol = htons(ETH_P_CUST);
1755         skb_reset_mac_header(skb);
1756         skb->pkt_type = PACKET_HOST;
1757         skb->len = 10 + skb_main->len;
1758
1759         skb_copy_to_linear_data(skb, dev->name, 5);
1760         skb->data[5] = '[';
1761         skb->data[6] = rx_tx;
1762         skb->data[7] = ']';
1763         skb->data[8] = ':';
1764         skb->data[9] = ' ';
1765         skb_copy_from_linear_data(skb_main, &skb->data[10], skb_main->len);
1766
1767         netif_rx(skb);
1768 }
1769
1770 static void cpc_tx_timeout(struct net_device *dev)
1771 {
1772         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
1773         pc300ch_t *chan = (pc300ch_t *) d->chan;
1774         pc300_t *card = (pc300_t *) chan->card;
1775         int ch = chan->channel;
1776         unsigned long flags;
1777         u8 ilar;
1778
1779         dev->stats.tx_errors++;
1780         dev->stats.tx_aborted_errors++;
1781         CPC_LOCK(card, flags);
1782         if ((ilar = cpc_readb(card->hw.scabase + ILAR)) != 0) {
1783                 printk("%s: ILAR=0x%x\n", dev->name, ilar);
1784                 cpc_writeb(card->hw.scabase + ILAR, ilar);
1785                 cpc_writeb(card->hw.scabase + DMER, 0x80);
1786         }
1787         if (card->hw.type == PC300_TE) {
1788                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
1789                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg2) &
1790                            ~(CPLD_REG2_FALC_LED1 << (2 * ch)));
1791         }
1792         dev->trans_start = jiffies;
1793         CPC_UNLOCK(card, flags);
1794         netif_wake_queue(dev);
1795 }
1796
1797 static int cpc_queue_xmit(struct sk_buff *skb, struct net_device *dev)
1798 {
1799         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
1800         pc300ch_t *chan = (pc300ch_t *) d->chan;
1801         pc300_t *card = (pc300_t *) chan->card;
1802         int ch = chan->channel;
1803         unsigned long flags;
1804 #ifdef PC300_DEBUG_TX
1805         int i;
1806 #endif
1807
1808         if (!netif_carrier_ok(dev)) {
1809                 /* DCD must be OFF: drop packet */
1810                 dev_kfree_skb(skb);
1811                 dev->stats.tx_errors++;
1812                 dev->stats.tx_carrier_errors++;
1813                 return 0;
1814         } else if (cpc_readb(card->hw.scabase + M_REG(ST3, ch)) & ST3_DCD) {
1815                 printk("%s: DCD is OFF. Going administrative down.\n", dev->name);
1816                 dev->stats.tx_errors++;
1817                 dev->stats.tx_carrier_errors++;
1818                 dev_kfree_skb(skb);
1819                 netif_carrier_off(dev);
1820                 CPC_LOCK(card, flags);
1821                 cpc_writeb(card->hw.scabase + M_REG(CMD, ch), CMD_TX_BUF_CLR);
1822                 if (card->hw.type == PC300_TE) {
1823                         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
1824                                    cpc_readb(card->hw.falcbase + card->hw.cpld_reg2) & 
1825                                                         ~(CPLD_REG2_FALC_LED1 << (2 * ch)));
1826                 }
1827                 CPC_UNLOCK(card, flags);
1828                 netif_wake_queue(dev);
1829                 return 0;
1830         }
1831
1832         /* Write buffer to DMA buffers */
1833         if (dma_buf_write(card, ch, (u8 *)skb->data, skb->len) != 0) {
1834 //              printk("%s: write error. Dropping TX packet.\n", dev->name);
1835                 netif_stop_queue(dev);
1836                 dev_kfree_skb(skb);
1837                 dev->stats.tx_errors++;
1838                 dev->stats.tx_dropped++;
1839                 return 0;
1840         }
1841 #ifdef PC300_DEBUG_TX
1842         printk("%s T:", dev->name);
1843         for (i = 0; i < skb->len; i++)
1844                 printk(" %02x", *(skb->data + i));
1845         printk("\n");
1846 #endif
1847
1848         if (d->trace_on) {
1849                 cpc_trace(dev, skb, 'T');
1850         }
1851         dev->trans_start = jiffies;
1852
1853         /* Start transmission */
1854         CPC_LOCK(card, flags);
1855         /* verify if it has more than one free descriptor */
1856         if (card->chan[ch].nfree_tx_bd <= 1) {
1857                 /* don't have so stop the queue */
1858                 netif_stop_queue(dev);
1859         }
1860         cpc_writel(card->hw.scabase + DTX_REG(EDAL, ch),
1861                    TX_BD_ADDR(ch, chan->tx_next_bd));
1862         cpc_writeb(card->hw.scabase + M_REG(CMD, ch), CMD_TX_ENA);
1863         cpc_writeb(card->hw.scabase + DSR_TX(ch), DSR_DE);
1864         if (card->hw.type == PC300_TE) {
1865                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
1866                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg2) |
1867                            (CPLD_REG2_FALC_LED1 << (2 * ch)));
1868         }
1869         CPC_UNLOCK(card, flags);
1870         dev_kfree_skb(skb);
1871
1872         return 0;
1873 }
1874
1875 static void cpc_net_rx(struct net_device *dev)
1876 {
1877         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
1878         pc300ch_t *chan = (pc300ch_t *) d->chan;
1879         pc300_t *card = (pc300_t *) chan->card;
1880         int ch = chan->channel;
1881 #ifdef PC300_DEBUG_RX
1882         int i;
1883 #endif
1884         int rxb;
1885         struct sk_buff *skb;
1886
1887         while (1) {
1888                 if ((rxb = dma_get_rx_frame_size(card, ch)) == -1)
1889                         return;
1890
1891                 if (!netif_carrier_ok(dev)) {
1892                         /* DCD must be OFF: drop packet */
1893                     printk("%s : DCD is OFF - drop %d rx bytes\n", dev->name, rxb); 
1894                         skb = NULL;
1895                 } else {
1896                         if (rxb > (dev->mtu + 40)) { /* add headers */
1897                                 printk("%s : MTU exceeded %d\n", dev->name, rxb); 
1898                                 skb = NULL;
1899                         } else {
1900                                 skb = dev_alloc_skb(rxb);
1901                                 if (skb == NULL) {
1902                                         printk("%s: Memory squeeze!!\n", dev->name);
1903                                         return;
1904                                 }
1905                                 skb->dev = dev;
1906                         }
1907                 }
1908
1909                 if (((rxb = dma_buf_read(card, ch, skb)) <= 0) || (skb == NULL)) {
1910 #ifdef PC300_DEBUG_RX
1911                         printk("%s: rxb = %x\n", dev->name, rxb);
1912 #endif
1913                         if ((skb == NULL) && (rxb > 0)) {
1914                                 /* rxb > dev->mtu */
1915                                 dev->stats.rx_errors++;
1916                                 dev->stats.rx_length_errors++;
1917                                 continue;
1918                         }
1919
1920                         if (rxb < 0) {  /* Invalid frame */
1921                                 rxb = -rxb;
1922                                 if (rxb & DST_OVR) {
1923                                         dev->stats.rx_errors++;
1924                                         dev->stats.rx_fifo_errors++;
1925                                 }
1926                                 if (rxb & DST_CRC) {
1927                                         dev->stats.rx_errors++;
1928                                         dev->stats.rx_crc_errors++;
1929                                 }
1930                                 if (rxb & (DST_RBIT | DST_SHRT | DST_ABT)) {
1931                                         dev->stats.rx_errors++;
1932                                         dev->stats.rx_frame_errors++;
1933                                 }
1934                         }
1935                         if (skb) {
1936                                 dev_kfree_skb_irq(skb);
1937                         }
1938                         continue;
1939                 }
1940
1941                 dev->stats.rx_bytes += rxb;
1942
1943 #ifdef PC300_DEBUG_RX
1944                 printk("%s R:", dev->name);
1945                 for (i = 0; i < skb->len; i++)
1946                         printk(" %02x", *(skb->data + i));
1947                 printk("\n");
1948 #endif
1949                 if (d->trace_on) {
1950                         cpc_trace(dev, skb, 'R');
1951                 }
1952                 dev->stats.rx_packets++;
1953                 skb->protocol = hdlc_type_trans(skb, dev);
1954                 netif_rx(skb);
1955         }
1956 }
1957
1958 /************************************/
1959 /***   PC300 Interrupt Routines   ***/
1960 /************************************/
1961 static void sca_tx_intr(pc300dev_t *dev)
1962 {
1963         pc300ch_t *chan = (pc300ch_t *)dev->chan; 
1964         pc300_t *card = (pc300_t *)chan->card; 
1965         int ch = chan->channel; 
1966         volatile pcsca_bd_t __iomem * ptdescr; 
1967
1968     /* Clean up descriptors from previous transmission */
1969         ptdescr = (card->hw.rambase +
1970                                                 TX_BD_ADDR(ch,chan->tx_first_bd));
1971         while ((cpc_readl(card->hw.scabase + DTX_REG(CDAL,ch)) !=
1972                 TX_BD_ADDR(ch,chan->tx_first_bd)) &&
1973                (cpc_readb(&ptdescr->status) & DST_OSB)) {
1974                 dev->dev->stats.tx_packets++;
1975                 dev->dev->stats.tx_bytes += cpc_readw(&ptdescr->len);
1976                 cpc_writeb(&ptdescr->status, DST_OSB);
1977                 cpc_writew(&ptdescr->len, 0);
1978                 chan->nfree_tx_bd++;
1979                 chan->tx_first_bd = (chan->tx_first_bd + 1) & (N_DMA_TX_BUF - 1);
1980                 ptdescr = (card->hw.rambase + TX_BD_ADDR(ch,chan->tx_first_bd));
1981     }
1982
1983 #ifdef CONFIG_PC300_MLPPP
1984         if (chan->conf.proto == PC300_PROTO_MLPPP) {
1985                         cpc_tty_trigger_poll(dev);
1986         } else {
1987 #endif
1988         /* Tell the upper layer we are ready to transmit more packets */
1989                 netif_wake_queue(dev->dev);
1990 #ifdef CONFIG_PC300_MLPPP
1991         }
1992 #endif
1993 }
1994
1995 static void sca_intr(pc300_t * card)
1996 {
1997         void __iomem *scabase = card->hw.scabase;
1998         volatile u32 status;
1999         int ch;
2000         int intr_count = 0;
2001         unsigned char dsr_rx;
2002
2003         while ((status = cpc_readl(scabase + ISR0)) != 0) {
2004                 for (ch = 0; ch < card->hw.nchan; ch++) {
2005                         pc300ch_t *chan = &card->chan[ch];
2006                         pc300dev_t *d = &chan->d;
2007                         struct net_device *dev = d->dev;
2008
2009                         spin_lock(&card->card_lock);
2010
2011             /**** Reception ****/
2012                         if (status & IR0_DRX((IR0_DMIA | IR0_DMIB), ch)) {
2013                                 u8 drx_stat = cpc_readb(scabase + DSR_RX(ch));
2014
2015                                 /* Clear RX interrupts */
2016                                 cpc_writeb(scabase + DSR_RX(ch), drx_stat | DSR_DWE);
2017
2018 #ifdef PC300_DEBUG_INTR
2019                                 printk ("sca_intr: RX intr chan[%d] (st=0x%08lx, dsr=0x%02x)\n",
2020                                          ch, status, drx_stat);
2021 #endif
2022                                 if (status & IR0_DRX(IR0_DMIA, ch)) {
2023                                         if (drx_stat & DSR_BOF) {
2024 #ifdef CONFIG_PC300_MLPPP
2025                                                 if (chan->conf.proto == PC300_PROTO_MLPPP) {
2026                                                         /* verify if driver is TTY */
2027                                                         if ((cpc_readb(scabase + DSR_RX(ch)) & DSR_DE)) {
2028                                                                 rx_dma_stop(card, ch);
2029                                                         }
2030                                                         cpc_tty_receive(d);
2031                                                         rx_dma_start(card, ch);
2032                                                 } else 
2033 #endif
2034                                                 {
2035                                                         if ((cpc_readb(scabase + DSR_RX(ch)) & DSR_DE)) {
2036                                                                 rx_dma_stop(card, ch);
2037                                                         }
2038                                                         cpc_net_rx(dev);
2039                                                         /* Discard invalid frames */
2040                                                         dev->stats.rx_errors++;
2041                                                         dev->stats.rx_over_errors++;
2042                                                         chan->rx_first_bd = 0;
2043                                                         chan->rx_last_bd = N_DMA_RX_BUF - 1;
2044                                                         rx_dma_start(card, ch);
2045                                                 }
2046                                         }
2047                                 }
2048                                 if (status & IR0_DRX(IR0_DMIB, ch)) {
2049                                         if (drx_stat & DSR_EOM) {
2050                                                 if (card->hw.type == PC300_TE) {
2051                                                         cpc_writeb(card->hw.falcbase +
2052                                                                    card->hw.cpld_reg2,
2053                                                                    cpc_readb (card->hw.falcbase +
2054                                                                         card->hw.cpld_reg2) |
2055                                                                    (CPLD_REG2_FALC_LED1 << (2 * ch)));
2056                                                 }
2057 #ifdef CONFIG_PC300_MLPPP
2058                                                 if (chan->conf.proto == PC300_PROTO_MLPPP) {
2059                                                         /* verify if driver is TTY */
2060                                                         cpc_tty_receive(d);
2061                                                 } else {
2062                                                         cpc_net_rx(dev);
2063                                                 }
2064 #else
2065                                                 cpc_net_rx(dev);
2066 #endif
2067                                                 if (card->hw.type == PC300_TE) {
2068                                                         cpc_writeb(card->hw.falcbase +
2069                                                                    card->hw.cpld_reg2,
2070                                                                    cpc_readb (card->hw.falcbase +
2071                                                                                 card->hw.cpld_reg2) &
2072                                                                    ~ (CPLD_REG2_FALC_LED1 << (2 * ch)));
2073                                                 }
2074                                         }
2075                                 }
2076                                 if (!(dsr_rx = cpc_readb(scabase + DSR_RX(ch)) & DSR_DE)) {
2077 #ifdef PC300_DEBUG_INTR
2078                 printk("%s: RX intr chan[%d] (st=0x%08lx, dsr=0x%02x, dsr2=0x%02x)\n",
2079                         dev->name, ch, status, drx_stat, dsr_rx);
2080 #endif
2081                                         cpc_writeb(scabase + DSR_RX(ch), (dsr_rx | DSR_DE) & 0xfe);
2082                                 }
2083                         }
2084
2085             /**** Transmission ****/
2086                         if (status & IR0_DTX((IR0_EFT | IR0_DMIA | IR0_DMIB), ch)) {
2087                                 u8 dtx_stat = cpc_readb(scabase + DSR_TX(ch));
2088
2089                                 /* Clear TX interrupts */
2090                                 cpc_writeb(scabase + DSR_TX(ch), dtx_stat | DSR_DWE);
2091
2092 #ifdef PC300_DEBUG_INTR
2093                                 printk ("sca_intr: TX intr chan[%d] (st=0x%08lx, dsr=0x%02x)\n",
2094                                          ch, status, dtx_stat);
2095 #endif
2096                                 if (status & IR0_DTX(IR0_EFT, ch)) {
2097                                         if (dtx_stat & DSR_UDRF) {
2098                                                 if (cpc_readb (scabase + M_REG(TBN, ch)) != 0) {
2099                                                         cpc_writeb(scabase + M_REG(CMD,ch), CMD_TX_BUF_CLR);
2100                                                 }
2101                                                 if (card->hw.type == PC300_TE) {
2102                                                         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
2103                                                                    cpc_readb (card->hw.falcbase + 
2104                                                                                    card->hw.cpld_reg2) &
2105                                                                    ~ (CPLD_REG2_FALC_LED1 << (2 * ch)));
2106                                                 }
2107                                                 dev->stats.tx_errors++;
2108                                                 dev->stats.tx_fifo_errors++;
2109                                                 sca_tx_intr(d);
2110                                         }
2111                                 }
2112                                 if (status & IR0_DTX(IR0_DMIA, ch)) {
2113                                         if (dtx_stat & DSR_BOF) {
2114                                         }
2115                                 }
2116                                 if (status & IR0_DTX(IR0_DMIB, ch)) {
2117                                         if (dtx_stat & DSR_EOM) {
2118                                                 if (card->hw.type == PC300_TE) {
2119                                                         cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
2120                                                                    cpc_readb (card->hw.falcbase +
2121                                                                                         card->hw.cpld_reg2) &
2122                                                                    ~ (CPLD_REG2_FALC_LED1 << (2 * ch)));
2123                                                 }
2124                                                 sca_tx_intr(d);
2125                                         }
2126                                 }
2127                         }
2128
2129             /**** MSCI ****/
2130                         if (status & IR0_M(IR0_RXINTA, ch)) {
2131                                 u8 st1 = cpc_readb(scabase + M_REG(ST1, ch));
2132
2133                                 /* Clear MSCI interrupts */
2134                                 cpc_writeb(scabase + M_REG(ST1, ch), st1);
2135
2136 #ifdef PC300_DEBUG_INTR
2137                                 printk("sca_intr: MSCI intr chan[%d] (st=0x%08lx, st1=0x%02x)\n",
2138                                          ch, status, st1);
2139 #endif
2140                                 if (st1 & ST1_CDCD) {   /* DCD changed */
2141                                         if (cpc_readb(scabase + M_REG(ST3, ch)) & ST3_DCD) {
2142                                                 printk ("%s: DCD is OFF. Going administrative down.\n",
2143                                                          dev->name);
2144 #ifdef CONFIG_PC300_MLPPP
2145                                                 if (chan->conf.proto != PC300_PROTO_MLPPP) {
2146                                                         netif_carrier_off(dev);
2147                                                 }
2148 #else
2149                                                 netif_carrier_off(dev);
2150
2151 #endif
2152                                                 card->chan[ch].d.line_off++;
2153                                         } else {        /* DCD = 1 */
2154                                                 printk ("%s: DCD is ON. Going administrative up.\n",
2155                                                          dev->name);
2156 #ifdef CONFIG_PC300_MLPPP
2157                                                 if (chan->conf.proto != PC300_PROTO_MLPPP)
2158                                                         /* verify if driver is not TTY */
2159 #endif
2160                                                         netif_carrier_on(dev);
2161                                                 card->chan[ch].d.line_on++;
2162                                         }
2163                                 }
2164                         }
2165                         spin_unlock(&card->card_lock);
2166                 }
2167                 if (++intr_count == 10)
2168                         /* Too much work at this board. Force exit */
2169                         break;
2170         }
2171 }
2172
2173 static void falc_t1_loop_detection(pc300_t *card, int ch, u8 frs1)
2174 {
2175         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
2176         falc_t *pfalc = (falc_t *) & chan->falc;
2177         void __iomem *falcbase = card->hw.falcbase;
2178
2179         if (((cpc_readb(falcbase + F_REG(LCR1, ch)) & LCR1_XPRBS) == 0) &&
2180             !pfalc->loop_gen) {
2181                 if (frs1 & FRS1_LLBDD) {
2182                         // A Line Loop Back Deactivation signal detected
2183                         if (pfalc->loop_active) {
2184                                 falc_remote_loop(card, ch, 0);
2185                         }
2186                 } else {
2187                         if ((frs1 & FRS1_LLBAD) &&
2188                             ((cpc_readb(falcbase + F_REG(LCR1, ch)) & LCR1_EPRM) == 0)) {
2189                                 // A Line Loop Back Activation signal detected  
2190                                 if (!pfalc->loop_active) {
2191                                         falc_remote_loop(card, ch, 1);
2192                                 }
2193                         }
2194                 }
2195         }
2196 }
2197
2198 static void falc_e1_loop_detection(pc300_t *card, int ch, u8 rsp)
2199 {
2200         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
2201         falc_t *pfalc = (falc_t *) & chan->falc;
2202         void __iomem *falcbase = card->hw.falcbase;
2203
2204         if (((cpc_readb(falcbase + F_REG(LCR1, ch)) & LCR1_XPRBS) == 0) &&
2205             !pfalc->loop_gen) {
2206                 if (rsp & RSP_LLBDD) {
2207                         // A Line Loop Back Deactivation signal detected
2208                         if (pfalc->loop_active) {
2209                                 falc_remote_loop(card, ch, 0);
2210                         }
2211                 } else {
2212                         if ((rsp & RSP_LLBAD) &&
2213                             ((cpc_readb(falcbase + F_REG(LCR1, ch)) & LCR1_EPRM) == 0)) {
2214                                 // A Line Loop Back Activation signal detected  
2215                                 if (!pfalc->loop_active) {
2216                                         falc_remote_loop(card, ch, 1);
2217                                 }
2218                         }
2219                 }
2220         }
2221 }
2222
2223 static void falc_t1_intr(pc300_t * card, int ch)
2224 {
2225         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
2226         falc_t *pfalc = (falc_t *) & chan->falc;
2227         void __iomem *falcbase = card->hw.falcbase;
2228         u8 isr0, isr3, gis;
2229         u8 dummy;
2230
2231         while ((gis = cpc_readb(falcbase + F_REG(GIS, ch))) != 0) {
2232                 if (gis & GIS_ISR0) {
2233                         isr0 = cpc_readb(falcbase + F_REG(FISR0, ch));
2234                         if (isr0 & FISR0_PDEN) {
2235                                 /* Read the bit to clear the situation */
2236                                 if (cpc_readb(falcbase + F_REG(FRS1, ch)) &
2237                                     FRS1_PDEN) {
2238                                         pfalc->pden++;
2239                                 }
2240                         }
2241                 }
2242
2243                 if (gis & GIS_ISR1) {
2244                         dummy = cpc_readb(falcbase + F_REG(FISR1, ch));
2245                 }
2246
2247                 if (gis & GIS_ISR2) {
2248                         dummy = cpc_readb(falcbase + F_REG(FISR2, ch));
2249                 }
2250
2251                 if (gis & GIS_ISR3) {
2252                         isr3 = cpc_readb(falcbase + F_REG(FISR3, ch));
2253                         if (isr3 & FISR3_SEC) {
2254                                 pfalc->sec++;
2255                                 falc_update_stats(card, ch);
2256                                 falc_check_status(card, ch,
2257                                                   cpc_readb(falcbase + F_REG(FRS0, ch)));
2258                         }
2259                         if (isr3 & FISR3_ES) {
2260                                 pfalc->es++;
2261                         }
2262                         if (isr3 & FISR3_LLBSC) {
2263                                 falc_t1_loop_detection(card, ch,
2264                                                        cpc_readb(falcbase + F_REG(FRS1, ch)));
2265                         }
2266                 }
2267         }
2268 }
2269
2270 static void falc_e1_intr(pc300_t * card, int ch)
2271 {
2272         pc300ch_t *chan = (pc300ch_t *) & card->chan[ch];
2273         falc_t *pfalc = (falc_t *) & chan->falc;
2274         void __iomem *falcbase = card->hw.falcbase;
2275         u8 isr1, isr2, isr3, gis, rsp;
2276         u8 dummy;
2277
2278         while ((gis = cpc_readb(falcbase + F_REG(GIS, ch))) != 0) {
2279                 rsp = cpc_readb(falcbase + F_REG(RSP, ch));
2280
2281                 if (gis & GIS_ISR0) {
2282                         dummy = cpc_readb(falcbase + F_REG(FISR0, ch));
2283                 }
2284                 if (gis & GIS_ISR1) {
2285                         isr1 = cpc_readb(falcbase + F_REG(FISR1, ch));
2286                         if (isr1 & FISR1_XMB) {
2287                                 if ((pfalc->xmb_cause & 2)
2288                                     && pfalc->multiframe_mode) {
2289                                         if (cpc_readb (falcbase + F_REG(FRS0, ch)) & 
2290                                                                         (FRS0_LOS | FRS0_AIS | FRS0_LFA)) {
2291                                                 cpc_writeb(falcbase + F_REG(XSP, ch),
2292                                                            cpc_readb(falcbase + F_REG(XSP, ch))
2293                                                            & ~XSP_AXS);
2294                                         } else {
2295                                                 cpc_writeb(falcbase + F_REG(XSP, ch),
2296                                                            cpc_readb(falcbase + F_REG(XSP, ch))
2297                                                            | XSP_AXS);
2298                                         }
2299                                 }
2300                                 pfalc->xmb_cause = 0;
2301                                 cpc_writeb(falcbase + F_REG(IMR1, ch),
2302                                            cpc_readb(falcbase + F_REG(IMR1, ch)) | IMR1_XMB);
2303                         }
2304                         if (isr1 & FISR1_LLBSC) {
2305                                 falc_e1_loop_detection(card, ch, rsp);
2306                         }
2307                 }
2308                 if (gis & GIS_ISR2) {
2309                         isr2 = cpc_readb(falcbase + F_REG(FISR2, ch));
2310                         if (isr2 & FISR2_T400MS) {
2311                                 cpc_writeb(falcbase + F_REG(XSW, ch),
2312                                            cpc_readb(falcbase + F_REG(XSW, ch)) | XSW_XRA);
2313                         }
2314                         if (isr2 & FISR2_MFAR) {
2315                                 cpc_writeb(falcbase + F_REG(XSW, ch),
2316                                            cpc_readb(falcbase + F_REG(XSW, ch)) & ~XSW_XRA);
2317                         }
2318                         if (isr2 & (FISR2_FAR | FISR2_LFA | FISR2_AIS | FISR2_LOS)) {
2319                                 pfalc->xmb_cause |= 2;
2320                                 cpc_writeb(falcbase + F_REG(IMR1, ch),
2321                                            cpc_readb(falcbase + F_REG(IMR1, ch)) & ~IMR1_XMB);
2322                         }
2323                 }
2324                 if (gis & GIS_ISR3) {
2325                         isr3 = cpc_readb(falcbase + F_REG(FISR3, ch));
2326                         if (isr3 & FISR3_SEC) {
2327                                 pfalc->sec++;
2328                                 falc_update_stats(card, ch);
2329                                 falc_check_status(card, ch,
2330                                                   cpc_readb(falcbase + F_REG(FRS0, ch)));
2331                         }
2332                         if (isr3 & FISR3_ES) {
2333                                 pfalc->es++;
2334                         }
2335                 }
2336         }
2337 }
2338
2339 static void falc_intr(pc300_t * card)
2340 {
2341         int ch;
2342
2343         for (ch = 0; ch < card->hw.nchan; ch++) {
2344                 pc300ch_t *chan = &card->chan[ch];
2345                 pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
2346
2347                 if (conf->media == IF_IFACE_T1) {
2348                         falc_t1_intr(card, ch);
2349                 } else {
2350                         falc_e1_intr(card, ch);
2351                 }
2352         }
2353 }
2354
2355 static irqreturn_t cpc_intr(int irq, void *dev_id)
2356 {
2357         pc300_t *card = dev_id;
2358         volatile u8 plx_status;
2359
2360         if (!card) {
2361 #ifdef PC300_DEBUG_INTR
2362                 printk("cpc_intr: spurious intr %d\n", irq);
2363 #endif
2364                 return IRQ_NONE;                /* spurious intr */
2365         }
2366
2367         if (!card->hw.rambase) {
2368 #ifdef PC300_DEBUG_INTR
2369                 printk("cpc_intr: spurious intr2 %d\n", irq);
2370 #endif
2371                 return IRQ_NONE;                /* spurious intr */
2372         }
2373
2374         switch (card->hw.type) {
2375                 case PC300_RSV:
2376                 case PC300_X21:
2377                         sca_intr(card);
2378                         break;
2379
2380                 case PC300_TE:
2381                         while ( (plx_status = (cpc_readb(card->hw.plxbase + card->hw.intctl_reg) &
2382                                  (PLX_9050_LINT1_STATUS | PLX_9050_LINT2_STATUS))) != 0) {
2383                                 if (plx_status & PLX_9050_LINT1_STATUS) {       /* SCA Interrupt */
2384                                         sca_intr(card);
2385                                 }
2386                                 if (plx_status & PLX_9050_LINT2_STATUS) {       /* FALC Interrupt */
2387                                         falc_intr(card);
2388                                 }
2389                         }
2390                         break;
2391         }
2392         return IRQ_HANDLED;
2393 }
2394
2395 static void cpc_sca_status(pc300_t * card, int ch)
2396 {
2397         u8 ilar;
2398         void __iomem *scabase = card->hw.scabase;
2399         unsigned long flags;
2400
2401         tx_dma_buf_check(card, ch);
2402         rx_dma_buf_check(card, ch);
2403         ilar = cpc_readb(scabase + ILAR);
2404         printk ("ILAR=0x%02x, WCRL=0x%02x, PCR=0x%02x, BTCR=0x%02x, BOLR=0x%02x\n",
2405                  ilar, cpc_readb(scabase + WCRL), cpc_readb(scabase + PCR),
2406                  cpc_readb(scabase + BTCR), cpc_readb(scabase + BOLR));
2407         printk("TX_CDA=0x%08x, TX_EDA=0x%08x\n",
2408                cpc_readl(scabase + DTX_REG(CDAL, ch)),
2409                cpc_readl(scabase + DTX_REG(EDAL, ch)));
2410         printk("RX_CDA=0x%08x, RX_EDA=0x%08x, BFL=0x%04x\n",
2411                cpc_readl(scabase + DRX_REG(CDAL, ch)),
2412                cpc_readl(scabase + DRX_REG(EDAL, ch)),
2413                cpc_readw(scabase + DRX_REG(BFLL, ch)));
2414         printk("DMER=0x%02x, DSR_TX=0x%02x, DSR_RX=0x%02x\n",
2415                cpc_readb(scabase + DMER), cpc_readb(scabase + DSR_TX(ch)),
2416                cpc_readb(scabase + DSR_RX(ch)));
2417         printk("DMR_TX=0x%02x, DMR_RX=0x%02x, DIR_TX=0x%02x, DIR_RX=0x%02x\n",
2418                cpc_readb(scabase + DMR_TX(ch)), cpc_readb(scabase + DMR_RX(ch)),
2419                cpc_readb(scabase + DIR_TX(ch)),
2420                cpc_readb(scabase + DIR_RX(ch)));
2421         printk("DCR_TX=0x%02x, DCR_RX=0x%02x, FCT_TX=0x%02x, FCT_RX=0x%02x\n",
2422                cpc_readb(scabase + DCR_TX(ch)), cpc_readb(scabase + DCR_RX(ch)),
2423                cpc_readb(scabase + FCT_TX(ch)),
2424                cpc_readb(scabase + FCT_RX(ch)));
2425         printk("MD0=0x%02x, MD1=0x%02x, MD2=0x%02x, MD3=0x%02x, IDL=0x%02x\n",
2426                cpc_readb(scabase + M_REG(MD0, ch)),
2427                cpc_readb(scabase + M_REG(MD1, ch)),
2428                cpc_readb(scabase + M_REG(MD2, ch)),
2429                cpc_readb(scabase + M_REG(MD3, ch)),
2430                cpc_readb(scabase + M_REG(IDL, ch)));
2431         printk("CMD=0x%02x, SA0=0x%02x, SA1=0x%02x, TFN=0x%02x, CTL=0x%02x\n",
2432                cpc_readb(scabase + M_REG(CMD, ch)),
2433                cpc_readb(scabase + M_REG(SA0, ch)),
2434                cpc_readb(scabase + M_REG(SA1, ch)),
2435                cpc_readb(scabase + M_REG(TFN, ch)),
2436                cpc_readb(scabase + M_REG(CTL, ch)));
2437         printk("ST0=0x%02x, ST1=0x%02x, ST2=0x%02x, ST3=0x%02x, ST4=0x%02x\n",
2438                cpc_readb(scabase + M_REG(ST0, ch)),
2439                cpc_readb(scabase + M_REG(ST1, ch)),
2440                cpc_readb(scabase + M_REG(ST2, ch)),
2441                cpc_readb(scabase + M_REG(ST3, ch)),
2442                cpc_readb(scabase + M_REG(ST4, ch)));
2443         printk ("CST0=0x%02x, CST1=0x%02x, CST2=0x%02x, CST3=0x%02x, FST=0x%02x\n",
2444                  cpc_readb(scabase + M_REG(CST0, ch)),
2445                  cpc_readb(scabase + M_REG(CST1, ch)),
2446                  cpc_readb(scabase + M_REG(CST2, ch)),
2447                  cpc_readb(scabase + M_REG(CST3, ch)),
2448                  cpc_readb(scabase + M_REG(FST, ch)));
2449         printk("TRC0=0x%02x, TRC1=0x%02x, RRC=0x%02x, TBN=0x%02x, RBN=0x%02x\n",
2450                cpc_readb(scabase + M_REG(TRC0, ch)),
2451                cpc_readb(scabase + M_REG(TRC1, ch)),
2452                cpc_readb(scabase + M_REG(RRC, ch)),
2453                cpc_readb(scabase + M_REG(TBN, ch)),
2454                cpc_readb(scabase + M_REG(RBN, ch)));
2455         printk("TFS=0x%02x, TNR0=0x%02x, TNR1=0x%02x, RNR=0x%02x\n",
2456                cpc_readb(scabase + M_REG(TFS, ch)),
2457                cpc_readb(scabase + M_REG(TNR0, ch)),
2458                cpc_readb(scabase + M_REG(TNR1, ch)),
2459                cpc_readb(scabase + M_REG(RNR, ch)));
2460         printk("TCR=0x%02x, RCR=0x%02x, TNR1=0x%02x, RNR=0x%02x\n",
2461                cpc_readb(scabase + M_REG(TCR, ch)),
2462                cpc_readb(scabase + M_REG(RCR, ch)),
2463                cpc_readb(scabase + M_REG(TNR1, ch)),
2464                cpc_readb(scabase + M_REG(RNR, ch)));
2465         printk("TXS=0x%02x, RXS=0x%02x, EXS=0x%02x, TMCT=0x%02x, TMCR=0x%02x\n",
2466                cpc_readb(scabase + M_REG(TXS, ch)),
2467                cpc_readb(scabase + M_REG(RXS, ch)),
2468                cpc_readb(scabase + M_REG(EXS, ch)),
2469                cpc_readb(scabase + M_REG(TMCT, ch)),
2470                cpc_readb(scabase + M_REG(TMCR, ch)));
2471         printk("IE0=0x%02x, IE1=0x%02x, IE2=0x%02x, IE4=0x%02x, FIE=0x%02x\n",
2472                cpc_readb(scabase + M_REG(IE0, ch)),
2473                cpc_readb(scabase + M_REG(IE1, ch)),
2474                cpc_readb(scabase + M_REG(IE2, ch)),
2475                cpc_readb(scabase + M_REG(IE4, ch)),
2476                cpc_readb(scabase + M_REG(FIE, ch)));
2477         printk("IER0=0x%08x\n", cpc_readl(scabase + IER0));
2478
2479         if (ilar != 0) {
2480                 CPC_LOCK(card, flags);
2481                 cpc_writeb(scabase + ILAR, ilar);
2482                 cpc_writeb(scabase + DMER, 0x80);
2483                 CPC_UNLOCK(card, flags);
2484         }
2485 }
2486
2487 static void cpc_falc_status(pc300_t * card, int ch)
2488 {
2489         pc300ch_t *chan = &card->chan[ch];
2490         falc_t *pfalc = (falc_t *) & chan->falc;
2491         unsigned long flags;
2492
2493         CPC_LOCK(card, flags);
2494         printk("CH%d:   %s %s  %d channels\n",
2495                ch, (pfalc->sync ? "SYNC" : ""), (pfalc->active ? "ACTIVE" : ""),
2496                pfalc->num_channels);
2497
2498         printk("        pden=%d,  los=%d,  losr=%d,  lfa=%d,  farec=%d\n",
2499                pfalc->pden, pfalc->los, pfalc->losr, pfalc->lfa, pfalc->farec);
2500         printk("        lmfa=%d,  ais=%d,  sec=%d,  es=%d,  rai=%d\n",
2501                pfalc->lmfa, pfalc->ais, pfalc->sec, pfalc->es, pfalc->rai);
2502         printk("        bec=%d,  fec=%d,  cvc=%d,  cec=%d,  ebc=%d\n",
2503                pfalc->bec, pfalc->fec, pfalc->cvc, pfalc->cec, pfalc->ebc);
2504
2505         printk("\n");
2506         printk("        STATUS: %s  %s  %s  %s  %s  %s\n",
2507                (pfalc->red_alarm ? "RED" : ""),
2508                (pfalc->blue_alarm ? "BLU" : ""),
2509                (pfalc->yellow_alarm ? "YEL" : ""),
2510                (pfalc->loss_fa ? "LFA" : ""),
2511                (pfalc->loss_mfa ? "LMF" : ""), (pfalc->prbs ? "PRB" : ""));
2512         CPC_UNLOCK(card, flags);
2513 }
2514
2515 static int cpc_change_mtu(struct net_device *dev, int new_mtu)
2516 {
2517         if ((new_mtu < 128) || (new_mtu > PC300_DEF_MTU))
2518                 return -EINVAL;
2519         dev->mtu = new_mtu;
2520         return 0;
2521 }
2522
2523 static int cpc_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
2524 {
2525         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
2526         pc300ch_t *chan = (pc300ch_t *) d->chan;
2527         pc300_t *card = (pc300_t *) chan->card;
2528         pc300conf_t conf_aux;
2529         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
2530         int ch = chan->channel;
2531         void __user *arg = ifr->ifr_data;
2532         struct if_settings *settings = &ifr->ifr_settings;
2533         void __iomem *scabase = card->hw.scabase;
2534
2535         if (!capable(CAP_NET_ADMIN))
2536                 return -EPERM;
2537
2538         switch (cmd) {
2539                 case SIOCGPC300CONF:
2540 #ifdef CONFIG_PC300_MLPPP
2541                         if (conf->proto != PC300_PROTO_MLPPP) {
2542                                 conf->proto = /* FIXME hdlc->proto.id */ 0;
2543                         }
2544 #else
2545                         conf->proto = /* FIXME hdlc->proto.id */ 0;
2546 #endif
2547                         memcpy(&conf_aux.conf, conf, sizeof(pc300chconf_t));
2548                         memcpy(&conf_aux.hw, &card->hw, sizeof(pc300hw_t));
2549                         if (!arg || 
2550                                 copy_to_user(arg, &conf_aux, sizeof(pc300conf_t))) 
2551                                 return -EINVAL;
2552                         return 0;
2553                 case SIOCSPC300CONF:
2554                         if (!capable(CAP_NET_ADMIN))
2555                                 return -EPERM;
2556                         if (!arg || 
2557                                 copy_from_user(&conf_aux.conf, arg, sizeof(pc300chconf_t)))
2558                                 return -EINVAL;
2559                         if (card->hw.cpld_id < 0x02 &&
2560                             conf_aux.conf.fr_mode == PC300_FR_UNFRAMED) {
2561                                 /* CPLD_ID < 0x02 doesn't support Unframed E1 */
2562                                 return -EINVAL;
2563                         }
2564 #ifdef CONFIG_PC300_MLPPP
2565                         if (conf_aux.conf.proto == PC300_PROTO_MLPPP) {
2566                                 if (conf->proto != PC300_PROTO_MLPPP) {
2567                                         memcpy(conf, &conf_aux.conf, sizeof(pc300chconf_t));
2568                                         cpc_tty_init(d);        /* init TTY driver */
2569                                 }
2570                         } else {
2571                                 if (conf_aux.conf.proto == 0xffff) {
2572                                         if (conf->proto == PC300_PROTO_MLPPP){ 
2573                                                 /* ifdown interface */
2574                                                 cpc_close(dev);
2575                                         }
2576                                 } else {
2577                                         memcpy(conf, &conf_aux.conf, sizeof(pc300chconf_t));
2578                                         /* FIXME hdlc->proto.id = conf->proto; */
2579                                 }
2580                         }
2581 #else
2582                         memcpy(conf, &conf_aux.conf, sizeof(pc300chconf_t));
2583                         /* FIXME hdlc->proto.id = conf->proto; */
2584 #endif
2585                         return 0;
2586                 case SIOCGPC300STATUS:
2587                         cpc_sca_status(card, ch);
2588                         return 0;
2589                 case SIOCGPC300FALCSTATUS:
2590                         cpc_falc_status(card, ch);
2591                         return 0;
2592
2593                 case SIOCGPC300UTILSTATS:
2594                         {
2595                                 if (!arg) {     /* clear statistics */
2596                                         memset(&dev->stats, 0, sizeof(dev->stats));
2597                                         if (card->hw.type == PC300_TE) {
2598                                                 memset(&chan->falc, 0, sizeof(falc_t));
2599                                         }
2600                                 } else {
2601                                         pc300stats_t pc300stats;
2602
2603                                         memset(&pc300stats, 0, sizeof(pc300stats_t));
2604                                         pc300stats.hw_type = card->hw.type;
2605                                         pc300stats.line_on = card->chan[ch].d.line_on;
2606                                         pc300stats.line_off = card->chan[ch].d.line_off;
2607                                         memcpy(&pc300stats.gen_stats, &dev->stats,
2608                                                sizeof(dev->stats));
2609                                         if (card->hw.type == PC300_TE)
2610                                                 memcpy(&pc300stats.te_stats,&chan->falc,sizeof(falc_t));
2611                                         if (copy_to_user(arg, &pc300stats, sizeof(pc300stats_t)))
2612                                                 return -EFAULT;
2613                                 }
2614                                 return 0;
2615                         }
2616
2617                 case SIOCGPC300UTILSTATUS:
2618                         {
2619                                 struct pc300status pc300status;
2620
2621                                 pc300status.hw_type = card->hw.type;
2622                                 if (card->hw.type == PC300_TE) {
2623                                         pc300status.te_status.sync = chan->falc.sync;
2624                                         pc300status.te_status.red_alarm = chan->falc.red_alarm;
2625                                         pc300status.te_status.blue_alarm = chan->falc.blue_alarm;
2626                                         pc300status.te_status.loss_fa = chan->falc.loss_fa;
2627                                         pc300status.te_status.yellow_alarm =chan->falc.yellow_alarm;
2628                                         pc300status.te_status.loss_mfa = chan->falc.loss_mfa;
2629                                         pc300status.te_status.prbs = chan->falc.prbs;
2630                                 } else {
2631                                         pc300status.gen_status.dcd =
2632                                                 !(cpc_readb (scabase + M_REG(ST3, ch)) & ST3_DCD);
2633                                         pc300status.gen_status.cts =
2634                                                 !(cpc_readb (scabase + M_REG(ST3, ch)) & ST3_CTS);
2635                                         pc300status.gen_status.rts =
2636                                                 !(cpc_readb (scabase + M_REG(CTL, ch)) & CTL_RTS);
2637                                         pc300status.gen_status.dtr =
2638                                                 !(cpc_readb (scabase + M_REG(CTL, ch)) & CTL_DTR);
2639                                         /* There is no DSR in HD64572 */
2640                                 }
2641                                 if (!arg
2642                                     || copy_to_user(arg, &pc300status, sizeof(pc300status_t)))
2643                                                 return -EINVAL;
2644                                 return 0;
2645                         }
2646
2647                 case SIOCSPC300TRACE:
2648                         /* Sets/resets a trace_flag for the respective device */
2649                         if (!arg || copy_from_user(&d->trace_on, arg,sizeof(unsigned char)))
2650                                         return -EINVAL;
2651                         return 0;
2652
2653                 case SIOCSPC300LOOPBACK:
2654                         {
2655                                 struct pc300loopback pc300loop;
2656
2657                                 /* TE boards only */
2658                                 if (card->hw.type != PC300_TE)
2659                                         return -EINVAL;
2660
2661                                 if (!arg || 
2662                                         copy_from_user(&pc300loop, arg, sizeof(pc300loopback_t)))
2663                                                 return -EINVAL;
2664                                 switch (pc300loop.loop_type) {
2665                                         case PC300LOCLOOP:      /* Turn the local loop on/off */
2666                                                 falc_local_loop(card, ch, pc300loop.loop_on);
2667                                                 return 0;
2668
2669                                         case PC300REMLOOP:      /* Turn the remote loop on/off */
2670                                                 falc_remote_loop(card, ch, pc300loop.loop_on);
2671                                                 return 0;
2672
2673                                         case PC300PAYLOADLOOP:  /* Turn the payload loop on/off */
2674                                                 falc_payload_loop(card, ch, pc300loop.loop_on);
2675                                                 return 0;
2676
2677                                         case PC300GENLOOPUP:    /* Generate loop UP */
2678                                                 if (pc300loop.loop_on) {
2679                                                         falc_generate_loop_up_code (card, ch);
2680                                                 } else {
2681                                                         turn_off_xlu(card, ch);
2682                                                 }
2683                                                 return 0;
2684
2685                                         case PC300GENLOOPDOWN:  /* Generate loop DOWN */
2686                                                 if (pc300loop.loop_on) {
2687                                                         falc_generate_loop_down_code (card, ch);
2688                                                 } else {
2689                                                         turn_off_xld(card, ch);
2690                                                 }
2691                                                 return 0;
2692
2693                                         default:
2694                                                 return -EINVAL;
2695                                 }
2696                         }
2697
2698                 case SIOCSPC300PATTERNTEST:
2699                         /* Turn the pattern test on/off and show the errors counter */
2700                         {
2701                                 struct pc300patterntst pc300patrntst;
2702
2703                                 /* TE boards only */
2704                                 if (card->hw.type != PC300_TE)
2705                                         return -EINVAL;
2706
2707                                 if (card->hw.cpld_id < 0x02) {
2708                                         /* CPLD_ID < 0x02 doesn't support pattern test */
2709                                         return -EINVAL;
2710                                 }
2711
2712                                 if (!arg || 
2713                                         copy_from_user(&pc300patrntst,arg,sizeof(pc300patterntst_t)))
2714                                                 return -EINVAL;
2715                                 if (pc300patrntst.patrntst_on == 2) {
2716                                         if (chan->falc.prbs == 0) {
2717                                                 falc_pattern_test(card, ch, 1);
2718                                         }
2719                                         pc300patrntst.num_errors =
2720                                                 falc_pattern_test_error(card, ch);
2721                                         if (copy_to_user(arg, &pc300patrntst,
2722                                                          sizeof(pc300patterntst_t)))
2723                                                         return -EINVAL;
2724                                 } else {
2725                                         falc_pattern_test(card, ch, pc300patrntst.patrntst_on);
2726                                 }
2727                                 return 0;
2728                         }
2729
2730                 case SIOCWANDEV:
2731                         switch (ifr->ifr_settings.type) {
2732                                 case IF_GET_IFACE:
2733                                 {
2734                                         const size_t size = sizeof(sync_serial_settings);
2735                                         ifr->ifr_settings.type = conf->media;
2736                                         if (ifr->ifr_settings.size < size) {
2737                                                 /* data size wanted */
2738                                                 ifr->ifr_settings.size = size;
2739                                                 return -ENOBUFS;
2740                                         }
2741         
2742                                         if (copy_to_user(settings->ifs_ifsu.sync,
2743                                                          &conf->phys_settings, size)) {
2744                                                 return -EFAULT;
2745                                         }
2746                                         return 0;
2747                                 }
2748
2749                                 case IF_IFACE_V35:
2750                                 case IF_IFACE_V24:
2751                                 case IF_IFACE_X21:
2752                                 {
2753                                         const size_t size = sizeof(sync_serial_settings);
2754
2755                                         if (!capable(CAP_NET_ADMIN)) {
2756                                                 return -EPERM;
2757                                         }
2758                                         /* incorrect data len? */
2759                                         if (ifr->ifr_settings.size != size) {
2760                                                 return -ENOBUFS;
2761                                         }
2762
2763                                         if (copy_from_user(&conf->phys_settings, 
2764                                                            settings->ifs_ifsu.sync, size)) {
2765                                                 return -EFAULT;
2766                                         }
2767
2768                                         if (conf->phys_settings.loopback) {
2769                                                 cpc_writeb(card->hw.scabase + M_REG(MD2, ch),
2770                                                         cpc_readb(card->hw.scabase + M_REG(MD2, ch)) | 
2771                                                         MD2_LOOP_MIR);
2772                                         }
2773                                         conf->media = ifr->ifr_settings.type;
2774                                         return 0;
2775                                 }
2776
2777                                 case IF_IFACE_T1:
2778                                 case IF_IFACE_E1:
2779                                 {
2780                                         const size_t te_size = sizeof(te1_settings);
2781                                         const size_t size = sizeof(sync_serial_settings);
2782
2783                                         if (!capable(CAP_NET_ADMIN)) {
2784                                                 return -EPERM;
2785                                         }
2786
2787                                         /* incorrect data len? */
2788                                         if (ifr->ifr_settings.size != te_size) {
2789                                                 return -ENOBUFS;
2790                                         }
2791
2792                                         if (copy_from_user(&conf->phys_settings, 
2793                                                            settings->ifs_ifsu.te1, size)) {
2794                                                 return -EFAULT;
2795                                         }/* Ignoring HDLC slot_map for a while */
2796                                         
2797                                         if (conf->phys_settings.loopback) {
2798                                                 cpc_writeb(card->hw.scabase + M_REG(MD2, ch),
2799                                                         cpc_readb(card->hw.scabase + M_REG(MD2, ch)) | 
2800                                                         MD2_LOOP_MIR);
2801                                         }
2802                                         conf->media = ifr->ifr_settings.type;
2803                                         return 0;
2804                                 }
2805                                 default:
2806                                         return hdlc_ioctl(dev, ifr, cmd);
2807                         }
2808
2809                 default:
2810                         return hdlc_ioctl(dev, ifr, cmd);
2811         }
2812 }
2813
2814 static int clock_rate_calc(u32 rate, u32 clock, int *br_io)
2815 {
2816         int br, tc;
2817         int br_pwr, error;
2818
2819         *br_io = 0;
2820
2821         if (rate == 0)
2822                 return (0);
2823
2824         for (br = 0, br_pwr = 1; br <= 9; br++, br_pwr <<= 1) {
2825                 if ((tc = clock / br_pwr / rate) <= 0xff) {
2826                         *br_io = br;
2827                         break;
2828                 }
2829         }
2830
2831         if (tc <= 0xff) {
2832                 error = ((rate - (clock / br_pwr / rate)) / rate) * 1000;
2833                 /* Errors bigger than +/- 1% won't be tolerated */
2834                 if (error < -10 || error > 10)
2835                         return (-1);
2836                 else
2837                         return (tc);
2838         } else {
2839                 return (-1);
2840         }
2841 }
2842
2843 static int ch_config(pc300dev_t * d)
2844 {
2845         pc300ch_t *chan = (pc300ch_t *) d->chan;
2846         pc300chconf_t *conf = (pc300chconf_t *) & chan->conf;
2847         pc300_t *card = (pc300_t *) chan->card;
2848         void __iomem *scabase = card->hw.scabase;
2849         void __iomem *plxbase = card->hw.plxbase;
2850         int ch = chan->channel;
2851         u32 clkrate = chan->conf.phys_settings.clock_rate;
2852         u32 clktype = chan->conf.phys_settings.clock_type;
2853         u16 encoding = chan->conf.proto_settings.encoding;
2854         u16 parity = chan->conf.proto_settings.parity;
2855         u8 md0, md2;
2856
2857         /* Reset the channel */
2858         cpc_writeb(scabase + M_REG(CMD, ch), CMD_CH_RST);
2859
2860         /* Configure the SCA registers */
2861         switch (parity) {
2862                 case PARITY_NONE:
2863                         md0 = MD0_BIT_SYNC;
2864                         break;
2865                 case PARITY_CRC16_PR0:
2866                         md0 = MD0_CRC16_0|MD0_CRCC0|MD0_BIT_SYNC;
2867                         break;
2868                 case PARITY_CRC16_PR1:
2869                         md0 = MD0_CRC16_1|MD0_CRCC0|MD0_BIT_SYNC;
2870                         break;
2871                 case PARITY_CRC32_PR1_CCITT:
2872                         md0 = MD0_CRC32|MD0_CRCC0|MD0_BIT_SYNC;
2873                         break;
2874                 case PARITY_CRC16_PR1_CCITT:
2875                 default:
2876                         md0 = MD0_CRC_CCITT|MD0_CRCC0|MD0_BIT_SYNC;
2877                         break;
2878         }
2879         switch (encoding) {
2880                 case ENCODING_NRZI:
2881                         md2 = MD2_F_DUPLEX|MD2_ADPLL_X8|MD2_NRZI;
2882                         break;
2883                 case ENCODING_FM_MARK:  /* FM1 */
2884                         md2 = MD2_F_DUPLEX|MD2_ADPLL_X8|MD2_FM|MD2_FM1;
2885                         break;
2886                 case ENCODING_FM_SPACE: /* FM0 */
2887                         md2 = MD2_F_DUPLEX|MD2_ADPLL_X8|MD2_FM|MD2_FM0;
2888                         break;
2889                 case ENCODING_MANCHESTER: /* It's not working... */
2890                         md2 = MD2_F_DUPLEX|MD2_ADPLL_X8|MD2_FM|MD2_MANCH;
2891                         break;
2892                 case ENCODING_NRZ:
2893                 default:
2894                         md2 = MD2_F_DUPLEX|MD2_ADPLL_X8|MD2_NRZ;
2895                         break;
2896         }
2897         cpc_writeb(scabase + M_REG(MD0, ch), md0);
2898         cpc_writeb(scabase + M_REG(MD1, ch), 0);
2899         cpc_writeb(scabase + M_REG(MD2, ch), md2);
2900         cpc_writeb(scabase + M_REG(IDL, ch), 0x7e);
2901         cpc_writeb(scabase + M_REG(CTL, ch), CTL_URSKP | CTL_IDLC);
2902
2903         /* Configure HW media */
2904         switch (card->hw.type) {
2905                 case PC300_RSV:
2906                         if (conf->media == IF_IFACE_V35) {
2907                                 cpc_writel((plxbase + card->hw.gpioc_reg),
2908                                            cpc_readl(plxbase + card->hw.gpioc_reg) | PC300_CHMEDIA_MASK(ch));
2909                         } else {
2910                                 cpc_writel((plxbase + card->hw.gpioc_reg),
2911                                            cpc_readl(plxbase + card->hw.gpioc_reg) & ~PC300_CHMEDIA_MASK(ch));
2912                         }
2913                         break;
2914
2915                 case PC300_X21:
2916                         break;
2917
2918                 case PC300_TE:
2919                         te_config(card, ch);
2920                         break;
2921         }
2922
2923         switch (card->hw.type) {
2924                 case PC300_RSV:
2925                 case PC300_X21:
2926                         if (clktype == CLOCK_INT || clktype == CLOCK_TXINT) {
2927                                 int tmc, br;
2928
2929                                 /* Calculate the clkrate parameters */
2930                                 tmc = clock_rate_calc(clkrate, card->hw.clock, &br);
2931                                 if (tmc < 0)
2932                                         return -EIO;
2933                                 cpc_writeb(scabase + M_REG(TMCT, ch), tmc);
2934                                 cpc_writeb(scabase + M_REG(TXS, ch),
2935                                            (TXS_DTRXC | TXS_IBRG | br));
2936                                 if (clktype == CLOCK_INT) {
2937                                         cpc_writeb(scabase + M_REG(TMCR, ch), tmc);
2938                                         cpc_writeb(scabase + M_REG(RXS, ch), 
2939                                                    (RXS_IBRG | br));
2940                                 } else {
2941                                         cpc_writeb(scabase + M_REG(TMCR, ch), 1);
2942                                         cpc_writeb(scabase + M_REG(RXS, ch), 0);
2943                                 }
2944                                 if (card->hw.type == PC300_X21) {
2945                                         cpc_writeb(scabase + M_REG(GPO, ch), 1);
2946                                         cpc_writeb(scabase + M_REG(EXS, ch), EXS_TES1 | EXS_RES1);
2947                                 } else {
2948                                         cpc_writeb(scabase + M_REG(EXS, ch), EXS_TES1);
2949                                 }
2950                         } else {
2951                                 cpc_writeb(scabase + M_REG(TMCT, ch), 1);
2952                                 if (clktype == CLOCK_EXT) {
2953                                         cpc_writeb(scabase + M_REG(TXS, ch), 
2954                                                    TXS_DTRXC);
2955                                 } else {
2956                                         cpc_writeb(scabase + M_REG(TXS, ch), 
2957                                                    TXS_DTRXC|TXS_RCLK);
2958                                 }
2959                                 cpc_writeb(scabase + M_REG(TMCR, ch), 1);
2960                                 cpc_writeb(scabase + M_REG(RXS, ch), 0);
2961                                 if (card->hw.type == PC300_X21) {
2962                                         cpc_writeb(scabase + M_REG(GPO, ch), 0);
2963                                         cpc_writeb(scabase + M_REG(EXS, ch), EXS_TES1 | EXS_RES1);
2964                                 } else {
2965                                         cpc_writeb(scabase + M_REG(EXS, ch), EXS_TES1);
2966                                 }
2967                         }
2968                         break;
2969
2970                 case PC300_TE:
2971                         /* SCA always receives clock from the FALC chip */
2972                         cpc_writeb(scabase + M_REG(TMCT, ch), 1);
2973                         cpc_writeb(scabase + M_REG(TXS, ch), 0);
2974                         cpc_writeb(scabase + M_REG(TMCR, ch), 1);
2975                         cpc_writeb(scabase + M_REG(RXS, ch), 0);
2976                         cpc_writeb(scabase + M_REG(EXS, ch), 0);
2977                         break;
2978         }
2979
2980         /* Enable Interrupts */
2981         cpc_writel(scabase + IER0,
2982                    cpc_readl(scabase + IER0) |
2983                    IR0_M(IR0_RXINTA, ch) |
2984                    IR0_DRX(IR0_EFT | IR0_DMIA | IR0_DMIB, ch) |
2985                    IR0_DTX(IR0_EFT | IR0_DMIA | IR0_DMIB, ch));
2986         cpc_writeb(scabase + M_REG(IE0, ch),
2987                    cpc_readl(scabase + M_REG(IE0, ch)) | IE0_RXINTA);
2988         cpc_writeb(scabase + M_REG(IE1, ch),
2989                    cpc_readl(scabase + M_REG(IE1, ch)) | IE1_CDCD);
2990
2991         return 0;
2992 }
2993
2994 static int rx_config(pc300dev_t * d)
2995 {
2996         pc300ch_t *chan = (pc300ch_t *) d->chan;
2997         pc300_t *card = (pc300_t *) chan->card;
2998         void __iomem *scabase = card->hw.scabase;
2999         int ch = chan->channel;
3000
3001         cpc_writeb(scabase + DSR_RX(ch), 0);
3002
3003         /* General RX settings */
3004         cpc_writeb(scabase + M_REG(RRC, ch), 0);
3005         cpc_writeb(scabase + M_REG(RNR, ch), 16);
3006
3007         /* Enable reception */
3008         cpc_writeb(scabase + M_REG(CMD, ch), CMD_RX_CRC_INIT);
3009         cpc_writeb(scabase + M_REG(CMD, ch), CMD_RX_ENA);
3010
3011         /* Initialize DMA stuff */
3012         chan->rx_first_bd = 0;
3013         chan->rx_last_bd = N_DMA_RX_BUF - 1;
3014         rx_dma_buf_init(card, ch);
3015         cpc_writeb(scabase + DCR_RX(ch), DCR_FCT_CLR);
3016         cpc_writeb(scabase + DMR_RX(ch), (DMR_TMOD | DMR_NF));
3017         cpc_writeb(scabase + DIR_RX(ch), (DIR_EOM | DIR_BOF));
3018
3019         /* Start DMA */
3020         rx_dma_start(card, ch);
3021
3022         return 0;
3023 }
3024
3025 static int tx_config(pc300dev_t * d)
3026 {
3027         pc300ch_t *chan = (pc300ch_t *) d->chan;
3028         pc300_t *card = (pc300_t *) chan->card;
3029         void __iomem *scabase = card->hw.scabase;
3030         int ch = chan->channel;
3031
3032         cpc_writeb(scabase + DSR_TX(ch), 0);
3033
3034         /* General TX settings */
3035         cpc_writeb(scabase + M_REG(TRC0, ch), 0);
3036         cpc_writeb(scabase + M_REG(TFS, ch), 32);
3037         cpc_writeb(scabase + M_REG(TNR0, ch), 20);
3038         cpc_writeb(scabase + M_REG(TNR1, ch), 48);
3039         cpc_writeb(scabase + M_REG(TCR, ch), 8);
3040
3041         /* Enable transmission */
3042         cpc_writeb(scabase + M_REG(CMD, ch), CMD_TX_CRC_INIT);
3043
3044         /* Initialize DMA stuff */
3045         chan->tx_first_bd = 0;
3046         chan->tx_next_bd = 0;
3047         tx_dma_buf_init(card, ch);
3048         cpc_writeb(scabase + DCR_TX(ch), DCR_FCT_CLR);
3049         cpc_writeb(scabase + DMR_TX(ch), (DMR_TMOD | DMR_NF));
3050         cpc_writeb(scabase + DIR_TX(ch), (DIR_EOM | DIR_BOF | DIR_UDRF));
3051         cpc_writel(scabase + DTX_REG(CDAL, ch), TX_BD_ADDR(ch, chan->tx_first_bd));
3052         cpc_writel(scabase + DTX_REG(EDAL, ch), TX_BD_ADDR(ch, chan->tx_next_bd));
3053
3054         return 0;
3055 }
3056
3057 static int cpc_attach(struct net_device *dev, unsigned short encoding,
3058                       unsigned short parity)
3059 {
3060         pc300dev_t *d = (pc300dev_t *)dev_to_hdlc(dev)->priv;
3061         pc300ch_t *chan = (pc300ch_t *)d->chan;
3062         pc300_t *card = (pc300_t *)chan->card;
3063         pc300chconf_t *conf = (pc300chconf_t *)&chan->conf;
3064
3065         if (card->hw.type == PC300_TE) {
3066                 if (encoding != ENCODING_NRZ && encoding != ENCODING_NRZI) {
3067                         return -EINVAL;
3068                 }
3069         } else {
3070                 if (encoding != ENCODING_NRZ && encoding != ENCODING_NRZI &&
3071                     encoding != ENCODING_FM_MARK && encoding != ENCODING_FM_SPACE) {
3072                         /* Driver doesn't support ENCODING_MANCHESTER yet */
3073                         return -EINVAL;
3074                 }
3075         }
3076
3077         if (parity != PARITY_NONE && parity != PARITY_CRC16_PR0 &&
3078             parity != PARITY_CRC16_PR1 && parity != PARITY_CRC32_PR1_CCITT &&
3079             parity != PARITY_CRC16_PR1_CCITT) {
3080                 return -EINVAL;
3081         }
3082
3083         conf->proto_settings.encoding = encoding;
3084         conf->proto_settings.parity = parity;
3085         return 0;
3086 }
3087
3088 static int cpc_opench(pc300dev_t * d)
3089 {
3090         pc300ch_t *chan = (pc300ch_t *) d->chan;
3091         pc300_t *card = (pc300_t *) chan->card;
3092         int ch = chan->channel, rc;
3093         void __iomem *scabase = card->hw.scabase;
3094
3095         rc = ch_config(d);
3096         if (rc)
3097                 return rc;
3098
3099         rx_config(d);
3100
3101         tx_config(d);
3102
3103         /* Assert RTS and DTR */
3104         cpc_writeb(scabase + M_REG(CTL, ch),
3105                    cpc_readb(scabase + M_REG(CTL, ch)) & ~(CTL_RTS | CTL_DTR));
3106
3107         return 0;
3108 }
3109
3110 static void cpc_closech(pc300dev_t * d)
3111 {
3112         pc300ch_t *chan = (pc300ch_t *) d->chan;
3113         pc300_t *card = (pc300_t *) chan->card;
3114         falc_t *pfalc = (falc_t *) & chan->falc;
3115         int ch = chan->channel;
3116
3117         cpc_writeb(card->hw.scabase + M_REG(CMD, ch), CMD_CH_RST);
3118         rx_dma_stop(card, ch);
3119         tx_dma_stop(card, ch);
3120
3121         if (card->hw.type == PC300_TE) {
3122                 memset(pfalc, 0, sizeof(falc_t));
3123                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg2,
3124                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg2) &
3125                            ~((CPLD_REG2_FALC_TX_CLK | CPLD_REG2_FALC_RX_CLK |
3126                               CPLD_REG2_FALC_LED2) << (2 * ch)));
3127                 /* Reset the FALC chip */
3128                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
3129                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) |
3130                            (CPLD_REG1_FALC_RESET << (2 * ch)));
3131                 udelay(10000);
3132                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
3133                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) &
3134                            ~(CPLD_REG1_FALC_RESET << (2 * ch)));
3135         }
3136 }
3137
3138 int cpc_open(struct net_device *dev)
3139 {
3140         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
3141         struct ifreq ifr;
3142         int result;
3143
3144 #ifdef  PC300_DEBUG_OTHER
3145         printk("pc300: cpc_open");
3146 #endif
3147
3148         result = hdlc_open(dev);
3149
3150         if (result)
3151                 return result;
3152
3153         sprintf(ifr.ifr_name, "%s", dev->name);
3154         result = cpc_opench(d);
3155         if (result)
3156                 goto err_out;
3157
3158         netif_start_queue(dev);
3159         return 0;
3160
3161 err_out:
3162         hdlc_close(dev);
3163         return result;
3164 }
3165
3166 static int cpc_close(struct net_device *dev)
3167 {
3168         pc300dev_t *d = (pc300dev_t *) dev_to_hdlc(dev)->priv;
3169         pc300ch_t *chan = (pc300ch_t *) d->chan;
3170         pc300_t *card = (pc300_t *) chan->card;
3171         unsigned long flags;
3172
3173 #ifdef  PC300_DEBUG_OTHER
3174         printk("pc300: cpc_close");
3175 #endif
3176
3177         netif_stop_queue(dev);
3178
3179         CPC_LOCK(card, flags);
3180         cpc_closech(d);
3181         CPC_UNLOCK(card, flags);
3182
3183         hdlc_close(dev);
3184
3185 #ifdef CONFIG_PC300_MLPPP
3186         if (chan->conf.proto == PC300_PROTO_MLPPP) {
3187                 cpc_tty_unregister_service(d);
3188                 chan->conf.proto = 0xffff;
3189         }
3190 #endif
3191
3192         return 0;
3193 }
3194
3195 static u32 detect_ram(pc300_t * card)
3196 {
3197         u32 i;
3198         u8 data;
3199         void __iomem *rambase = card->hw.rambase;
3200
3201         card->hw.ramsize = PC300_RAMSIZE;
3202         /* Let's find out how much RAM is present on this board */
3203         for (i = 0; i < card->hw.ramsize; i++) {
3204                 data = (u8)(i & 0xff);
3205                 cpc_writeb(rambase + i, data);
3206                 if (cpc_readb(rambase + i) != data) {
3207                         break;
3208                 }
3209         }
3210         return (i);
3211 }
3212
3213 static void plx_init(pc300_t * card)
3214 {
3215         struct RUNTIME_9050 __iomem *plx_ctl = card->hw.plxbase;
3216
3217         /* Reset PLX */
3218         cpc_writel(&plx_ctl->init_ctrl,
3219                    cpc_readl(&plx_ctl->init_ctrl) | 0x40000000);
3220         udelay(10000L);
3221         cpc_writel(&plx_ctl->init_ctrl,
3222                    cpc_readl(&plx_ctl->init_ctrl) & ~0x40000000);
3223
3224         /* Reload Config. Registers from EEPROM */
3225         cpc_writel(&plx_ctl->init_ctrl,
3226                    cpc_readl(&plx_ctl->init_ctrl) | 0x20000000);
3227         udelay(10000L);
3228         cpc_writel(&plx_ctl->init_ctrl,
3229                    cpc_readl(&plx_ctl->init_ctrl) & ~0x20000000);
3230
3231 }
3232
3233 static inline void show_version(void)
3234 {
3235         char *rcsvers, *rcsdate, *tmp;
3236
3237         rcsvers = strchr(rcsid, ' ');
3238         rcsvers++;
3239         tmp = strchr(rcsvers, ' ');
3240         *tmp++ = '\0';
3241         rcsdate = strchr(tmp, ' ');
3242         rcsdate++;
3243         tmp = strrchr(rcsdate, ' ');
3244         *tmp = '\0';
3245         printk(KERN_INFO "Cyclades-PC300 driver %s %s (built %s %s)\n", 
3246                 rcsvers, rcsdate, __DATE__, __TIME__);
3247 }                               /* show_version */
3248
3249 static void cpc_init_card(pc300_t * card)
3250 {
3251         int i, devcount = 0;
3252         static int board_nbr = 1;
3253
3254         /* Enable interrupts on the PCI bridge */
3255         plx_init(card);
3256         cpc_writew(card->hw.plxbase + card->hw.intctl_reg,
3257                    cpc_readw(card->hw.plxbase + card->hw.intctl_reg) | 0x0040);
3258
3259 #ifdef USE_PCI_CLOCK
3260         /* Set board clock to PCI clock */
3261         cpc_writel(card->hw.plxbase + card->hw.gpioc_reg,
3262                    cpc_readl(card->hw.plxbase + card->hw.gpioc_reg) | 0x00000004UL);
3263         card->hw.clock = PC300_PCI_CLOCK;
3264 #else
3265         /* Set board clock to internal oscillator clock */
3266         cpc_writel(card->hw.plxbase + card->hw.gpioc_reg,
3267                    cpc_readl(card->hw.plxbase + card->hw.gpioc_reg) & ~0x00000004UL);
3268         card->hw.clock = PC300_OSC_CLOCK;
3269 #endif
3270
3271         /* Detect actual on-board RAM size */
3272         card->hw.ramsize = detect_ram(card);
3273
3274         /* Set Global SCA-II registers */
3275         cpc_writeb(card->hw.scabase + PCR, PCR_PR2);
3276         cpc_writeb(card->hw.scabase + BTCR, 0x10);
3277         cpc_writeb(card->hw.scabase + WCRL, 0);
3278         cpc_writeb(card->hw.scabase + DMER, 0x80);
3279
3280         if (card->hw.type == PC300_TE) {
3281                 u8 reg1;
3282
3283                 /* Check CPLD version */
3284                 reg1 = cpc_readb(card->hw.falcbase + CPLD_REG1);
3285                 cpc_writeb(card->hw.falcbase + CPLD_REG1, (reg1 + 0x5a));
3286                 if (cpc_readb(card->hw.falcbase + CPLD_REG1) == reg1) {
3287                         /* New CPLD */
3288                         card->hw.cpld_id = cpc_readb(card->hw.falcbase + CPLD_ID_REG);
3289                         card->hw.cpld_reg1 = CPLD_V2_REG1;
3290                         card->hw.cpld_reg2 = CPLD_V2_REG2;
3291                 } else {
3292                         /* old CPLD */
3293                         card->hw.cpld_id = 0;
3294                         card->hw.cpld_reg1 = CPLD_REG1;
3295                         card->hw.cpld_reg2 = CPLD_REG2;
3296                         cpc_writeb(card->hw.falcbase + CPLD_REG1, reg1);
3297                 }
3298
3299                 /* Enable the board's global clock */
3300                 cpc_writeb(card->hw.falcbase + card->hw.cpld_reg1,
3301                            cpc_readb(card->hw.falcbase + card->hw.cpld_reg1) |
3302                            CPLD_REG1_GLOBAL_CLK);
3303
3304         }
3305
3306         for (i = 0; i < card->hw.nchan; i++) {
3307                 pc300ch_t *chan = &card->chan[i];
3308                 pc300dev_t *d = &chan->d;
3309                 hdlc_device *hdlc;
3310                 struct net_device *dev;
3311
3312                 chan->card = card;
3313                 chan->channel = i;
3314                 chan->conf.phys_settings.clock_rate = 0;
3315                 chan->conf.phys_settings.clock_type = CLOCK_EXT;
3316                 chan->conf.proto_settings.encoding = ENCODING_NRZ;
3317                 chan->conf.proto_settings.parity = PARITY_CRC16_PR1_CCITT;
3318                 switch (card->hw.type) {
3319                         case PC300_TE:
3320                                 chan->conf.media = IF_IFACE_T1;
3321                                 chan->conf.lcode = PC300_LC_B8ZS;
3322                                 chan->conf.fr_mode = PC300_FR_ESF;
3323                                 chan->conf.lbo = PC300_LBO_0_DB;
3324                                 chan->conf.rx_sens = PC300_RX_SENS_SH;
3325                                 chan->conf.tslot_bitmap = 0xffffffffUL;
3326                                 break;
3327
3328                         case PC300_X21:
3329                                 chan->conf.media = IF_IFACE_X21;
3330                                 break;
3331
3332                         case PC300_RSV:
3333                         default:
3334                                 chan->conf.media = IF_IFACE_V35;
3335                                 break;
3336                 }
3337                 chan->conf.proto = IF_PROTO_PPP;
3338                 chan->tx_first_bd = 0;
3339                 chan->tx_next_bd = 0;
3340                 chan->rx_first_bd = 0;
3341                 chan->rx_last_bd = N_DMA_RX_BUF - 1;
3342                 chan->nfree_tx_bd = N_DMA_TX_BUF;
3343
3344                 d->chan = chan;
3345                 d->trace_on = 0;
3346                 d->line_on = 0;
3347                 d->line_off = 0;
3348
3349                 dev = alloc_hdlcdev(d);
3350                 if (dev == NULL)
3351                         continue;
3352
3353                 hdlc = dev_to_hdlc(dev);
3354                 hdlc->xmit = cpc_queue_xmit;
3355                 hdlc->attach = cpc_attach;
3356                 d->dev = dev;
3357                 dev->mem_start = card->hw.ramphys;
3358                 dev->mem_end = card->hw.ramphys + card->hw.ramsize - 1;
3359                 dev->irq = card->hw.irq;
3360                 dev->init = NULL;
3361                 dev->tx_queue_len = PC300_TX_QUEUE_LEN;
3362                 dev->mtu = PC300_DEF_MTU;
3363
3364                 dev->open = cpc_open;
3365                 dev->stop = cpc_close;
3366                 dev->tx_timeout = cpc_tx_timeout;
3367                 dev->watchdog_timeo = PC300_TX_TIMEOUT;
3368                 dev->set_multicast_list = NULL;
3369                 dev->set_mac_address = NULL;
3370                 dev->change_mtu = cpc_change_mtu;
3371                 dev->do_ioctl = cpc_ioctl;
3372
3373                 if (register_hdlc_device(dev) == 0) {
3374                         printk("%s: Cyclades-PC300/", dev->name);
3375                         switch (card->hw.type) {
3376                                 case PC300_TE:
3377                                         if (card->hw.bus == PC300_PMC) {
3378                                                 printk("TE-M");
3379                                         } else {
3380                                                 printk("TE  ");
3381                                         }
3382                                         break;
3383
3384                                 case PC300_X21:
3385                                         printk("X21 ");
3386                                         break;
3387
3388                                 case PC300_RSV:
3389                                 default:
3390                                         printk("RSV ");
3391                                         break;
3392                         }
3393                         printk (" #%d, %dKB of RAM at 0x%08x, IRQ%d, channel %d.\n",
3394                                  board_nbr, card->hw.ramsize / 1024,
3395                                  card->hw.ramphys, card->hw.irq, i + 1);
3396                         devcount++;
3397                 } else {
3398                         printk ("Dev%d on card(0x%08x): unable to allocate i/f name.\n",
3399                                  i + 1, card->hw.ramphys);
3400                         free_netdev(dev);
3401                         continue;
3402                 }
3403         }
3404         spin_lock_init(&card->card_lock);
3405
3406         board_nbr++;
3407 }
3408
3409 static int __devinit
3410 cpc_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
3411 {
3412         static int first_time = 1;
3413         int err, eeprom_outdated = 0;
3414         u16 device_id;
3415         pc300_t *card;
3416
3417         if (first_time) {
3418                 first_time = 0;
3419                 show_version();
3420 #ifdef CONFIG_PC300_MLPPP
3421                 cpc_tty_reset_var();
3422 #endif
3423         }
3424
3425         if ((err = pci_enable_device(pdev)) < 0)
3426                 return err;
3427
3428         card = kzalloc(sizeof(pc300_t), GFP_KERNEL);
3429         if (card == NULL) {
3430                 printk("PC300 found at RAM 0x%016llx, "
3431                        "but could not allocate card structure.\n",
3432                        (unsigned long long)pci_resource_start(pdev, 3));
3433                 err = -ENOMEM;
3434                 goto err_disable_dev;
3435         }
3436
3437         err = -ENODEV;
3438
3439         /* read PCI configuration area */
3440         device_id = ent->device;
3441         card->hw.irq = pdev->irq;
3442         card->hw.iophys = pci_resource_start(pdev, 1);
3443         card->hw.iosize = pci_resource_len(pdev, 1);
3444         card->hw.scaphys = pci_resource_start(pdev, 2);
3445         card->hw.scasize = pci_resource_len(pdev, 2);
3446         card->hw.ramphys = pci_resource_start(pdev, 3);
3447         card->hw.alloc_ramsize = pci_resource_len(pdev, 3);
3448         card->hw.falcphys = pci_resource_start(pdev, 4);
3449         card->hw.falcsize = pci_resource_len(pdev, 4);
3450         card->hw.plxphys = pci_resource_start(pdev, 5);
3451         card->hw.plxsize = pci_resource_len(pdev, 5);
3452
3453         switch (device_id) {
3454                 case PCI_DEVICE_ID_PC300_RX_1:
3455                 case PCI_DEVICE_ID_PC300_TE_1:
3456                 case PCI_DEVICE_ID_PC300_TE_M_1:
3457                         card->hw.nchan = 1;
3458                         break;
3459
3460                 case PCI_DEVICE_ID_PC300_RX_2:
3461                 case PCI_DEVICE_ID_PC300_TE_2:
3462                 case PCI_DEVICE_ID_PC300_TE_M_2:
3463                 default:
3464                         card->hw.nchan = PC300_MAXCHAN;
3465                         break;
3466         }
3467 #ifdef PC300_DEBUG_PCI
3468         printk("cpc (bus=0x0%x,pci_id=0x%x,", pdev->bus->number, pdev->devfn);
3469         printk("rev_id=%d) IRQ%d\n", pdev->revision, card->hw.irq);
3470         printk("cpc:found  ramaddr=0x%08lx plxaddr=0x%08lx "
3471                "ctladdr=0x%08lx falcaddr=0x%08lx\n",
3472                card->hw.ramphys, card->hw.plxphys, card->hw.scaphys,
3473                card->hw.falcphys);
3474 #endif
3475         /* Although we don't use this I/O region, we should
3476          * request it from the kernel anyway, to avoid problems
3477          * with other drivers accessing it. */
3478         if (!request_region(card->hw.iophys, card->hw.iosize, "PLX Registers")) {
3479                 /* In case we can't allocate it, warn user */
3480                 printk("WARNING: couldn't allocate I/O region for PC300 board "
3481                        "at 0x%08x!\n", card->hw.ramphys);
3482         }
3483
3484         if (card->hw.plxphys) {
3485                 pci_write_config_dword(pdev, PCI_BASE_ADDRESS_0, card->hw.plxphys);
3486         } else {
3487                 eeprom_outdated = 1;
3488                 card->hw.plxphys = pci_resource_start(pdev, 0);
3489                 card->hw.plxsize = pci_resource_len(pdev, 0);
3490         }
3491
3492         if (!request_mem_region(card->hw.plxphys, card->hw.plxsize,
3493                                 "PLX Registers")) {
3494                 printk("PC300 found at RAM 0x%08x, "
3495                        "but could not allocate PLX mem region.\n",
3496                        card->hw.ramphys);
3497                 goto err_release_io;
3498         }
3499         if (!request_mem_region(card->hw.ramphys, card->hw.alloc_ramsize,
3500                                 "On-board RAM")) {
3501                 printk("PC300 found at RAM 0x%08x, "
3502                        "but could not allocate RAM mem region.\n",
3503                        card->hw.ramphys);
3504                 goto err_release_plx;
3505         }
3506         if (!request_mem_region(card->hw.scaphys, card->hw.scasize,
3507                                 "SCA-II Registers")) {
3508                 printk("PC300 found at RAM 0x%08x, "
3509                        "but could not allocate SCA mem region.\n",
3510                        card->hw.ramphys);
3511                 goto err_release_ram;
3512         }
3513
3514         card->hw.plxbase = ioremap(card->hw.plxphys, card->hw.plxsize);
3515         card->hw.rambase = ioremap(card->hw.ramphys, card->hw.alloc_ramsize);
3516         card->hw.scabase = ioremap(card->hw.scaphys, card->hw.scasize);
3517         switch (device_id) {
3518                 case PCI_DEVICE_ID_PC300_TE_1:
3519                 case PCI_DEVICE_ID_PC300_TE_2:
3520                 case PCI_DEVICE_ID_PC300_TE_M_1:
3521                 case PCI_DEVICE_ID_PC300_TE_M_2:
3522                         request_mem_region(card->hw.falcphys, card->hw.falcsize,
3523                                            "FALC Registers");
3524                         card->hw.falcbase = ioremap(card->hw.falcphys, card->hw.falcsize);
3525                         break;
3526
3527                 case PCI_DEVICE_ID_PC300_RX_1:
3528                 case PCI_DEVICE_ID_PC300_RX_2:
3529                 default:
3530                         card->hw.falcbase = NULL;
3531                         break;
3532         }
3533
3534 #ifdef PC300_DEBUG_PCI
3535         printk("cpc: relocate ramaddr=0x%08lx plxaddr=0x%08lx "
3536                "ctladdr=0x%08lx falcaddr=0x%08lx\n",
3537                card->hw.rambase, card->hw.plxbase, card->hw.scabase,
3538                card->hw.falcbase);
3539 #endif
3540
3541         /* Set PCI drv pointer to the card structure */
3542         pci_set_drvdata(pdev, card);
3543
3544         /* Set board type */
3545         switch (device_id) {
3546                 case PCI_DEVICE_ID_PC300_TE_1:
3547                 case PCI_DEVICE_ID_PC300_TE_2:
3548                 case PCI_DEVICE_ID_PC300_TE_M_1:
3549                 case PCI_DEVICE_ID_PC300_TE_M_2:
3550                         card->hw.type = PC300_TE;
3551
3552                         if ((device_id == PCI_DEVICE_ID_PC300_TE_M_1) ||
3553                             (device_id == PCI_DEVICE_ID_PC300_TE_M_2)) {
3554                                 card->hw.bus = PC300_PMC;
3555                                 /* Set PLX register offsets */
3556                                 card->hw.gpioc_reg = 0x54;
3557                                 card->hw.intctl_reg = 0x4c;
3558                         } else {
3559                                 card->hw.bus = PC300_PCI;
3560                                 /* Set PLX register offsets */
3561                                 card->hw.gpioc_reg = 0x50;
3562                                 card->hw.intctl_reg = 0x4c;
3563                         }
3564                         break;
3565
3566                 case PCI_DEVICE_ID_PC300_RX_1:
3567                 case PCI_DEVICE_ID_PC300_RX_2:
3568                 default:
3569                         card->hw.bus = PC300_PCI;
3570                         /* Set PLX register offsets */
3571                         card->hw.gpioc_reg = 0x50;
3572                         card->hw.intctl_reg = 0x4c;
3573
3574                         if ((cpc_readl(card->hw.plxbase + card->hw.gpioc_reg) & PC300_CTYPE_MASK)) {
3575                                 card->hw.type = PC300_X21;
3576                         } else {
3577                                 card->hw.type = PC300_RSV;
3578                         }
3579                         break;
3580         }
3581
3582         /* Allocate IRQ */
3583         if (request_irq(card->hw.irq, cpc_intr, IRQF_SHARED, "Cyclades-PC300", card)) {
3584                 printk ("PC300 found at RAM 0x%08x, but could not allocate IRQ%d.\n",
3585                          card->hw.ramphys, card->hw.irq);
3586                 goto err_io_unmap;
3587         }
3588
3589         cpc_init_card(card);
3590
3591         if (eeprom_outdated)
3592                 printk("WARNING: PC300 with outdated EEPROM.\n");
3593         return 0;
3594
3595 err_io_unmap:
3596         iounmap(card->hw.plxbase);
3597         iounmap(card->hw.scabase);
3598         iounmap(card->hw.rambase);
3599         if (card->hw.type == PC300_TE) {
3600                 iounmap(card->hw.falcbase);
3601                 release_mem_region(card->hw.falcphys, card->hw.falcsize);
3602         }
3603         release_mem_region(card->hw.scaphys, card->hw.scasize);
3604 err_release_ram:
3605         release_mem_region(card->hw.ramphys, card->hw.alloc_ramsize);
3606 err_release_plx:
3607         release_mem_region(card->hw.plxphys, card->hw.plxsize);
3608 err_release_io:
3609         release_region(card->hw.iophys, card->hw.iosize);
3610         kfree(card);
3611 err_disable_dev:
3612         pci_disable_device(pdev);
3613         return err;
3614 }
3615
3616 static void __devexit cpc_remove_one(struct pci_dev *pdev)
3617 {
3618         pc300_t *card = pci_get_drvdata(pdev);
3619
3620         if (card->hw.rambase) {
3621                 int i;
3622
3623                 /* Disable interrupts on the PCI bridge */
3624                 cpc_writew(card->hw.plxbase + card->hw.intctl_reg,
3625                            cpc_readw(card->hw.plxbase + card->hw.intctl_reg) & ~(0x0040));
3626
3627                 for (i = 0; i < card->hw.nchan; i++) {
3628                         unregister_hdlc_device(card->chan[i].d.dev);
3629                 }
3630                 iounmap(card->hw.plxbase);
3631                 iounmap(card->hw.scabase);
3632                 iounmap(card->hw.rambase);
3633                 release_mem_region(card->hw.plxphys, card->hw.plxsize);
3634                 release_mem_region(card->hw.ramphys, card->hw.alloc_ramsize);
3635                 release_mem_region(card->hw.scaphys, card->hw.scasize);
3636                 release_region(card->hw.iophys, card->hw.iosize);
3637                 if (card->hw.type == PC300_TE) {
3638                         iounmap(card->hw.falcbase);
3639                         release_mem_region(card->hw.falcphys, card->hw.falcsize);
3640                 }
3641                 for (i = 0; i < card->hw.nchan; i++)
3642                         if (card->chan[i].d.dev)
3643                                 free_netdev(card->chan[i].d.dev);
3644                 if (card->hw.irq)
3645                         free_irq(card->hw.irq, card);
3646                 kfree(card);
3647                 pci_disable_device(pdev);
3648         }
3649 }
3650
3651 static struct pci_driver cpc_driver = {
3652         .name           = "pc300",
3653         .id_table       = cpc_pci_dev_id,
3654         .probe          = cpc_init_one,
3655         .remove         = __devexit_p(cpc_remove_one),
3656 };
3657
3658 static int __init cpc_init(void)
3659 {
3660         return pci_register_driver(&cpc_driver);
3661 }
3662
3663 static void __exit cpc_cleanup_module(void)
3664 {
3665         pci_unregister_driver(&cpc_driver);
3666 }
3667
3668 module_init(cpc_init);
3669 module_exit(cpc_cleanup_module);
3670
3671 MODULE_DESCRIPTION("Cyclades-PC300 cards driver");
3672 MODULE_AUTHOR(  "Author: Ivan Passos <ivan@cyclades.com>\r\n"
3673                 "Maintainer: PC300 Maintainer <pc300@cyclades.com");
3674 MODULE_LICENSE("GPL");
3675