| /* |
| * specialix.c -- specialix IO8+ multiport serial driver. |
| * |
| * Copyright (C) 1997 Roger Wolff (R.E.Wolff@BitWizard.nl) |
| * Copyright (C) 1994-1996 Dmitry Gorodchanin (pgmdsg@ibi.com) |
| * |
| * Specialix pays for the development and support of this driver. |
| * Please DO contact io8-linux@specialix.co.uk if you require |
| * support. But please read the documentation (specialix.txt) |
| * first. |
| * |
| * This driver was developped in the BitWizard linux device |
| * driver service. If you require a linux device driver for your |
| * product, please contact devices@BitWizard.nl for a quote. |
| * |
| * This code is firmly based on the riscom/8 serial driver, |
| * written by Dmitry Gorodchanin. The specialix IO8+ card |
| * programming information was obtained from the CL-CD1865 Data |
| * Book, and Specialix document number 6200059: IO8+ Hardware |
| * Functional Specification. |
| * |
| * This program is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU General Public License as |
| * published by the Free Software Foundation; either version 2 of |
| * the License, or (at your option) any later version. |
| * |
| * This program is distributed in the hope that it will be |
| * useful, but WITHOUT ANY WARRANTY; without even the implied |
| * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR |
| * PURPOSE. See the GNU General Public License for more details. |
| * |
| * You should have received a copy of the GNU General Public |
| * License along with this program; if not, write to the Free |
| * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, |
| * USA. |
| * |
| * Revision history: |
| * |
| * Revision 1.0: April 1st 1997. |
| * Initial release for alpha testing. |
| * Revision 1.1: April 14th 1997. |
| * Incorporated Richard Hudsons suggestions, |
| * removed some debugging printk's. |
| * Revision 1.2: April 15th 1997. |
| * Ported to 2.1.x kernels. |
| * Revision 1.3: April 17th 1997 |
| * Backported to 2.0. (Compatibility macros). |
| * Revision 1.4: April 18th 1997 |
| * Fixed DTR/RTS bug that caused the card to indicate |
| * "don't send data" to a modem after the password prompt. |
| * Fixed bug for premature (fake) interrupts. |
| * Revision 1.5: April 19th 1997 |
| * fixed a minor typo in the header file, cleanup a little. |
| * performance warnings are now MAXed at once per minute. |
| * Revision 1.6: May 23 1997 |
| * Changed the specialix=... format to include interrupt. |
| * Revision 1.7: May 27 1997 |
| * Made many more debug printk's a compile time option. |
| * Revision 1.8: Jul 1 1997 |
| * port to linux-2.1.43 kernel. |
| * Revision 1.9: Oct 9 1998 |
| * Added stuff for the IO8+/PCI version. |
| * Revision 1.10: Oct 22 1999 / Jan 21 2000. |
| * Added stuff for setserial. |
| * Nicolas Mailhot (Nicolas.Mailhot@email.enst.fr) |
| * |
| */ |
| |
| #define VERSION "1.11" |
| |
| |
| /* |
| * There is a bunch of documentation about the card, jumpers, config |
| * settings, restrictions, cables, device names and numbers in |
| * Documentation/specialix.txt |
| */ |
| |
| #include <linux/module.h> |
| |
| #include <asm/io.h> |
| #include <linux/kernel.h> |
| #include <linux/sched.h> |
| #include <linux/ioport.h> |
| #include <linux/interrupt.h> |
| #include <linux/errno.h> |
| #include <linux/tty.h> |
| #include <linux/tty_flip.h> |
| #include <linux/mm.h> |
| #include <linux/serial.h> |
| #include <linux/fcntl.h> |
| #include <linux/major.h> |
| #include <linux/delay.h> |
| #include <linux/pci.h> |
| #include <linux/init.h> |
| #include <asm/uaccess.h> |
| |
| #include "specialix_io8.h" |
| #include "cd1865.h" |
| |
| |
| /* |
| This driver can spew a whole lot of debugging output at you. If you |
| need maximum performance, you should disable the DEBUG define. To |
| aid in debugging in the field, I'm leaving the compile-time debug |
| features enabled, and disable them "runtime". That allows me to |
| instruct people with problems to enable debugging without requiring |
| them to recompile... |
| */ |
| #define DEBUG |
| |
| static int sx_debug; |
| static int sx_rxfifo = SPECIALIX_RXFIFO; |
| |
| #ifdef DEBUG |
| #define dprintk(f, str...) if (sx_debug & f) printk (str) |
| #else |
| #define dprintk(f, str...) /* nothing */ |
| #endif |
| |
| #define SX_DEBUG_FLOW 0x0001 |
| #define SX_DEBUG_DATA 0x0002 |
| #define SX_DEBUG_PROBE 0x0004 |
| #define SX_DEBUG_CHAN 0x0008 |
| #define SX_DEBUG_INIT 0x0010 |
| #define SX_DEBUG_RX 0x0020 |
| #define SX_DEBUG_TX 0x0040 |
| #define SX_DEBUG_IRQ 0x0080 |
| #define SX_DEBUG_OPEN 0x0100 |
| #define SX_DEBUG_TERMIOS 0x0200 |
| #define SX_DEBUG_SIGNALS 0x0400 |
| #define SX_DEBUG_FIFO 0x0800 |
| |
| |
| #define func_enter() dprintk (SX_DEBUG_FLOW, "io8: enter %s\n",__func__) |
| #define func_exit() dprintk (SX_DEBUG_FLOW, "io8: exit %s\n", __func__) |
| |
| #define jiffies_from_ms(a) ((((a) * HZ)/1000)+1) |
| |
| |
| /* Configurable options: */ |
| |
| /* Am I paranoid or not ? ;-) */ |
| #define SPECIALIX_PARANOIA_CHECK |
| |
| /* Do I trust the IRQ from the card? (enabeling it doesn't seem to help) |
| When the IRQ routine leaves the chip in a state that is keeps on |
| requiring attention, the timer doesn't help either. */ |
| #undef SPECIALIX_TIMER |
| |
| #ifdef SPECIALIX_TIMER |
| static int sx_poll = HZ; |
| #endif |
| |
| |
| |
| /* |
| * The following defines are mostly for testing purposes. But if you need |
| * some nice reporting in your syslog, you can define them also. |
| */ |
| #undef SX_REPORT_FIFO |
| #undef SX_REPORT_OVERRUN |
| |
| |
| |
| #ifdef CONFIG_SPECIALIX_RTSCTS |
| #define SX_CRTSCTS(bla) 1 |
| #else |
| #define SX_CRTSCTS(tty) C_CRTSCTS(tty) |
| #endif |
| |
| |
| /* Used to be outb (0xff, 0x80); */ |
| #define short_pause() udelay (1) |
| |
| |
| #define SPECIALIX_LEGAL_FLAGS \ |
| (ASYNC_HUP_NOTIFY | ASYNC_SAK | ASYNC_SPLIT_TERMIOS | \ |
| ASYNC_SPD_HI | ASYNC_SPEED_VHI | ASYNC_SESSION_LOCKOUT | \ |
| ASYNC_PGRP_LOCKOUT | ASYNC_CALLOUT_NOHUP) |
| |
| static struct tty_driver *specialix_driver; |
| |
| static struct specialix_board sx_board[SX_NBOARD] = { |
| { 0, SX_IOBASE1, 9, }, |
| { 0, SX_IOBASE2, 11, }, |
| { 0, SX_IOBASE3, 12, }, |
| { 0, SX_IOBASE4, 15, }, |
| }; |
| |
| static struct specialix_port sx_port[SX_NBOARD * SX_NPORT]; |
| |
| |
| #ifdef SPECIALIX_TIMER |
| static struct timer_list missed_irq_timer; |
| static irqreturn_t sx_interrupt(int irq, void * dev_id); |
| #endif |
| |
| |
| |
| static inline int sx_paranoia_check(struct specialix_port const * port, |
| char *name, const char *routine) |
| { |
| #ifdef SPECIALIX_PARANOIA_CHECK |
| static const char *badmagic = |
| KERN_ERR "sx: Warning: bad specialix port magic number for device %s in %s\n"; |
| static const char *badinfo = |
| KERN_ERR "sx: Warning: null specialix port for device %s in %s\n"; |
| |
| if (!port) { |
| printk(badinfo, name, routine); |
| return 1; |
| } |
| if (port->magic != SPECIALIX_MAGIC) { |
| printk(badmagic, name, routine); |
| return 1; |
| } |
| #endif |
| return 0; |
| } |
| |
| |
| /* |
| * |
| * Service functions for specialix IO8+ driver. |
| * |
| */ |
| |
| /* Get board number from pointer */ |
| static inline int board_No (struct specialix_board * bp) |
| { |
| return bp - sx_board; |
| } |
| |
| |
| /* Get port number from pointer */ |
| static inline int port_No (struct specialix_port const * port) |
| { |
| return SX_PORT(port - sx_port); |
| } |
| |
| |
| /* Get pointer to board from pointer to port */ |
| static inline struct specialix_board * port_Board(struct specialix_port const * port) |
| { |
| return &sx_board[SX_BOARD(port - sx_port)]; |
| } |
| |
| |
| /* Input Byte from CL CD186x register */ |
| static inline unsigned char sx_in(struct specialix_board * bp, unsigned short reg) |
| { |
| bp->reg = reg | 0x80; |
| outb (reg | 0x80, bp->base + SX_ADDR_REG); |
| return inb (bp->base + SX_DATA_REG); |
| } |
| |
| |
| /* Output Byte to CL CD186x register */ |
| static inline void sx_out(struct specialix_board * bp, unsigned short reg, |
| unsigned char val) |
| { |
| bp->reg = reg | 0x80; |
| outb (reg | 0x80, bp->base + SX_ADDR_REG); |
| outb (val, bp->base + SX_DATA_REG); |
| } |
| |
| |
| /* Input Byte from CL CD186x register */ |
| static inline unsigned char sx_in_off(struct specialix_board * bp, unsigned short reg) |
| { |
| bp->reg = reg; |
| outb (reg, bp->base + SX_ADDR_REG); |
| return inb (bp->base + SX_DATA_REG); |
| } |
| |
| |
| /* Output Byte to CL CD186x register */ |
| static inline void sx_out_off(struct specialix_board * bp, unsigned short reg, |
| unsigned char val) |
| { |
| bp->reg = reg; |
| outb (reg, bp->base + SX_ADDR_REG); |
| outb (val, bp->base + SX_DATA_REG); |
| } |
| |
| |
| /* Wait for Channel Command Register ready */ |
| static inline void sx_wait_CCR(struct specialix_board * bp) |
| { |
| unsigned long delay, flags; |
| unsigned char ccr; |
| |
| for (delay = SX_CCR_TIMEOUT; delay; delay--) { |
| spin_lock_irqsave(&bp->lock, flags); |
| ccr = sx_in(bp, CD186x_CCR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (!ccr) |
| return; |
| udelay (1); |
| } |
| |
| printk(KERN_ERR "sx%d: Timeout waiting for CCR.\n", board_No(bp)); |
| } |
| |
| |
| /* Wait for Channel Command Register ready */ |
| static inline void sx_wait_CCR_off(struct specialix_board * bp) |
| { |
| unsigned long delay; |
| unsigned char crr; |
| unsigned long flags; |
| |
| for (delay = SX_CCR_TIMEOUT; delay; delay--) { |
| spin_lock_irqsave(&bp->lock, flags); |
| crr = sx_in_off(bp, CD186x_CCR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (!crr) |
| return; |
| udelay (1); |
| } |
| |
| printk(KERN_ERR "sx%d: Timeout waiting for CCR.\n", board_No(bp)); |
| } |
| |
| |
| /* |
| * specialix IO8+ IO range functions. |
| */ |
| |
| static inline int sx_request_io_range(struct specialix_board * bp) |
| { |
| return request_region(bp->base, |
| bp->flags & SX_BOARD_IS_PCI ? SX_PCI_IO_SPACE : SX_IO_SPACE, |
| "specialix IO8+") == NULL; |
| } |
| |
| |
| static inline void sx_release_io_range(struct specialix_board * bp) |
| { |
| release_region(bp->base, |
| bp->flags&SX_BOARD_IS_PCI?SX_PCI_IO_SPACE:SX_IO_SPACE); |
| } |
| |
| |
| /* Set the IRQ using the RTS lines that run to the PAL on the board.... */ |
| static int sx_set_irq ( struct specialix_board *bp) |
| { |
| int virq; |
| int i; |
| unsigned long flags; |
| |
| if (bp->flags & SX_BOARD_IS_PCI) |
| return 1; |
| switch (bp->irq) { |
| /* In the same order as in the docs... */ |
| case 15: virq = 0;break; |
| case 12: virq = 1;break; |
| case 11: virq = 2;break; |
| case 9: virq = 3;break; |
| default: printk (KERN_ERR "Speclialix: cannot set irq to %d.\n", bp->irq); |
| return 0; |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| for (i=0;i<2;i++) { |
| sx_out(bp, CD186x_CAR, i); |
| sx_out(bp, CD186x_MSVRTS, ((virq >> i) & 0x1)? MSVR_RTS:0); |
| } |
| spin_unlock_irqrestore(&bp->lock, flags); |
| return 1; |
| } |
| |
| |
| /* Reset and setup CD186x chip */ |
| static int sx_init_CD186x(struct specialix_board * bp) |
| { |
| unsigned long flags; |
| int scaler; |
| int rv = 1; |
| |
| func_enter(); |
| sx_wait_CCR_off(bp); /* Wait for CCR ready */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out_off(bp, CD186x_CCR, CCR_HARDRESET); /* Reset CD186x chip */ |
| spin_unlock_irqrestore(&bp->lock, flags); |
| msleep(50); /* Delay 0.05 sec */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out_off(bp, CD186x_GIVR, SX_ID); /* Set ID for this chip */ |
| sx_out_off(bp, CD186x_GICR, 0); /* Clear all bits */ |
| sx_out_off(bp, CD186x_PILR1, SX_ACK_MINT); /* Prio for modem intr */ |
| sx_out_off(bp, CD186x_PILR2, SX_ACK_TINT); /* Prio for transmitter intr */ |
| sx_out_off(bp, CD186x_PILR3, SX_ACK_RINT); /* Prio for receiver intr */ |
| /* Set RegAckEn */ |
| sx_out_off(bp, CD186x_SRCR, sx_in (bp, CD186x_SRCR) | SRCR_REGACKEN); |
| |
| /* Setting up prescaler. We need 4 ticks per 1 ms */ |
| scaler = SX_OSCFREQ/SPECIALIX_TPS; |
| |
| sx_out_off(bp, CD186x_PPRH, scaler >> 8); |
| sx_out_off(bp, CD186x_PPRL, scaler & 0xff); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| if (!sx_set_irq (bp)) { |
| /* Figure out how to pass this along... */ |
| printk (KERN_ERR "Cannot set irq to %d.\n", bp->irq); |
| rv = 0; |
| } |
| |
| func_exit(); |
| return rv; |
| } |
| |
| |
| static int read_cross_byte (struct specialix_board *bp, int reg, int bit) |
| { |
| int i; |
| int t; |
| unsigned long flags; |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| for (i=0, t=0;i<8;i++) { |
| sx_out_off (bp, CD186x_CAR, i); |
| if (sx_in_off (bp, reg) & bit) |
| t |= 1 << i; |
| } |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| return t; |
| } |
| |
| |
| #ifdef SPECIALIX_TIMER |
| void missed_irq (unsigned long data) |
| { |
| unsigned char irq; |
| unsigned long flags; |
| struct specialix_board *bp = (struct specialix_board *)data; |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| irq = sx_in ((struct specialix_board *)data, CD186x_SRSR) & |
| (SRSR_RREQint | |
| SRSR_TREQint | |
| SRSR_MREQint); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (irq) { |
| printk (KERN_INFO "Missed interrupt... Calling int from timer. \n"); |
| sx_interrupt (-1, bp); |
| } |
| mod_timer(&missed_irq_timer, jiffies + sx_poll); |
| } |
| #endif |
| |
| |
| |
| /* Main probing routine, also sets irq. */ |
| static int sx_probe(struct specialix_board *bp) |
| { |
| unsigned char val1, val2; |
| #if 0 |
| int irqs = 0; |
| int retries; |
| #endif |
| int rev; |
| int chip; |
| |
| func_enter(); |
| |
| if (sx_request_io_range(bp)) { |
| func_exit(); |
| return 1; |
| } |
| |
| /* Are the I/O ports here ? */ |
| sx_out_off(bp, CD186x_PPRL, 0x5a); |
| short_pause (); |
| val1 = sx_in_off(bp, CD186x_PPRL); |
| |
| sx_out_off(bp, CD186x_PPRL, 0xa5); |
| short_pause (); |
| val2 = sx_in_off(bp, CD186x_PPRL); |
| |
| |
| if ((val1 != 0x5a) || (val2 != 0xa5)) { |
| printk(KERN_INFO "sx%d: specialix IO8+ Board at 0x%03x not found.\n", |
| board_No(bp), bp->base); |
| sx_release_io_range(bp); |
| func_exit(); |
| return 1; |
| } |
| |
| /* Check the DSR lines that Specialix uses as board |
| identification */ |
| val1 = read_cross_byte (bp, CD186x_MSVR, MSVR_DSR); |
| val2 = read_cross_byte (bp, CD186x_MSVR, MSVR_RTS); |
| dprintk (SX_DEBUG_INIT, "sx%d: DSR lines are: %02x, rts lines are: %02x\n", |
| board_No(bp), val1, val2); |
| |
| /* They managed to switch the bit order between the docs and |
| the IO8+ card. The new PCI card now conforms to old docs. |
| They changed the PCI docs to reflect the situation on the |
| old card. */ |
| val2 = (bp->flags & SX_BOARD_IS_PCI)?0x4d : 0xb2; |
| if (val1 != val2) { |
| printk(KERN_INFO "sx%d: specialix IO8+ ID %02x at 0x%03x not found (%02x).\n", |
| board_No(bp), val2, bp->base, val1); |
| sx_release_io_range(bp); |
| func_exit(); |
| return 1; |
| } |
| |
| |
| #if 0 |
| /* It's time to find IRQ for this board */ |
| for (retries = 0; retries < 5 && irqs <= 0; retries++) { |
| irqs = probe_irq_on(); |
| sx_init_CD186x(bp); /* Reset CD186x chip */ |
| sx_out(bp, CD186x_CAR, 2); /* Select port 2 */ |
| sx_wait_CCR(bp); |
| sx_out(bp, CD186x_CCR, CCR_TXEN); /* Enable transmitter */ |
| sx_out(bp, CD186x_IER, IER_TXRDY); /* Enable tx empty intr */ |
| msleep(50); |
| irqs = probe_irq_off(irqs); |
| |
| dprintk (SX_DEBUG_INIT, "SRSR = %02x, ", sx_in(bp, CD186x_SRSR)); |
| dprintk (SX_DEBUG_INIT, "TRAR = %02x, ", sx_in(bp, CD186x_TRAR)); |
| dprintk (SX_DEBUG_INIT, "GIVR = %02x, ", sx_in(bp, CD186x_GIVR)); |
| dprintk (SX_DEBUG_INIT, "GICR = %02x, ", sx_in(bp, CD186x_GICR)); |
| dprintk (SX_DEBUG_INIT, "\n"); |
| |
| /* Reset CD186x again */ |
| if (!sx_init_CD186x(bp)) { |
| /* Hmmm. This is dead code anyway. */ |
| } |
| |
| dprintk (SX_DEBUG_INIT "val1 = %02x, val2 = %02x, val3 = %02x.\n", |
| val1, val2, val3); |
| |
| } |
| |
| #if 0 |
| if (irqs <= 0) { |
| printk(KERN_ERR "sx%d: Can't find IRQ for specialix IO8+ board at 0x%03x.\n", |
| board_No(bp), bp->base); |
| sx_release_io_range(bp); |
| func_exit(); |
| return 1; |
| } |
| #endif |
| printk (KERN_INFO "Started with irq=%d, but now have irq=%d.\n", bp->irq, irqs); |
| if (irqs > 0) |
| bp->irq = irqs; |
| #endif |
| /* Reset CD186x again */ |
| if (!sx_init_CD186x(bp)) { |
| sx_release_io_range(bp); |
| func_exit(); |
| return 1; |
| } |
| |
| sx_request_io_range(bp); |
| bp->flags |= SX_BOARD_PRESENT; |
| |
| /* Chip revcode pkgtype |
| GFRCR SRCR bit 7 |
| CD180 rev B 0x81 0 |
| CD180 rev C 0x82 0 |
| CD1864 rev A 0x82 1 |
| CD1865 rev A 0x83 1 -- Do not use!!! Does not work. |
| CD1865 rev B 0x84 1 |
| -- Thanks to Gwen Wang, Cirrus Logic. |
| */ |
| |
| switch (sx_in_off(bp, CD186x_GFRCR)) { |
| case 0x82:chip = 1864;rev='A';break; |
| case 0x83:chip = 1865;rev='A';break; |
| case 0x84:chip = 1865;rev='B';break; |
| case 0x85:chip = 1865;rev='C';break; /* Does not exist at this time */ |
| default:chip=-1;rev='x'; |
| } |
| |
| dprintk (SX_DEBUG_INIT, " GFCR = 0x%02x\n", sx_in_off(bp, CD186x_GFRCR) ); |
| |
| #ifdef SPECIALIX_TIMER |
| setup_timer(&missed_irq_timer, missed_irq, (unsigned long)bp); |
| mod_timer(&missed_irq_timer, jiffies + sx_poll); |
| #endif |
| |
| printk(KERN_INFO"sx%d: specialix IO8+ board detected at 0x%03x, IRQ %d, CD%d Rev. %c.\n", |
| board_No(bp), |
| bp->base, bp->irq, |
| chip, rev); |
| |
| func_exit(); |
| return 0; |
| } |
| |
| /* |
| * |
| * Interrupt processing routines. |
| * */ |
| |
| static inline struct specialix_port * sx_get_port(struct specialix_board * bp, |
| unsigned char const * what) |
| { |
| unsigned char channel; |
| struct specialix_port * port = NULL; |
| |
| channel = sx_in(bp, CD186x_GICR) >> GICR_CHAN_OFF; |
| dprintk (SX_DEBUG_CHAN, "channel: %d\n", channel); |
| if (channel < CD186x_NCH) { |
| port = &sx_port[board_No(bp) * SX_NPORT + channel]; |
| dprintk (SX_DEBUG_CHAN, "port: %d %p flags: 0x%lx\n",board_No(bp) * SX_NPORT + channel, port, port->port.flags & ASYNC_INITIALIZED); |
| |
| if (port->port.flags & ASYNC_INITIALIZED) { |
| dprintk (SX_DEBUG_CHAN, "port: %d %p\n", channel, port); |
| func_exit(); |
| return port; |
| } |
| } |
| printk(KERN_INFO "sx%d: %s interrupt from invalid port %d\n", |
| board_No(bp), what, channel); |
| return NULL; |
| } |
| |
| |
| static inline void sx_receive_exc(struct specialix_board * bp) |
| { |
| struct specialix_port *port; |
| struct tty_struct *tty; |
| unsigned char status; |
| unsigned char ch, flag; |
| |
| func_enter(); |
| |
| port = sx_get_port(bp, "Receive"); |
| if (!port) { |
| dprintk (SX_DEBUG_RX, "Hmm, couldn't find port.\n"); |
| func_exit(); |
| return; |
| } |
| tty = port->port.tty; |
| |
| status = sx_in(bp, CD186x_RCSR); |
| |
| dprintk (SX_DEBUG_RX, "status: 0x%x\n", status); |
| if (status & RCSR_OE) { |
| port->overrun++; |
| dprintk(SX_DEBUG_FIFO, "sx%d: port %d: Overrun. Total %ld overruns.\n", |
| board_No(bp), port_No(port), port->overrun); |
| } |
| status &= port->mark_mask; |
| |
| /* This flip buffer check needs to be below the reading of the |
| status register to reset the chip's IRQ.... */ |
| if (tty_buffer_request_room(tty, 1) == 0) { |
| dprintk(SX_DEBUG_FIFO, "sx%d: port %d: Working around flip buffer overflow.\n", |
| board_No(bp), port_No(port)); |
| func_exit(); |
| return; |
| } |
| |
| ch = sx_in(bp, CD186x_RDR); |
| if (!status) { |
| func_exit(); |
| return; |
| } |
| if (status & RCSR_TOUT) { |
| printk(KERN_INFO "sx%d: port %d: Receiver timeout. Hardware problems ?\n", |
| board_No(bp), port_No(port)); |
| func_exit(); |
| return; |
| |
| } else if (status & RCSR_BREAK) { |
| dprintk(SX_DEBUG_RX, "sx%d: port %d: Handling break...\n", |
| board_No(bp), port_No(port)); |
| flag = TTY_BREAK; |
| if (port->port.flags & ASYNC_SAK) |
| do_SAK(tty); |
| |
| } else if (status & RCSR_PE) |
| flag = TTY_PARITY; |
| |
| else if (status & RCSR_FE) |
| flag = TTY_FRAME; |
| |
| else if (status & RCSR_OE) |
| flag = TTY_OVERRUN; |
| |
| else |
| flag = TTY_NORMAL; |
| |
| if(tty_insert_flip_char(tty, ch, flag)) |
| tty_flip_buffer_push(tty); |
| func_exit(); |
| } |
| |
| |
| static inline void sx_receive(struct specialix_board * bp) |
| { |
| struct specialix_port *port; |
| struct tty_struct *tty; |
| unsigned char count; |
| |
| func_enter(); |
| |
| if (!(port = sx_get_port(bp, "Receive"))) { |
| dprintk (SX_DEBUG_RX, "Hmm, couldn't find port.\n"); |
| func_exit(); |
| return; |
| } |
| tty = port->port.tty; |
| |
| count = sx_in(bp, CD186x_RDCR); |
| dprintk (SX_DEBUG_RX, "port: %p: count: %d\n", port, count); |
| port->hits[count > 8 ? 9 : count]++; |
| |
| tty_buffer_request_room(tty, count); |
| |
| while (count--) |
| tty_insert_flip_char(tty, sx_in(bp, CD186x_RDR), TTY_NORMAL); |
| tty_flip_buffer_push(tty); |
| func_exit(); |
| } |
| |
| |
| static inline void sx_transmit(struct specialix_board * bp) |
| { |
| struct specialix_port *port; |
| struct tty_struct *tty; |
| unsigned char count; |
| |
| func_enter(); |
| if (!(port = sx_get_port(bp, "Transmit"))) { |
| func_exit(); |
| return; |
| } |
| dprintk (SX_DEBUG_TX, "port: %p\n", port); |
| tty = port->port.tty; |
| |
| if (port->IER & IER_TXEMPTY) { |
| /* FIFO drained */ |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| port->IER &= ~IER_TXEMPTY; |
| sx_out(bp, CD186x_IER, port->IER); |
| func_exit(); |
| return; |
| } |
| |
| if ((port->xmit_cnt <= 0 && !port->break_length) |
| || tty->stopped || tty->hw_stopped) { |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| port->IER &= ~IER_TXRDY; |
| sx_out(bp, CD186x_IER, port->IER); |
| func_exit(); |
| return; |
| } |
| |
| if (port->break_length) { |
| if (port->break_length > 0) { |
| if (port->COR2 & COR2_ETC) { |
| sx_out(bp, CD186x_TDR, CD186x_C_ESC); |
| sx_out(bp, CD186x_TDR, CD186x_C_SBRK); |
| port->COR2 &= ~COR2_ETC; |
| } |
| count = min_t(int, port->break_length, 0xff); |
| sx_out(bp, CD186x_TDR, CD186x_C_ESC); |
| sx_out(bp, CD186x_TDR, CD186x_C_DELAY); |
| sx_out(bp, CD186x_TDR, count); |
| if (!(port->break_length -= count)) |
| port->break_length--; |
| } else { |
| sx_out(bp, CD186x_TDR, CD186x_C_ESC); |
| sx_out(bp, CD186x_TDR, CD186x_C_EBRK); |
| sx_out(bp, CD186x_COR2, port->COR2); |
| sx_wait_CCR(bp); |
| sx_out(bp, CD186x_CCR, CCR_CORCHG2); |
| port->break_length = 0; |
| } |
| |
| func_exit(); |
| return; |
| } |
| |
| count = CD186x_NFIFO; |
| do { |
| sx_out(bp, CD186x_TDR, port->xmit_buf[port->xmit_tail++]); |
| port->xmit_tail = port->xmit_tail & (SERIAL_XMIT_SIZE-1); |
| if (--port->xmit_cnt <= 0) |
| break; |
| } while (--count > 0); |
| |
| if (port->xmit_cnt <= 0) { |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| port->IER &= ~IER_TXRDY; |
| sx_out(bp, CD186x_IER, port->IER); |
| } |
| if (port->xmit_cnt <= port->wakeup_chars) |
| tty_wakeup(tty); |
| |
| func_exit(); |
| } |
| |
| |
| static inline void sx_check_modem(struct specialix_board * bp) |
| { |
| struct specialix_port *port; |
| struct tty_struct *tty; |
| unsigned char mcr; |
| int msvr_cd; |
| |
| dprintk (SX_DEBUG_SIGNALS, "Modem intr. "); |
| if (!(port = sx_get_port(bp, "Modem"))) |
| return; |
| |
| tty = port->port.tty; |
| |
| mcr = sx_in(bp, CD186x_MCR); |
| printk ("mcr = %02x.\n", mcr); |
| |
| if ((mcr & MCR_CDCHG)) { |
| dprintk (SX_DEBUG_SIGNALS, "CD just changed... "); |
| msvr_cd = sx_in(bp, CD186x_MSVR) & MSVR_CD; |
| if (msvr_cd) { |
| dprintk (SX_DEBUG_SIGNALS, "Waking up guys in open.\n"); |
| wake_up_interruptible(&port->port.open_wait); |
| } else { |
| dprintk (SX_DEBUG_SIGNALS, "Sending HUP.\n"); |
| tty_hangup(tty); |
| } |
| } |
| |
| #ifdef SPECIALIX_BRAIN_DAMAGED_CTS |
| if (mcr & MCR_CTSCHG) { |
| if (sx_in(bp, CD186x_MSVR) & MSVR_CTS) { |
| tty->hw_stopped = 0; |
| port->IER |= IER_TXRDY; |
| if (port->xmit_cnt <= port->wakeup_chars) |
| tty_wakeup(tty); |
| } else { |
| tty->hw_stopped = 1; |
| port->IER &= ~IER_TXRDY; |
| } |
| sx_out(bp, CD186x_IER, port->IER); |
| } |
| if (mcr & MCR_DSSXHG) { |
| if (sx_in(bp, CD186x_MSVR) & MSVR_DSR) { |
| tty->hw_stopped = 0; |
| port->IER |= IER_TXRDY; |
| if (port->xmit_cnt <= port->wakeup_chars) |
| tty_wakeup(tty); |
| } else { |
| tty->hw_stopped = 1; |
| port->IER &= ~IER_TXRDY; |
| } |
| sx_out(bp, CD186x_IER, port->IER); |
| } |
| #endif /* SPECIALIX_BRAIN_DAMAGED_CTS */ |
| |
| /* Clear change bits */ |
| sx_out(bp, CD186x_MCR, 0); |
| } |
| |
| |
| /* The main interrupt processing routine */ |
| static irqreturn_t sx_interrupt(int dummy, void *dev_id) |
| { |
| unsigned char status; |
| unsigned char ack; |
| struct specialix_board *bp = dev_id; |
| unsigned long loop = 0; |
| int saved_reg; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| |
| dprintk (SX_DEBUG_FLOW, "enter %s port %d room: %ld\n", __func__, port_No(sx_get_port(bp, "INT")), SERIAL_XMIT_SIZE - sx_get_port(bp, "ITN")->xmit_cnt - 1); |
| if (!(bp->flags & SX_BOARD_ACTIVE)) { |
| dprintk (SX_DEBUG_IRQ, "sx: False interrupt. irq %d.\n", bp->irq); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| func_exit(); |
| return IRQ_NONE; |
| } |
| |
| saved_reg = bp->reg; |
| |
| while ((++loop < 16) && (status = (sx_in(bp, CD186x_SRSR) & |
| (SRSR_RREQint | |
| SRSR_TREQint | |
| SRSR_MREQint)))) { |
| if (status & SRSR_RREQint) { |
| ack = sx_in(bp, CD186x_RRAR); |
| |
| if (ack == (SX_ID | GIVR_IT_RCV)) |
| sx_receive(bp); |
| else if (ack == (SX_ID | GIVR_IT_REXC)) |
| sx_receive_exc(bp); |
| else |
| printk(KERN_ERR "sx%d: status: 0x%x Bad receive ack 0x%02x.\n", |
| board_No(bp), status, ack); |
| |
| } else if (status & SRSR_TREQint) { |
| ack = sx_in(bp, CD186x_TRAR); |
| |
| if (ack == (SX_ID | GIVR_IT_TX)) |
| sx_transmit(bp); |
| else |
| printk(KERN_ERR "sx%d: status: 0x%x Bad transmit ack 0x%02x. port: %d\n", |
| board_No(bp), status, ack, port_No (sx_get_port (bp, "Int"))); |
| } else if (status & SRSR_MREQint) { |
| ack = sx_in(bp, CD186x_MRAR); |
| |
| if (ack == (SX_ID | GIVR_IT_MODEM)) |
| sx_check_modem(bp); |
| else |
| printk(KERN_ERR "sx%d: status: 0x%x Bad modem ack 0x%02x.\n", |
| board_No(bp), status, ack); |
| |
| } |
| |
| sx_out(bp, CD186x_EOIR, 0); /* Mark end of interrupt */ |
| } |
| bp->reg = saved_reg; |
| outb (bp->reg, bp->base + SX_ADDR_REG); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| func_exit(); |
| return IRQ_HANDLED; |
| } |
| |
| |
| /* |
| * Routines for open & close processing. |
| */ |
| |
| static void turn_ints_off (struct specialix_board *bp) |
| { |
| unsigned long flags; |
| |
| func_enter(); |
| if (bp->flags & SX_BOARD_IS_PCI) { |
| /* This was intended for enabeling the interrupt on the |
| * PCI card. However it seems that it's already enabled |
| * and as PCI interrupts can be shared, there is no real |
| * reason to have to turn it off. */ |
| } |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| (void) sx_in_off (bp, 0); /* Turn off interrupts. */ |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| func_exit(); |
| } |
| |
| static void turn_ints_on (struct specialix_board *bp) |
| { |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (bp->flags & SX_BOARD_IS_PCI) { |
| /* play with the PCI chip. See comment above. */ |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| (void) sx_in (bp, 0); /* Turn ON interrupts. */ |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| /* Called with disabled interrupts */ |
| static inline int sx_setup_board(struct specialix_board * bp) |
| { |
| int error; |
| |
| if (bp->flags & SX_BOARD_ACTIVE) |
| return 0; |
| |
| if (bp->flags & SX_BOARD_IS_PCI) |
| error = request_irq(bp->irq, sx_interrupt, IRQF_DISABLED | IRQF_SHARED, "specialix IO8+", bp); |
| else |
| error = request_irq(bp->irq, sx_interrupt, IRQF_DISABLED, "specialix IO8+", bp); |
| |
| if (error) |
| return error; |
| |
| turn_ints_on (bp); |
| bp->flags |= SX_BOARD_ACTIVE; |
| |
| return 0; |
| } |
| |
| |
| /* Called with disabled interrupts */ |
| static inline void sx_shutdown_board(struct specialix_board *bp) |
| { |
| func_enter(); |
| |
| if (!(bp->flags & SX_BOARD_ACTIVE)) { |
| func_exit(); |
| return; |
| } |
| |
| bp->flags &= ~SX_BOARD_ACTIVE; |
| |
| dprintk (SX_DEBUG_IRQ, "Freeing IRQ%d for board %d.\n", |
| bp->irq, board_No (bp)); |
| free_irq(bp->irq, bp); |
| |
| turn_ints_off (bp); |
| |
| |
| func_exit(); |
| } |
| |
| |
| /* |
| * Setting up port characteristics. |
| * Must be called with disabled interrupts |
| */ |
| static void sx_change_speed(struct specialix_board *bp, struct specialix_port *port) |
| { |
| struct tty_struct *tty; |
| unsigned long baud; |
| long tmp; |
| unsigned char cor1 = 0, cor3 = 0; |
| unsigned char mcor1 = 0, mcor2 = 0; |
| static unsigned long again; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (!(tty = port->port.tty) || !tty->termios) { |
| func_exit(); |
| return; |
| } |
| |
| port->IER = 0; |
| port->COR2 = 0; |
| /* Select port on the board */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| |
| /* The Specialix board doens't implement the RTS lines. |
| They are used to set the IRQ level. Don't touch them. */ |
| if (SX_CRTSCTS(tty)) |
| port->MSVR = MSVR_DTR | (sx_in(bp, CD186x_MSVR) & MSVR_RTS); |
| else |
| port->MSVR = (sx_in(bp, CD186x_MSVR) & MSVR_RTS); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| dprintk (SX_DEBUG_TERMIOS, "sx: got MSVR=%02x.\n", port->MSVR); |
| baud = tty_get_baud_rate(tty); |
| |
| if (baud == 38400) { |
| if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI) |
| baud = 57600; |
| if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI) |
| baud = 115200; |
| } |
| |
| if (!baud) { |
| /* Drop DTR & exit */ |
| dprintk (SX_DEBUG_TERMIOS, "Dropping DTR... Hmm....\n"); |
| if (!SX_CRTSCTS (tty)) { |
| port -> MSVR &= ~ MSVR_DTR; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_MSVR, port->MSVR ); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| } |
| else |
| dprintk (SX_DEBUG_TERMIOS, "Can't drop DTR: no DTR.\n"); |
| return; |
| } else { |
| /* Set DTR on */ |
| if (!SX_CRTSCTS (tty)) { |
| port ->MSVR |= MSVR_DTR; |
| } |
| } |
| |
| /* |
| * Now we must calculate some speed depended things |
| */ |
| |
| /* Set baud rate for port */ |
| tmp = port->custom_divisor ; |
| if ( tmp ) |
| printk (KERN_INFO "sx%d: Using custom baud rate divisor %ld. \n" |
| "This is an untested option, please be carefull.\n", |
| port_No (port), tmp); |
| else |
| tmp = (((SX_OSCFREQ + baud/2) / baud + |
| CD186x_TPC/2) / CD186x_TPC); |
| |
| if ((tmp < 0x10) && time_before(again, jiffies)) { |
| again = jiffies + HZ * 60; |
| /* Page 48 of version 2.0 of the CL-CD1865 databook */ |
| if (tmp >= 12) { |
| printk (KERN_INFO "sx%d: Baud rate divisor is %ld. \n" |
| "Performance degradation is possible.\n" |
| "Read specialix.txt for more info.\n", |
| port_No (port), tmp); |
| } else { |
| printk (KERN_INFO "sx%d: Baud rate divisor is %ld. \n" |
| "Warning: overstressing Cirrus chip. " |
| "This might not work.\n" |
| "Read specialix.txt for more info.\n", |
| port_No (port), tmp); |
| } |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_RBPRH, (tmp >> 8) & 0xff); |
| sx_out(bp, CD186x_TBPRH, (tmp >> 8) & 0xff); |
| sx_out(bp, CD186x_RBPRL, tmp & 0xff); |
| sx_out(bp, CD186x_TBPRL, tmp & 0xff); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (port->custom_divisor) |
| baud = (SX_OSCFREQ + port->custom_divisor/2) / port->custom_divisor; |
| baud = (baud + 5) / 10; /* Estimated CPS */ |
| |
| /* Two timer ticks seems enough to wakeup something like SLIP driver */ |
| tmp = ((baud + HZ/2) / HZ) * 2 - CD186x_NFIFO; |
| port->wakeup_chars = (tmp < 0) ? 0 : ((tmp >= SERIAL_XMIT_SIZE) ? |
| SERIAL_XMIT_SIZE - 1 : tmp); |
| |
| /* Receiver timeout will be transmission time for 1.5 chars */ |
| tmp = (SPECIALIX_TPS + SPECIALIX_TPS/2 + baud/2) / baud; |
| tmp = (tmp > 0xff) ? 0xff : tmp; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_RTPR, tmp); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| switch (C_CSIZE(tty)) { |
| case CS5: |
| cor1 |= COR1_5BITS; |
| break; |
| case CS6: |
| cor1 |= COR1_6BITS; |
| break; |
| case CS7: |
| cor1 |= COR1_7BITS; |
| break; |
| case CS8: |
| cor1 |= COR1_8BITS; |
| break; |
| } |
| |
| if (C_CSTOPB(tty)) |
| cor1 |= COR1_2SB; |
| |
| cor1 |= COR1_IGNORE; |
| if (C_PARENB(tty)) { |
| cor1 |= COR1_NORMPAR; |
| if (C_PARODD(tty)) |
| cor1 |= COR1_ODDP; |
| if (I_INPCK(tty)) |
| cor1 &= ~COR1_IGNORE; |
| } |
| /* Set marking of some errors */ |
| port->mark_mask = RCSR_OE | RCSR_TOUT; |
| if (I_INPCK(tty)) |
| port->mark_mask |= RCSR_FE | RCSR_PE; |
| if (I_BRKINT(tty) || I_PARMRK(tty)) |
| port->mark_mask |= RCSR_BREAK; |
| if (I_IGNPAR(tty)) |
| port->mark_mask &= ~(RCSR_FE | RCSR_PE); |
| if (I_IGNBRK(tty)) { |
| port->mark_mask &= ~RCSR_BREAK; |
| if (I_IGNPAR(tty)) |
| /* Real raw mode. Ignore all */ |
| port->mark_mask &= ~RCSR_OE; |
| } |
| /* Enable Hardware Flow Control */ |
| if (C_CRTSCTS(tty)) { |
| #ifdef SPECIALIX_BRAIN_DAMAGED_CTS |
| port->IER |= IER_DSR | IER_CTS; |
| mcor1 |= MCOR1_DSRZD | MCOR1_CTSZD; |
| mcor2 |= MCOR2_DSROD | MCOR2_CTSOD; |
| spin_lock_irqsave(&bp->lock, flags); |
| tty->hw_stopped = !(sx_in(bp, CD186x_MSVR) & (MSVR_CTS|MSVR_DSR)); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| #else |
| port->COR2 |= COR2_CTSAE; |
| #endif |
| } |
| /* Enable Software Flow Control. FIXME: I'm not sure about this */ |
| /* Some people reported that it works, but I still doubt it */ |
| if (I_IXON(tty)) { |
| port->COR2 |= COR2_TXIBE; |
| cor3 |= (COR3_FCT | COR3_SCDE); |
| if (I_IXANY(tty)) |
| port->COR2 |= COR2_IXM; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_SCHR1, START_CHAR(tty)); |
| sx_out(bp, CD186x_SCHR2, STOP_CHAR(tty)); |
| sx_out(bp, CD186x_SCHR3, START_CHAR(tty)); |
| sx_out(bp, CD186x_SCHR4, STOP_CHAR(tty)); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| } |
| if (!C_CLOCAL(tty)) { |
| /* Enable CD check */ |
| port->IER |= IER_CD; |
| mcor1 |= MCOR1_CDZD; |
| mcor2 |= MCOR2_CDOD; |
| } |
| |
| if (C_CREAD(tty)) |
| /* Enable receiver */ |
| port->IER |= IER_RXD; |
| |
| /* Set input FIFO size (1-8 bytes) */ |
| cor3 |= sx_rxfifo; |
| /* Setting up CD186x channel registers */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_COR1, cor1); |
| sx_out(bp, CD186x_COR2, port->COR2); |
| sx_out(bp, CD186x_COR3, cor3); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| /* Make CD186x know about registers change */ |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_CORCHG1 | CCR_CORCHG2 | CCR_CORCHG3); |
| /* Setting up modem option registers */ |
| dprintk (SX_DEBUG_TERMIOS, "Mcor1 = %02x, mcor2 = %02x.\n", mcor1, mcor2); |
| sx_out(bp, CD186x_MCOR1, mcor1); |
| sx_out(bp, CD186x_MCOR2, mcor2); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| /* Enable CD186x transmitter & receiver */ |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_TXEN | CCR_RXEN); |
| /* Enable interrupts */ |
| sx_out(bp, CD186x_IER, port->IER); |
| /* And finally set the modem lines... */ |
| sx_out(bp, CD186x_MSVR, port->MSVR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| /* Must be called with interrupts enabled */ |
| static int sx_setup_port(struct specialix_board *bp, struct specialix_port *port) |
| { |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (port->port.flags & ASYNC_INITIALIZED) { |
| func_exit(); |
| return 0; |
| } |
| |
| if (!port->xmit_buf) { |
| /* We may sleep in get_zeroed_page() */ |
| unsigned long tmp; |
| |
| if (!(tmp = get_zeroed_page(GFP_KERNEL))) { |
| func_exit(); |
| return -ENOMEM; |
| } |
| |
| if (port->xmit_buf) { |
| free_page(tmp); |
| func_exit(); |
| return -ERESTARTSYS; |
| } |
| port->xmit_buf = (unsigned char *) tmp; |
| } |
| |
| spin_lock_irqsave(&port->lock, flags); |
| |
| if (port->port.tty) |
| clear_bit(TTY_IO_ERROR, &port->port.tty->flags); |
| |
| port->xmit_cnt = port->xmit_head = port->xmit_tail = 0; |
| sx_change_speed(bp, port); |
| port->port.flags |= ASYNC_INITIALIZED; |
| |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| |
| func_exit(); |
| return 0; |
| } |
| |
| |
| /* Must be called with interrupts disabled */ |
| static void sx_shutdown_port(struct specialix_board *bp, struct specialix_port *port) |
| { |
| struct tty_struct *tty; |
| int i; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (!(port->port.flags & ASYNC_INITIALIZED)) { |
| func_exit(); |
| return; |
| } |
| |
| if (sx_debug & SX_DEBUG_FIFO) { |
| dprintk(SX_DEBUG_FIFO, "sx%d: port %d: %ld overruns, FIFO hits [ ", |
| board_No(bp), port_No(port), port->overrun); |
| for (i = 0; i < 10; i++) { |
| dprintk(SX_DEBUG_FIFO, "%ld ", port->hits[i]); |
| } |
| dprintk(SX_DEBUG_FIFO, "].\n"); |
| } |
| |
| if (port->xmit_buf) { |
| free_page((unsigned long) port->xmit_buf); |
| port->xmit_buf = NULL; |
| } |
| |
| /* Select port */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| |
| if (!(tty = port->port.tty) || C_HUPCL(tty)) { |
| /* Drop DTR */ |
| sx_out(bp, CD186x_MSVDTR, 0); |
| } |
| spin_unlock_irqrestore(&bp->lock, flags); |
| /* Reset port */ |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_SOFTRESET); |
| /* Disable all interrupts from this port */ |
| port->IER = 0; |
| sx_out(bp, CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (tty) |
| set_bit(TTY_IO_ERROR, &tty->flags); |
| port->port.flags &= ~ASYNC_INITIALIZED; |
| |
| if (!bp->count) |
| sx_shutdown_board(bp); |
| func_exit(); |
| } |
| |
| |
| static int block_til_ready(struct tty_struct *tty, struct file * filp, |
| struct specialix_port *port) |
| { |
| DECLARE_WAITQUEUE(wait, current); |
| struct specialix_board *bp = port_Board(port); |
| int retval; |
| int do_clocal = 0; |
| int CD; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| /* |
| * If the device is in the middle of being closed, then block |
| * until it's done, and then try again. |
| */ |
| if (tty_hung_up_p(filp) || port->port.flags & ASYNC_CLOSING) { |
| interruptible_sleep_on(&port->port.close_wait); |
| if (port->port.flags & ASYNC_HUP_NOTIFY) { |
| func_exit(); |
| return -EAGAIN; |
| } else { |
| func_exit(); |
| return -ERESTARTSYS; |
| } |
| } |
| |
| /* |
| * If non-blocking mode is set, or the port is not enabled, |
| * then make the check up front and then exit. |
| */ |
| if ((filp->f_flags & O_NONBLOCK) || |
| (tty->flags & (1 << TTY_IO_ERROR))) { |
| port->port.flags |= ASYNC_NORMAL_ACTIVE; |
| func_exit(); |
| return 0; |
| } |
| |
| if (C_CLOCAL(tty)) |
| do_clocal = 1; |
| |
| /* |
| * Block waiting for the carrier detect and the line to become |
| * free (i.e., not in use by the callout). While we are in |
| * this loop, info->count is dropped by one, so that |
| * rs_close() knows when to free things. We restore it upon |
| * exit, either normal or abnormal. |
| */ |
| retval = 0; |
| add_wait_queue(&port->port.open_wait, &wait); |
| spin_lock_irqsave(&port->lock, flags); |
| if (!tty_hung_up_p(filp)) { |
| port->port.count--; |
| } |
| spin_unlock_irqrestore(&port->lock, flags); |
| port->port.blocked_open++; |
| while (1) { |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| CD = sx_in(bp, CD186x_MSVR) & MSVR_CD; |
| if (SX_CRTSCTS (tty)) { |
| /* Activate RTS */ |
| port->MSVR |= MSVR_DTR; /* WTF? */ |
| sx_out (bp, CD186x_MSVR, port->MSVR); |
| } else { |
| /* Activate DTR */ |
| port->MSVR |= MSVR_DTR; |
| sx_out (bp, CD186x_MSVR, port->MSVR); |
| } |
| spin_unlock_irqrestore(&bp->lock, flags); |
| set_current_state(TASK_INTERRUPTIBLE); |
| if (tty_hung_up_p(filp) || |
| !(port->port.flags & ASYNC_INITIALIZED)) { |
| if (port->port.flags & ASYNC_HUP_NOTIFY) |
| retval = -EAGAIN; |
| else |
| retval = -ERESTARTSYS; |
| break; |
| } |
| if (!(port->port.flags & ASYNC_CLOSING) && |
| (do_clocal || CD)) |
| break; |
| if (signal_pending(current)) { |
| retval = -ERESTARTSYS; |
| break; |
| } |
| schedule(); |
| } |
| |
| set_current_state(TASK_RUNNING); |
| remove_wait_queue(&port->port.open_wait, &wait); |
| spin_lock_irqsave(&port->lock, flags); |
| if (!tty_hung_up_p(filp)) { |
| port->port.count++; |
| } |
| port->port.blocked_open--; |
| spin_unlock_irqrestore(&port->lock, flags); |
| if (retval) { |
| func_exit(); |
| return retval; |
| } |
| |
| port->port.flags |= ASYNC_NORMAL_ACTIVE; |
| func_exit(); |
| return 0; |
| } |
| |
| |
| static int sx_open(struct tty_struct * tty, struct file * filp) |
| { |
| int board; |
| int error; |
| struct specialix_port * port; |
| struct specialix_board * bp; |
| int i; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| board = SX_BOARD(tty->index); |
| |
| if (board >= SX_NBOARD || !(sx_board[board].flags & SX_BOARD_PRESENT)) { |
| func_exit(); |
| return -ENODEV; |
| } |
| |
| bp = &sx_board[board]; |
| port = sx_port + board * SX_NPORT + SX_PORT(tty->index); |
| port->overrun = 0; |
| for (i = 0; i < 10; i++) |
| port->hits[i]=0; |
| |
| dprintk (SX_DEBUG_OPEN, "Board = %d, bp = %p, port = %p, portno = %d.\n", |
| board, bp, port, SX_PORT(tty->index)); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_open")) { |
| func_enter(); |
| return -ENODEV; |
| } |
| |
| if ((error = sx_setup_board(bp))) { |
| func_exit(); |
| return error; |
| } |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| port->port.count++; |
| bp->count++; |
| tty->driver_data = port; |
| port->port.tty = tty; |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| if ((error = sx_setup_port(bp, port))) { |
| func_enter(); |
| return error; |
| } |
| |
| if ((error = block_til_ready(tty, filp, port))) { |
| func_enter(); |
| return error; |
| } |
| |
| func_exit(); |
| return 0; |
| } |
| |
| static void sx_flush_buffer(struct tty_struct *tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| unsigned long flags; |
| struct specialix_board * bp; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_flush_buffer")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| spin_lock_irqsave(&port->lock, flags); |
| port->xmit_cnt = port->xmit_head = port->xmit_tail = 0; |
| spin_unlock_irqrestore(&port->lock, flags); |
| tty_wakeup(tty); |
| |
| func_exit(); |
| } |
| |
| static void sx_close(struct tty_struct * tty, struct file * filp) |
| { |
| struct specialix_port *port = (struct specialix_port *) tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| unsigned long timeout; |
| |
| func_enter(); |
| if (!port || sx_paranoia_check(port, tty->name, "close")) { |
| func_exit(); |
| return; |
| } |
| spin_lock_irqsave(&port->lock, flags); |
| |
| if (tty_hung_up_p(filp)) { |
| spin_unlock_irqrestore(&port->lock, flags); |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| if ((tty->count == 1) && (port->port.count != 1)) { |
| printk(KERN_ERR "sx%d: sx_close: bad port count;" |
| " tty->count is 1, port count is %d\n", |
| board_No(bp), port->port.count); |
| port->port.count = 1; |
| } |
| |
| if (port->port.count > 1) { |
| port->port.count--; |
| bp->count--; |
| |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| func_exit(); |
| return; |
| } |
| port->port.flags |= ASYNC_CLOSING; |
| /* |
| * Now we wait for the transmit buffer to clear; and we notify |
| * the line discipline to only process XON/XOFF characters. |
| */ |
| tty->closing = 1; |
| spin_unlock_irqrestore(&port->lock, flags); |
| dprintk (SX_DEBUG_OPEN, "Closing\n"); |
| if (port->port.closing_wait != ASYNC_CLOSING_WAIT_NONE) { |
| tty_wait_until_sent(tty, port->port.closing_wait); |
| } |
| /* |
| * At this point we stop accepting input. To do this, we |
| * disable the receive line status interrupts, and tell the |
| * interrupt driver to stop checking the data ready bit in the |
| * line status register. |
| */ |
| dprintk (SX_DEBUG_OPEN, "Closed\n"); |
| port->IER &= ~IER_RXD; |
| if (port->port.flags & ASYNC_INITIALIZED) { |
| port->IER &= ~IER_TXRDY; |
| port->IER |= IER_TXEMPTY; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| /* |
| * Before we drop DTR, make sure the UART transmitter |
| * has completely drained; this is especially |
| * important if there is a transmit FIFO! |
| */ |
| timeout = jiffies+HZ; |
| while(port->IER & IER_TXEMPTY) { |
| set_current_state (TASK_INTERRUPTIBLE); |
| msleep_interruptible(jiffies_to_msecs(port->timeout)); |
| if (time_after(jiffies, timeout)) { |
| printk (KERN_INFO "Timeout waiting for close\n"); |
| break; |
| } |
| } |
| |
| } |
| |
| if (--bp->count < 0) { |
| printk(KERN_ERR "sx%d: sx_shutdown_port: bad board count: %d port: %d\n", |
| board_No(bp), bp->count, tty->index); |
| bp->count = 0; |
| } |
| if (--port->port.count < 0) { |
| printk(KERN_ERR "sx%d: sx_close: bad port count for tty%d: %d\n", |
| board_No(bp), port_No(port), port->port.count); |
| port->port.count = 0; |
| } |
| |
| sx_shutdown_port(bp, port); |
| sx_flush_buffer(tty); |
| tty_ldisc_flush(tty); |
| spin_lock_irqsave(&port->lock, flags); |
| tty->closing = 0; |
| port->port.tty = NULL; |
| spin_unlock_irqrestore(&port->lock, flags); |
| if (port->port.blocked_open) { |
| if (port->port.close_delay) { |
| msleep_interruptible(jiffies_to_msecs(port->port.close_delay)); |
| } |
| wake_up_interruptible(&port->port.open_wait); |
| } |
| port->port.flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING); |
| wake_up_interruptible(&port->port.close_wait); |
| |
| func_exit(); |
| } |
| |
| |
| static int sx_write(struct tty_struct * tty, |
| const unsigned char *buf, int count) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| int c, total = 0; |
| unsigned long flags; |
| |
| func_enter(); |
| if (sx_paranoia_check(port, tty->name, "sx_write")) { |
| func_exit(); |
| return 0; |
| } |
| |
| bp = port_Board(port); |
| |
| if (!port->xmit_buf) { |
| func_exit(); |
| return 0; |
| } |
| |
| while (1) { |
| spin_lock_irqsave(&port->lock, flags); |
| c = min_t(int, count, min(SERIAL_XMIT_SIZE - port->xmit_cnt - 1, |
| SERIAL_XMIT_SIZE - port->xmit_head)); |
| if (c <= 0) { |
| spin_unlock_irqrestore(&port->lock, flags); |
| break; |
| } |
| memcpy(port->xmit_buf + port->xmit_head, buf, c); |
| port->xmit_head = (port->xmit_head + c) & (SERIAL_XMIT_SIZE-1); |
| port->xmit_cnt += c; |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| buf += c; |
| count -= c; |
| total += c; |
| } |
| |
| spin_lock_irqsave(&bp->lock, flags); |
| if (port->xmit_cnt && !tty->stopped && !tty->hw_stopped && |
| !(port->IER & IER_TXRDY)) { |
| port->IER |= IER_TXRDY; |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_IER, port->IER); |
| } |
| spin_unlock_irqrestore(&bp->lock, flags); |
| func_exit(); |
| |
| return total; |
| } |
| |
| |
| static int sx_put_char(struct tty_struct * tty, unsigned char ch) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| unsigned long flags; |
| struct specialix_board * bp; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_put_char")) { |
| func_exit(); |
| return 0; |
| } |
| dprintk (SX_DEBUG_TX, "check tty: %p %p\n", tty, port->xmit_buf); |
| if (!port->xmit_buf) { |
| func_exit(); |
| return 0; |
| } |
| bp = port_Board(port); |
| spin_lock_irqsave(&port->lock, flags); |
| |
| dprintk (SX_DEBUG_TX, "xmit_cnt: %d xmit_buf: %p\n", port->xmit_cnt, port->xmit_buf); |
| if ((port->xmit_cnt >= SERIAL_XMIT_SIZE - 1) || (!port->xmit_buf)) { |
| spin_unlock_irqrestore(&port->lock, flags); |
| dprintk (SX_DEBUG_TX, "Exit size\n"); |
| func_exit(); |
| return 0; |
| } |
| dprintk (SX_DEBUG_TX, "Handle xmit: %p %p\n", port, port->xmit_buf); |
| port->xmit_buf[port->xmit_head++] = ch; |
| port->xmit_head &= SERIAL_XMIT_SIZE - 1; |
| port->xmit_cnt++; |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| func_exit(); |
| return 1; |
| } |
| |
| |
| static void sx_flush_chars(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| unsigned long flags; |
| struct specialix_board * bp = port_Board(port); |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_flush_chars")) { |
| func_exit(); |
| return; |
| } |
| if (port->xmit_cnt <= 0 || tty->stopped || tty->hw_stopped || |
| !port->xmit_buf) { |
| func_exit(); |
| return; |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| port->IER |= IER_TXRDY; |
| sx_out(port_Board(port), CD186x_CAR, port_No(port)); |
| sx_out(port_Board(port), CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| static int sx_write_room(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| int ret; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_write_room")) { |
| func_exit(); |
| return 0; |
| } |
| |
| ret = SERIAL_XMIT_SIZE - port->xmit_cnt - 1; |
| if (ret < 0) |
| ret = 0; |
| |
| func_exit(); |
| return ret; |
| } |
| |
| |
| static int sx_chars_in_buffer(struct tty_struct *tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_chars_in_buffer")) { |
| func_exit(); |
| return 0; |
| } |
| func_exit(); |
| return port->xmit_cnt; |
| } |
| |
| |
| |
| static int sx_tiocmget(struct tty_struct *tty, struct file *file) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board * bp; |
| unsigned char status; |
| unsigned int result; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, __func__)) { |
| func_exit(); |
| return -ENODEV; |
| } |
| |
| bp = port_Board(port); |
| spin_lock_irqsave (&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| status = sx_in(bp, CD186x_MSVR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| dprintk (SX_DEBUG_INIT, "Got msvr[%d] = %02x, car = %d.\n", |
| port_No(port), status, sx_in (bp, CD186x_CAR)); |
| dprintk (SX_DEBUG_INIT, "sx_port = %p, port = %p\n", sx_port, port); |
| if (SX_CRTSCTS(port->port.tty)) { |
| result = /* (status & MSVR_RTS) ? */ TIOCM_DTR /* : 0) */ |
| | ((status & MSVR_DTR) ? TIOCM_RTS : 0) |
| | ((status & MSVR_CD) ? TIOCM_CAR : 0) |
| |/* ((status & MSVR_DSR) ? */ TIOCM_DSR /* : 0) */ |
| | ((status & MSVR_CTS) ? TIOCM_CTS : 0); |
| } else { |
| result = /* (status & MSVR_RTS) ? */ TIOCM_RTS /* : 0) */ |
| | ((status & MSVR_DTR) ? TIOCM_DTR : 0) |
| | ((status & MSVR_CD) ? TIOCM_CAR : 0) |
| |/* ((status & MSVR_DSR) ? */ TIOCM_DSR /* : 0) */ |
| | ((status & MSVR_CTS) ? TIOCM_CTS : 0); |
| } |
| |
| func_exit(); |
| |
| return result; |
| } |
| |
| |
| static int sx_tiocmset(struct tty_struct *tty, struct file *file, |
| unsigned int set, unsigned int clear) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| unsigned long flags; |
| struct specialix_board *bp; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, __func__)) { |
| func_exit(); |
| return -ENODEV; |
| } |
| |
| bp = port_Board(port); |
| |
| spin_lock_irqsave(&port->lock, flags); |
| /* if (set & TIOCM_RTS) |
| port->MSVR |= MSVR_RTS; */ |
| /* if (set & TIOCM_DTR) |
| port->MSVR |= MSVR_DTR; */ |
| |
| if (SX_CRTSCTS(port->port.tty)) { |
| if (set & TIOCM_RTS) |
| port->MSVR |= MSVR_DTR; |
| } else { |
| if (set & TIOCM_DTR) |
| port->MSVR |= MSVR_DTR; |
| } |
| |
| /* if (clear & TIOCM_RTS) |
| port->MSVR &= ~MSVR_RTS; */ |
| /* if (clear & TIOCM_DTR) |
| port->MSVR &= ~MSVR_DTR; */ |
| if (SX_CRTSCTS(port->port.tty)) { |
| if (clear & TIOCM_RTS) |
| port->MSVR &= ~MSVR_DTR; |
| } else { |
| if (clear & TIOCM_DTR) |
| port->MSVR &= ~MSVR_DTR; |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_MSVR, port->MSVR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| spin_unlock_irqrestore(&port->lock, flags); |
| func_exit(); |
| return 0; |
| } |
| |
| |
| static inline void sx_send_break(struct specialix_port * port, unsigned long length) |
| { |
| struct specialix_board *bp = port_Board(port); |
| unsigned long flags; |
| |
| func_enter(); |
| |
| spin_lock_irqsave (&port->lock, flags); |
| port->break_length = SPECIALIX_TPS / HZ * length; |
| port->COR2 |= COR2_ETC; |
| port->IER |= IER_TXRDY; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_COR2, port->COR2); |
| sx_out(bp, CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| spin_unlock_irqrestore (&port->lock, flags); |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_CORCHG2); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| sx_wait_CCR(bp); |
| |
| func_exit(); |
| } |
| |
| |
| static inline int sx_set_serial_info(struct specialix_port * port, |
| struct serial_struct __user * newinfo) |
| { |
| struct serial_struct tmp; |
| struct specialix_board *bp = port_Board(port); |
| int change_speed; |
| |
| func_enter(); |
| |
| if (copy_from_user(&tmp, newinfo, sizeof(tmp))) { |
| func_enter(); |
| return -EFAULT; |
| } |
| |
| lock_kernel(); |
| |
| change_speed = ((port->port.flags & ASYNC_SPD_MASK) != |
| (tmp.flags & ASYNC_SPD_MASK)); |
| change_speed |= (tmp.custom_divisor != port->custom_divisor); |
| |
| if (!capable(CAP_SYS_ADMIN)) { |
| if ((tmp.close_delay != port->port.close_delay) || |
| (tmp.closing_wait != port->port.closing_wait) || |
| ((tmp.flags & ~ASYNC_USR_MASK) != |
| (port->port.flags & ~ASYNC_USR_MASK))) { |
| func_exit(); |
| unlock_kernel(); |
| return -EPERM; |
| } |
| port->port.flags = ((port->port.flags & ~ASYNC_USR_MASK) | |
| (tmp.flags & ASYNC_USR_MASK)); |
| port->custom_divisor = tmp.custom_divisor; |
| } else { |
| port->port.flags = ((port->port.flags & ~ASYNC_FLAGS) | |
| (tmp.flags & ASYNC_FLAGS)); |
| port->port.close_delay = tmp.close_delay; |
| port->port.closing_wait = tmp.closing_wait; |
| port->custom_divisor = tmp.custom_divisor; |
| } |
| if (change_speed) { |
| sx_change_speed(bp, port); |
| } |
| func_exit(); |
| unlock_kernel(); |
| return 0; |
| } |
| |
| |
| static inline int sx_get_serial_info(struct specialix_port * port, |
| struct serial_struct __user *retinfo) |
| { |
| struct serial_struct tmp; |
| struct specialix_board *bp = port_Board(port); |
| |
| func_enter(); |
| |
| memset(&tmp, 0, sizeof(tmp)); |
| lock_kernel(); |
| tmp.type = PORT_CIRRUS; |
| tmp.line = port - sx_port; |
| tmp.port = bp->base; |
| tmp.irq = bp->irq; |
| tmp.flags = port->port.flags; |
| tmp.baud_base = (SX_OSCFREQ + CD186x_TPC/2) / CD186x_TPC; |
| tmp.close_delay = port->port.close_delay * HZ/100; |
| tmp.closing_wait = port->port.closing_wait * HZ/100; |
| tmp.custom_divisor = port->custom_divisor; |
| tmp.xmit_fifo_size = CD186x_NFIFO; |
| unlock_kernel(); |
| if (copy_to_user(retinfo, &tmp, sizeof(tmp))) { |
| func_exit(); |
| return -EFAULT; |
| } |
| |
| func_exit(); |
| return 0; |
| } |
| |
| |
| static int sx_ioctl(struct tty_struct * tty, struct file * filp, |
| unsigned int cmd, unsigned long arg) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| int retval; |
| void __user *argp = (void __user *)arg; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_ioctl")) { |
| func_exit(); |
| return -ENODEV; |
| } |
| |
| switch (cmd) { |
| case TCSBRK: /* SVID version: non-zero arg --> no break */ |
| retval = tty_check_change(tty); |
| if (retval) { |
| func_exit(); |
| return retval; |
| } |
| tty_wait_until_sent(tty, 0); |
| if (!arg) |
| sx_send_break(port, HZ/4); /* 1/4 second */ |
| return 0; |
| case TCSBRKP: /* support for POSIX tcsendbreak() */ |
| retval = tty_check_change(tty); |
| if (retval) { |
| func_exit(); |
| return retval; |
| } |
| tty_wait_until_sent(tty, 0); |
| sx_send_break(port, arg ? arg*(HZ/10) : HZ/4); |
| func_exit(); |
| return 0; |
| case TIOCGSERIAL: |
| func_exit(); |
| return sx_get_serial_info(port, argp); |
| case TIOCSSERIAL: |
| func_exit(); |
| return sx_set_serial_info(port, argp); |
| default: |
| func_exit(); |
| return -ENOIOCTLCMD; |
| } |
| func_exit(); |
| return 0; |
| } |
| |
| |
| static void sx_throttle(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_throttle")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| |
| /* Use DTR instead of RTS ! */ |
| if (SX_CRTSCTS (tty)) |
| port->MSVR &= ~MSVR_DTR; |
| else { |
| /* Auch!!! I think the system shouldn't call this then. */ |
| /* Or maybe we're supposed (allowed?) to do our side of hw |
| handshake anyway, even when hardware handshake is off. |
| When you see this in your logs, please report.... */ |
| printk (KERN_ERR "sx%d: Need to throttle, but can't (hardware hs is off)\n", |
| port_No (port)); |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (I_IXOFF(tty)) { |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_SSCH2); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| sx_wait_CCR(bp); |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_MSVR, port->MSVR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| static void sx_unthrottle(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_unthrottle")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| |
| spin_lock_irqsave(&port->lock, flags); |
| /* XXXX Use DTR INSTEAD???? */ |
| if (SX_CRTSCTS(tty)) { |
| port->MSVR |= MSVR_DTR; |
| } /* Else clause: see remark in "sx_throttle"... */ |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| if (I_IXOFF(tty)) { |
| spin_unlock_irqrestore(&port->lock, flags); |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CCR, CCR_SSCH1); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| sx_wait_CCR(bp); |
| spin_lock_irqsave(&port->lock, flags); |
| } |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_MSVR, port->MSVR); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| static void sx_stop(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_stop")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| |
| spin_lock_irqsave(&port->lock, flags); |
| port->IER &= ~IER_TXRDY; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| func_exit(); |
| } |
| |
| |
| static void sx_start(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_start")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| |
| spin_lock_irqsave(&port->lock, flags); |
| if (port->xmit_cnt && port->xmit_buf && !(port->IER & IER_TXRDY)) { |
| port->IER |= IER_TXRDY; |
| spin_lock_irqsave(&bp->lock, flags); |
| sx_out(bp, CD186x_CAR, port_No(port)); |
| sx_out(bp, CD186x_IER, port->IER); |
| spin_unlock_irqrestore(&bp->lock, flags); |
| } |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| func_exit(); |
| } |
| |
| static void sx_hangup(struct tty_struct * tty) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| struct specialix_board *bp; |
| unsigned long flags; |
| |
| func_enter(); |
| |
| if (sx_paranoia_check(port, tty->name, "sx_hangup")) { |
| func_exit(); |
| return; |
| } |
| |
| bp = port_Board(port); |
| |
| sx_shutdown_port(bp, port); |
| spin_lock_irqsave(&port->lock, flags); |
| bp->count -= port->port.count; |
| if (bp->count < 0) { |
| printk(KERN_ERR "sx%d: sx_hangup: bad board count: %d port: %d\n", |
| board_No(bp), bp->count, tty->index); |
| bp->count = 0; |
| } |
| port->port.count = 0; |
| port->port.flags &= ~ASYNC_NORMAL_ACTIVE; |
| port->port.tty = NULL; |
| spin_unlock_irqrestore(&port->lock, flags); |
| wake_up_interruptible(&port->port.open_wait); |
| |
| func_exit(); |
| } |
| |
| |
| static void sx_set_termios(struct tty_struct * tty, struct ktermios * old_termios) |
| { |
| struct specialix_port *port = (struct specialix_port *)tty->driver_data; |
| unsigned long flags; |
| struct specialix_board * bp; |
| |
| if (sx_paranoia_check(port, tty->name, "sx_set_termios")) |
| return; |
| |
| bp = port_Board(port); |
| spin_lock_irqsave(&port->lock, flags); |
| sx_change_speed(port_Board(port), port); |
| spin_unlock_irqrestore(&port->lock, flags); |
| |
| if ((old_termios->c_cflag & CRTSCTS) && |
| !(tty->termios->c_cflag & CRTSCTS)) { |
| tty->hw_stopped = 0; |
| sx_start(tty); |
| } |
| } |
| |
| static const struct tty_operations sx_ops = { |
| .open = sx_open, |
| .close = sx_close, |
| .write = sx_write, |
| .put_char = sx_put_char, |
| .flush_chars = sx_flush_chars, |
| .write_room = sx_write_room, |
| .chars_in_buffer = sx_chars_in_buffer, |
| .flush_buffer = sx_flush_buffer, |
| .ioctl = sx_ioctl, |
| .throttle = sx_throttle, |
| .unthrottle = sx_unthrottle, |
| .set_termios = sx_set_termios, |
| .stop = sx_stop, |
| .start = sx_start, |
| .hangup = sx_hangup, |
| .tiocmget = sx_tiocmget, |
| .tiocmset = sx_tiocmset, |
| }; |
| |
| static int sx_init_drivers(void) |
| { |
| int error; |
| int i; |
| |
| func_enter(); |
| |
| specialix_driver = alloc_tty_driver(SX_NBOARD * SX_NPORT); |
| if (!specialix_driver) { |
| printk(KERN_ERR "sx: Couldn't allocate tty_driver.\n"); |
| func_exit(); |
| return 1; |
| } |
| |
| specialix_driver->owner = THIS_MODULE; |
| specialix_driver->name = "ttyW"; |
| specialix_driver->major = SPECIALIX_NORMAL_MAJOR; |
| specialix_driver->type = TTY_DRIVER_TYPE_SERIAL; |
| specialix_driver->subtype = SERIAL_TYPE_NORMAL; |
| specialix_driver->init_termios = tty_std_termios; |
| specialix_driver->init_termios.c_cflag = |
| B9600 | CS8 | CREAD | HUPCL | CLOCAL; |
| specialix_driver->init_termios.c_ispeed = 9600; |
| specialix_driver->init_termios.c_ospeed = 9600; |
| specialix_driver->flags = TTY_DRIVER_REAL_RAW; |
| tty_set_operations(specialix_driver, &sx_ops); |
| |
| if ((error = tty_register_driver(specialix_driver))) { |
| put_tty_driver(specialix_driver); |
| printk(KERN_ERR "sx: Couldn't register specialix IO8+ driver, error = %d\n", |
| error); |
| func_exit(); |
| return 1; |
| } |
| memset(sx_port, 0, sizeof(sx_port)); |
| for (i = 0; i < SX_NPORT * SX_NBOARD; i++) { |
| sx_port[i].magic = SPECIALIX_MAGIC; |
| tty_port_init(&sx_port[i].port); |
| spin_lock_init(&sx_port[i].lock); |
| } |
| |
| func_exit(); |
| return 0; |
| } |
| |
| static void sx_release_drivers(void) |
| { |
| func_enter(); |
| |
| tty_unregister_driver(specialix_driver); |
| put_tty_driver(specialix_driver); |
| func_exit(); |
| } |
| |
| /* |
| * This routine must be called by kernel at boot time |
| */ |
| static int __init specialix_init(void) |
| { |
| int i; |
| int found = 0; |
| |
| func_enter(); |
| |
| printk(KERN_INFO "sx: Specialix IO8+ driver v" VERSION ", (c) R.E.Wolff 1997/1998.\n"); |
| printk(KERN_INFO "sx: derived from work (c) D.Gorodchanin 1994-1996.\n"); |
| #ifdef CONFIG_SPECIALIX_RTSCTS |
| printk (KERN_INFO "sx: DTR/RTS pin is always RTS.\n"); |
| #else |
| printk (KERN_INFO "sx: DTR/RTS pin is RTS when CRTSCTS is on.\n"); |
| #endif |
| |
| for (i = 0; i < SX_NBOARD; i++) |
| spin_lock_init(&sx_board[i].lock); |
| |
| if (sx_init_drivers()) { |
| func_exit(); |
| return -EIO; |
| } |
| |
| for (i = 0; i < SX_NBOARD; i++) |
| if (sx_board[i].base && !sx_probe(&sx_board[i])) |
| found++; |
| |
| #ifdef CONFIG_PCI |
| { |
| struct pci_dev *pdev = NULL; |
| |
| i=0; |
| while (i < SX_NBOARD) { |
| if (sx_board[i].flags & SX_BOARD_PRESENT) { |
| i++; |
| continue; |
| } |
| pdev = pci_get_device (PCI_VENDOR_ID_SPECIALIX, |
| PCI_DEVICE_ID_SPECIALIX_IO8, |
| pdev); |
| if (!pdev) break; |
| |
| if (pci_enable_device(pdev)) |
| continue; |
| |
| sx_board[i].irq = pdev->irq; |
| |
| sx_board[i].base = pci_resource_start (pdev, 2); |
| |
| sx_board[i].flags |= SX_BOARD_IS_PCI; |
| if (!sx_probe(&sx_board[i])) |
| found ++; |
| } |
| /* May exit pci_get sequence early with lots of boards */ |
| if (pdev != NULL) |
| pci_dev_put(pdev); |
| } |
| #endif |
| |
| if (!found) { |
| sx_release_drivers(); |
| printk(KERN_INFO "sx: No specialix IO8+ boards detected.\n"); |
| func_exit(); |
| return -EIO; |
| } |
| |
| func_exit(); |
| return 0; |
| } |
| |
| static int iobase[SX_NBOARD] = {0,}; |
| |
| static int irq [SX_NBOARD] = {0,}; |
| |
| module_param_array(iobase, int, NULL, 0); |
| module_param_array(irq, int, NULL, 0); |
| module_param(sx_debug, int, 0); |
| module_param(sx_rxfifo, int, 0); |
| #ifdef SPECIALIX_TIMER |
| module_param(sx_poll, int, 0); |
| #endif |
| |
| /* |
| * You can setup up to 4 boards. |
| * by specifying "iobase=0xXXX,0xXXX ..." as insmod parameter. |
| * You should specify the IRQs too in that case "irq=....,...". |
| * |
| * More than 4 boards in one computer is not possible, as the card can |
| * only use 4 different interrupts. |
| * |
| */ |
| static int __init specialix_init_module(void) |
| { |
| int i; |
| |
| func_enter(); |
| |
| if (iobase[0] || iobase[1] || iobase[2] || iobase[3]) { |
| for(i = 0; i < SX_NBOARD; i++) { |
| sx_board[i].base = iobase[i]; |
| sx_board[i].irq = irq[i]; |
| sx_board[i].count= 0; |
| } |
| } |
| |
| func_exit(); |
| |
| return specialix_init(); |
| } |
| |
| static void __exit specialix_exit_module(void) |
| { |
| int i; |
| |
| func_enter(); |
| |
| sx_release_drivers(); |
| for (i = 0; i < SX_NBOARD; i++) |
| if (sx_board[i].flags & SX_BOARD_PRESENT) |
| sx_release_io_range(&sx_board[i]); |
| #ifdef SPECIALIX_TIMER |
| del_timer_sync(&missed_irq_timer); |
| #endif |
| |
| func_exit(); |
| } |
| |
| static struct pci_device_id specialx_pci_tbl[] __devinitdata = { |
| { PCI_DEVICE(PCI_VENDOR_ID_SPECIALIX, PCI_DEVICE_ID_SPECIALIX_IO8) }, |
| { } |
| }; |
| MODULE_DEVICE_TABLE(pci, specialx_pci_tbl); |
| |
| module_init(specialix_init_module); |
| module_exit(specialix_exit_module); |
| |
| MODULE_LICENSE("GPL"); |