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