drivers/char/synclink.c

   1 /*
   2  * linux/drivers/char/synclink.c
   3  *
   4  * $Id: synclink.c,v 4.38 2005/11/07 16:30:34 paulkf Exp $
   5  *
   6  * Device driver for Microgate SyncLink ISA and PCI
   7  * high speed multiprotocol serial adapters.
   8  *
   9  * written by Paul Fulghum for Microgate Corporation
  10  * paulkf@microgate.com
  11  *
  12  * Microgate and SyncLink are trademarks of Microgate Corporation
  13  *
  14  * Derived from serial.c written by Theodore Ts'o and Linus Torvalds
  15  *
  16  * Original release 01/11/99
  17  *
  18  * This code is released under the GNU General Public License (GPL)
  19  *
  20  * This driver is primarily intended for use in synchronous
  21  * HDLC mode. Asynchronous mode is also provided.
  22  *
  23  * When operating in synchronous mode, each call to mgsl_write()
  24  * contains exactly one complete HDLC frame. Calling mgsl_put_char
  25  * will start assembling an HDLC frame that will not be sent until
  26  * mgsl_flush_chars or mgsl_write is called.
  27  *
  28  * Synchronous receive data is reported as complete frames. To accomplish
  29  * this, the TTY flip buffer is bypassed (too small to hold largest
  30  * frame and may fragment frames) and the line discipline
  31  * receive entry point is called directly.
  32  *
  33  * This driver has been tested with a slightly modified ppp.c driver
  34  * for synchronous PPP.
  35  *
  36  * 2000/02/16
  37  * Added interface for syncppp.c driver (an alternate synchronous PPP
  38  * implementation that also supports Cisco HDLC). Each device instance
  39  * registers as a tty device AND a network device (if dosyncppp option
  40  * is set for the device). The functionality is determined by which
  41  * device interface is opened.
  42  *
  43  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  44  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  45  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  46  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  47  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  48  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  49  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  50  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  51  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  52  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  53  * OF THE POSSIBILITY OF SUCH DAMAGE.
  54  */
  55
  56 #if defined(__i386__)
  57 #  define BREAKPOINT() asm("   int $3");
  58 #else
  59 #  define BREAKPOINT() { }
  60 #endif
  61
  62 #define MAX_ISA_DEVICES 10
  63 #define MAX_PCI_DEVICES 10
  64 #define MAX_TOTAL_DEVICES 20
  65
  66 #include <linux/module.h>
  67 #include <linux/errno.h>
  68 #include <linux/signal.h>
  69 #include <linux/sched.h>
  70 #include <linux/timer.h>
  71 #include <linux/interrupt.h>
  72 #include <linux/pci.h>
  73 #include <linux/tty.h>
  74 #include <linux/tty_flip.h>
  75 #include <linux/serial.h>
  76 #include <linux/major.h>
  77 #include <linux/string.h>
  78 #include <linux/fcntl.h>
  79 #include <linux/ptrace.h>
  80 #include <linux/ioport.h>
  81 #include <linux/mm.h>
  82 #include <linux/slab.h>
  83 #include <linux/delay.h>
  84
  85 #include <linux/netdevice.h>
  86
  87 #include <linux/vmalloc.h>
  88 #include <linux/init.h>
  89
  90 #include <linux/delay.h>
  91 #include <linux/ioctl.h>
  92
  93 #include <asm/system.h>
  94 #include <asm/io.h>
  95 #include <asm/irq.h>
  96 #include <asm/dma.h>
  97 #include <linux/bitops.h>
  98 #include <asm/types.h>
  99 #include <linux/termios.h>
 100 #include <linux/workqueue.h>
 101 #include <linux/hdlc.h>
 102 #include <linux/dma-mapping.h>
 103
 104 #ifdef CONFIG_HDLC_MODULE
 105 #define CONFIG_HDLC 1
 106 #endif
 107
 108 #define GET_USER(error,value,addr) error = get_user(value,addr)
 109 #define COPY_FROM_USER(error,dest,src,size) error = copy_from_user(dest,src,size) ? -EFAULT : 0
 110 #define PUT_USER(error,value,addr) error = put_user(value,addr)
 111 #define COPY_TO_USER(error,dest,src,size) error = copy_to_user(dest,src,size) ? -EFAULT : 0
 112
 113 #include <asm/uaccess.h>
 114
 115 #include "linux/synclink.h"
 116
 117 #define RCLRVALUE 0xffff
 118
 119 static MGSL_PARAMS default_params = {
 120         MGSL_MODE_HDLC,                 /* unsigned long mode */
 121         0,                              /* unsigned char loopback; */
 122         HDLC_FLAG_UNDERRUN_ABORT15,     /* unsigned short flags; */
 123         HDLC_ENCODING_NRZI_SPACE,       /* unsigned char encoding; */
 124         0,                              /* unsigned long clock_speed; */
 125         0xff,                           /* unsigned char addr_filter; */
 126         HDLC_CRC_16_CCITT,              /* unsigned short crc_type; */
 127         HDLC_PREAMBLE_LENGTH_8BITS,     /* unsigned char preamble_length; */
 128         HDLC_PREAMBLE_PATTERN_NONE,     /* unsigned char preamble; */
 129         9600,                           /* unsigned long data_rate; */
 130         8,                              /* unsigned char data_bits; */
 131         1,                              /* unsigned char stop_bits; */
 132         ASYNC_PARITY_NONE               /* unsigned char parity; */
 133 };
 134
 135 #define SHARED_MEM_ADDRESS_SIZE 0x40000
 136 #define BUFFERLISTSIZE 4096
 137 #define DMABUFFERSIZE 4096
 138 #define MAXRXFRAMES 7
 139
 140 typedef struct _DMABUFFERENTRY
 141 {
 142         u32 phys_addr;  /* 32-bit flat physical address of data buffer */
 143         volatile u16 count;     /* buffer size/data count */
 144         volatile u16 status;    /* Control/status field */
 145         volatile u16 rcc;       /* character count field */
 146         u16 reserved;   /* padding required by 16C32 */
 147         u32 link;       /* 32-bit flat link to next buffer entry */
 148         char *virt_addr;        /* virtual address of data buffer */
 149         u32 phys_entry; /* physical address of this buffer entry */
 150         dma_addr_t dma_addr;
 151 } DMABUFFERENTRY, *DMAPBUFFERENTRY;
 152
 153 /* The queue of BH actions to be performed */
 154
 155 #define BH_RECEIVE  1
 156 #define BH_TRANSMIT 2
 157 #define BH_STATUS   4
 158
 159 #define IO_PIN_SHUTDOWN_LIMIT 100
 160
 161 #define RELEVANT_IFLAG(iflag) (iflag & (IGNBRK|BRKINT|IGNPAR|PARMRK|INPCK))
 162
 163 struct  _input_signal_events {
 164         int     ri_up;
 165         int     ri_down;
 166         int     dsr_up;
 167         int     dsr_down;
 168         int     dcd_up;
 169         int     dcd_down;
 170         int     cts_up;
 171         int     cts_down;
 172 };
 173
 174 /* transmit holding buffer definitions*/
 175 #define MAX_TX_HOLDING_BUFFERS 5
 176 struct tx_holding_buffer {
 177         int     buffer_size;
 178         unsigned char * buffer;
 179 };
 180
 181
 182 /*
 183  * Device instance data structure
 184  */
 185
 186 struct mgsl_struct {
 187         int                     magic;
 188         int                     flags;
 189         int                     count;          /* count of opens */
 190         int                     line;
 191         int                     hw_version;
 192         unsigned short          close_delay;
 193         unsigned short          closing_wait;   /* time to wait before closing */
 194
 195         struct mgsl_icount      icount;
 196
 197         struct tty_struct       *tty;
 198         int                     timeout;
 199         int                     x_char;         /* xon/xoff character */
 200         int                     blocked_open;   /* # of blocked opens */
 201         u16                     read_status_mask;
 202         u16                     ignore_status_mask;
 203         unsigned char           *xmit_buf;
 204         int                     xmit_head;
 205         int                     xmit_tail;
 206         int                     xmit_cnt;
 207
 208         wait_queue_head_t       open_wait;
 209         wait_queue_head_t       close_wait;
 210
 211         wait_queue_head_t       status_event_wait_q;
 212         wait_queue_head_t       event_wait_q;
 213         struct timer_list       tx_timer;       /* HDLC transmit timeout timer */
 214         struct mgsl_struct      *next_device;   /* device list link */
 215
 216         spinlock_t irq_spinlock;                /* spinlock for synchronizing with ISR */
 217         struct work_struct task;                /* task structure for scheduling bh */
 218
 219         u32 EventMask;                  /* event trigger mask */
 220         u32 RecordedEvents;             /* pending events */
 221
 222         u32 max_frame_size;             /* as set by device config */
 223
 224         u32 pending_bh;
 225
 226         int bh_running;         /* Protection from multiple */
 227         int isr_overflow;
 228         int bh_requested;
 229
 230         int dcd_chkcount;               /* check counts to prevent */
 231         int cts_chkcount;               /* too many IRQs if a signal */
 232         int dsr_chkcount;               /* is floating */
 233         int ri_chkcount;
 234
 235         char *buffer_list;              /* virtual address of Rx & Tx buffer lists */
 236         u32 buffer_list_phys;
 237         dma_addr_t buffer_list_dma_addr;
 238
 239         unsigned int rx_buffer_count;   /* count of total allocated Rx buffers */
 240         DMABUFFERENTRY *rx_buffer_list; /* list of receive buffer entries */
 241         unsigned int current_rx_buffer;
 242
 243         int num_tx_dma_buffers;         /* number of tx dma frames required */
 244         int tx_dma_buffers_used;
 245         unsigned int tx_buffer_count;   /* count of total allocated Tx buffers */
 246         DMABUFFERENTRY *tx_buffer_list; /* list of transmit buffer entries */
 247         int start_tx_dma_buffer;        /* tx dma buffer to start tx dma operation */
 248         int current_tx_buffer;          /* next tx dma buffer to be loaded */
 249
 250         unsigned char *intermediate_rxbuffer;
 251
 252         int num_tx_holding_buffers;     /* number of tx holding buffer allocated */
 253         int get_tx_holding_index;       /* next tx holding buffer for adapter to load */
 254         int put_tx_holding_index;       /* next tx holding buffer to store user request */
 255         int tx_holding_count;           /* number of tx holding buffers waiting */
 256         struct tx_holding_buffer tx_holding_buffers[MAX_TX_HOLDING_BUFFERS];
 257
 258         int rx_enabled;
 259         int rx_overflow;
 260         int rx_rcc_underrun;
 261
 262         int tx_enabled;
 263         int tx_active;
 264         u32 idle_mode;
 265
 266         u16 cmr_value;
 267         u16 tcsr_value;
 268
 269         char device_name[25];           /* device instance name */
 270
 271         unsigned int bus_type;  /* expansion bus type (ISA,EISA,PCI) */
 272         unsigned char bus;              /* expansion bus number (zero based) */
 273         unsigned char function;         /* PCI device number */
 274
 275         unsigned int io_base;           /* base I/O address of adapter */
 276         unsigned int io_addr_size;      /* size of the I/O address range */
 277         int io_addr_requested;          /* nonzero if I/O address requested */
 278
 279         unsigned int irq_level;         /* interrupt level */
 280         unsigned long irq_flags;
 281         int irq_requested;              /* nonzero if IRQ requested */
 282
 283         unsigned int dma_level;         /* DMA channel */
 284         int dma_requested;              /* nonzero if dma channel requested */
 285
 286         u16 mbre_bit;
 287         u16 loopback_bits;
 288         u16 usc_idle_mode;
 289
 290         MGSL_PARAMS params;             /* communications parameters */
 291
 292         unsigned char serial_signals;   /* current serial signal states */
 293
 294         int irq_occurred;               /* for diagnostics use */
 295         unsigned int init_error;        /* Initialization startup error                 (DIAGS) */
 296         int     fDiagnosticsmode;       /* Driver in Diagnostic mode?                   (DIAGS) */
 297
 298         u32 last_mem_alloc;
 299         unsigned char* memory_base;     /* shared memory address (PCI only) */
 300         u32 phys_memory_base;
 301         int shared_mem_requested;
 302
 303         unsigned char* lcr_base;        /* local config registers (PCI only) */
 304         u32 phys_lcr_base;
 305         u32 lcr_offset;
 306         int lcr_mem_requested;
 307
 308         u32 misc_ctrl_value;
 309         char flag_buf[MAX_ASYNC_BUFFER_SIZE];
 310         char char_buf[MAX_ASYNC_BUFFER_SIZE];
 311         BOOLEAN drop_rts_on_tx_done;
 312
 313         BOOLEAN loopmode_insert_requested;
 314         BOOLEAN loopmode_send_done_requested;
 315
 316         struct  _input_signal_events    input_signal_events;
 317
 318         /* generic HDLC device parts */
 319         int netcount;
 320         int dosyncppp;
 321         spinlock_t netlock;
 322
 323 #ifdef CONFIG_HDLC
 324         struct net_device *netdev;
 325 #endif
 326 };
 327
 328 #define MGSL_MAGIC 0x5401
 329
 330 /*
 331  * The size of the serial xmit buffer is 1 page, or 4096 bytes
 332  */
 333 #ifndef SERIAL_XMIT_SIZE
 334 #define SERIAL_XMIT_SIZE 4096
 335 #endif
 336
 337 /*
 338  * These macros define the offsets used in calculating the
 339  * I/O address of the specified USC registers.
 340  */
 341
 342
 343 #define DCPIN 2         /* Bit 1 of I/O address */
 344 #define SDPIN 4         /* Bit 2 of I/O address */
 345
 346 #define DCAR 0          /* DMA command/address register */
 347 #define CCAR SDPIN              /* channel command/address register */
 348 #define DATAREG DCPIN + SDPIN   /* serial data register */
 349 #define MSBONLY 0x41
 350 #define LSBONLY 0x40
 351
 352 /*
 353  * These macros define the register address (ordinal number)
 354  * used for writing address/value pairs to the USC.
 355  */
 356
 357 #define CMR     0x02    /* Channel mode Register */
 358 #define CCSR    0x04    /* Channel Command/status Register */
 359 #define CCR     0x06    /* Channel Control Register */
 360 #define PSR     0x08    /* Port status Register */
 361 #define PCR     0x0a    /* Port Control Register */
 362 #define TMDR    0x0c    /* Test mode Data Register */
 363 #define TMCR    0x0e    /* Test mode Control Register */
 364 #define CMCR    0x10    /* Clock mode Control Register */
 365 #define HCR     0x12    /* Hardware Configuration Register */
 366 #define IVR     0x14    /* Interrupt Vector Register */
 367 #define IOCR    0x16    /* Input/Output Control Register */
 368 #define ICR     0x18    /* Interrupt Control Register */
 369 #define DCCR    0x1a    /* Daisy Chain Control Register */
 370 #define MISR    0x1c    /* Misc Interrupt status Register */
 371 #define SICR    0x1e    /* status Interrupt Control Register */
 372 #define RDR     0x20    /* Receive Data Register */
 373 #define RMR     0x22    /* Receive mode Register */
 374 #define RCSR    0x24    /* Receive Command/status Register */
 375 #define RICR    0x26    /* Receive Interrupt Control Register */
 376 #define RSR     0x28    /* Receive Sync Register */
 377 #define RCLR    0x2a    /* Receive count Limit Register */
 378 #define RCCR    0x2c    /* Receive Character count Register */
 379 #define TC0R    0x2e    /* Time Constant 0 Register */
 380 #define TDR     0x30    /* Transmit Data Register */
 381 #define TMR     0x32    /* Transmit mode Register */
 382 #define TCSR    0x34    /* Transmit Command/status Register */
 383 #define TICR    0x36    /* Transmit Interrupt Control Register */
 384 #define TSR     0x38    /* Transmit Sync Register */
 385 #define TCLR    0x3a    /* Transmit count Limit Register */
 386 #define TCCR    0x3c    /* Transmit Character count Register */
 387 #define TC1R    0x3e    /* Time Constant 1 Register */
 388
 389
 390 /*
 391  * MACRO DEFINITIONS FOR DMA REGISTERS
 392  */
 393
 394 #define DCR     0x06    /* DMA Control Register (shared) */
 395 #define DACR    0x08    /* DMA Array count Register (shared) */
 396 #define BDCR    0x12    /* Burst/Dwell Control Register (shared) */
 397 #define DIVR    0x14    /* DMA Interrupt Vector Register (shared) */
 398 #define DICR    0x18    /* DMA Interrupt Control Register (shared) */
 399 #define CDIR    0x1a    /* Clear DMA Interrupt Register (shared) */
 400 #define SDIR    0x1c    /* Set DMA Interrupt Register (shared) */
 401
 402 #define TDMR    0x02    /* Transmit DMA mode Register */
 403 #define TDIAR   0x1e    /* Transmit DMA Interrupt Arm Register */
 404 #define TBCR    0x2a    /* Transmit Byte count Register */
 405 #define TARL    0x2c    /* Transmit Address Register (low) */
 406 #define TARU    0x2e    /* Transmit Address Register (high) */
 407 #define NTBCR   0x3a    /* Next Transmit Byte count Register */
 408 #define NTARL   0x3c    /* Next Transmit Address Register (low) */
 409 #define NTARU   0x3e    /* Next Transmit Address Register (high) */
 410
 411 #define RDMR    0x82    /* Receive DMA mode Register (non-shared) */
 412 #define RDIAR   0x9e    /* Receive DMA Interrupt Arm Register */
 413 #define RBCR    0xaa    /* Receive Byte count Register */
 414 #define RARL    0xac    /* Receive Address Register (low) */
 415 #define RARU    0xae    /* Receive Address Register (high) */
 416 #define NRBCR   0xba    /* Next Receive Byte count Register */
 417 #define NRARL   0xbc    /* Next Receive Address Register (low) */
 418 #define NRARU   0xbe    /* Next Receive Address Register (high) */
 419
 420
 421 /*
 422  * MACRO DEFINITIONS FOR MODEM STATUS BITS
 423  */
 424
 425 #define MODEMSTATUS_DTR 0x80
 426 #define MODEMSTATUS_DSR 0x40
 427 #define MODEMSTATUS_RTS 0x20
 428 #define MODEMSTATUS_CTS 0x10
 429 #define MODEMSTATUS_RI  0x04
 430 #define MODEMSTATUS_DCD 0x01
 431
 432
 433 /*
 434  * Channel Command/Address Register (CCAR) Command Codes
 435  */
 436
 437 #define RTCmd_Null                      0x0000
 438 #define RTCmd_ResetHighestIus           0x1000
 439 #define RTCmd_TriggerChannelLoadDma     0x2000
 440 #define RTCmd_TriggerRxDma              0x2800
 441 #define RTCmd_TriggerTxDma              0x3000
 442 #define RTCmd_TriggerRxAndTxDma         0x3800
 443 #define RTCmd_PurgeRxFifo               0x4800
 444 #define RTCmd_PurgeTxFifo               0x5000
 445 #define RTCmd_PurgeRxAndTxFifo          0x5800
 446 #define RTCmd_LoadRcc                   0x6800
 447 #define RTCmd_LoadTcc                   0x7000
 448 #define RTCmd_LoadRccAndTcc             0x7800
 449 #define RTCmd_LoadTC0                   0x8800
 450 #define RTCmd_LoadTC1                   0x9000
 451 #define RTCmd_LoadTC0AndTC1             0x9800
 452 #define RTCmd_SerialDataLSBFirst        0xa000
 453 #define RTCmd_SerialDataMSBFirst        0xa800
 454 #define RTCmd_SelectBigEndian           0xb000
 455 #define RTCmd_SelectLittleEndian        0xb800
 456
 457
 458 /*
 459  * DMA Command/Address Register (DCAR) Command Codes
 460  */
 461
 462 #define DmaCmd_Null                     0x0000
 463 #define DmaCmd_ResetTxChannel           0x1000
 464 #define DmaCmd_ResetRxChannel           0x1200
 465 #define DmaCmd_StartTxChannel           0x2000
 466 #define DmaCmd_StartRxChannel           0x2200
 467 #define DmaCmd_ContinueTxChannel        0x3000
 468 #define DmaCmd_ContinueRxChannel        0x3200
 469 #define DmaCmd_PauseTxChannel           0x4000
 470 #define DmaCmd_PauseRxChannel           0x4200
 471 #define DmaCmd_AbortTxChannel           0x5000
 472 #define DmaCmd_AbortRxChannel           0x5200
 473 #define DmaCmd_InitTxChannel            0x7000
 474 #define DmaCmd_InitRxChannel            0x7200
 475 #define DmaCmd_ResetHighestDmaIus       0x8000
 476 #define DmaCmd_ResetAllChannels         0x9000
 477 #define DmaCmd_StartAllChannels         0xa000
 478 #define DmaCmd_ContinueAllChannels      0xb000
 479 #define DmaCmd_PauseAllChannels         0xc000
 480 #define DmaCmd_AbortAllChannels         0xd000
 481 #define DmaCmd_InitAllChannels          0xf000
 482
 483 #define TCmd_Null                       0x0000
 484 #define TCmd_ClearTxCRC                 0x2000
 485 #define TCmd_SelectTicrTtsaData         0x4000
 486 #define TCmd_SelectTicrTxFifostatus     0x5000
 487 #define TCmd_SelectTicrIntLevel         0x6000
 488 #define TCmd_SelectTicrdma_level                0x7000
 489 #define TCmd_SendFrame                  0x8000
 490 #define TCmd_SendAbort                  0x9000
 491 #define TCmd_EnableDleInsertion         0xc000
 492 #define TCmd_DisableDleInsertion        0xd000
 493 #define TCmd_ClearEofEom                0xe000
 494 #define TCmd_SetEofEom                  0xf000
 495
 496 #define RCmd_Null                       0x0000
 497 #define RCmd_ClearRxCRC                 0x2000
 498 #define RCmd_EnterHuntmode              0x3000
 499 #define RCmd_SelectRicrRtsaData         0x4000
 500 #define RCmd_SelectRicrRxFifostatus     0x5000
 501 #define RCmd_SelectRicrIntLevel         0x6000
 502 #define RCmd_SelectRicrdma_level                0x7000
 503
 504 /*
 505  * Bits for enabling and disabling IRQs in Interrupt Control Register (ICR)
 506  */
 507
 508 #define RECEIVE_STATUS          BIT5
 509 #define RECEIVE_DATA            BIT4
 510 #define TRANSMIT_STATUS         BIT3
 511 #define TRANSMIT_DATA           BIT2
 512 #define IO_PIN                  BIT1
 513 #define MISC                    BIT0
 514
 515
 516 /*
 517  * Receive status Bits in Receive Command/status Register RCSR
 518  */
 519
 520 #define RXSTATUS_SHORT_FRAME            BIT8
 521 #define RXSTATUS_CODE_VIOLATION         BIT8
 522 #define RXSTATUS_EXITED_HUNT            BIT7
 523 #define RXSTATUS_IDLE_RECEIVED          BIT6
 524 #define RXSTATUS_BREAK_RECEIVED         BIT5
 525 #define RXSTATUS_ABORT_RECEIVED         BIT5
 526 #define RXSTATUS_RXBOUND                BIT4
 527 #define RXSTATUS_CRC_ERROR              BIT3
 528 #define RXSTATUS_FRAMING_ERROR          BIT3
 529 #define RXSTATUS_ABORT                  BIT2
 530 #define RXSTATUS_PARITY_ERROR           BIT2
 531 #define RXSTATUS_OVERRUN                BIT1
 532 #define RXSTATUS_DATA_AVAILABLE         BIT0
 533 #define RXSTATUS_ALL                    0x01f6
 534 #define usc_UnlatchRxstatusBits(a,b) usc_OutReg( (a), RCSR, (u16)((b) & RXSTATUS_ALL) )
 535
 536 /*
 537  * Values for setting transmit idle mode in
 538  * Transmit Control/status Register (TCSR)
 539  */
 540 #define IDLEMODE_FLAGS                  0x0000
 541 #define IDLEMODE_ALT_ONE_ZERO           0x0100
 542 #define IDLEMODE_ZERO                   0x0200
 543 #define IDLEMODE_ONE                    0x0300
 544 #define IDLEMODE_ALT_MARK_SPACE         0x0500
 545 #define IDLEMODE_SPACE                  0x0600
 546 #define IDLEMODE_MARK                   0x0700
 547 #define IDLEMODE_MASK                   0x0700
 548
 549 /*
 550  * IUSC revision identifiers
 551  */
 552 #define IUSC_SL1660                     0x4d44
 553 #define IUSC_PRE_SL1660                 0x4553
 554
 555 /*
 556  * Transmit status Bits in Transmit Command/status Register (TCSR)
 557  */
 558
 559 #define TCSR_PRESERVE                   0x0F00
 560
 561 #define TCSR_UNDERWAIT                  BIT11
 562 #define TXSTATUS_PREAMBLE_SENT          BIT7
 563 #define TXSTATUS_IDLE_SENT              BIT6
 564 #define TXSTATUS_ABORT_SENT             BIT5
 565 #define TXSTATUS_EOF_SENT               BIT4
 566 #define TXSTATUS_EOM_SENT               BIT4
 567 #define TXSTATUS_CRC_SENT               BIT3
 568 #define TXSTATUS_ALL_SENT               BIT2
 569 #define TXSTATUS_UNDERRUN               BIT1
 570 #define TXSTATUS_FIFO_EMPTY             BIT0
 571 #define TXSTATUS_ALL                    0x00fa
 572 #define usc_UnlatchTxstatusBits(a,b) usc_OutReg( (a), TCSR, (u16)((a)->tcsr_value + ((b) & 0x00FF)) )
 573
 574
 575 #define MISCSTATUS_RXC_LATCHED          BIT15
 576 #define MISCSTATUS_RXC                  BIT14
 577 #define MISCSTATUS_TXC_LATCHED          BIT13
 578 #define MISCSTATUS_TXC                  BIT12
 579 #define MISCSTATUS_RI_LATCHED           BIT11
 580 #define MISCSTATUS_RI                   BIT10
 581 #define MISCSTATUS_DSR_LATCHED          BIT9
 582 #define MISCSTATUS_DSR                  BIT8
 583 #define MISCSTATUS_DCD_LATCHED          BIT7
 584 #define MISCSTATUS_DCD                  BIT6
 585 #define MISCSTATUS_CTS_LATCHED          BIT5
 586 #define MISCSTATUS_CTS                  BIT4
 587 #define MISCSTATUS_RCC_UNDERRUN         BIT3
 588 #define MISCSTATUS_DPLL_NO_SYNC         BIT2
 589 #define MISCSTATUS_BRG1_ZERO            BIT1
 590 #define MISCSTATUS_BRG0_ZERO            BIT0
 591
 592 #define usc_UnlatchIostatusBits(a,b) usc_OutReg((a),MISR,(u16)((b) & 0xaaa0))
 593 #define usc_UnlatchMiscstatusBits(a,b) usc_OutReg((a),MISR,(u16)((b) & 0x000f))
 594
 595 #define SICR_RXC_ACTIVE                 BIT15
 596 #define SICR_RXC_INACTIVE               BIT14
 597 #define SICR_RXC                        (BIT15+BIT14)
 598 #define SICR_TXC_ACTIVE                 BIT13
 599 #define SICR_TXC_INACTIVE               BIT12
 600 #define SICR_TXC                        (BIT13+BIT12)
 601 #define SICR_RI_ACTIVE                  BIT11
 602 #define SICR_RI_INACTIVE                BIT10
 603 #define SICR_RI                         (BIT11+BIT10)
 604 #define SICR_DSR_ACTIVE                 BIT9
 605 #define SICR_DSR_INACTIVE               BIT8
 606 #define SICR_DSR                        (BIT9+BIT8)
 607 #define SICR_DCD_ACTIVE                 BIT7
 608 #define SICR_DCD_INACTIVE               BIT6
 609 #define SICR_DCD                        (BIT7+BIT6)
 610 #define SICR_CTS_ACTIVE                 BIT5
 611 #define SICR_CTS_INACTIVE               BIT4
 612 #define SICR_CTS                        (BIT5+BIT4)
 613 #define SICR_RCC_UNDERFLOW              BIT3
 614 #define SICR_DPLL_NO_SYNC               BIT2
 615 #define SICR_BRG1_ZERO                  BIT1
 616 #define SICR_BRG0_ZERO                  BIT0
 617
 618 void usc_DisableMasterIrqBit( struct mgsl_struct *info );
 619 void usc_EnableMasterIrqBit( struct mgsl_struct *info );
 620 void usc_EnableInterrupts( struct mgsl_struct *info, u16 IrqMask );
 621 void usc_DisableInterrupts( struct mgsl_struct *info, u16 IrqMask );
 622 void usc_ClearIrqPendingBits( struct mgsl_struct *info, u16 IrqMask );
 623
 624 #define usc_EnableInterrupts( a, b ) \
 625         usc_OutReg( (a), ICR, (u16)((usc_InReg((a),ICR) & 0xff00) + 0xc0 + (b)) )
 626
 627 #define usc_DisableInterrupts( a, b ) \
 628         usc_OutReg( (a), ICR, (u16)((usc_InReg((a),ICR) & 0xff00) + 0x80 + (b)) )
 629
 630 #define usc_EnableMasterIrqBit(a) \
 631         usc_OutReg( (a), ICR, (u16)((usc_InReg((a),ICR) & 0x0f00) + 0xb000) )
 632
 633 #define usc_DisableMasterIrqBit(a) \
 634         usc_OutReg( (a), ICR, (u16)(usc_InReg((a),ICR) & 0x7f00) )
 635
 636 #define usc_ClearIrqPendingBits( a, b ) usc_OutReg( (a), DCCR, 0x40 + (b) )
 637
 638 /*
 639  * Transmit status Bits in Transmit Control status Register (TCSR)
 640  * and Transmit Interrupt Control Register (TICR) (except BIT2, BIT0)
 641  */
 642
 643 #define TXSTATUS_PREAMBLE_SENT  BIT7
 644 #define TXSTATUS_IDLE_SENT      BIT6
 645 #define TXSTATUS_ABORT_SENT     BIT5
 646 #define TXSTATUS_EOF            BIT4
 647 #define TXSTATUS_CRC_SENT       BIT3
 648 #define TXSTATUS_ALL_SENT       BIT2
 649 #define TXSTATUS_UNDERRUN       BIT1
 650 #define TXSTATUS_FIFO_EMPTY     BIT0
 651
 652 #define DICR_MASTER             BIT15
 653 #define DICR_TRANSMIT           BIT0
 654 #define DICR_RECEIVE            BIT1
 655
 656 #define usc_EnableDmaInterrupts(a,b) \
 657         usc_OutDmaReg( (a), DICR, (u16)(usc_InDmaReg((a),DICR) | (b)) )
 658
 659 #define usc_DisableDmaInterrupts(a,b) \
 660         usc_OutDmaReg( (a), DICR, (u16)(usc_InDmaReg((a),DICR) & ~(b)) )
 661
 662 #define usc_EnableStatusIrqs(a,b) \
 663         usc_OutReg( (a), SICR, (u16)(usc_InReg((a),SICR) | (b)) )
 664
 665 #define usc_DisablestatusIrqs(a,b) \
 666         usc_OutReg( (a), SICR, (u16)(usc_InReg((a),SICR) & ~(b)) )
 667
 668 /* Transmit status Bits in Transmit Control status Register (TCSR) */
 669 /* and Transmit Interrupt Control Register (TICR) (except BIT2, BIT0) */
 670
 671
 672 #define DISABLE_UNCONDITIONAL    0
 673 #define DISABLE_END_OF_FRAME     1
 674 #define ENABLE_UNCONDITIONAL     2
 675 #define ENABLE_AUTO_CTS          3
 676 #define ENABLE_AUTO_DCD          3
 677 #define usc_EnableTransmitter(a,b) \
 678         usc_OutReg( (a), TMR, (u16)((usc_InReg((a),TMR) & 0xfffc) | (b)) )
 679 #define usc_EnableReceiver(a,b) \
 680         usc_OutReg( (a), RMR, (u16)((usc_InReg((a),RMR) & 0xfffc) | (b)) )
 681
 682 static u16  usc_InDmaReg( struct mgsl_struct *info, u16 Port );
 683 static void usc_OutDmaReg( struct mgsl_struct *info, u16 Port, u16 Value );
 684 static void usc_DmaCmd( struct mgsl_struct *info, u16 Cmd );
 685
 686 static u16  usc_InReg( struct mgsl_struct *info, u16 Port );
 687 static void usc_OutReg( struct mgsl_struct *info, u16 Port, u16 Value );
 688 static void usc_RTCmd( struct mgsl_struct *info, u16 Cmd );
 689 void usc_RCmd( struct mgsl_struct *info, u16 Cmd );
 690 void usc_TCmd( struct mgsl_struct *info, u16 Cmd );
 691
 692 #define usc_TCmd(a,b) usc_OutReg((a), TCSR, (u16)((a)->tcsr_value + (b)))
 693 #define usc_RCmd(a,b) usc_OutReg((a), RCSR, (b))
 694
 695 #define usc_SetTransmitSyncChars(a,s0,s1) usc_OutReg((a), TSR, (u16)(((u16)s0<<8)|(u16)s1))
 696
 697 static void usc_process_rxoverrun_sync( struct mgsl_struct *info );
 698 static void usc_start_receiver( struct mgsl_struct *info );
 699 static void usc_stop_receiver( struct mgsl_struct *info );
 700
 701 static void usc_start_transmitter( struct mgsl_struct *info );
 702 static void usc_stop_transmitter( struct mgsl_struct *info );
 703 static void usc_set_txidle( struct mgsl_struct *info );
 704 static void usc_load_txfifo( struct mgsl_struct *info );
 705
 706 static void usc_enable_aux_clock( struct mgsl_struct *info, u32 DataRate );
 707 static void usc_enable_loopback( struct mgsl_struct *info, int enable );
 708
 709 static void usc_get_serial_signals( struct mgsl_struct *info );
 710 static void usc_set_serial_signals( struct mgsl_struct *info );
 711
 712 static void usc_reset( struct mgsl_struct *info );
 713
 714 static void usc_set_sync_mode( struct mgsl_struct *info );
 715 static void usc_set_sdlc_mode( struct mgsl_struct *info );
 716 static void usc_set_async_mode( struct mgsl_struct *info );
 717 static void usc_enable_async_clock( struct mgsl_struct *info, u32 DataRate );
 718
 719 static void usc_loopback_frame( struct mgsl_struct *info );
 720
 721 static void mgsl_tx_timeout(unsigned long context);
 722
 723
 724 static void usc_loopmode_cancel_transmit( struct mgsl_struct * info );
 725 static void usc_loopmode_insert_request( struct mgsl_struct * info );
 726 static int usc_loopmode_active( struct mgsl_struct * info);
 727 static void usc_loopmode_send_done( struct mgsl_struct * info );
 728
 729 static int mgsl_ioctl_common(struct mgsl_struct *info, unsigned int cmd, unsigned long arg);
 730
 731 #ifdef CONFIG_HDLC
 732 #define dev_to_port(D) (dev_to_hdlc(D)->priv)
 733 static void hdlcdev_tx_done(struct mgsl_struct *info);
 734 static void hdlcdev_rx(struct mgsl_struct *info, char *buf, int size);
 735 static int  hdlcdev_init(struct mgsl_struct *info);
 736 static void hdlcdev_exit(struct mgsl_struct *info);
 737 #endif
 738
 739 /*
 740  * Defines a BUS descriptor value for the PCI adapter
 741  * local bus address ranges.
 742  */
 743
 744 #define BUS_DESCRIPTOR( WrHold, WrDly, RdDly, Nwdd, Nwad, Nxda, Nrdd, Nrad ) \
 745 (0x00400020 + \
 746 ((WrHold) << 30) + \
 747 ((WrDly)  << 28) + \
 748 ((RdDly)  << 26) + \
 749 ((Nwdd)   << 20) + \
 750 ((Nwad)   << 15) + \
 751 ((Nxda)   << 13) + \
 752 ((Nrdd)   << 11) + \
 753 ((Nrad)   <<  6) )
 754
 755 static void mgsl_trace_block(struct mgsl_struct *info,const char* data, int count, int xmit);
 756
 757 /*
 758  * Adapter diagnostic routines
 759  */
 760 static BOOLEAN mgsl_register_test( struct mgsl_struct *info );
 761 static BOOLEAN mgsl_irq_test( struct mgsl_struct *info );
 762 static BOOLEAN mgsl_dma_test( struct mgsl_struct *info );
 763 static BOOLEAN mgsl_memory_test( struct mgsl_struct *info );
 764 static int mgsl_adapter_test( struct mgsl_struct *info );
 765
 766 /*
 767  * device and resource management routines
 768  */
 769 static int mgsl_claim_resources(struct mgsl_struct *info);
 770 static void mgsl_release_resources(struct mgsl_struct *info);
 771 static void mgsl_add_device(struct mgsl_struct *info);
 772 static struct mgsl_struct* mgsl_allocate_device(void);
 773
 774 /*
 775  * DMA buffer manupulation functions.
 776  */
 777 static void mgsl_free_rx_frame_buffers( struct mgsl_struct *info, unsigned int StartIndex, unsigned int EndIndex );
 778 static int  mgsl_get_rx_frame( struct mgsl_struct *info );
 779 static int  mgsl_get_raw_rx_frame( struct mgsl_struct *info );
 780 static void mgsl_reset_rx_dma_buffers( struct mgsl_struct *info );
 781 static void mgsl_reset_tx_dma_buffers( struct mgsl_struct *info );
 782 static int num_free_tx_dma_buffers(struct mgsl_struct *info);
 783 static void mgsl_load_tx_dma_buffer( struct mgsl_struct *info, const char *Buffer, unsigned int BufferSize);
 784 static void mgsl_load_pci_memory(char* TargetPtr, const char* SourcePtr, unsigned short count);
 785
 786 /*
 787  * DMA and Shared Memory buffer allocation and formatting
 788  */
 789 static int  mgsl_allocate_dma_buffers(struct mgsl_struct *info);
 790 static void mgsl_free_dma_buffers(struct mgsl_struct *info);
 791 static int  mgsl_alloc_frame_memory(struct mgsl_struct *info, DMABUFFERENTRY *BufferList,int Buffercount);
 792 static void mgsl_free_frame_memory(struct mgsl_struct *info, DMABUFFERENTRY *BufferList,int Buffercount);
 793 static int  mgsl_alloc_buffer_list_memory(struct mgsl_struct *info);
 794 static void mgsl_free_buffer_list_memory(struct mgsl_struct *info);
 795 static int mgsl_alloc_intermediate_rxbuffer_memory(struct mgsl_struct *info);
 796 static void mgsl_free_intermediate_rxbuffer_memory(struct mgsl_struct *info);
 797 static int mgsl_alloc_intermediate_txbuffer_memory(struct mgsl_struct *info);
 798 static void mgsl_free_intermediate_txbuffer_memory(struct mgsl_struct *info);
 799 static int load_next_tx_holding_buffer(struct mgsl_struct *info);
 800 static int save_tx_buffer_request(struct mgsl_struct *info,const char *Buffer, unsigned int BufferSize);
 801
 802 /*
 803  * Bottom half interrupt handlers
 804  */
 805 static void mgsl_bh_handler(void* Context);
 806 static void mgsl_bh_receive(struct mgsl_struct *info);
 807 static void mgsl_bh_transmit(struct mgsl_struct *info);
 808 static void mgsl_bh_status(struct mgsl_struct *info);
 809
 810 /*
 811  * Interrupt handler routines and dispatch table.
 812  */
 813 static void mgsl_isr_null( struct mgsl_struct *info );
 814 static void mgsl_isr_transmit_data( struct mgsl_struct *info );
 815 static void mgsl_isr_receive_data( struct mgsl_struct *info );
 816 static void mgsl_isr_receive_status( struct mgsl_struct *info );
 817 static void mgsl_isr_transmit_status( struct mgsl_struct *info );
 818 static void mgsl_isr_io_pin( struct mgsl_struct *info );
 819 static void mgsl_isr_misc( struct mgsl_struct *info );
 820 static void mgsl_isr_receive_dma( struct mgsl_struct *info );
 821 static void mgsl_isr_transmit_dma( struct mgsl_struct *info );
 822
 823 typedef void (*isr_dispatch_func)(struct mgsl_struct *);
 824
 825 static isr_dispatch_func UscIsrTable[7] =
 826 {
 827         mgsl_isr_null,
 828         mgsl_isr_misc,
 829         mgsl_isr_io_pin,
 830         mgsl_isr_transmit_data,
 831         mgsl_isr_transmit_status,
 832         mgsl_isr_receive_data,
 833         mgsl_isr_receive_status
 834 };
 835
 836 /*
 837  * ioctl call handlers
 838  */
 839 static int tiocmget(struct tty_struct *tty, struct file *file);
 840 static int tiocmset(struct tty_struct *tty, struct file *file,
 841                     unsigned int set, unsigned int clear);
 842 static int mgsl_get_stats(struct mgsl_struct * info, struct mgsl_icount
 843         __user *user_icount);
 844 static int mgsl_get_params(struct mgsl_struct * info, MGSL_PARAMS  __user *user_params);
 845 static int mgsl_set_params(struct mgsl_struct * info, MGSL_PARAMS  __user *new_params);
 846 static int mgsl_get_txidle(struct mgsl_struct * info, int __user *idle_mode);
 847 static int mgsl_set_txidle(struct mgsl_struct * info, int idle_mode);
 848 static int mgsl_txenable(struct mgsl_struct * info, int enable);
 849 static int mgsl_txabort(struct mgsl_struct * info);
 850 static int mgsl_rxenable(struct mgsl_struct * info, int enable);
 851 static int mgsl_wait_event(struct mgsl_struct * info, int __user *mask);
 852 static int mgsl_loopmode_send_done( struct mgsl_struct * info );
 853
 854 /* set non-zero on successful registration with PCI subsystem */
 855 static int pci_registered;
 856
 857 /*
 858  * Global linked list of SyncLink devices
 859  */
 860 static struct mgsl_struct *mgsl_device_list;
 861 static int mgsl_device_count;
 862
 863 /*
 864  * Set this param to non-zero to load eax with the
 865  * .text section address and breakpoint on module load.
 866  * This is useful for use with gdb and add-symbol-file command.
 867  */
 868 static int break_on_load;
 869
 870 /*
 871  * Driver major number, defaults to zero to get auto
 872  * assigned major number. May be forced as module parameter.
 873  */
 874 static int ttymajor;
 875
 876 /*
 877  * Array of user specified options for ISA adapters.
 878  */
 879 static int io[MAX_ISA_DEVICES];
 880 static int irq[MAX_ISA_DEVICES];
 881 static int dma[MAX_ISA_DEVICES];
 882 static int debug_level;
 883 static int maxframe[MAX_TOTAL_DEVICES];
 884 static int dosyncppp[MAX_TOTAL_DEVICES];
 885 static int txdmabufs[MAX_TOTAL_DEVICES];
 886 static int txholdbufs[MAX_TOTAL_DEVICES];
 887
 888 module_param(break_on_load, bool, 0);
 889 module_param(ttymajor, int, 0);
 890 module_param_array(io, int, NULL, 0);
 891 module_param_array(irq, int, NULL, 0);
 892 module_param_array(dma, int, NULL, 0);
 893 module_param(debug_level, int, 0);
 894 module_param_array(maxframe, int, NULL, 0);
 895 module_param_array(dosyncppp, int, NULL, 0);
 896 module_param_array(txdmabufs, int, NULL, 0);
 897 module_param_array(txholdbufs, int, NULL, 0);
 898
 899 static char *driver_name = "SyncLink serial driver";
 900 static char *driver_version = "$Revision: 4.38 $";
 901
 902 static int synclink_init_one (struct pci_dev *dev,
 903                                      const struct pci_device_id *ent);
 904 static void synclink_remove_one (struct pci_dev *dev);
 905
 906 static struct pci_device_id synclink_pci_tbl[] = {
 907         { PCI_VENDOR_ID_MICROGATE, PCI_DEVICE_ID_MICROGATE_USC, PCI_ANY_ID, PCI_ANY_ID, },
 908         { PCI_VENDOR_ID_MICROGATE, 0x0210, PCI_ANY_ID, PCI_ANY_ID, },
 909         { 0, }, /* terminate list */
 910 };
 911 MODULE_DEVICE_TABLE(pci, synclink_pci_tbl);
 912
 913 MODULE_LICENSE("GPL");
 914
 915 static struct pci_driver synclink_pci_driver = {
 916         .name           = "synclink",
 917         .id_table       = synclink_pci_tbl,
 918         .probe          = synclink_init_one,
 919         .remove         = __devexit_p(synclink_remove_one),
 920 };
 921
 922 static struct tty_driver *serial_driver;
 923
 924 /* number of characters left in xmit buffer before we ask for more */
 925 #define WAKEUP_CHARS 256
 926
 927
 928 static void mgsl_change_params(struct mgsl_struct *info);
 929 static void mgsl_wait_until_sent(struct tty_struct *tty, int timeout);
 930
 931 /*
 932  * 1st function defined in .text section. Calling this function in
 933  * init_module() followed by a breakpoint allows a remote debugger
 934  * (gdb) to get the .text address for the add-symbol-file command.
 935  * This allows remote debugging of dynamically loadable modules.
 936  */
 937 static void* mgsl_get_text_ptr(void)
 938 {
 939         return mgsl_get_text_ptr;
 940 }
 941
 942 static inline int mgsl_paranoia_check(struct mgsl_struct *info,
 943                                         char *name, const char *routine)
 944 {
 945 #ifdef MGSL_PARANOIA_CHECK
 946         static const char *badmagic =
 947                 "Warning: bad magic number for mgsl struct (%s) in %s\n";
 948         static const char *badinfo =
 949                 "Warning: null mgsl_struct for (%s) in %s\n";
 950
 951         if (!info) {
 952                 printk(badinfo, name, routine);
 953                 return 1;
 954         }
 955         if (info->magic != MGSL_MAGIC) {
 956                 printk(badmagic, name, routine);
 957                 return 1;
 958         }
 959 #else
 960         if (!info)
 961                 return 1;
 962 #endif
 963         return 0;
 964 }
 965
 966 /**
 967  * line discipline callback wrappers
 968  *
 969  * The wrappers maintain line discipline references
 970  * while calling into the line discipline.
 971  *
 972  * ldisc_receive_buf  - pass receive data to line discipline
 973  */
 974
 975 static void ldisc_receive_buf(struct tty_struct *tty,
 976                               const __u8 *data, char *flags, int count)
 977 {
 978         struct tty_ldisc *ld;
 979         if (!tty)
 980                 return;
 981         ld = tty_ldisc_ref(tty);
 982         if (ld) {
 983                 if (ld->receive_buf)
 984                         ld->receive_buf(tty, data, flags, count);
 985                 tty_ldisc_deref(ld);
 986         }
 987 }
 988
 989 /* mgsl_stop()          throttle (stop) transmitter
 990  *
 991  * Arguments:           tty     pointer to tty info structure
 992  * Return Value:        None
 993  */
 994 static void mgsl_stop(struct tty_struct *tty)
 995 {
 996         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
 997         unsigned long flags;
 998
 999         if (mgsl_paranoia_check(info, tty->name, "mgsl_stop"))
1000                 return;
1001
1002         if ( debug_level >= DEBUG_LEVEL_INFO )
1003                 printk("mgsl_stop(%s)\n",info->device_name);
1004
1005         spin_lock_irqsave(&info->irq_spinlock,flags);
1006         if (info->tx_enabled)
1007                 usc_stop_transmitter(info);
1008         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1009
1010 }       /* end of mgsl_stop() */
1011
1012 /* mgsl_start()         release (start) transmitter
1013  *
1014  * Arguments:           tty     pointer to tty info structure
1015  * Return Value:        None
1016  */
1017 static void mgsl_start(struct tty_struct *tty)
1018 {
1019         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
1020         unsigned long flags;
1021
1022         if (mgsl_paranoia_check(info, tty->name, "mgsl_start"))
1023                 return;
1024
1025         if ( debug_level >= DEBUG_LEVEL_INFO )
1026                 printk("mgsl_start(%s)\n",info->device_name);
1027
1028         spin_lock_irqsave(&info->irq_spinlock,flags);
1029         if (!info->tx_enabled)
1030                 usc_start_transmitter(info);
1031         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1032
1033 }       /* end of mgsl_start() */
1034
1035 /*
1036  * Bottom half work queue access functions
1037  */
1038
1039 /* mgsl_bh_action()     Return next bottom half action to perform.
1040  * Return Value:        BH action code or 0 if nothing to do.
1041  */
1042 static int mgsl_bh_action(struct mgsl_struct *info)
1043 {
1044         unsigned long flags;
1045         int rc = 0;
1046
1047         spin_lock_irqsave(&info->irq_spinlock,flags);
1048
1049         if (info->pending_bh & BH_RECEIVE) {
1050                 info->pending_bh &= ~BH_RECEIVE;
1051                 rc = BH_RECEIVE;
1052         } else if (info->pending_bh & BH_TRANSMIT) {
1053                 info->pending_bh &= ~BH_TRANSMIT;
1054                 rc = BH_TRANSMIT;
1055         } else if (info->pending_bh & BH_STATUS) {
1056                 info->pending_bh &= ~BH_STATUS;
1057                 rc = BH_STATUS;
1058         }
1059
1060         if (!rc) {
1061                 /* Mark BH routine as complete */
1062                 info->bh_running   = 0;
1063                 info->bh_requested = 0;
1064         }
1065
1066         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1067
1068         return rc;
1069 }
1070
1071 /*
1072  *      Perform bottom half processing of work items queued by ISR.
1073  */
1074 static void mgsl_bh_handler(void* Context)
1075 {
1076         struct mgsl_struct *info = (struct mgsl_struct*)Context;
1077         int action;
1078
1079         if (!info)
1080                 return;
1081
1082         if ( debug_level >= DEBUG_LEVEL_BH )
1083                 printk( "%s(%d):mgsl_bh_handler(%s) entry\n",
1084                         __FILE__,__LINE__,info->device_name);
1085
1086         info->bh_running = 1;
1087
1088         while((action = mgsl_bh_action(info)) != 0) {
1089
1090                 /* Process work item */
1091                 if ( debug_level >= DEBUG_LEVEL_BH )
1092                         printk( "%s(%d):mgsl_bh_handler() work item action=%d\n",
1093                                 __FILE__,__LINE__,action);
1094
1095                 switch (action) {
1096
1097                 case BH_RECEIVE:
1098                         mgsl_bh_receive(info);
1099                         break;
1100                 case BH_TRANSMIT:
1101                         mgsl_bh_transmit(info);
1102                         break;
1103                 case BH_STATUS:
1104                         mgsl_bh_status(info);
1105                         break;
1106                 default:
1107                         /* unknown work item ID */
1108                         printk("Unknown work item ID=%08X!\n", action);
1109                         break;
1110                 }
1111         }
1112
1113         if ( debug_level >= DEBUG_LEVEL_BH )
1114                 printk( "%s(%d):mgsl_bh_handler(%s) exit\n",
1115                         __FILE__,__LINE__,info->device_name);
1116 }
1117
1118 static void mgsl_bh_receive(struct mgsl_struct *info)
1119 {
1120         int (*get_rx_frame)(struct mgsl_struct *info) =
1121                 (info->params.mode == MGSL_MODE_HDLC ? mgsl_get_rx_frame : mgsl_get_raw_rx_frame);
1122
1123         if ( debug_level >= DEBUG_LEVEL_BH )
1124                 printk( "%s(%d):mgsl_bh_receive(%s)\n",
1125                         __FILE__,__LINE__,info->device_name);
1126
1127         do
1128         {
1129                 if (info->rx_rcc_underrun) {
1130                         unsigned long flags;
1131                         spin_lock_irqsave(&info->irq_spinlock,flags);
1132                         usc_start_receiver(info);
1133                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1134                         return;
1135                 }
1136         } while(get_rx_frame(info));
1137 }
1138
1139 static void mgsl_bh_transmit(struct mgsl_struct *info)
1140 {
1141         struct tty_struct *tty = info->tty;
1142         unsigned long flags;
1143
1144         if ( debug_level >= DEBUG_LEVEL_BH )
1145                 printk( "%s(%d):mgsl_bh_transmit() entry on %s\n",
1146                         __FILE__,__LINE__,info->device_name);
1147
1148         if (tty) {
1149                 tty_wakeup(tty);
1150                 wake_up_interruptible(&tty->write_wait);
1151         }
1152
1153         /* if transmitter idle and loopmode_send_done_requested
1154          * then start echoing RxD to TxD
1155          */
1156         spin_lock_irqsave(&info->irq_spinlock,flags);
1157         if ( !info->tx_active && info->loopmode_send_done_requested )
1158                 usc_loopmode_send_done( info );
1159         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1160 }
1161
1162 static void mgsl_bh_status(struct mgsl_struct *info)
1163 {
1164         if ( debug_level >= DEBUG_LEVEL_BH )
1165                 printk( "%s(%d):mgsl_bh_status() entry on %s\n",
1166                         __FILE__,__LINE__,info->device_name);
1167
1168         info->ri_chkcount = 0;
1169         info->dsr_chkcount = 0;
1170         info->dcd_chkcount = 0;
1171         info->cts_chkcount = 0;
1172 }
1173
1174 /* mgsl_isr_receive_status()
1175  *
1176  *      Service a receive status interrupt. The type of status
1177  *      interrupt is indicated by the state of the RCSR.
1178  *      This is only used for HDLC mode.
1179  *
1180  * Arguments:           info    pointer to device instance data
1181  * Return Value:        None
1182  */
1183 static void mgsl_isr_receive_status( struct mgsl_struct *info )
1184 {
1185         u16 status = usc_InReg( info, RCSR );
1186
1187         if ( debug_level >= DEBUG_LEVEL_ISR )
1188                 printk("%s(%d):mgsl_isr_receive_status status=%04X\n",
1189                         __FILE__,__LINE__,status);
1190
1191         if ( (status & RXSTATUS_ABORT_RECEIVED) &&
1192                 info->loopmode_insert_requested &&
1193                 usc_loopmode_active(info) )
1194         {
1195                 ++info->icount.rxabort;
1196                 info->loopmode_insert_requested = FALSE;
1197
1198                 /* clear CMR:13 to start echoing RxD to TxD */
1199                 info->cmr_value &= ~BIT13;
1200                 usc_OutReg(info, CMR, info->cmr_value);
1201
1202                 /* disable received abort irq (no longer required) */
1203                 usc_OutReg(info, RICR,
1204                         (usc_InReg(info, RICR) & ~RXSTATUS_ABORT_RECEIVED));
1205         }
1206
1207         if (status & (RXSTATUS_EXITED_HUNT + RXSTATUS_IDLE_RECEIVED)) {
1208                 if (status & RXSTATUS_EXITED_HUNT)
1209                         info->icount.exithunt++;
1210                 if (status & RXSTATUS_IDLE_RECEIVED)
1211                         info->icount.rxidle++;
1212                 wake_up_interruptible(&info->event_wait_q);
1213         }
1214
1215         if (status & RXSTATUS_OVERRUN){
1216                 info->icount.rxover++;
1217                 usc_process_rxoverrun_sync( info );
1218         }
1219
1220         usc_ClearIrqPendingBits( info, RECEIVE_STATUS );
1221         usc_UnlatchRxstatusBits( info, status );
1222
1223 }       /* end of mgsl_isr_receive_status() */
1224
1225 /* mgsl_isr_transmit_status()
1226  *
1227  *      Service a transmit status interrupt
1228  *      HDLC mode :end of transmit frame
1229  *      Async mode:all data is sent
1230  *      transmit status is indicated by bits in the TCSR.
1231  *
1232  * Arguments:           info           pointer to device instance data
1233  * Return Value:        None
1234  */
1235 static void mgsl_isr_transmit_status( struct mgsl_struct *info )
1236 {
1237         u16 status = usc_InReg( info, TCSR );
1238
1239         if ( debug_level >= DEBUG_LEVEL_ISR )
1240                 printk("%s(%d):mgsl_isr_transmit_status status=%04X\n",
1241                         __FILE__,__LINE__,status);
1242
1243         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS );
1244         usc_UnlatchTxstatusBits( info, status );
1245
1246         if ( status & (TXSTATUS_UNDERRUN | TXSTATUS_ABORT_SENT) )
1247         {
1248                 /* finished sending HDLC abort. This may leave  */
1249                 /* the TxFifo with data from the aborted frame  */
1250                 /* so purge the TxFifo. Also shutdown the DMA   */
1251                 /* channel in case there is data remaining in   */
1252                 /* the DMA buffer                               */
1253                 usc_DmaCmd( info, DmaCmd_ResetTxChannel );
1254                 usc_RTCmd( info, RTCmd_PurgeTxFifo );
1255         }
1256
1257         if ( status & TXSTATUS_EOF_SENT )
1258                 info->icount.txok++;
1259         else if ( status & TXSTATUS_UNDERRUN )
1260                 info->icount.txunder++;
1261         else if ( status & TXSTATUS_ABORT_SENT )
1262                 info->icount.txabort++;
1263         else
1264                 info->icount.txunder++;
1265
1266         info->tx_active = 0;
1267         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1268         del_timer(&info->tx_timer);
1269
1270         if ( info->drop_rts_on_tx_done ) {
1271                 usc_get_serial_signals( info );
1272                 if ( info->serial_signals & SerialSignal_RTS ) {
1273                         info->serial_signals &= ~SerialSignal_RTS;
1274                         usc_set_serial_signals( info );
1275                 }
1276                 info->drop_rts_on_tx_done = 0;
1277         }
1278
1279 #ifdef CONFIG_HDLC
1280         if (info->netcount)
1281                 hdlcdev_tx_done(info);
1282         else
1283 #endif
1284         {
1285                 if (info->tty->stopped || info->tty->hw_stopped) {
1286                         usc_stop_transmitter(info);
1287                         return;
1288                 }
1289                 info->pending_bh |= BH_TRANSMIT;
1290         }
1291
1292 }       /* end of mgsl_isr_transmit_status() */
1293
1294 /* mgsl_isr_io_pin()
1295  *
1296  *      Service an Input/Output pin interrupt. The type of
1297  *      interrupt is indicated by bits in the MISR
1298  *
1299  * Arguments:           info           pointer to device instance data
1300  * Return Value:        None
1301  */
1302 static void mgsl_isr_io_pin( struct mgsl_struct *info )
1303 {
1304         struct  mgsl_icount *icount;
1305         u16 status = usc_InReg( info, MISR );
1306
1307         if ( debug_level >= DEBUG_LEVEL_ISR )
1308                 printk("%s(%d):mgsl_isr_io_pin status=%04X\n",
1309                         __FILE__,__LINE__,status);
1310
1311         usc_ClearIrqPendingBits( info, IO_PIN );
1312         usc_UnlatchIostatusBits( info, status );
1313
1314         if (status & (MISCSTATUS_CTS_LATCHED | MISCSTATUS_DCD_LATCHED |
1315                       MISCSTATUS_DSR_LATCHED | MISCSTATUS_RI_LATCHED) ) {
1316                 icount = &info->icount;
1317                 /* update input line counters */
1318                 if (status & MISCSTATUS_RI_LATCHED) {
1319                         if ((info->ri_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1320                                 usc_DisablestatusIrqs(info,SICR_RI);
1321                         icount->rng++;
1322                         if ( status & MISCSTATUS_RI )
1323                                 info->input_signal_events.ri_up++;
1324                         else
1325                                 info->input_signal_events.ri_down++;
1326                 }
1327                 if (status & MISCSTATUS_DSR_LATCHED) {
1328                         if ((info->dsr_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1329                                 usc_DisablestatusIrqs(info,SICR_DSR);
1330                         icount->dsr++;
1331                         if ( status & MISCSTATUS_DSR )
1332                                 info->input_signal_events.dsr_up++;
1333                         else
1334                                 info->input_signal_events.dsr_down++;
1335                 }
1336                 if (status & MISCSTATUS_DCD_LATCHED) {
1337                         if ((info->dcd_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1338                                 usc_DisablestatusIrqs(info,SICR_DCD);
1339                         icount->dcd++;
1340                         if (status & MISCSTATUS_DCD) {
1341                                 info->input_signal_events.dcd_up++;
1342                         } else
1343                                 info->input_signal_events.dcd_down++;
1344 #ifdef CONFIG_HDLC
1345                         if (info->netcount) {
1346                                 if (status & MISCSTATUS_DCD)
1347                                         netif_carrier_on(info->netdev);
1348                                 else
1349                                         netif_carrier_off(info->netdev);
1350                         }
1351 #endif
1352                 }
1353                 if (status & MISCSTATUS_CTS_LATCHED)
1354                 {
1355                         if ((info->cts_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1356                                 usc_DisablestatusIrqs(info,SICR_CTS);
1357                         icount->cts++;
1358                         if ( status & MISCSTATUS_CTS )
1359                                 info->input_signal_events.cts_up++;
1360                         else
1361                                 info->input_signal_events.cts_down++;
1362                 }
1363                 wake_up_interruptible(&info->status_event_wait_q);
1364                 wake_up_interruptible(&info->event_wait_q);
1365
1366                 if ( (info->flags & ASYNC_CHECK_CD) &&
1367                      (status & MISCSTATUS_DCD_LATCHED) ) {
1368                         if ( debug_level >= DEBUG_LEVEL_ISR )
1369                                 printk("%s CD now %s...", info->device_name,
1370                                        (status & MISCSTATUS_DCD) ? "on" : "off");
1371                         if (status & MISCSTATUS_DCD)
1372                                 wake_up_interruptible(&info->open_wait);
1373                         else {
1374                                 if ( debug_level >= DEBUG_LEVEL_ISR )
1375                                         printk("doing serial hangup...");
1376                                 if (info->tty)
1377                                         tty_hangup(info->tty);
1378                         }
1379                 }
1380
1381                 if ( (info->flags & ASYNC_CTS_FLOW) &&
1382                      (status & MISCSTATUS_CTS_LATCHED) ) {
1383                         if (info->tty->hw_stopped) {
1384                                 if (status & MISCSTATUS_CTS) {
1385                                         if ( debug_level >= DEBUG_LEVEL_ISR )
1386                                                 printk("CTS tx start...");
1387                                         if (info->tty)
1388                                                 info->tty->hw_stopped = 0;
1389                                         usc_start_transmitter(info);
1390                                         info->pending_bh |= BH_TRANSMIT;
1391                                         return;
1392                                 }
1393                         } else {
1394                                 if (!(status & MISCSTATUS_CTS)) {
1395                                         if ( debug_level >= DEBUG_LEVEL_ISR )
1396                                                 printk("CTS tx stop...");
1397                                         if (info->tty)
1398                                                 info->tty->hw_stopped = 1;
1399                                         usc_stop_transmitter(info);
1400                                 }
1401                         }
1402                 }
1403         }
1404
1405         info->pending_bh |= BH_STATUS;
1406
1407         /* for diagnostics set IRQ flag */
1408         if ( status & MISCSTATUS_TXC_LATCHED ){
1409                 usc_OutReg( info, SICR,
1410                         (unsigned short)(usc_InReg(info,SICR) & ~(SICR_TXC_ACTIVE+SICR_TXC_INACTIVE)) );
1411                 usc_UnlatchIostatusBits( info, MISCSTATUS_TXC_LATCHED );
1412                 info->irq_occurred = 1;
1413         }
1414
1415 }       /* end of mgsl_isr_io_pin() */
1416
1417 /* mgsl_isr_transmit_data()
1418  *
1419  *      Service a transmit data interrupt (async mode only).
1420  *
1421  * Arguments:           info    pointer to device instance data
1422  * Return Value:        None
1423  */
1424 static void mgsl_isr_transmit_data( struct mgsl_struct *info )
1425 {
1426         if ( debug_level >= DEBUG_LEVEL_ISR )
1427                 printk("%s(%d):mgsl_isr_transmit_data xmit_cnt=%d\n",
1428                         __FILE__,__LINE__,info->xmit_cnt);
1429
1430         usc_ClearIrqPendingBits( info, TRANSMIT_DATA );
1431
1432         if (info->tty->stopped || info->tty->hw_stopped) {
1433                 usc_stop_transmitter(info);
1434                 return;
1435         }
1436
1437         if ( info->xmit_cnt )
1438                 usc_load_txfifo( info );
1439         else
1440                 info->tx_active = 0;
1441
1442         if (info->xmit_cnt < WAKEUP_CHARS)
1443                 info->pending_bh |= BH_TRANSMIT;
1444
1445 }       /* end of mgsl_isr_transmit_data() */
1446
1447 /* mgsl_isr_receive_data()
1448  *
1449  *      Service a receive data interrupt. This occurs
1450  *      when operating in asynchronous interrupt transfer mode.
1451  *      The receive data FIFO is flushed to the receive data buffers.
1452  *
1453  * Arguments:           info            pointer to device instance data
1454  * Return Value:        None
1455  */
1456 static void mgsl_isr_receive_data( struct mgsl_struct *info )
1457 {
1458         int Fifocount;
1459         u16 status;
1460         int work = 0;
1461         unsigned char DataByte;
1462         struct tty_struct *tty = info->tty;
1463         struct  mgsl_icount *icount = &info->icount;
1464
1465         if ( debug_level >= DEBUG_LEVEL_ISR )
1466                 printk("%s(%d):mgsl_isr_receive_data\n",
1467                         __FILE__,__LINE__);
1468
1469         usc_ClearIrqPendingBits( info, RECEIVE_DATA );
1470
1471         /* select FIFO status for RICR readback */
1472         usc_RCmd( info, RCmd_SelectRicrRxFifostatus );
1473
1474         /* clear the Wordstatus bit so that status readback */
1475         /* only reflects the status of this byte */
1476         usc_OutReg( info, RICR+LSBONLY, (u16)(usc_InReg(info, RICR+LSBONLY) & ~BIT3 ));
1477
1478         /* flush the receive FIFO */
1479
1480         while( (Fifocount = (usc_InReg(info,RICR) >> 8)) ) {
1481                 int flag;
1482
1483                 /* read one byte from RxFIFO */
1484                 outw( (inw(info->io_base + CCAR) & 0x0780) | (RDR+LSBONLY),
1485                       info->io_base + CCAR );
1486                 DataByte = inb( info->io_base + CCAR );
1487
1488                 /* get the status of the received byte */
1489                 status = usc_InReg(info, RCSR);
1490                 if ( status & (RXSTATUS_FRAMING_ERROR + RXSTATUS_PARITY_ERROR +
1491                                 RXSTATUS_OVERRUN + RXSTATUS_BREAK_RECEIVED) )
1492                         usc_UnlatchRxstatusBits(info,RXSTATUS_ALL);
1493
1494                 icount->rx++;
1495
1496                 flag = 0;
1497                 if ( status & (RXSTATUS_FRAMING_ERROR + RXSTATUS_PARITY_ERROR +
1498                                 RXSTATUS_OVERRUN + RXSTATUS_BREAK_RECEIVED) ) {
1499                         printk("rxerr=%04X\n",status);
1500                         /* update error statistics */
1501                         if ( status & RXSTATUS_BREAK_RECEIVED ) {
1502                                 status &= ~(RXSTATUS_FRAMING_ERROR + RXSTATUS_PARITY_ERROR);
1503                                 icount->brk++;
1504                         } else if (status & RXSTATUS_PARITY_ERROR)
1505                                 icount->parity++;
1506                         else if (status & RXSTATUS_FRAMING_ERROR)
1507                                 icount->frame++;
1508                         else if (status & RXSTATUS_OVERRUN) {
1509                                 /* must issue purge fifo cmd before */
1510                                 /* 16C32 accepts more receive chars */
1511                                 usc_RTCmd(info,RTCmd_PurgeRxFifo);
1512                                 icount->overrun++;
1513                         }
1514
1515                         /* discard char if tty control flags say so */
1516                         if (status & info->ignore_status_mask)
1517                                 continue;
1518
1519                         status &= info->read_status_mask;
1520
1521                         if (status & RXSTATUS_BREAK_RECEIVED) {
1522                                 flag = TTY_BREAK;
1523                                 if (info->flags & ASYNC_SAK)
1524                                         do_SAK(tty);
1525                         } else if (status & RXSTATUS_PARITY_ERROR)
1526                                 flag = TTY_PARITY;
1527                         else if (status & RXSTATUS_FRAMING_ERROR)
1528                                 flag = TTY_FRAME;
1529                 }       /* end of if (error) */
1530                 tty_insert_flip_char(tty, DataByte, flag);
1531                 if (status & RXSTATUS_OVERRUN) {
1532                         /* Overrun is special, since it's
1533                          * reported immediately, and doesn't
1534                          * affect the current character
1535                          */
1536                         work += tty_insert_flip_char(tty, 0, TTY_OVERRUN);
1537                 }
1538         }
1539
1540         if ( debug_level >= DEBUG_LEVEL_ISR ) {
1541                 printk("%s(%d):rx=%d brk=%d parity=%d frame=%d overrun=%d\n",
1542                         __FILE__,__LINE__,icount->rx,icount->brk,
1543                         icount->parity,icount->frame,icount->overrun);
1544         }
1545
1546         if(work)
1547                 tty_flip_buffer_push(tty);
1548 }
1549
1550 /* mgsl_isr_misc()
1551  *
1552  *      Service a miscellaneos interrupt source.
1553  *
1554  * Arguments:           info            pointer to device extension (instance data)
1555  * Return Value:        None
1556  */
1557 static void mgsl_isr_misc( struct mgsl_struct *info )
1558 {
1559         u16 status = usc_InReg( info, MISR );
1560
1561         if ( debug_level >= DEBUG_LEVEL_ISR )
1562                 printk("%s(%d):mgsl_isr_misc status=%04X\n",
1563                         __FILE__,__LINE__,status);
1564
1565         if ((status & MISCSTATUS_RCC_UNDERRUN) &&
1566             (info->params.mode == MGSL_MODE_HDLC)) {
1567
1568                 /* turn off receiver and rx DMA */
1569                 usc_EnableReceiver(info,DISABLE_UNCONDITIONAL);
1570                 usc_DmaCmd(info, DmaCmd_ResetRxChannel);
1571                 usc_UnlatchRxstatusBits(info, RXSTATUS_ALL);
1572                 usc_ClearIrqPendingBits(info, RECEIVE_DATA + RECEIVE_STATUS);
1573                 usc_DisableInterrupts(info, RECEIVE_DATA + RECEIVE_STATUS);
1574
1575                 /* schedule BH handler to restart receiver */
1576                 info->pending_bh |= BH_RECEIVE;
1577                 info->rx_rcc_underrun = 1;
1578         }
1579
1580         usc_ClearIrqPendingBits( info, MISC );
1581         usc_UnlatchMiscstatusBits( info, status );
1582
1583 }       /* end of mgsl_isr_misc() */
1584
1585 /* mgsl_isr_null()
1586  *
1587  *      Services undefined interrupt vectors from the
1588  *      USC. (hence this function SHOULD never be called)
1589  *
1590  * Arguments:           info            pointer to device extension (instance data)
1591  * Return Value:        None
1592  */
1593 static void mgsl_isr_null( struct mgsl_struct *info )
1594 {
1595
1596 }       /* end of mgsl_isr_null() */
1597
1598 /* mgsl_isr_receive_dma()
1599  *
1600  *      Service a receive DMA channel interrupt.
1601  *      For this driver there are two sources of receive DMA interrupts
1602  *      as identified in the Receive DMA mode Register (RDMR):
1603  *
1604  *      BIT3    EOA/EOL         End of List, all receive buffers in receive
1605  *                              buffer list have been filled (no more free buffers
1606  *                              available). The DMA controller has shut down.
1607  *
1608  *      BIT2    EOB             End of Buffer. This interrupt occurs when a receive
1609  *                              DMA buffer is terminated in response to completion
1610  *                              of a good frame or a frame with errors. The status
1611  *                              of the frame is stored in the buffer entry in the
1612  *                              list of receive buffer entries.
1613  *
1614  * Arguments:           info            pointer to device instance data
1615  * Return Value:        None
1616  */
1617 static void mgsl_isr_receive_dma( struct mgsl_struct *info )
1618 {
1619         u16 status;
1620
1621         /* clear interrupt pending and IUS bit for Rx DMA IRQ */
1622         usc_OutDmaReg( info, CDIR, BIT9+BIT1 );
1623
1624         /* Read the receive DMA status to identify interrupt type. */
1625         /* This also clears the status bits. */
1626         status = usc_InDmaReg( info, RDMR );
1627
1628         if ( debug_level >= DEBUG_LEVEL_ISR )
1629                 printk("%s(%d):mgsl_isr_receive_dma(%s) status=%04X\n",
1630                         __FILE__,__LINE__,info->device_name,status);
1631
1632         info->pending_bh |= BH_RECEIVE;
1633
1634         if ( status & BIT3 ) {
1635                 info->rx_overflow = 1;
1636                 info->icount.buf_overrun++;
1637         }
1638
1639 }       /* end of mgsl_isr_receive_dma() */
1640
1641 /* mgsl_isr_transmit_dma()
1642  *
1643  *      This function services a transmit DMA channel interrupt.
1644  *
1645  *      For this driver there is one source of transmit DMA interrupts
1646  *      as identified in the Transmit DMA Mode Register (TDMR):
1647  *
1648  *      BIT2  EOB       End of Buffer. This interrupt occurs when a
1649  *                      transmit DMA buffer has been emptied.
1650  *
1651  *      The driver maintains enough transmit DMA buffers to hold at least
1652  *      one max frame size transmit frame. When operating in a buffered
1653  *      transmit mode, there may be enough transmit DMA buffers to hold at
1654  *      least two or more max frame size frames. On an EOB condition,
1655  *      determine if there are any queued transmit buffers and copy into
1656  *      transmit DMA buffers if we have room.
1657  *
1658  * Arguments:           info            pointer to device instance data
1659  * Return Value:        None
1660  */
1661 static void mgsl_isr_transmit_dma( struct mgsl_struct *info )
1662 {
1663         u16 status;
1664
1665         /* clear interrupt pending and IUS bit for Tx DMA IRQ */
1666         usc_OutDmaReg(info, CDIR, BIT8+BIT0 );
1667
1668         /* Read the transmit DMA status to identify interrupt type. */
1669         /* This also clears the status bits. */
1670
1671         status = usc_InDmaReg( info, TDMR );
1672
1673         if ( debug_level >= DEBUG_LEVEL_ISR )
1674                 printk("%s(%d):mgsl_isr_transmit_dma(%s) status=%04X\n",
1675                         __FILE__,__LINE__,info->device_name,status);
1676
1677         if ( status & BIT2 ) {
1678                 --info->tx_dma_buffers_used;
1679
1680                 /* if there are transmit frames queued,
1681                  *  try to load the next one
1682                  */
1683                 if ( load_next_tx_holding_buffer(info) ) {
1684                         /* if call returns non-zero value, we have
1685                          * at least one free tx holding buffer
1686                          */
1687                         info->pending_bh |= BH_TRANSMIT;
1688                 }
1689         }
1690
1691 }       /* end of mgsl_isr_transmit_dma() */
1692
1693 /* mgsl_interrupt()
1694  *
1695  *      Interrupt service routine entry point.
1696  *
1697  * Arguments:
1698  *
1699  *      irq             interrupt number that caused interrupt
1700  *      dev_id          device ID supplied during interrupt registration
1701  *
1702  * Return Value: None
1703  */
1704 static irqreturn_t mgsl_interrupt(int irq, void *dev_id)
1705 {
1706         struct mgsl_struct * info;
1707         u16 UscVector;
1708         u16 DmaVector;
1709
1710         if ( debug_level >= DEBUG_LEVEL_ISR )
1711                 printk("%s(%d):mgsl_interrupt(%d)entry.\n",
1712                         __FILE__,__LINE__,irq);
1713
1714         info = (struct mgsl_struct *)dev_id;
1715         if (!info)
1716                 return IRQ_NONE;
1717
1718         spin_lock(&info->irq_spinlock);
1719
1720         for(;;) {
1721                 /* Read the interrupt vectors from hardware. */
1722                 UscVector = usc_InReg(info, IVR) >> 9;
1723                 DmaVector = usc_InDmaReg(info, DIVR);
1724
1725                 if ( debug_level >= DEBUG_LEVEL_ISR )
1726                         printk("%s(%d):%s UscVector=%08X DmaVector=%08X\n",
1727                                 __FILE__,__LINE__,info->device_name,UscVector,DmaVector);
1728
1729                 if ( !UscVector && !DmaVector )
1730                         break;
1731
1732                 /* Dispatch interrupt vector */
1733                 if ( UscVector )
1734                         (*UscIsrTable[UscVector])(info);
1735                 else if ( (DmaVector&(BIT10|BIT9)) == BIT10)
1736                         mgsl_isr_transmit_dma(info);
1737                 else
1738                         mgsl_isr_receive_dma(info);
1739
1740                 if ( info->isr_overflow ) {
1741                         printk(KERN_ERR"%s(%d):%s isr overflow irq=%d\n",
1742                                 __FILE__,__LINE__,info->device_name, irq);
1743                         usc_DisableMasterIrqBit(info);
1744                         usc_DisableDmaInterrupts(info,DICR_MASTER);
1745                         break;
1746                 }
1747         }
1748
1749         /* Request bottom half processing if there's something
1750          * for it to do and the bh is not already running
1751          */
1752
1753         if ( info->pending_bh && !info->bh_running && !info->bh_requested ) {
1754                 if ( debug_level >= DEBUG_LEVEL_ISR )
1755                         printk("%s(%d):%s queueing bh task.\n",
1756                                 __FILE__,__LINE__,info->device_name);
1757                 schedule_work(&info->task);
1758                 info->bh_requested = 1;
1759         }
1760
1761         spin_unlock(&info->irq_spinlock);
1762
1763         if ( debug_level >= DEBUG_LEVEL_ISR )
1764                 printk("%s(%d):mgsl_interrupt(%d)exit.\n",
1765                         __FILE__,__LINE__,irq);
1766         return IRQ_HANDLED;
1767 }       /* end of mgsl_interrupt() */
1768
1769 /* startup()
1770  *
1771  *      Initialize and start device.
1772  *
1773  * Arguments:           info    pointer to device instance data
1774  * Return Value:        0 if success, otherwise error code
1775  */
1776 static int startup(struct mgsl_struct * info)
1777 {
1778         int retval = 0;
1779
1780         if ( debug_level >= DEBUG_LEVEL_INFO )
1781                 printk("%s(%d):mgsl_startup(%s)\n",__FILE__,__LINE__,info->device_name);
1782
1783         if (info->flags & ASYNC_INITIALIZED)
1784                 return 0;
1785
1786         if (!info->xmit_buf) {
1787                 /* allocate a page of memory for a transmit buffer */
1788                 info->xmit_buf = (unsigned char *)get_zeroed_page(GFP_KERNEL);
1789                 if (!info->xmit_buf) {
1790                         printk(KERN_ERR"%s(%d):%s can't allocate transmit buffer\n",
1791                                 __FILE__,__LINE__,info->device_name);
1792                         return -ENOMEM;
1793                 }
1794         }
1795
1796         info->pending_bh = 0;
1797
1798         memset(&info->icount, 0, sizeof(info->icount));
1799
1800         init_timer(&info->tx_timer);
1801         info->tx_timer.data = (unsigned long)info;
1802         info->tx_timer.function = mgsl_tx_timeout;
1803
1804         /* Allocate and claim adapter resources */
1805         retval = mgsl_claim_resources(info);
1806
1807         /* perform existence check and diagnostics */
1808         if ( !retval )
1809                 retval = mgsl_adapter_test(info);
1810
1811         if ( retval ) {
1812                 if (capable(CAP_SYS_ADMIN) && info->tty)
1813                         set_bit(TTY_IO_ERROR, &info->tty->flags);
1814                 mgsl_release_resources(info);
1815                 return retval;
1816         }
1817
1818         /* program hardware for current parameters */
1819         mgsl_change_params(info);
1820
1821         if (info->tty)
1822                 clear_bit(TTY_IO_ERROR, &info->tty->flags);
1823
1824         info->flags |= ASYNC_INITIALIZED;
1825
1826         return 0;
1827
1828 }       /* end of startup() */
1829
1830 /* shutdown()
1831  *
1832  * Called by mgsl_close() and mgsl_hangup() to shutdown hardware
1833  *
1834  * Arguments:           info    pointer to device instance data
1835  * Return Value:        None
1836  */
1837 static void shutdown(struct mgsl_struct * info)
1838 {
1839         unsigned long flags;
1840
1841         if (!(info->flags & ASYNC_INITIALIZED))
1842                 return;
1843
1844         if (debug_level >= DEBUG_LEVEL_INFO)
1845                 printk("%s(%d):mgsl_shutdown(%s)\n",
1846                          __FILE__,__LINE__, info->device_name );
1847
1848         /* clear status wait queue because status changes */
1849         /* can't happen after shutting down the hardware */
1850         wake_up_interruptible(&info->status_event_wait_q);
1851         wake_up_interruptible(&info->event_wait_q);
1852
1853         del_timer(&info->tx_timer);
1854
1855         if (info->xmit_buf) {
1856                 free_page((unsigned long) info->xmit_buf);
1857                 info->xmit_buf = NULL;
1858         }
1859
1860         spin_lock_irqsave(&info->irq_spinlock,flags);
1861         usc_DisableMasterIrqBit(info);
1862         usc_stop_receiver(info);
1863         usc_stop_transmitter(info);
1864         usc_DisableInterrupts(info,RECEIVE_DATA + RECEIVE_STATUS +
1865                 TRANSMIT_DATA + TRANSMIT_STATUS + IO_PIN + MISC );
1866         usc_DisableDmaInterrupts(info,DICR_MASTER + DICR_TRANSMIT + DICR_RECEIVE);
1867
1868         /* Disable DMAEN (Port 7, Bit 14) */
1869         /* This disconnects the DMA request signal from the ISA bus */
1870         /* on the ISA adapter. This has no effect for the PCI adapter */
1871         usc_OutReg(info, PCR, (u16)((usc_InReg(info, PCR) | BIT15) | BIT14));
1872
1873         /* Disable INTEN (Port 6, Bit12) */
1874         /* This disconnects the IRQ request signal to the ISA bus */
1875         /* on the ISA adapter. This has no effect for the PCI adapter */
1876         usc_OutReg(info, PCR, (u16)((usc_InReg(info, PCR) | BIT13) | BIT12));
1877
1878         if (!info->tty || info->tty->termios->c_cflag & HUPCL) {
1879                 info->serial_signals &= ~(SerialSignal_DTR + SerialSignal_RTS);
1880                 usc_set_serial_signals(info);
1881         }
1882
1883         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1884
1885         mgsl_release_resources(info);
1886
1887         if (info->tty)
1888                 set_bit(TTY_IO_ERROR, &info->tty->flags);
1889
1890         info->flags &= ~ASYNC_INITIALIZED;
1891
1892 }       /* end of shutdown() */
1893
1894 static void mgsl_program_hw(struct mgsl_struct *info)
1895 {
1896         unsigned long flags;
1897
1898         spin_lock_irqsave(&info->irq_spinlock,flags);
1899
1900         usc_stop_receiver(info);
1901         usc_stop_transmitter(info);
1902         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1903
1904         if (info->params.mode == MGSL_MODE_HDLC ||
1905             info->params.mode == MGSL_MODE_RAW ||
1906             info->netcount)
1907                 usc_set_sync_mode(info);
1908         else
1909                 usc_set_async_mode(info);
1910
1911         usc_set_serial_signals(info);
1912
1913         info->dcd_chkcount = 0;
1914         info->cts_chkcount = 0;
1915         info->ri_chkcount = 0;
1916         info->dsr_chkcount = 0;
1917
1918         usc_EnableStatusIrqs(info,SICR_CTS+SICR_DSR+SICR_DCD+SICR_RI);
1919         usc_EnableInterrupts(info, IO_PIN);
1920         usc_get_serial_signals(info);
1921
1922         if (info->netcount || info->tty->termios->c_cflag & CREAD)
1923                 usc_start_receiver(info);
1924
1925         spin_unlock_irqrestore(&info->irq_spinlock,flags);
1926 }
1927
1928 /* Reconfigure adapter based on new parameters
1929  */
1930 static void mgsl_change_params(struct mgsl_struct *info)
1931 {
1932         unsigned cflag;
1933         int bits_per_char;
1934
1935         if (!info->tty || !info->tty->termios)
1936                 return;
1937
1938         if (debug_level >= DEBUG_LEVEL_INFO)
1939                 printk("%s(%d):mgsl_change_params(%s)\n",
1940                          __FILE__,__LINE__, info->device_name );
1941
1942         cflag = info->tty->termios->c_cflag;
1943
1944         /* if B0 rate (hangup) specified then negate DTR and RTS */
1945         /* otherwise assert DTR and RTS */
1946         if (cflag & CBAUD)
1947                 info->serial_signals |= SerialSignal_RTS + SerialSignal_DTR;
1948         else
1949                 info->serial_signals &= ~(SerialSignal_RTS + SerialSignal_DTR);
1950
1951         /* byte size and parity */
1952
1953         switch (cflag & CSIZE) {
1954               case CS5: info->params.data_bits = 5; break;
1955               case CS6: info->params.data_bits = 6; break;
1956               case CS7: info->params.data_bits = 7; break;
1957               case CS8: info->params.data_bits = 8; break;
1958               /* Never happens, but GCC is too dumb to figure it out */
1959               default:  info->params.data_bits = 7; break;
1960               }
1961
1962         if (cflag & CSTOPB)
1963                 info->params.stop_bits = 2;
1964         else
1965                 info->params.stop_bits = 1;
1966
1967         info->params.parity = ASYNC_PARITY_NONE;
1968         if (cflag & PARENB) {
1969                 if (cflag & PARODD)
1970                         info->params.parity = ASYNC_PARITY_ODD;
1971                 else
1972                         info->params.parity = ASYNC_PARITY_EVEN;
1973 #ifdef CMSPAR
1974                 if (cflag & CMSPAR)
1975                         info->params.parity = ASYNC_PARITY_SPACE;
1976 #endif
1977         }
1978
1979         /* calculate number of jiffies to transmit a full
1980          * FIFO (32 bytes) at specified data rate
1981          */
1982         bits_per_char = info->params.data_bits +
1983                         info->params.stop_bits + 1;
1984
1985         /* if port data rate is set to 460800 or less then
1986          * allow tty settings to override, otherwise keep the
1987          * current data rate.
1988          */
1989         if (info->params.data_rate <= 460800)
1990                 info->params.data_rate = tty_get_baud_rate(info->tty);
1991
1992         if ( info->params.data_rate ) {
1993                 info->timeout = (32*HZ*bits_per_char) /
1994                                 info->params.data_rate;
1995         }
1996         info->timeout += HZ/50;         /* Add .02 seconds of slop */
1997
1998         if (cflag & CRTSCTS)
1999                 info->flags |= ASYNC_CTS_FLOW;
2000         else
2001                 info->flags &= ~ASYNC_CTS_FLOW;
2002
2003         if (cflag & CLOCAL)
2004                 info->flags &= ~ASYNC_CHECK_CD;
2005         else
2006                 info->flags |= ASYNC_CHECK_CD;
2007
2008         /* process tty input control flags */
2009
2010         info->read_status_mask = RXSTATUS_OVERRUN;
2011         if (I_INPCK(info->tty))
2012                 info->read_status_mask |= RXSTATUS_PARITY_ERROR | RXSTATUS_FRAMING_ERROR;
2013         if (I_BRKINT(info->tty) || I_PARMRK(info->tty))
2014                 info->read_status_mask |= RXSTATUS_BREAK_RECEIVED;
2015
2016         if (I_IGNPAR(info->tty))
2017                 info->ignore_status_mask |= RXSTATUS_PARITY_ERROR | RXSTATUS_FRAMING_ERROR;
2018         if (I_IGNBRK(info->tty)) {
2019                 info->ignore_status_mask |= RXSTATUS_BREAK_RECEIVED;
2020                 /* If ignoring parity and break indicators, ignore
2021                  * overruns too.  (For real raw support).
2022                  */
2023                 if (I_IGNPAR(info->tty))
2024                         info->ignore_status_mask |= RXSTATUS_OVERRUN;
2025         }
2026
2027         mgsl_program_hw(info);
2028
2029 }       /* end of mgsl_change_params() */
2030
2031 /* mgsl_put_char()
2032  *
2033  *      Add a character to the transmit buffer.
2034  *
2035  * Arguments:           tty     pointer to tty information structure
2036  *                      ch      character to add to transmit buffer
2037  *
2038  * Return Value:        None
2039  */
2040 static void mgsl_put_char(struct tty_struct *tty, unsigned char ch)
2041 {
2042         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2043         unsigned long flags;
2044
2045         if ( debug_level >= DEBUG_LEVEL_INFO ) {
2046                 printk( "%s(%d):mgsl_put_char(%d) on %s\n",
2047                         __FILE__,__LINE__,ch,info->device_name);
2048         }
2049
2050         if (mgsl_paranoia_check(info, tty->name, "mgsl_put_char"))
2051                 return;
2052
2053         if (!tty || !info->xmit_buf)
2054                 return;
2055
2056         spin_lock_irqsave(&info->irq_spinlock,flags);
2057
2058         if ( (info->params.mode == MGSL_MODE_ASYNC ) || !info->tx_active ) {
2059
2060                 if (info->xmit_cnt < SERIAL_XMIT_SIZE - 1) {
2061                         info->xmit_buf[info->xmit_head++] = ch;
2062                         info->xmit_head &= SERIAL_XMIT_SIZE-1;
2063                         info->xmit_cnt++;
2064                 }
2065         }
2066
2067         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2068
2069 }       /* end of mgsl_put_char() */
2070
2071 /* mgsl_flush_chars()
2072  *
2073  *      Enable transmitter so remaining characters in the
2074  *      transmit buffer are sent.
2075  *
2076  * Arguments:           tty     pointer to tty information structure
2077  * Return Value:        None
2078  */
2079 static void mgsl_flush_chars(struct tty_struct *tty)
2080 {
2081         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2082         unsigned long flags;
2083
2084         if ( debug_level >= DEBUG_LEVEL_INFO )
2085                 printk( "%s(%d):mgsl_flush_chars() entry on %s xmit_cnt=%d\n",
2086                         __FILE__,__LINE__,info->device_name,info->xmit_cnt);
2087
2088         if (mgsl_paranoia_check(info, tty->name, "mgsl_flush_chars"))
2089                 return;
2090
2091         if (info->xmit_cnt <= 0 || tty->stopped || tty->hw_stopped ||
2092             !info->xmit_buf)
2093                 return;
2094
2095         if ( debug_level >= DEBUG_LEVEL_INFO )
2096                 printk( "%s(%d):mgsl_flush_chars() entry on %s starting transmitter\n",
2097                         __FILE__,__LINE__,info->device_name );
2098
2099         spin_lock_irqsave(&info->irq_spinlock,flags);
2100
2101         if (!info->tx_active) {
2102                 if ( (info->params.mode == MGSL_MODE_HDLC ||
2103                         info->params.mode == MGSL_MODE_RAW) && info->xmit_cnt ) {
2104                         /* operating in synchronous (frame oriented) mode */
2105                         /* copy data from circular xmit_buf to */
2106                         /* transmit DMA buffer. */
2107                         mgsl_load_tx_dma_buffer(info,
2108                                  info->xmit_buf,info->xmit_cnt);
2109                 }
2110                 usc_start_transmitter(info);
2111         }
2112
2113         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2114
2115 }       /* end of mgsl_flush_chars() */
2116
2117 /* mgsl_write()
2118  *
2119  *      Send a block of data
2120  *
2121  * Arguments:
2122  *
2123  *      tty             pointer to tty information structure
2124  *      buf             pointer to buffer containing send data
2125  *      count           size of send data in bytes
2126  *
2127  * Return Value:        number of characters written
2128  */
2129 static int mgsl_write(struct tty_struct * tty,
2130                     const unsigned char *buf, int count)
2131 {
2132         int     c, ret = 0;
2133         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2134         unsigned long flags;
2135
2136         if ( debug_level >= DEBUG_LEVEL_INFO )
2137                 printk( "%s(%d):mgsl_write(%s) count=%d\n",
2138                         __FILE__,__LINE__,info->device_name,count);
2139
2140         if (mgsl_paranoia_check(info, tty->name, "mgsl_write"))
2141                 goto cleanup;
2142
2143         if (!tty || !info->xmit_buf)
2144                 goto cleanup;
2145
2146         if ( info->params.mode == MGSL_MODE_HDLC ||
2147                         info->params.mode == MGSL_MODE_RAW ) {
2148                 /* operating in synchronous (frame oriented) mode */
2149                 /* operating in synchronous (frame oriented) mode */
2150                 if (info->tx_active) {
2151
2152                         if ( info->params.mode == MGSL_MODE_HDLC ) {
2153                                 ret = 0;
2154                                 goto cleanup;
2155                         }
2156                         /* transmitter is actively sending data -
2157                          * if we have multiple transmit dma and
2158                          * holding buffers, attempt to queue this
2159                          * frame for transmission at a later time.
2160                          */
2161                         if (info->tx_holding_count >= info->num_tx_holding_buffers ) {
2162                                 /* no tx holding buffers available */
2163                                 ret = 0;
2164                                 goto cleanup;
2165                         }
2166
2167                         /* queue transmit frame request */
2168                         ret = count;
2169                         save_tx_buffer_request(info,buf,count);
2170
2171                         /* if we have sufficient tx dma buffers,
2172                          * load the next buffered tx request
2173                          */
2174                         spin_lock_irqsave(&info->irq_spinlock,flags);
2175                         load_next_tx_holding_buffer(info);
2176                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2177                         goto cleanup;
2178                 }
2179
2180                 /* if operating in HDLC LoopMode and the adapter  */
2181                 /* has yet to be inserted into the loop, we can't */
2182                 /* transmit                                       */
2183
2184                 if ( (info->params.flags & HDLC_FLAG_HDLC_LOOPMODE) &&
2185                         !usc_loopmode_active(info) )
2186                 {
2187                         ret = 0;
2188                         goto cleanup;
2189                 }
2190
2191                 if ( info->xmit_cnt ) {
2192                         /* Send accumulated from send_char() calls */
2193                         /* as frame and wait before accepting more data. */
2194                         ret = 0;
2195
2196                         /* copy data from circular xmit_buf to */
2197                         /* transmit DMA buffer. */
2198                         mgsl_load_tx_dma_buffer(info,
2199                                 info->xmit_buf,info->xmit_cnt);
2200                         if ( debug_level >= DEBUG_LEVEL_INFO )
2201                                 printk( "%s(%d):mgsl_write(%s) sync xmit_cnt flushing\n",
2202                                         __FILE__,__LINE__,info->device_name);
2203                 } else {
2204                         if ( debug_level >= DEBUG_LEVEL_INFO )
2205                                 printk( "%s(%d):mgsl_write(%s) sync transmit accepted\n",
2206                                         __FILE__,__LINE__,info->device_name);
2207                         ret = count;
2208                         info->xmit_cnt = count;
2209                         mgsl_load_tx_dma_buffer(info,buf,count);
2210                 }
2211         } else {
2212                 while (1) {
2213                         spin_lock_irqsave(&info->irq_spinlock,flags);
2214                         c = min_t(int, count,
2215                                 min(SERIAL_XMIT_SIZE - info->xmit_cnt - 1,
2216                                     SERIAL_XMIT_SIZE - info->xmit_head));
2217                         if (c <= 0) {
2218                                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2219                                 break;
2220                         }
2221                         memcpy(info->xmit_buf + info->xmit_head, buf, c);
2222                         info->xmit_head = ((info->xmit_head + c) &
2223                                            (SERIAL_XMIT_SIZE-1));
2224                         info->xmit_cnt += c;
2225                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2226                         buf += c;
2227                         count -= c;
2228                         ret += c;
2229                 }
2230         }
2231
2232         if (info->xmit_cnt && !tty->stopped && !tty->hw_stopped) {
2233                 spin_lock_irqsave(&info->irq_spinlock,flags);
2234                 if (!info->tx_active)
2235                         usc_start_transmitter(info);
2236                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2237         }
2238 cleanup:
2239         if ( debug_level >= DEBUG_LEVEL_INFO )
2240                 printk( "%s(%d):mgsl_write(%s) returning=%d\n",
2241                         __FILE__,__LINE__,info->device_name,ret);
2242
2243         return ret;
2244
2245 }       /* end of mgsl_write() */
2246
2247 /* mgsl_write_room()
2248  *
2249  *      Return the count of free bytes in transmit buffer
2250  *
2251  * Arguments:           tty     pointer to tty info structure
2252  * Return Value:        None
2253  */
2254 static int mgsl_write_room(struct tty_struct *tty)
2255 {
2256         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2257         int     ret;
2258
2259         if (mgsl_paranoia_check(info, tty->name, "mgsl_write_room"))
2260                 return 0;
2261         ret = SERIAL_XMIT_SIZE - info->xmit_cnt - 1;
2262         if (ret < 0)
2263                 ret = 0;
2264
2265         if (debug_level >= DEBUG_LEVEL_INFO)
2266                 printk("%s(%d):mgsl_write_room(%s)=%d\n",
2267                          __FILE__,__LINE__, info->device_name,ret );
2268
2269         if ( info->params.mode == MGSL_MODE_HDLC ||
2270                 info->params.mode == MGSL_MODE_RAW ) {
2271                 /* operating in synchronous (frame oriented) mode */
2272                 if ( info->tx_active )
2273                         return 0;
2274                 else
2275                         return HDLC_MAX_FRAME_SIZE;
2276         }
2277
2278         return ret;
2279
2280 }       /* end of mgsl_write_room() */
2281
2282 /* mgsl_chars_in_buffer()
2283  *
2284  *      Return the count of bytes in transmit buffer
2285  *
2286  * Arguments:           tty     pointer to tty info structure
2287  * Return Value:        None
2288  */
2289 static int mgsl_chars_in_buffer(struct tty_struct *tty)
2290 {
2291         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2292
2293         if (debug_level >= DEBUG_LEVEL_INFO)
2294                 printk("%s(%d):mgsl_chars_in_buffer(%s)\n",
2295                          __FILE__,__LINE__, info->device_name );
2296
2297         if (mgsl_paranoia_check(info, tty->name, "mgsl_chars_in_buffer"))
2298                 return 0;
2299
2300         if (debug_level >= DEBUG_LEVEL_INFO)
2301                 printk("%s(%d):mgsl_chars_in_buffer(%s)=%d\n",
2302                          __FILE__,__LINE__, info->device_name,info->xmit_cnt );
2303
2304         if ( info->params.mode == MGSL_MODE_HDLC ||
2305                 info->params.mode == MGSL_MODE_RAW ) {
2306                 /* operating in synchronous (frame oriented) mode */
2307                 if ( info->tx_active )
2308                         return info->max_frame_size;
2309                 else
2310                         return 0;
2311         }
2312
2313         return info->xmit_cnt;
2314 }       /* end of mgsl_chars_in_buffer() */
2315
2316 /* mgsl_flush_buffer()
2317  *
2318  *      Discard all data in the send buffer
2319  *
2320  * Arguments:           tty     pointer to tty info structure
2321  * Return Value:        None
2322  */
2323 static void mgsl_flush_buffer(struct tty_struct *tty)
2324 {
2325         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2326         unsigned long flags;
2327
2328         if (debug_level >= DEBUG_LEVEL_INFO)
2329                 printk("%s(%d):mgsl_flush_buffer(%s) entry\n",
2330                          __FILE__,__LINE__, info->device_name );
2331
2332         if (mgsl_paranoia_check(info, tty->name, "mgsl_flush_buffer"))
2333                 return;
2334
2335         spin_lock_irqsave(&info->irq_spinlock,flags);
2336         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
2337         del_timer(&info->tx_timer);
2338         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2339
2340         wake_up_interruptible(&tty->write_wait);
2341         tty_wakeup(tty);
2342 }
2343
2344 /* mgsl_send_xchar()
2345  *
2346  *      Send a high-priority XON/XOFF character
2347  *
2348  * Arguments:           tty     pointer to tty info structure
2349  *                      ch      character to send
2350  * Return Value:        None
2351  */
2352 static void mgsl_send_xchar(struct tty_struct *tty, char ch)
2353 {
2354         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2355         unsigned long flags;
2356
2357         if (debug_level >= DEBUG_LEVEL_INFO)
2358                 printk("%s(%d):mgsl_send_xchar(%s,%d)\n",
2359                          __FILE__,__LINE__, info->device_name, ch );
2360
2361         if (mgsl_paranoia_check(info, tty->name, "mgsl_send_xchar"))
2362                 return;
2363
2364         info->x_char = ch;
2365         if (ch) {
2366                 /* Make sure transmit interrupts are on */
2367                 spin_lock_irqsave(&info->irq_spinlock,flags);
2368                 if (!info->tx_enabled)
2369                         usc_start_transmitter(info);
2370                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2371         }
2372 }       /* end of mgsl_send_xchar() */
2373
2374 /* mgsl_throttle()
2375  *
2376  *      Signal remote device to throttle send data (our receive data)
2377  *
2378  * Arguments:           tty     pointer to tty info structure
2379  * Return Value:        None
2380  */
2381 static void mgsl_throttle(struct tty_struct * tty)
2382 {
2383         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2384         unsigned long flags;
2385
2386         if (debug_level >= DEBUG_LEVEL_INFO)
2387                 printk("%s(%d):mgsl_throttle(%s) entry\n",
2388                          __FILE__,__LINE__, info->device_name );
2389
2390         if (mgsl_paranoia_check(info, tty->name, "mgsl_throttle"))
2391                 return;
2392
2393         if (I_IXOFF(tty))
2394                 mgsl_send_xchar(tty, STOP_CHAR(tty));
2395
2396         if (tty->termios->c_cflag & CRTSCTS) {
2397                 spin_lock_irqsave(&info->irq_spinlock,flags);
2398                 info->serial_signals &= ~SerialSignal_RTS;
2399                 usc_set_serial_signals(info);
2400                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2401         }
2402 }       /* end of mgsl_throttle() */
2403
2404 /* mgsl_unthrottle()
2405  *
2406  *      Signal remote device to stop throttling send data (our receive data)
2407  *
2408  * Arguments:           tty     pointer to tty info structure
2409  * Return Value:        None
2410  */
2411 static void mgsl_unthrottle(struct tty_struct * tty)
2412 {
2413         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2414         unsigned long flags;
2415
2416         if (debug_level >= DEBUG_LEVEL_INFO)
2417                 printk("%s(%d):mgsl_unthrottle(%s) entry\n",
2418                          __FILE__,__LINE__, info->device_name );
2419
2420         if (mgsl_paranoia_check(info, tty->name, "mgsl_unthrottle"))
2421                 return;
2422
2423         if (I_IXOFF(tty)) {
2424                 if (info->x_char)
2425                         info->x_char = 0;
2426                 else
2427                         mgsl_send_xchar(tty, START_CHAR(tty));
2428         }
2429
2430         if (tty->termios->c_cflag & CRTSCTS) {
2431                 spin_lock_irqsave(&info->irq_spinlock,flags);
2432                 info->serial_signals |= SerialSignal_RTS;
2433                 usc_set_serial_signals(info);
2434                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2435         }
2436
2437 }       /* end of mgsl_unthrottle() */
2438
2439 /* mgsl_get_stats()
2440  *
2441  *      get the current serial parameters information
2442  *
2443  * Arguments:   info            pointer to device instance data
2444  *              user_icount     pointer to buffer to hold returned stats
2445  *
2446  * Return Value:        0 if success, otherwise error code
2447  */
2448 static int mgsl_get_stats(struct mgsl_struct * info, struct mgsl_icount __user *user_icount)
2449 {
2450         int err;
2451
2452         if (debug_level >= DEBUG_LEVEL_INFO)
2453                 printk("%s(%d):mgsl_get_params(%s)\n",
2454                          __FILE__,__LINE__, info->device_name);
2455
2456         if (!user_icount) {
2457                 memset(&info->icount, 0, sizeof(info->icount));
2458         } else {
2459                 COPY_TO_USER(err, user_icount, &info->icount, sizeof(struct mgsl_icount));
2460                 if (err)
2461                         return -EFAULT;
2462         }
2463
2464         return 0;
2465
2466 }       /* end of mgsl_get_stats() */
2467
2468 /* mgsl_get_params()
2469  *
2470  *      get the current serial parameters information
2471  *
2472  * Arguments:   info            pointer to device instance data
2473  *              user_params     pointer to buffer to hold returned params
2474  *
2475  * Return Value:        0 if success, otherwise error code
2476  */
2477 static int mgsl_get_params(struct mgsl_struct * info, MGSL_PARAMS __user *user_params)
2478 {
2479         int err;
2480         if (debug_level >= DEBUG_LEVEL_INFO)
2481                 printk("%s(%d):mgsl_get_params(%s)\n",
2482                          __FILE__,__LINE__, info->device_name);
2483
2484         COPY_TO_USER(err,user_params, &info->params, sizeof(MGSL_PARAMS));
2485         if (err) {
2486                 if ( debug_level >= DEBUG_LEVEL_INFO )
2487                         printk( "%s(%d):mgsl_get_params(%s) user buffer copy failed\n",
2488                                 __FILE__,__LINE__,info->device_name);
2489                 return -EFAULT;
2490         }
2491
2492         return 0;
2493
2494 }       /* end of mgsl_get_params() */
2495
2496 /* mgsl_set_params()
2497  *
2498  *      set the serial parameters
2499  *
2500  * Arguments:
2501  *
2502  *      info            pointer to device instance data
2503  *      new_params      user buffer containing new serial params
2504  *
2505  * Return Value:        0 if success, otherwise error code
2506  */
2507 static int mgsl_set_params(struct mgsl_struct * info, MGSL_PARAMS __user *new_params)
2508 {
2509         unsigned long flags;
2510         MGSL_PARAMS tmp_params;
2511         int err;
2512
2513         if (debug_level >= DEBUG_LEVEL_INFO)
2514                 printk("%s(%d):mgsl_set_params %s\n", __FILE__,__LINE__,
2515                         info->device_name );
2516         COPY_FROM_USER(err,&tmp_params, new_params, sizeof(MGSL_PARAMS));
2517         if (err) {
2518                 if ( debug_level >= DEBUG_LEVEL_INFO )
2519                         printk( "%s(%d):mgsl_set_params(%s) user buffer copy failed\n",
2520                                 __FILE__,__LINE__,info->device_name);
2521                 return -EFAULT;
2522         }
2523
2524         spin_lock_irqsave(&info->irq_spinlock,flags);
2525         memcpy(&info->params,&tmp_params,sizeof(MGSL_PARAMS));
2526         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2527
2528         mgsl_change_params(info);
2529
2530         return 0;
2531
2532 }       /* end of mgsl_set_params() */
2533
2534 /* mgsl_get_txidle()
2535  *
2536  *      get the current transmit idle mode
2537  *
2538  * Arguments:   info            pointer to device instance data
2539  *              idle_mode       pointer to buffer to hold returned idle mode
2540  *
2541  * Return Value:        0 if success, otherwise error code
2542  */
2543 static int mgsl_get_txidle(struct mgsl_struct * info, int __user *idle_mode)
2544 {
2545         int err;
2546
2547         if (debug_level >= DEBUG_LEVEL_INFO)
2548                 printk("%s(%d):mgsl_get_txidle(%s)=%d\n",
2549                          __FILE__,__LINE__, info->device_name, info->idle_mode);
2550
2551         COPY_TO_USER(err,idle_mode, &info->idle_mode, sizeof(int));
2552         if (err) {
2553                 if ( debug_level >= DEBUG_LEVEL_INFO )
2554                         printk( "%s(%d):mgsl_get_txidle(%s) user buffer copy failed\n",
2555                                 __FILE__,__LINE__,info->device_name);
2556                 return -EFAULT;
2557         }
2558
2559         return 0;
2560
2561 }       /* end of mgsl_get_txidle() */
2562
2563 /* mgsl_set_txidle()    service ioctl to set transmit idle mode
2564  *
2565  * Arguments:           info            pointer to device instance data
2566  *                      idle_mode       new idle mode
2567  *
2568  * Return Value:        0 if success, otherwise error code
2569  */
2570 static int mgsl_set_txidle(struct mgsl_struct * info, int idle_mode)
2571 {
2572         unsigned long flags;
2573
2574         if (debug_level >= DEBUG_LEVEL_INFO)
2575                 printk("%s(%d):mgsl_set_txidle(%s,%d)\n", __FILE__,__LINE__,
2576                         info->device_name, idle_mode );
2577
2578         spin_lock_irqsave(&info->irq_spinlock,flags);
2579         info->idle_mode = idle_mode;
2580         usc_set_txidle( info );
2581         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2582         return 0;
2583
2584 }       /* end of mgsl_set_txidle() */
2585
2586 /* mgsl_txenable()
2587  *
2588  *      enable or disable the transmitter
2589  *
2590  * Arguments:
2591  *
2592  *      info            pointer to device instance data
2593  *      enable          1 = enable, 0 = disable
2594  *
2595  * Return Value:        0 if success, otherwise error code
2596  */
2597 static int mgsl_txenable(struct mgsl_struct * info, int enable)
2598 {
2599         unsigned long flags;
2600
2601         if (debug_level >= DEBUG_LEVEL_INFO)
2602                 printk("%s(%d):mgsl_txenable(%s,%d)\n", __FILE__,__LINE__,
2603                         info->device_name, enable);
2604
2605         spin_lock_irqsave(&info->irq_spinlock,flags);
2606         if ( enable ) {
2607                 if ( !info->tx_enabled ) {
2608
2609                         usc_start_transmitter(info);
2610                         /*--------------------------------------------------
2611                          * if HDLC/SDLC Loop mode, attempt to insert the
2612                          * station in the 'loop' by setting CMR:13. Upon
2613                          * receipt of the next GoAhead (RxAbort) sequence,
2614                          * the OnLoop indicator (CCSR:7) should go active
2615                          * to indicate that we are on the loop
2616                          *--------------------------------------------------*/
2617                         if ( info->params.flags & HDLC_FLAG_HDLC_LOOPMODE )
2618                                 usc_loopmode_insert_request( info );
2619                 }
2620         } else {
2621                 if ( info->tx_enabled )
2622                         usc_stop_transmitter(info);
2623         }
2624         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2625         return 0;
2626
2627 }       /* end of mgsl_txenable() */
2628
2629 /* mgsl_txabort()       abort send HDLC frame
2630  *
2631  * Arguments:           info            pointer to device instance data
2632  * Return Value:        0 if success, otherwise error code
2633  */
2634 static int mgsl_txabort(struct mgsl_struct * info)
2635 {
2636         unsigned long flags;
2637
2638         if (debug_level >= DEBUG_LEVEL_INFO)
2639                 printk("%s(%d):mgsl_txabort(%s)\n", __FILE__,__LINE__,
2640                         info->device_name);
2641
2642         spin_lock_irqsave(&info->irq_spinlock,flags);
2643         if ( info->tx_active && info->params.mode == MGSL_MODE_HDLC )
2644         {
2645                 if ( info->params.flags & HDLC_FLAG_HDLC_LOOPMODE )
2646                         usc_loopmode_cancel_transmit( info );
2647                 else
2648                         usc_TCmd(info,TCmd_SendAbort);
2649         }
2650         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2651         return 0;
2652
2653 }       /* end of mgsl_txabort() */
2654
2655 /* mgsl_rxenable()      enable or disable the receiver
2656  *
2657  * Arguments:           info            pointer to device instance data
2658  *                      enable          1 = enable, 0 = disable
2659  * Return Value:        0 if success, otherwise error code
2660  */
2661 static int mgsl_rxenable(struct mgsl_struct * info, int enable)
2662 {
2663         unsigned long flags;
2664
2665         if (debug_level >= DEBUG_LEVEL_INFO)
2666                 printk("%s(%d):mgsl_rxenable(%s,%d)\n", __FILE__,__LINE__,
2667                         info->device_name, enable);
2668
2669         spin_lock_irqsave(&info->irq_spinlock,flags);
2670         if ( enable ) {
2671                 if ( !info->rx_enabled )
2672                         usc_start_receiver(info);
2673         } else {
2674                 if ( info->rx_enabled )
2675                         usc_stop_receiver(info);
2676         }
2677         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2678         return 0;
2679
2680 }       /* end of mgsl_rxenable() */
2681
2682 /* mgsl_wait_event()    wait for specified event to occur
2683  *
2684  * Arguments:           info    pointer to device instance data
2685  *                      mask    pointer to bitmask of events to wait for
2686  * Return Value:        0       if successful and bit mask updated with
2687  *                              of events triggerred,
2688  *                      otherwise error code
2689  */
2690 static int mgsl_wait_event(struct mgsl_struct * info, int __user * mask_ptr)
2691 {
2692         unsigned long flags;
2693         int s;
2694         int rc=0;
2695         struct mgsl_icount cprev, cnow;
2696         int events;
2697         int mask;
2698         struct  _input_signal_events oldsigs, newsigs;
2699         DECLARE_WAITQUEUE(wait, current);
2700
2701         COPY_FROM_USER(rc,&mask, mask_ptr, sizeof(int));
2702         if (rc) {
2703                 return  -EFAULT;
2704         }
2705
2706         if (debug_level >= DEBUG_LEVEL_INFO)
2707                 printk("%s(%d):mgsl_wait_event(%s,%d)\n", __FILE__,__LINE__,
2708                         info->device_name, mask);
2709
2710         spin_lock_irqsave(&info->irq_spinlock,flags);
2711
2712         /* return immediately if state matches requested events */
2713         usc_get_serial_signals(info);
2714         s = info->serial_signals;
2715         events = mask &
2716                 ( ((s & SerialSignal_DSR) ? MgslEvent_DsrActive:MgslEvent_DsrInactive) +
2717                   ((s & SerialSignal_DCD) ? MgslEvent_DcdActive:MgslEvent_DcdInactive) +
2718                   ((s & SerialSignal_CTS) ? MgslEvent_CtsActive:MgslEvent_CtsInactive) +
2719                   ((s & SerialSignal_RI)  ? MgslEvent_RiActive :MgslEvent_RiInactive) );
2720         if (events) {
2721                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2722                 goto exit;
2723         }
2724
2725         /* save current irq counts */
2726         cprev = info->icount;
2727         oldsigs = info->input_signal_events;
2728
2729         /* enable hunt and idle irqs if needed */
2730         if (mask & (MgslEvent_ExitHuntMode + MgslEvent_IdleReceived)) {
2731                 u16 oldreg = usc_InReg(info,RICR);
2732                 u16 newreg = oldreg +
2733                          (mask & MgslEvent_ExitHuntMode ? RXSTATUS_EXITED_HUNT:0) +
2734                          (mask & MgslEvent_IdleReceived ? RXSTATUS_IDLE_RECEIVED:0);
2735                 if (oldreg != newreg)
2736                         usc_OutReg(info, RICR, newreg);
2737         }
2738
2739         set_current_state(TASK_INTERRUPTIBLE);
2740         add_wait_queue(&info->event_wait_q, &wait);
2741
2742         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2743
2744
2745         for(;;) {
2746                 schedule();
2747                 if (signal_pending(current)) {
2748                         rc = -ERESTARTSYS;
2749                         break;
2750                 }
2751
2752                 /* get current irq counts */
2753                 spin_lock_irqsave(&info->irq_spinlock,flags);
2754                 cnow = info->icount;
2755                 newsigs = info->input_signal_events;
2756                 set_current_state(TASK_INTERRUPTIBLE);
2757                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2758
2759                 /* if no change, wait aborted for some reason */
2760                 if (newsigs.dsr_up   == oldsigs.dsr_up   &&
2761                     newsigs.dsr_down == oldsigs.dsr_down &&
2762                     newsigs.dcd_up   == oldsigs.dcd_up   &&
2763                     newsigs.dcd_down == oldsigs.dcd_down &&
2764                     newsigs.cts_up   == oldsigs.cts_up   &&
2765                     newsigs.cts_down == oldsigs.cts_down &&
2766                     newsigs.ri_up    == oldsigs.ri_up    &&
2767                     newsigs.ri_down  == oldsigs.ri_down  &&
2768                     cnow.exithunt    == cprev.exithunt   &&
2769                     cnow.rxidle      == cprev.rxidle) {
2770                         rc = -EIO;
2771                         break;
2772                 }
2773
2774                 events = mask &
2775                         ( (newsigs.dsr_up   != oldsigs.dsr_up   ? MgslEvent_DsrActive:0)   +
2776                         (newsigs.dsr_down != oldsigs.dsr_down ? MgslEvent_DsrInactive:0) +
2777                         (newsigs.dcd_up   != oldsigs.dcd_up   ? MgslEvent_DcdActive:0)   +
2778                         (newsigs.dcd_down != oldsigs.dcd_down ? MgslEvent_DcdInactive:0) +
2779                         (newsigs.cts_up   != oldsigs.cts_up   ? MgslEvent_CtsActive:0)   +
2780                         (newsigs.cts_down != oldsigs.cts_down ? MgslEvent_CtsInactive:0) +
2781                         (newsigs.ri_up    != oldsigs.ri_up    ? MgslEvent_RiActive:0)    +
2782                         (newsigs.ri_down  != oldsigs.ri_down  ? MgslEvent_RiInactive:0)  +
2783                         (cnow.exithunt    != cprev.exithunt   ? MgslEvent_ExitHuntMode:0) +
2784                           (cnow.rxidle      != cprev.rxidle     ? MgslEvent_IdleReceived:0) );
2785                 if (events)
2786                         break;
2787
2788                 cprev = cnow;
2789                 oldsigs = newsigs;
2790         }
2791
2792         remove_wait_queue(&info->event_wait_q, &wait);
2793         set_current_state(TASK_RUNNING);
2794
2795         if (mask & (MgslEvent_ExitHuntMode + MgslEvent_IdleReceived)) {
2796                 spin_lock_irqsave(&info->irq_spinlock,flags);
2797                 if (!waitqueue_active(&info->event_wait_q)) {
2798                         /* disable enable exit hunt mode/idle rcvd IRQs */
2799                         usc_OutReg(info, RICR, usc_InReg(info,RICR) &
2800                                 ~(RXSTATUS_EXITED_HUNT + RXSTATUS_IDLE_RECEIVED));
2801                 }
2802                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2803         }
2804 exit:
2805         if ( rc == 0 )
2806                 PUT_USER(rc, events, mask_ptr);
2807
2808         return rc;
2809
2810 }       /* end of mgsl_wait_event() */
2811
2812 static int modem_input_wait(struct mgsl_struct *info,int arg)
2813 {
2814         unsigned long flags;
2815         int rc;
2816         struct mgsl_icount cprev, cnow;
2817         DECLARE_WAITQUEUE(wait, current);
2818
2819         /* save current irq counts */
2820         spin_lock_irqsave(&info->irq_spinlock,flags);
2821         cprev = info->icount;
2822         add_wait_queue(&info->status_event_wait_q, &wait);
2823         set_current_state(TASK_INTERRUPTIBLE);
2824         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2825
2826         for(;;) {
2827                 schedule();
2828                 if (signal_pending(current)) {
2829                         rc = -ERESTARTSYS;
2830                         break;
2831                 }
2832
2833                 /* get new irq counts */
2834                 spin_lock_irqsave(&info->irq_spinlock,flags);
2835                 cnow = info->icount;
2836                 set_current_state(TASK_INTERRUPTIBLE);
2837                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
2838
2839                 /* if no change, wait aborted for some reason */
2840                 if (cnow.rng == cprev.rng && cnow.dsr == cprev.dsr &&
2841                     cnow.dcd == cprev.dcd && cnow.cts == cprev.cts) {
2842                         rc = -EIO;
2843                         break;
2844                 }
2845
2846                 /* check for change in caller specified modem input */
2847                 if ((arg & TIOCM_RNG && cnow.rng != cprev.rng) ||
2848                     (arg & TIOCM_DSR && cnow.dsr != cprev.dsr) ||
2849                     (arg & TIOCM_CD  && cnow.dcd != cprev.dcd) ||
2850                     (arg & TIOCM_CTS && cnow.cts != cprev.cts)) {
2851                         rc = 0;
2852                         break;
2853                 }
2854
2855                 cprev = cnow;
2856         }
2857         remove_wait_queue(&info->status_event_wait_q, &wait);
2858         set_current_state(TASK_RUNNING);
2859         return rc;
2860 }
2861
2862 /* return the state of the serial control and status signals
2863  */
2864 static int tiocmget(struct tty_struct *tty, struct file *file)
2865 {
2866         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2867         unsigned int result;
2868         unsigned long flags;
2869
2870         spin_lock_irqsave(&info->irq_spinlock,flags);
2871         usc_get_serial_signals(info);
2872         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2873
2874         result = ((info->serial_signals & SerialSignal_RTS) ? TIOCM_RTS:0) +
2875                 ((info->serial_signals & SerialSignal_DTR) ? TIOCM_DTR:0) +
2876                 ((info->serial_signals & SerialSignal_DCD) ? TIOCM_CAR:0) +
2877                 ((info->serial_signals & SerialSignal_RI)  ? TIOCM_RNG:0) +
2878                 ((info->serial_signals & SerialSignal_DSR) ? TIOCM_DSR:0) +
2879                 ((info->serial_signals & SerialSignal_CTS) ? TIOCM_CTS:0);
2880
2881         if (debug_level >= DEBUG_LEVEL_INFO)
2882                 printk("%s(%d):%s tiocmget() value=%08X\n",
2883                          __FILE__,__LINE__, info->device_name, result );
2884         return result;
2885 }
2886
2887 /* set modem control signals (DTR/RTS)
2888  */
2889 static int tiocmset(struct tty_struct *tty, struct file *file,
2890                     unsigned int set, unsigned int clear)
2891 {
2892         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
2893         unsigned long flags;
2894
2895         if (debug_level >= DEBUG_LEVEL_INFO)
2896                 printk("%s(%d):%s tiocmset(%x,%x)\n",
2897                         __FILE__,__LINE__,info->device_name, set, clear);
2898
2899         if (set & TIOCM_RTS)
2900                 info->serial_signals |= SerialSignal_RTS;
2901         if (set & TIOCM_DTR)
2902                 info->serial_signals |= SerialSignal_DTR;
2903         if (clear & TIOCM_RTS)
2904                 info->serial_signals &= ~SerialSignal_RTS;
2905         if (clear & TIOCM_DTR)
2906                 info->serial_signals &= ~SerialSignal_DTR;
2907
2908         spin_lock_irqsave(&info->irq_spinlock,flags);
2909         usc_set_serial_signals(info);
2910         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2911
2912         return 0;
2913 }
2914
2915 /* mgsl_break()         Set or clear transmit break condition
2916  *
2917  * Arguments:           tty             pointer to tty instance data
2918  *                      break_state     -1=set break condition, 0=clear
2919  * Return Value:        None
2920  */
2921 static void mgsl_break(struct tty_struct *tty, int break_state)
2922 {
2923         struct mgsl_struct * info = (struct mgsl_struct *)tty->driver_data;
2924         unsigned long flags;
2925
2926         if (debug_level >= DEBUG_LEVEL_INFO)
2927                 printk("%s(%d):mgsl_break(%s,%d)\n",
2928                          __FILE__,__LINE__, info->device_name, break_state);
2929
2930         if (mgsl_paranoia_check(info, tty->name, "mgsl_break"))
2931                 return;
2932
2933         spin_lock_irqsave(&info->irq_spinlock,flags);
2934         if (break_state == -1)
2935                 usc_OutReg(info,IOCR,(u16)(usc_InReg(info,IOCR) | BIT7));
2936         else
2937                 usc_OutReg(info,IOCR,(u16)(usc_InReg(info,IOCR) & ~BIT7));
2938         spin_unlock_irqrestore(&info->irq_spinlock,flags);
2939
2940 }       /* end of mgsl_break() */
2941
2942 /* mgsl_ioctl() Service an IOCTL request
2943  *
2944  * Arguments:
2945  *
2946  *      tty     pointer to tty instance data
2947  *      file    pointer to associated file object for device
2948  *      cmd     IOCTL command code
2949  *      arg     command argument/context
2950  *
2951  * Return Value:        0 if success, otherwise error code
2952  */
2953 static int mgsl_ioctl(struct tty_struct *tty, struct file * file,
2954                     unsigned int cmd, unsigned long arg)
2955 {
2956         struct mgsl_struct * info = (struct mgsl_struct *)tty->driver_data;
2957
2958         if (debug_level >= DEBUG_LEVEL_INFO)
2959                 printk("%s(%d):mgsl_ioctl %s cmd=%08X\n", __FILE__,__LINE__,
2960                         info->device_name, cmd );
2961
2962         if (mgsl_paranoia_check(info, tty->name, "mgsl_ioctl"))
2963                 return -ENODEV;
2964
2965         if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
2966             (cmd != TIOCMIWAIT) && (cmd != TIOCGICOUNT)) {
2967                 if (tty->flags & (1 << TTY_IO_ERROR))
2968                     return -EIO;
2969         }
2970
2971         return mgsl_ioctl_common(info, cmd, arg);
2972 }
2973
2974 static int mgsl_ioctl_common(struct mgsl_struct *info, unsigned int cmd, unsigned long arg)
2975 {
2976         int error;
2977         struct mgsl_icount cnow;        /* kernel counter temps */
2978         void __user *argp = (void __user *)arg;
2979         struct serial_icounter_struct __user *p_cuser;  /* user space */
2980         unsigned long flags;
2981
2982         switch (cmd) {
2983                 case MGSL_IOCGPARAMS:
2984                         return mgsl_get_params(info, argp);
2985                 case MGSL_IOCSPARAMS:
2986                         return mgsl_set_params(info, argp);
2987                 case MGSL_IOCGTXIDLE:
2988                         return mgsl_get_txidle(info, argp);
2989                 case MGSL_IOCSTXIDLE:
2990                         return mgsl_set_txidle(info,(int)arg);
2991                 case MGSL_IOCTXENABLE:
2992                         return mgsl_txenable(info,(int)arg);
2993                 case MGSL_IOCRXENABLE:
2994                         return mgsl_rxenable(info,(int)arg);
2995                 case MGSL_IOCTXABORT:
2996                         return mgsl_txabort(info);
2997                 case MGSL_IOCGSTATS:
2998                         return mgsl_get_stats(info, argp);
2999                 case MGSL_IOCWAITEVENT:
3000                         return mgsl_wait_event(info, argp);
3001                 case MGSL_IOCLOOPTXDONE:
3002                         return mgsl_loopmode_send_done(info);
3003                 /* Wait for modem input (DCD,RI,DSR,CTS) change
3004                  * as specified by mask in arg (TIOCM_RNG/DSR/CD/CTS)
3005                  */
3006                 case TIOCMIWAIT:
3007                         return modem_input_wait(info,(int)arg);
3008
3009                 /*
3010                  * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
3011                  * Return: write counters to the user passed counter struct
3012                  * NB: both 1->0 and 0->1 transitions are counted except for
3013                  *     RI where only 0->1 is counted.
3014                  */
3015                 case TIOCGICOUNT:
3016                         spin_lock_irqsave(&info->irq_spinlock,flags);
3017                         cnow = info->icount;
3018                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
3019                         p_cuser = argp;
3020                         PUT_USER(error,cnow.cts, &p_cuser->cts);
3021                         if (error) return error;
3022                         PUT_USER(error,cnow.dsr, &p_cuser->dsr);
3023                         if (error) return error;
3024                         PUT_USER(error,cnow.rng, &p_cuser->rng);
3025                         if (error) return error;
3026                         PUT_USER(error,cnow.dcd, &p_cuser->dcd);
3027                         if (error) return error;
3028                         PUT_USER(error,cnow.rx, &p_cuser->rx);
3029                         if (error) return error;
3030                         PUT_USER(error,cnow.tx, &p_cuser->tx);
3031                         if (error) return error;
3032                         PUT_USER(error,cnow.frame, &p_cuser->frame);
3033                         if (error) return error;
3034                         PUT_USER(error,cnow.overrun, &p_cuser->overrun);
3035                         if (error) return error;
3036                         PUT_USER(error,cnow.parity, &p_cuser->parity);
3037                         if (error) return error;
3038                         PUT_USER(error,cnow.brk, &p_cuser->brk);
3039                         if (error) return error;
3040                         PUT_USER(error,cnow.buf_overrun, &p_cuser->buf_overrun);
3041                         if (error) return error;
3042                         return 0;
3043                 default:
3044                         return -ENOIOCTLCMD;
3045         }
3046         return 0;
3047 }
3048
3049 /* mgsl_set_termios()
3050  *
3051  *      Set new termios settings
3052  *
3053  * Arguments:
3054  *
3055  *      tty             pointer to tty structure
3056  *      termios         pointer to buffer to hold returned old termios
3057  *
3058  * Return Value:                None
3059  */
3060 static void mgsl_set_termios(struct tty_struct *tty, struct termios *old_termios)
3061 {
3062         struct mgsl_struct *info = (struct mgsl_struct *)tty->driver_data;
3063         unsigned long flags;
3064
3065         if (debug_level >= DEBUG_LEVEL_INFO)
3066                 printk("%s(%d):mgsl_set_termios %s\n", __FILE__,__LINE__,
3067                         tty->driver->name );
3068
3069         /* just return if nothing has changed */
3070         if ((tty->termios->c_cflag == old_termios->c_cflag)
3071             && (RELEVANT_IFLAG(tty->termios->c_iflag)
3072                 == RELEVANT_IFLAG(old_termios->c_iflag)))
3073           return;
3074
3075         mgsl_change_params(info);
3076
3077         /* Handle transition to B0 status */
3078         if (old_termios->c_cflag & CBAUD &&
3079             !(tty->termios->c_cflag & CBAUD)) {
3080                 info->serial_signals &= ~(SerialSignal_RTS + SerialSignal_DTR);
3081                 spin_lock_irqsave(&info->irq_spinlock,flags);
3082                 usc_set_serial_signals(info);
3083                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
3084         }
3085
3086         /* Handle transition away from B0 status */
3087         if (!(old_termios->c_cflag & CBAUD) &&
3088             tty->termios->c_cflag & CBAUD) {
3089                 info->serial_signals |= SerialSignal_DTR;
3090                 if (!(tty->termios->c_cflag & CRTSCTS) ||
3091                     !test_bit(TTY_THROTTLED, &tty->flags)) {
3092                         info->serial_signals |= SerialSignal_RTS;
3093                 }
3094                 spin_lock_irqsave(&info->irq_spinlock,flags);
3095                 usc_set_serial_signals(info);
3096                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
3097         }
3098
3099         /* Handle turning off CRTSCTS */
3100         if (old_termios->c_cflag & CRTSCTS &&
3101             !(tty->termios->c_cflag & CRTSCTS)) {
3102                 tty->hw_stopped = 0;
3103                 mgsl_start(tty);
3104         }
3105
3106 }       /* end of mgsl_set_termios() */
3107
3108 /* mgsl_close()
3109  *
3110  *      Called when port is closed. Wait for remaining data to be
3111  *      sent. Disable port and free resources.
3112  *
3113  * Arguments:
3114  *
3115  *      tty     pointer to open tty structure
3116  *      filp    pointer to open file object
3117  *
3118  * Return Value:        None
3119  */
3120 static void mgsl_close(struct tty_struct *tty, struct file * filp)
3121 {
3122         struct mgsl_struct * info = (struct mgsl_struct *)tty->driver_data;
3123
3124         if (mgsl_paranoia_check(info, tty->name, "mgsl_close"))
3125                 return;
3126
3127         if (debug_level >= DEBUG_LEVEL_INFO)
3128                 printk("%s(%d):mgsl_close(%s) entry, count=%d\n",
3129                          __FILE__,__LINE__, info->device_name, info->count);
3130
3131         if (!info->count)
3132                 return;
3133
3134         if (tty_hung_up_p(filp))
3135                 goto cleanup;
3136
3137         if ((tty->count == 1) && (info->count != 1)) {
3138                 /*
3139                  * tty->count is 1 and the tty structure will be freed.
3140                  * info->count should be one in this case.
3141                  * if it's not, correct it so that the port is shutdown.
3142                  */
3143                 printk("mgsl_close: bad refcount; tty->count is 1, "
3144                        "info->count is %d\n", info->count);
3145                 info->count = 1;
3146         }
3147
3148         info->count--;
3149
3150         /* if at least one open remaining, leave hardware active */
3151         if (info->count)
3152                 goto cleanup;
3153
3154         info->flags |= ASYNC_CLOSING;
3155
3156         /* set tty->closing to notify line discipline to
3157          * only process XON/XOFF characters. Only the N_TTY
3158          * discipline appears to use this (ppp does not).
3159          */
3160         tty->closing = 1;
3161
3162         /* wait for transmit data to clear all layers */
3163
3164         if (info->closing_wait != ASYNC_CLOSING_WAIT_NONE) {
3165                 if (debug_level >= DEBUG_LEVEL_INFO)
3166                         printk("%s(%d):mgsl_close(%s) calling tty_wait_until_sent\n",
3167                                  __FILE__,__LINE__, info->device_name );
3168                 tty_wait_until_sent(tty, info->closing_wait);
3169         }
3170
3171         if (info->flags & ASYNC_INITIALIZED)
3172                 mgsl_wait_until_sent(tty, info->timeout);
3173
3174         if (tty->driver->flush_buffer)
3175                 tty->driver->flush_buffer(tty);
3176
3177         tty_ldisc_flush(tty);
3178
3179         shutdown(info);
3180
3181         tty->closing = 0;
3182         info->tty = NULL;
3183
3184         if (info->blocked_open) {
3185                 if (info->close_delay) {
3186                         msleep_interruptible(jiffies_to_msecs(info->close_delay));
3187                 }
3188                 wake_up_interruptible(&info->open_wait);
3189         }
3190
3191         info->flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
3192
3193         wake_up_interruptible(&info->close_wait);
3194
3195 cleanup:
3196         if (debug_level >= DEBUG_LEVEL_INFO)
3197                 printk("%s(%d):mgsl_close(%s) exit, count=%d\n", __FILE__,__LINE__,
3198                         tty->driver->name, info->count);
3199
3200 }       /* end of mgsl_close() */
3201
3202 /* mgsl_wait_until_sent()
3203  *
3204  *      Wait until the transmitter is empty.
3205  *
3206  * Arguments:
3207  *
3208  *      tty             pointer to tty info structure
3209  *      timeout         time to wait for send completion
3210  *
3211  * Return Value:        None
3212  */
3213 static void mgsl_wait_until_sent(struct tty_struct *tty, int timeout)
3214 {
3215         struct mgsl_struct * info = (struct mgsl_struct *)tty->driver_data;
3216         unsigned long orig_jiffies, char_time;
3217
3218         if (!info )
3219                 return;
3220
3221         if (debug_level >= DEBUG_LEVEL_INFO)
3222                 printk("%s(%d):mgsl_wait_until_sent(%s) entry\n",
3223                          __FILE__,__LINE__, info->device_name );
3224
3225         if (mgsl_paranoia_check(info, tty->name, "mgsl_wait_until_sent"))
3226                 return;
3227
3228         if (!(info->flags & ASYNC_INITIALIZED))
3229                 goto exit;
3230
3231         orig_jiffies = jiffies;
3232
3233         /* Set check interval to 1/5 of estimated time to
3234          * send a character, and make it at least 1. The check
3235          * interval should also be less than the timeout.
3236          * Note: use tight timings here to satisfy the NIST-PCTS.
3237          */
3238
3239         if ( info->params.data_rate ) {
3240                 char_time = info->timeout/(32 * 5);
3241                 if (!char_time)
3242                         char_time++;
3243         } else
3244                 char_time = 1;
3245
3246         if (timeout)
3247                 char_time = min_t(unsigned long, char_time, timeout);
3248
3249         if ( info->params.mode == MGSL_MODE_HDLC ||
3250                 info->params.mode == MGSL_MODE_RAW ) {
3251                 while (info->tx_active) {
3252                         msleep_interruptible(jiffies_to_msecs(char_time));
3253                         if (signal_pending(current))
3254                                 break;
3255                         if (timeout && time_after(jiffies, orig_jiffies + timeout))
3256                                 break;
3257                 }
3258         } else {
3259                 while (!(usc_InReg(info,TCSR) & TXSTATUS_ALL_SENT) &&
3260                         info->tx_enabled) {
3261                         msleep_interruptible(jiffies_to_msecs(char_time));
3262                         if (signal_pending(current))
3263                                 break;
3264                         if (timeout && time_after(jiffies, orig_jiffies + timeout))
3265                                 break;
3266                 }
3267         }
3268
3269 exit:
3270         if (debug_level >= DEBUG_LEVEL_INFO)
3271                 printk("%s(%d):mgsl_wait_until_sent(%s) exit\n",
3272                          __FILE__,__LINE__, info->device_name );
3273
3274 }       /* end of mgsl_wait_until_sent() */
3275
3276 /* mgsl_hangup()
3277  *
3278  *      Called by tty_hangup() when a hangup is signaled.
3279  *      This is the same as to closing all open files for the port.
3280  *
3281  * Arguments:           tty     pointer to associated tty object
3282  * Return Value:        None
3283  */
3284 static void mgsl_hangup(struct tty_struct *tty)
3285 {
3286         struct mgsl_struct * info = (struct mgsl_struct *)tty->driver_data;
3287
3288         if (debug_level >= DEBUG_LEVEL_INFO)
3289                 printk("%s(%d):mgsl_hangup(%s)\n",
3290                          __FILE__,__LINE__, info->device_name );
3291
3292         if (mgsl_paranoia_check(info, tty->name, "mgsl_hangup"))
3293                 return;
3294
3295         mgsl_flush_buffer(tty);
3296         shutdown(info);
3297
3298         info->count = 0;
3299         info->flags &= ~ASYNC_NORMAL_ACTIVE;
3300         info->tty = NULL;
3301
3302         wake_up_interruptible(&info->open_wait);
3303
3304 }       /* end of mgsl_hangup() */
3305
3306 /* block_til_ready()
3307  *
3308  *      Block the current process until the specified port
3309  *      is ready to be opened.
3310  *
3311  * Arguments:
3312  *
3313  *      tty             pointer to tty info structure
3314  *      filp            pointer to open file object
3315  *      info            pointer to device instance data
3316  *
3317  * Return Value:        0 if success, otherwise error code
3318  */
3319 static int block_til_ready(struct tty_struct *tty, struct file * filp,
3320                            struct mgsl_struct *info)
3321 {
3322         DECLARE_WAITQUEUE(wait, current);
3323         int             retval;
3324         int             do_clocal = 0, extra_count = 0;
3325         unsigned long   flags;
3326
3327         if (debug_level >= DEBUG_LEVEL_INFO)
3328                 printk("%s(%d):block_til_ready on %s\n",
3329                          __FILE__,__LINE__, tty->driver->name );
3330
3331         if (filp->f_flags & O_NONBLOCK || tty->flags & (1 << TTY_IO_ERROR)){
3332                 /* nonblock mode is set or port is not enabled */
3333                 info->flags |= ASYNC_NORMAL_ACTIVE;
3334                 return 0;
3335         }
3336
3337         if (tty->termios->c_cflag & CLOCAL)
3338                 do_clocal = 1;
3339
3340         /* Wait for carrier detect and the line to become
3341          * free (i.e., not in use by the callout).  While we are in
3342          * this loop, info->count is dropped by one, so that
3343          * mgsl_close() knows when to free things.  We restore it upon
3344          * exit, either normal or abnormal.
3345          */
3346
3347         retval = 0;
3348         add_wait_queue(&info->open_wait, &wait);
3349
3350         if (debug_level >= DEBUG_LEVEL_INFO)
3351                 printk("%s(%d):block_til_ready before block on %s count=%d\n",
3352                          __FILE__,__LINE__, tty->driver->name, info->count );
3353
3354         spin_lock_irqsave(&info->irq_spinlock, flags);
3355         if (!tty_hung_up_p(filp)) {
3356                 extra_count = 1;
3357                 info->count--;
3358         }
3359         spin_unlock_irqrestore(&info->irq_spinlock, flags);
3360         info->blocked_open++;
3361
3362         while (1) {
3363                 if (tty->termios->c_cflag & CBAUD) {
3364                         spin_lock_irqsave(&info->irq_spinlock,flags);
3365                         info->serial_signals |= SerialSignal_RTS + SerialSignal_DTR;
3366                         usc_set_serial_signals(info);
3367                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
3368                 }
3369
3370                 set_current_state(TASK_INTERRUPTIBLE);
3371
3372                 if (tty_hung_up_p(filp) || !(info->flags & ASYNC_INITIALIZED)){
3373                         retval = (info->flags & ASYNC_HUP_NOTIFY) ?
3374                                         -EAGAIN : -ERESTARTSYS;
3375                         break;
3376                 }
3377
3378                 spin_lock_irqsave(&info->irq_spinlock,flags);
3379                 usc_get_serial_signals(info);
3380                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
3381
3382                 if (!(info->flags & ASYNC_CLOSING) &&
3383                     (do_clocal || (info->serial_signals & SerialSignal_DCD)) ) {
3384                         break;
3385                 }
3386
3387                 if (signal_pending(current)) {
3388                         retval = -ERESTARTSYS;
3389                         break;
3390                 }
3391
3392                 if (debug_level >= DEBUG_LEVEL_INFO)
3393                         printk("%s(%d):block_til_ready blocking on %s count=%d\n",
3394                                  __FILE__,__LINE__, tty->driver->name, info->count );
3395
3396                 schedule();
3397         }
3398
3399         set_current_state(TASK_RUNNING);
3400         remove_wait_queue(&info->open_wait, &wait);
3401
3402         if (extra_count)
3403                 info->count++;
3404         info->blocked_open--;
3405
3406         if (debug_level >= DEBUG_LEVEL_INFO)
3407                 printk("%s(%d):block_til_ready after blocking on %s count=%d\n",
3408                          __FILE__,__LINE__, tty->driver->name, info->count );
3409
3410         if (!retval)
3411                 info->flags |= ASYNC_NORMAL_ACTIVE;
3412
3413         return retval;
3414
3415 }       /* end of block_til_ready() */
3416
3417 /* mgsl_open()
3418  *
3419  *      Called when a port is opened.  Init and enable port.
3420  *      Perform serial-specific initialization for the tty structure.
3421  *
3422  * Arguments:           tty     pointer to tty info structure
3423  *                      filp    associated file pointer
3424  *
3425  * Return Value:        0 if success, otherwise error code
3426  */
3427 static int mgsl_open(struct tty_struct *tty, struct file * filp)
3428 {
3429         struct mgsl_struct      *info;
3430         int                     retval, line;
3431         unsigned long flags;
3432
3433         /* verify range of specified line number */
3434         line = tty->index;
3435         if ((line < 0) || (line >= mgsl_device_count)) {
3436                 printk("%s(%d):mgsl_open with invalid line #%d.\n",
3437                         __FILE__,__LINE__,line);
3438                 return -ENODEV;
3439         }
3440
3441         /* find the info structure for the specified line */
3442         info = mgsl_device_list;
3443         while(info && info->line != line)
3444                 info = info->next_device;
3445         if (mgsl_paranoia_check(info, tty->name, "mgsl_open"))
3446                 return -ENODEV;
3447
3448         tty->driver_data = info;
3449         info->tty = tty;
3450
3451         if (debug_level >= DEBUG_LEVEL_INFO)
3452                 printk("%s(%d):mgsl_open(%s), old ref count = %d\n",
3453                          __FILE__,__LINE__,tty->driver->name, info->count);
3454
3455         /* If port is closing, signal caller to try again */
3456         if (tty_hung_up_p(filp) || info->flags & ASYNC_CLOSING){
3457                 if (info->flags & ASYNC_CLOSING)
3458                         interruptible_sleep_on(&info->close_wait);
3459                 retval = ((info->flags & ASYNC_HUP_NOTIFY) ?
3460                         -EAGAIN : -ERESTARTSYS);
3461                 goto cleanup;
3462         }
3463
3464         info->tty->low_latency = (info->flags & ASYNC_LOW_LATENCY) ? 1 : 0;
3465
3466         spin_lock_irqsave(&info->netlock, flags);
3467         if (info->netcount) {
3468                 retval = -EBUSY;
3469                 spin_unlock_irqrestore(&info->netlock, flags);
3470                 goto cleanup;
3471         }
3472         info->count++;
3473         spin_unlock_irqrestore(&info->netlock, flags);
3474
3475         if (info->count == 1) {
3476                 /* 1st open on this device, init hardware */
3477                 retval = startup(info);
3478                 if (retval < 0)
3479                         goto cleanup;
3480         }
3481
3482         retval = block_til_ready(tty, filp, info);
3483         if (retval) {
3484                 if (debug_level >= DEBUG_LEVEL_INFO)
3485                         printk("%s(%d):block_til_ready(%s) returned %d\n",
3486                                  __FILE__,__LINE__, info->device_name, retval);
3487                 goto cleanup;
3488         }
3489
3490         if (debug_level >= DEBUG_LEVEL_INFO)
3491                 printk("%s(%d):mgsl_open(%s) success\n",
3492                          __FILE__,__LINE__, info->device_name);
3493         retval = 0;
3494
3495 cleanup:
3496         if (retval) {
3497                 if (tty->count == 1)
3498                         info->tty = NULL; /* tty layer will release tty struct */
3499                 if(info->count)
3500                         info->count--;
3501         }
3502
3503         return retval;
3504
3505 }       /* end of mgsl_open() */
3506
3507 /*
3508  * /proc fs routines....
3509  */
3510
3511 static inline int line_info(char *buf, struct mgsl_struct *info)
3512 {
3513         char    stat_buf[30];
3514         int     ret;
3515         unsigned long flags;
3516
3517         if (info->bus_type == MGSL_BUS_TYPE_PCI) {
3518                 ret = sprintf(buf, "%s:PCI io:%04X irq:%d mem:%08X lcr:%08X",
3519                         info->device_name, info->io_base, info->irq_level,
3520                         info->phys_memory_base, info->phys_lcr_base);
3521         } else {
3522                 ret = sprintf(buf, "%s:(E)ISA io:%04X irq:%d dma:%d",
3523                         info->device_name, info->io_base,
3524                         info->irq_level, info->dma_level);
3525         }
3526
3527         /* output current serial signal states */
3528         spin_lock_irqsave(&info->irq_spinlock,flags);
3529         usc_get_serial_signals(info);
3530         spin_unlock_irqrestore(&info->irq_spinlock,flags);
3531
3532         stat_buf[0] = 0;
3533         stat_buf[1] = 0;
3534         if (info->serial_signals & SerialSignal_RTS)
3535                 strcat(stat_buf, "|RTS");
3536         if (info->serial_signals & SerialSignal_CTS)
3537                 strcat(stat_buf, "|CTS");
3538         if (info->serial_signals & SerialSignal_DTR)
3539                 strcat(stat_buf, "|DTR");
3540         if (info->serial_signals & SerialSignal_DSR)
3541                 strcat(stat_buf, "|DSR");
3542         if (info->serial_signals & SerialSignal_DCD)
3543                 strcat(stat_buf, "|CD");
3544         if (info->serial_signals & SerialSignal_RI)
3545                 strcat(stat_buf, "|RI");
3546
3547         if (info->params.mode == MGSL_MODE_HDLC ||
3548             info->params.mode == MGSL_MODE_RAW ) {
3549                 ret += sprintf(buf+ret, " HDLC txok:%d rxok:%d",
3550                               info->icount.txok, info->icount.rxok);
3551                 if (info->icount.txunder)
3552                         ret += sprintf(buf+ret, " txunder:%d", info->icount.txunder);
3553                 if (info->icount.txabort)
3554                         ret += sprintf(buf+ret, " txabort:%d", info->icount.txabort);
3555                 if (info->icount.rxshort)
3556                         ret += sprintf(buf+ret, " rxshort:%d", info->icount.rxshort);
3557                 if (info->icount.rxlong)
3558                         ret += sprintf(buf+ret, " rxlong:%d", info->icount.rxlong);
3559                 if (info->icount.rxover)
3560                         ret += sprintf(buf+ret, " rxover:%d", info->icount.rxover);
3561                 if (info->icount.rxcrc)
3562                         ret += sprintf(buf+ret, " rxcrc:%d", info->icount.rxcrc);
3563         } else {
3564                 ret += sprintf(buf+ret, " ASYNC tx:%d rx:%d",
3565                               info->icount.tx, info->icount.rx);
3566                 if (info->icount.frame)
3567                         ret += sprintf(buf+ret, " fe:%d", info->icount.frame);
3568                 if (info->icount.parity)
3569                         ret += sprintf(buf+ret, " pe:%d", info->icount.parity);
3570                 if (info->icount.brk)
3571                         ret += sprintf(buf+ret, " brk:%d", info->icount.brk);
3572                 if (info->icount.overrun)
3573                         ret += sprintf(buf+ret, " oe:%d", info->icount.overrun);
3574         }
3575
3576         /* Append serial signal status to end */
3577         ret += sprintf(buf+ret, " %s\n", stat_buf+1);
3578
3579         ret += sprintf(buf+ret, "txactive=%d bh_req=%d bh_run=%d pending_bh=%x\n",
3580          info->tx_active,info->bh_requested,info->bh_running,
3581          info->pending_bh);
3582
3583         spin_lock_irqsave(&info->irq_spinlock,flags);
3584         {
3585         u16 Tcsr = usc_InReg( info, TCSR );
3586         u16 Tdmr = usc_InDmaReg( info, TDMR );
3587         u16 Ticr = usc_InReg( info, TICR );
3588         u16 Rscr = usc_InReg( info, RCSR );
3589         u16 Rdmr = usc_InDmaReg( info, RDMR );
3590         u16 Ricr = usc_InReg( info, RICR );
3591         u16 Icr = usc_InReg( info, ICR );
3592         u16 Dccr = usc_InReg( info, DCCR );
3593         u16 Tmr = usc_InReg( info, TMR );
3594         u16 Tccr = usc_InReg( info, TCCR );
3595         u16 Ccar = inw( info->io_base + CCAR );
3596         ret += sprintf(buf+ret, "tcsr=%04X tdmr=%04X ticr=%04X rcsr=%04X rdmr=%04X\n"
3597                         "ricr=%04X icr =%04X dccr=%04X tmr=%04X tccr=%04X ccar=%04X\n",
3598                         Tcsr,Tdmr,Ticr,Rscr,Rdmr,Ricr,Icr,Dccr,Tmr,Tccr,Ccar );
3599         }
3600         spin_unlock_irqrestore(&info->irq_spinlock,flags);
3601
3602         return ret;
3603
3604 }       /* end of line_info() */
3605
3606 /* mgsl_read_proc()
3607  *
3608  * Called to print information about devices
3609  *
3610  * Arguments:
3611  *      page    page of memory to hold returned info
3612  *      start
3613  *      off
3614  *      count
3615  *      eof
3616  *      data
3617  *
3618  * Return Value:
3619  */
3620 static int mgsl_read_proc(char *page, char **start, off_t off, int count,
3621                  int *eof, void *data)
3622 {
3623         int len = 0, l;
3624         off_t   begin = 0;
3625         struct mgsl_struct *info;
3626
3627         len += sprintf(page, "synclink driver:%s\n", driver_version);
3628
3629         info = mgsl_device_list;
3630         while( info ) {
3631                 l = line_info(page + len, info);
3632                 len += l;
3633                 if (len+begin > off+count)
3634                         goto done;
3635                 if (len+begin < off) {
3636                         begin += len;
3637                         len = 0;
3638                 }
3639                 info = info->next_device;
3640         }
3641
3642         *eof = 1;
3643 done:
3644         if (off >= len+begin)
3645                 return 0;
3646         *start = page + (off-begin);
3647         return ((count < begin+len-off) ? count : begin+len-off);
3648
3649 }       /* end of mgsl_read_proc() */
3650
3651 /* mgsl_allocate_dma_buffers()
3652  *
3653  *      Allocate and format DMA buffers (ISA adapter)
3654  *      or format shared memory buffers (PCI adapter).
3655  *
3656  * Arguments:           info    pointer to device instance data
3657  * Return Value:        0 if success, otherwise error
3658  */
3659 static int mgsl_allocate_dma_buffers(struct mgsl_struct *info)
3660 {
3661         unsigned short BuffersPerFrame;
3662
3663         info->last_mem_alloc = 0;
3664
3665         /* Calculate the number of DMA buffers necessary to hold the */
3666         /* largest allowable frame size. Note: If the max frame size is */
3667         /* not an even multiple of the DMA buffer size then we need to */
3668         /* round the buffer count per frame up one. */
3669
3670         BuffersPerFrame = (unsigned short)(info->max_frame_size/DMABUFFERSIZE);
3671         if ( info->max_frame_size % DMABUFFERSIZE )
3672                 BuffersPerFrame++;
3673
3674         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
3675                 /*
3676                  * The PCI adapter has 256KBytes of shared memory to use.
3677                  * This is 64 PAGE_SIZE buffers.
3678                  *
3679                  * The first page is used for padding at this time so the
3680                  * buffer list does not begin at offset 0 of the PCI
3681                  * adapter's shared memory.
3682                  *
3683                  * The 2nd page is used for the buffer list. A 4K buffer
3684                  * list can hold 128 DMA_BUFFER structures at 32 bytes
3685                  * each.
3686                  *
3687                  * This leaves 62 4K pages.
3688                  *
3689                  * The next N pages are used for transmit frame(s). We
3690                  * reserve enough 4K page blocks to hold the required
3691                  * number of transmit dma buffers (num_tx_dma_buffers),
3692                  * each of MaxFrameSize size.
3693                  *
3694                  * Of the remaining pages (62-N), determine how many can
3695                  * be used to receive full MaxFrameSize inbound frames
3696                  */
3697                 info->tx_buffer_count = info->num_tx_dma_buffers * BuffersPerFrame;
3698                 info->rx_buffer_count = 62 - info->tx_buffer_count;
3699         } else {
3700                 /* Calculate the number of PAGE_SIZE buffers needed for */
3701                 /* receive and transmit DMA buffers. */
3702
3703
3704                 /* Calculate the number of DMA buffers necessary to */
3705                 /* hold 7 max size receive frames and one max size transmit frame. */
3706                 /* The receive buffer count is bumped by one so we avoid an */
3707                 /* End of List condition if all receive buffers are used when */
3708                 /* using linked list DMA buffers. */
3709
3710                 info->tx_buffer_count = info->num_tx_dma_buffers * BuffersPerFrame;
3711                 info->rx_buffer_count = (BuffersPerFrame * MAXRXFRAMES) + 6;
3712
3713                 /*
3714                  * limit total TxBuffers & RxBuffers to 62 4K total
3715                  * (ala PCI Allocation)
3716                  */
3717
3718                 if ( (info->tx_buffer_count + info->rx_buffer_count) > 62 )
3719                         info->rx_buffer_count = 62 - info->tx_buffer_count;
3720
3721         }
3722
3723         if ( debug_level >= DEBUG_LEVEL_INFO )
3724                 printk("%s(%d):Allocating %d TX and %d RX DMA buffers.\n",
3725                         __FILE__,__LINE__, info->tx_buffer_count,info->rx_buffer_count);
3726
3727         if ( mgsl_alloc_buffer_list_memory( info ) < 0 ||
3728                   mgsl_alloc_frame_memory(info, info->rx_buffer_list, info->rx_buffer_count) < 0 ||
3729                   mgsl_alloc_frame_memory(info, info->tx_buffer_list, info->tx_buffer_count) < 0 ||
3730                   mgsl_alloc_intermediate_rxbuffer_memory(info) < 0  ||
3731                   mgsl_alloc_intermediate_txbuffer_memory(info) < 0 ) {
3732                 printk("%s(%d):Can't allocate DMA buffer memory\n",__FILE__,__LINE__);
3733                 return -ENOMEM;
3734         }
3735
3736         mgsl_reset_rx_dma_buffers( info );
3737         mgsl_reset_tx_dma_buffers( info );
3738
3739         return 0;
3740
3741 }       /* end of mgsl_allocate_dma_buffers() */
3742
3743 /*
3744  * mgsl_alloc_buffer_list_memory()
3745  *
3746  * Allocate a common DMA buffer for use as the
3747  * receive and transmit buffer lists.
3748  *
3749  * A buffer list is a set of buffer entries where each entry contains
3750  * a pointer to an actual buffer and a pointer to the next buffer entry
3751  * (plus some other info about the buffer).
3752  *
3753  * The buffer entries for a list are built to form a circular list so
3754  * that when the entire list has been traversed you start back at the
3755  * beginning.
3756  *
3757  * This function allocates memory for just the buffer entries.
3758  * The links (pointer to next entry) are filled in with the physical
3759  * address of the next entry so the adapter can navigate the list
3760  * using bus master DMA. The pointers to the actual buffers are filled
3761  * out later when the actual buffers are allocated.
3762  *
3763  * Arguments:           info    pointer to device instance data
3764  * Return Value:        0 if success, otherwise error
3765  */
3766 static int mgsl_alloc_buffer_list_memory( struct mgsl_struct *info )
3767 {
3768         unsigned int i;
3769
3770         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
3771                 /* PCI adapter uses shared memory. */
3772                 info->buffer_list = info->memory_base + info->last_mem_alloc;
3773                 info->buffer_list_phys = info->last_mem_alloc;
3774                 info->last_mem_alloc += BUFFERLISTSIZE;
3775         } else {
3776                 /* ISA adapter uses system memory. */
3777                 /* The buffer lists are allocated as a common buffer that both */
3778                 /* the processor and adapter can access. This allows the driver to */
3779                 /* inspect portions of the buffer while other portions are being */
3780                 /* updated by the adapter using Bus Master DMA. */
3781
3782                 info->buffer_list = dma_alloc_coherent(NULL, BUFFERLISTSIZE, &info->buffer_list_dma_addr, GFP_KERNEL);
3783                 if (info->buffer_list == NULL)
3784                         return -ENOMEM;
3785                 info->buffer_list_phys = (u32)(info->buffer_list_dma_addr);
3786         }
3787
3788         /* We got the memory for the buffer entry lists. */
3789         /* Initialize the memory block to all zeros. */
3790         memset( info->buffer_list, 0, BUFFERLISTSIZE );
3791
3792         /* Save virtual address pointers to the receive and */
3793         /* transmit buffer lists. (Receive 1st). These pointers will */
3794         /* be used by the processor to access the lists. */
3795         info->rx_buffer_list = (DMABUFFERENTRY *)info->buffer_list;
3796         info->tx_buffer_list = (DMABUFFERENTRY *)info->buffer_list;
3797         info->tx_buffer_list += info->rx_buffer_count;
3798
3799         /*
3800          * Build the links for the buffer entry lists such that
3801          * two circular lists are built. (Transmit and Receive).
3802          *
3803          * Note: the links are physical addresses
3804          * which are read by the adapter to determine the next
3805          * buffer entry to use.
3806          */
3807
3808         for ( i = 0; i < info->rx_buffer_count; i++ ) {
3809                 /* calculate and store physical address of this buffer entry */
3810                 info->rx_buffer_list[i].phys_entry =
3811                         info->buffer_list_phys + (i * sizeof(DMABUFFERENTRY));
3812
3813                 /* calculate and store physical address of */
3814                 /* next entry in cirular list of entries */
3815
3816                 info->rx_buffer_list[i].link = info->buffer_list_phys;
3817
3818                 if ( i < info->rx_buffer_count - 1 )
3819                         info->rx_buffer_list[i].link += (i + 1) * sizeof(DMABUFFERENTRY);
3820         }
3821
3822         for ( i = 0; i < info->tx_buffer_count; i++ ) {
3823                 /* calculate and store physical address of this buffer entry */
3824                 info->tx_buffer_list[i].phys_entry = info->buffer_list_phys +
3825                         ((info->rx_buffer_count + i) * sizeof(DMABUFFERENTRY));
3826
3827                 /* calculate and store physical address of */
3828                 /* next entry in cirular list of entries */
3829
3830                 info->tx_buffer_list[i].link = info->buffer_list_phys +
3831                         info->rx_buffer_count * sizeof(DMABUFFERENTRY);
3832
3833                 if ( i < info->tx_buffer_count - 1 )
3834                         info->tx_buffer_list[i].link += (i + 1) * sizeof(DMABUFFERENTRY);
3835         }
3836
3837         return 0;
3838
3839 }       /* end of mgsl_alloc_buffer_list_memory() */
3840
3841 /* Free DMA buffers allocated for use as the
3842  * receive and transmit buffer lists.
3843  * Warning:
3844  *
3845  *      The data transfer buffers associated with the buffer list
3846  *      MUST be freed before freeing the buffer list itself because
3847  *      the buffer list contains the information necessary to free
3848  *      the individual buffers!
3849  */
3850 static void mgsl_free_buffer_list_memory( struct mgsl_struct *info )
3851 {
3852         if (info->buffer_list && info->bus_type != MGSL_BUS_TYPE_PCI)
3853                 dma_free_coherent(NULL, BUFFERLISTSIZE, info->buffer_list, info->buffer_list_dma_addr);
3854
3855         info->buffer_list = NULL;
3856         info->rx_buffer_list = NULL;
3857         info->tx_buffer_list = NULL;
3858
3859 }       /* end of mgsl_free_buffer_list_memory() */
3860
3861 /*
3862  * mgsl_alloc_frame_memory()
3863  *
3864  *      Allocate the frame DMA buffers used by the specified buffer list.
3865  *      Each DMA buffer will be one memory page in size. This is necessary
3866  *      because memory can fragment enough that it may be impossible
3867  *      contiguous pages.
3868  *
3869  * Arguments:
3870  *
3871  *      info            pointer to device instance data
3872  *      BufferList      pointer to list of buffer entries
3873  *      Buffercount     count of buffer entries in buffer list
3874  *
3875  * Return Value:        0 if success, otherwise -ENOMEM
3876  */
3877 static int mgsl_alloc_frame_memory(struct mgsl_struct *info,DMABUFFERENTRY *BufferList,int Buffercount)
3878 {
3879         int i;
3880         u32 phys_addr;
3881
3882         /* Allocate page sized buffers for the receive buffer list */
3883
3884         for ( i = 0; i < Buffercount; i++ ) {
3885                 if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
3886                         /* PCI adapter uses shared memory buffers. */
3887                         BufferList[i].virt_addr = info->memory_base + info->last_mem_alloc;
3888                         phys_addr = info->last_mem_alloc;
3889                         info->last_mem_alloc += DMABUFFERSIZE;
3890                 } else {
3891                         /* ISA adapter uses system memory. */
3892                         BufferList[i].virt_addr = dma_alloc_coherent(NULL, DMABUFFERSIZE, &BufferList[i].dma_addr, GFP_KERNEL);
3893                         if (BufferList[i].virt_addr == NULL)
3894                                 return -ENOMEM;
3895                         phys_addr = (u32)(BufferList[i].dma_addr);
3896                 }
3897                 BufferList[i].phys_addr = phys_addr;
3898         }
3899
3900         return 0;
3901
3902 }       /* end of mgsl_alloc_frame_memory() */
3903
3904 /*
3905  * mgsl_free_frame_memory()
3906  *
3907  *      Free the buffers associated with
3908  *      each buffer entry of a buffer list.
3909  *
3910  * Arguments:
3911  *
3912  *      info            pointer to device instance data
3913  *      BufferList      pointer to list of buffer entries
3914  *      Buffercount     count of buffer entries in buffer list
3915  *
3916  * Return Value:        None
3917  */
3918 static void mgsl_free_frame_memory(struct mgsl_struct *info, DMABUFFERENTRY *BufferList, int Buffercount)
3919 {
3920         int i;
3921
3922         if ( BufferList ) {
3923                 for ( i = 0 ; i < Buffercount ; i++ ) {
3924                         if ( BufferList[i].virt_addr ) {
3925                                 if ( info->bus_type != MGSL_BUS_TYPE_PCI )
3926                                         dma_free_coherent(NULL, DMABUFFERSIZE, BufferList[i].virt_addr, BufferList[i].dma_addr);
3927                                 BufferList[i].virt_addr = NULL;
3928                         }
3929                 }
3930         }
3931
3932 }       /* end of mgsl_free_frame_memory() */
3933
3934 /* mgsl_free_dma_buffers()
3935  *
3936  *      Free DMA buffers
3937  *
3938  * Arguments:           info    pointer to device instance data
3939  * Return Value:        None
3940  */
3941 static void mgsl_free_dma_buffers( struct mgsl_struct *info )
3942 {
3943         mgsl_free_frame_memory( info, info->rx_buffer_list, info->rx_buffer_count );
3944         mgsl_free_frame_memory( info, info->tx_buffer_list, info->tx_buffer_count );
3945         mgsl_free_buffer_list_memory( info );
3946
3947 }       /* end of mgsl_free_dma_buffers() */
3948
3949
3950 /*
3951  * mgsl_alloc_intermediate_rxbuffer_memory()
3952  *
3953  *      Allocate a buffer large enough to hold max_frame_size. This buffer
3954  *      is used to pass an assembled frame to the line discipline.
3955  *
3956  * Arguments:
3957  *
3958  *      info            pointer to device instance data
3959  *
3960  * Return Value:        0 if success, otherwise -ENOMEM
3961  */
3962 static int mgsl_alloc_intermediate_rxbuffer_memory(struct mgsl_struct *info)
3963 {
3964         info->intermediate_rxbuffer = kmalloc(info->max_frame_size, GFP_KERNEL | GFP_DMA);
3965         if ( info->intermediate_rxbuffer == NULL )
3966                 return -ENOMEM;
3967
3968         return 0;
3969
3970 }       /* end of mgsl_alloc_intermediate_rxbuffer_memory() */
3971
3972 /*
3973  * mgsl_free_intermediate_rxbuffer_memory()
3974  *
3975  *
3976  * Arguments:
3977  *
3978  *      info            pointer to device instance data
3979  *
3980  * Return Value:        None
3981  */
3982 static void mgsl_free_intermediate_rxbuffer_memory(struct mgsl_struct *info)
3983 {
3984         kfree(info->intermediate_rxbuffer);
3985         info->intermediate_rxbuffer = NULL;
3986
3987 }       /* end of mgsl_free_intermediate_rxbuffer_memory() */
3988
3989 /*
3990  * mgsl_alloc_intermediate_txbuffer_memory()
3991  *
3992  *      Allocate intermdiate transmit buffer(s) large enough to hold max_frame_size.
3993  *      This buffer is used to load transmit frames into the adapter's dma transfer
3994  *      buffers when there is sufficient space.
3995  *
3996  * Arguments:
3997  *
3998  *      info            pointer to device instance data
3999  *
4000  * Return Value:        0 if success, otherwise -ENOMEM
4001  */
4002 static int mgsl_alloc_intermediate_txbuffer_memory(struct mgsl_struct *info)
4003 {
4004         int i;
4005
4006         if ( debug_level >= DEBUG_LEVEL_INFO )
4007                 printk("%s %s(%d)  allocating %d tx holding buffers\n",
4008                                 info->device_name, __FILE__,__LINE__,info->num_tx_holding_buffers);
4009
4010         memset(info->tx_holding_buffers,0,sizeof(info->tx_holding_buffers));
4011
4012         for ( i=0; i<info->num_tx_holding_buffers; ++i) {
4013                 info->tx_holding_buffers[i].buffer =
4014                         kmalloc(info->max_frame_size, GFP_KERNEL);
4015                 if ( info->tx_holding_buffers[i].buffer == NULL )
4016                         return -ENOMEM;
4017         }
4018
4019         return 0;
4020
4021 }       /* end of mgsl_alloc_intermediate_txbuffer_memory() */
4022
4023 /*
4024  * mgsl_free_intermediate_txbuffer_memory()
4025  *
4026  *
4027  * Arguments:
4028  *
4029  *      info            pointer to device instance data
4030  *
4031  * Return Value:        None
4032  */
4033 static void mgsl_free_intermediate_txbuffer_memory(struct mgsl_struct *info)
4034 {
4035         int i;
4036
4037         for ( i=0; i<info->num_tx_holding_buffers; ++i ) {
4038                 kfree(info->tx_holding_buffers[i].buffer);
4039                 info->tx_holding_buffers[i].buffer = NULL;
4040         }
4041
4042         info->get_tx_holding_index = 0;
4043         info->put_tx_holding_index = 0;
4044         info->tx_holding_count = 0;
4045
4046 }       /* end of mgsl_free_intermediate_txbuffer_memory() */
4047
4048
4049 /*
4050  * load_next_tx_holding_buffer()
4051  *
4052  * attempts to load the next buffered tx request into the
4053  * tx dma buffers
4054  *
4055  * Arguments:
4056  *
4057  *      info            pointer to device instance data
4058  *
4059  * Return Value:        1 if next buffered tx request loaded
4060  *                      into adapter's tx dma buffer,
4061  *                      0 otherwise
4062  */
4063 static int load_next_tx_holding_buffer(struct mgsl_struct *info)
4064 {
4065         int ret = 0;
4066
4067         if ( info->tx_holding_count ) {
4068                 /* determine if we have enough tx dma buffers
4069                  * to accommodate the next tx frame
4070                  */
4071                 struct tx_holding_buffer *ptx =
4072                         &info->tx_holding_buffers[info->get_tx_holding_index];
4073                 int num_free = num_free_tx_dma_buffers(info);
4074                 int num_needed = ptx->buffer_size / DMABUFFERSIZE;
4075                 if ( ptx->buffer_size % DMABUFFERSIZE )
4076                         ++num_needed;
4077
4078                 if (num_needed <= num_free) {
4079                         info->xmit_cnt = ptx->buffer_size;
4080                         mgsl_load_tx_dma_buffer(info,ptx->buffer,ptx->buffer_size);
4081
4082                         --info->tx_holding_count;
4083                         if ( ++info->get_tx_holding_index >= info->num_tx_holding_buffers)
4084                                 info->get_tx_holding_index=0;
4085
4086                         /* restart transmit timer */
4087                         mod_timer(&info->tx_timer, jiffies + msecs_to_jiffies(5000));
4088
4089                         ret = 1;
4090                 }
4091         }
4092
4093         return ret;
4094 }
4095
4096 /*
4097  * save_tx_buffer_request()
4098  *
4099  * attempt to store transmit frame request for later transmission
4100  *
4101  * Arguments:
4102  *
4103  *      info            pointer to device instance data
4104  *      Buffer          pointer to buffer containing frame to load
4105  *      BufferSize      size in bytes of frame in Buffer
4106  *
4107  * Return Value:        1 if able to store, 0 otherwise
4108  */
4109 static int save_tx_buffer_request(struct mgsl_struct *info,const char *Buffer, unsigned int BufferSize)
4110 {
4111         struct tx_holding_buffer *ptx;
4112
4113         if ( info->tx_holding_count >= info->num_tx_holding_buffers ) {
4114                 return 0;               /* all buffers in use */
4115         }
4116
4117         ptx = &info->tx_holding_buffers[info->put_tx_holding_index];
4118         ptx->buffer_size = BufferSize;
4119         memcpy( ptx->buffer, Buffer, BufferSize);
4120
4121         ++info->tx_holding_count;
4122         if ( ++info->put_tx_holding_index >= info->num_tx_holding_buffers)
4123                 info->put_tx_holding_index=0;
4124
4125         return 1;
4126 }
4127
4128 static int mgsl_claim_resources(struct mgsl_struct *info)
4129 {
4130         if (request_region(info->io_base,info->io_addr_size,"synclink") == NULL) {
4131                 printk( "%s(%d):I/O address conflict on device %s Addr=%08X\n",
4132                         __FILE__,__LINE__,info->device_name, info->io_base);
4133                 return -ENODEV;
4134         }
4135         info->io_addr_requested = 1;
4136
4137         if ( request_irq(info->irq_level,mgsl_interrupt,info->irq_flags,
4138                 info->device_name, info ) < 0 ) {
4139                 printk( "%s(%d):Cant request interrupt on device %s IRQ=%d\n",
4140                         __FILE__,__LINE__,info->device_name, info->irq_level );
4141                 goto errout;
4142         }
4143         info->irq_requested = 1;
4144
4145         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
4146                 if (request_mem_region(info->phys_memory_base,0x40000,"synclink") == NULL) {
4147                         printk( "%s(%d):mem addr conflict device %s Addr=%08X\n",
4148                                 __FILE__,__LINE__,info->device_name, info->phys_memory_base);
4149                         goto errout;
4150                 }
4151                 info->shared_mem_requested = 1;
4152                 if (request_mem_region(info->phys_lcr_base + info->lcr_offset,128,"synclink") == NULL) {
4153                         printk( "%s(%d):lcr mem addr conflict device %s Addr=%08X\n",
4154                                 __FILE__,__LINE__,info->device_name, info->phys_lcr_base + info->lcr_offset);
4155                         goto errout;
4156                 }
4157                 info->lcr_mem_requested = 1;
4158
4159                 info->memory_base = ioremap(info->phys_memory_base,0x40000);
4160                 if (!info->memory_base) {
4161                         printk( "%s(%d):Cant map shared memory on device %s MemAddr=%08X\n",
4162                                 __FILE__,__LINE__,info->device_name, info->phys_memory_base );
4163                         goto errout;
4164                 }
4165
4166                 if ( !mgsl_memory_test(info) ) {
4167                         printk( "%s(%d):Failed shared memory test %s MemAddr=%08X\n",
4168                                 __FILE__,__LINE__,info->device_name, info->phys_memory_base );
4169                         goto errout;
4170                 }
4171
4172                 info->lcr_base = ioremap(info->phys_lcr_base,PAGE_SIZE) + info->lcr_offset;
4173                 if (!info->lcr_base) {
4174                         printk( "%s(%d):Cant map LCR memory on device %s MemAddr=%08X\n",
4175                                 __FILE__,__LINE__,info->device_name, info->phys_lcr_base );
4176                         goto errout;
4177                 }
4178
4179         } else {
4180                 /* claim DMA channel */
4181
4182                 if (request_dma(info->dma_level,info->device_name) < 0){
4183                         printk( "%s(%d):Cant request DMA channel on device %s DMA=%d\n",
4184                                 __FILE__,__LINE__,info->device_name, info->dma_level );
4185                         mgsl_release_resources( info );
4186                         return -ENODEV;
4187                 }
4188                 info->dma_requested = 1;
4189
4190                 /* ISA adapter uses bus master DMA */
4191                 set_dma_mode(info->dma_level,DMA_MODE_CASCADE);
4192                 enable_dma(info->dma_level);
4193         }
4194
4195         if ( mgsl_allocate_dma_buffers(info) < 0 ) {
4196                 printk( "%s(%d):Cant allocate DMA buffers on device %s DMA=%d\n",
4197                         __FILE__,__LINE__,info->device_name, info->dma_level );
4198                 goto errout;
4199         }
4200
4201         return 0;
4202 errout:
4203         mgsl_release_resources(info);
4204         return -ENODEV;
4205
4206 }       /* end of mgsl_claim_resources() */
4207
4208 static void mgsl_release_resources(struct mgsl_struct *info)
4209 {
4210         if ( debug_level >= DEBUG_LEVEL_INFO )
4211                 printk( "%s(%d):mgsl_release_resources(%s) entry\n",
4212                         __FILE__,__LINE__,info->device_name );
4213
4214         if ( info->irq_requested ) {
4215                 free_irq(info->irq_level, info);
4216                 info->irq_requested = 0;
4217         }
4218         if ( info->dma_requested ) {
4219                 disable_dma(info->dma_level);
4220                 free_dma(info->dma_level);
4221                 info->dma_requested = 0;
4222         }
4223         mgsl_free_dma_buffers(info);
4224         mgsl_free_intermediate_rxbuffer_memory(info);
4225         mgsl_free_intermediate_txbuffer_memory(info);
4226
4227         if ( info->io_addr_requested ) {
4228                 release_region(info->io_base,info->io_addr_size);
4229                 info->io_addr_requested = 0;
4230         }
4231         if ( info->shared_mem_requested ) {
4232                 release_mem_region(info->phys_memory_base,0x40000);
4233                 info->shared_mem_requested = 0;
4234         }
4235         if ( info->lcr_mem_requested ) {
4236                 release_mem_region(info->phys_lcr_base + info->lcr_offset,128);
4237                 info->lcr_mem_requested = 0;
4238         }
4239         if (info->memory_base){
4240                 iounmap(info->memory_base);
4241                 info->memory_base = NULL;
4242         }
4243         if (info->lcr_base){
4244                 iounmap(info->lcr_base - info->lcr_offset);
4245                 info->lcr_base = NULL;
4246         }
4247
4248         if ( debug_level >= DEBUG_LEVEL_INFO )
4249                 printk( "%s(%d):mgsl_release_resources(%s) exit\n",
4250                         __FILE__,__LINE__,info->device_name );
4251
4252 }       /* end of mgsl_release_resources() */
4253
4254 /* mgsl_add_device()
4255  *
4256  *      Add the specified device instance data structure to the
4257  *      global linked list of devices and increment the device count.
4258  *
4259  * Arguments:           info    pointer to device instance data
4260  * Return Value:        None
4261  */
4262 static void mgsl_add_device( struct mgsl_struct *info )
4263 {
4264         info->next_device = NULL;
4265         info->line = mgsl_device_count;
4266         sprintf(info->device_name,"ttySL%d",info->line);
4267
4268         if (info->line < MAX_TOTAL_DEVICES) {
4269                 if (maxframe[info->line])
4270                         info->max_frame_size = maxframe[info->line];
4271                 info->dosyncppp = dosyncppp[info->line];
4272
4273                 if (txdmabufs[info->line]) {
4274                         info->num_tx_dma_buffers = txdmabufs[info->line];
4275                         if (info->num_tx_dma_buffers < 1)
4276                                 info->num_tx_dma_buffers = 1;
4277                 }
4278
4279                 if (txholdbufs[info->line]) {
4280                         info->num_tx_holding_buffers = txholdbufs[info->line];
4281                         if (info->num_tx_holding_buffers < 1)
4282                                 info->num_tx_holding_buffers = 1;
4283                         else if (info->num_tx_holding_buffers > MAX_TX_HOLDING_BUFFERS)
4284                                 info->num_tx_holding_buffers = MAX_TX_HOLDING_BUFFERS;
4285                 }
4286         }
4287
4288         mgsl_device_count++;
4289
4290         if ( !mgsl_device_list )
4291                 mgsl_device_list = info;
4292         else {
4293                 struct mgsl_struct *current_dev = mgsl_device_list;
4294                 while( current_dev->next_device )
4295                         current_dev = current_dev->next_device;
4296                 current_dev->next_device = info;
4297         }
4298
4299         if ( info->max_frame_size < 4096 )
4300                 info->max_frame_size = 4096;
4301         else if ( info->max_frame_size > 65535 )
4302                 info->max_frame_size = 65535;
4303
4304         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
4305                 printk( "SyncLink PCI v%d %s: IO=%04X IRQ=%d Mem=%08X,%08X MaxFrameSize=%u\n",
4306                         info->hw_version + 1, info->device_name, info->io_base, info->irq_level,
4307                         info->phys_memory_base, info->phys_lcr_base,
4308                         info->max_frame_size );
4309         } else {
4310                 printk( "SyncLink ISA %s: IO=%04X IRQ=%d DMA=%d MaxFrameSize=%u\n",
4311                         info->device_name, info->io_base, info->irq_level, info->dma_level,
4312                         info->max_frame_size );
4313         }
4314
4315 #ifdef CONFIG_HDLC
4316         hdlcdev_init(info);
4317 #endif
4318
4319 }       /* end of mgsl_add_device() */
4320
4321 /* mgsl_allocate_device()
4322  *
4323  *      Allocate and initialize a device instance structure
4324  *
4325  * Arguments:           none
4326  * Return Value:        pointer to mgsl_struct if success, otherwise NULL
4327  */
4328 static struct mgsl_struct* mgsl_allocate_device(void)
4329 {
4330         struct mgsl_struct *info;
4331
4332         info = (struct mgsl_struct *)kmalloc(sizeof(struct mgsl_struct),
4333                  GFP_KERNEL);
4334
4335         if (!info) {
4336                 printk("Error can't allocate device instance data\n");
4337         } else {
4338                 memset(info, 0, sizeof(struct mgsl_struct));
4339                 info->magic = MGSL_MAGIC;
4340                 INIT_WORK(&info->task, mgsl_bh_handler, info);
4341                 info->max_frame_size = 4096;
4342                 info->close_delay = 5*HZ/10;
4343                 info->closing_wait = 30*HZ;
4344                 init_waitqueue_head(&info->open_wait);
4345                 init_waitqueue_head(&info->close_wait);
4346                 init_waitqueue_head(&info->status_event_wait_q);
4347                 init_waitqueue_head(&info->event_wait_q);
4348                 spin_lock_init(&info->irq_spinlock);
4349                 spin_lock_init(&info->netlock);
4350                 memcpy(&info->params,&default_params,sizeof(MGSL_PARAMS));
4351                 info->idle_mode = HDLC_TXIDLE_FLAGS;
4352                 info->num_tx_dma_buffers = 1;
4353                 info->num_tx_holding_buffers = 0;
4354         }
4355
4356         return info;
4357
4358 }       /* end of mgsl_allocate_device()*/
4359
4360 static const struct tty_operations mgsl_ops = {
4361         .open = mgsl_open,
4362         .close = mgsl_close,
4363         .write = mgsl_write,
4364         .put_char = mgsl_put_char,
4365         .flush_chars = mgsl_flush_chars,
4366         .write_room = mgsl_write_room,
4367         .chars_in_buffer = mgsl_chars_in_buffer,
4368         .flush_buffer = mgsl_flush_buffer,
4369         .ioctl = mgsl_ioctl,
4370         .throttle = mgsl_throttle,
4371         .unthrottle = mgsl_unthrottle,
4372         .send_xchar = mgsl_send_xchar,
4373         .break_ctl = mgsl_break,
4374         .wait_until_sent = mgsl_wait_until_sent,
4375         .read_proc = mgsl_read_proc,
4376         .set_termios = mgsl_set_termios,
4377         .stop = mgsl_stop,
4378         .start = mgsl_start,
4379         .hangup = mgsl_hangup,
4380         .tiocmget = tiocmget,
4381         .tiocmset = tiocmset,
4382 };
4383
4384 /*
4385  * perform tty device initialization
4386  */
4387 static int mgsl_init_tty(void)
4388 {
4389         int rc;
4390
4391         serial_driver = alloc_tty_driver(128);
4392         if (!serial_driver)
4393                 return -ENOMEM;
4394
4395         serial_driver->owner = THIS_MODULE;
4396         serial_driver->driver_name = "synclink";
4397         serial_driver->name = "ttySL";
4398         serial_driver->major = ttymajor;
4399         serial_driver->minor_start = 64;
4400         serial_driver->type = TTY_DRIVER_TYPE_SERIAL;
4401         serial_driver->subtype = SERIAL_TYPE_NORMAL;
4402         serial_driver->init_termios = tty_std_termios;
4403         serial_driver->init_termios.c_cflag =
4404                 B9600 | CS8 | CREAD | HUPCL | CLOCAL;
4405         serial_driver->flags = TTY_DRIVER_REAL_RAW;
4406         tty_set_operations(serial_driver, &mgsl_ops);
4407         if ((rc = tty_register_driver(serial_driver)) < 0) {
4408                 printk("%s(%d):Couldn't register serial driver\n",
4409                         __FILE__,__LINE__);
4410                 put_tty_driver(serial_driver);
4411                 serial_driver = NULL;
4412                 return rc;
4413         }
4414
4415         printk("%s %s, tty major#%d\n",
4416                 driver_name, driver_version,
4417                 serial_driver->major);
4418         return 0;
4419 }
4420
4421 /* enumerate user specified ISA adapters
4422  */
4423 static void mgsl_enum_isa_devices(void)
4424 {
4425         struct mgsl_struct *info;
4426         int i;
4427
4428         /* Check for user specified ISA devices */
4429
4430         for (i=0 ;(i < MAX_ISA_DEVICES) && io[i] && irq[i]; i++){
4431                 if ( debug_level >= DEBUG_LEVEL_INFO )
4432                         printk("ISA device specified io=%04X,irq=%d,dma=%d\n",
4433                                 io[i], irq[i], dma[i] );
4434
4435                 info = mgsl_allocate_device();
4436                 if ( !info ) {
4437                         /* error allocating device instance data */
4438                         if ( debug_level >= DEBUG_LEVEL_ERROR )
4439                                 printk( "can't allocate device instance data.\n");
4440                         continue;
4441                 }
4442
4443                 /* Copy user configuration info to device instance data */
4444                 info->io_base = (unsigned int)io[i];
4445                 info->irq_level = (unsigned int)irq[i];
4446                 info->irq_level = irq_canonicalize(info->irq_level);
4447                 info->dma_level = (unsigned int)dma[i];
4448                 info->bus_type = MGSL_BUS_TYPE_ISA;
4449                 info->io_addr_size = 16;
4450                 info->irq_flags = 0;
4451
4452                 mgsl_add_device( info );
4453         }
4454 }
4455
4456 static void synclink_cleanup(void)
4457 {
4458         int rc;
4459         struct mgsl_struct *info;
4460         struct mgsl_struct *tmp;
4461
4462         printk("Unloading %s: %s\n", driver_name, driver_version);
4463
4464         if (serial_driver) {
4465                 if ((rc = tty_unregister_driver(serial_driver)))
4466                         printk("%s(%d) failed to unregister tty driver err=%d\n",
4467                                __FILE__,__LINE__,rc);
4468                 put_tty_driver(serial_driver);
4469         }
4470
4471         info = mgsl_device_list;
4472         while(info) {
4473 #ifdef CONFIG_HDLC
4474                 hdlcdev_exit(info);
4475 #endif
4476                 mgsl_release_resources(info);
4477                 tmp = info;
4478                 info = info->next_device;
4479                 kfree(tmp);
4480         }
4481
4482         if (pci_registered)
4483                 pci_unregister_driver(&synclink_pci_driver);
4484 }
4485
4486 static int __init synclink_init(void)
4487 {
4488         int rc;
4489
4490         if (break_on_load) {
4491                 mgsl_get_text_ptr();
4492                 BREAKPOINT();
4493         }
4494
4495         printk("%s %s\n", driver_name, driver_version);
4496
4497         mgsl_enum_isa_devices();
4498         if ((rc = pci_register_driver(&synclink_pci_driver)) < 0)
4499                 printk("%s:failed to register PCI driver, error=%d\n",__FILE__,rc);
4500         else
4501                 pci_registered = 1;
4502
4503         if ((rc = mgsl_init_tty()) < 0)
4504                 goto error;
4505
4506         return 0;
4507
4508 error:
4509         synclink_cleanup();
4510         return rc;
4511 }
4512
4513 static void __exit synclink_exit(void)
4514 {
4515         synclink_cleanup();
4516 }
4517
4518 module_init(synclink_init);
4519 module_exit(synclink_exit);
4520
4521 /*
4522  * usc_RTCmd()
4523  *
4524  * Issue a USC Receive/Transmit command to the
4525  * Channel Command/Address Register (CCAR).
4526  *
4527  * Notes:
4528  *
4529  *    The command is encoded in the most significant 5 bits <15..11>
4530  *    of the CCAR value. Bits <10..7> of the CCAR must be preserved
4531  *    and Bits <6..0> must be written as zeros.
4532  *
4533  * Arguments:
4534  *
4535  *    info   pointer to device information structure
4536  *    Cmd    command mask (use symbolic macros)
4537  *
4538  * Return Value:
4539  *
4540  *    None
4541  */
4542 static void usc_RTCmd( struct mgsl_struct *info, u16 Cmd )
4543 {
4544         /* output command to CCAR in bits <15..11> */
4545         /* preserve bits <10..7>, bits <6..0> must be zero */
4546
4547         outw( Cmd + info->loopback_bits, info->io_base + CCAR );
4548
4549         /* Read to flush write to CCAR */
4550         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4551                 inw( info->io_base + CCAR );
4552
4553 }       /* end of usc_RTCmd() */
4554
4555 /*
4556  * usc_DmaCmd()
4557  *
4558  *    Issue a DMA command to the DMA Command/Address Register (DCAR).
4559  *
4560  * Arguments:
4561  *
4562  *    info   pointer to device information structure
4563  *    Cmd    DMA command mask (usc_DmaCmd_XX Macros)
4564  *
4565  * Return Value:
4566  *
4567  *       None
4568  */
4569 static void usc_DmaCmd( struct mgsl_struct *info, u16 Cmd )
4570 {
4571         /* write command mask to DCAR */
4572         outw( Cmd + info->mbre_bit, info->io_base );
4573
4574         /* Read to flush write to DCAR */
4575         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4576                 inw( info->io_base );
4577
4578 }       /* end of usc_DmaCmd() */
4579
4580 /*
4581  * usc_OutDmaReg()
4582  *
4583  *    Write a 16-bit value to a USC DMA register
4584  *
4585  * Arguments:
4586  *
4587  *    info      pointer to device info structure
4588  *    RegAddr   register address (number) for write
4589  *    RegValue  16-bit value to write to register
4590  *
4591  * Return Value:
4592  *
4593  *    None
4594  *
4595  */
4596 static void usc_OutDmaReg( struct mgsl_struct *info, u16 RegAddr, u16 RegValue )
4597 {
4598         /* Note: The DCAR is located at the adapter base address */
4599         /* Note: must preserve state of BIT8 in DCAR */
4600
4601         outw( RegAddr + info->mbre_bit, info->io_base );
4602         outw( RegValue, info->io_base );
4603
4604         /* Read to flush write to DCAR */
4605         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4606                 inw( info->io_base );
4607
4608 }       /* end of usc_OutDmaReg() */
4609
4610 /*
4611  * usc_InDmaReg()
4612  *
4613  *    Read a 16-bit value from a DMA register
4614  *
4615  * Arguments:
4616  *
4617  *    info     pointer to device info structure
4618  *    RegAddr  register address (number) to read from
4619  *
4620  * Return Value:
4621  *
4622  *    The 16-bit value read from register
4623  *
4624  */
4625 static u16 usc_InDmaReg( struct mgsl_struct *info, u16 RegAddr )
4626 {
4627         /* Note: The DCAR is located at the adapter base address */
4628         /* Note: must preserve state of BIT8 in DCAR */
4629
4630         outw( RegAddr + info->mbre_bit, info->io_base );
4631         return inw( info->io_base );
4632
4633 }       /* end of usc_InDmaReg() */
4634
4635 /*
4636  *
4637  * usc_OutReg()
4638  *
4639  *    Write a 16-bit value to a USC serial channel register
4640  *
4641  * Arguments:
4642  *
4643  *    info      pointer to device info structure
4644  *    RegAddr   register address (number) to write to
4645  *    RegValue  16-bit value to write to register
4646  *
4647  * Return Value:
4648  *
4649  *    None
4650  *
4651  */
4652 static void usc_OutReg( struct mgsl_struct *info, u16 RegAddr, u16 RegValue )
4653 {
4654         outw( RegAddr + info->loopback_bits, info->io_base + CCAR );
4655         outw( RegValue, info->io_base + CCAR );
4656
4657         /* Read to flush write to CCAR */
4658         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4659                 inw( info->io_base + CCAR );
4660
4661 }       /* end of usc_OutReg() */
4662
4663 /*
4664  * usc_InReg()
4665  *
4666  *    Reads a 16-bit value from a USC serial channel register
4667  *
4668  * Arguments:
4669  *
4670  *    info       pointer to device extension
4671  *    RegAddr    register address (number) to read from
4672  *
4673  * Return Value:
4674  *
4675  *    16-bit value read from register
4676  */
4677 static u16 usc_InReg( struct mgsl_struct *info, u16 RegAddr )
4678 {
4679         outw( RegAddr + info->loopback_bits, info->io_base + CCAR );
4680         return inw( info->io_base + CCAR );
4681
4682 }       /* end of usc_InReg() */
4683
4684 /* usc_set_sdlc_mode()
4685  *
4686  *    Set up the adapter for SDLC DMA communications.
4687  *
4688  * Arguments:           info    pointer to device instance data
4689  * Return Value:        NONE
4690  */
4691 static void usc_set_sdlc_mode( struct mgsl_struct *info )
4692 {
4693         u16 RegValue;
4694         int PreSL1660;
4695
4696         /*
4697          * determine if the IUSC on the adapter is pre-SL1660. If
4698          * not, take advantage of the UnderWait feature of more
4699          * modern chips. If an underrun occurs and this bit is set,
4700          * the transmitter will idle the programmed idle pattern
4701          * until the driver has time to service the underrun. Otherwise,
4702          * the dma controller may get the cycles previously requested
4703          * and begin transmitting queued tx data.
4704          */
4705         usc_OutReg(info,TMCR,0x1f);
4706         RegValue=usc_InReg(info,TMDR);
4707         if ( RegValue == IUSC_PRE_SL1660 )
4708                 PreSL1660 = 1;
4709         else
4710                 PreSL1660 = 0;
4711
4712
4713         if ( info->params.flags & HDLC_FLAG_HDLC_LOOPMODE )
4714         {
4715            /*
4716            ** Channel Mode Register (CMR)
4717            **
4718            ** <15..14>    10    Tx Sub Modes, Send Flag on Underrun
4719            ** <13>        0     0 = Transmit Disabled (initially)
4720            ** <12>        0     1 = Consecutive Idles share common 0
4721            ** <11..8>     1110  Transmitter Mode = HDLC/SDLC Loop
4722            ** <7..4>      0000  Rx Sub Modes, addr/ctrl field handling
4723            ** <3..0>      0110  Receiver Mode = HDLC/SDLC
4724            **
4725            ** 1000 1110 0000 0110 = 0x8e06
4726            */
4727            RegValue = 0x8e06;
4728
4729            /*--------------------------------------------------
4730             * ignore user options for UnderRun Actions and
4731             * preambles
4732             *--------------------------------------------------*/
4733         }
4734         else
4735         {
4736                 /* Channel mode Register (CMR)
4737                  *
4738                  * <15..14>  00    Tx Sub modes, Underrun Action
4739                  * <13>      0     1 = Send Preamble before opening flag
4740                  * <12>      0     1 = Consecutive Idles share common 0
4741                  * <11..8>   0110  Transmitter mode = HDLC/SDLC
4742                  * <7..4>    0000  Rx Sub modes, addr/ctrl field handling
4743                  * <3..0>    0110  Receiver mode = HDLC/SDLC
4744                  *
4745                  * 0000 0110 0000 0110 = 0x0606
4746                  */
4747                 if (info->params.mode == MGSL_MODE_RAW) {
4748                         RegValue = 0x0001;              /* Set Receive mode = external sync */
4749
4750                         usc_OutReg( info, IOCR,         /* Set IOCR DCD is RxSync Detect Input */
4751                                 (unsigned short)((usc_InReg(info, IOCR) & ~(BIT13|BIT12)) | BIT12));
4752
4753                         /*
4754                          * TxSubMode:
4755                          *      CMR <15>                0       Don't send CRC on Tx Underrun
4756                          *      CMR <14>                x       undefined
4757                          *      CMR <13>                0       Send preamble before openning sync
4758                          *      CMR <12>                0       Send 8-bit syncs, 1=send Syncs per TxLength
4759                          *
4760                          * TxMode:
4761                          *      CMR <11-8)      0100    MonoSync
4762                          *
4763                          *      0x00 0100 xxxx xxxx  04xx
4764                          */
4765                         RegValue |= 0x0400;
4766                 }
4767                 else {
4768
4769                 RegValue = 0x0606;
4770
4771                 if ( info->params.flags & HDLC_FLAG_UNDERRUN_ABORT15 )
4772                         RegValue |= BIT14;
4773                 else if ( info->params.flags & HDLC_FLAG_UNDERRUN_FLAG )
4774                         RegValue |= BIT15;
4775                 else if ( info->params.flags & HDLC_FLAG_UNDERRUN_CRC )
4776                         RegValue |= BIT15 + BIT14;
4777                 }
4778
4779                 if ( info->params.preamble != HDLC_PREAMBLE_PATTERN_NONE )
4780                         RegValue |= BIT13;
4781         }
4782
4783         if ( info->params.mode == MGSL_MODE_HDLC &&
4784                 (info->params.flags & HDLC_FLAG_SHARE_ZERO) )
4785                 RegValue |= BIT12;
4786
4787         if ( info->params.addr_filter != 0xff )
4788         {
4789                 /* set up receive address filtering */
4790                 usc_OutReg( info, RSR, info->params.addr_filter );
4791                 RegValue |= BIT4;
4792         }
4793
4794         usc_OutReg( info, CMR, RegValue );
4795         info->cmr_value = RegValue;
4796
4797         /* Receiver mode Register (RMR)
4798          *
4799          * <15..13>  000    encoding
4800          * <12..11>  00     FCS = 16bit CRC CCITT (x15 + x12 + x5 + 1)
4801          * <10>      1      1 = Set CRC to all 1s (use for SDLC/HDLC)
4802          * <9>       0      1 = Include Receive chars in CRC
4803          * <8>       1      1 = Use Abort/PE bit as abort indicator
4804          * <7..6>    00     Even parity
4805          * <5>       0      parity disabled
4806          * <4..2>    000    Receive Char Length = 8 bits
4807          * <1..0>    00     Disable Receiver
4808          *
4809          * 0000 0101 0000 0000 = 0x0500
4810          */
4811
4812         RegValue = 0x0500;
4813
4814         switch ( info->params.encoding ) {
4815         case HDLC_ENCODING_NRZB:               RegValue |= BIT13; break;
4816         case HDLC_ENCODING_NRZI_MARK:          RegValue |= BIT14; break;
4817         case HDLC_ENCODING_NRZI_SPACE:         RegValue |= BIT14 + BIT13; break;
4818         case HDLC_ENCODING_BIPHASE_MARK:       RegValue |= BIT15; break;
4819         case HDLC_ENCODING_BIPHASE_SPACE:      RegValue |= BIT15 + BIT13; break;
4820         case HDLC_ENCODING_BIPHASE_LEVEL:      RegValue |= BIT15 + BIT14; break;
4821         case HDLC_ENCODING_DIFF_BIPHASE_LEVEL: RegValue |= BIT15 + BIT14 + BIT13; break;
4822         }
4823
4824         if ( (info->params.crc_type & HDLC_CRC_MASK) == HDLC_CRC_16_CCITT )
4825                 RegValue |= BIT9;
4826         else if ( (info->params.crc_type & HDLC_CRC_MASK) == HDLC_CRC_32_CCITT )
4827                 RegValue |= ( BIT12 | BIT10 | BIT9 );
4828
4829         usc_OutReg( info, RMR, RegValue );
4830
4831         /* Set the Receive count Limit Register (RCLR) to 0xffff. */
4832         /* When an opening flag of an SDLC frame is recognized the */
4833         /* Receive Character count (RCC) is loaded with the value in */
4834         /* RCLR. The RCC is decremented for each received byte.  The */
4835         /* value of RCC is stored after the closing flag of the frame */
4836         /* allowing the frame size to be computed. */
4837
4838         usc_OutReg( info, RCLR, RCLRVALUE );
4839
4840         usc_RCmd( info, RCmd_SelectRicrdma_level );
4841
4842         /* Receive Interrupt Control Register (RICR)
4843          *
4844          * <15..8>      ?       RxFIFO DMA Request Level
4845          * <7>          0       Exited Hunt IA (Interrupt Arm)
4846          * <6>          0       Idle Received IA
4847          * <5>          0       Break/Abort IA
4848          * <4>          0       Rx Bound IA
4849          * <3>          1       Queued status reflects oldest 2 bytes in FIFO
4850          * <2>          0       Abort/PE IA
4851          * <1>          1       Rx Overrun IA
4852          * <0>          0       Select TC0 value for readback
4853          *
4854          *      0000 0000 0000 1000 = 0x000a
4855          */
4856
4857         /* Carry over the Exit Hunt and Idle Received bits */
4858         /* in case they have been armed by usc_ArmEvents.   */
4859
4860         RegValue = usc_InReg( info, RICR ) & 0xc0;
4861
4862         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4863                 usc_OutReg( info, RICR, (u16)(0x030a | RegValue) );
4864         else
4865                 usc_OutReg( info, RICR, (u16)(0x140a | RegValue) );
4866
4867         /* Unlatch all Rx status bits and clear Rx status IRQ Pending */
4868
4869         usc_UnlatchRxstatusBits( info, RXSTATUS_ALL );
4870         usc_ClearIrqPendingBits( info, RECEIVE_STATUS );
4871
4872         /* Transmit mode Register (TMR)
4873          *
4874          * <15..13>     000     encoding
4875          * <12..11>     00      FCS = 16bit CRC CCITT (x15 + x12 + x5 + 1)
4876          * <10>         1       1 = Start CRC as all 1s (use for SDLC/HDLC)
4877          * <9>          0       1 = Tx CRC Enabled
4878          * <8>          0       1 = Append CRC to end of transmit frame
4879          * <7..6>       00      Transmit parity Even
4880          * <5>          0       Transmit parity Disabled
4881          * <4..2>       000     Tx Char Length = 8 bits
4882          * <1..0>       00      Disable Transmitter
4883          *
4884          *      0000 0100 0000 0000 = 0x0400
4885          */
4886
4887         RegValue = 0x0400;
4888
4889         switch ( info->params.encoding ) {
4890         case HDLC_ENCODING_NRZB:               RegValue |= BIT13; break;
4891         case HDLC_ENCODING_NRZI_MARK:          RegValue |= BIT14; break;
4892         case HDLC_ENCODING_NRZI_SPACE:         RegValue |= BIT14 + BIT13; break;
4893         case HDLC_ENCODING_BIPHASE_MARK:       RegValue |= BIT15; break;
4894         case HDLC_ENCODING_BIPHASE_SPACE:      RegValue |= BIT15 + BIT13; break;
4895         case HDLC_ENCODING_BIPHASE_LEVEL:      RegValue |= BIT15 + BIT14; break;
4896         case HDLC_ENCODING_DIFF_BIPHASE_LEVEL: RegValue |= BIT15 + BIT14 + BIT13; break;
4897         }
4898
4899         if ( (info->params.crc_type & HDLC_CRC_MASK) == HDLC_CRC_16_CCITT )
4900                 RegValue |= BIT9 + BIT8;
4901         else if ( (info->params.crc_type & HDLC_CRC_MASK) == HDLC_CRC_32_CCITT )
4902                 RegValue |= ( BIT12 | BIT10 | BIT9 | BIT8);
4903
4904         usc_OutReg( info, TMR, RegValue );
4905
4906         usc_set_txidle( info );
4907
4908
4909         usc_TCmd( info, TCmd_SelectTicrdma_level );
4910
4911         /* Transmit Interrupt Control Register (TICR)
4912          *
4913          * <15..8>      ?       Transmit FIFO DMA Level
4914          * <7>          0       Present IA (Interrupt Arm)
4915          * <6>          0       Idle Sent IA
4916          * <5>          1       Abort Sent IA
4917          * <4>          1       EOF/EOM Sent IA
4918          * <3>          0       CRC Sent IA
4919          * <2>          1       1 = Wait for SW Trigger to Start Frame
4920          * <1>          1       Tx Underrun IA
4921          * <0>          0       TC0 constant on read back
4922          *
4923          *      0000 0000 0011 0110 = 0x0036
4924          */
4925
4926         if ( info->bus_type == MGSL_BUS_TYPE_PCI )
4927                 usc_OutReg( info, TICR, 0x0736 );
4928         else
4929                 usc_OutReg( info, TICR, 0x1436 );
4930
4931         usc_UnlatchTxstatusBits( info, TXSTATUS_ALL );
4932         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS );
4933
4934         /*
4935         ** Transmit Command/Status Register (TCSR)
4936         **
4937         ** <15..12>     0000    TCmd
4938         ** <11>         0/1     UnderWait
4939         ** <10..08>     000     TxIdle
4940         ** <7>          x       PreSent
4941         ** <6>          x       IdleSent
4942         ** <5>          x       AbortSent
4943         ** <4>          x       EOF/EOM Sent
4944         ** <3>          x       CRC Sent
4945         ** <2>          x       All Sent
4946         ** <1>          x       TxUnder
4947         ** <0>          x       TxEmpty
4948         **
4949         ** 0000 0000 0000 0000 = 0x0000
4950         */
4951         info->tcsr_value = 0;
4952
4953         if ( !PreSL1660 )
4954                 info->tcsr_value |= TCSR_UNDERWAIT;
4955
4956         usc_OutReg( info, TCSR, info->tcsr_value );
4957
4958         /* Clock mode Control Register (CMCR)
4959          *
4960          * <15..14>     00      counter 1 Source = Disabled
4961          * <13..12>     00      counter 0 Source = Disabled
4962          * <11..10>     11      BRG1 Input is TxC Pin
4963          * <9..8>       11      BRG0 Input is TxC Pin
4964          * <7..6>       01      DPLL Input is BRG1 Output
4965          * <5..3>       XXX     TxCLK comes from Port 0
4966          * <2..0>       XXX     RxCLK comes from Port 1
4967          *
4968          *      0000 1111 0111 0111 = 0x0f77
4969          */
4970
4971         RegValue = 0x0f40;
4972
4973         if ( info->params.flags & HDLC_FLAG_RXC_DPLL )
4974                 RegValue |= 0x0003;     /* RxCLK from DPLL */
4975         else if ( info->params.flags & HDLC_FLAG_RXC_BRG )
4976                 RegValue |= 0x0004;     /* RxCLK from BRG0 */
4977         else if ( info->params.flags & HDLC_FLAG_RXC_TXCPIN)
4978                 RegValue |= 0x0006;     /* RxCLK from TXC Input */
4979         else
4980                 RegValue |= 0x0007;     /* RxCLK from Port1 */
4981
4982         if ( info->params.flags & HDLC_FLAG_TXC_DPLL )
4983                 RegValue |= 0x0018;     /* TxCLK from DPLL */
4984         else if ( info->params.flags & HDLC_FLAG_TXC_BRG )
4985                 RegValue |= 0x0020;     /* TxCLK from BRG0 */
4986         else if ( info->params.flags & HDLC_FLAG_TXC_RXCPIN)
4987                 RegValue |= 0x0038;     /* RxCLK from TXC Input */
4988         else
4989                 RegValue |= 0x0030;     /* TxCLK from Port0 */
4990
4991         usc_OutReg( info, CMCR, RegValue );
4992
4993
4994         /* Hardware Configuration Register (HCR)
4995          *
4996          * <15..14>     00      CTR0 Divisor:00=32,01=16,10=8,11=4
4997          * <13>         0       CTR1DSel:0=CTR0Div determines CTR0Div
4998          * <12>         0       CVOK:0=report code violation in biphase
4999          * <11..10>     00      DPLL Divisor:00=32,01=16,10=8,11=4
5000          * <9..8>       XX      DPLL mode:00=disable,01=NRZ,10=Biphase,11=Biphase Level
5001          * <7..6>       00      reserved
5002          * <5>          0       BRG1 mode:0=continuous,1=single cycle
5003          * <4>          X       BRG1 Enable
5004          * <3..2>       00      reserved
5005          * <1>          0       BRG0 mode:0=continuous,1=single cycle
5006          * <0>          0       BRG0 Enable
5007          */
5008
5009         RegValue = 0x0000;
5010
5011         if ( info->params.flags & (HDLC_FLAG_RXC_DPLL + HDLC_FLAG_TXC_DPLL) ) {
5012                 u32 XtalSpeed;
5013                 u32 DpllDivisor;
5014                 u16 Tc;
5015
5016                 /*  DPLL is enabled. Use BRG1 to provide continuous reference clock  */
5017                 /*  for DPLL. DPLL mode in HCR is dependent on the encoding used. */
5018
5019                 if ( info->bus_type == MGSL_BUS_TYPE_PCI )
5020                         XtalSpeed = 11059200;
5021                 else
5022                         XtalSpeed = 14745600;
5023
5024                 if ( info->params.flags & HDLC_FLAG_DPLL_DIV16 ) {
5025                         DpllDivisor = 16;
5026                         RegValue |= BIT10;
5027                 }
5028                 else if ( info->params.flags & HDLC_FLAG_DPLL_DIV8 ) {
5029                         DpllDivisor = 8;
5030                         RegValue |= BIT11;
5031                 }
5032                 else
5033                         DpllDivisor = 32;
5034
5035                 /*  Tc = (Xtal/Speed) - 1 */
5036                 /*  If twice the remainder of (Xtal/Speed) is greater than Speed */
5037                 /*  then rounding up gives a more precise time constant. Instead */
5038                 /*  of rounding up and then subtracting 1 we just don't subtract */
5039                 /*  the one in this case. */
5040
5041                 /*--------------------------------------------------
5042                  * ejz: for DPLL mode, application should use the
5043                  * same clock speed as the partner system, even
5044                  * though clocking is derived from the input RxData.
5045                  * In case the user uses a 0 for the clock speed,
5046                  * default to 0xffffffff and don't try to divide by
5047                  * zero
5048                  *--------------------------------------------------*/
5049                 if ( info->params.clock_speed )
5050                 {
5051                         Tc = (u16)((XtalSpeed/DpllDivisor)/info->params.clock_speed);
5052                         if ( !((((XtalSpeed/DpllDivisor) % info->params.clock_speed) * 2)
5053                                / info->params.clock_speed) )
5054                                 Tc--;
5055                 }
5056                 else
5057                         Tc = -1;
5058
5059
5060                 /* Write 16-bit Time Constant for BRG1 */
5061                 usc_OutReg( info, TC1R, Tc );
5062
5063                 RegValue |= BIT4;               /* enable BRG1 */
5064
5065                 switch ( info->params.encoding ) {
5066                 case HDLC_ENCODING_NRZ:
5067                 case HDLC_ENCODING_NRZB:
5068                 case HDLC_ENCODING_NRZI_MARK:
5069                 case HDLC_ENCODING_NRZI_SPACE: RegValue |= BIT8; break;
5070                 case HDLC_ENCODING_BIPHASE_MARK:
5071                 case HDLC_ENCODING_BIPHASE_SPACE: RegValue |= BIT9; break;
5072                 case HDLC_ENCODING_BIPHASE_LEVEL:
5073                 case HDLC_ENCODING_DIFF_BIPHASE_LEVEL: RegValue |= BIT9 + BIT8; break;
5074                 }
5075         }
5076
5077         usc_OutReg( info, HCR, RegValue );
5078
5079
5080         /* Channel Control/status Register (CCSR)
5081          *
5082          * <15>         X       RCC FIFO Overflow status (RO)
5083          * <14>         X       RCC FIFO Not Empty status (RO)
5084          * <13>         0       1 = Clear RCC FIFO (WO)
5085          * <12>         X       DPLL Sync (RW)
5086          * <11>         X       DPLL 2 Missed Clocks status (RO)
5087          * <10>         X       DPLL 1 Missed Clock status (RO)
5088          * <9..8>       00      DPLL Resync on rising and falling edges (RW)
5089          * <7>          X       SDLC Loop On status (RO)
5090          * <6>          X       SDLC Loop Send status (RO)
5091          * <5>          1       Bypass counters for TxClk and RxClk (RW)
5092          * <4..2>       000     Last Char of SDLC frame has 8 bits (RW)
5093          * <1..0>       00      reserved
5094          *
5095          *      0000 0000 0010 0000 = 0x0020
5096          */
5097
5098         usc_OutReg( info, CCSR, 0x1020 );
5099
5100
5101         if ( info->params.flags & HDLC_FLAG_AUTO_CTS ) {
5102                 usc_OutReg( info, SICR,
5103                             (u16)(usc_InReg(info,SICR) | SICR_CTS_INACTIVE) );
5104         }
5105
5106
5107         /* enable Master Interrupt Enable bit (MIE) */
5108         usc_EnableMasterIrqBit( info );
5109
5110         usc_ClearIrqPendingBits( info, RECEIVE_STATUS + RECEIVE_DATA +
5111                                 TRANSMIT_STATUS + TRANSMIT_DATA + MISC);
5112
5113         /* arm RCC underflow interrupt */
5114         usc_OutReg(info, SICR, (u16)(usc_InReg(info,SICR) | BIT3));
5115         usc_EnableInterrupts(info, MISC);
5116
5117         info->mbre_bit = 0;
5118         outw( 0, info->io_base );                       /* clear Master Bus Enable (DCAR) */
5119         usc_DmaCmd( info, DmaCmd_ResetAllChannels );    /* disable both DMA channels */
5120         info->mbre_bit = BIT8;
5121         outw( BIT8, info->io_base );                    /* set Master Bus Enable (DCAR) */
5122
5123         if (info->bus_type == MGSL_BUS_TYPE_ISA) {
5124                 /* Enable DMAEN (Port 7, Bit 14) */
5125                 /* This connects the DMA request signal to the ISA bus */
5126                 usc_OutReg(info, PCR, (u16)((usc_InReg(info, PCR) | BIT15) & ~BIT14));
5127         }
5128
5129         /* DMA Control Register (DCR)
5130          *
5131          * <15..14>     10      Priority mode = Alternating Tx/Rx
5132          *              01      Rx has priority
5133          *              00      Tx has priority
5134          *
5135          * <13>         1       Enable Priority Preempt per DCR<15..14>
5136          *                      (WARNING DCR<11..10> must be 00 when this is 1)
5137          *              0       Choose activate channel per DCR<11..10>
5138          *
5139          * <12>         0       Little Endian for Array/List
5140          * <11..10>     00      Both Channels can use each bus grant
5141          * <9..6>       0000    reserved
5142          * <5>          0       7 CLK - Minimum Bus Re-request Interval
5143          * <4>          0       1 = drive D/C and S/D pins
5144          * <3>          1       1 = Add one wait state to all DMA cycles.
5145          * <2>          0       1 = Strobe /UAS on every transfer.
5146          * <1..0>       11      Addr incrementing only affects LS24 bits
5147          *
5148          *      0110 0000 0000 1011 = 0x600b
5149          */
5150
5151         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
5152                 /* PCI adapter does not need DMA wait state */
5153                 usc_OutDmaReg( info, DCR, 0xa00b );
5154         }
5155         else
5156                 usc_OutDmaReg( info, DCR, 0x800b );
5157
5158
5159         /* Receive DMA mode Register (RDMR)
5160          *
5161          * <15..14>     11      DMA mode = Linked List Buffer mode
5162          * <13>         1       RSBinA/L = store Rx status Block in Arrary/List entry
5163          * <12>         1       Clear count of List Entry after fetching
5164          * <11..10>     00      Address mode = Increment
5165          * <9>          1       Terminate Buffer on RxBound
5166          * <8>          0       Bus Width = 16bits
5167          * <7..0>       ?       status Bits (write as 0s)
5168          *
5169          * 1111 0010 0000 0000 = 0xf200
5170          */
5171
5172         usc_OutDmaReg( info, RDMR, 0xf200 );
5173
5174
5175         /* Transmit DMA mode Register (TDMR)
5176          *
5177          * <15..14>     11      DMA mode = Linked List Buffer mode
5178          * <13>         1       TCBinA/L = fetch Tx Control Block from List entry
5179          * <12>         1       Clear count of List Entry after fetching
5180          * <11..10>     00      Address mode = Increment
5181          * <9>          1       Terminate Buffer on end of frame
5182          * <8>          0       Bus Width = 16bits
5183          * <7..0>       ?       status Bits (Read Only so write as 0)
5184          *
5185          *      1111 0010 0000 0000 = 0xf200
5186          */
5187
5188         usc_OutDmaReg( info, TDMR, 0xf200 );
5189
5190
5191         /* DMA Interrupt Control Register (DICR)
5192          *
5193          * <15>         1       DMA Interrupt Enable
5194          * <14>         0       1 = Disable IEO from USC
5195          * <13>         0       1 = Don't provide vector during IntAck
5196          * <12>         1       1 = Include status in Vector
5197          * <10..2>      0       reserved, Must be 0s
5198          * <1>          0       1 = Rx DMA Interrupt Enabled
5199          * <0>          0       1 = Tx DMA Interrupt Enabled
5200          *
5201          *      1001 0000 0000 0000 = 0x9000
5202          */
5203
5204         usc_OutDmaReg( info, DICR, 0x9000 );
5205
5206         usc_InDmaReg( info, RDMR );             /* clear pending receive DMA IRQ bits */
5207         usc_InDmaReg( info, TDMR );             /* clear pending transmit DMA IRQ bits */
5208         usc_OutDmaReg( info, CDIR, 0x0303 );    /* clear IUS and Pending for Tx and Rx */
5209
5210         /* Channel Control Register (CCR)
5211          *
5212          * <15..14>     10      Use 32-bit Tx Control Blocks (TCBs)
5213          * <13>         0       Trigger Tx on SW Command Disabled
5214          * <12>         0       Flag Preamble Disabled
5215          * <11..10>     00      Preamble Length
5216          * <9..8>       00      Preamble Pattern
5217          * <7..6>       10      Use 32-bit Rx status Blocks (RSBs)
5218          * <5>          0       Trigger Rx on SW Command Disabled
5219          * <4..0>       0       reserved
5220          *
5221          *      1000 0000 1000 0000 = 0x8080
5222          */
5223
5224         RegValue = 0x8080;
5225
5226         switch ( info->params.preamble_length ) {
5227         case HDLC_PREAMBLE_LENGTH_16BITS: RegValue |= BIT10; break;
5228         case HDLC_PREAMBLE_LENGTH_32BITS: RegValue |= BIT11; break;
5229         case HDLC_PREAMBLE_LENGTH_64BITS: RegValue |= BIT11 + BIT10; break;
5230         }
5231
5232         switch ( info->params.preamble ) {
5233         case HDLC_PREAMBLE_PATTERN_FLAGS: RegValue |= BIT8 + BIT12; break;
5234         case HDLC_PREAMBLE_PATTERN_ONES:  RegValue |= BIT8; break;
5235         case HDLC_PREAMBLE_PATTERN_10:    RegValue |= BIT9; break;
5236         case HDLC_PREAMBLE_PATTERN_01:    RegValue |= BIT9 + BIT8; break;
5237         }
5238
5239         usc_OutReg( info, CCR, RegValue );
5240
5241
5242         /*
5243          * Burst/Dwell Control Register
5244          *
5245          * <15..8>      0x20    Maximum number of transfers per bus grant
5246          * <7..0>       0x00    Maximum number of clock cycles per bus grant
5247          */
5248
5249         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
5250                 /* don't limit bus occupancy on PCI adapter */
5251                 usc_OutDmaReg( info, BDCR, 0x0000 );
5252         }
5253         else
5254                 usc_OutDmaReg( info, BDCR, 0x2000 );
5255
5256         usc_stop_transmitter(info);
5257         usc_stop_receiver(info);
5258
5259 }       /* end of usc_set_sdlc_mode() */
5260
5261 /* usc_enable_loopback()
5262  *
5263  * Set the 16C32 for internal loopback mode.
5264  * The TxCLK and RxCLK signals are generated from the BRG0 and
5265  * the TxD is looped back to the RxD internally.
5266  *
5267  * Arguments:           info    pointer to device instance data
5268  *                      enable  1 = enable loopback, 0 = disable
5269  * Return Value:        None
5270  */
5271 static void usc_enable_loopback(struct mgsl_struct *info, int enable)
5272 {
5273         if (enable) {
5274                 /* blank external TXD output */
5275                 usc_OutReg(info,IOCR,usc_InReg(info,IOCR) | (BIT7+BIT6));
5276
5277                 /* Clock mode Control Register (CMCR)
5278                  *
5279                  * <15..14>     00      counter 1 Disabled
5280                  * <13..12>     00      counter 0 Disabled
5281                  * <11..10>     11      BRG1 Input is TxC Pin
5282                  * <9..8>       11      BRG0 Input is TxC Pin
5283                  * <7..6>       01      DPLL Input is BRG1 Output
5284                  * <5..3>       100     TxCLK comes from BRG0
5285                  * <2..0>       100     RxCLK comes from BRG0
5286                  *
5287                  * 0000 1111 0110 0100 = 0x0f64
5288                  */
5289
5290                 usc_OutReg( info, CMCR, 0x0f64 );
5291
5292                 /* Write 16-bit Time Constant for BRG0 */
5293                 /* use clock speed if available, otherwise use 8 for diagnostics */
5294                 if (info->params.clock_speed) {
5295                         if (info->bus_type == MGSL_BUS_TYPE_PCI)
5296                                 usc_OutReg(info, TC0R, (u16)((11059200/info->params.clock_speed)-1));
5297                         else
5298                                 usc_OutReg(info, TC0R, (u16)((14745600/info->params.clock_speed)-1));
5299                 } else
5300                         usc_OutReg(info, TC0R, (u16)8);
5301
5302                 /* Hardware Configuration Register (HCR) Clear Bit 1, BRG0
5303                    mode = Continuous Set Bit 0 to enable BRG0.  */
5304                 usc_OutReg( info, HCR, (u16)((usc_InReg( info, HCR ) & ~BIT1) | BIT0) );
5305
5306                 /* Input/Output Control Reg, <2..0> = 100, Drive RxC pin with BRG0 */
5307                 usc_OutReg(info, IOCR, (u16)((usc_InReg(info, IOCR) & 0xfff8) | 0x0004));
5308
5309                 /* set Internal Data loopback mode */
5310                 info->loopback_bits = 0x300;
5311                 outw( 0x0300, info->io_base + CCAR );
5312         } else {
5313                 /* enable external TXD output */
5314                 usc_OutReg(info,IOCR,usc_InReg(info,IOCR) & ~(BIT7+BIT6));
5315
5316                 /* clear Internal Data loopback mode */
5317                 info->loopback_bits = 0;
5318                 outw( 0,info->io_base + CCAR );
5319         }
5320
5321 }       /* end of usc_enable_loopback() */
5322
5323 /* usc_enable_aux_clock()
5324  *
5325  * Enabled the AUX clock output at the specified frequency.
5326  *
5327  * Arguments:
5328  *
5329  *      info            pointer to device extension
5330  *      data_rate       data rate of clock in bits per second
5331  *                      A data rate of 0 disables the AUX clock.
5332  *
5333  * Return Value:        None
5334  */
5335 static void usc_enable_aux_clock( struct mgsl_struct *info, u32 data_rate )
5336 {
5337         u32 XtalSpeed;
5338         u16 Tc;
5339
5340         if ( data_rate ) {
5341                 if ( info->bus_type == MGSL_BUS_TYPE_PCI )
5342                         XtalSpeed = 11059200;
5343                 else
5344                         XtalSpeed = 14745600;
5345
5346
5347                 /* Tc = (Xtal/Speed) - 1 */
5348                 /* If twice the remainder of (Xtal/Speed) is greater than Speed */
5349                 /* then rounding up gives a more precise time constant. Instead */
5350                 /* of rounding up and then subtracting 1 we just don't subtract */
5351                 /* the one in this case. */
5352
5353
5354                 Tc = (u16)(XtalSpeed/data_rate);
5355                 if ( !(((XtalSpeed % data_rate) * 2) / data_rate) )
5356                         Tc--;
5357
5358                 /* Write 16-bit Time Constant for BRG0 */
5359                 usc_OutReg( info, TC0R, Tc );
5360
5361                 /*
5362                  * Hardware Configuration Register (HCR)
5363                  * Clear Bit 1, BRG0 mode = Continuous
5364                  * Set Bit 0 to enable BRG0.
5365                  */
5366
5367                 usc_OutReg( info, HCR, (u16)((usc_InReg( info, HCR ) & ~BIT1) | BIT0) );
5368
5369                 /* Input/Output Control Reg, <2..0> = 100, Drive RxC pin with BRG0 */
5370                 usc_OutReg( info, IOCR, (u16)((usc_InReg(info, IOCR) & 0xfff8) | 0x0004) );
5371         } else {
5372                 /* data rate == 0 so turn off BRG0 */
5373                 usc_OutReg( info, HCR, (u16)(usc_InReg( info, HCR ) & ~BIT0) );
5374         }
5375
5376 }       /* end of usc_enable_aux_clock() */
5377
5378 /*
5379  *
5380  * usc_process_rxoverrun_sync()
5381  *
5382  *              This function processes a receive overrun by resetting the
5383  *              receive DMA buffers and issuing a Purge Rx FIFO command
5384  *              to allow the receiver to continue receiving.
5385  *
5386  * Arguments:
5387  *
5388  *      info            pointer to device extension
5389  *
5390  * Return Value: None
5391  */
5392 static void usc_process_rxoverrun_sync( struct mgsl_struct *info )
5393 {
5394         int start_index;
5395         int end_index;
5396         int frame_start_index;
5397         int start_of_frame_found = FALSE;
5398         int end_of_frame_found = FALSE;
5399         int reprogram_dma = FALSE;
5400
5401         DMABUFFERENTRY *buffer_list = info->rx_buffer_list;
5402         u32 phys_addr;
5403
5404         usc_DmaCmd( info, DmaCmd_PauseRxChannel );
5405         usc_RCmd( info, RCmd_EnterHuntmode );
5406         usc_RTCmd( info, RTCmd_PurgeRxFifo );
5407
5408         /* CurrentRxBuffer points to the 1st buffer of the next */
5409         /* possibly available receive frame. */
5410
5411         frame_start_index = start_index = end_index = info->current_rx_buffer;
5412
5413         /* Search for an unfinished string of buffers. This means */
5414         /* that a receive frame started (at least one buffer with */
5415         /* count set to zero) but there is no terminiting buffer */
5416         /* (status set to non-zero). */
5417
5418         while( !buffer_list[end_index].count )
5419         {
5420                 /* Count field has been reset to zero by 16C32. */
5421                 /* This buffer is currently in use. */
5422
5423                 if ( !start_of_frame_found )
5424                 {
5425                         start_of_frame_found = TRUE;
5426                         frame_start_index = end_index;
5427                         end_of_frame_found = FALSE;
5428                 }
5429
5430                 if ( buffer_list[end_index].status )
5431                 {
5432                         /* Status field has been set by 16C32. */
5433                         /* This is the last buffer of a received frame. */
5434
5435                         /* We want to leave the buffers for this frame intact. */
5436                         /* Move on to next possible frame. */
5437
5438                         start_of_frame_found = FALSE;
5439                         end_of_frame_found = TRUE;
5440                 }
5441
5442                 /* advance to next buffer entry in linked list */
5443                 end_index++;
5444                 if ( end_index == info->rx_buffer_count )
5445                         end_index = 0;
5446
5447                 if ( start_index == end_index )
5448                 {
5449                         /* The entire list has been searched with all Counts == 0 and */
5450                         /* all Status == 0. The receive buffers are */
5451                         /* completely screwed, reset all receive buffers! */
5452                         mgsl_reset_rx_dma_buffers( info );
5453                         frame_start_index = 0;
5454                         start_of_frame_found = FALSE;
5455                         reprogram_dma = TRUE;
5456                         break;
5457                 }
5458         }
5459
5460         if ( start_of_frame_found && !end_of_frame_found )
5461         {
5462                 /* There is an unfinished string of receive DMA buffers */
5463                 /* as a result of the receiver overrun. */
5464
5465                 /* Reset the buffers for the unfinished frame */
5466                 /* and reprogram the receive DMA controller to start */
5467                 /* at the 1st buffer of unfinished frame. */
5468
5469                 start_index = frame_start_index;
5470
5471                 do
5472                 {
5473                         *((unsigned long *)&(info->rx_buffer_list[start_index++].count)) = DMABUFFERSIZE;
5474
5475                         /* Adjust index for wrap around. */
5476                         if ( start_index == info->rx_buffer_count )
5477                                 start_index = 0;
5478
5479                 } while( start_index != end_index );
5480
5481                 reprogram_dma = TRUE;
5482         }
5483
5484         if ( reprogram_dma )
5485         {
5486                 usc_UnlatchRxstatusBits(info,RXSTATUS_ALL);
5487                 usc_ClearIrqPendingBits(info, RECEIVE_DATA|RECEIVE_STATUS);
5488                 usc_UnlatchRxstatusBits(info, RECEIVE_DATA|RECEIVE_STATUS);
5489
5490                 usc_EnableReceiver(info,DISABLE_UNCONDITIONAL);
5491
5492                 /* This empties the receive FIFO and loads the RCC with RCLR */
5493                 usc_OutReg( info, CCSR, (u16)(usc_InReg(info,CCSR) | BIT13) );
5494
5495                 /* program 16C32 with physical address of 1st DMA buffer entry */
5496                 phys_addr = info->rx_buffer_list[frame_start_index].phys_entry;
5497                 usc_OutDmaReg( info, NRARL, (u16)phys_addr );
5498                 usc_OutDmaReg( info, NRARU, (u16)(phys_addr >> 16) );
5499
5500                 usc_UnlatchRxstatusBits( info, RXSTATUS_ALL );
5501                 usc_ClearIrqPendingBits( info, RECEIVE_DATA + RECEIVE_STATUS );
5502                 usc_EnableInterrupts( info, RECEIVE_STATUS );
5503
5504                 /* 1. Arm End of Buffer (EOB) Receive DMA Interrupt (BIT2 of RDIAR) */
5505                 /* 2. Enable Receive DMA Interrupts (BIT1 of DICR) */
5506
5507                 usc_OutDmaReg( info, RDIAR, BIT3 + BIT2 );
5508                 usc_OutDmaReg( info, DICR, (u16)(usc_InDmaReg(info,DICR) | BIT1) );
5509                 usc_DmaCmd( info, DmaCmd_InitRxChannel );
5510                 if ( info->params.flags & HDLC_FLAG_AUTO_DCD )
5511                         usc_EnableReceiver(info,ENABLE_AUTO_DCD);
5512                 else
5513                         usc_EnableReceiver(info,ENABLE_UNCONDITIONAL);
5514         }
5515         else
5516         {
5517                 /* This empties the receive FIFO and loads the RCC with RCLR */
5518                 usc_OutReg( info, CCSR, (u16)(usc_InReg(info,CCSR) | BIT13) );
5519                 usc_RTCmd( info, RTCmd_PurgeRxFifo );
5520         }
5521
5522 }       /* end of usc_process_rxoverrun_sync() */
5523
5524 /* usc_stop_receiver()
5525  *
5526  *      Disable USC receiver
5527  *
5528  * Arguments:           info    pointer to device instance data
5529  * Return Value:        None
5530  */
5531 static void usc_stop_receiver( struct mgsl_struct *info )
5532 {
5533         if (debug_level >= DEBUG_LEVEL_ISR)
5534                 printk("%s(%d):usc_stop_receiver(%s)\n",
5535                          __FILE__,__LINE__, info->device_name );
5536
5537         /* Disable receive DMA channel. */
5538         /* This also disables receive DMA channel interrupts */
5539         usc_DmaCmd( info, DmaCmd_ResetRxChannel );
5540
5541         usc_UnlatchRxstatusBits( info, RXSTATUS_ALL );
5542         usc_ClearIrqPendingBits( info, RECEIVE_DATA + RECEIVE_STATUS );
5543         usc_DisableInterrupts( info, RECEIVE_DATA + RECEIVE_STATUS );
5544
5545         usc_EnableReceiver(info,DISABLE_UNCONDITIONAL);
5546
5547         /* This empties the receive FIFO and loads the RCC with RCLR */
5548         usc_OutReg( info, CCSR, (u16)(usc_InReg(info,CCSR) | BIT13) );
5549         usc_RTCmd( info, RTCmd_PurgeRxFifo );
5550
5551         info->rx_enabled = 0;
5552         info->rx_overflow = 0;
5553         info->rx_rcc_underrun = 0;
5554
5555 }       /* end of stop_receiver() */
5556
5557 /* usc_start_receiver()
5558  *
5559  *      Enable the USC receiver
5560  *
5561  * Arguments:           info    pointer to device instance data
5562  * Return Value:        None
5563  */
5564 static void usc_start_receiver( struct mgsl_struct *info )
5565 {
5566         u32 phys_addr;
5567
5568         if (debug_level >= DEBUG_LEVEL_ISR)
5569                 printk("%s(%d):usc_start_receiver(%s)\n",
5570                          __FILE__,__LINE__, info->device_name );
5571
5572         mgsl_reset_rx_dma_buffers( info );
5573         usc_stop_receiver( info );
5574
5575         usc_OutReg( info, CCSR, (u16)(usc_InReg(info,CCSR) | BIT13) );
5576         usc_RTCmd( info, RTCmd_PurgeRxFifo );
5577
5578         if ( info->params.mode == MGSL_MODE_HDLC ||
5579                 info->params.mode == MGSL_MODE_RAW ) {
5580                 /* DMA mode Transfers */
5581                 /* Program the DMA controller. */
5582                 /* Enable the DMA controller end of buffer interrupt. */
5583
5584                 /* program 16C32 with physical address of 1st DMA buffer entry */
5585                 phys_addr = info->rx_buffer_list[0].phys_entry;
5586                 usc_OutDmaReg( info, NRARL, (u16)phys_addr );
5587                 usc_OutDmaReg( info, NRARU, (u16)(phys_addr >> 16) );
5588
5589                 usc_UnlatchRxstatusBits( info, RXSTATUS_ALL );
5590                 usc_ClearIrqPendingBits( info, RECEIVE_DATA + RECEIVE_STATUS );
5591                 usc_EnableInterrupts( info, RECEIVE_STATUS );
5592
5593                 /* 1. Arm End of Buffer (EOB) Receive DMA Interrupt (BIT2 of RDIAR) */
5594                 /* 2. Enable Receive DMA Interrupts (BIT1 of DICR) */
5595
5596                 usc_OutDmaReg( info, RDIAR, BIT3 + BIT2 );
5597                 usc_OutDmaReg( info, DICR, (u16)(usc_InDmaReg(info,DICR) | BIT1) );
5598                 usc_DmaCmd( info, DmaCmd_InitRxChannel );
5599                 if ( info->params.flags & HDLC_FLAG_AUTO_DCD )
5600                         usc_EnableReceiver(info,ENABLE_AUTO_DCD);
5601                 else
5602                         usc_EnableReceiver(info,ENABLE_UNCONDITIONAL);
5603         } else {
5604                 usc_UnlatchRxstatusBits(info, RXSTATUS_ALL);
5605                 usc_ClearIrqPendingBits(info, RECEIVE_DATA + RECEIVE_STATUS);
5606                 usc_EnableInterrupts(info, RECEIVE_DATA);
5607
5608                 usc_RTCmd( info, RTCmd_PurgeRxFifo );
5609                 usc_RCmd( info, RCmd_EnterHuntmode );
5610
5611                 usc_EnableReceiver(info,ENABLE_UNCONDITIONAL);
5612         }
5613
5614         usc_OutReg( info, CCSR, 0x1020 );
5615
5616         info->rx_enabled = 1;
5617
5618 }       /* end of usc_start_receiver() */
5619
5620 /* usc_start_transmitter()
5621  *
5622  *      Enable the USC transmitter and send a transmit frame if
5623  *      one is loaded in the DMA buffers.
5624  *
5625  * Arguments:           info    pointer to device instance data
5626  * Return Value:        None
5627  */
5628 static void usc_start_transmitter( struct mgsl_struct *info )
5629 {
5630         u32 phys_addr;
5631         unsigned int FrameSize;
5632
5633         if (debug_level >= DEBUG_LEVEL_ISR)
5634                 printk("%s(%d):usc_start_transmitter(%s)\n",
5635                          __FILE__,__LINE__, info->device_name );
5636
5637         if ( info->xmit_cnt ) {
5638
5639                 /* If auto RTS enabled and RTS is inactive, then assert */
5640                 /* RTS and set a flag indicating that the driver should */
5641                 /* negate RTS when the transmission completes. */
5642
5643                 info->drop_rts_on_tx_done = 0;
5644
5645                 if ( info->params.flags & HDLC_FLAG_AUTO_RTS ) {
5646                         usc_get_serial_signals( info );
5647                         if ( !(info->serial_signals & SerialSignal_RTS) ) {
5648                                 info->serial_signals |= SerialSignal_RTS;
5649                                 usc_set_serial_signals( info );
5650                                 info->drop_rts_on_tx_done = 1;
5651                         }
5652                 }
5653
5654
5655                 if ( info->params.mode == MGSL_MODE_ASYNC ) {
5656                         if ( !info->tx_active ) {
5657                                 usc_UnlatchTxstatusBits(info, TXSTATUS_ALL);
5658                                 usc_ClearIrqPendingBits(info, TRANSMIT_STATUS + TRANSMIT_DATA);
5659                                 usc_EnableInterrupts(info, TRANSMIT_DATA);
5660                                 usc_load_txfifo(info);
5661                         }
5662                 } else {
5663                         /* Disable transmit DMA controller while programming. */
5664                         usc_DmaCmd( info, DmaCmd_ResetTxChannel );
5665
5666                         /* Transmit DMA buffer is loaded, so program USC */
5667                         /* to send the frame contained in the buffers.   */
5668
5669                         FrameSize = info->tx_buffer_list[info->start_tx_dma_buffer].rcc;
5670
5671                         /* if operating in Raw sync mode, reset the rcc component
5672                          * of the tx dma buffer entry, otherwise, the serial controller
5673                          * will send a closing sync char after this count.
5674                          */
5675                         if ( info->params.mode == MGSL_MODE_RAW )
5676                                 info->tx_buffer_list[info->start_tx_dma_buffer].rcc = 0;
5677
5678                         /* Program the Transmit Character Length Register (TCLR) */
5679                         /* and clear FIFO (TCC is loaded with TCLR on FIFO clear) */
5680                         usc_OutReg( info, TCLR, (u16)FrameSize );
5681
5682                         usc_RTCmd( info, RTCmd_PurgeTxFifo );
5683
5684                         /* Program the address of the 1st DMA Buffer Entry in linked list */
5685                         phys_addr = info->tx_buffer_list[info->start_tx_dma_buffer].phys_entry;
5686                         usc_OutDmaReg( info, NTARL, (u16)phys_addr );
5687                         usc_OutDmaReg( info, NTARU, (u16)(phys_addr >> 16) );
5688
5689                         usc_UnlatchTxstatusBits( info, TXSTATUS_ALL );
5690                         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS );
5691                         usc_EnableInterrupts( info, TRANSMIT_STATUS );
5692
5693                         if ( info->params.mode == MGSL_MODE_RAW &&
5694                                         info->num_tx_dma_buffers > 1 ) {
5695                            /* When running external sync mode, attempt to 'stream' transmit  */
5696                            /* by filling tx dma buffers as they become available. To do this */
5697                            /* we need to enable Tx DMA EOB Status interrupts :               */
5698                            /*                                                                */
5699                            /* 1. Arm End of Buffer (EOB) Transmit DMA Interrupt (BIT2 of TDIAR) */
5700                            /* 2. Enable Transmit DMA Interrupts (BIT0 of DICR) */
5701
5702                            usc_OutDmaReg( info, TDIAR, BIT2|BIT3 );
5703                            usc_OutDmaReg( info, DICR, (u16)(usc_InDmaReg(info,DICR) | BIT0) );
5704                         }
5705
5706                         /* Initialize Transmit DMA Channel */
5707                         usc_DmaCmd( info, DmaCmd_InitTxChannel );
5708
5709                         usc_TCmd( info, TCmd_SendFrame );
5710
5711                         info->tx_timer.expires = jiffies + msecs_to_jiffies(5000);
5712                         add_timer(&info->tx_timer);
5713                 }
5714                 info->tx_active = 1;
5715         }
5716
5717         if ( !info->tx_enabled ) {
5718                 info->tx_enabled = 1;
5719                 if ( info->params.flags & HDLC_FLAG_AUTO_CTS )
5720                         usc_EnableTransmitter(info,ENABLE_AUTO_CTS);
5721                 else
5722                         usc_EnableTransmitter(info,ENABLE_UNCONDITIONAL);
5723         }
5724
5725 }       /* end of usc_start_transmitter() */
5726
5727 /* usc_stop_transmitter()
5728  *
5729  *      Stops the transmitter and DMA
5730  *
5731  * Arguments:           info    pointer to device isntance data
5732  * Return Value:        None
5733  */
5734 static void usc_stop_transmitter( struct mgsl_struct *info )
5735 {
5736         if (debug_level >= DEBUG_LEVEL_ISR)
5737                 printk("%s(%d):usc_stop_transmitter(%s)\n",
5738                          __FILE__,__LINE__, info->device_name );
5739
5740         del_timer(&info->tx_timer);
5741
5742         usc_UnlatchTxstatusBits( info, TXSTATUS_ALL );
5743         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS + TRANSMIT_DATA );
5744         usc_DisableInterrupts( info, TRANSMIT_STATUS + TRANSMIT_DATA );
5745
5746         usc_EnableTransmitter(info,DISABLE_UNCONDITIONAL);
5747         usc_DmaCmd( info, DmaCmd_ResetTxChannel );
5748         usc_RTCmd( info, RTCmd_PurgeTxFifo );
5749
5750         info->tx_enabled = 0;
5751         info->tx_active  = 0;
5752
5753 }       /* end of usc_stop_transmitter() */
5754
5755 /* usc_load_txfifo()
5756  *
5757  *      Fill the transmit FIFO until the FIFO is full or
5758  *      there is no more data to load.
5759  *
5760  * Arguments:           info    pointer to device extension (instance data)
5761  * Return Value:        None
5762  */
5763 static void usc_load_txfifo( struct mgsl_struct *info )
5764 {
5765         int Fifocount;
5766         u8 TwoBytes[2];
5767
5768         if ( !info->xmit_cnt && !info->x_char )
5769                 return;
5770
5771         /* Select transmit FIFO status readback in TICR */
5772         usc_TCmd( info, TCmd_SelectTicrTxFifostatus );
5773
5774         /* load the Transmit FIFO until FIFOs full or all data sent */
5775
5776         while( (Fifocount = usc_InReg(info, TICR) >> 8) && info->xmit_cnt ) {
5777                 /* there is more space in the transmit FIFO and */
5778                 /* there is more data in transmit buffer */
5779
5780                 if ( (info->xmit_cnt > 1) && (Fifocount > 1) && !info->x_char ) {
5781                         /* write a 16-bit word from transmit buffer to 16C32 */
5782
5783                         TwoBytes[0] = info->xmit_buf[info->xmit_tail++];
5784                         info->xmit_tail = info->xmit_tail & (SERIAL_XMIT_SIZE-1);
5785                         TwoBytes[1] = info->xmit_buf[info->xmit_tail++];
5786                         info->xmit_tail = info->xmit_tail & (SERIAL_XMIT_SIZE-1);
5787
5788                         outw( *((u16 *)TwoBytes), info->io_base + DATAREG);
5789
5790                         info->xmit_cnt -= 2;
5791                         info->icount.tx += 2;
5792                 } else {
5793                         /* only 1 byte left to transmit or 1 FIFO slot left */
5794
5795                         outw( (inw( info->io_base + CCAR) & 0x0780) | (TDR+LSBONLY),
5796                                 info->io_base + CCAR );
5797
5798                         if (info->x_char) {
5799                                 /* transmit pending high priority char */
5800                                 outw( info->x_char,info->io_base + CCAR );
5801                                 info->x_char = 0;
5802                         } else {
5803                                 outw( info->xmit_buf[info->xmit_tail++],info->io_base + CCAR );
5804                                 info->xmit_tail = info->xmit_tail & (SERIAL_XMIT_SIZE-1);
5805                                 info->xmit_cnt--;
5806                         }
5807                         info->icount.tx++;
5808                 }
5809         }
5810
5811 }       /* end of usc_load_txfifo() */
5812
5813 /* usc_reset()
5814  *
5815  *      Reset the adapter to a known state and prepare it for further use.
5816  *
5817  * Arguments:           info    pointer to device instance data
5818  * Return Value:        None
5819  */
5820 static void usc_reset( struct mgsl_struct *info )
5821 {
5822         if ( info->bus_type == MGSL_BUS_TYPE_PCI ) {
5823                 int i;
5824                 u32 readval;
5825
5826                 /* Set BIT30 of Misc Control Register */
5827                 /* (Local Control Register 0x50) to force reset of USC. */
5828
5829                 volatile u32 *MiscCtrl = (u32 *)(info->lcr_base + 0x50);
5830                 u32 *LCR0BRDR = (u32 *)(info->lcr_base + 0x28);
5831
5832                 info->misc_ctrl_value |= BIT30;
5833                 *MiscCtrl = info->misc_ctrl_value;
5834
5835                 /*
5836                  * Force at least 170ns delay before clearing
5837                  * reset bit. Each read from LCR takes at least
5838                  * 30ns so 10 times for 300ns to be safe.
5839                  */
5840                 for(i=0;i<10;i++)
5841                         readval = *MiscCtrl;
5842
5843                 info->misc_ctrl_value &= ~BIT30;
5844                 *MiscCtrl = info->misc_ctrl_value;
5845
5846                 *LCR0BRDR = BUS_DESCRIPTOR(
5847                         1,              // Write Strobe Hold (0-3)
5848                         2,              // Write Strobe Delay (0-3)
5849                         2,              // Read Strobe Delay  (0-3)
5850                         0,              // NWDD (Write data-data) (0-3)
5851                         4,              // NWAD (Write Addr-data) (0-31)
5852                         0,              // NXDA (Read/Write Data-Addr) (0-3)
5853                         0,              // NRDD (Read Data-Data) (0-3)
5854                         5               // NRAD (Read Addr-Data) (0-31)
5855                         );
5856         } else {
5857                 /* do HW reset */
5858                 outb( 0,info->io_base + 8 );
5859         }
5860
5861         info->mbre_bit = 0;
5862         info->loopback_bits = 0;
5863         info->usc_idle_mode = 0;
5864
5865         /*
5866          * Program the Bus Configuration Register (BCR)
5867          *
5868          * <15>         0       Don't use separate address
5869          * <14..6>      0       reserved
5870          * <5..4>       00      IAckmode = Default, don't care
5871          * <3>          1       Bus Request Totem Pole output
5872          * <2>          1       Use 16 Bit data bus
5873          * <1>          0       IRQ Totem Pole output
5874          * <0>          0       Don't Shift Right Addr
5875          *
5876          * 0000 0000 0000 1100 = 0x000c
5877          *
5878          * By writing to io_base + SDPIN the Wait/Ack pin is
5879          * programmed to work as a Wait pin.
5880          */
5881
5882         outw( 0x000c,info->io_base + SDPIN );
5883
5884
5885         outw( 0,info->io_base );
5886         outw( 0,info->io_base + CCAR );
5887
5888         /* select little endian byte ordering */
5889         usc_RTCmd( info, RTCmd_SelectLittleEndian );
5890
5891
5892         /* Port Control Register (PCR)
5893          *
5894          * <15..14>     11      Port 7 is Output (~DMAEN, Bit 14 : 0 = Enabled)
5895          * <13..12>     11      Port 6 is Output (~INTEN, Bit 12 : 0 = Enabled)
5896          * <11..10>     00      Port 5 is Input (No Connect, Don't Care)
5897          * <9..8>       00      Port 4 is Input (No Connect, Don't Care)
5898          * <7..6>       11      Port 3 is Output (~RTS, Bit 6 : 0 = Enabled )
5899          * <5..4>       11      Port 2 is Output (~DTR, Bit 4 : 0 = Enabled )
5900          * <3..2>       01      Port 1 is Input (Dedicated RxC)
5901          * <1..0>       01      Port 0 is Input (Dedicated TxC)
5902          *
5903          *      1111 0000 1111 0101 = 0xf0f5
5904          */
5905
5906         usc_OutReg( info, PCR, 0xf0f5 );
5907
5908
5909         /*
5910          * Input/Output Control Register
5911          *
5912          * <15..14>     00      CTS is active low input
5913          * <13..12>     00      DCD is active low input
5914          * <11..10>     00      TxREQ pin is input (DSR)
5915          * <9..8>       00      RxREQ pin is input (RI)
5916          * <7..6>       00      TxD is output (Transmit Data)
5917          * <5..3>       000     TxC Pin in Input (14.7456MHz Clock)
5918          * <2..0>       100     RxC is Output (drive with BRG0)
5919          *
5920          *      0000 0000 0000 0100 = 0x0004
5921          */
5922
5923         usc_OutReg( info, IOCR, 0x0004 );
5924
5925 }       /* end of usc_reset() */
5926
5927 /* usc_set_async_mode()
5928  *
5929  *      Program adapter for asynchronous communications.
5930  *
5931  * Arguments:           info            pointer to device instance data
5932  * Return Value:        None
5933  */
5934 static void usc_set_async_mode( struct mgsl_struct *info )
5935 {
5936         u16 RegValue;
5937
5938         /* disable interrupts while programming USC */
5939         usc_DisableMasterIrqBit( info );
5940
5941         outw( 0, info->io_base );                       /* clear Master Bus Enable (DCAR) */
5942         usc_DmaCmd( info, DmaCmd_ResetAllChannels );    /* disable both DMA channels */
5943
5944         usc_loopback_frame( info );
5945
5946         /* Channel mode Register (CMR)
5947          *
5948          * <15..14>     00      Tx Sub modes, 00 = 1 Stop Bit
5949          * <13..12>     00                    00 = 16X Clock
5950          * <11..8>      0000    Transmitter mode = Asynchronous
5951          * <7..6>       00      reserved?
5952          * <5..4>       00      Rx Sub modes, 00 = 16X Clock
5953          * <3..0>       0000    Receiver mode = Asynchronous
5954          *
5955          * 0000 0000 0000 0000 = 0x0
5956          */
5957
5958         RegValue = 0;
5959         if ( info->params.stop_bits != 1 )
5960                 RegValue |= BIT14;
5961         usc_OutReg( info, CMR, RegValue );
5962
5963
5964         /* Receiver mode Register (RMR)
5965          *
5966          * <15..13>     000     encoding = None
5967          * <12..08>     00000   reserved (Sync Only)
5968          * <7..6>       00      Even parity
5969          * <5>          0       parity disabled
5970          * <4..2>       000     Receive Char Length = 8 bits
5971          * <1..0>       00      Disable Receiver
5972          *
5973          * 0000 0000 0000 0000 = 0x0
5974          */
5975
5976         RegValue = 0;
5977
5978         if ( info->params.data_bits != 8 )
5979                 RegValue |= BIT4+BIT3+BIT2;
5980
5981         if ( info->params.parity != ASYNC_PARITY_NONE ) {
5982                 RegValue |= BIT5;
5983                 if ( info->params.parity != ASYNC_PARITY_ODD )
5984                         RegValue |= BIT6;
5985         }
5986
5987         usc_OutReg( info, RMR, RegValue );
5988
5989
5990         /* Set IRQ trigger level */
5991
5992         usc_RCmd( info, RCmd_SelectRicrIntLevel );
5993
5994
5995         /* Receive Interrupt Control Register (RICR)
5996          *
5997          * <15..8>      ?               RxFIFO IRQ Request Level
5998          *
5999          * Note: For async mode the receive FIFO level must be set
6000          * to 0 to avoid the situation where the FIFO contains fewer bytes
6001          * than the trigger level and no more data is expected.
6002          *
6003          * <7>          0               Exited Hunt IA (Interrupt Arm)
6004          * <6>          0               Idle Received IA
6005          * <5>          0               Break/Abort IA
6006          * <4>          0               Rx Bound IA
6007          * <3>          0               Queued status reflects oldest byte in FIFO
6008          * <2>          0               Abort/PE IA
6009          * <1>          0               Rx Overrun IA
6010          * <0>          0               Select TC0 value for readback
6011          *
6012          * 0000 0000 0100 0000 = 0x0000 + (FIFOLEVEL in MSB)
6013          */
6014
6015         usc_OutReg( info, RICR, 0x0000 );
6016
6017         usc_UnlatchRxstatusBits( info, RXSTATUS_ALL );
6018         usc_ClearIrqPendingBits( info, RECEIVE_STATUS );
6019
6020
6021         /* Transmit mode Register (TMR)
6022          *
6023          * <15..13>     000     encoding = None
6024          * <12..08>     00000   reserved (Sync Only)
6025          * <7..6>       00      Transmit parity Even
6026          * <5>          0       Transmit parity Disabled
6027          * <4..2>       000     Tx Char Length = 8 bits
6028          * <1..0>       00      Disable Transmitter
6029          *
6030          * 0000 0000 0000 0000 = 0x0
6031          */
6032
6033         RegValue = 0;
6034
6035         if ( info->params.data_bits != 8 )
6036                 RegValue |= BIT4+BIT3+BIT2;
6037
6038         if ( info->params.parity != ASYNC_PARITY_NONE ) {
6039                 RegValue |= BIT5;
6040                 if ( info->params.parity != ASYNC_PARITY_ODD )
6041                         RegValue |= BIT6;
6042         }
6043
6044         usc_OutReg( info, TMR, RegValue );
6045
6046         usc_set_txidle( info );
6047
6048
6049         /* Set IRQ trigger level */
6050
6051         usc_TCmd( info, TCmd_SelectTicrIntLevel );
6052
6053
6054         /* Transmit Interrupt Control Register (TICR)
6055          *
6056          * <15..8>      ?       Transmit FIFO IRQ Level
6057          * <7>          0       Present IA (Interrupt Arm)
6058          * <6>          1       Idle Sent IA
6059          * <5>          0       Abort Sent IA
6060          * <4>          0       EOF/EOM Sent IA
6061          * <3>          0       CRC Sent IA
6062          * <2>          0       1 = Wait for SW Trigger to Start Frame
6063          * <1>          0       Tx Underrun IA
6064          * <0>          0       TC0 constant on read back
6065          *
6066          *      0000 0000 0100 0000 = 0x0040
6067          */
6068
6069         usc_OutReg( info, TICR, 0x1f40 );
6070
6071         usc_UnlatchTxstatusBits( info, TXSTATUS_ALL );
6072         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS );
6073
6074         usc_enable_async_clock( info, info->params.data_rate );
6075
6076
6077         /* Channel Control/status Register (CCSR)
6078          *
6079          * <15>         X       RCC FIFO Overflow status (RO)
6080          * <14>         X       RCC FIFO Not Empty status (RO)
6081          * <13>         0       1 = Clear RCC FIFO (WO)
6082          * <12>         X       DPLL in Sync status (RO)
6083          * <11>         X       DPLL 2 Missed Clocks status (RO)
6084          * <10>         X       DPLL 1 Missed Clock status (RO)
6085          * <9..8>       00      DPLL Resync on rising and falling edges (RW)
6086          * <7>          X       SDLC Loop On status (RO)
6087          * <6>          X       SDLC Loop Send status (RO)
6088          * <5>          1       Bypass counters for TxClk and RxClk (RW)
6089          * <4..2>       000     Last Char of SDLC frame has 8 bits (RW)
6090          * <1..0>       00      reserved
6091          *
6092          *      0000 0000 0010 0000 = 0x0020
6093          */
6094
6095         usc_OutReg( info, CCSR, 0x0020 );
6096
6097         usc_DisableInterrupts( info, TRANSMIT_STATUS + TRANSMIT_DATA +
6098                               RECEIVE_DATA + RECEIVE_STATUS );
6099
6100         usc_ClearIrqPendingBits( info, TRANSMIT_STATUS + TRANSMIT_DATA +
6101                                 RECEIVE_DATA + RECEIVE_STATUS );
6102
6103         usc_EnableMasterIrqBit( info );
6104
6105         if (info->bus_type == MGSL_BUS_TYPE_ISA) {
6106                 /* Enable INTEN (Port 6, Bit12) */
6107                 /* This connects the IRQ request signal to the ISA bus */
6108                 usc_OutReg(info, PCR, (u16)((usc_InReg(info, PCR) | BIT13) & ~BIT12));
6109         }
6110
6111         if (info->params.loopback) {
6112                 info->loopback_bits = 0x300;
6113                 outw(0x0300, info->io_base + CCAR);
6114         }
6115
6116 }       /* end of usc_set_async_mode() */
6117
6118 /* usc_loopback_frame()
6119  *
6120  *      Loop back a small (2 byte) dummy SDLC frame.
6121  *      Interrupts and DMA are NOT used. The purpose of this is to
6122  *      clear any 'stale' status info left over from running in async mode.
6123  *
6124  *      The 16C32 shows the strange behaviour of marking the 1st
6125  *      received SDLC frame with a CRC error even when there is no
6126  *      CRC error. To get around this a small dummy from of 2 bytes
6127  *      is looped back when switching from async to sync mode.
6128  *
6129  * Arguments:           info            pointer to device instance data
6130  * Return Value:        None
6131  */
6132 static void usc_loopback_frame( struct mgsl_struct *info )
6133 {
6134         int i;
6135         unsigned long oldmode = info->params.mode;
6136
6137         info->params.mode = MGSL_MODE_HDLC;
6138
6139         usc_DisableMasterIrqBit( info );
6140
6141         usc_set_sdlc_mode( info );
6142         usc_enable_loopback( info, 1 );
6143
6144         /* Write 16-bit Time Constant for BRG0 */
6145         usc_OutReg( info, TC0R, 0 );
6146
6147         /* Channel Control Register (CCR)
6148          *
6149          * <15..14>     00      Don't use 32-bit Tx Control Blocks (TCBs)
6150          * <13>         0       Trigger Tx on SW Command Disabled
6151          * <12>         0       Flag Preamble Disabled
6152          * <11..10>     00      Preamble Length = 8-Bits
6153          * <9..8>       01      Preamble Pattern = flags
6154          * <7..6>       10      Don't use 32-bit Rx status Blocks (RSBs)
6155          * <5>          0       Trigger Rx on SW Command Disabled
6156          * <4..0>       0       reserved
6157          *
6158          *      0000 0001 0000 0000 = 0x0100
6159          */
6160
6161         usc_OutReg( info, CCR, 0x0100 );
6162
6163         /* SETUP RECEIVER */
6164         usc_RTCmd( info, RTCmd_PurgeRxFifo );
6165         usc_EnableReceiver(info,ENABLE_UNCONDITIONAL);
6166
6167         /* SETUP TRANSMITTER */
6168         /* Program the Transmit Character Length Register (TCLR) */
6169         /* and clear FIFO (TCC is loaded with TCLR on FIFO clear) */
6170         usc_OutReg( info, TCLR, 2 );
6171         usc_RTCmd( info, RTCmd_PurgeTxFifo );
6172
6173         /* unlatch Tx status bits, and start transmit channel. */
6174         usc_UnlatchTxstatusBits(info,TXSTATUS_ALL);
6175         outw(0,info->io_base + DATAREG);
6176
6177         /* ENABLE TRANSMITTER */
6178         usc_TCmd( info, TCmd_SendFrame );
6179         usc_EnableTransmitter(info,ENABLE_UNCONDITIONAL);
6180
6181         /* WAIT FOR RECEIVE COMPLETE */
6182         for (i=0 ; i<1000 ; i++)
6183                 if (usc_InReg( info, RCSR ) & (BIT8 + BIT4 + BIT3 + BIT1))
6184                         break;
6185
6186         /* clear Internal Data loopback mode */
6187         usc_enable_loopback(info, 0);
6188
6189         usc_EnableMasterIrqBit(info);
6190
6191         info->params.mode = oldmode;
6192
6193 }       /* end of usc_loopback_frame() */
6194
6195 /* usc_set_sync_mode()  Programs the USC for SDLC communications.
6196  *
6197  * Arguments:           info    pointer to adapter info structure
6198  * Return Value:        None
6199  */
6200 static void usc_set_sync_mode( struct mgsl_struct *info )
6201 {
6202         usc_loopback_frame( info );
6203         usc_set_sdlc_mode( info );
6204
6205         if (info->bus_type == MGSL_BUS_TYPE_ISA) {
6206                 /* Enable INTEN (Port 6, Bit12) */
6207                 /* This connects the IRQ request signal to the ISA bus */
6208                 usc_OutReg(info, PCR, (u16)((usc_InReg(info, PCR) | BIT13) & ~BIT12));
6209         }
6210
6211         usc_enable_aux_clock(info, info->params.clock_speed);
6212
6213         if (info->params.loopback)
6214                 usc_enable_loopback(info,1);
6215
6216 }       /* end of mgsl_set_sync_mode() */
6217
6218 /* usc_set_txidle()     Set the HDLC idle mode for the transmitter.
6219  *
6220  * Arguments:           info    pointer to device instance data
6221  * Return Value:        None
6222  */
6223 static void usc_set_txidle( struct mgsl_struct *info )
6224 {
6225         u16 usc_idle_mode = IDLEMODE_FLAGS;
6226
6227         /* Map API idle mode to USC register bits */
6228
6229         switch( info->idle_mode ){
6230         case HDLC_TXIDLE_FLAGS:                 usc_idle_mode = IDLEMODE_FLAGS; break;
6231         case HDLC_TXIDLE_ALT_ZEROS_ONES:        usc_idle_mode = IDLEMODE_ALT_ONE_ZERO; break;
6232         case HDLC_TXIDLE_ZEROS:                 usc_idle_mode = IDLEMODE_ZERO; break;
6233         case HDLC_TXIDLE_ONES:                  usc_idle_mode = IDLEMODE_ONE; break;
6234         case HDLC_TXIDLE_ALT_MARK_SPACE:        usc_idle_mode = IDLEMODE_ALT_MARK_SPACE; break;
6235         case HDLC_TXIDLE_SPACE:                 usc_idle_mode = IDLEMODE_SPACE; break;
6236         case HDLC_TXIDLE_MARK:                  usc_idle_mode = IDLEMODE_MARK; break;
6237         }
6238
6239         info->usc_idle_mode = usc_idle_mode;
6240         //usc_OutReg(info, TCSR, usc_idle_mode);
6241         info->tcsr_value &= ~IDLEMODE_MASK;     /* clear idle mode bits */
6242         info->tcsr_value += usc_idle_mode;
6243         usc_OutReg(info, TCSR, info->tcsr_value);
6244
6245         /*
6246          * if SyncLink WAN adapter is running in external sync mode, the
6247          * transmitter has been set to Monosync in order to try to mimic
6248          * a true raw outbound bit stream. Monosync still sends an open/close
6249          * sync char at the start/end of a frame. Try to match those sync
6250          * patterns to the idle mode set here
6251          */
6252         if ( info->params.mode == MGSL_MODE_RAW ) {
6253                 unsigned char syncpat = 0;
6254                 switch( info->idle_mode ) {
6255                 case HDLC_TXIDLE_FLAGS:
6256                         syncpat = 0x7e;
6257                         break;
6258                 case HDLC_TXIDLE_ALT_ZEROS_ONES:
6259                         syncpat = 0x55;
6260                         break;
6261                 case HDLC_TXIDLE_ZEROS:
6262                 case HDLC_TXIDLE_SPACE:
6263                         syncpat = 0x00;
6264                         break;
6265                 case HDLC_TXIDLE_ONES:
6266                 case HDLC_TXIDLE_MARK:
6267                         syncpat = 0xff;
6268                         break;
6269                 case HDLC_TXIDLE_ALT_MARK_SPACE:
6270                         syncpat = 0xaa;
6271                         break;
6272                 }
6273
6274                 usc_SetTransmitSyncChars(info,syncpat,syncpat);
6275         }
6276
6277 }       /* end of usc_set_txidle() */
6278
6279 /* usc_get_serial_signals()
6280  *
6281  *      Query the adapter for the state of the V24 status (input) signals.
6282  *
6283  * Arguments:           info    pointer to device instance data
6284  * Return Value:        None
6285  */
6286 static void usc_get_serial_signals( struct mgsl_struct *info )
6287 {
6288         u16 status;
6289
6290         /* clear all serial signals except DTR and RTS */
6291         info->serial_signals &= SerialSignal_DTR + SerialSignal_RTS;
6292
6293         /* Read the Misc Interrupt status Register (MISR) to get */
6294         /* the V24 status signals. */
6295
6296         status = usc_InReg( info, MISR );
6297
6298         /* set serial signal bits to reflect MISR */
6299
6300         if ( status & MISCSTATUS_CTS )
6301                 info->serial_signals |= SerialSignal_CTS;
6302
6303         if ( status & MISCSTATUS_DCD )
6304                 info->serial_signals |= SerialSignal_DCD;
6305
6306         if ( status & MISCSTATUS_RI )
6307                 info->serial_signals |= SerialSignal_RI;
6308
6309         if ( status & MISCSTATUS_DSR )
6310                 info->serial_signals |= SerialSignal_DSR;
6311
6312 }       /* end of usc_get_serial_signals() */
6313
6314 /* usc_set_serial_signals()
6315  *
6316  *      Set the state of DTR and RTS based on contents of
6317  *      serial_signals member of device extension.
6318  *
6319  * Arguments:           info    pointer to device instance data
6320  * Return Value:        None
6321  */
6322 static void usc_set_serial_signals( struct mgsl_struct *info )
6323 {
6324         u16 Control;
6325         unsigned char V24Out = info->serial_signals;
6326
6327         /* get the current value of the Port Control Register (PCR) */
6328
6329         Control = usc_InReg( info, PCR );
6330
6331         if ( V24Out & SerialSignal_RTS )
6332                 Control &= ~(BIT6);
6333         else
6334                 Control |= BIT6;
6335
6336         if ( V24Out & SerialSignal_DTR )
6337                 Control &= ~(BIT4);
6338         else
6339                 Control |= BIT4;
6340
6341         usc_OutReg( info, PCR, Control );
6342
6343 }       /* end of usc_set_serial_signals() */
6344
6345 /* usc_enable_async_clock()
6346  *
6347  *      Enable the async clock at the specified frequency.
6348  *
6349  * Arguments:           info            pointer to device instance data
6350  *                      data_rate       data rate of clock in bps
6351  *                                      0 disables the AUX clock.
6352  * Return Value:        None
6353  */
6354 static void usc_enable_async_clock( struct mgsl_struct *info, u32 data_rate )
6355 {
6356         if ( data_rate )        {
6357                 /*
6358                  * Clock mode Control Register (CMCR)
6359                  *
6360                  * <15..14>     00      counter 1 Disabled
6361                  * <13..12>     00      counter 0 Disabled
6362                  * <11..10>     11      BRG1 Input is TxC Pin
6363                  * <9..8>       11      BRG0 Input is TxC Pin
6364                  * <7..6>       01      DPLL Input is BRG1 Output
6365                  * <5..3>       100     TxCLK comes from BRG0
6366                  * <2..0>       100     RxCLK comes from BRG0
6367                  *
6368                  * 0000 1111 0110 0100 = 0x0f64
6369                  */
6370
6371                 usc_OutReg( info, CMCR, 0x0f64 );
6372
6373
6374                 /*
6375                  * Write 16-bit Time Constant for BRG0
6376                  * Time Constant = (ClkSpeed / data_rate) - 1
6377                  * ClkSpeed = 921600 (ISA), 691200 (PCI)
6378                  */
6379
6380                 if ( info->bus_type == MGSL_BUS_TYPE_PCI )
6381                         usc_OutReg( info, TC0R, (u16)((691200/data_rate) - 1) );
6382                 else
6383                         usc_OutReg( info, TC0R, (u16)((921600/data_rate) - 1) );
6384
6385
6386                 /*
6387                  * Hardware Configuration Register (HCR)
6388                  * Clear Bit 1, BRG0 mode = Continuous
6389                  * Set Bit 0 to enable BRG0.
6390                  */
6391
6392                 usc_OutReg( info, HCR,
6393                             (u16)((usc_InReg( info, HCR ) & ~BIT1) | BIT0) );
6394
6395
6396                 /* Input/Output Control Reg, <2..0> = 100, Drive RxC pin with BRG0 */
6397
6398                 usc_OutReg( info, IOCR,
6399                             (u16)((usc_InReg(info, IOCR) & 0xfff8) | 0x0004) );
6400         } else {
6401                 /* data rate == 0 so turn off BRG0 */
6402                 usc_OutReg( info, HCR, (u16)(usc_InReg( info, HCR ) & ~BIT0) );
6403         }
6404
6405 }       /* end of usc_enable_async_clock() */
6406
6407 /*
6408  * Buffer Structures:
6409  *
6410  * Normal memory access uses virtual addresses that can make discontiguous
6411  * physical memory pages appear to be contiguous in the virtual address
6412  * space (the processors memory mapping handles the conversions).
6413  *
6414  * DMA transfers require physically contiguous memory. This is because
6415  * the DMA system controller and DMA bus masters deal with memory using
6416  * only physical addresses.
6417  *
6418  * This causes a problem under Windows NT when large DMA buffers are
6419  * needed. Fragmentation of the nonpaged pool prevents allocations of
6420  * physically contiguous buffers larger than the PAGE_SIZE.
6421  *
6422  * However the 16C32 supports Bus Master Scatter/Gather DMA which
6423  * allows DMA transfers to physically discontiguous buffers. Information
6424  * about each data transfer buffer is contained in a memory structure
6425  * called a 'buffer entry'. A list of buffer entries is maintained
6426  * to track and control the use of the data transfer buffers.
6427  *
6428  * To support this strategy we will allocate sufficient PAGE_SIZE
6429  * contiguous memory buffers to allow for the total required buffer
6430  * space.
6431  *
6432  * The 16C32 accesses the list of buffer entries using Bus Master
6433  * DMA. Control information is read from the buffer entries by the
6434  * 16C32 to control data transfers. status information is written to
6435  * the buffer entries by the 16C32 to indicate the status of completed
6436  * transfers.
6437  *
6438  * The CPU writes control information to the buffer entries to control
6439  * the 16C32 and reads status information from the buffer entries to
6440  * determine information about received and transmitted frames.
6441  *
6442  * Because the CPU and 16C32 (adapter) both need simultaneous access
6443  * to the buffer entries, the buffer entry memory is allocated with
6444  * HalAllocateCommonBuffer(). This restricts the size of the buffer
6445  * entry list to PAGE_SIZE.
6446  *
6447  * The actual data buffers on the other hand will only be accessed
6448  * by the CPU or the adapter but not by both simultaneously. This allows
6449  * Scatter/Gather packet based DMA procedures for using physically
6450  * discontiguous pages.
6451  */
6452
6453 /*
6454  * mgsl_reset_tx_dma_buffers()
6455  *
6456  *      Set the count for all transmit buffers to 0 to indicate the
6457  *      buffer is available for use and set the current buffer to the
6458  *      first buffer. This effectively makes all buffers free and
6459  *      discards any data in buffers.
6460  *
6461  * Arguments:           info    pointer to device instance data
6462  * Return Value:        None
6463  */
6464 static void mgsl_reset_tx_dma_buffers( struct mgsl_struct *info )
6465 {
6466         unsigned int i;
6467
6468         for ( i = 0; i < info->tx_buffer_count; i++ ) {
6469                 *((unsigned long *)&(info->tx_buffer_list[i].count)) = 0;
6470         }
6471
6472         info->current_tx_buffer = 0;
6473         info->start_tx_dma_buffer = 0;
6474         info->tx_dma_buffers_used = 0;
6475
6476         info->get_tx_holding_index = 0;
6477         info->put_tx_holding_index = 0;
6478         info->tx_holding_count = 0;
6479
6480 }       /* end of mgsl_reset_tx_dma_buffers() */
6481
6482 /*
6483  * num_free_tx_dma_buffers()
6484  *
6485  *      returns the number of free tx dma buffers available
6486  *
6487  * Arguments:           info    pointer to device instance data
6488  * Return Value:        number of free tx dma buffers
6489  */
6490 static int num_free_tx_dma_buffers(struct mgsl_struct *info)
6491 {
6492         return info->tx_buffer_count - info->tx_dma_buffers_used;
6493 }
6494
6495 /*
6496  * mgsl_reset_rx_dma_buffers()
6497  *
6498  *      Set the count for all receive buffers to DMABUFFERSIZE
6499  *      and set the current buffer to the first buffer. This effectively
6500  *      makes all buffers free and discards any data in buffers.
6501  *
6502  * Arguments:           info    pointer to device instance data
6503  * Return Value:        None
6504  */
6505 static void mgsl_reset_rx_dma_buffers( struct mgsl_struct *info )
6506 {
6507         unsigned int i;
6508
6509         for ( i = 0; i < info->rx_buffer_count; i++ ) {
6510                 *((unsigned long *)&(info->rx_buffer_list[i].count)) = DMABUFFERSIZE;
6511 //              info->rx_buffer_list[i].count = DMABUFFERSIZE;
6512 //              info->rx_buffer_list[i].status = 0;
6513         }
6514
6515         info->current_rx_buffer = 0;
6516
6517 }       /* end of mgsl_reset_rx_dma_buffers() */
6518
6519 /*
6520  * mgsl_free_rx_frame_buffers()
6521  *
6522  *      Free the receive buffers used by a received SDLC
6523  *      frame such that the buffers can be reused.
6524  *
6525  * Arguments:
6526  *
6527  *      info                    pointer to device instance data
6528  *      StartIndex              index of 1st receive buffer of frame
6529  *      EndIndex                index of last receive buffer of frame
6530  *
6531  * Return Value:        None
6532  */
6533 static void mgsl_free_rx_frame_buffers( struct mgsl_struct *info, unsigned int StartIndex, unsigned int EndIndex )
6534 {
6535         int Done = 0;
6536         DMABUFFERENTRY *pBufEntry;
6537         unsigned int Index;
6538
6539         /* Starting with 1st buffer entry of the frame clear the status */
6540         /* field and set the count field to DMA Buffer Size. */
6541
6542         Index = StartIndex;
6543
6544         while( !Done ) {
6545                 pBufEntry = &(info->rx_buffer_list[Index]);
6546
6547                 if ( Index == EndIndex ) {
6548                         /* This is the last buffer of the frame! */
6549                         Done = 1;
6550                 }
6551
6552                 /* reset current buffer for reuse */
6553 //              pBufEntry->status = 0;
6554 //              pBufEntry->count = DMABUFFERSIZE;
6555                 *((unsigned long *)&(pBufEntry->count)) = DMABUFFERSIZE;
6556
6557                 /* advance to next buffer entry in linked list */
6558                 Index++;
6559                 if ( Index == info->rx_buffer_count )
6560                         Index = 0;
6561         }
6562
6563         /* set current buffer to next buffer after last buffer of frame */
6564         info->current_rx_buffer = Index;
6565
6566 }       /* end of free_rx_frame_buffers() */
6567
6568 /* mgsl_get_rx_frame()
6569  *
6570  *      This function attempts to return a received SDLC frame from the
6571  *      receive DMA buffers. Only frames received without errors are returned.
6572  *
6573  * Arguments:           info    pointer to device extension
6574  * Return Value:        1 if frame returned, otherwise 0
6575  */
6576 static int mgsl_get_rx_frame(struct mgsl_struct *info)
6577 {
6578         unsigned int StartIndex, EndIndex;      /* index of 1st and last buffers of Rx frame */
6579         unsigned short status;
6580         DMABUFFERENTRY *pBufEntry;
6581         unsigned int framesize = 0;
6582         int ReturnCode = 0;
6583         unsigned long flags;
6584         struct tty_struct *tty = info->tty;
6585         int return_frame = 0;
6586
6587         /*
6588          * current_rx_buffer points to the 1st buffer of the next available
6589          * receive frame. To find the last buffer of the frame look for
6590          * a non-zero status field in the buffer entries. (The status
6591          * field is set by the 16C32 after completing a receive frame.
6592          */
6593
6594         StartIndex = EndIndex = info->current_rx_buffer;
6595
6596         while( !info->rx_buffer_list[EndIndex].status ) {
6597                 /*
6598                  * If the count field of the buffer entry is non-zero then
6599                  * this buffer has not been used. (The 16C32 clears the count
6600                  * field when it starts using the buffer.) If an unused buffer
6601                  * is encountered then there are no frames available.
6602                  */
6603
6604                 if ( info->rx_buffer_list[EndIndex].count )
6605                         goto Cleanup;
6606
6607                 /* advance to next buffer entry in linked list */
6608                 EndIndex++;
6609                 if ( EndIndex == info->rx_buffer_count )
6610                         EndIndex = 0;
6611
6612                 /* if entire list searched then no frame available */
6613                 if ( EndIndex == StartIndex ) {
6614                         /* If this occurs then something bad happened,
6615                          * all buffers have been 'used' but none mark
6616                          * the end of a frame. Reset buffers and receiver.
6617                          */
6618
6619                         if ( info->rx_enabled ){
6620                                 spin_lock_irqsave(&info->irq_spinlock,flags);
6621                                 usc_start_receiver(info);
6622                                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
6623                         }
6624                         goto Cleanup;
6625                 }
6626         }
6627
6628
6629         /* check status of receive frame */
6630
6631         status = info->rx_buffer_list[EndIndex].status;
6632
6633         if ( status & (RXSTATUS_SHORT_FRAME + RXSTATUS_OVERRUN +
6634                         RXSTATUS_CRC_ERROR + RXSTATUS_ABORT) ) {
6635                 if ( status & RXSTATUS_SHORT_FRAME )
6636                         info->icount.rxshort++;
6637                 else if ( status & RXSTATUS_ABORT )
6638                         info->icount.rxabort++;
6639                 else if ( status & RXSTATUS_OVERRUN )
6640                         info->icount.rxover++;
6641                 else {
6642                         info->icount.rxcrc++;
6643                         if ( info->params.crc_type & HDLC_CRC_RETURN_EX )
6644                                 return_frame = 1;
6645                 }
6646                 framesize = 0;
6647 #ifdef CONFIG_HDLC
6648                 {
6649                         struct net_device_stats *stats = hdlc_stats(info->netdev);
6650                         stats->rx_errors++;
6651                         stats->rx_frame_errors++;
6652                 }
6653 #endif
6654         } else
6655                 return_frame = 1;
6656
6657         if ( return_frame ) {
6658                 /* receive frame has no errors, get frame size.
6659                  * The frame size is the starting value of the RCC (which was
6660                  * set to 0xffff) minus the ending value of the RCC (decremented
6661                  * once for each receive character) minus 2 for the 16-bit CRC.
6662                  */
6663
6664                 framesize = RCLRVALUE - info->rx_buffer_list[EndIndex].rcc;
6665
6666                 /* adjust frame size for CRC if any */
6667                 if ( info->params.crc_type == HDLC_CRC_16_CCITT )
6668                         framesize -= 2;
6669                 else if ( info->params.crc_type == HDLC_CRC_32_CCITT )
6670                         framesize -= 4;
6671         }
6672
6673         if ( debug_level >= DEBUG_LEVEL_BH )
6674                 printk("%s(%d):mgsl_get_rx_frame(%s) status=%04X size=%d\n",
6675                         __FILE__,__LINE__,info->device_name,status,framesize);
6676
6677         if ( debug_level >= DEBUG_LEVEL_DATA )
6678                 mgsl_trace_block(info,info->rx_buffer_list[StartIndex].virt_addr,
6679                         min_t(int, framesize, DMABUFFERSIZE),0);
6680
6681         if (framesize) {
6682                 if ( ( (info->params.crc_type & HDLC_CRC_RETURN_EX) &&
6683                                 ((framesize+1) > info->max_frame_size) ) ||
6684                         (framesize > info->max_frame_size) )
6685                         info->icount.rxlong++;
6686                 else {
6687                         /* copy dma buffer(s) to contiguous intermediate buffer */
6688                         int copy_count = framesize;
6689                         int index = StartIndex;
6690                         unsigned char *ptmp = info->intermediate_rxbuffer;
6691
6692                         if ( !(status & RXSTATUS_CRC_ERROR))
6693                         info->icount.rxok++;
6694
6695                         while(copy_count) {
6696                                 int partial_count;
6697                                 if ( copy_count > DMABUFFERSIZE )
6698                                         partial_count = DMABUFFERSIZE;
6699                                 else
6700                                         partial_count = copy_count;
6701
6702                                 pBufEntry = &(info->rx_buffer_list[index]);
6703                                 memcpy( ptmp, pBufEntry->virt_addr, partial_count );
6704                                 ptmp += partial_count;
6705                                 copy_count -= partial_count;
6706
6707                                 if ( ++index == info->rx_buffer_count )
6708                                         index = 0;
6709                         }
6710
6711                         if ( info->params.crc_type & HDLC_CRC_RETURN_EX ) {
6712                                 ++framesize;
6713                                 *ptmp = (status & RXSTATUS_CRC_ERROR ?
6714                                                 RX_CRC_ERROR :
6715                                                 RX_OK);
6716
6717                                 if ( debug_level >= DEBUG_LEVEL_DATA )
6718                                         printk("%s(%d):mgsl_get_rx_frame(%s) rx frame status=%d\n",
6719                                                 __FILE__,__LINE__,info->device_name,
6720                                                 *ptmp);
6721                         }
6722
6723 #ifdef CONFIG_HDLC
6724                         if (info->netcount)
6725                                 hdlcdev_rx(info,info->intermediate_rxbuffer,framesize);
6726                         else
6727 #endif
6728                                 ldisc_receive_buf(tty, info->intermediate_rxbuffer, info->flag_buf, framesize);
6729                 }
6730         }
6731         /* Free the buffers used by this frame. */
6732         mgsl_free_rx_frame_buffers( info, StartIndex, EndIndex );
6733
6734         ReturnCode = 1;
6735
6736 Cleanup:
6737
6738         if ( info->rx_enabled && info->rx_overflow ) {
6739                 /* The receiver needs to restarted because of
6740                  * a receive overflow (buffer or FIFO). If the
6741                  * receive buffers are now empty, then restart receiver.
6742                  */
6743
6744                 if ( !info->rx_buffer_list[EndIndex].status &&
6745                         info->rx_buffer_list[EndIndex].count ) {
6746                         spin_lock_irqsave(&info->irq_spinlock,flags);
6747                         usc_start_receiver(info);
6748                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
6749                 }
6750         }
6751
6752         return ReturnCode;
6753
6754 }       /* end of mgsl_get_rx_frame() */
6755
6756 /* mgsl_get_raw_rx_frame()
6757  *
6758  *      This function attempts to return a received frame from the
6759  *      receive DMA buffers when running in external loop mode. In this mode,
6760  *      we will return at most one DMABUFFERSIZE frame to the application.
6761  *      The USC receiver is triggering off of DCD going active to start a new
6762  *      frame, and DCD going inactive to terminate the frame (similar to
6763  *      processing a closing flag character).
6764  *
6765  *      In this routine, we will return DMABUFFERSIZE "chunks" at a time.
6766  *      If DCD goes inactive, the last Rx DMA Buffer will have a non-zero
6767  *      status field and the RCC field will indicate the length of the
6768  *      entire received frame. We take this RCC field and get the modulus
6769  *      of RCC and DMABUFFERSIZE to determine if number of bytes in the
6770  *      last Rx DMA buffer and return that last portion of the frame.
6771  *
6772  * Arguments:           info    pointer to device extension
6773  * Return Value:        1 if frame returned, otherwise 0
6774  */
6775 static int mgsl_get_raw_rx_frame(struct mgsl_struct *info)
6776 {
6777         unsigned int CurrentIndex, NextIndex;
6778         unsigned short status;
6779         DMABUFFERENTRY *pBufEntry;
6780         unsigned int framesize = 0;
6781         int ReturnCode = 0;
6782         unsigned long flags;
6783         struct tty_struct *tty = info->tty;
6784
6785         /*
6786          * current_rx_buffer points to the 1st buffer of the next available
6787          * receive frame. The status field is set by the 16C32 after
6788          * completing a receive frame. If the status field of this buffer
6789          * is zero, either the USC is still filling this buffer or this
6790          * is one of a series of buffers making up a received frame.
6791          *
6792          * If the count field of this buffer is zero, the USC is either
6793          * using this buffer or has used this buffer. Look at the count
6794          * field of the next buffer. If that next buffer's count is
6795          * non-zero, the USC is still actively using the current buffer.
6796          * Otherwise, if the next buffer's count field is zero, the
6797          * current buffer is complete and the USC is using the next
6798          * buffer.
6799          */
6800         CurrentIndex = NextIndex = info->current_rx_buffer;
6801         ++NextIndex;
6802         if ( NextIndex == info->rx_buffer_count )
6803                 NextIndex = 0;
6804
6805         if ( info->rx_buffer_list[CurrentIndex].status != 0 ||
6806                 (info->rx_buffer_list[CurrentIndex].count == 0 &&
6807                         info->rx_buffer_list[NextIndex].count == 0)) {
6808                 /*
6809                  * Either the status field of this dma buffer is non-zero
6810                  * (indicating the last buffer of a receive frame) or the next
6811                  * buffer is marked as in use -- implying this buffer is complete
6812                  * and an intermediate buffer for this received frame.
6813                  */
6814
6815                 status = info->rx_buffer_list[CurrentIndex].status;
6816
6817                 if ( status & (RXSTATUS_SHORT_FRAME + RXSTATUS_OVERRUN +
6818                                 RXSTATUS_CRC_ERROR + RXSTATUS_ABORT) ) {
6819                         if ( status & RXSTATUS_SHORT_FRAME )
6820                                 info->icount.rxshort++;
6821                         else if ( status & RXSTATUS_ABORT )
6822                                 info->icount.rxabort++;
6823                         else if ( status & RXSTATUS_OVERRUN )
6824                                 info->icount.rxover++;
6825                         else
6826                                 info->icount.rxcrc++;
6827                         framesize = 0;
6828                 } else {
6829                         /*
6830                          * A receive frame is available, get frame size and status.
6831                          *
6832                          * The frame size is the starting value of the RCC (which was
6833                          * set to 0xffff) minus the ending value of the RCC (decremented
6834                          * once for each receive character) minus 2 or 4 for the 16-bit
6835                          * or 32-bit CRC.
6836                          *
6837                          * If the status field is zero, this is an intermediate buffer.
6838                          * It's size is 4K.
6839                          *
6840                          * If the DMA Buffer Entry's Status field is non-zero, the
6841                          * receive operation completed normally (ie: DCD dropped). The
6842                          * RCC field is valid and holds the received frame size.
6843                          * It is possible that the RCC field will be zero on a DMA buffer
6844                          * entry with a non-zero status. This can occur if the total
6845                          * frame size (number of bytes between the time DCD goes active
6846                          * to the time DCD goes inactive) exceeds 65535 bytes. In this
6847                          * case the 16C32 has underrun on the RCC count and appears to
6848                          * stop updating this counter to let us know the actual received
6849                          * frame size. If this happens (non-zero status and zero RCC),
6850                          * simply return the entire RxDMA Buffer
6851                          */
6852                         if ( status ) {
6853                                 /*
6854                                  * In the event that the final RxDMA Buffer is
6855                                  * terminated with a non-zero status and the RCC
6856                                  * field is zero, we interpret this as the RCC
6857                                  * having underflowed (received frame > 65535 bytes).
6858                                  *
6859                                  * Signal the event to the user by passing back
6860                                  * a status of RxStatus_CrcError returning the full
6861                                  * buffer and let the app figure out what data is
6862                                  * actually valid
6863                                  */
6864                                 if ( info->rx_buffer_list[CurrentIndex].rcc )
6865                                         framesize = RCLRVALUE - info->rx_buffer_list[CurrentIndex].rcc;
6866                                 else
6867                                         framesize = DMABUFFERSIZE;
6868                         }
6869                         else
6870                                 framesize = DMABUFFERSIZE;
6871                 }
6872
6873                 if ( framesize > DMABUFFERSIZE ) {
6874                         /*
6875                          * if running in raw sync mode, ISR handler for
6876                          * End Of Buffer events terminates all buffers at 4K.
6877                          * If this frame size is said to be >4K, get the
6878                          * actual number of bytes of the frame in this buffer.
6879                          */
6880                         framesize = framesize % DMABUFFERSIZE;
6881                 }
6882
6883
6884                 if ( debug_level >= DEBUG_LEVEL_BH )
6885                         printk("%s(%d):mgsl_get_raw_rx_frame(%s) status=%04X size=%d\n",
6886                                 __FILE__,__LINE__,info->device_name,status,framesize);
6887
6888                 if ( debug_level >= DEBUG_LEVEL_DATA )
6889                         mgsl_trace_block(info,info->rx_buffer_list[CurrentIndex].virt_addr,
6890                                 min_t(int, framesize, DMABUFFERSIZE),0);
6891
6892                 if (framesize) {
6893                         /* copy dma buffer(s) to contiguous intermediate buffer */
6894                         /* NOTE: we never copy more than DMABUFFERSIZE bytes    */
6895
6896                         pBufEntry = &(info->rx_buffer_list[CurrentIndex]);
6897                         memcpy( info->intermediate_rxbuffer, pBufEntry->virt_addr, framesize);
6898                         info->icount.rxok++;
6899
6900                         ldisc_receive_buf(tty, info->intermediate_rxbuffer, info->flag_buf, framesize);
6901                 }
6902
6903                 /* Free the buffers used by this frame. */
6904                 mgsl_free_rx_frame_buffers( info, CurrentIndex, CurrentIndex );
6905
6906                 ReturnCode = 1;
6907         }
6908
6909
6910         if ( info->rx_enabled && info->rx_overflow ) {
6911                 /* The receiver needs to restarted because of
6912                  * a receive overflow (buffer or FIFO). If the
6913                  * receive buffers are now empty, then restart receiver.
6914                  */
6915
6916                 if ( !info->rx_buffer_list[CurrentIndex].status &&
6917                         info->rx_buffer_list[CurrentIndex].count ) {
6918                         spin_lock_irqsave(&info->irq_spinlock,flags);
6919                         usc_start_receiver(info);
6920                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
6921                 }
6922         }
6923
6924         return ReturnCode;
6925
6926 }       /* end of mgsl_get_raw_rx_frame() */
6927
6928 /* mgsl_load_tx_dma_buffer()
6929  *
6930  *      Load the transmit DMA buffer with the specified data.
6931  *
6932  * Arguments:
6933  *
6934  *      info            pointer to device extension
6935  *      Buffer          pointer to buffer containing frame to load
6936  *      BufferSize      size in bytes of frame in Buffer
6937  *
6938  * Return Value:        None
6939  */
6940 static void mgsl_load_tx_dma_buffer(struct mgsl_struct *info,
6941                 const char *Buffer, unsigned int BufferSize)
6942 {
6943         unsigned short Copycount;
6944         unsigned int i = 0;
6945         DMABUFFERENTRY *pBufEntry;
6946
6947         if ( debug_level >= DEBUG_LEVEL_DATA )
6948                 mgsl_trace_block(info,Buffer, min_t(int, BufferSize, DMABUFFERSIZE), 1);
6949
6950         if (info->params.flags & HDLC_FLAG_HDLC_LOOPMODE) {
6951                 /* set CMR:13 to start transmit when
6952                  * next GoAhead (abort) is received
6953                  */
6954                 info->cmr_value |= BIT13;
6955         }
6956
6957         /* begin loading the frame in the next available tx dma
6958          * buffer, remember it's starting location for setting
6959          * up tx dma operation
6960          */
6961         i = info->current_tx_buffer;
6962         info->start_tx_dma_buffer = i;
6963
6964         /* Setup the status and RCC (Frame Size) fields of the 1st */
6965         /* buffer entry in the transmit DMA buffer list. */
6966
6967         info->tx_buffer_list[i].status = info->cmr_value & 0xf000;
6968         info->tx_buffer_list[i].rcc    = BufferSize;
6969         info->tx_buffer_list[i].count  = BufferSize;
6970
6971         /* Copy frame data from 1st source buffer to the DMA buffers. */
6972         /* The frame data may span multiple DMA buffers. */
6973
6974         while( BufferSize ){
6975                 /* Get a pointer to next DMA buffer entry. */
6976                 pBufEntry = &info->tx_buffer_list[i++];
6977
6978                 if ( i == info->tx_buffer_count )
6979                         i=0;
6980
6981                 /* Calculate the number of bytes that can be copied from */
6982                 /* the source buffer to this DMA buffer. */
6983                 if ( BufferSize > DMABUFFERSIZE )
6984                         Copycount = DMABUFFERSIZE;
6985                 else
6986                         Copycount = BufferSize;
6987
6988                 /* Actually copy data from source buffer to DMA buffer. */
6989                 /* Also set the data count for this individual DMA buffer. */
6990                 if ( info->bus_type == MGSL_BUS_TYPE_PCI )
6991                         mgsl_load_pci_memory(pBufEntry->virt_addr, Buffer,Copycount);
6992                 else
6993                         memcpy(pBufEntry->virt_addr, Buffer, Copycount);
6994
6995                 pBufEntry->count = Copycount;
6996
6997                 /* Advance source pointer and reduce remaining data count. */
6998                 Buffer += Copycount;
6999                 BufferSize -= Copycount;
7000
7001                 ++info->tx_dma_buffers_used;
7002         }
7003
7004         /* remember next available tx dma buffer */
7005         info->current_tx_buffer = i;
7006
7007 }       /* end of mgsl_load_tx_dma_buffer() */
7008
7009 /*
7010  * mgsl_register_test()
7011  *
7012  *      Performs a register test of the 16C32.
7013  *
7014  * Arguments:           info    pointer to device instance data
7015  * Return Value:                TRUE if test passed, otherwise FALSE
7016  */
7017 static BOOLEAN mgsl_register_test( struct mgsl_struct *info )
7018 {
7019         static unsigned short BitPatterns[] =
7020                 { 0x0000, 0xffff, 0xaaaa, 0x5555, 0x1234, 0x6969, 0x9696, 0x0f0f };
7021         static unsigned int Patterncount = ARRAY_SIZE(BitPatterns);
7022         unsigned int i;
7023         BOOLEAN rc = TRUE;
7024         unsigned long flags;
7025
7026         spin_lock_irqsave(&info->irq_spinlock,flags);
7027         usc_reset(info);
7028
7029         /* Verify the reset state of some registers. */
7030
7031         if ( (usc_InReg( info, SICR ) != 0) ||
7032                   (usc_InReg( info, IVR  ) != 0) ||
7033                   (usc_InDmaReg( info, DIVR ) != 0) ){
7034                 rc = FALSE;
7035         }
7036
7037         if ( rc == TRUE ){
7038                 /* Write bit patterns to various registers but do it out of */
7039                 /* sync, then read back and verify values. */
7040
7041                 for ( i = 0 ; i < Patterncount ; i++ ) {
7042                         usc_OutReg( info, TC0R, BitPatterns[i] );
7043                         usc_OutReg( info, TC1R, BitPatterns[(i+1)%Patterncount] );
7044                         usc_OutReg( info, TCLR, BitPatterns[(i+2)%Patterncount] );
7045                         usc_OutReg( info, RCLR, BitPatterns[(i+3)%Patterncount] );
7046                         usc_OutReg( info, RSR,  BitPatterns[(i+4)%Patterncount] );
7047                         usc_OutDmaReg( info, TBCR, BitPatterns[(i+5)%Patterncount] );
7048
7049                         if ( (usc_InReg( info, TC0R ) != BitPatterns[i]) ||
7050                                   (usc_InReg( info, TC1R ) != BitPatterns[(i+1)%Patterncount]) ||
7051                                   (usc_InReg( info, TCLR ) != BitPatterns[(i+2)%Patterncount]) ||
7052                                   (usc_InReg( info, RCLR ) != BitPatterns[(i+3)%Patterncount]) ||
7053                                   (usc_InReg( info, RSR )  != BitPatterns[(i+4)%Patterncount]) ||
7054                                   (usc_InDmaReg( info, TBCR ) != BitPatterns[(i+5)%Patterncount]) ){
7055                                 rc = FALSE;
7056                                 break;
7057                         }
7058                 }
7059         }
7060
7061         usc_reset(info);
7062         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7063
7064         return rc;
7065
7066 }       /* end of mgsl_register_test() */
7067
7068 /* mgsl_irq_test()      Perform interrupt test of the 16C32.
7069  *
7070  * Arguments:           info    pointer to device instance data
7071  * Return Value:        TRUE if test passed, otherwise FALSE
7072  */
7073 static BOOLEAN mgsl_irq_test( struct mgsl_struct *info )
7074 {
7075         unsigned long EndTime;
7076         unsigned long flags;
7077
7078         spin_lock_irqsave(&info->irq_spinlock,flags);
7079         usc_reset(info);
7080
7081         /*
7082          * Setup 16C32 to interrupt on TxC pin (14MHz clock) transition.
7083          * The ISR sets irq_occurred to 1.
7084          */
7085
7086         info->irq_occurred = FALSE;
7087
7088         /* Enable INTEN gate for ISA adapter (Port 6, Bit12) */
7089         /* Enable INTEN (Port 6, Bit12) */
7090         /* This connects the IRQ request signal to the ISA bus */
7091         /* on the ISA adapter. This has no effect for the PCI adapter */
7092         usc_OutReg( info, PCR, (unsigned short)((usc_InReg(info, PCR) | BIT13) & ~BIT12) );
7093
7094         usc_EnableMasterIrqBit(info);
7095         usc_EnableInterrupts(info, IO_PIN);
7096         usc_ClearIrqPendingBits(info, IO_PIN);
7097
7098         usc_UnlatchIostatusBits(info, MISCSTATUS_TXC_LATCHED);
7099         usc_EnableStatusIrqs(info, SICR_TXC_ACTIVE + SICR_TXC_INACTIVE);
7100
7101         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7102
7103         EndTime=100;
7104         while( EndTime-- && !info->irq_occurred ) {
7105                 msleep_interruptible(10);
7106         }
7107
7108         spin_lock_irqsave(&info->irq_spinlock,flags);
7109         usc_reset(info);
7110         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7111
7112         if ( !info->irq_occurred )
7113                 return FALSE;
7114         else
7115                 return TRUE;
7116
7117 }       /* end of mgsl_irq_test() */
7118
7119 /* mgsl_dma_test()
7120  *
7121  *      Perform a DMA test of the 16C32. A small frame is
7122  *      transmitted via DMA from a transmit buffer to a receive buffer
7123  *      using single buffer DMA mode.
7124  *
7125  * Arguments:           info    pointer to device instance data
7126  * Return Value:        TRUE if test passed, otherwise FALSE
7127  */
7128 static BOOLEAN mgsl_dma_test( struct mgsl_struct *info )
7129 {
7130         unsigned short FifoLevel;
7131         unsigned long phys_addr;
7132         unsigned int FrameSize;
7133         unsigned int i;
7134         char *TmpPtr;
7135         BOOLEAN rc = TRUE;
7136         unsigned short status=0;
7137         unsigned long EndTime;
7138         unsigned long flags;
7139         MGSL_PARAMS tmp_params;
7140
7141         /* save current port options */
7142         memcpy(&tmp_params,&info->params,sizeof(MGSL_PARAMS));
7143         /* load default port options */
7144         memcpy(&info->params,&default_params,sizeof(MGSL_PARAMS));
7145
7146 #define TESTFRAMESIZE 40
7147
7148         spin_lock_irqsave(&info->irq_spinlock,flags);
7149
7150         /* setup 16C32 for SDLC DMA transfer mode */
7151
7152         usc_reset(info);
7153         usc_set_sdlc_mode(info);
7154         usc_enable_loopback(info,1);
7155
7156         /* Reprogram the RDMR so that the 16C32 does NOT clear the count
7157          * field of the buffer entry after fetching buffer address. This
7158          * way we can detect a DMA failure for a DMA read (which should be
7159          * non-destructive to system memory) before we try and write to
7160          * memory (where a failure could corrupt system memory).
7161          */
7162
7163         /* Receive DMA mode Register (RDMR)
7164          *
7165          * <15..14>     11      DMA mode = Linked List Buffer mode
7166          * <13>         1       RSBinA/L = store Rx status Block in List entry
7167          * <12>         0       1 = Clear count of List Entry after fetching
7168          * <11..10>     00      Address mode = Increment
7169          * <9>          1       Terminate Buffer on RxBound
7170          * <8>          0       Bus Width = 16bits
7171          * <7..0>               ?       status Bits (write as 0s)
7172          *
7173          * 1110 0010 0000 0000 = 0xe200
7174          */
7175
7176         usc_OutDmaReg( info, RDMR, 0xe200 );
7177
7178         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7179
7180
7181         /* SETUP TRANSMIT AND RECEIVE DMA BUFFERS */
7182
7183         FrameSize = TESTFRAMESIZE;
7184
7185         /* setup 1st transmit buffer entry: */
7186         /* with frame size and transmit control word */
7187
7188         info->tx_buffer_list[0].count  = FrameSize;
7189         info->tx_buffer_list[0].rcc    = FrameSize;
7190         info->tx_buffer_list[0].status = 0x4000;
7191
7192         /* build a transmit frame in 1st transmit DMA buffer */
7193
7194         TmpPtr = info->tx_buffer_list[0].virt_addr;
7195         for (i = 0; i < FrameSize; i++ )
7196                 *TmpPtr++ = i;
7197
7198         /* setup 1st receive buffer entry: */
7199         /* clear status, set max receive buffer size */
7200
7201         info->rx_buffer_list[0].status = 0;
7202         info->rx_buffer_list[0].count = FrameSize + 4;
7203
7204         /* zero out the 1st receive buffer */
7205
7206         memset( info->rx_buffer_list[0].virt_addr, 0, FrameSize + 4 );
7207
7208         /* Set count field of next buffer entries to prevent */
7209         /* 16C32 from using buffers after the 1st one. */
7210
7211         info->tx_buffer_list[1].count = 0;
7212         info->rx_buffer_list[1].count = 0;
7213
7214
7215         /***************************/
7216         /* Program 16C32 receiver. */
7217         /***************************/
7218
7219         spin_lock_irqsave(&info->irq_spinlock,flags);
7220
7221         /* setup DMA transfers */
7222         usc_RTCmd( info, RTCmd_PurgeRxFifo );
7223
7224         /* program 16C32 receiver with physical address of 1st DMA buffer entry */
7225         phys_addr = info->rx_buffer_list[0].phys_entry;
7226         usc_OutDmaReg( info, NRARL, (unsigned short)phys_addr );
7227         usc_OutDmaReg( info, NRARU, (unsigned short)(phys_addr >> 16) );
7228
7229         /* Clear the Rx DMA status bits (read RDMR) and start channel */
7230         usc_InDmaReg( info, RDMR );
7231         usc_DmaCmd( info, DmaCmd_InitRxChannel );
7232
7233         /* Enable Receiver (RMR <1..0> = 10) */
7234         usc_OutReg( info, RMR, (unsigned short)((usc_InReg(info, RMR) & 0xfffc) | 0x0002) );
7235
7236         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7237
7238
7239         /*************************************************************/
7240         /* WAIT FOR RECEIVER TO DMA ALL PARAMETERS FROM BUFFER ENTRY */
7241         /*************************************************************/
7242
7243         /* Wait 100ms for interrupt. */
7244         EndTime = jiffies + msecs_to_jiffies(100);
7245
7246         for(;;) {
7247                 if (time_after(jiffies, EndTime)) {
7248                         rc = FALSE;
7249                         break;
7250                 }
7251
7252                 spin_lock_irqsave(&info->irq_spinlock,flags);
7253                 status = usc_InDmaReg( info, RDMR );
7254                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
7255
7256                 if ( !(status & BIT4) && (status & BIT5) ) {
7257                         /* INITG (BIT 4) is inactive (no entry read in progress) AND */
7258                         /* BUSY  (BIT 5) is active (channel still active). */
7259                         /* This means the buffer entry read has completed. */
7260                         break;
7261                 }
7262         }
7263
7264
7265         /******************************/
7266         /* Program 16C32 transmitter. */
7267         /******************************/
7268
7269         spin_lock_irqsave(&info->irq_spinlock,flags);
7270
7271         /* Program the Transmit Character Length Register (TCLR) */
7272         /* and clear FIFO (TCC is loaded with TCLR on FIFO clear) */
7273
7274         usc_OutReg( info, TCLR, (unsigned short)info->tx_buffer_list[0].count );
7275         usc_RTCmd( info, RTCmd_PurgeTxFifo );
7276
7277         /* Program the address of the 1st DMA Buffer Entry in linked list */
7278
7279         phys_addr = info->tx_buffer_list[0].phys_entry;
7280         usc_OutDmaReg( info, NTARL, (unsigned short)phys_addr );
7281         usc_OutDmaReg( info, NTARU, (unsigned short)(phys_addr >> 16) );
7282
7283         /* unlatch Tx status bits, and start transmit channel. */
7284
7285         usc_OutReg( info, TCSR, (unsigned short)(( usc_InReg(info, TCSR) & 0x0f00) | 0xfa) );
7286         usc_DmaCmd( info, DmaCmd_InitTxChannel );
7287
7288         /* wait for DMA controller to fill transmit FIFO */
7289
7290         usc_TCmd( info, TCmd_SelectTicrTxFifostatus );
7291
7292         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7293
7294
7295         /**********************************/
7296         /* WAIT FOR TRANSMIT FIFO TO FILL */
7297         /**********************************/
7298
7299         /* Wait 100ms */
7300         EndTime = jiffies + msecs_to_jiffies(100);
7301
7302         for(;;) {
7303                 if (time_after(jiffies, EndTime)) {
7304                         rc = FALSE;
7305                         break;
7306                 }
7307
7308                 spin_lock_irqsave(&info->irq_spinlock,flags);
7309                 FifoLevel = usc_InReg(info, TICR) >> 8;
7310                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
7311
7312                 if ( FifoLevel < 16 )
7313                         break;
7314                 else
7315                         if ( FrameSize < 32 ) {
7316                                 /* This frame is smaller than the entire transmit FIFO */
7317                                 /* so wait for the entire frame to be loaded. */
7318                                 if ( FifoLevel <= (32 - FrameSize) )
7319                                         break;
7320                         }
7321         }
7322
7323
7324         if ( rc == TRUE )
7325         {
7326                 /* Enable 16C32 transmitter. */
7327
7328                 spin_lock_irqsave(&info->irq_spinlock,flags);
7329
7330                 /* Transmit mode Register (TMR), <1..0> = 10, Enable Transmitter */
7331                 usc_TCmd( info, TCmd_SendFrame );
7332                 usc_OutReg( info, TMR, (unsigned short)((usc_InReg(info, TMR) & 0xfffc) | 0x0002) );
7333
7334                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
7335
7336
7337                 /******************************/
7338                 /* WAIT FOR TRANSMIT COMPLETE */
7339                 /******************************/
7340
7341                 /* Wait 100ms */
7342                 EndTime = jiffies + msecs_to_jiffies(100);
7343
7344                 /* While timer not expired wait for transmit complete */
7345
7346                 spin_lock_irqsave(&info->irq_spinlock,flags);
7347                 status = usc_InReg( info, TCSR );
7348                 spin_unlock_irqrestore(&info->irq_spinlock,flags);
7349
7350                 while ( !(status & (BIT6+BIT5+BIT4+BIT2+BIT1)) ) {
7351                         if (time_after(jiffies, EndTime)) {
7352                                 rc = FALSE;
7353                                 break;
7354                         }
7355
7356                         spin_lock_irqsave(&info->irq_spinlock,flags);
7357                         status = usc_InReg( info, TCSR );
7358                         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7359                 }
7360         }
7361
7362
7363         if ( rc == TRUE ){
7364                 /* CHECK FOR TRANSMIT ERRORS */
7365                 if ( status & (BIT5 + BIT1) )
7366                         rc = FALSE;
7367         }
7368
7369         if ( rc == TRUE ) {
7370                 /* WAIT FOR RECEIVE COMPLETE */
7371
7372                 /* Wait 100ms */
7373                 EndTime = jiffies + msecs_to_jiffies(100);
7374
7375                 /* Wait for 16C32 to write receive status to buffer entry. */
7376                 status=info->rx_buffer_list[0].status;
7377                 while ( status == 0 ) {
7378                         if (time_after(jiffies, EndTime)) {
7379                                 rc = FALSE;
7380                                 break;
7381                         }
7382                         status=info->rx_buffer_list[0].status;
7383                 }
7384         }
7385
7386
7387         if ( rc == TRUE ) {
7388                 /* CHECK FOR RECEIVE ERRORS */
7389                 status = info->rx_buffer_list[0].status;
7390
7391                 if ( status & (BIT8 + BIT3 + BIT1) ) {
7392                         /* receive error has occurred */
7393                         rc = FALSE;
7394                 } else {
7395                         if ( memcmp( info->tx_buffer_list[0].virt_addr ,
7396                                 info->rx_buffer_list[0].virt_addr, FrameSize ) ){
7397                                 rc = FALSE;
7398                         }
7399                 }
7400         }
7401
7402         spin_lock_irqsave(&info->irq_spinlock,flags);
7403         usc_reset( info );
7404         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7405
7406         /* restore current port options */
7407         memcpy(&info->params,&tmp_params,sizeof(MGSL_PARAMS));
7408
7409         return rc;
7410
7411 }       /* end of mgsl_dma_test() */
7412
7413 /* mgsl_adapter_test()
7414  *
7415  *      Perform the register, IRQ, and DMA tests for the 16C32.
7416  *
7417  * Arguments:           info    pointer to device instance data
7418  * Return Value:        0 if success, otherwise -ENODEV
7419  */
7420 static int mgsl_adapter_test( struct mgsl_struct *info )
7421 {
7422         if ( debug_level >= DEBUG_LEVEL_INFO )
7423                 printk( "%s(%d):Testing device %s\n",
7424                         __FILE__,__LINE__,info->device_name );
7425
7426         if ( !mgsl_register_test( info ) ) {
7427                 info->init_error = DiagStatus_AddressFailure;
7428                 printk( "%s(%d):Register test failure for device %s Addr=%04X\n",
7429                         __FILE__,__LINE__,info->device_name, (unsigned short)(info->io_base) );
7430                 return -ENODEV;
7431         }
7432
7433         if ( !mgsl_irq_test( info ) ) {
7434                 info->init_error = DiagStatus_IrqFailure;
7435                 printk( "%s(%d):Interrupt test failure for device %s IRQ=%d\n",
7436                         __FILE__,__LINE__,info->device_name, (unsigned short)(info->irq_level) );
7437                 return -ENODEV;
7438         }
7439
7440         if ( !mgsl_dma_test( info ) ) {
7441                 info->init_error = DiagStatus_DmaFailure;
7442                 printk( "%s(%d):DMA test failure for device %s DMA=%d\n",
7443                         __FILE__,__LINE__,info->device_name, (unsigned short)(info->dma_level) );
7444                 return -ENODEV;
7445         }
7446
7447         if ( debug_level >= DEBUG_LEVEL_INFO )
7448                 printk( "%s(%d):device %s passed diagnostics\n",
7449                         __FILE__,__LINE__,info->device_name );
7450
7451         return 0;
7452
7453 }       /* end of mgsl_adapter_test() */
7454
7455 /* mgsl_memory_test()
7456  *
7457  *      Test the shared memory on a PCI adapter.
7458  *
7459  * Arguments:           info    pointer to device instance data
7460  * Return Value:        TRUE if test passed, otherwise FALSE
7461  */
7462 static BOOLEAN mgsl_memory_test( struct mgsl_struct *info )
7463 {
7464         static unsigned long BitPatterns[] =
7465                 { 0x0, 0x55555555, 0xaaaaaaaa, 0x66666666, 0x99999999, 0xffffffff, 0x12345678 };
7466         unsigned long Patterncount = ARRAY_SIZE(BitPatterns);
7467         unsigned long i;
7468         unsigned long TestLimit = SHARED_MEM_ADDRESS_SIZE/sizeof(unsigned long);
7469         unsigned long * TestAddr;
7470
7471         if ( info->bus_type != MGSL_BUS_TYPE_PCI )
7472                 return TRUE;
7473
7474         TestAddr = (unsigned long *)info->memory_base;
7475
7476         /* Test data lines with test pattern at one location. */
7477
7478         for ( i = 0 ; i < Patterncount ; i++ ) {
7479                 *TestAddr = BitPatterns[i];
7480                 if ( *TestAddr != BitPatterns[i] )
7481                         return FALSE;
7482         }
7483
7484         /* Test address lines with incrementing pattern over */
7485         /* entire address range. */
7486
7487         for ( i = 0 ; i < TestLimit ; i++ ) {
7488                 *TestAddr = i * 4;
7489                 TestAddr++;
7490         }
7491
7492         TestAddr = (unsigned long *)info->memory_base;
7493
7494         for ( i = 0 ; i < TestLimit ; i++ ) {
7495                 if ( *TestAddr != i * 4 )
7496                         return FALSE;
7497                 TestAddr++;
7498         }
7499
7500         memset( info->memory_base, 0, SHARED_MEM_ADDRESS_SIZE );
7501
7502         return TRUE;
7503
7504 }       /* End Of mgsl_memory_test() */
7505
7506
7507 /* mgsl_load_pci_memory()
7508  *
7509  *      Load a large block of data into the PCI shared memory.
7510  *      Use this instead of memcpy() or memmove() to move data
7511  *      into the PCI shared memory.
7512  *
7513  * Notes:
7514  *
7515  *      This function prevents the PCI9050 interface chip from hogging
7516  *      the adapter local bus, which can starve the 16C32 by preventing
7517  *      16C32 bus master cycles.
7518  *
7519  *      The PCI9050 documentation says that the 9050 will always release
7520  *      control of the local bus after completing the current read
7521  *      or write operation.
7522  *
7523  *      It appears that as long as the PCI9050 write FIFO is full, the
7524  *      PCI9050 treats all of the writes as a single burst transaction
7525  *      and will not release the bus. This causes DMA latency problems
7526  *      at high speeds when copying large data blocks to the shared
7527  *      memory.
7528  *
7529  *      This function in effect, breaks the a large shared memory write
7530  *      into multiple transations by interleaving a shared memory read
7531  *      which will flush the write FIFO and 'complete' the write
7532  *      transation. This allows any pending DMA request to gain control
7533  *      of the local bus in a timely fasion.
7534  *
7535  * Arguments:
7536  *
7537  *      TargetPtr       pointer to target address in PCI shared memory
7538  *      SourcePtr       pointer to source buffer for data
7539  *      count           count in bytes of data to copy
7540  *
7541  * Return Value:        None
7542  */
7543 static void mgsl_load_pci_memory( char* TargetPtr, const char* SourcePtr,
7544         unsigned short count )
7545 {
7546         /* 16 32-bit writes @ 60ns each = 960ns max latency on local bus */
7547 #define PCI_LOAD_INTERVAL 64
7548
7549         unsigned short Intervalcount = count / PCI_LOAD_INTERVAL;
7550         unsigned short Index;
7551         unsigned long Dummy;
7552
7553         for ( Index = 0 ; Index < Intervalcount ; Index++ )
7554         {
7555                 memcpy(TargetPtr, SourcePtr, PCI_LOAD_INTERVAL);
7556                 Dummy = *((volatile unsigned long *)TargetPtr);
7557                 TargetPtr += PCI_LOAD_INTERVAL;
7558                 SourcePtr += PCI_LOAD_INTERVAL;
7559         }
7560
7561         memcpy( TargetPtr, SourcePtr, count % PCI_LOAD_INTERVAL );
7562
7563 }       /* End Of mgsl_load_pci_memory() */
7564
7565 static void mgsl_trace_block(struct mgsl_struct *info,const char* data, int count, int xmit)
7566 {
7567         int i;
7568         int linecount;
7569         if (xmit)
7570                 printk("%s tx data:\n",info->device_name);
7571         else
7572                 printk("%s rx data:\n",info->device_name);
7573
7574         while(count) {
7575                 if (count > 16)
7576                         linecount = 16;
7577                 else
7578                         linecount = count;
7579
7580                 for(i=0;i<linecount;i++)
7581                         printk("%02X ",(unsigned char)data[i]);
7582                 for(;i<17;i++)
7583                         printk("   ");
7584                 for(i=0;i<linecount;i++) {
7585                         if (data[i]>=040 && data[i]<=0176)
7586                                 printk("%c",data[i]);
7587                         else
7588                                 printk(".");
7589                 }
7590                 printk("\n");
7591
7592                 data  += linecount;
7593                 count -= linecount;
7594         }
7595 }       /* end of mgsl_trace_block() */
7596
7597 /* mgsl_tx_timeout()
7598  *
7599  *      called when HDLC frame times out
7600  *      update stats and do tx completion processing
7601  *
7602  * Arguments:   context         pointer to device instance data
7603  * Return Value:        None
7604  */
7605 static void mgsl_tx_timeout(unsigned long context)
7606 {
7607         struct mgsl_struct *info = (struct mgsl_struct*)context;
7608         unsigned long flags;
7609
7610         if ( debug_level >= DEBUG_LEVEL_INFO )
7611                 printk( "%s(%d):mgsl_tx_timeout(%s)\n",
7612                         __FILE__,__LINE__,info->device_name);
7613         if(info->tx_active &&
7614            (info->params.mode == MGSL_MODE_HDLC ||
7615             info->params.mode == MGSL_MODE_RAW) ) {
7616                 info->icount.txtimeout++;
7617         }
7618         spin_lock_irqsave(&info->irq_spinlock,flags);
7619         info->tx_active = 0;
7620         info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
7621
7622         if ( info->params.flags & HDLC_FLAG_HDLC_LOOPMODE )
7623                 usc_loopmode_cancel_transmit( info );
7624
7625         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7626
7627 #ifdef CONFIG_HDLC
7628         if (info->netcount)
7629                 hdlcdev_tx_done(info);
7630         else
7631 #endif
7632                 mgsl_bh_transmit(info);
7633
7634 }       /* end of mgsl_tx_timeout() */
7635
7636 /* signal that there are no more frames to send, so that
7637  * line is 'released' by echoing RxD to TxD when current
7638  * transmission is complete (or immediately if no tx in progress).
7639  */
7640 static int mgsl_loopmode_send_done( struct mgsl_struct * info )
7641 {
7642         unsigned long flags;
7643
7644         spin_lock_irqsave(&info->irq_spinlock,flags);
7645         if (info->params.flags & HDLC_FLAG_HDLC_LOOPMODE) {
7646                 if (info->tx_active)
7647                         info->loopmode_send_done_requested = TRUE;
7648                 else
7649                         usc_loopmode_send_done(info);
7650         }
7651         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7652
7653         return 0;
7654 }
7655
7656 /* release the line by echoing RxD to TxD
7657  * upon completion of a transmit frame
7658  */
7659 static void usc_loopmode_send_done( struct mgsl_struct * info )
7660 {
7661         info->loopmode_send_done_requested = FALSE;
7662         /* clear CMR:13 to 0 to start echoing RxData to TxData */
7663         info->cmr_value &= ~BIT13;
7664         usc_OutReg(info, CMR, info->cmr_value);
7665 }
7666
7667 /* abort a transmit in progress while in HDLC LoopMode
7668  */
7669 static void usc_loopmode_cancel_transmit( struct mgsl_struct * info )
7670 {
7671         /* reset tx dma channel and purge TxFifo */
7672         usc_RTCmd( info, RTCmd_PurgeTxFifo );
7673         usc_DmaCmd( info, DmaCmd_ResetTxChannel );
7674         usc_loopmode_send_done( info );
7675 }
7676
7677 /* for HDLC/SDLC LoopMode, setting CMR:13 after the transmitter is enabled
7678  * is an Insert Into Loop action. Upon receipt of a GoAhead sequence (RxAbort)
7679  * we must clear CMR:13 to begin repeating TxData to RxData
7680  */
7681 static void usc_loopmode_insert_request( struct mgsl_struct * info )
7682 {
7683         info->loopmode_insert_requested = TRUE;
7684
7685         /* enable RxAbort irq. On next RxAbort, clear CMR:13 to
7686          * begin repeating TxData on RxData (complete insertion)
7687          */
7688         usc_OutReg( info, RICR,
7689                 (usc_InReg( info, RICR ) | RXSTATUS_ABORT_RECEIVED ) );
7690
7691         /* set CMR:13 to insert into loop on next GoAhead (RxAbort) */
7692         info->cmr_value |= BIT13;
7693         usc_OutReg(info, CMR, info->cmr_value);
7694 }
7695
7696 /* return 1 if station is inserted into the loop, otherwise 0
7697  */
7698 static int usc_loopmode_active( struct mgsl_struct * info)
7699 {
7700         return usc_InReg( info, CCSR ) & BIT7 ? 1 : 0 ;
7701 }
7702
7703 #ifdef CONFIG_HDLC
7704
7705 /**
7706  * called by generic HDLC layer when protocol selected (PPP, frame relay, etc.)
7707  * set encoding and frame check sequence (FCS) options
7708  *
7709  * dev       pointer to network device structure
7710  * encoding  serial encoding setting
7711  * parity    FCS setting
7712  *
7713  * returns 0 if success, otherwise error code
7714  */
7715 static int hdlcdev_attach(struct net_device *dev, unsigned short encoding,
7716                           unsigned short parity)
7717 {
7718         struct mgsl_struct *info = dev_to_port(dev);
7719         unsigned char  new_encoding;
7720         unsigned short new_crctype;
7721
7722         /* return error if TTY interface open */
7723         if (info->count)
7724                 return -EBUSY;
7725
7726         switch (encoding)
7727         {
7728         case ENCODING_NRZ:        new_encoding = HDLC_ENCODING_NRZ; break;
7729         case ENCODING_NRZI:       new_encoding = HDLC_ENCODING_NRZI_SPACE; break;
7730         case ENCODING_FM_MARK:    new_encoding = HDLC_ENCODING_BIPHASE_MARK; break;
7731         case ENCODING_FM_SPACE:   new_encoding = HDLC_ENCODING_BIPHASE_SPACE; break;
7732         case ENCODING_MANCHESTER: new_encoding = HDLC_ENCODING_BIPHASE_LEVEL; break;
7733         default: return -EINVAL;
7734         }
7735
7736         switch (parity)
7737         {
7738         case PARITY_NONE:            new_crctype = HDLC_CRC_NONE; break;
7739         case PARITY_CRC16_PR1_CCITT: new_crctype = HDLC_CRC_16_CCITT; break;
7740         case PARITY_CRC32_PR1_CCITT: new_crctype = HDLC_CRC_32_CCITT; break;
7741         default: return -EINVAL;
7742         }
7743
7744         info->params.encoding = new_encoding;
7745         info->params.crc_type = new_crctype;
7746
7747         /* if network interface up, reprogram hardware */
7748         if (info->netcount)
7749                 mgsl_program_hw(info);
7750
7751         return 0;
7752 }
7753
7754 /**
7755  * called by generic HDLC layer to send frame
7756  *
7757  * skb  socket buffer containing HDLC frame
7758  * dev  pointer to network device structure
7759  *
7760  * returns 0 if success, otherwise error code
7761  */
7762 static int hdlcdev_xmit(struct sk_buff *skb, struct net_device *dev)
7763 {
7764         struct mgsl_struct *info = dev_to_port(dev);
7765         struct net_device_stats *stats = hdlc_stats(dev);
7766         unsigned long flags;
7767
7768         if (debug_level >= DEBUG_LEVEL_INFO)
7769                 printk(KERN_INFO "%s:hdlc_xmit(%s)\n",__FILE__,dev->name);
7770
7771         /* stop sending until this frame completes */
7772         netif_stop_queue(dev);
7773
7774         /* copy data to device buffers */
7775         info->xmit_cnt = skb->len;
7776         mgsl_load_tx_dma_buffer(info, skb->data, skb->len);
7777
7778         /* update network statistics */
7779         stats->tx_packets++;
7780         stats->tx_bytes += skb->len;
7781
7782         /* done with socket buffer, so free it */
7783         dev_kfree_skb(skb);
7784
7785         /* save start time for transmit timeout detection */
7786         dev->trans_start = jiffies;
7787
7788         /* start hardware transmitter if necessary */
7789         spin_lock_irqsave(&info->irq_spinlock,flags);
7790         if (!info->tx_active)
7791                 usc_start_transmitter(info);
7792         spin_unlock_irqrestore(&info->irq_spinlock,flags);
7793
7794         return 0;
7795 }
7796
7797 /**
7798  * called by network layer when interface enabled
7799  * claim resources and initialize hardware
7800  *
7801  * dev  pointer to network device structure
7802  *
7803  * returns 0 if success, otherwise error code
7804  */
7805 static int hdlcdev_open(struct net_device *dev)
7806 {
7807         struct mgsl_struct *info = dev_to_port(dev);
7808         int rc;
7809         unsigned long flags;
7810
7811         if (debug_level >= DEBUG_LEVEL_INFO)
7812                 printk("%s:hdlcdev_open(%s)\n",__FILE__,dev->name);
7813
7814         /* generic HDLC layer open processing */
7815         if ((rc = hdlc_open(dev)))
7816                 return rc;
7817
7818         /* arbitrate between network and tty opens */
7819         spin_lock_irqsave(&info->netlock, flags);
7820         if (info->count != 0 || info->netcount != 0) {
7821                 printk(KERN_WARNING "%s: hdlc_open returning busy\n", dev->name);
7822                 spin_unlock_irqrestore(&info->netlock, flags);
7823                 return -EBUSY;
7824         }
7825         info->netcount=1;
7826         spin_unlock_irqrestore(&info->netlock, flags);
7827
7828         /* claim resources and init adapter */
7829         if ((rc = startup(info)) != 0) {
7830                 spin_lock_irqsave(&info->netlock, flags);
7831                 info->netcount=0;
7832                 spin_unlock_irqrestore(&info->netlock, flags);
7833                 return rc;
7834         }
7835
7836         /* assert DTR and RTS, apply hardware settings */
7837         info->serial_signals |= SerialSignal_RTS + SerialSignal_DTR;
7838         mgsl_program_hw(info);
7839
7840         /* enable network layer transmit */
7841         dev->trans_start = jiffies;
7842         netif_start_queue(dev);
7843
7844         /* inform generic HDLC layer of current DCD status */
7845         spin_lock_irqsave(&info->irq_spinlock, flags);
7846         usc_get_serial_signals(info);
7847         spin_unlock_irqrestore(&info->irq_spinlock, flags);
7848         if (info->serial_signals & SerialSignal_DCD)
7849                 netif_carrier_on(dev);
7850         else
7851                 netif_carrier_off(dev);
7852         return 0;
7853 }
7854
7855 /**
7856  * called by network layer when interface is disabled
7857  * shutdown hardware and release resources
7858  *
7859  * dev  pointer to network device structure
7860  *
7861  * returns 0 if success, otherwise error code
7862  */
7863 static int hdlcdev_close(struct net_device *dev)
7864 {
7865         struct mgsl_struct *info = dev_to_port(dev);
7866         unsigned long flags;
7867
7868         if (debug_level >= DEBUG_LEVEL_INFO)
7869                 printk("%s:hdlcdev_close(%s)\n",__FILE__,dev->name);
7870
7871         netif_stop_queue(dev);
7872
7873         /* shutdown adapter and release resources */
7874         shutdown(info);
7875
7876         hdlc_close(dev);
7877
7878         spin_lock_irqsave(&info->netlock, flags);
7879         info->netcount=0;
7880         spin_unlock_irqrestore(&info->netlock, flags);
7881
7882         return 0;
7883 }
7884
7885 /**
7886  * called by network layer to process IOCTL call to network device
7887  *
7888  * dev  pointer to network device structure
7889  * ifr  pointer to network interface request structure
7890  * cmd  IOCTL command code
7891  *
7892  * returns 0 if success, otherwise error code
7893  */
7894 static int hdlcdev_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
7895 {
7896         const size_t size = sizeof(sync_serial_settings);
7897         sync_serial_settings new_line;
7898         sync_serial_settings __user *line = ifr->ifr_settings.ifs_ifsu.sync;
7899         struct mgsl_struct *info = dev_to_port(dev);
7900         unsigned int flags;
7901
7902         if (debug_level >= DEBUG_LEVEL_INFO)
7903                 printk("%s:hdlcdev_ioctl(%s)\n",__FILE__,dev->name);
7904
7905         /* return error if TTY interface open */
7906         if (info->count)
7907                 return -EBUSY;
7908
7909         if (cmd != SIOCWANDEV)
7910                 return hdlc_ioctl(dev, ifr, cmd);
7911
7912         switch(ifr->ifr_settings.type) {
7913         case IF_GET_IFACE: /* return current sync_serial_settings */
7914
7915                 ifr->ifr_settings.type = IF_IFACE_SYNC_SERIAL;
7916                 if (ifr->ifr_settings.size < size) {
7917                         ifr->ifr_settings.size = size; /* data size wanted */
7918                         return -ENOBUFS;
7919                 }
7920
7921                 flags = info->params.flags & (HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_RXC_DPLL |
7922                                               HDLC_FLAG_RXC_BRG    | HDLC_FLAG_RXC_TXCPIN |
7923                                               HDLC_FLAG_TXC_TXCPIN | HDLC_FLAG_TXC_DPLL |
7924                                               HDLC_FLAG_TXC_BRG    | HDLC_FLAG_TXC_RXCPIN);
7925
7926                 switch (flags){
7927                 case (HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_TXCPIN): new_line.clock_type = CLOCK_EXT; break;
7928                 case (HDLC_FLAG_RXC_BRG    | HDLC_FLAG_TXC_BRG):    new_line.clock_type = CLOCK_INT; break;
7929                 case (HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_BRG):    new_line.clock_type = CLOCK_TXINT; break;
7930                 case (HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_RXCPIN): new_line.clock_type = CLOCK_TXFROMRX; break;
7931                 default: new_line.clock_type = CLOCK_DEFAULT;
7932                 }
7933
7934                 new_line.clock_rate = info->params.clock_speed;
7935                 new_line.loopback   = info->params.loopback ? 1:0;
7936
7937                 if (copy_to_user(line, &new_line, size))
7938                         return -EFAULT;
7939                 return 0;
7940
7941         case IF_IFACE_SYNC_SERIAL: /* set sync_serial_settings */
7942
7943                 if(!capable(CAP_NET_ADMIN))
7944                         return -EPERM;
7945                 if (copy_from_user(&new_line, line, size))
7946                         return -EFAULT;
7947
7948                 switch (new_line.clock_type)
7949                 {
7950                 case CLOCK_EXT:      flags = HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_TXCPIN; break;
7951                 case CLOCK_TXFROMRX: flags = HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_RXCPIN; break;
7952                 case CLOCK_INT:      flags = HDLC_FLAG_RXC_BRG    | HDLC_FLAG_TXC_BRG;    break;
7953                 case CLOCK_TXINT:    flags = HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_TXC_BRG;    break;
7954                 case CLOCK_DEFAULT:  flags = info->params.flags &
7955                                              (HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_RXC_DPLL |
7956                                               HDLC_FLAG_RXC_BRG    | HDLC_FLAG_RXC_TXCPIN |
7957                                               HDLC_FLAG_TXC_TXCPIN | HDLC_FLAG_TXC_DPLL |
7958                                               HDLC_FLAG_TXC_BRG    | HDLC_FLAG_TXC_RXCPIN); break;
7959                 default: return -EINVAL;
7960                 }
7961
7962                 if (new_line.loopback != 0 && new_line.loopback != 1)
7963                         return -EINVAL;
7964
7965                 info->params.flags &= ~(HDLC_FLAG_RXC_RXCPIN | HDLC_FLAG_RXC_DPLL |
7966                                         HDLC_FLAG_RXC_BRG    | HDLC_FLAG_RXC_TXCPIN |
7967                                         HDLC_FLAG_TXC_TXCPIN | HDLC_FLAG_TXC_DPLL |
7968                                         HDLC_FLAG_TXC_BRG    | HDLC_FLAG_TXC_RXCPIN);
7969                 info->params.flags |= flags;
7970
7971                 info->params.loopback = new_line.loopback;
7972
7973                 if (flags & (HDLC_FLAG_RXC_BRG | HDLC_FLAG_TXC_BRG))
7974                         info->params.clock_speed = new_line.clock_rate;
7975                 else
7976                         info->params.clock_speed = 0;
7977
7978                 /* if network interface up, reprogram hardware */
7979                 if (info->netcount)
7980                         mgsl_program_hw(info);
7981                 return 0;
7982
7983         default:
7984                 return hdlc_ioctl(dev, ifr, cmd);
7985         }
7986 }
7987
7988 /**
7989  * called by network layer when transmit timeout is detected
7990  *
7991  * dev  pointer to network device structure
7992  */
7993 static void hdlcdev_tx_timeout(struct net_device *dev)
7994 {
7995         struct mgsl_struct *info = dev_to_port(dev);
7996         struct net_device_stats *stats = hdlc_stats(dev);
7997         unsigned long flags;
7998
7999         if (debug_level >= DEBUG_LEVEL_INFO)
8000                 printk("hdlcdev_tx_timeout(%s)\n",dev->name);
8001
8002         stats->tx_errors++;
8003         stats->tx_aborted_errors++;
8004
8005         spin_lock_irqsave(&info->irq_spinlock,flags);
8006         usc_stop_transmitter(info);
8007         spin_unlock_irqrestore(&info->irq_spinlock,flags);
8008
8009         netif_wake_queue(dev);
8010 }
8011
8012 /**
8013  * called by device driver when transmit completes
8014  * reenable network layer transmit if stopped
8015  *
8016  * info  pointer to device instance information
8017  */
8018 static void hdlcdev_tx_done(struct mgsl_struct *info)
8019 {
8020         if (netif_queue_stopped(info->netdev))
8021                 netif_wake_queue(info->netdev);
8022 }
8023
8024 /**
8025  * called by device driver when frame received
8026  * pass frame to network layer
8027  *
8028  * info  pointer to device instance information
8029  * buf   pointer to buffer contianing frame data
8030  * size  count of data bytes in buf
8031  */
8032 static void hdlcdev_rx(struct mgsl_struct *info, char *buf, int size)
8033 {
8034         struct sk_buff *skb = dev_alloc_skb(size);
8035         struct net_device *dev = info->netdev;
8036         struct net_device_stats *stats = hdlc_stats(dev);
8037
8038         if (debug_level >= DEBUG_LEVEL_INFO)
8039                 printk("hdlcdev_rx(%s)\n",dev->name);
8040
8041         if (skb == NULL) {
8042                 printk(KERN_NOTICE "%s: can't alloc skb, dropping packet\n", dev->name);
8043                 stats->rx_dropped++;
8044                 return;
8045         }
8046
8047         memcpy(skb_put(skb, size),buf,size);
8048
8049         skb->protocol = hdlc_type_trans(skb, info->netdev);
8050
8051         stats->rx_packets++;
8052         stats->rx_bytes += size;
8053
8054         netif_rx(skb);
8055
8056         info->netdev->last_rx = jiffies;
8057 }
8058
8059 /**
8060  * called by device driver when adding device instance
8061  * do generic HDLC initialization
8062  *
8063  * info  pointer to device instance information
8064  *
8065  * returns 0 if success, otherwise error code
8066  */
8067 static int hdlcdev_init(struct mgsl_struct *info)
8068 {
8069         int rc;
8070         struct net_device *dev;
8071         hdlc_device *hdlc;
8072
8073         /* allocate and initialize network and HDLC layer objects */
8074
8075         if (!(dev = alloc_hdlcdev(info))) {
8076                 printk(KERN_ERR "%s:hdlc device allocation failure\n",__FILE__);
8077                 return -ENOMEM;
8078         }
8079
8080         /* for network layer reporting purposes only */
8081         dev->base_addr = info->io_base;
8082         dev->irq       = info->irq_level;
8083         dev->dma       = info->dma_level;
8084
8085         /* network layer callbacks and settings */
8086         dev->do_ioctl       = hdlcdev_ioctl;
8087         dev->open           = hdlcdev_open;
8088         dev->stop           = hdlcdev_close;
8089         dev->tx_timeout     = hdlcdev_tx_timeout;
8090         dev->watchdog_timeo = 10*HZ;
8091         dev->tx_queue_len   = 50;
8092
8093         /* generic HDLC layer callbacks and settings */
8094         hdlc         = dev_to_hdlc(dev);
8095         hdlc->attach = hdlcdev_attach;
8096         hdlc->xmit   = hdlcdev_xmit;
8097
8098         /* register objects with HDLC layer */
8099         if ((rc = register_hdlc_device(dev))) {
8100                 printk(KERN_WARNING "%s:unable to register hdlc device\n",__FILE__);
8101                 free_netdev(dev);
8102                 return rc;
8103         }
8104
8105         info->netdev = dev;
8106         return 0;
8107 }
8108
8109 /**
8110  * called by device driver when removing device instance
8111  * do generic HDLC cleanup
8112  *
8113  * info  pointer to device instance information
8114  */
8115 static void hdlcdev_exit(struct mgsl_struct *info)
8116 {
8117         unregister_hdlc_device(info->netdev);
8118         free_netdev(info->netdev);
8119         info->netdev = NULL;
8120 }
8121
8122 #endif /* CONFIG_HDLC */
8123
8124
8125 static int __devinit synclink_init_one (struct pci_dev *dev,
8126                                         const struct pci_device_id *ent)
8127 {
8128         struct mgsl_struct *info;
8129
8130         if (pci_enable_device(dev)) {
8131                 printk("error enabling pci device %p\n", dev);
8132                 return -EIO;
8133         }
8134
8135         if (!(info = mgsl_allocate_device())) {
8136                 printk("can't allocate device instance data.\n");
8137                 return -EIO;
8138         }
8139
8140         /* Copy user configuration info to device instance data */
8141
8142         info->io_base = pci_resource_start(dev, 2);
8143         info->irq_level = dev->irq;
8144         info->phys_memory_base = pci_resource_start(dev, 3);
8145
8146         /* Because veremap only works on page boundaries we must map
8147          * a larger area than is actually implemented for the LCR
8148          * memory range. We map a full page starting at the page boundary.
8149          */
8150         info->phys_lcr_base = pci_resource_start(dev, 0);
8151         info->lcr_offset    = info->phys_lcr_base & (PAGE_SIZE-1);
8152         info->phys_lcr_base &= ~(PAGE_SIZE-1);
8153
8154         info->bus_type = MGSL_BUS_TYPE_PCI;
8155         info->io_addr_size = 8;
8156         info->irq_flags = IRQF_SHARED;
8157
8158         if (dev->device == 0x0210) {
8159                 /* Version 1 PCI9030 based universal PCI adapter */
8160                 info->misc_ctrl_value = 0x007c4080;
8161                 info->hw_version = 1;
8162         } else {
8163                 /* Version 0 PCI9050 based 5V PCI adapter
8164                  * A PCI9050 bug prevents reading LCR registers if
8165                  * LCR base address bit 7 is set. Maintain shadow
8166                  * value so we can write to LCR misc control reg.
8167                  */
8168                 info->misc_ctrl_value = 0x087e4546;
8169                 info->hw_version = 0;
8170         }
8171
8172         mgsl_add_device(info);
8173
8174         return 0;
8175 }
8176
8177 static void __devexit synclink_remove_one (struct pci_dev *dev)
8178 {
8179 }
8180