git.oblomov.eu Git - linux-2.6/blob - drivers/serial/crisv10.c

   1 /* $Id: serial.c,v 1.25 2004/09/29 10:33:49 starvik Exp $
   2  *
   3  * Serial port driver for the ETRAX 100LX chip
   4  *
   5  *    Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003  Axis Communications AB
   6  *
   7  *    Many, many authors. Based once upon a time on serial.c for 16x50.
   8  *
   9  * $Log: serial.c,v $
  10  * Revision 1.25  2004/09/29 10:33:49  starvik
  11  * Resolved a dealock when printing debug from kernel.
  12  *
  13  * Revision 1.24  2004/08/27 23:25:59  johana
  14  * rs_set_termios() must call change_speed() if c_iflag has changed or
  15  * automatic XOFF handling will be enabled and transmitter will stop
  16  * if 0x13 is received.
  17  *
  18  * Revision 1.23  2004/08/24 06:57:13  starvik
  19  * More whitespace cleanup
  20  *
  21  * Revision 1.22  2004/08/24 06:12:20  starvik
  22  * Whitespace cleanup
  23  *
  24  * Revision 1.20  2004/05/24 12:00:20  starvik
  25  * Big merge of stuff from Linux 2.4 (e.g. manual mode for the serial port).
  26  *
  27  * Revision 1.19  2004/05/17 13:12:15  starvik
  28  * Kernel console hook
  29  * Big merge from Linux 2.4 still pending.
  30  *
  31  * Revision 1.18  2003/10/28 07:18:30  starvik
  32  * Compiles with debug info
  33  *
  34  * Revision 1.17  2003/07/04 08:27:37  starvik
  35  * Merge of Linux 2.5.74
  36  *
  37  * Revision 1.16  2003/06/13 10:05:19  johana
  38  * Help the user to avoid trouble by:
  39  * Forcing mixed mode for status/control lines if not all pins are used.
  40  *
  41  * Revision 1.15  2003/06/13 09:43:01  johana
  42  * Merged in the following changes from os/linux/arch/cris/drivers/serial.c
  43  * + some minor changes to reduce diff.
  44  *
  45  * Revision 1.49  2003/05/30 11:31:54  johana
  46  * Merged in change-branch--serial9bit that adds CMSPAR support for sticky
  47  * parity (mark/space)
  48  *
  49  * Revision 1.48  2003/05/30 11:03:57  johana
  50  * Implemented rs_send_xchar() by disabling the DMA and writing manually.
  51  * Added e100_disable_txdma_channel() and e100_enable_txdma_channel().
  52  * Fixed rs_throttle() and rs_unthrottle() to properly call rs_send_xchar
  53  * instead of setting info->x_char and check the CRTSCTS flag before
  54  * controlling the rts pin.
  55  *
  56  * Revision 1.14  2003/04/09 08:12:44  pkj
  57  * Corrected typo changes made upstream.
  58  *
  59  * Revision 1.13  2003/04/09 05:20:47  starvik
  60  * Merge of Linux 2.5.67
  61  *
  62  * Revision 1.11  2003/01/22 06:48:37  starvik
  63  * Fixed warnings issued by GCC 3.2.1
  64  *
  65  * Revision 1.9  2002/12/13 09:07:47  starvik
  66  * Alert user that RX_TIMEOUT_TICKS==0 doesn't work
  67  *
  68  * Revision 1.8  2002/12/11 13:13:57  starvik
  69  * Added arch/ to v10 specific includes
  70  * Added fix from Linux 2.4 in serial.c (flush_to_flip_buffer)
  71  *
  72  * Revision 1.7  2002/12/06 07:13:57  starvik
  73  * Corrected work queue stuff
  74  * Removed CONFIG_ETRAX_SERIAL_FLUSH_DMA_FAST
  75  *
  76  * Revision 1.6  2002/11/21 07:17:46  starvik
  77  * Change static inline to extern inline where otherwise outlined with gcc-3.2
  78  *
  79  * Revision 1.5  2002/11/14 15:59:49  starvik
  80  * Linux 2.5 port of the latest serial driver from 2.4. The work queue stuff
  81  * probably doesn't work yet.
  82  *
  83  * Revision 1.42  2002/11/05 09:08:47  johana
  84  * Better implementation of rs_stop() and rs_start() that uses the XOFF
  85  * register to start/stop transmission.
  86  * change_speed() also initilises XOFF register correctly so that
  87  * auto_xoff is enabled when IXON flag is set by user.
  88  * This gives fast XOFF response times.
  89  *
  90  * Revision 1.41  2002/11/04 18:40:57  johana
  91  * Implemented rs_stop() and rs_start().
  92  * Simple tests using hwtestserial indicates that this should be enough
  93  * to make it work.
  94  *
  95  * Revision 1.40  2002/10/14 05:33:18  starvik
  96  * RS-485 uses fast timers even if SERIAL_FAST_TIMER is disabled
  97  *
  98  * Revision 1.39  2002/09/30 21:00:57  johana
  99  * Support for CONFIG_ETRAX_SERx_DTR_RI_DSR_CD_MIXED where the status and
 100  * control pins can be mixed between PA and PB.
 101  * If no serial port uses MIXED old solution is used
 102  * (saves a few bytes and cycles).
 103  * control_pins struct uses masks instead of bit numbers.
 104  * Corrected dummy values and polarity in line_info() so
 105  * /proc/tty/driver/serial is now correct.
 106  * (the E100_xxx_GET() macros is really active low - perhaps not obvious)
 107  *
 108  * Revision 1.38  2002/08/23 11:01:36  starvik
 109  * Check that serial port is enabled in all interrupt handlers to avoid
 110  * restarts of DMA channels not assigned to serial ports
 111  *
 112  * Revision 1.37  2002/08/13 13:02:37  bjornw
 113  * Removed some warnings because of unused code
 114  *
 115  * Revision 1.36  2002/08/08 12:50:01  starvik
 116  * Serial interrupt is shared with synchronous serial port driver
 117  *
 118  * Revision 1.35  2002/06/03 10:40:49  starvik
 119  * Increased RS-485 RTS toggle timer to 2 characters
 120  *
 121  * Revision 1.34  2002/05/28 18:59:36  johana
 122  * Whitespace and comment fixing to be more like etrax100ser.c 1.71.
 123  *
 124  * Revision 1.33  2002/05/28 17:55:43  johana
 125  * RS-485 uses FAST_TIMER if enabled, and starts a short (one char time)
 126  * timer from tranismit_chars (interrupt context).
 127  * The timer toggles RTS in interrupt context when expired giving minimum
 128  * latencies.
 129  *
 130  * Revision 1.32  2002/05/22 13:58:00  johana
 131  * Renamed rs_write() to raw_write() and made it inline.
 132  * New rs_write() handles RS-485 if configured and enabled
 133  * (moved code from e100_write_rs485()).
 134  * RS-485 ioctl's uses copy_from_user() instead of verify_area().
 135  *
 136  * Revision 1.31  2002/04/22 11:20:03  johana
 137  * Updated copyright years.
 138  *
 139  * Revision 1.30  2002/04/22 09:39:12  johana
 140  * RS-485 support compiles.
 141  *
 142  * Revision 1.29  2002/01/14 16:10:01  pkj
 143  * Allocate the receive buffers dynamically. The static 4kB buffer was
 144  * too small for the peaks. This means that we can get rid of the extra
 145  * buffer and the copying to it. It also means we require less memory
 146  * under normal operations, but can use more when needed (there is a
 147  * cap at 64kB for safety reasons). If there is no memory available
 148  * we panic(), and die a horrible death...
 149  *
 150  * Revision 1.28  2001/12/18 15:04:53  johana
 151  * Cleaned up write_rs485() - now it works correctly without padding extra
 152  * char.
 153  * Added sane default initialisation of rs485.
 154  * Added #ifdef around dummy variables.
 155  *
 156  * Revision 1.27  2001/11/29 17:00:41  pkj
 157  * 2kB seems to be too small a buffer when using 921600 bps,
 158  * so increase it to 4kB (this was already done for the elinux
 159  * version of the serial driver).
 160  *
 161  * Revision 1.26  2001/11/19 14:20:41  pkj
 162  * Minor changes to comments and unused code.
 163  *
 164  * Revision 1.25  2001/11/12 20:03:43  pkj
 165  * Fixed compiler warnings.
 166  *
 167  * Revision 1.24  2001/11/12 15:10:05  pkj
 168  * Total redesign of the receiving part of the serial driver.
 169  * Uses eight chained descriptors to write to a 4kB buffer.
 170  * This data is then serialised into a 2kB buffer. From there it
 171  * is copied into the TTY's flip buffers when they become available.
 172  * A lot of copying, and the sizes of the buffers might need to be
 173  * tweaked, but all in all it should work better than the previous
 174  * version, without the need to modify the TTY code in any way.
 175  * Also note that erroneous bytes are now correctly marked in the
 176  * flag buffers (instead of always marking the first byte).
 177  *
 178  * Revision 1.23  2001/10/30 17:53:26  pkj
 179  * * Set info->uses_dma to 0 when a port is closed.
 180  * * Mark the timer1 interrupt as a fast one (SA_INTERRUPT).
 181  * * Call start_flush_timer() in start_receive() if
 182  *   CONFIG_ETRAX_SERIAL_FLUSH_DMA_FAST is defined.
 183  *
 184  * Revision 1.22  2001/10/30 17:44:03  pkj
 185  * Use %lu for received and transmitted counters in line_info().
 186  *
 187  * Revision 1.21  2001/10/30 17:40:34  pkj
 188  * Clean-up. The only change to functionality is that
 189  * CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS(=5) is used instead of
 190  * MAX_FLUSH_TIME(=8).
 191  *
 192  * Revision 1.20  2001/10/30 15:24:49  johana
 193  * Added char_time stuff from 2.0 driver.
 194  *
 195  * Revision 1.19  2001/10/30 15:23:03  johana
 196  * Merged with 1.13.2 branch + fixed indentation
 197  * and changed CONFIG_ETRAX100_XYS to CONFIG_ETRAX_XYZ
 198  *
 199  * Revision 1.18  2001/09/24 09:27:22  pkj
 200  * Completed ext_baud_table[] in cflag_to_baud() and cflag_to_etrax_baud().
 201  *
 202  * Revision 1.17  2001/08/24 11:32:49  ronny
 203  * More fixes for the CONFIG_ETRAX_SERIAL_PORT0 define.
 204  *
 205  * Revision 1.16  2001/08/24 07:56:22  ronny
 206  * Added config ifdefs around ser0 irq requests.
 207  *
 208  * Revision 1.15  2001/08/16 09:10:31  bjarne
 209  * serial.c - corrected the initialization of rs_table, the wrong defines
 210  *            where used.
 211  *            Corrected a test in timed_flush_handler.
 212  *            Changed configured to enabled.
 213  * serial.h - Changed configured to enabled.
 214  *
 215  * Revision 1.14  2001/08/15 07:31:23  bjarne
 216  * Introduced two new members to the e100_serial struct.
 217  * configured - Will be set to 1 if the port has been configured in .config
 218  * uses_dma   - Should be set to 1 if the port uses DMA. Currently it is set
 219  *              to 1
 220  *              when a port is opened. This is used to limit the DMA interrupt
 221  *              routines to only manipulate DMA channels actually used by the
 222  *              serial driver.
 223  *
 224  * Revision 1.13.2.2  2001/10/17 13:57:13  starvik
 225  * Receiver was broken by the break fixes
 226  *
 227  * Revision 1.13.2.1  2001/07/20 13:57:39  ronny
 228  * Merge with new stuff from etrax100ser.c. Works but haven't checked stuff
 229  * like break handling.
 230  *
 231  * Revision 1.13  2001/05/09 12:40:31  johana
 232  * Use DMA_NBR and IRQ_NBR defines from dma.h and irq.h
 233  *
 234  * Revision 1.12  2001/04/19 12:23:07  bjornw
 235  * CONFIG_RS485 -> CONFIG_ETRAX_RS485
 236  *
 237  * Revision 1.11  2001/04/05 14:29:48  markusl
 238  * Updated according to review remarks i.e.
 239  * -Use correct types in port structure to avoid compiler warnings
 240  * -Try to use IO_* macros whenever possible
 241  * -Open should never return -EBUSY
 242  *
 243  * Revision 1.10  2001/03/05 13:14:07  bjornw
 244  * Another spelling fix
 245  *
 246  * Revision 1.9  2001/02/23 13:46:38  bjornw
 247  * Spellling check
 248  *
 249  * Revision 1.8  2001/01/23 14:56:35  markusl
 250  * Made use of ser1 optional
 251  * Needed by USB
 252  *
 253  * Revision 1.7  2001/01/19 16:14:48  perf
 254  * Added kernel options for serial ports 234.
 255  * Changed option names from CONFIG_ETRAX100_XYZ to CONFIG_ETRAX_XYZ.
 256  *
 257  * Revision 1.6  2000/11/22 16:36:09  bjornw
 258  * Please marketing by using the correct case when spelling Etrax.
 259  *
 260  * Revision 1.5  2000/11/21 16:43:37  bjornw
 261  * Fixed so it compiles under CONFIG_SVINTO_SIM
 262  *
 263  * Revision 1.4  2000/11/15 17:34:12  bjornw
 264  * Added a timeout timer for flushing input channels. The interrupt-based
 265  * fast flush system should be easy to merge with this later (works the same
 266  * way, only with an irq instead of a system timer_list)
 267  *
 268  * Revision 1.3  2000/11/13 17:19:57  bjornw
 269  * * Incredibly, this almost complete rewrite of serial.c worked (at least
 270  *   for output) the first time.
 271  *
 272  *   Items worth noticing:
 273  *
 274  *      No Etrax100 port 1 workarounds (does only compile on 2.4 anyway now)
 275  *      RS485 is not ported (why can't it be done in userspace as on x86 ?)
 276  *      Statistics done through async_icount - if any more stats are needed,
 277  *      that's the place to put them or in an arch-dep version of it.
 278  *      timeout_interrupt and the other fast timeout stuff not ported yet
 279  *      There be dragons in this 3k+ line driver
 280  *
 281  * Revision 1.2  2000/11/10 16:50:28  bjornw
 282  * First shot at a 2.4 port, does not compile totally yet
 283  *
 284  * Revision 1.1  2000/11/10 16:47:32  bjornw
 285  * Added verbatim copy of rev 1.49 etrax100ser.c from elinux
 286  *
 287  * Revision 1.49  2000/10/30 15:47:14  tobiasa
 288  * Changed version number.
 289  *
 290  * Revision 1.48  2000/10/25 11:02:43  johana
 291  * Changed %ul to %lu in printf's
 292  *
 293  * Revision 1.47  2000/10/18 15:06:53  pkj
 294  * Compile correctly with CONFIG_ETRAX_SERIAL_FLUSH_DMA_FAST and
 295  * CONFIG_ETRAX_SERIAL_PROC_ENTRY together.
 296  * Some clean-up of the /proc/serial file.
 297  *
 298  * Revision 1.46  2000/10/16 12:59:40  johana
 299  * Added CONFIG_ETRAX_SERIAL_PROC_ENTRY for statistics and debug info.
 300  *
 301  * Revision 1.45  2000/10/13 17:10:59  pkj
 302  * Do not flush DMAs while flipping TTY buffers.
 303  *
 304  * Revision 1.44  2000/10/13 16:34:29  pkj
 305  * Added a delay in ser_interrupt() for 2.3ms when an error is detected.
 306  * We do not know why this delay is required yet, but without it the
 307  * irmaflash program does not work (this was the program that needed
 308  * the ser_interrupt() to be needed in the first place). This should not
 309  * affect normal use of the serial ports.
 310  *
 311  * Revision 1.43  2000/10/13 16:30:44  pkj
 312  * New version of the fast flush of serial buffers code. This time
 313  * it is localized to the serial driver and uses a fast timer to
 314  * do the work.
 315  *
 316  * Revision 1.42  2000/10/13 14:54:26  bennyo
 317  * Fix for switching RTS when using rs485
 318  *
 319  * Revision 1.41  2000/10/12 11:43:44  pkj
 320  * Cleaned up a number of comments.
 321  *
 322  * Revision 1.40  2000/10/10 11:58:39  johana
 323  * Made RS485 support generic for all ports.
 324  * Toggle rts in interrupt if no delay wanted.
 325  * WARNING: No true transmitter empty check??
 326  * Set d_wait bit when sending data so interrupt is delayed until
 327  * fifo flushed. (Fix tcdrain() problem)
 328  *
 329  * Revision 1.39  2000/10/04 16:08:02  bjornw
 330  * * Use virt_to_phys etc. for DMA addresses
 331  * * Removed CONFIG_FLUSH_DMA_FAST hacks
 332  * * Indentation fix
 333  *
 334  * Revision 1.38  2000/10/02 12:27:10  mattias
 335  * * added variable used when using fast flush on serial dma.
 336  *   (CONFIG_FLUSH_DMA_FAST)
 337  *
 338  * Revision 1.37  2000/09/27 09:44:24  pkj
 339  * Uncomment definition of SERIAL_HANDLE_EARLY_ERRORS.
 340  *
 341  * Revision 1.36  2000/09/20 13:12:52  johana
 342  * Support for CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS:
 343  *   Number of timer ticks between flush of receive fifo (1 tick = 10ms).
 344  *   Try 0-3 for low latency applications. Approx 5 for high load
 345  *   applications (e.g. PPP). Maybe this should be more adaptive some day...
 346  *
 347  * Revision 1.35  2000/09/20 10:36:08  johana
 348  * Typo in get_lsr_info()
 349  *
 350  * Revision 1.34  2000/09/20 10:29:59  johana
 351  * Let rs_chars_in_buffer() check fifo content as well.
 352  * get_lsr_info() might work now (not tested).
 353  * Easier to change the port to debug.
 354  *
 355  * Revision 1.33  2000/09/13 07:52:11  torbjore
 356  * Support RS485
 357  *
 358  * Revision 1.32  2000/08/31 14:45:37  bjornw
 359  * After sending a break we need to reset the transmit DMA channel
 360  *
 361  * Revision 1.31  2000/06/21 12:13:29  johana
 362  * Fixed wait for all chars sent when closing port.
 363  * (Used to always take 1 second!)
 364  * Added shadows for directions of status/ctrl signals.
 365  *
 366  * Revision 1.30  2000/05/29 16:27:55  bjornw
 367  * Simulator ifdef moved a bit
 368  *
 369  * Revision 1.29  2000/05/09 09:40:30  mattias
 370  * * Added description of dma registers used in timeout_interrupt
 371  * * Removed old code
 372  *
 373  * Revision 1.28  2000/05/08 16:38:58  mattias
 374  * * Bugfix for flushing fifo in timeout_interrupt
 375  *   Problem occurs when bluetooth stack waits for a small number of bytes
 376  *   containing an event acknowledging free buffers in bluetooth HW
 377  *   As before, data was stuck in fifo until more data came on uart and
 378  *   flushed it up to the stack.
 379  *
 380  * Revision 1.27  2000/05/02 09:52:28  jonasd
 381  * Added fix for peculiar etrax behaviour when eop is forced on an empty
 382  * fifo. This is used when flashing the IRMA chip. Disabled by default.
 383  *
 384  * Revision 1.26  2000/03/29 15:32:02  bjornw
 385  * 2.0.34 updates
 386  *
 387  * Revision 1.25  2000/02/16 16:59:36  bjornw
 388  * * Receive DMA directly into the flip-buffer, eliminating an intermediary
 389  *   receive buffer and a memcpy. Will avoid some overruns.
 390  * * Error message on debug port if an overrun or flip buffer overrun occurs.
 391  * * Just use the first byte in the flag flip buffer for errors.
 392  * * Check for timeout on the serial ports only each 5/100 s, not 1/100.
 393  *
 394  * Revision 1.24  2000/02/09 18:02:28  bjornw
 395  * * Clear serial errors (overrun, framing, parity) correctly. Before, the
 396  *   receiver would get stuck if an error occurred and we did not restart
 397  *   the input DMA.
 398  * * Cosmetics (indentation, some code made into inlines)
 399  * * Some more debug options
 400  * * Actually shut down the serial port (DMA irq, DMA reset, receiver stop)
 401  *   when the last open is closed. Corresponding fixes in startup().
 402  * * rs_close() "tx FIFO wait" code moved into right place, bug & -> && fixed
 403  *   and make a special case out of port 1 (R_DMA_CHx_STATUS is broken for that)
 404  * * e100_disable_rx/enable_rx just disables/enables the receiver, not RTS
 405  *
 406  * Revision 1.23  2000/01/24 17:46:19  johana
 407  * Wait for flush of DMA/FIFO when closing port.
 408  *
 409  * Revision 1.22  2000/01/20 18:10:23  johana
 410  * Added TIOCMGET ioctl to return modem status.
 411  * Implemented modem status/control that works with the extra signals
 412  * (DTR, DSR, RI,CD) as well.
 413  * 3 different modes supported:
 414  * ser0 on PB (Bundy), ser1 on PB (Lisa) and ser2 on PA (Bundy)
 415  * Fixed DEF_TX value that caused the serial transmitter pin (txd) to go to 0 when
 416  * closing the last filehandle, NASTY!.
 417  * Added break generation, not tested though!
 418  * Use IRQF_SHARED when request_irq() for ser2 and ser3 (shared with) par0 and par1.
 419  * You can't use them at the same time (yet..), but you can hopefully switch
 420  * between ser2/par0, ser3/par1 with the same kernel config.
 421  * Replaced some magic constants with defines
 422  *
 423  *
 424  */
 425
 426 static char *serial_version = "$Revision: 1.25 $";
 427
 428 #include <linux/types.h>
 429 #include <linux/errno.h>
 430 #include <linux/signal.h>
 431 #include <linux/sched.h>
 432 #include <linux/timer.h>
 433 #include <linux/interrupt.h>
 434 #include <linux/tty.h>
 435 #include <linux/tty_flip.h>
 436 #include <linux/major.h>
 437 #include <linux/string.h>
 438 #include <linux/fcntl.h>
 439 #include <linux/mm.h>
 440 #include <linux/slab.h>
 441 #include <linux/init.h>
 442 #include <asm/uaccess.h>
 443 #include <linux/kernel.h>
 444 #include <linux/mutex.h>
 445
 446 #include <asm/io.h>
 447 #include <asm/irq.h>
 448 #include <asm/system.h>
 449 #include <asm/bitops.h>
 450 #include <linux/delay.h>
 451
 452 #include <asm/arch/svinto.h>
 453
 454 /* non-arch dependent serial structures are in linux/serial.h */
 455 #include <linux/serial.h>
 456 /* while we keep our own stuff (struct e100_serial) in a local .h file */
 457 #include "serial.h"
 458 #include <asm/fasttimer.h>
 459
 460 #ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
 461 #ifndef CONFIG_ETRAX_FAST_TIMER
 462 #error "Enable FAST_TIMER to use SERIAL_FAST_TIMER"
 463 #endif
 464 #endif
 465
 466 #if defined(CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS) && \
 467            (CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS == 0)
 468 #error "RX_TIMEOUT_TICKS == 0 not allowed, use 1"
 469 #endif
 470
 471 #if defined(CONFIG_ETRAX_RS485_ON_PA) && defined(CONFIG_ETRAX_RS485_ON_PORT_G)
 472 #error "Disable either CONFIG_ETRAX_RS485_ON_PA or CONFIG_ETRAX_RS485_ON_PORT_G"
 473 #endif
 474
 475 /*
 476  * All of the compatibilty code so we can compile serial.c against
 477  * older kernels is hidden in serial_compat.h
 478  */
 479 #if defined(LOCAL_HEADERS)
 480 #include "serial_compat.h"
 481 #endif
 482
 483 struct tty_driver *serial_driver;
 484
 485 /* serial subtype definitions */
 486 #ifndef SERIAL_TYPE_NORMAL
 487 #define SERIAL_TYPE_NORMAL      1
 488 #endif
 489
 490 /* number of characters left in xmit buffer before we ask for more */
 491 #define WAKEUP_CHARS 256
 492
 493 //#define SERIAL_DEBUG_INTR
 494 //#define SERIAL_DEBUG_OPEN
 495 //#define SERIAL_DEBUG_FLOW
 496 //#define SERIAL_DEBUG_DATA
 497 //#define SERIAL_DEBUG_THROTTLE
 498 //#define SERIAL_DEBUG_IO  /* Debug for Extra control and status pins */
 499 //#define SERIAL_DEBUG_LINE 0 /* What serport we want to debug */
 500
 501 /* Enable this to use serial interrupts to handle when you
 502    expect the first received event on the serial port to
 503    be an error, break or similar. Used to be able to flash IRMA
 504    from eLinux */
 505 #define SERIAL_HANDLE_EARLY_ERRORS
 506
 507 /* Defined and used in n_tty.c, but we need it here as well */
 508 #define TTY_THRESHOLD_THROTTLE 128
 509
 510 /* Due to buffersizes and threshold values, our SERIAL_DESCR_BUF_SIZE
 511  * must not be to high or flow control won't work if we leave it to the tty
 512  * layer so we have our own throttling in flush_to_flip
 513  * TTY_FLIPBUF_SIZE=512,
 514  * TTY_THRESHOLD_THROTTLE/UNTHROTTLE=128
 515  * BUF_SIZE can't be > 128
 516  */
 517 /* Currently 16 descriptors x 128 bytes = 2048 bytes */
 518 #define SERIAL_DESCR_BUF_SIZE 256
 519
 520 #define SERIAL_PRESCALE_BASE 3125000 /* 3.125MHz */
 521 #define DEF_BAUD_BASE SERIAL_PRESCALE_BASE
 522
 523 /* We don't want to load the system with massive fast timer interrupt
 524  * on high baudrates so limit it to 250 us (4kHz) */
 525 #define MIN_FLUSH_TIME_USEC 250
 526
 527 /* Add an x here to log a lot of timer stuff */
 528 #define TIMERD(x)
 529 /* Debug details of interrupt handling */
 530 #define DINTR1(x)  /* irq on/off, errors */
 531 #define DINTR2(x)    /* tx and rx */
 532 /* Debug flip buffer stuff */
 533 #define DFLIP(x)
 534 /* Debug flow control and overview of data flow */
 535 #define DFLOW(x)
 536 #define DBAUD(x)
 537 #define DLOG_INT_TRIG(x)
 538
 539 //#define DEBUG_LOG_INCLUDED
 540 #ifndef DEBUG_LOG_INCLUDED
 541 #define DEBUG_LOG(line, string, value)
 542 #else
 543 struct debug_log_info
 544 {
 545         unsigned long time;
 546         unsigned long timer_data;
 547 //  int line;
 548         const char *string;
 549         int value;
 550 };
 551 #define DEBUG_LOG_SIZE 4096
 552
 553 struct debug_log_info debug_log[DEBUG_LOG_SIZE];
 554 int debug_log_pos = 0;
 555
 556 #define DEBUG_LOG(_line, _string, _value) do { \
 557   if ((_line) == SERIAL_DEBUG_LINE) {\
 558     debug_log_func(_line, _string, _value); \
 559   }\
 560 }while(0)
 561
 562 void debug_log_func(int line, const char *string, int value)
 563 {
 564         if (debug_log_pos < DEBUG_LOG_SIZE) {
 565                 debug_log[debug_log_pos].time = jiffies;
 566                 debug_log[debug_log_pos].timer_data = *R_TIMER_DATA;
 567 //    debug_log[debug_log_pos].line = line;
 568                 debug_log[debug_log_pos].string = string;
 569                 debug_log[debug_log_pos].value = value;
 570                 debug_log_pos++;
 571         }
 572         /*printk(string, value);*/
 573 }
 574 #endif
 575
 576 #ifndef CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS
 577 /* Default number of timer ticks before flushing rx fifo
 578  * When using "little data, low latency applications: use 0
 579  * When using "much data applications (PPP)" use ~5
 580  */
 581 #define CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS 5
 582 #endif
 583
 584 unsigned long timer_data_to_ns(unsigned long timer_data);
 585
 586 static void change_speed(struct e100_serial *info);
 587 static void rs_throttle(struct tty_struct * tty);
 588 static void rs_wait_until_sent(struct tty_struct *tty, int timeout);
 589 static int rs_write(struct tty_struct * tty, int from_user,
 590                     const unsigned char *buf, int count);
 591 #ifdef CONFIG_ETRAX_RS485
 592 static int e100_write_rs485(struct tty_struct * tty, int from_user,
 593                             const unsigned char *buf, int count);
 594 #endif
 595 static int get_lsr_info(struct e100_serial * info, unsigned int *value);
 596
 597
 598 #define DEF_BAUD 115200   /* 115.2 kbit/s */
 599 #define STD_FLAGS (ASYNC_BOOT_AUTOCONF | ASYNC_SKIP_TEST)
 600 #define DEF_RX 0x20  /* or SERIAL_CTRL_W >> 8 */
 601 /* Default value of tx_ctrl register: has txd(bit 7)=1 (idle) as default */
 602 #define DEF_TX 0x80  /* or SERIAL_CTRL_B */
 603
 604 /* offsets from R_SERIALx_CTRL */
 605
 606 #define REG_DATA 0
 607 #define REG_DATA_STATUS32 0 /* this is the 32 bit register R_SERIALx_READ */
 608 #define REG_TR_DATA 0
 609 #define REG_STATUS 1
 610 #define REG_TR_CTRL 1
 611 #define REG_REC_CTRL 2
 612 #define REG_BAUD 3
 613 #define REG_XOFF 4  /* this is a 32 bit register */
 614
 615 /* The bitfields are the same for all serial ports */
 616 #define SER_RXD_MASK         IO_MASK(R_SERIAL0_STATUS, rxd)
 617 #define SER_DATA_AVAIL_MASK  IO_MASK(R_SERIAL0_STATUS, data_avail)
 618 #define SER_FRAMING_ERR_MASK IO_MASK(R_SERIAL0_STATUS, framing_err)
 619 #define SER_PAR_ERR_MASK     IO_MASK(R_SERIAL0_STATUS, par_err)
 620 #define SER_OVERRUN_MASK     IO_MASK(R_SERIAL0_STATUS, overrun)
 621
 622 #define SER_ERROR_MASK (SER_OVERRUN_MASK | SER_PAR_ERR_MASK | SER_FRAMING_ERR_MASK)
 623
 624 /* Values for info->errorcode */
 625 #define ERRCODE_SET_BREAK    (TTY_BREAK)
 626 #define ERRCODE_INSERT        0x100
 627 #define ERRCODE_INSERT_BREAK (ERRCODE_INSERT | TTY_BREAK)
 628
 629 #define FORCE_EOP(info)  *R_SET_EOP = 1U << info->iseteop;
 630
 631 /*
 632  * General note regarding the use of IO_* macros in this file:
 633  *
 634  * We will use the bits defined for DMA channel 6 when using various
 635  * IO_* macros (e.g. IO_STATE, IO_MASK, IO_EXTRACT) and _assume_ they are
 636  * the same for all channels (which of course they are).
 637  *
 638  * We will also use the bits defined for serial port 0 when writing commands
 639  * to the different ports, as these bits too are the same for all ports.
 640  */
 641
 642
 643 /* Mask for the irqs possibly enabled in R_IRQ_MASK1_RD etc. */
 644 static const unsigned long e100_ser_int_mask = 0
 645 #ifdef CONFIG_ETRAX_SERIAL_PORT0
 646 | IO_MASK(R_IRQ_MASK1_RD, ser0_data) | IO_MASK(R_IRQ_MASK1_RD, ser0_ready)
 647 #endif
 648 #ifdef CONFIG_ETRAX_SERIAL_PORT1
 649 | IO_MASK(R_IRQ_MASK1_RD, ser1_data) | IO_MASK(R_IRQ_MASK1_RD, ser1_ready)
 650 #endif
 651 #ifdef CONFIG_ETRAX_SERIAL_PORT2
 652 | IO_MASK(R_IRQ_MASK1_RD, ser2_data) | IO_MASK(R_IRQ_MASK1_RD, ser2_ready)
 653 #endif
 654 #ifdef CONFIG_ETRAX_SERIAL_PORT3
 655 | IO_MASK(R_IRQ_MASK1_RD, ser3_data) | IO_MASK(R_IRQ_MASK1_RD, ser3_ready)
 656 #endif
 657 ;
 658 unsigned long r_alt_ser_baudrate_shadow = 0;
 659
 660 /* this is the data for the four serial ports in the etrax100 */
 661 /*  DMA2(ser2), DMA4(ser3), DMA6(ser0) or DMA8(ser1) */
 662 /* R_DMA_CHx_CLR_INTR, R_DMA_CHx_FIRST, R_DMA_CHx_CMD */
 663
 664 static struct e100_serial rs_table[] = {
 665         { .baud        = DEF_BAUD,
 666           .port        = (unsigned char *)R_SERIAL0_CTRL,
 667           .irq         = 1U << 12, /* uses DMA 6 and 7 */
 668           .oclrintradr = R_DMA_CH6_CLR_INTR,
 669           .ofirstadr   = R_DMA_CH6_FIRST,
 670           .ocmdadr     = R_DMA_CH6_CMD,
 671           .ostatusadr  = R_DMA_CH6_STATUS,
 672           .iclrintradr = R_DMA_CH7_CLR_INTR,
 673           .ifirstadr   = R_DMA_CH7_FIRST,
 674           .icmdadr     = R_DMA_CH7_CMD,
 675           .idescradr   = R_DMA_CH7_DESCR,
 676           .flags       = STD_FLAGS,
 677           .rx_ctrl     = DEF_RX,
 678           .tx_ctrl     = DEF_TX,
 679           .iseteop     = 2,
 680 #ifdef CONFIG_ETRAX_SERIAL_PORT0
 681           .enabled  = 1,
 682 #ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA6_OUT
 683           .dma_out_enabled = 1,
 684 #else
 685           .dma_out_enabled = 0,
 686 #endif
 687 #ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA7_IN
 688           .dma_in_enabled = 1,
 689 #else
 690           .dma_in_enabled = 0
 691 #endif
 692 #else
 693           .enabled  = 0,
 694           .dma_out_enabled = 0,
 695           .dma_in_enabled = 0
 696 #endif
 697
 698 },  /* ttyS0 */
 699 #ifndef CONFIG_SVINTO_SIM
 700         { .baud        = DEF_BAUD,
 701           .port        = (unsigned char *)R_SERIAL1_CTRL,
 702           .irq         = 1U << 16, /* uses DMA 8 and 9 */
 703           .oclrintradr = R_DMA_CH8_CLR_INTR,
 704           .ofirstadr   = R_DMA_CH8_FIRST,
 705           .ocmdadr     = R_DMA_CH8_CMD,
 706           .ostatusadr  = R_DMA_CH8_STATUS,
 707           .iclrintradr = R_DMA_CH9_CLR_INTR,
 708           .ifirstadr   = R_DMA_CH9_FIRST,
 709           .icmdadr     = R_DMA_CH9_CMD,
 710           .idescradr   = R_DMA_CH9_DESCR,
 711           .flags       = STD_FLAGS,
 712           .rx_ctrl     = DEF_RX,
 713           .tx_ctrl     = DEF_TX,
 714           .iseteop     = 3,
 715 #ifdef CONFIG_ETRAX_SERIAL_PORT1
 716           .enabled  = 1,
 717 #ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA8_OUT
 718           .dma_out_enabled = 1,
 719 #else
 720           .dma_out_enabled = 0,
 721 #endif
 722 #ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA9_IN
 723           .dma_in_enabled = 1,
 724 #else
 725           .dma_in_enabled = 0
 726 #endif
 727 #else
 728           .enabled  = 0,
 729           .dma_out_enabled = 0,
 730           .dma_in_enabled = 0
 731 #endif
 732 },  /* ttyS1 */
 733
 734         { .baud        = DEF_BAUD,
 735           .port        = (unsigned char *)R_SERIAL2_CTRL,
 736           .irq         = 1U << 4,  /* uses DMA 2 and 3 */
 737           .oclrintradr = R_DMA_CH2_CLR_INTR,
 738           .ofirstadr   = R_DMA_CH2_FIRST,
 739           .ocmdadr     = R_DMA_CH2_CMD,
 740           .ostatusadr  = R_DMA_CH2_STATUS,
 741           .iclrintradr = R_DMA_CH3_CLR_INTR,
 742           .ifirstadr   = R_DMA_CH3_FIRST,
 743           .icmdadr     = R_DMA_CH3_CMD,
 744           .idescradr   = R_DMA_CH3_DESCR,
 745           .flags       = STD_FLAGS,
 746           .rx_ctrl     = DEF_RX,
 747           .tx_ctrl     = DEF_TX,
 748           .iseteop     = 0,
 749 #ifdef CONFIG_ETRAX_SERIAL_PORT2
 750           .enabled  = 1,
 751 #ifdef CONFIG_ETRAX_SERIAL_PORT2_DMA2_OUT
 752           .dma_out_enabled = 1,
 753 #else
 754           .dma_out_enabled = 0,
 755 #endif
 756 #ifdef CONFIG_ETRAX_SERIAL_PORT2_DMA3_IN
 757           .dma_in_enabled = 1,
 758 #else
 759           .dma_in_enabled = 0
 760 #endif
 761 #else
 762           .enabled  = 0,
 763           .dma_out_enabled = 0,
 764           .dma_in_enabled = 0
 765 #endif
 766  },  /* ttyS2 */
 767
 768         { .baud        = DEF_BAUD,
 769           .port        = (unsigned char *)R_SERIAL3_CTRL,
 770           .irq         = 1U << 8,  /* uses DMA 4 and 5 */
 771           .oclrintradr = R_DMA_CH4_CLR_INTR,
 772           .ofirstadr   = R_DMA_CH4_FIRST,
 773           .ocmdadr     = R_DMA_CH4_CMD,
 774           .ostatusadr  = R_DMA_CH4_STATUS,
 775           .iclrintradr = R_DMA_CH5_CLR_INTR,
 776           .ifirstadr   = R_DMA_CH5_FIRST,
 777           .icmdadr     = R_DMA_CH5_CMD,
 778           .idescradr   = R_DMA_CH5_DESCR,
 779           .flags       = STD_FLAGS,
 780           .rx_ctrl     = DEF_RX,
 781           .tx_ctrl     = DEF_TX,
 782           .iseteop     = 1,
 783 #ifdef CONFIG_ETRAX_SERIAL_PORT3
 784           .enabled  = 1,
 785 #ifdef CONFIG_ETRAX_SERIAL_PORT3_DMA4_OUT
 786           .dma_out_enabled = 1,
 787 #else
 788           .dma_out_enabled = 0,
 789 #endif
 790 #ifdef CONFIG_ETRAX_SERIAL_PORT3_DMA5_IN
 791           .dma_in_enabled = 1,
 792 #else
 793           .dma_in_enabled = 0
 794 #endif
 795 #else
 796           .enabled  = 0,
 797           .dma_out_enabled = 0,
 798           .dma_in_enabled = 0
 799 #endif
 800  }   /* ttyS3 */
 801 #endif
 802 };
 803
 804
 805 #define NR_PORTS (sizeof(rs_table)/sizeof(struct e100_serial))
 806
 807 static struct termios *serial_termios[NR_PORTS];
 808 static struct termios *serial_termios_locked[NR_PORTS];
 809 #ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
 810 static struct fast_timer fast_timers[NR_PORTS];
 811 #endif
 812
 813 #ifdef CONFIG_ETRAX_SERIAL_PROC_ENTRY
 814 #define PROCSTAT(x) x
 815 struct ser_statistics_type {
 816         int overrun_cnt;
 817         int early_errors_cnt;
 818         int ser_ints_ok_cnt;
 819         int errors_cnt;
 820         unsigned long int processing_flip;
 821         unsigned long processing_flip_still_room;
 822         unsigned long int timeout_flush_cnt;
 823         int rx_dma_ints;
 824         int tx_dma_ints;
 825         int rx_tot;
 826         int tx_tot;
 827 };
 828
 829 static struct ser_statistics_type ser_stat[NR_PORTS];
 830
 831 #else
 832
 833 #define PROCSTAT(x)
 834
 835 #endif /* CONFIG_ETRAX_SERIAL_PROC_ENTRY */
 836
 837 /* RS-485 */
 838 #if defined(CONFIG_ETRAX_RS485)
 839 #ifdef CONFIG_ETRAX_FAST_TIMER
 840 static struct fast_timer fast_timers_rs485[NR_PORTS];
 841 #endif
 842 #if defined(CONFIG_ETRAX_RS485_ON_PA)
 843 static int rs485_pa_bit = CONFIG_ETRAX_RS485_ON_PA_BIT;
 844 #endif
 845 #if defined(CONFIG_ETRAX_RS485_ON_PORT_G)
 846 static int rs485_port_g_bit = CONFIG_ETRAX_RS485_ON_PORT_G_BIT;
 847 #endif
 848 #endif
 849
 850 /* Info and macros needed for each ports extra control/status signals. */
 851 #define E100_STRUCT_PORT(line, pinname) \
 852  ((CONFIG_ETRAX_SER##line##_##pinname##_ON_PA_BIT >= 0)? \
 853                 (R_PORT_PA_DATA): ( \
 854  (CONFIG_ETRAX_SER##line##_##pinname##_ON_PB_BIT >= 0)? \
 855                 (R_PORT_PB_DATA):&dummy_ser[line]))
 856
 857 #define E100_STRUCT_SHADOW(line, pinname) \
 858  ((CONFIG_ETRAX_SER##line##_##pinname##_ON_PA_BIT >= 0)? \
 859                 (&port_pa_data_shadow): ( \
 860  (CONFIG_ETRAX_SER##line##_##pinname##_ON_PB_BIT >= 0)? \
 861                 (&port_pb_data_shadow):&dummy_ser[line]))
 862 #define E100_STRUCT_MASK(line, pinname) \
 863  ((CONFIG_ETRAX_SER##line##_##pinname##_ON_PA_BIT >= 0)? \
 864                 (1<<CONFIG_ETRAX_SER##line##_##pinname##_ON_PA_BIT): ( \
 865  (CONFIG_ETRAX_SER##line##_##pinname##_ON_PB_BIT >= 0)? \
 866                 (1<<CONFIG_ETRAX_SER##line##_##pinname##_ON_PB_BIT):DUMMY_##pinname##_MASK))
 867
 868 #define DUMMY_DTR_MASK 1
 869 #define DUMMY_RI_MASK  2
 870 #define DUMMY_DSR_MASK 4
 871 #define DUMMY_CD_MASK  8
 872 static unsigned char dummy_ser[NR_PORTS] = {0xFF, 0xFF, 0xFF,0xFF};
 873
 874 /* If not all status pins are used or disabled, use mixed mode */
 875 #ifdef CONFIG_ETRAX_SERIAL_PORT0
 876
 877 #define SER0_PA_BITSUM (CONFIG_ETRAX_SER0_DTR_ON_PA_BIT+CONFIG_ETRAX_SER0_RI_ON_PA_BIT+CONFIG_ETRAX_SER0_DSR_ON_PA_BIT+CONFIG_ETRAX_SER0_CD_ON_PA_BIT)
 878
 879 #if SER0_PA_BITSUM != -4
 880 #  if CONFIG_ETRAX_SER0_DTR_ON_PA_BIT == -1
 881 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 882 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 883 #    endif
 884 #   endif
 885 # if CONFIG_ETRAX_SER0_RI_ON_PA_BIT == -1
 886 #   ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 887 #     define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 888 #   endif
 889 #  endif
 890 #  if CONFIG_ETRAX_SER0_DSR_ON_PA_BIT == -1
 891 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 892 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 893 #    endif
 894 #  endif
 895 #  if CONFIG_ETRAX_SER0_CD_ON_PA_BIT == -1
 896 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 897 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 898 #    endif
 899 #  endif
 900 #endif
 901
 902 #define SER0_PB_BITSUM (CONFIG_ETRAX_SER0_DTR_ON_PB_BIT+CONFIG_ETRAX_SER0_RI_ON_PB_BIT+CONFIG_ETRAX_SER0_DSR_ON_PB_BIT+CONFIG_ETRAX_SER0_CD_ON_PB_BIT)
 903
 904 #if SER0_PB_BITSUM != -4
 905 #  if CONFIG_ETRAX_SER0_DTR_ON_PB_BIT == -1
 906 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 907 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 908 #    endif
 909 #   endif
 910 # if CONFIG_ETRAX_SER0_RI_ON_PB_BIT == -1
 911 #   ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 912 #     define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 913 #   endif
 914 #  endif
 915 #  if CONFIG_ETRAX_SER0_DSR_ON_PB_BIT == -1
 916 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 917 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 918 #    endif
 919 #  endif
 920 #  if CONFIG_ETRAX_SER0_CD_ON_PB_BIT == -1
 921 #    ifndef CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED
 922 #      define CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED 1
 923 #    endif
 924 #  endif
 925 #endif
 926
 927 #endif /* PORT0 */
 928
 929
 930 #ifdef CONFIG_ETRAX_SERIAL_PORT1
 931
 932 #define SER1_PA_BITSUM (CONFIG_ETRAX_SER1_DTR_ON_PA_BIT+CONFIG_ETRAX_SER1_RI_ON_PA_BIT+CONFIG_ETRAX_SER1_DSR_ON_PA_BIT+CONFIG_ETRAX_SER1_CD_ON_PA_BIT)
 933
 934 #if SER1_PA_BITSUM != -4
 935 #  if CONFIG_ETRAX_SER1_DTR_ON_PA_BIT == -1
 936 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 937 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 938 #    endif
 939 #   endif
 940 # if CONFIG_ETRAX_SER1_RI_ON_PA_BIT == -1
 941 #   ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 942 #     define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 943 #   endif
 944 #  endif
 945 #  if CONFIG_ETRAX_SER1_DSR_ON_PA_BIT == -1
 946 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 947 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 948 #    endif
 949 #  endif
 950 #  if CONFIG_ETRAX_SER1_CD_ON_PA_BIT == -1
 951 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 952 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 953 #    endif
 954 #  endif
 955 #endif
 956
 957 #define SER1_PB_BITSUM (CONFIG_ETRAX_SER1_DTR_ON_PB_BIT+CONFIG_ETRAX_SER1_RI_ON_PB_BIT+CONFIG_ETRAX_SER1_DSR_ON_PB_BIT+CONFIG_ETRAX_SER1_CD_ON_PB_BIT)
 958
 959 #if SER1_PB_BITSUM != -4
 960 #  if CONFIG_ETRAX_SER1_DTR_ON_PB_BIT == -1
 961 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 962 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 963 #    endif
 964 #   endif
 965 # if CONFIG_ETRAX_SER1_RI_ON_PB_BIT == -1
 966 #   ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 967 #     define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 968 #   endif
 969 #  endif
 970 #  if CONFIG_ETRAX_SER1_DSR_ON_PB_BIT == -1
 971 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 972 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 973 #    endif
 974 #  endif
 975 #  if CONFIG_ETRAX_SER1_CD_ON_PB_BIT == -1
 976 #    ifndef CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED
 977 #      define CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED 1
 978 #    endif
 979 #  endif
 980 #endif
 981
 982 #endif /* PORT1 */
 983
 984 #ifdef CONFIG_ETRAX_SERIAL_PORT2
 985
 986 #define SER2_PA_BITSUM (CONFIG_ETRAX_SER2_DTR_ON_PA_BIT+CONFIG_ETRAX_SER2_RI_ON_PA_BIT+CONFIG_ETRAX_SER2_DSR_ON_PA_BIT+CONFIG_ETRAX_SER2_CD_ON_PA_BIT)
 987
 988 #if SER2_PA_BITSUM != -4
 989 #  if CONFIG_ETRAX_SER2_DTR_ON_PA_BIT == -1
 990 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
 991 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
 992 #    endif
 993 #   endif
 994 # if CONFIG_ETRAX_SER2_RI_ON_PA_BIT == -1
 995 #   ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
 996 #     define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
 997 #   endif
 998 #  endif
 999 #  if CONFIG_ETRAX_SER2_DSR_ON_PA_BIT == -1
1000 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1001 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1002 #    endif
1003 #  endif
1004 #  if CONFIG_ETRAX_SER2_CD_ON_PA_BIT == -1
1005 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1006 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1007 #    endif
1008 #  endif
1009 #endif
1010
1011 #define SER2_PB_BITSUM (CONFIG_ETRAX_SER2_DTR_ON_PB_BIT+CONFIG_ETRAX_SER2_RI_ON_PB_BIT+CONFIG_ETRAX_SER2_DSR_ON_PB_BIT+CONFIG_ETRAX_SER2_CD_ON_PB_BIT)
1012
1013 #if SER2_PB_BITSUM != -4
1014 #  if CONFIG_ETRAX_SER2_DTR_ON_PB_BIT == -1
1015 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1016 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1017 #    endif
1018 #   endif
1019 # if CONFIG_ETRAX_SER2_RI_ON_PB_BIT == -1
1020 #   ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1021 #     define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1022 #   endif
1023 #  endif
1024 #  if CONFIG_ETRAX_SER2_DSR_ON_PB_BIT == -1
1025 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1026 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1027 #    endif
1028 #  endif
1029 #  if CONFIG_ETRAX_SER2_CD_ON_PB_BIT == -1
1030 #    ifndef CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED
1031 #      define CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED 1
1032 #    endif
1033 #  endif
1034 #endif
1035
1036 #endif /* PORT2 */
1037
1038 #ifdef CONFIG_ETRAX_SERIAL_PORT3
1039
1040 #define SER3_PA_BITSUM (CONFIG_ETRAX_SER3_DTR_ON_PA_BIT+CONFIG_ETRAX_SER3_RI_ON_PA_BIT+CONFIG_ETRAX_SER3_DSR_ON_PA_BIT+CONFIG_ETRAX_SER3_CD_ON_PA_BIT)
1041
1042 #if SER3_PA_BITSUM != -4
1043 #  if CONFIG_ETRAX_SER3_DTR_ON_PA_BIT == -1
1044 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1045 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1046 #    endif
1047 #   endif
1048 # if CONFIG_ETRAX_SER3_RI_ON_PA_BIT == -1
1049 #   ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1050 #     define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1051 #   endif
1052 #  endif
1053 #  if CONFIG_ETRAX_SER3_DSR_ON_PA_BIT == -1
1054 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1055 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1056 #    endif
1057 #  endif
1058 #  if CONFIG_ETRAX_SER3_CD_ON_PA_BIT == -1
1059 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1060 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1061 #    endif
1062 #  endif
1063 #endif
1064
1065 #define SER3_PB_BITSUM (CONFIG_ETRAX_SER3_DTR_ON_PB_BIT+CONFIG_ETRAX_SER3_RI_ON_PB_BIT+CONFIG_ETRAX_SER3_DSR_ON_PB_BIT+CONFIG_ETRAX_SER3_CD_ON_PB_BIT)
1066
1067 #if SER3_PB_BITSUM != -4
1068 #  if CONFIG_ETRAX_SER3_DTR_ON_PB_BIT == -1
1069 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1070 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1071 #    endif
1072 #   endif
1073 # if CONFIG_ETRAX_SER3_RI_ON_PB_BIT == -1
1074 #   ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1075 #     define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1076 #   endif
1077 #  endif
1078 #  if CONFIG_ETRAX_SER3_DSR_ON_PB_BIT == -1
1079 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1080 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1081 #    endif
1082 #  endif
1083 #  if CONFIG_ETRAX_SER3_CD_ON_PB_BIT == -1
1084 #    ifndef CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED
1085 #      define CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED 1
1086 #    endif
1087 #  endif
1088 #endif
1089
1090 #endif /* PORT3 */
1091
1092
1093 #if defined(CONFIG_ETRAX_SER0_DTR_RI_DSR_CD_MIXED) || \
1094     defined(CONFIG_ETRAX_SER1_DTR_RI_DSR_CD_MIXED) || \
1095     defined(CONFIG_ETRAX_SER2_DTR_RI_DSR_CD_MIXED) || \
1096     defined(CONFIG_ETRAX_SER3_DTR_RI_DSR_CD_MIXED)
1097 #define CONFIG_ETRAX_SERX_DTR_RI_DSR_CD_MIXED
1098 #endif
1099
1100 #ifdef CONFIG_ETRAX_SERX_DTR_RI_DSR_CD_MIXED
1101 /* The pins can be mixed on PA and PB */
1102 #define CONTROL_PINS_PORT_NOT_USED(line) \
1103   &dummy_ser[line], &dummy_ser[line], \
1104   &dummy_ser[line], &dummy_ser[line], \
1105   &dummy_ser[line], &dummy_ser[line], \
1106   &dummy_ser[line], &dummy_ser[line], \
1107   DUMMY_DTR_MASK, DUMMY_RI_MASK, DUMMY_DSR_MASK, DUMMY_CD_MASK
1108
1109
1110 struct control_pins
1111 {
1112         volatile unsigned char *dtr_port;
1113         unsigned char          *dtr_shadow;
1114         volatile unsigned char *ri_port;
1115         unsigned char          *ri_shadow;
1116         volatile unsigned char *dsr_port;
1117         unsigned char          *dsr_shadow;
1118         volatile unsigned char *cd_port;
1119         unsigned char          *cd_shadow;
1120
1121         unsigned char dtr_mask;
1122         unsigned char ri_mask;
1123         unsigned char dsr_mask;
1124         unsigned char cd_mask;
1125 };
1126
1127 static const struct control_pins e100_modem_pins[NR_PORTS] =
1128 {
1129         /* Ser 0 */
1130         {
1131 #ifdef CONFIG_ETRAX_SERIAL_PORT0
1132         E100_STRUCT_PORT(0,DTR), E100_STRUCT_SHADOW(0,DTR),
1133         E100_STRUCT_PORT(0,RI),  E100_STRUCT_SHADOW(0,RI),
1134         E100_STRUCT_PORT(0,DSR), E100_STRUCT_SHADOW(0,DSR),
1135         E100_STRUCT_PORT(0,CD),  E100_STRUCT_SHADOW(0,CD),
1136         E100_STRUCT_MASK(0,DTR),
1137         E100_STRUCT_MASK(0,RI),
1138         E100_STRUCT_MASK(0,DSR),
1139         E100_STRUCT_MASK(0,CD)
1140 #else
1141         CONTROL_PINS_PORT_NOT_USED(0)
1142 #endif
1143         },
1144
1145         /* Ser 1 */
1146         {
1147 #ifdef CONFIG_ETRAX_SERIAL_PORT1
1148         E100_STRUCT_PORT(1,DTR), E100_STRUCT_SHADOW(1,DTR),
1149         E100_STRUCT_PORT(1,RI),  E100_STRUCT_SHADOW(1,RI),
1150         E100_STRUCT_PORT(1,DSR), E100_STRUCT_SHADOW(1,DSR),
1151         E100_STRUCT_PORT(1,CD),  E100_STRUCT_SHADOW(1,CD),
1152         E100_STRUCT_MASK(1,DTR),
1153         E100_STRUCT_MASK(1,RI),
1154         E100_STRUCT_MASK(1,DSR),
1155         E100_STRUCT_MASK(1,CD)
1156 #else
1157         CONTROL_PINS_PORT_NOT_USED(1)
1158 #endif
1159         },
1160
1161         /* Ser 2 */
1162         {
1163 #ifdef CONFIG_ETRAX_SERIAL_PORT2
1164         E100_STRUCT_PORT(2,DTR), E100_STRUCT_SHADOW(2,DTR),
1165         E100_STRUCT_PORT(2,RI),  E100_STRUCT_SHADOW(2,RI),
1166         E100_STRUCT_PORT(2,DSR), E100_STRUCT_SHADOW(2,DSR),
1167         E100_STRUCT_PORT(2,CD),  E100_STRUCT_SHADOW(2,CD),
1168         E100_STRUCT_MASK(2,DTR),
1169         E100_STRUCT_MASK(2,RI),
1170         E100_STRUCT_MASK(2,DSR),
1171         E100_STRUCT_MASK(2,CD)
1172 #else
1173         CONTROL_PINS_PORT_NOT_USED(2)
1174 #endif
1175         },
1176
1177         /* Ser 3 */
1178         {
1179 #ifdef CONFIG_ETRAX_SERIAL_PORT3
1180         E100_STRUCT_PORT(3,DTR), E100_STRUCT_SHADOW(3,DTR),
1181         E100_STRUCT_PORT(3,RI),  E100_STRUCT_SHADOW(3,RI),
1182         E100_STRUCT_PORT(3,DSR), E100_STRUCT_SHADOW(3,DSR),
1183         E100_STRUCT_PORT(3,CD),  E100_STRUCT_SHADOW(3,CD),
1184         E100_STRUCT_MASK(3,DTR),
1185         E100_STRUCT_MASK(3,RI),
1186         E100_STRUCT_MASK(3,DSR),
1187         E100_STRUCT_MASK(3,CD)
1188 #else
1189         CONTROL_PINS_PORT_NOT_USED(3)
1190 #endif
1191         }
1192 };
1193 #else  /* CONFIG_ETRAX_SERX_DTR_RI_DSR_CD_MIXED */
1194
1195 /* All pins are on either PA or PB for each serial port */
1196 #define CONTROL_PINS_PORT_NOT_USED(line) \
1197   &dummy_ser[line], &dummy_ser[line], \
1198   DUMMY_DTR_MASK, DUMMY_RI_MASK, DUMMY_DSR_MASK, DUMMY_CD_MASK
1199
1200
1201 struct control_pins
1202 {
1203         volatile unsigned char *port;
1204         unsigned char          *shadow;
1205
1206         unsigned char dtr_mask;
1207         unsigned char ri_mask;
1208         unsigned char dsr_mask;
1209         unsigned char cd_mask;
1210 };
1211
1212 #define dtr_port port
1213 #define dtr_shadow shadow
1214 #define ri_port port
1215 #define ri_shadow shadow
1216 #define dsr_port port
1217 #define dsr_shadow shadow
1218 #define cd_port port
1219 #define cd_shadow shadow
1220
1221 static const struct control_pins e100_modem_pins[NR_PORTS] =
1222 {
1223         /* Ser 0 */
1224         {
1225 #ifdef CONFIG_ETRAX_SERIAL_PORT0
1226         E100_STRUCT_PORT(0,DTR), E100_STRUCT_SHADOW(0,DTR),
1227         E100_STRUCT_MASK(0,DTR),
1228         E100_STRUCT_MASK(0,RI),
1229         E100_STRUCT_MASK(0,DSR),
1230         E100_STRUCT_MASK(0,CD)
1231 #else
1232         CONTROL_PINS_PORT_NOT_USED(0)
1233 #endif
1234         },
1235
1236         /* Ser 1 */
1237         {
1238 #ifdef CONFIG_ETRAX_SERIAL_PORT1
1239         E100_STRUCT_PORT(1,DTR), E100_STRUCT_SHADOW(1,DTR),
1240         E100_STRUCT_MASK(1,DTR),
1241         E100_STRUCT_MASK(1,RI),
1242         E100_STRUCT_MASK(1,DSR),
1243         E100_STRUCT_MASK(1,CD)
1244 #else
1245         CONTROL_PINS_PORT_NOT_USED(1)
1246 #endif
1247         },
1248
1249         /* Ser 2 */
1250         {
1251 #ifdef CONFIG_ETRAX_SERIAL_PORT2
1252         E100_STRUCT_PORT(2,DTR), E100_STRUCT_SHADOW(2,DTR),
1253         E100_STRUCT_MASK(2,DTR),
1254         E100_STRUCT_MASK(2,RI),
1255         E100_STRUCT_MASK(2,DSR),
1256         E100_STRUCT_MASK(2,CD)
1257 #else
1258         CONTROL_PINS_PORT_NOT_USED(2)
1259 #endif
1260         },
1261
1262         /* Ser 3 */
1263         {
1264 #ifdef CONFIG_ETRAX_SERIAL_PORT3
1265         E100_STRUCT_PORT(3,DTR), E100_STRUCT_SHADOW(3,DTR),
1266         E100_STRUCT_MASK(3,DTR),
1267         E100_STRUCT_MASK(3,RI),
1268         E100_STRUCT_MASK(3,DSR),
1269         E100_STRUCT_MASK(3,CD)
1270 #else
1271         CONTROL_PINS_PORT_NOT_USED(3)
1272 #endif
1273         }
1274 };
1275 #endif /* !CONFIG_ETRAX_SERX_DTR_RI_DSR_CD_MIXED */
1276
1277 #define E100_RTS_MASK 0x20
1278 #define E100_CTS_MASK 0x40
1279
1280 /* All serial port signals are active low:
1281  * active   = 0 -> 3.3V to RS-232 driver -> -12V on RS-232 level
1282  * inactive = 1 -> 0V   to RS-232 driver -> +12V on RS-232 level
1283  *
1284  * These macros returns the pin value: 0=0V, >=1 = 3.3V on ETRAX chip
1285  */
1286
1287 /* Output */
1288 #define E100_RTS_GET(info) ((info)->rx_ctrl & E100_RTS_MASK)
1289 /* Input */
1290 #define E100_CTS_GET(info) ((info)->port[REG_STATUS] & E100_CTS_MASK)
1291
1292 /* These are typically PA or PB and 0 means 0V, 1 means 3.3V */
1293 /* Is an output */
1294 #define E100_DTR_GET(info) ((*e100_modem_pins[(info)->line].dtr_shadow) & e100_modem_pins[(info)->line].dtr_mask)
1295
1296 /* Normally inputs */
1297 #define E100_RI_GET(info) ((*e100_modem_pins[(info)->line].ri_port) & e100_modem_pins[(info)->line].ri_mask)
1298 #define E100_CD_GET(info) ((*e100_modem_pins[(info)->line].cd_port) & e100_modem_pins[(info)->line].cd_mask)
1299
1300 /* Input */
1301 #define E100_DSR_GET(info) ((*e100_modem_pins[(info)->line].dsr_port) & e100_modem_pins[(info)->line].dsr_mask)
1302
1303
1304 /*
1305  * tmp_buf is used as a temporary buffer by serial_write.  We need to
1306  * lock it in case the memcpy_fromfs blocks while swapping in a page,
1307  * and some other program tries to do a serial write at the same time.
1308  * Since the lock will only come under contention when the system is
1309  * swapping and available memory is low, it makes sense to share one
1310  * buffer across all the serial ports, since it significantly saves
1311  * memory if large numbers of serial ports are open.
1312  */
1313 static unsigned char *tmp_buf;
1314 static DEFINE_MUTEX(tmp_buf_mutex);
1315
1316 /* Calculate the chartime depending on baudrate, numbor of bits etc. */
1317 static void update_char_time(struct e100_serial * info)
1318 {
1319         tcflag_t cflags = info->tty->termios->c_cflag;
1320         int bits;
1321
1322         /* calc. number of bits / data byte */
1323         /* databits + startbit and 1 stopbit */
1324         if ((cflags & CSIZE) == CS7)
1325                 bits = 9;
1326         else
1327                 bits = 10;
1328
1329         if (cflags & CSTOPB)     /* 2 stopbits ? */
1330                 bits++;
1331
1332         if (cflags & PARENB)     /* parity bit ? */
1333                 bits++;
1334
1335         /* calc timeout */
1336         info->char_time_usec = ((bits * 1000000) / info->baud) + 1;
1337         info->flush_time_usec = 4*info->char_time_usec;
1338         if (info->flush_time_usec < MIN_FLUSH_TIME_USEC)
1339                 info->flush_time_usec = MIN_FLUSH_TIME_USEC;
1340
1341 }
1342
1343 /*
1344  * This function maps from the Bxxxx defines in asm/termbits.h into real
1345  * baud rates.
1346  */
1347
1348 static int
1349 cflag_to_baud(unsigned int cflag)
1350 {
1351         static int baud_table[] = {
1352                 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400,
1353                 4800, 9600, 19200, 38400 };
1354
1355         static int ext_baud_table[] = {
1356                 0, 57600, 115200, 230400, 460800, 921600, 1843200, 6250000,
1357                 0, 0, 0, 0, 0, 0, 0, 0 };
1358
1359         if (cflag & CBAUDEX)
1360                 return ext_baud_table[(cflag & CBAUD) & ~CBAUDEX];
1361         else
1362                 return baud_table[cflag & CBAUD];
1363 }
1364
1365 /* and this maps to an etrax100 hardware baud constant */
1366
1367 static unsigned char
1368 cflag_to_etrax_baud(unsigned int cflag)
1369 {
1370         char retval;
1371
1372         static char baud_table[] = {
1373                 -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, -1, 3, 4, 5, 6, 7 };
1374
1375         static char ext_baud_table[] = {
1376                 -1, 8, 9, 10, 11, 12, 13, 14, -1, -1, -1, -1, -1, -1, -1, -1 };
1377
1378         if (cflag & CBAUDEX)
1379                 retval = ext_baud_table[(cflag & CBAUD) & ~CBAUDEX];
1380         else
1381                 retval = baud_table[cflag & CBAUD];
1382
1383         if (retval < 0) {
1384                 printk(KERN_WARNING "serdriver tried setting invalid baud rate, flags %x.\n", cflag);
1385                 retval = 5; /* choose default 9600 instead */
1386         }
1387
1388         return retval | (retval << 4); /* choose same for both TX and RX */
1389 }
1390
1391
1392 /* Various static support functions */
1393
1394 /* Functions to set or clear DTR/RTS on the requested line */
1395 /* It is complicated by the fact that RTS is a serial port register, while
1396  * DTR might not be implemented in the HW at all, and if it is, it can be on
1397  * any general port.
1398  */
1399
1400
1401 static inline void
1402 e100_dtr(struct e100_serial *info, int set)
1403 {
1404 #ifndef CONFIG_SVINTO_SIM
1405         unsigned char mask = e100_modem_pins[info->line].dtr_mask;
1406
1407 #ifdef SERIAL_DEBUG_IO
1408         printk("ser%i dtr %i mask: 0x%02X\n", info->line, set, mask);
1409         printk("ser%i shadow before 0x%02X get: %i\n",
1410                info->line, *e100_modem_pins[info->line].dtr_shadow,
1411                E100_DTR_GET(info));
1412 #endif
1413         /* DTR is active low */
1414         {
1415                 unsigned long flags;
1416
1417                 save_flags(flags);
1418                 cli();
1419                 *e100_modem_pins[info->line].dtr_shadow &= ~mask;
1420                 *e100_modem_pins[info->line].dtr_shadow |= (set ? 0 : mask);
1421                 *e100_modem_pins[info->line].dtr_port = *e100_modem_pins[info->line].dtr_shadow;
1422                 restore_flags(flags);
1423         }
1424
1425 #ifdef SERIAL_DEBUG_IO
1426         printk("ser%i shadow after 0x%02X get: %i\n",
1427                info->line, *e100_modem_pins[info->line].dtr_shadow,
1428                E100_DTR_GET(info));
1429 #endif
1430 #endif
1431 }
1432
1433 /* set = 0 means 3.3V on the pin, bitvalue: 0=active, 1=inactive
1434  *                                          0=0V    , 1=3.3V
1435  */
1436 static inline void
1437 e100_rts(struct e100_serial *info, int set)
1438 {
1439 #ifndef CONFIG_SVINTO_SIM
1440         unsigned long flags;
1441         save_flags(flags);
1442         cli();
1443         info->rx_ctrl &= ~E100_RTS_MASK;
1444         info->rx_ctrl |= (set ? 0 : E100_RTS_MASK);  /* RTS is active low */
1445         info->port[REG_REC_CTRL] = info->rx_ctrl;
1446         restore_flags(flags);
1447 #ifdef SERIAL_DEBUG_IO
1448         printk("ser%i rts %i\n", info->line, set);
1449 #endif
1450 #endif
1451 }
1452
1453
1454 /* If this behaves as a modem, RI and CD is an output */
1455 static inline void
1456 e100_ri_out(struct e100_serial *info, int set)
1457 {
1458 #ifndef CONFIG_SVINTO_SIM
1459         /* RI is active low */
1460         {
1461                 unsigned char mask = e100_modem_pins[info->line].ri_mask;
1462                 unsigned long flags;
1463
1464                 save_flags(flags);
1465                 cli();
1466                 *e100_modem_pins[info->line].ri_shadow &= ~mask;
1467                 *e100_modem_pins[info->line].ri_shadow |= (set ? 0 : mask);
1468                 *e100_modem_pins[info->line].ri_port = *e100_modem_pins[info->line].ri_shadow;
1469                 restore_flags(flags);
1470         }
1471 #endif
1472 }
1473 static inline void
1474 e100_cd_out(struct e100_serial *info, int set)
1475 {
1476 #ifndef CONFIG_SVINTO_SIM
1477         /* CD is active low */
1478         {
1479                 unsigned char mask = e100_modem_pins[info->line].cd_mask;
1480                 unsigned long flags;
1481
1482                 save_flags(flags);
1483                 cli();
1484                 *e100_modem_pins[info->line].cd_shadow &= ~mask;
1485                 *e100_modem_pins[info->line].cd_shadow |= (set ? 0 : mask);
1486                 *e100_modem_pins[info->line].cd_port = *e100_modem_pins[info->line].cd_shadow;
1487                 restore_flags(flags);
1488         }
1489 #endif
1490 }
1491
1492 static inline void
1493 e100_disable_rx(struct e100_serial *info)
1494 {
1495 #ifndef CONFIG_SVINTO_SIM
1496         /* disable the receiver */
1497         info->port[REG_REC_CTRL] =
1498                 (info->rx_ctrl &= ~IO_MASK(R_SERIAL0_REC_CTRL, rec_enable));
1499 #endif
1500 }
1501
1502 static inline void
1503 e100_enable_rx(struct e100_serial *info)
1504 {
1505 #ifndef CONFIG_SVINTO_SIM
1506         /* enable the receiver */
1507         info->port[REG_REC_CTRL] =
1508                 (info->rx_ctrl |= IO_MASK(R_SERIAL0_REC_CTRL, rec_enable));
1509 #endif
1510 }
1511
1512 /* the rx DMA uses both the dma_descr and the dma_eop interrupts */
1513
1514 static inline void
1515 e100_disable_rxdma_irq(struct e100_serial *info)
1516 {
1517 #ifdef SERIAL_DEBUG_INTR
1518         printk("rxdma_irq(%d): 0\n",info->line);
1519 #endif
1520         DINTR1(DEBUG_LOG(info->line,"IRQ disable_rxdma_irq %i\n", info->line));
1521         *R_IRQ_MASK2_CLR = (info->irq << 2) | (info->irq << 3);
1522 }
1523
1524 static inline void
1525 e100_enable_rxdma_irq(struct e100_serial *info)
1526 {
1527 #ifdef SERIAL_DEBUG_INTR
1528         printk("rxdma_irq(%d): 1\n",info->line);
1529 #endif
1530         DINTR1(DEBUG_LOG(info->line,"IRQ enable_rxdma_irq %i\n", info->line));
1531         *R_IRQ_MASK2_SET = (info->irq << 2) | (info->irq << 3);
1532 }
1533
1534 /* the tx DMA uses only dma_descr interrupt */
1535
1536 static void e100_disable_txdma_irq(struct e100_serial *info)
1537 {
1538 #ifdef SERIAL_DEBUG_INTR
1539         printk("txdma_irq(%d): 0\n",info->line);
1540 #endif
1541         DINTR1(DEBUG_LOG(info->line,"IRQ disable_txdma_irq %i\n", info->line));
1542         *R_IRQ_MASK2_CLR = info->irq;
1543 }
1544
1545 static void e100_enable_txdma_irq(struct e100_serial *info)
1546 {
1547 #ifdef SERIAL_DEBUG_INTR
1548         printk("txdma_irq(%d): 1\n",info->line);
1549 #endif
1550         DINTR1(DEBUG_LOG(info->line,"IRQ enable_txdma_irq %i\n", info->line));
1551         *R_IRQ_MASK2_SET = info->irq;
1552 }
1553
1554 static void e100_disable_txdma_channel(struct e100_serial *info)
1555 {
1556         unsigned long flags;
1557
1558         /* Disable output DMA channel for the serial port in question
1559          * ( set to something other then serialX)
1560          */
1561         save_flags(flags);
1562         cli();
1563         DFLOW(DEBUG_LOG(info->line, "disable_txdma_channel %i\n", info->line));
1564         if (info->line == 0) {
1565                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma6)) ==
1566                     IO_STATE(R_GEN_CONFIG, dma6, serial0)) {
1567                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma6);
1568                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma6, unused);
1569                 }
1570         } else if (info->line == 1) {
1571                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma8)) ==
1572                     IO_STATE(R_GEN_CONFIG, dma8, serial1)) {
1573                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma8);
1574                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma8, usb);
1575                 }
1576         } else if (info->line == 2) {
1577                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma2)) ==
1578                     IO_STATE(R_GEN_CONFIG, dma2, serial2)) {
1579                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma2);
1580                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma2, par0);
1581                 }
1582         } else if (info->line == 3) {
1583                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma4)) ==
1584                     IO_STATE(R_GEN_CONFIG, dma4, serial3)) {
1585                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma4);
1586                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma4, par1);
1587                 }
1588         }
1589         *R_GEN_CONFIG = genconfig_shadow;
1590         restore_flags(flags);
1591 }
1592
1593
1594 static void e100_enable_txdma_channel(struct e100_serial *info)
1595 {
1596         unsigned long flags;
1597
1598         save_flags(flags);
1599         cli();
1600         DFLOW(DEBUG_LOG(info->line, "enable_txdma_channel %i\n", info->line));
1601         /* Enable output DMA channel for the serial port in question */
1602         if (info->line == 0) {
1603                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma6);
1604                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma6, serial0);
1605         } else if (info->line == 1) {
1606                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma8);
1607                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma8, serial1);
1608         } else if (info->line == 2) {
1609                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma2);
1610                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma2, serial2);
1611         } else if (info->line == 3) {
1612                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma4);
1613                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma4, serial3);
1614         }
1615         *R_GEN_CONFIG = genconfig_shadow;
1616         restore_flags(flags);
1617 }
1618
1619 static void e100_disable_rxdma_channel(struct e100_serial *info)
1620 {
1621         unsigned long flags;
1622
1623         /* Disable input DMA channel for the serial port in question
1624          * ( set to something other then serialX)
1625          */
1626         save_flags(flags);
1627         cli();
1628         if (info->line == 0) {
1629                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma7)) ==
1630                     IO_STATE(R_GEN_CONFIG, dma7, serial0)) {
1631                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma7);
1632                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma7, unused);
1633                 }
1634         } else if (info->line == 1) {
1635                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma9)) ==
1636                     IO_STATE(R_GEN_CONFIG, dma9, serial1)) {
1637                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma9);
1638                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma9, usb);
1639                 }
1640         } else if (info->line == 2) {
1641                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma3)) ==
1642                     IO_STATE(R_GEN_CONFIG, dma3, serial2)) {
1643                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma3);
1644                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma3, par0);
1645                 }
1646         } else if (info->line == 3) {
1647                 if ((genconfig_shadow & IO_MASK(R_GEN_CONFIG, dma5)) ==
1648                     IO_STATE(R_GEN_CONFIG, dma5, serial3)) {
1649                         genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma5);
1650                         genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma5, par1);
1651                 }
1652         }
1653         *R_GEN_CONFIG = genconfig_shadow;
1654         restore_flags(flags);
1655 }
1656
1657
1658 static void e100_enable_rxdma_channel(struct e100_serial *info)
1659 {
1660         unsigned long flags;
1661
1662         save_flags(flags);
1663         cli();
1664         /* Enable input DMA channel for the serial port in question */
1665         if (info->line == 0) {
1666                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma7);
1667                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma7, serial0);
1668         } else if (info->line == 1) {
1669                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma9);
1670                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma9, serial1);
1671         } else if (info->line == 2) {
1672                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma3);
1673                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma3, serial2);
1674         } else if (info->line == 3) {
1675                 genconfig_shadow &=  ~IO_MASK(R_GEN_CONFIG, dma5);
1676                 genconfig_shadow |= IO_STATE(R_GEN_CONFIG, dma5, serial3);
1677         }
1678         *R_GEN_CONFIG = genconfig_shadow;
1679         restore_flags(flags);
1680 }
1681
1682 #ifdef SERIAL_HANDLE_EARLY_ERRORS
1683 /* in order to detect and fix errors on the first byte
1684    we have to use the serial interrupts as well. */
1685
1686 static inline void
1687 e100_disable_serial_data_irq(struct e100_serial *info)
1688 {
1689 #ifdef SERIAL_DEBUG_INTR
1690         printk("ser_irq(%d): 0\n",info->line);
1691 #endif
1692         DINTR1(DEBUG_LOG(info->line,"IRQ disable data_irq %i\n", info->line));
1693         *R_IRQ_MASK1_CLR = (1U << (8+2*info->line));
1694 }
1695
1696 static inline void
1697 e100_enable_serial_data_irq(struct e100_serial *info)
1698 {
1699 #ifdef SERIAL_DEBUG_INTR
1700         printk("ser_irq(%d): 1\n",info->line);
1701         printk("**** %d = %d\n",
1702                (8+2*info->line),
1703                (1U << (8+2*info->line)));
1704 #endif
1705         DINTR1(DEBUG_LOG(info->line,"IRQ enable data_irq %i\n", info->line));
1706         *R_IRQ_MASK1_SET = (1U << (8+2*info->line));
1707 }
1708 #endif
1709
1710 static inline void
1711 e100_disable_serial_tx_ready_irq(struct e100_serial *info)
1712 {
1713 #ifdef SERIAL_DEBUG_INTR
1714         printk("ser_tx_irq(%d): 0\n",info->line);
1715 #endif
1716         DINTR1(DEBUG_LOG(info->line,"IRQ disable ready_irq %i\n", info->line));
1717         *R_IRQ_MASK1_CLR = (1U << (8+1+2*info->line));
1718 }
1719
1720 static inline void
1721 e100_enable_serial_tx_ready_irq(struct e100_serial *info)
1722 {
1723 #ifdef SERIAL_DEBUG_INTR
1724         printk("ser_tx_irq(%d): 1\n",info->line);
1725         printk("**** %d = %d\n",
1726                (8+1+2*info->line),
1727                (1U << (8+1+2*info->line)));
1728 #endif
1729         DINTR2(DEBUG_LOG(info->line,"IRQ enable ready_irq %i\n", info->line));
1730         *R_IRQ_MASK1_SET = (1U << (8+1+2*info->line));
1731 }
1732
1733 static inline void e100_enable_rx_irq(struct e100_serial *info)
1734 {
1735         if (info->uses_dma_in)
1736                 e100_enable_rxdma_irq(info);
1737         else
1738                 e100_enable_serial_data_irq(info);
1739 }
1740 static inline void e100_disable_rx_irq(struct e100_serial *info)
1741 {
1742         if (info->uses_dma_in)
1743                 e100_disable_rxdma_irq(info);
1744         else
1745                 e100_disable_serial_data_irq(info);
1746 }
1747
1748 #if defined(CONFIG_ETRAX_RS485)
1749 /* Enable RS-485 mode on selected port. This is UGLY. */
1750 static int
1751 e100_enable_rs485(struct tty_struct *tty,struct rs485_control *r)
1752 {
1753         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
1754
1755 #if defined(CONFIG_ETRAX_RS485_ON_PA)
1756         *R_PORT_PA_DATA = port_pa_data_shadow |= (1 << rs485_pa_bit);
1757 #endif
1758 #if defined(CONFIG_ETRAX_RS485_ON_PORT_G)
1759         REG_SHADOW_SET(R_PORT_G_DATA,  port_g_data_shadow,
1760                        rs485_port_g_bit, 1);
1761 #endif
1762 #if defined(CONFIG_ETRAX_RS485_LTC1387)
1763         REG_SHADOW_SET(R_PORT_G_DATA, port_g_data_shadow,
1764                        CONFIG_ETRAX_RS485_LTC1387_DXEN_PORT_G_BIT, 1);
1765         REG_SHADOW_SET(R_PORT_G_DATA, port_g_data_shadow,
1766                        CONFIG_ETRAX_RS485_LTC1387_RXEN_PORT_G_BIT, 1);
1767 #endif
1768
1769         info->rs485.rts_on_send = 0x01 & r->rts_on_send;
1770         info->rs485.rts_after_sent = 0x01 & r->rts_after_sent;
1771         if (r->delay_rts_before_send >= 1000)
1772                 info->rs485.delay_rts_before_send = 1000;
1773         else
1774                 info->rs485.delay_rts_before_send = r->delay_rts_before_send;
1775         info->rs485.enabled = r->enabled;
1776 /*      printk("rts: on send = %i, after = %i, enabled = %i",
1777                     info->rs485.rts_on_send,
1778                     info->rs485.rts_after_sent,
1779                     info->rs485.enabled
1780         );
1781 */
1782         return 0;
1783 }
1784
1785 static int
1786 e100_write_rs485(struct tty_struct *tty, int from_user,
1787                  const unsigned char *buf, int count)
1788 {
1789         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
1790         int old_enabled = info->rs485.enabled;
1791
1792         /* rs485 is always implicitly enabled if we're using the ioctl()
1793          * but it doesn't have to be set in the rs485_control
1794          * (to be backward compatible with old apps)
1795          * So we store, set and restore it.
1796          */
1797         info->rs485.enabled = 1;
1798         /* rs_write now deals with RS485 if enabled */
1799         count = rs_write(tty, from_user, buf, count);
1800         info->rs485.enabled = old_enabled;
1801         return count;
1802 }
1803
1804 #ifdef CONFIG_ETRAX_FAST_TIMER
1805 /* Timer function to toggle RTS when using FAST_TIMER */
1806 static void rs485_toggle_rts_timer_function(unsigned long data)
1807 {
1808         struct e100_serial *info = (struct e100_serial *)data;
1809
1810         fast_timers_rs485[info->line].function = NULL;
1811         e100_rts(info, info->rs485.rts_after_sent);
1812 #if defined(CONFIG_ETRAX_RS485_DISABLE_RECEIVER)
1813         e100_enable_rx(info);
1814         e100_enable_rx_irq(info);
1815 #endif
1816 }
1817 #endif
1818 #endif /* CONFIG_ETRAX_RS485 */
1819
1820 /*
1821  * ------------------------------------------------------------
1822  * rs_stop() and rs_start()
1823  *
1824  * This routines are called before setting or resetting tty->stopped.
1825  * They enable or disable transmitter using the XOFF registers, as necessary.
1826  * ------------------------------------------------------------
1827  */
1828
1829 static void
1830 rs_stop(struct tty_struct *tty)
1831 {
1832         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
1833         if (info) {
1834                 unsigned long flags;
1835                 unsigned long xoff;
1836
1837                 save_flags(flags); cli();
1838                 DFLOW(DEBUG_LOG(info->line, "XOFF rs_stop xmit %i\n",
1839                                 CIRC_CNT(info->xmit.head,
1840                                          info->xmit.tail,SERIAL_XMIT_SIZE)));
1841
1842                 xoff = IO_FIELD(R_SERIAL0_XOFF, xoff_char, STOP_CHAR(info->tty));
1843                 xoff |= IO_STATE(R_SERIAL0_XOFF, tx_stop, stop);
1844                 if (tty->termios->c_iflag & IXON ) {
1845                         xoff |= IO_STATE(R_SERIAL0_XOFF, auto_xoff, enable);
1846                 }
1847
1848                 *((unsigned long *)&info->port[REG_XOFF]) = xoff;
1849                 restore_flags(flags);
1850         }
1851 }
1852
1853 static void
1854 rs_start(struct tty_struct *tty)
1855 {
1856         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
1857         if (info) {
1858                 unsigned long flags;
1859                 unsigned long xoff;
1860
1861                 save_flags(flags); cli();
1862                 DFLOW(DEBUG_LOG(info->line, "XOFF rs_start xmit %i\n",
1863                                 CIRC_CNT(info->xmit.head,
1864                                          info->xmit.tail,SERIAL_XMIT_SIZE)));
1865                 xoff = IO_FIELD(R_SERIAL0_XOFF, xoff_char, STOP_CHAR(tty));
1866                 xoff |= IO_STATE(R_SERIAL0_XOFF, tx_stop, enable);
1867                 if (tty->termios->c_iflag & IXON ) {
1868                         xoff |= IO_STATE(R_SERIAL0_XOFF, auto_xoff, enable);
1869                 }
1870
1871                 *((unsigned long *)&info->port[REG_XOFF]) = xoff;
1872                 if (!info->uses_dma_out &&
1873                     info->xmit.head != info->xmit.tail && info->xmit.buf)
1874                         e100_enable_serial_tx_ready_irq(info);
1875
1876                 restore_flags(flags);
1877         }
1878 }
1879
1880 /*
1881  * ----------------------------------------------------------------------
1882  *
1883  * Here starts the interrupt handling routines.  All of the following
1884  * subroutines are declared as inline and are folded into
1885  * rs_interrupt().  They were separated out for readability's sake.
1886  *
1887  * Note: rs_interrupt() is a "fast" interrupt, which means that it
1888  * runs with interrupts turned off.  People who may want to modify
1889  * rs_interrupt() should try to keep the interrupt handler as fast as
1890  * possible.  After you are done making modifications, it is not a bad
1891  * idea to do:
1892  *
1893  * gcc -S -DKERNEL -Wall -Wstrict-prototypes -O6 -fomit-frame-pointer serial.c
1894  *
1895  * and look at the resulting assemble code in serial.s.
1896  *
1897  *                              - Ted Ts'o (tytso@mit.edu), 7-Mar-93
1898  * -----------------------------------------------------------------------
1899  */
1900
1901 /*
1902  * This routine is used by the interrupt handler to schedule
1903  * processing in the software interrupt portion of the driver.
1904  */
1905 static void rs_sched_event(struct e100_serial *info, int event)
1906 {
1907         if (info->event & (1 << event))
1908                 return;
1909         info->event |= 1 << event;
1910         schedule_work(&info->work);
1911 }
1912
1913 /* The output DMA channel is free - use it to send as many chars as possible
1914  * NOTES:
1915  *   We don't pay attention to info->x_char, which means if the TTY wants to
1916  *   use XON/XOFF it will set info->x_char but we won't send any X char!
1917  *
1918  *   To implement this, we'd just start a DMA send of 1 byte pointing at a
1919  *   buffer containing the X char, and skip updating xmit. We'd also have to
1920  *   check if the last sent char was the X char when we enter this function
1921  *   the next time, to avoid updating xmit with the sent X value.
1922  */
1923
1924 static void
1925 transmit_chars_dma(struct e100_serial *info)
1926 {
1927         unsigned int c, sentl;
1928         struct etrax_dma_descr *descr;
1929
1930 #ifdef CONFIG_SVINTO_SIM
1931         /* This will output too little if tail is not 0 always since
1932          * we don't reloop to send the other part. Anyway this SHOULD be a
1933          * no-op - transmit_chars_dma would never really be called during sim
1934          * since rs_write does not write into the xmit buffer then.
1935          */
1936         if (info->xmit.tail)
1937                 printk("Error in serial.c:transmit_chars-dma(), tail!=0\n");
1938         if (info->xmit.head != info->xmit.tail) {
1939                 SIMCOUT(info->xmit.buf + info->xmit.tail,
1940                         CIRC_CNT(info->xmit.head,
1941                                  info->xmit.tail,
1942                                  SERIAL_XMIT_SIZE));
1943                 info->xmit.head = info->xmit.tail;  /* move back head */
1944                 info->tr_running = 0;
1945         }
1946         return;
1947 #endif
1948         /* acknowledge both dma_descr and dma_eop irq in R_DMA_CHx_CLR_INTR */
1949         *info->oclrintradr =
1950                 IO_STATE(R_DMA_CH6_CLR_INTR, clr_descr, do) |
1951                 IO_STATE(R_DMA_CH6_CLR_INTR, clr_eop, do);
1952
1953 #ifdef SERIAL_DEBUG_INTR
1954         if (info->line == SERIAL_DEBUG_LINE)
1955                 printk("tc\n");
1956 #endif
1957         if (!info->tr_running) {
1958                 /* weirdo... we shouldn't get here! */
1959                 printk(KERN_WARNING "Achtung: transmit_chars_dma with !tr_running\n");
1960                 return;
1961         }
1962
1963         descr = &info->tr_descr;
1964
1965         /* first get the amount of bytes sent during the last DMA transfer,
1966            and update xmit accordingly */
1967
1968         /* if the stop bit was not set, all data has been sent */
1969         if (!(descr->status & d_stop)) {
1970                 sentl = descr->sw_len;
1971         } else
1972                 /* otherwise we find the amount of data sent here */
1973                 sentl = descr->hw_len;
1974
1975         DFLOW(DEBUG_LOG(info->line, "TX %i done\n", sentl));
1976
1977         /* update stats */
1978         info->icount.tx += sentl;
1979
1980         /* update xmit buffer */
1981         info->xmit.tail = (info->xmit.tail + sentl) & (SERIAL_XMIT_SIZE - 1);
1982
1983         /* if there is only a few chars left in the buf, wake up the blocked
1984            write if any */
1985         if (CIRC_CNT(info->xmit.head,
1986                      info->xmit.tail,
1987                      SERIAL_XMIT_SIZE) < WAKEUP_CHARS)
1988                 rs_sched_event(info, RS_EVENT_WRITE_WAKEUP);
1989
1990         /* find out the largest amount of consecutive bytes we want to send now */
1991
1992         c = CIRC_CNT_TO_END(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
1993
1994         /* Don't send all in one DMA transfer - divide it so we wake up
1995          * application before all is sent
1996          */
1997
1998         if (c >= 4*WAKEUP_CHARS)
1999                 c = c/2;
2000
2001         if (c <= 0) {
2002                 /* our job here is done, don't schedule any new DMA transfer */
2003                 info->tr_running = 0;
2004
2005 #if defined(CONFIG_ETRAX_RS485) && defined(CONFIG_ETRAX_FAST_TIMER)
2006                 if (info->rs485.enabled) {
2007                         /* Set a short timer to toggle RTS */
2008                         start_one_shot_timer(&fast_timers_rs485[info->line],
2009                                              rs485_toggle_rts_timer_function,
2010                                              (unsigned long)info,
2011                                              info->char_time_usec*2,
2012                                              "RS-485");
2013                 }
2014 #endif /* RS485 */
2015                 return;
2016         }
2017
2018         /* ok we can schedule a dma send of c chars starting at info->xmit.tail */
2019         /* set up the descriptor correctly for output */
2020         DFLOW(DEBUG_LOG(info->line, "TX %i\n", c));
2021         descr->ctrl = d_int | d_eol | d_wait; /* Wait needed for tty_wait_until_sent() */
2022         descr->sw_len = c;
2023         descr->buf = virt_to_phys(info->xmit.buf + info->xmit.tail);
2024         descr->status = 0;
2025
2026         *info->ofirstadr = virt_to_phys(descr); /* write to R_DMAx_FIRST */
2027         *info->ocmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, start);
2028
2029         /* DMA is now running (hopefully) */
2030 } /* transmit_chars_dma */
2031
2032 static void
2033 start_transmit(struct e100_serial *info)
2034 {
2035 #if 0
2036         if (info->line == SERIAL_DEBUG_LINE)
2037                 printk("x\n");
2038 #endif
2039
2040         info->tr_descr.sw_len = 0;
2041         info->tr_descr.hw_len = 0;
2042         info->tr_descr.status = 0;
2043         info->tr_running = 1;
2044         if (info->uses_dma_out)
2045                 transmit_chars_dma(info);
2046         else
2047                 e100_enable_serial_tx_ready_irq(info);
2048 } /* start_transmit */
2049
2050 #ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
2051 static int serial_fast_timer_started = 0;
2052 static int serial_fast_timer_expired = 0;
2053 static void flush_timeout_function(unsigned long data);
2054 #define START_FLUSH_FAST_TIMER_TIME(info, string, usec) {\
2055   unsigned long timer_flags; \
2056   save_flags(timer_flags); \
2057   cli(); \
2058   if (fast_timers[info->line].function == NULL) { \
2059     serial_fast_timer_started++; \
2060     TIMERD(DEBUG_LOG(info->line, "start_timer %i ", info->line)); \
2061     TIMERD(DEBUG_LOG(info->line, "num started: %i\n", serial_fast_timer_started)); \
2062     start_one_shot_timer(&fast_timers[info->line], \
2063                          flush_timeout_function, \
2064                          (unsigned long)info, \
2065                          (usec), \
2066                          string); \
2067   } \
2068   else { \
2069     TIMERD(DEBUG_LOG(info->line, "timer %i already running\n", info->line)); \
2070   } \
2071   restore_flags(timer_flags); \
2072 }
2073 #define START_FLUSH_FAST_TIMER(info, string) START_FLUSH_FAST_TIMER_TIME(info, string, info->flush_time_usec)
2074
2075 #else
2076 #define START_FLUSH_FAST_TIMER_TIME(info, string, usec)
2077 #define START_FLUSH_FAST_TIMER(info, string)
2078 #endif
2079
2080 static struct etrax_recv_buffer *
2081 alloc_recv_buffer(unsigned int size)
2082 {
2083         struct etrax_recv_buffer *buffer;
2084
2085         if (!(buffer = kmalloc(sizeof *buffer + size, GFP_ATOMIC)))
2086                 return NULL;
2087
2088         buffer->next = NULL;
2089         buffer->length = 0;
2090         buffer->error = TTY_NORMAL;
2091
2092         return buffer;
2093 }
2094
2095 static void
2096 append_recv_buffer(struct e100_serial *info, struct etrax_recv_buffer *buffer)
2097 {
2098         unsigned long flags;
2099
2100         save_flags(flags);
2101         cli();
2102
2103         if (!info->first_recv_buffer)
2104                 info->first_recv_buffer = buffer;
2105         else
2106                 info->last_recv_buffer->next = buffer;
2107
2108         info->last_recv_buffer = buffer;
2109
2110         info->recv_cnt += buffer->length;
2111         if (info->recv_cnt > info->max_recv_cnt)
2112                 info->max_recv_cnt = info->recv_cnt;
2113
2114         restore_flags(flags);
2115 }
2116
2117 static int
2118 add_char_and_flag(struct e100_serial *info, unsigned char data, unsigned char flag)
2119 {
2120         struct etrax_recv_buffer *buffer;
2121         if (info->uses_dma_in) {
2122                 if (!(buffer = alloc_recv_buffer(4)))
2123                         return 0;
2124
2125                 buffer->length = 1;
2126                 buffer->error = flag;
2127                 buffer->buffer[0] = data;
2128
2129                 append_recv_buffer(info, buffer);
2130
2131                 info->icount.rx++;
2132         } else {
2133                 struct tty_struct *tty = info->tty;
2134                 *tty->flip.char_buf_ptr = data;
2135                 *tty->flip.flag_buf_ptr = flag;
2136                 tty->flip.flag_buf_ptr++;
2137                 tty->flip.char_buf_ptr++;
2138                 tty->flip.count++;
2139                 info->icount.rx++;
2140         }
2141
2142         return 1;
2143 }
2144
2145 static unsigned int handle_descr_data(struct e100_serial *info,
2146                                       struct etrax_dma_descr *descr,
2147                                       unsigned int recvl)
2148 {
2149         struct etrax_recv_buffer *buffer = phys_to_virt(descr->buf) - sizeof *buffer;
2150
2151         if (info->recv_cnt + recvl > 65536) {
2152                 printk(KERN_CRIT
2153                        "%s: Too much pending incoming serial data! Dropping %u bytes.\n", __FUNCTION__, recvl);
2154                 return 0;
2155         }
2156
2157         buffer->length = recvl;
2158
2159         if (info->errorcode == ERRCODE_SET_BREAK)
2160                 buffer->error = TTY_BREAK;
2161         info->errorcode = 0;
2162
2163         append_recv_buffer(info, buffer);
2164
2165         if (!(buffer = alloc_recv_buffer(SERIAL_DESCR_BUF_SIZE)))
2166                 panic("%s: Failed to allocate memory for receive buffer!\n", __FUNCTION__);
2167
2168         descr->buf = virt_to_phys(buffer->buffer);
2169
2170         return recvl;
2171 }
2172
2173 static unsigned int handle_all_descr_data(struct e100_serial *info)
2174 {
2175         struct etrax_dma_descr *descr;
2176         unsigned int recvl;
2177         unsigned int ret = 0;
2178
2179         while (1)
2180         {
2181                 descr = &info->rec_descr[info->cur_rec_descr];
2182
2183                 if (descr == phys_to_virt(*info->idescradr))
2184                         break;
2185
2186                 if (++info->cur_rec_descr == SERIAL_RECV_DESCRIPTORS)
2187                         info->cur_rec_descr = 0;
2188
2189                 /* find out how many bytes were read */
2190
2191                 /* if the eop bit was not set, all data has been received */
2192                 if (!(descr->status & d_eop)) {
2193                         recvl = descr->sw_len;
2194                 } else {
2195                         /* otherwise we find the amount of data received here */
2196                         recvl = descr->hw_len;
2197                 }
2198
2199                 /* Reset the status information */
2200                 descr->status = 0;
2201
2202                 DFLOW(  DEBUG_LOG(info->line, "RX %lu\n", recvl);
2203                         if (info->tty->stopped) {
2204                                 unsigned char *buf = phys_to_virt(descr->buf);
2205                                 DEBUG_LOG(info->line, "rx 0x%02X\n", buf[0]);
2206                                 DEBUG_LOG(info->line, "rx 0x%02X\n", buf[1]);
2207                                 DEBUG_LOG(info->line, "rx 0x%02X\n", buf[2]);
2208                         }
2209                         );
2210
2211                 /* update stats */
2212                 info->icount.rx += recvl;
2213
2214                 ret += handle_descr_data(info, descr, recvl);
2215         }
2216
2217         return ret;
2218 }
2219
2220 static void receive_chars_dma(struct e100_serial *info)
2221 {
2222         struct tty_struct *tty;
2223         unsigned char rstat;
2224
2225 #ifdef CONFIG_SVINTO_SIM
2226         /* No receive in the simulator.  Will probably be when the rest of
2227          * the serial interface works, and this piece will just be removed.
2228          */
2229         return;
2230 #endif
2231
2232         /* Acknowledge both dma_descr and dma_eop irq in R_DMA_CHx_CLR_INTR */
2233         *info->iclrintradr =
2234                 IO_STATE(R_DMA_CH6_CLR_INTR, clr_descr, do) |
2235                 IO_STATE(R_DMA_CH6_CLR_INTR, clr_eop, do);
2236
2237         tty = info->tty;
2238         if (!tty) /* Something wrong... */
2239                 return;
2240
2241 #ifdef SERIAL_HANDLE_EARLY_ERRORS
2242         if (info->uses_dma_in)
2243                 e100_enable_serial_data_irq(info);
2244 #endif
2245
2246         if (info->errorcode == ERRCODE_INSERT_BREAK)
2247                 add_char_and_flag(info, '\0', TTY_BREAK);
2248
2249         handle_all_descr_data(info);
2250
2251         /* Read the status register to detect errors */
2252         rstat = info->port[REG_STATUS];
2253         if (rstat & IO_MASK(R_SERIAL0_STATUS, xoff_detect) ) {
2254                 DFLOW(DEBUG_LOG(info->line, "XOFF detect stat %x\n", rstat));
2255         }
2256
2257         if (rstat & SER_ERROR_MASK) {
2258                 /* If we got an error, we must reset it by reading the
2259                  * data_in field
2260                  */
2261                 unsigned char data = info->port[REG_DATA];
2262
2263                 PROCSTAT(ser_stat[info->line].errors_cnt++);
2264                 DEBUG_LOG(info->line, "#dERR: s d 0x%04X\n",
2265                           ((rstat & SER_ERROR_MASK) << 8) | data);
2266
2267                 if (rstat & SER_PAR_ERR_MASK)
2268                         add_char_and_flag(info, data, TTY_PARITY);
2269                 else if (rstat & SER_OVERRUN_MASK)
2270                         add_char_and_flag(info, data, TTY_OVERRUN);
2271                 else if (rstat & SER_FRAMING_ERR_MASK)
2272                         add_char_and_flag(info, data, TTY_FRAME);
2273         }
2274
2275         START_FLUSH_FAST_TIMER(info, "receive_chars");
2276
2277         /* Restart the receiving DMA */
2278         *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, restart);
2279 }
2280
2281 static int start_recv_dma(struct e100_serial *info)
2282 {
2283         struct etrax_dma_descr *descr = info->rec_descr;
2284         struct etrax_recv_buffer *buffer;
2285         int i;
2286
2287         /* Set up the receiving descriptors */
2288         for (i = 0; i < SERIAL_RECV_DESCRIPTORS; i++) {
2289                 if (!(buffer = alloc_recv_buffer(SERIAL_DESCR_BUF_SIZE)))
2290                         panic("%s: Failed to allocate memory for receive buffer!\n", __FUNCTION__);
2291
2292                 descr[i].ctrl = d_int;
2293                 descr[i].buf = virt_to_phys(buffer->buffer);
2294                 descr[i].sw_len = SERIAL_DESCR_BUF_SIZE;
2295                 descr[i].hw_len = 0;
2296                 descr[i].status = 0;
2297                 descr[i].next = virt_to_phys(&descr[i+1]);
2298         }
2299
2300         /* Link the last descriptor to the first */
2301         descr[i-1].next = virt_to_phys(&descr[0]);
2302
2303         /* Start with the first descriptor in the list */
2304         info->cur_rec_descr = 0;
2305
2306         /* Start the DMA */
2307         *info->ifirstadr = virt_to_phys(&descr[info->cur_rec_descr]);
2308         *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, start);
2309
2310         /* Input DMA should be running now */
2311         return 1;
2312 }
2313
2314 static void
2315 start_receive(struct e100_serial *info)
2316 {
2317 #ifdef CONFIG_SVINTO_SIM
2318         /* No receive in the simulator.  Will probably be when the rest of
2319          * the serial interface works, and this piece will just be removed.
2320          */
2321         return;
2322 #endif
2323         info->tty->flip.count = 0;
2324         if (info->uses_dma_in) {
2325                 /* reset the input dma channel to be sure it works */
2326
2327                 *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, reset);
2328                 while (IO_EXTRACT(R_DMA_CH6_CMD, cmd, *info->icmdadr) ==
2329                        IO_STATE_VALUE(R_DMA_CH6_CMD, cmd, reset));
2330
2331                 start_recv_dma(info);
2332         }
2333 }
2334
2335
2336 /* the bits in the MASK2 register are laid out like this:
2337    DMAI_EOP DMAI_DESCR DMAO_EOP DMAO_DESCR
2338    where I is the input channel and O is the output channel for the port.
2339    info->irq is the bit number for the DMAO_DESCR so to check the others we
2340    shift info->irq to the left.
2341 */
2342
2343 /* dma output channel interrupt handler
2344    this interrupt is called from DMA2(ser2), DMA4(ser3), DMA6(ser0) or
2345    DMA8(ser1) when they have finished a descriptor with the intr flag set.
2346 */
2347
2348 static irqreturn_t
2349 tr_interrupt(int irq, void *dev_id, struct pt_regs * regs)
2350 {
2351         struct e100_serial *info;
2352         unsigned long ireg;
2353         int i;
2354         int handled = 0;
2355
2356 #ifdef CONFIG_SVINTO_SIM
2357         /* No receive in the simulator.  Will probably be when the rest of
2358          * the serial interface works, and this piece will just be removed.
2359          */
2360         {
2361                 const char *s = "What? tr_interrupt in simulator??\n";
2362                 SIMCOUT(s,strlen(s));
2363         }
2364         return IRQ_HANDLED;
2365 #endif
2366
2367         /* find out the line that caused this irq and get it from rs_table */
2368
2369         ireg = *R_IRQ_MASK2_RD;  /* get the active irq bits for the dma channels */
2370
2371         for (i = 0; i < NR_PORTS; i++) {
2372                 info = rs_table + i;
2373                 if (!info->enabled || !info->uses_dma_out)
2374                         continue;
2375                 /* check for dma_descr (don't need to check for dma_eop in output dma for serial */
2376                 if (ireg & info->irq) {
2377                         handled = 1;
2378                         /* we can send a new dma bunch. make it so. */
2379                         DINTR2(DEBUG_LOG(info->line, "tr_interrupt %i\n", i));
2380                         /* Read jiffies_usec first,
2381                          * we want this time to be as late as possible
2382                          */
2383                         PROCSTAT(ser_stat[info->line].tx_dma_ints++);
2384                         info->last_tx_active_usec = GET_JIFFIES_USEC();
2385                         info->last_tx_active = jiffies;
2386                         transmit_chars_dma(info);
2387                 }
2388
2389                 /* FIXME: here we should really check for a change in the
2390                    status lines and if so call status_handle(info) */
2391         }
2392         return IRQ_RETVAL(handled);
2393 } /* tr_interrupt */
2394
2395 /* dma input channel interrupt handler */
2396
2397 static irqreturn_t
2398 rec_interrupt(int irq, void *dev_id, struct pt_regs * regs)
2399 {
2400         struct e100_serial *info;
2401         unsigned long ireg;
2402         int i;
2403         int handled = 0;
2404
2405 #ifdef CONFIG_SVINTO_SIM
2406         /* No receive in the simulator.  Will probably be when the rest of
2407          * the serial interface works, and this piece will just be removed.
2408          */
2409         {
2410                 const char *s = "What? rec_interrupt in simulator??\n";
2411                 SIMCOUT(s,strlen(s));
2412         }
2413         return IRQ_HANDLED;
2414 #endif
2415
2416         /* find out the line that caused this irq and get it from rs_table */
2417
2418         ireg = *R_IRQ_MASK2_RD;  /* get the active irq bits for the dma channels */
2419
2420         for (i = 0; i < NR_PORTS; i++) {
2421                 info = rs_table + i;
2422                 if (!info->enabled || !info->uses_dma_in)
2423                         continue;
2424                 /* check for both dma_eop and dma_descr for the input dma channel */
2425                 if (ireg & ((info->irq << 2) | (info->irq << 3))) {
2426                         handled = 1;
2427                         /* we have received something */
2428                         receive_chars_dma(info);
2429                 }
2430
2431                 /* FIXME: here we should really check for a change in the
2432                    status lines and if so call status_handle(info) */
2433         }
2434         return IRQ_RETVAL(handled);
2435 } /* rec_interrupt */
2436
2437 static int force_eop_if_needed(struct e100_serial *info)
2438 {
2439         /* We check data_avail bit to determine if data has
2440          * arrived since last time
2441          */
2442         unsigned char rstat = info->port[REG_STATUS];
2443
2444         /* error or datavail? */
2445         if (rstat & SER_ERROR_MASK) {
2446                 /* Some error has occurred. If there has been valid data, an
2447                  * EOP interrupt will be made automatically. If no data, the
2448                  * normal ser_interrupt should be enabled and handle it.
2449                  * So do nothing!
2450                  */
2451                 DEBUG_LOG(info->line, "timeout err: rstat 0x%03X\n",
2452                           rstat | (info->line << 8));
2453                 return 0;
2454         }
2455
2456         if (rstat & SER_DATA_AVAIL_MASK) {
2457                 /* Ok data, no error, count it */
2458                 TIMERD(DEBUG_LOG(info->line, "timeout: rstat 0x%03X\n",
2459                           rstat | (info->line << 8)));
2460                 /* Read data to clear status flags */
2461                 (void)info->port[REG_DATA];
2462
2463                 info->forced_eop = 0;
2464                 START_FLUSH_FAST_TIMER(info, "magic");
2465                 return 0;
2466         }
2467
2468         /* hit the timeout, force an EOP for the input
2469          * dma channel if we haven't already
2470          */
2471         if (!info->forced_eop) {
2472                 info->forced_eop = 1;
2473                 PROCSTAT(ser_stat[info->line].timeout_flush_cnt++);
2474                 TIMERD(DEBUG_LOG(info->line, "timeout EOP %i\n", info->line));
2475                 FORCE_EOP(info);
2476         }
2477
2478         return 1;
2479 }
2480
2481 static void flush_to_flip_buffer(struct e100_serial *info)
2482 {
2483         struct tty_struct *tty;
2484         struct etrax_recv_buffer *buffer;
2485         unsigned int length;
2486         unsigned long flags;
2487         int max_flip_size;
2488
2489         if (!info->first_recv_buffer)
2490                 return;
2491
2492         save_flags(flags);
2493         cli();
2494
2495         if (!(tty = info->tty)) {
2496                 restore_flags(flags);
2497                 return;
2498         }
2499
2500         length = tty->flip.count;
2501         /* Don't flip more than the ldisc has room for.
2502          * The return value from ldisc.receive_room(tty) - might not be up to
2503          * date, the previous flip of up to TTY_FLIPBUF_SIZE might be on the
2504          * processed and not accounted for yet.
2505          * Since we use DMA, 1 SERIAL_DESCR_BUF_SIZE could be on the way.
2506          * Lets buffer data here and let flow control take care of it.
2507          * Since we normally flip large chunks, the ldisc don't react
2508          * with throttle until too late if we flip to much.
2509          */
2510         max_flip_size = tty->ldisc.receive_room(tty);
2511         if (max_flip_size < 0)
2512                 max_flip_size = 0;
2513         if (max_flip_size <= (TTY_FLIPBUF_SIZE +         /* Maybe not accounted for */
2514                               length + info->recv_cnt +  /* We have this queued */
2515                               2*SERIAL_DESCR_BUF_SIZE +    /* This could be on the way */
2516                               TTY_THRESHOLD_THROTTLE)) { /* Some slack */
2517                 /* check TTY_THROTTLED first so it indicates our state */
2518                 if (!test_and_set_bit(TTY_THROTTLED, &tty->flags)) {
2519                         DFLOW(DEBUG_LOG(info->line,"flush_to_flip throttles room %lu\n", max_flip_size));
2520                         rs_throttle(tty);
2521                 }
2522 #if 0
2523                 else if (max_flip_size <= (TTY_FLIPBUF_SIZE +         /* Maybe not accounted for */
2524                                            length + info->recv_cnt +  /* We have this queued */
2525                                            SERIAL_DESCR_BUF_SIZE +    /* This could be on the way */
2526                                            TTY_THRESHOLD_THROTTLE)) { /* Some slack */
2527                         DFLOW(DEBUG_LOG(info->line,"flush_to_flip throttles again! %lu\n", max_flip_size));
2528                         rs_throttle(tty);
2529                 }
2530 #endif
2531         }
2532
2533         if (max_flip_size > TTY_FLIPBUF_SIZE)
2534                 max_flip_size = TTY_FLIPBUF_SIZE;
2535
2536         while ((buffer = info->first_recv_buffer) && length < max_flip_size) {
2537                 unsigned int count = buffer->length;
2538
2539                 if (length + count > max_flip_size)
2540                         count = max_flip_size - length;
2541
2542                 memcpy(tty->flip.char_buf_ptr + length, buffer->buffer, count);
2543                 memset(tty->flip.flag_buf_ptr + length, TTY_NORMAL, count);
2544                 tty->flip.flag_buf_ptr[length] = buffer->error;
2545
2546                 length += count;
2547                 info->recv_cnt -= count;
2548                 DFLIP(DEBUG_LOG(info->line,"flip: %i\n", length));
2549
2550                 if (count == buffer->length) {
2551                         info->first_recv_buffer = buffer->next;
2552                         kfree(buffer);
2553                 } else {
2554                         buffer->length -= count;
2555                         memmove(buffer->buffer, buffer->buffer + count, buffer->length);
2556                         buffer->error = TTY_NORMAL;
2557                 }
2558         }
2559
2560         if (!info->first_recv_buffer)
2561                 info->last_recv_buffer = NULL;
2562
2563         tty->flip.count = length;
2564         DFLIP(if (tty->ldisc.chars_in_buffer(tty) > 3500) {
2565                 DEBUG_LOG(info->line, "ldisc %lu\n",
2566                           tty->ldisc.chars_in_buffer(tty));
2567                 DEBUG_LOG(info->line, "flip.count %lu\n",
2568                           tty->flip.count);
2569               }
2570               );
2571         restore_flags(flags);
2572
2573         DFLIP(
2574           if (1) {
2575                   DEBUG_LOG(info->line, "*** rxtot %i\n", info->icount.rx);
2576                   DEBUG_LOG(info->line, "ldisc %lu\n", tty->ldisc.chars_in_buffer(tty));
2577                   DEBUG_LOG(info->line, "room  %lu\n", tty->ldisc.receive_room(tty));
2578           }
2579
2580         );
2581
2582         /* this includes a check for low-latency */
2583         tty_flip_buffer_push(tty);
2584 }
2585
2586 static void check_flush_timeout(struct e100_serial *info)
2587 {
2588         /* Flip what we've got (if we can) */
2589         flush_to_flip_buffer(info);
2590
2591         /* We might need to flip later, but not to fast
2592          * since the system is busy processing input... */
2593         if (info->first_recv_buffer)
2594                 START_FLUSH_FAST_TIMER_TIME(info, "flip", 2000);
2595
2596         /* Force eop last, since data might have come while we're processing
2597          * and if we started the slow timer above, we won't start a fast
2598          * below.
2599          */
2600         force_eop_if_needed(info);
2601 }
2602
2603 #ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
2604 static void flush_timeout_function(unsigned long data)
2605 {
2606         struct e100_serial *info = (struct e100_serial *)data;
2607
2608         fast_timers[info->line].function = NULL;
2609         serial_fast_timer_expired++;
2610         TIMERD(DEBUG_LOG(info->line, "flush_timout %i ", info->line));
2611         TIMERD(DEBUG_LOG(info->line, "num expired: %i\n", serial_fast_timer_expired));
2612         check_flush_timeout(info);
2613 }
2614
2615 #else
2616
2617 /* dma fifo/buffer timeout handler
2618    forces an end-of-packet for the dma input channel if no chars
2619    have been received for CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS/100 s.
2620 */
2621
2622 static struct timer_list flush_timer;
2623
2624 static void
2625 timed_flush_handler(unsigned long ptr)
2626 {
2627         struct e100_serial *info;
2628         int i;
2629
2630 #ifdef CONFIG_SVINTO_SIM
2631         return;
2632 #endif
2633
2634         for (i = 0; i < NR_PORTS; i++) {
2635                 info = rs_table + i;
2636                 if (info->uses_dma_in)
2637                         check_flush_timeout(info);
2638         }
2639
2640         /* restart flush timer */
2641         mod_timer(&flush_timer, jiffies + CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS);
2642 }
2643 #endif
2644
2645 #ifdef SERIAL_HANDLE_EARLY_ERRORS
2646
2647 /* If there is an error (ie break) when the DMA is running and
2648  * there are no bytes in the fifo the DMA is stopped and we get no
2649  * eop interrupt. Thus we have to monitor the first bytes on a DMA
2650  * transfer, and if it is without error we can turn the serial
2651  * interrupts off.
2652  */
2653
2654 /*
2655 BREAK handling on ETRAX 100:
2656 ETRAX will generate interrupt although there is no stop bit between the
2657 characters.
2658
2659 Depending on how long the break sequence is, the end of the breaksequence
2660 will look differently:
2661 | indicates start/end of a character.
2662
2663 B= Break character (0x00) with framing error.
2664 E= Error byte with parity error received after B characters.
2665 F= "Faked" valid byte received immediately after B characters.
2666 V= Valid byte
2667
2668 1.
2669     B          BL         ___________________________ V
2670 .._|__________|__________|                           |valid data |
2671
2672 Multiple frame errors with data == 0x00 (B),
2673 the timing matches up "perfectly" so no extra ending char is detected.
2674 The RXD pin is 1 in the last interrupt, in that case
2675 we set info->errorcode = ERRCODE_INSERT_BREAK, but we can't really
2676 know if another byte will come and this really is case 2. below
2677 (e.g F=0xFF or 0xFE)
2678 If RXD pin is 0 we can expect another character (see 2. below).
2679
2680
2681 2.
2682
2683     B          B          E or F__________________..__ V
2684 .._|__________|__________|______    |                 |valid data
2685                           "valid" or
2686                           parity error
2687
2688 Multiple frame errors with data == 0x00 (B),
2689 but the part of the break trigs is interpreted as a start bit (and possibly
2690 some 0 bits followed by a number of 1 bits and a stop bit).
2691 Depending on parity settings etc. this last character can be either
2692 a fake "valid" char (F) or have a parity error (E).
2693
2694 If the character is valid it will be put in the buffer,
2695 we set info->errorcode = ERRCODE_SET_BREAK so the receive interrupt
2696 will set the flags so the tty will handle it,
2697 if it's an error byte it will not be put in the buffer
2698 and we set info->errorcode = ERRCODE_INSERT_BREAK.
2699
2700 To distinguish a V byte in 1. from an F byte in 2. we keep a timestamp
2701 of the last faulty char (B) and compares it with the current time:
2702 If the time elapsed time is less then 2*char_time_usec we will assume
2703 it's a faked F char and not a Valid char and set
2704 info->errorcode = ERRCODE_SET_BREAK.
2705
2706 Flaws in the above solution:
2707 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
2708 We use the timer to distinguish a F character from a V character,
2709 if a V character is to close after the break we might make the wrong decision.
2710
2711 TODO: The break will be delayed until an F or V character is received.
2712
2713 */
2714
2715 static
2716 struct e100_serial * handle_ser_rx_interrupt_no_dma(struct e100_serial *info)
2717 {
2718         unsigned long data_read;
2719         struct tty_struct *tty = info->tty;
2720
2721         if (!tty) {
2722                 printk("!NO TTY!\n");
2723                 return info;
2724         }
2725         if (tty->flip.count >= TTY_FLIPBUF_SIZE - TTY_THRESHOLD_THROTTLE) {
2726                 /* check TTY_THROTTLED first so it indicates our state */
2727                 if (!test_and_set_bit(TTY_THROTTLED, &tty->flags)) {
2728                         DFLOW(DEBUG_LOG(info->line, "rs_throttle flip.count: %i\n", tty->flip.count));
2729                         rs_throttle(tty);
2730                 }
2731         }
2732         if (tty->flip.count >= TTY_FLIPBUF_SIZE) {
2733                 DEBUG_LOG(info->line, "force FLIP! %i\n", tty->flip.count);
2734                 tty->flip.work.func((void *) tty);
2735                 if (tty->flip.count >= TTY_FLIPBUF_SIZE) {
2736                         DEBUG_LOG(info->line, "FLIP FULL! %i\n", tty->flip.count);
2737                         return info;            /* if TTY_DONT_FLIP is set */
2738                 }
2739         }
2740         /* Read data and status at the same time */
2741         data_read = *((unsigned long *)&info->port[REG_DATA_STATUS32]);
2742 more_data:
2743         if (data_read & IO_MASK(R_SERIAL0_READ, xoff_detect) ) {
2744                 DFLOW(DEBUG_LOG(info->line, "XOFF detect\n", 0));
2745         }
2746         DINTR2(DEBUG_LOG(info->line, "ser_rx   %c\n", IO_EXTRACT(R_SERIAL0_READ, data_in, data_read)));
2747
2748         if (data_read & ( IO_MASK(R_SERIAL0_READ, framing_err) |
2749                           IO_MASK(R_SERIAL0_READ, par_err) |
2750                           IO_MASK(R_SERIAL0_READ, overrun) )) {
2751                 /* An error */
2752                 info->last_rx_active_usec = GET_JIFFIES_USEC();
2753                 info->last_rx_active = jiffies;
2754                 DINTR1(DEBUG_LOG(info->line, "ser_rx err stat_data %04X\n", data_read));
2755                 DLOG_INT_TRIG(
2756                 if (!log_int_trig1_pos) {
2757                         log_int_trig1_pos = log_int_pos;
2758                         log_int(rdpc(), 0, 0);
2759                 }
2760                 );
2761
2762
2763                 if ( ((data_read & IO_MASK(R_SERIAL0_READ, data_in)) == 0) &&
2764                      (data_read & IO_MASK(R_SERIAL0_READ, framing_err)) ) {
2765                         /* Most likely a break, but we get interrupts over and
2766                          * over again.
2767                          */
2768
2769                         if (!info->break_detected_cnt) {
2770                                 DEBUG_LOG(info->line, "#BRK start\n", 0);
2771                         }
2772                         if (data_read & IO_MASK(R_SERIAL0_READ, rxd)) {
2773                                 /* The RX pin is high now, so the break
2774                                  * must be over, but....
2775                                  * we can't really know if we will get another
2776                                  * last byte ending the break or not.
2777                                  * And we don't know if the byte (if any) will
2778                                  * have an error or look valid.
2779                                  */
2780                                 DEBUG_LOG(info->line, "# BL BRK\n", 0);
2781                                 info->errorcode = ERRCODE_INSERT_BREAK;
2782                         }
2783                         info->break_detected_cnt++;
2784                 } else {
2785                         /* The error does not look like a break, but could be
2786                          * the end of one
2787                          */
2788                         if (info->break_detected_cnt) {
2789                                 DEBUG_LOG(info->line, "EBRK %i\n", info->break_detected_cnt);
2790                                 info->errorcode = ERRCODE_INSERT_BREAK;
2791                         } else {
2792                                 if (info->errorcode == ERRCODE_INSERT_BREAK) {
2793                                         info->icount.brk++;
2794                                         *tty->flip.char_buf_ptr = 0;
2795                                         *tty->flip.flag_buf_ptr = TTY_BREAK;
2796                                         tty->flip.flag_buf_ptr++;
2797                                         tty->flip.char_buf_ptr++;
2798                                         tty->flip.count++;
2799                                         info->icount.rx++;
2800                                 }
2801                                 *tty->flip.char_buf_ptr = IO_EXTRACT(R_SERIAL0_READ, data_in, data_read);
2802
2803                                 if (data_read & IO_MASK(R_SERIAL0_READ, par_err)) {
2804                                         info->icount.parity++;
2805                                         *tty->flip.flag_buf_ptr = TTY_PARITY;
2806                                 } else if (data_read & IO_MASK(R_SERIAL0_READ, overrun)) {
2807                                         info->icount.overrun++;
2808                                         *tty->flip.flag_buf_ptr = TTY_OVERRUN;
2809                                 } else if (data_read & IO_MASK(R_SERIAL0_READ, framing_err)) {
2810                                         info->icount.frame++;
2811                                         *tty->flip.flag_buf_ptr = TTY_FRAME;
2812                                 }
2813                                 info->errorcode = 0;
2814                         }
2815                         info->break_detected_cnt = 0;
2816                 }
2817         } else if (data_read & IO_MASK(R_SERIAL0_READ, data_avail)) {
2818                 /* No error */
2819                 DLOG_INT_TRIG(
2820                 if (!log_int_trig1_pos) {
2821                         if (log_int_pos >= log_int_size) {
2822                                 log_int_pos = 0;
2823                         }
2824                         log_int_trig0_pos = log_int_pos;
2825                         log_int(rdpc(), 0, 0);
2826                 }
2827                 );
2828                 *tty->flip.char_buf_ptr = IO_EXTRACT(R_SERIAL0_READ, data_in, data_read);
2829                 *tty->flip.flag_buf_ptr = 0;
2830         } else {
2831                 DEBUG_LOG(info->line, "ser_rx int but no data_avail  %08lX\n", data_read);
2832         }
2833
2834
2835         tty->flip.flag_buf_ptr++;
2836         tty->flip.char_buf_ptr++;
2837         tty->flip.count++;
2838         info->icount.rx++;
2839         data_read = *((unsigned long *)&info->port[REG_DATA_STATUS32]);
2840         if (data_read & IO_MASK(R_SERIAL0_READ, data_avail)) {
2841                 DEBUG_LOG(info->line, "ser_rx   %c in loop\n", IO_EXTRACT(R_SERIAL0_READ, data_in, data_read));
2842                 goto more_data;
2843         }
2844
2845         tty_flip_buffer_push(info->tty);
2846         return info;
2847 }
2848
2849 static struct e100_serial* handle_ser_rx_interrupt(struct e100_serial *info)
2850 {
2851         unsigned char rstat;
2852
2853 #ifdef SERIAL_DEBUG_INTR
2854         printk("Interrupt from serport %d\n", i);
2855 #endif
2856 /*      DEBUG_LOG(info->line, "ser_interrupt stat %03X\n", rstat | (i << 8)); */
2857         if (!info->uses_dma_in) {
2858                 return handle_ser_rx_interrupt_no_dma(info);
2859         }
2860         /* DMA is used */
2861         rstat = info->port[REG_STATUS];
2862         if (rstat & IO_MASK(R_SERIAL0_STATUS, xoff_detect) ) {
2863                 DFLOW(DEBUG_LOG(info->line, "XOFF detect\n", 0));
2864         }
2865
2866         if (rstat & SER_ERROR_MASK) {
2867                 unsigned char data;
2868
2869                 info->last_rx_active_usec = GET_JIFFIES_USEC();
2870                 info->last_rx_active = jiffies;
2871                 /* If we got an error, we must reset it by reading the
2872                  * data_in field
2873                  */
2874                 data = info->port[REG_DATA];
2875                 DINTR1(DEBUG_LOG(info->line, "ser_rx!  %c\n", data));
2876                 DINTR1(DEBUG_LOG(info->line, "ser_rx err stat %02X\n", rstat));
2877                 if (!data && (rstat & SER_FRAMING_ERR_MASK)) {
2878                         /* Most likely a break, but we get interrupts over and
2879                          * over again.
2880                          */
2881
2882                         if (!info->break_detected_cnt) {
2883                                 DEBUG_LOG(info->line, "#BRK start\n", 0);
2884                         }
2885                         if (rstat & SER_RXD_MASK) {
2886                                 /* The RX pin is high now, so the break
2887                                  * must be over, but....
2888                                  * we can't really know if we will get another
2889                                  * last byte ending the break or not.
2890                                  * And we don't know if the byte (if any) will
2891                                  * have an error or look valid.
2892                                  */
2893                                 DEBUG_LOG(info->line, "# BL BRK\n", 0);
2894                                 info->errorcode = ERRCODE_INSERT_BREAK;
2895                         }
2896                         info->break_detected_cnt++;
2897                 } else {
2898                         /* The error does not look like a break, but could be
2899                          * the end of one
2900                          */
2901                         if (info->break_detected_cnt) {
2902                                 DEBUG_LOG(info->line, "EBRK %i\n", info->break_detected_cnt);
2903                                 info->errorcode = ERRCODE_INSERT_BREAK;
2904                         } else {
2905                                 if (info->errorcode == ERRCODE_INSERT_BREAK) {
2906                                         info->icount.brk++;
2907                                         add_char_and_flag(info, '\0', TTY_BREAK);
2908                                 }
2909
2910                                 if (rstat & SER_PAR_ERR_MASK) {
2911                                         info->icount.parity++;
2912                                         add_char_and_flag(info, data, TTY_PARITY);
2913                                 } else if (rstat & SER_OVERRUN_MASK) {
2914                                         info->icount.overrun++;
2915                                         add_char_and_flag(info, data, TTY_OVERRUN);
2916                                 } else if (rstat & SER_FRAMING_ERR_MASK) {
2917                                         info->icount.frame++;
2918                                         add_char_and_flag(info, data, TTY_FRAME);
2919                                 }
2920
2921                                 info->errorcode = 0;
2922                         }
2923                         info->break_detected_cnt = 0;
2924                         DEBUG_LOG(info->line, "#iERR s d %04X\n",
2925                                   ((rstat & SER_ERROR_MASK) << 8) | data);
2926                 }
2927                 PROCSTAT(ser_stat[info->line].early_errors_cnt++);
2928         } else { /* It was a valid byte, now let the DMA do the rest */
2929                 unsigned long curr_time_u = GET_JIFFIES_USEC();
2930                 unsigned long curr_time = jiffies;
2931
2932                 if (info->break_detected_cnt) {
2933                         /* Detect if this character is a new valid char or the
2934                          * last char in a break sequence: If LSBits are 0 and
2935                          * MSBits are high AND the time is close to the
2936                          * previous interrupt we should discard it.
2937                          */
2938                         long elapsed_usec =
2939                           (curr_time - info->last_rx_active) * (1000000/HZ) +
2940                           curr_time_u - info->last_rx_active_usec;
2941                         if (elapsed_usec < 2*info->char_time_usec) {
2942                                 DEBUG_LOG(info->line, "FBRK %i\n", info->line);
2943                                 /* Report as BREAK (error) and let
2944                                  * receive_chars_dma() handle it
2945                                  */
2946                                 info->errorcode = ERRCODE_SET_BREAK;
2947                         } else {
2948                                 DEBUG_LOG(info->line, "Not end of BRK (V)%i\n", info->line);
2949                         }
2950                         DEBUG_LOG(info->line, "num brk %i\n", info->break_detected_cnt);
2951                 }
2952
2953 #ifdef SERIAL_DEBUG_INTR
2954                 printk("** OK, disabling ser_interrupts\n");
2955 #endif
2956                 e100_disable_serial_data_irq(info);
2957                 DINTR2(DEBUG_LOG(info->line, "ser_rx OK %d\n", info->line));
2958                 info->break_detected_cnt = 0;
2959
2960                 PROCSTAT(ser_stat[info->line].ser_ints_ok_cnt++);
2961         }
2962         /* Restarting the DMA never hurts */
2963         *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, restart);
2964         START_FLUSH_FAST_TIMER(info, "ser_int");
2965         return info;
2966 } /* handle_ser_rx_interrupt */
2967
2968 static void handle_ser_tx_interrupt(struct e100_serial *info)
2969 {
2970         unsigned long flags;
2971
2972         if (info->x_char) {
2973                 unsigned char rstat;
2974                 DFLOW(DEBUG_LOG(info->line, "tx_int: xchar 0x%02X\n", info->x_char));
2975                 save_flags(flags); cli();
2976                 rstat = info->port[REG_STATUS];
2977                 DFLOW(DEBUG_LOG(info->line, "stat %x\n", rstat));
2978
2979                 info->port[REG_TR_DATA] = info->x_char;
2980                 info->icount.tx++;
2981                 info->x_char = 0;
2982                 /* We must enable since it is disabled in ser_interrupt */
2983                 e100_enable_serial_tx_ready_irq(info);
2984                 restore_flags(flags);
2985                 return;
2986         }
2987         if (info->uses_dma_out) {
2988                 unsigned char rstat;
2989                 int i;
2990                 /* We only use normal tx interrupt when sending x_char */
2991                 DFLOW(DEBUG_LOG(info->line, "tx_int: xchar sent\n", 0));
2992                 save_flags(flags); cli();
2993                 rstat = info->port[REG_STATUS];
2994                 DFLOW(DEBUG_LOG(info->line, "stat %x\n", rstat));
2995                 e100_disable_serial_tx_ready_irq(info);
2996                 if (info->tty->stopped)
2997                         rs_stop(info->tty);
2998                 /* Enable the DMA channel and tell it to continue */
2999                 e100_enable_txdma_channel(info);
3000                 /* Wait 12 cycles before doing the DMA command */
3001                 for(i = 6;  i > 0; i--)
3002                         nop();
3003
3004                 *info->ocmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, continue);
3005                 restore_flags(flags);
3006                 return;
3007         }
3008         /* Normal char-by-char interrupt */
3009         if (info->xmit.head == info->xmit.tail
3010             || info->tty->stopped
3011             || info->tty->hw_stopped) {
3012                 DFLOW(DEBUG_LOG(info->line, "tx_int: stopped %i\n", info->tty->stopped));
3013                 e100_disable_serial_tx_ready_irq(info);
3014                 info->tr_running = 0;
3015                 return;
3016         }
3017         DINTR2(DEBUG_LOG(info->line, "tx_int %c\n", info->xmit.buf[info->xmit.tail]));
3018         /* Send a byte, rs485 timing is critical so turn of ints */
3019         save_flags(flags); cli();
3020         info->port[REG_TR_DATA] = info->xmit.buf[info->xmit.tail];
3021         info->xmit.tail = (info->xmit.tail + 1) & (SERIAL_XMIT_SIZE-1);
3022         info->icount.tx++;
3023         if (info->xmit.head == info->xmit.tail) {
3024 #if defined(CONFIG_ETRAX_RS485) && defined(CONFIG_ETRAX_FAST_TIMER)
3025                 if (info->rs485.enabled) {
3026                         /* Set a short timer to toggle RTS */
3027                         start_one_shot_timer(&fast_timers_rs485[info->line],
3028                                              rs485_toggle_rts_timer_function,
3029                                              (unsigned long)info,
3030                                              info->char_time_usec*2,
3031                                              "RS-485");
3032                 }
3033 #endif /* RS485 */
3034                 info->last_tx_active_usec = GET_JIFFIES_USEC();
3035                 info->last_tx_active = jiffies;
3036                 e100_disable_serial_tx_ready_irq(info);
3037                 info->tr_running = 0;
3038                 DFLOW(DEBUG_LOG(info->line, "tx_int: stop2\n", 0));
3039         } else {
3040                 /* We must enable since it is disabled in ser_interrupt */
3041                 e100_enable_serial_tx_ready_irq(info);
3042         }
3043         restore_flags(flags);
3044
3045         if (CIRC_CNT(info->xmit.head,
3046                      info->xmit.tail,
3047                      SERIAL_XMIT_SIZE) < WAKEUP_CHARS)
3048                 rs_sched_event(info, RS_EVENT_WRITE_WAKEUP);
3049
3050 } /* handle_ser_tx_interrupt */
3051
3052 /* result of time measurements:
3053  * RX duration 54-60 us when doing something, otherwise 6-9 us
3054  * ser_int duration: just sending: 8-15 us normally, up to 73 us
3055  */
3056 static irqreturn_t
3057 ser_interrupt(int irq, void *dev_id, struct pt_regs *regs)
3058 {
3059         static volatile int tx_started = 0;
3060         struct e100_serial *info;
3061         int i;
3062         unsigned long flags;
3063         unsigned long irq_mask1_rd;
3064         unsigned long data_mask = (1 << (8+2*0)); /* ser0 data_avail */
3065         int handled = 0;
3066         static volatile unsigned long reentered_ready_mask = 0;
3067
3068         save_flags(flags); cli();
3069         irq_mask1_rd = *R_IRQ_MASK1_RD;
3070         /* First handle all rx interrupts with ints disabled */
3071         info = rs_table;
3072         irq_mask1_rd &= e100_ser_int_mask;
3073         for (i = 0; i < NR_PORTS; i++) {
3074                 /* Which line caused the data irq? */
3075                 if (irq_mask1_rd & data_mask) {
3076                         handled = 1;
3077                         handle_ser_rx_interrupt(info);
3078                 }
3079                 info += 1;
3080                 data_mask <<= 2;
3081         }
3082         /* Handle tx interrupts with interrupts enabled so we
3083          * can take care of new data interrupts while transmitting
3084          * We protect the tx part with the tx_started flag.
3085          * We disable the tr_ready interrupts we are about to handle and
3086          * unblock the serial interrupt so new serial interrupts may come.
3087          *
3088          * If we get a new interrupt:
3089          *  - it migth be due to synchronous serial ports.
3090          *  - serial irq will be blocked by general irq handler.
3091          *  - async data will be handled above (sync will be ignored).
3092          *  - tx_started flag will prevent us from trying to send again and
3093          *    we will exit fast - no need to unblock serial irq.
3094          *  - Next (sync) serial interrupt handler will be runned with
3095          *    disabled interrupt due to restore_flags() at end of function,
3096          *    so sync handler will not be preempted or reentered.
3097          */
3098         if (!tx_started) {
3099                 unsigned long ready_mask;
3100                 unsigned long
3101                 tx_started = 1;
3102                 /* Only the tr_ready interrupts left */
3103                 irq_mask1_rd &= (IO_MASK(R_IRQ_MASK1_RD, ser0_ready) |
3104                                  IO_MASK(R_IRQ_MASK1_RD, ser1_ready) |
3105                                  IO_MASK(R_IRQ_MASK1_RD, ser2_ready) |
3106                                  IO_MASK(R_IRQ_MASK1_RD, ser3_ready));
3107                 while (irq_mask1_rd) {
3108                         /* Disable those we are about to handle */
3109                         *R_IRQ_MASK1_CLR = irq_mask1_rd;
3110                         /* Unblock the serial interrupt */
3111                         *R_VECT_MASK_SET = IO_STATE(R_VECT_MASK_SET, serial, set);
3112
3113                         sti();
3114                         ready_mask = (1 << (8+1+2*0)); /* ser0 tr_ready */
3115                         info = rs_table;
3116                         for (i = 0; i < NR_PORTS; i++) {
3117                                 /* Which line caused the ready irq? */
3118                                 if (irq_mask1_rd & ready_mask) {
3119                                         handled = 1;
3120                                         handle_ser_tx_interrupt(info);
3121                                 }
3122                                 info += 1;
3123                                 ready_mask <<= 2;
3124                         }
3125                         /* handle_ser_tx_interrupt enables tr_ready interrupts */
3126                         cli();
3127                         /* Handle reentered TX interrupt */
3128                         irq_mask1_rd = reentered_ready_mask;
3129                 }
3130                 cli();
3131                 tx_started = 0;
3132         } else {
3133                 unsigned long ready_mask;
3134                 ready_mask = irq_mask1_rd & (IO_MASK(R_IRQ_MASK1_RD, ser0_ready) |
3135                                              IO_MASK(R_IRQ_MASK1_RD, ser1_ready) |
3136                                              IO_MASK(R_IRQ_MASK1_RD, ser2_ready) |
3137                                              IO_MASK(R_IRQ_MASK1_RD, ser3_ready));
3138                 if (ready_mask) {
3139                         reentered_ready_mask |= ready_mask;
3140                         /* Disable those we are about to handle */
3141                         *R_IRQ_MASK1_CLR = ready_mask;
3142                         DFLOW(DEBUG_LOG(SERIAL_DEBUG_LINE, "ser_int reentered with TX %X\n", ready_mask));
3143                 }
3144         }
3145
3146         restore_flags(flags);
3147         return IRQ_RETVAL(handled);
3148 } /* ser_interrupt */
3149 #endif
3150
3151 /*
3152  * -------------------------------------------------------------------
3153  * Here ends the serial interrupt routines.
3154  * -------------------------------------------------------------------
3155  */
3156
3157 /*
3158  * This routine is used to handle the "bottom half" processing for the
3159  * serial driver, known also the "software interrupt" processing.
3160  * This processing is done at the kernel interrupt level, after the
3161  * rs_interrupt() has returned, BUT WITH INTERRUPTS TURNED ON.  This
3162  * is where time-consuming activities which can not be done in the
3163  * interrupt driver proper are done; the interrupt driver schedules
3164  * them using rs_sched_event(), and they get done here.
3165  */
3166 static void
3167 do_softint(void *private_)
3168 {
3169         struct e100_serial      *info = (struct e100_serial *) private_;
3170         struct tty_struct       *tty;
3171
3172         tty = info->tty;
3173         if (!tty)
3174                 return;
3175
3176         if (test_and_clear_bit(RS_EVENT_WRITE_WAKEUP, &info->event)) {
3177                 if ((tty->flags & (1 << TTY_DO_WRITE_WAKEUP)) &&
3178                     tty->ldisc.write_wakeup)
3179                         (tty->ldisc.write_wakeup)(tty);
3180                 wake_up_interruptible(&tty->write_wait);
3181         }
3182 }
3183
3184 static int
3185 startup(struct e100_serial * info)
3186 {
3187         unsigned long flags;
3188         unsigned long xmit_page;
3189         int i;
3190
3191         xmit_page = get_zeroed_page(GFP_KERNEL);
3192         if (!xmit_page)
3193                 return -ENOMEM;
3194
3195         save_flags(flags);
3196         cli();
3197
3198         /* if it was already initialized, skip this */
3199
3200         if (info->flags & ASYNC_INITIALIZED) {
3201                 restore_flags(flags);
3202                 free_page(xmit_page);
3203                 return 0;
3204         }
3205
3206         if (info->xmit.buf)
3207                 free_page(xmit_page);
3208         else
3209                 info->xmit.buf = (unsigned char *) xmit_page;
3210
3211 #ifdef SERIAL_DEBUG_OPEN
3212         printk("starting up ttyS%d (xmit_buf 0x%p)...\n", info->line, info->xmit.buf);
3213 #endif
3214
3215 #ifdef CONFIG_SVINTO_SIM
3216         /* Bits and pieces collected from below.  Better to have them
3217            in one ifdef:ed clause than to mix in a lot of ifdefs,
3218            right? */
3219         if (info->tty)
3220                 clear_bit(TTY_IO_ERROR, &info->tty->flags);
3221
3222         info->xmit.head = info->xmit.tail = 0;
3223         info->first_recv_buffer = info->last_recv_buffer = NULL;
3224         info->recv_cnt = info->max_recv_cnt = 0;
3225
3226         for (i = 0; i < SERIAL_RECV_DESCRIPTORS; i++)
3227                 info->rec_descr[i].buf = NULL;
3228
3229         /* No real action in the simulator, but may set info important
3230            to ioctl. */
3231         change_speed(info);
3232 #else
3233
3234         /*
3235          * Clear the FIFO buffers and disable them
3236          * (they will be reenabled in change_speed())
3237          */
3238
3239         /*
3240          * Reset the DMA channels and make sure their interrupts are cleared
3241          */
3242
3243         if (info->dma_in_enabled) {
3244                 info->uses_dma_in = 1;
3245                 e100_enable_rxdma_channel(info);
3246
3247                 *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, reset);
3248
3249                 /* Wait until reset cycle is complete */
3250                 while (IO_EXTRACT(R_DMA_CH6_CMD, cmd, *info->icmdadr) ==
3251                        IO_STATE_VALUE(R_DMA_CH6_CMD, cmd, reset));
3252
3253                 /* Make sure the irqs are cleared */
3254                 *info->iclrintradr =
3255                         IO_STATE(R_DMA_CH6_CLR_INTR, clr_descr, do) |
3256                         IO_STATE(R_DMA_CH6_CLR_INTR, clr_eop, do);
3257         } else {
3258                 e100_disable_rxdma_channel(info);
3259         }
3260
3261         if (info->dma_out_enabled) {
3262                 info->uses_dma_out = 1;
3263                 e100_enable_txdma_channel(info);
3264                 *info->ocmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, reset);
3265
3266                 while (IO_EXTRACT(R_DMA_CH6_CMD, cmd, *info->ocmdadr) ==
3267                        IO_STATE_VALUE(R_DMA_CH6_CMD, cmd, reset));
3268
3269                 /* Make sure the irqs are cleared */
3270                 *info->oclrintradr =
3271                         IO_STATE(R_DMA_CH6_CLR_INTR, clr_descr, do) |
3272                         IO_STATE(R_DMA_CH6_CLR_INTR, clr_eop, do);
3273         } else {
3274                 e100_disable_txdma_channel(info);
3275         }
3276
3277         if (info->tty)
3278                 clear_bit(TTY_IO_ERROR, &info->tty->flags);
3279
3280         info->xmit.head = info->xmit.tail = 0;
3281         info->first_recv_buffer = info->last_recv_buffer = NULL;
3282         info->recv_cnt = info->max_recv_cnt = 0;
3283
3284         for (i = 0; i < SERIAL_RECV_DESCRIPTORS; i++)
3285                 info->rec_descr[i].buf = 0;
3286
3287         /*
3288          * and set the speed and other flags of the serial port
3289          * this will start the rx/tx as well
3290          */
3291 #ifdef SERIAL_HANDLE_EARLY_ERRORS
3292         e100_enable_serial_data_irq(info);
3293 #endif
3294         change_speed(info);
3295
3296         /* dummy read to reset any serial errors */
3297
3298         (void)info->port[REG_DATA];
3299
3300         /* enable the interrupts */
3301         if (info->uses_dma_out)
3302                 e100_enable_txdma_irq(info);
3303
3304         e100_enable_rx_irq(info);
3305
3306         info->tr_running = 0; /* to be sure we don't lock up the transmitter */
3307
3308         /* setup the dma input descriptor and start dma */
3309
3310         start_receive(info);
3311
3312         /* for safety, make sure the descriptors last result is 0 bytes written */
3313
3314         info->tr_descr.sw_len = 0;
3315         info->tr_descr.hw_len = 0;
3316         info->tr_descr.status = 0;
3317
3318         /* enable RTS/DTR last */
3319
3320         e100_rts(info, 1);
3321         e100_dtr(info, 1);
3322
3323 #endif /* CONFIG_SVINTO_SIM */
3324
3325         info->flags |= ASYNC_INITIALIZED;
3326
3327         restore_flags(flags);
3328         return 0;
3329 }
3330
3331 /*
3332  * This routine will shutdown a serial port; interrupts are disabled, and
3333  * DTR is dropped if the hangup on close termio flag is on.
3334  */
3335 static void
3336 shutdown(struct e100_serial * info)
3337 {
3338         unsigned long flags;
3339         struct etrax_dma_descr *descr = info->rec_descr;
3340         struct etrax_recv_buffer *buffer;
3341         int i;
3342
3343 #ifndef CONFIG_SVINTO_SIM
3344         /* shut down the transmitter and receiver */
3345         DFLOW(DEBUG_LOG(info->line, "shutdown %i\n", info->line));
3346         e100_disable_rx(info);
3347         info->port[REG_TR_CTRL] = (info->tx_ctrl &= ~0x40);
3348
3349         /* disable interrupts, reset dma channels */
3350         if (info->uses_dma_in) {
3351                 e100_disable_rxdma_irq(info);
3352                 *info->icmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, reset);
3353                 info->uses_dma_in = 0;
3354         } else {
3355                 e100_disable_serial_data_irq(info);
3356         }
3357
3358         if (info->uses_dma_out) {
3359                 e100_disable_txdma_irq(info);
3360                 info->tr_running = 0;
3361                 *info->ocmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, reset);
3362                 info->uses_dma_out = 0;
3363         } else {
3364                 e100_disable_serial_tx_ready_irq(info);
3365                 info->tr_running = 0;
3366         }
3367
3368 #endif /* CONFIG_SVINTO_SIM */
3369
3370         if (!(info->flags & ASYNC_INITIALIZED))
3371                 return;
3372
3373 #ifdef SERIAL_DEBUG_OPEN
3374         printk("Shutting down serial port %d (irq %d)....\n", info->line,
3375                info->irq);
3376 #endif
3377
3378         save_flags(flags);
3379         cli(); /* Disable interrupts */
3380
3381         if (info->xmit.buf) {
3382                 free_page((unsigned long)info->xmit.buf);
3383                 info->xmit.buf = NULL;
3384         }
3385
3386         for (i = 0; i < SERIAL_RECV_DESCRIPTORS; i++)
3387                 if (descr[i].buf) {
3388                         buffer = phys_to_virt(descr[i].buf) - sizeof *buffer;
3389                         kfree(buffer);
3390                         descr[i].buf = 0;
3391                 }
3392
3393         if (!info->tty || (info->tty->termios->c_cflag & HUPCL)) {
3394                 /* hang up DTR and RTS if HUPCL is enabled */
3395                 e100_dtr(info, 0);
3396                 e100_rts(info, 0); /* could check CRTSCTS before doing this */
3397         }
3398
3399         if (info->tty)
3400                 set_bit(TTY_IO_ERROR, &info->tty->flags);
3401
3402         info->flags &= ~ASYNC_INITIALIZED;
3403         restore_flags(flags);
3404 }
3405
3406
3407 /* change baud rate and other assorted parameters */
3408
3409 static void
3410 change_speed(struct e100_serial *info)
3411 {
3412         unsigned int cflag;
3413         unsigned long xoff;
3414         unsigned long flags;
3415         /* first some safety checks */
3416
3417         if (!info->tty || !info->tty->termios)
3418                 return;
3419         if (!info->port)
3420                 return;
3421
3422         cflag = info->tty->termios->c_cflag;
3423
3424         /* possibly, the tx/rx should be disabled first to do this safely */
3425
3426         /* change baud-rate and write it to the hardware */
3427         if ((info->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST) {
3428                 /* Special baudrate */
3429                 u32 mask = 0xFF << (info->line*8); /* Each port has 8 bits */
3430                 unsigned long alt_source =
3431                                 IO_STATE(R_ALT_SER_BAUDRATE, ser0_rec, normal) |
3432                                 IO_STATE(R_ALT_SER_BAUDRATE, ser0_tr, normal);
3433                 /* R_ALT_SER_BAUDRATE selects the source */
3434                 DBAUD(printk("Custom baudrate: baud_base/divisor %lu/%i\n",
3435                        (unsigned long)info->baud_base, info->custom_divisor));
3436                 if (info->baud_base == SERIAL_PRESCALE_BASE) {
3437                         /* 0, 2-65535 (0=65536) */
3438                         u16 divisor = info->custom_divisor;
3439                         /* R_SERIAL_PRESCALE (upper 16 bits of R_CLOCK_PRESCALE) */
3440                         /* baudrate is 3.125MHz/custom_divisor */
3441                         alt_source =
3442                                 IO_STATE(R_ALT_SER_BAUDRATE, ser0_rec, prescale) |
3443                                 IO_STATE(R_ALT_SER_BAUDRATE, ser0_tr, prescale);
3444                         alt_source = 0x11;
3445                         DBAUD(printk("Writing SERIAL_PRESCALE: divisor %i\n", divisor));
3446                         *R_SERIAL_PRESCALE = divisor;
3447                         info->baud = SERIAL_PRESCALE_BASE/divisor;
3448                 }
3449 #ifdef CONFIG_ETRAX_EXTERN_PB6CLK_ENABLED
3450                 else if ((info->baud_base==CONFIG_ETRAX_EXTERN_PB6CLK_FREQ/8 &&
3451                           info->custom_divisor == 1) ||
3452                          (info->baud_base==CONFIG_ETRAX_EXTERN_PB6CLK_FREQ &&
3453                           info->custom_divisor == 8)) {
3454                                 /* ext_clk selected */
3455                                 alt_source =
3456                                         IO_STATE(R_ALT_SER_BAUDRATE, ser0_rec, extern) |
3457                                         IO_STATE(R_ALT_SER_BAUDRATE, ser0_tr, extern);
3458                                 DBAUD(printk("using external baudrate: %lu\n", CONFIG_ETRAX_EXTERN_PB6CLK_FREQ/8));
3459                                 info->baud = CONFIG_ETRAX_EXTERN_PB6CLK_FREQ/8;
3460                         }
3461                 }
3462 #endif
3463                 else
3464                 {
3465                         /* Bad baudbase, we don't support using timer0
3466                          * for baudrate.
3467                          */
3468                         printk(KERN_WARNING "Bad baud_base/custom_divisor: %lu/%i\n",
3469                                (unsigned long)info->baud_base, info->custom_divisor);
3470                 }
3471                 r_alt_ser_baudrate_shadow &= ~mask;
3472                 r_alt_ser_baudrate_shadow |= (alt_source << (info->line*8));
3473                 *R_ALT_SER_BAUDRATE = r_alt_ser_baudrate_shadow;
3474         } else {
3475                 /* Normal baudrate */
3476                 /* Make sure we use normal baudrate */
3477                 u32 mask = 0xFF << (info->line*8); /* Each port has 8 bits */
3478                 unsigned long alt_source =
3479                         IO_STATE(R_ALT_SER_BAUDRATE, ser0_rec, normal) |
3480                         IO_STATE(R_ALT_SER_BAUDRATE, ser0_tr, normal);
3481                 r_alt_ser_baudrate_shadow &= ~mask;
3482                 r_alt_ser_baudrate_shadow |= (alt_source << (info->line*8));
3483 #ifndef CONFIG_SVINTO_SIM
3484                 *R_ALT_SER_BAUDRATE = r_alt_ser_baudrate_shadow;
3485 #endif /* CONFIG_SVINTO_SIM */
3486
3487                 info->baud = cflag_to_baud(cflag);
3488 #ifndef CONFIG_SVINTO_SIM
3489                 info->port[REG_BAUD] = cflag_to_etrax_baud(cflag);
3490 #endif /* CONFIG_SVINTO_SIM */
3491         }
3492
3493 #ifndef CONFIG_SVINTO_SIM
3494         /* start with default settings and then fill in changes */
3495         save_flags(flags);
3496         cli();
3497         /* 8 bit, no/even parity */
3498         info->rx_ctrl &= ~(IO_MASK(R_SERIAL0_REC_CTRL, rec_bitnr) |
3499                            IO_MASK(R_SERIAL0_REC_CTRL, rec_par_en) |
3500                            IO_MASK(R_SERIAL0_REC_CTRL, rec_par));
3501
3502         /* 8 bit, no/even parity, 1 stop bit, no cts */
3503         info->tx_ctrl &= ~(IO_MASK(R_SERIAL0_TR_CTRL, tr_bitnr) |
3504                            IO_MASK(R_SERIAL0_TR_CTRL, tr_par_en) |
3505                            IO_MASK(R_SERIAL0_TR_CTRL, tr_par) |
3506                            IO_MASK(R_SERIAL0_TR_CTRL, stop_bits) |
3507                            IO_MASK(R_SERIAL0_TR_CTRL, auto_cts));
3508
3509         if ((cflag & CSIZE) == CS7) {
3510                 /* set 7 bit mode */
3511                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, tr_bitnr, tr_7bit);
3512                 info->rx_ctrl |= IO_STATE(R_SERIAL0_REC_CTRL, rec_bitnr, rec_7bit);
3513         }
3514
3515         if (cflag & CSTOPB) {
3516                 /* set 2 stop bit mode */
3517                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, stop_bits, two_bits);
3518         }
3519
3520         if (cflag & PARENB) {
3521                 /* enable parity */
3522                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, tr_par_en, enable);
3523                 info->rx_ctrl |= IO_STATE(R_SERIAL0_REC_CTRL, rec_par_en, enable);
3524         }
3525
3526         if (cflag & CMSPAR) {
3527                 /* enable stick parity, PARODD mean Mark which matches ETRAX */
3528                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, tr_stick_par, stick);
3529                 info->rx_ctrl |= IO_STATE(R_SERIAL0_REC_CTRL, rec_stick_par, stick);
3530         }
3531         if (cflag & PARODD) {
3532                 /* set odd parity (or Mark if CMSPAR) */
3533                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, tr_par, odd);
3534                 info->rx_ctrl |= IO_STATE(R_SERIAL0_REC_CTRL, rec_par, odd);
3535         }
3536
3537         if (cflag & CRTSCTS) {
3538                 /* enable automatic CTS handling */
3539                 DFLOW(DEBUG_LOG(info->line, "FLOW auto_cts enabled\n", 0));
3540                 info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, auto_cts, active);
3541         }
3542
3543         /* make sure the tx and rx are enabled */
3544
3545         info->tx_ctrl |= IO_STATE(R_SERIAL0_TR_CTRL, tr_enable, enable);
3546         info->rx_ctrl |= IO_STATE(R_SERIAL0_REC_CTRL, rec_enable, enable);
3547
3548         /* actually write the control regs to the hardware */
3549
3550         info->port[REG_TR_CTRL] = info->tx_ctrl;
3551         info->port[REG_REC_CTRL] = info->rx_ctrl;
3552         xoff = IO_FIELD(R_SERIAL0_XOFF, xoff_char, STOP_CHAR(info->tty));
3553         xoff |= IO_STATE(R_SERIAL0_XOFF, tx_stop, enable);
3554         if (info->tty->termios->c_iflag & IXON ) {
3555                 DFLOW(DEBUG_LOG(info->line, "FLOW XOFF enabled 0x%02X\n", STOP_CHAR(info->tty)));
3556                 xoff |= IO_STATE(R_SERIAL0_XOFF, auto_xoff, enable);
3557         }
3558
3559         *((unsigned long *)&info->port[REG_XOFF]) = xoff;
3560         restore_flags(flags);
3561 #endif /* !CONFIG_SVINTO_SIM */
3562
3563         update_char_time(info);
3564
3565 } /* change_speed */
3566
3567 /* start transmitting chars NOW */
3568
3569 static void
3570 rs_flush_chars(struct tty_struct *tty)
3571 {
3572         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3573         unsigned long flags;
3574
3575         if (info->tr_running ||
3576             info->xmit.head == info->xmit.tail ||
3577             tty->stopped ||
3578             tty->hw_stopped ||
3579             !info->xmit.buf)
3580                 return;
3581
3582 #ifdef SERIAL_DEBUG_FLOW
3583         printk("rs_flush_chars\n");
3584 #endif
3585
3586         /* this protection might not exactly be necessary here */
3587
3588         save_flags(flags);
3589         cli();
3590         start_transmit(info);
3591         restore_flags(flags);
3592 }
3593
3594 static int rs_raw_write(struct tty_struct * tty, int from_user,
3595                         const unsigned char *buf, int count)
3596 {
3597         int     c, ret = 0;
3598         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3599         unsigned long flags;
3600
3601         /* first some sanity checks */
3602
3603         if (!tty || !info->xmit.buf || !tmp_buf)
3604                 return 0;
3605
3606 #ifdef SERIAL_DEBUG_DATA
3607         if (info->line == SERIAL_DEBUG_LINE)
3608                 printk("rs_raw_write (%d), status %d\n",
3609                        count, info->port[REG_STATUS]);
3610 #endif
3611
3612 #ifdef CONFIG_SVINTO_SIM
3613         /* Really simple.  The output is here and now. */
3614         SIMCOUT(buf, count);
3615         return count;
3616 #endif
3617         save_flags(flags);
3618         DFLOW(DEBUG_LOG(info->line, "write count %i ", count));
3619         DFLOW(DEBUG_LOG(info->line, "ldisc %i\n", tty->ldisc.chars_in_buffer(tty)));
3620
3621
3622         /* the cli/restore_flags pairs below are needed because the
3623          * DMA interrupt handler moves the info->xmit values. the memcpy
3624          * needs to be in the critical region unfortunately, because we
3625          * need to read xmit values, memcpy, write xmit values in one
3626          * atomic operation... this could perhaps be avoided by more clever
3627          * design.
3628          */
3629         if (from_user) {
3630                 mutex_lock(&tmp_buf_mutex);
3631                 while (1) {
3632                         int c1;
3633                         c = CIRC_SPACE_TO_END(info->xmit.head,
3634                                               info->xmit.tail,
3635                                               SERIAL_XMIT_SIZE);
3636                         if (count < c)
3637                                 c = count;
3638                         if (c <= 0)
3639                                 break;
3640
3641                         c -= copy_from_user(tmp_buf, buf, c);
3642                         if (!c) {
3643                                 if (!ret)
3644                                         ret = -EFAULT;
3645                                 break;
3646                         }
3647                         cli();
3648                         c1 = CIRC_SPACE_TO_END(info->xmit.head,
3649                                                info->xmit.tail,
3650                                                SERIAL_XMIT_SIZE);
3651                         if (c1 < c)
3652                                 c = c1;
3653                         memcpy(info->xmit.buf + info->xmit.head, tmp_buf, c);
3654                         info->xmit.head = ((info->xmit.head + c) &
3655                                            (SERIAL_XMIT_SIZE-1));
3656                         restore_flags(flags);
3657                         buf += c;
3658                         count -= c;
3659                         ret += c;
3660                 }
3661                 mutex_unlock(&tmp_buf_mutex);
3662         } else {
3663                 cli();
3664                 while (count) {
3665                         c = CIRC_SPACE_TO_END(info->xmit.head,
3666                                               info->xmit.tail,
3667                                               SERIAL_XMIT_SIZE);
3668
3669                         if (count < c)
3670                                 c = count;
3671                         if (c <= 0)
3672                                 break;
3673
3674                         memcpy(info->xmit.buf + info->xmit.head, buf, c);
3675                         info->xmit.head = (info->xmit.head + c) &
3676                                 (SERIAL_XMIT_SIZE-1);
3677                         buf += c;
3678                         count -= c;
3679                         ret += c;
3680                 }
3681                 restore_flags(flags);
3682         }
3683
3684         /* enable transmitter if not running, unless the tty is stopped
3685          * this does not need IRQ protection since if tr_running == 0
3686          * the IRQ's are not running anyway for this port.
3687          */
3688         DFLOW(DEBUG_LOG(info->line, "write ret %i\n", ret));
3689
3690         if (info->xmit.head != info->xmit.tail &&
3691             !tty->stopped &&
3692             !tty->hw_stopped &&
3693             !info->tr_running) {
3694                 start_transmit(info);
3695         }
3696
3697         return ret;
3698 } /* raw_raw_write() */
3699
3700 static int
3701 rs_write(struct tty_struct * tty, int from_user,
3702          const unsigned char *buf, int count)
3703 {
3704 #if defined(CONFIG_ETRAX_RS485)
3705         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3706
3707         if (info->rs485.enabled)
3708         {
3709                 /* If we are in RS-485 mode, we need to toggle RTS and disable
3710                  * the receiver before initiating a DMA transfer
3711                  */
3712 #ifdef CONFIG_ETRAX_FAST_TIMER
3713                 /* Abort any started timer */
3714                 fast_timers_rs485[info->line].function = NULL;
3715                 del_fast_timer(&fast_timers_rs485[info->line]);
3716 #endif
3717                 e100_rts(info, info->rs485.rts_on_send);
3718 #if defined(CONFIG_ETRAX_RS485_DISABLE_RECEIVER)
3719                 e100_disable_rx(info);
3720                 e100_enable_rx_irq(info);
3721 #endif
3722
3723                 if (info->rs485.delay_rts_before_send > 0)
3724                         msleep(info->rs485.delay_rts_before_send);
3725         }
3726 #endif /* CONFIG_ETRAX_RS485 */
3727
3728         count = rs_raw_write(tty, from_user, buf, count);
3729
3730 #if defined(CONFIG_ETRAX_RS485)
3731         if (info->rs485.enabled)
3732         {
3733                 unsigned int val;
3734                 /* If we are in RS-485 mode the following has to be done:
3735                  * wait until DMA is ready
3736                  * wait on transmit shift register
3737                  * toggle RTS
3738                  * enable the receiver
3739                  */
3740
3741                 /* Sleep until all sent */
3742                 tty_wait_until_sent(tty, 0);
3743 #ifdef CONFIG_ETRAX_FAST_TIMER
3744                 /* Now sleep a little more so that shift register is empty */
3745                 schedule_usleep(info->char_time_usec * 2);
3746 #endif
3747                 /* wait on transmit shift register */
3748                 do{
3749                         get_lsr_info(info, &val);
3750                 }while (!(val & TIOCSER_TEMT));
3751
3752                 e100_rts(info, info->rs485.rts_after_sent);
3753
3754 #if defined(CONFIG_ETRAX_RS485_DISABLE_RECEIVER)
3755                 e100_enable_rx(info);
3756                 e100_enable_rxdma_irq(info);
3757 #endif
3758         }
3759 #endif /* CONFIG_ETRAX_RS485 */
3760
3761         return count;
3762 } /* rs_write */
3763
3764
3765 /* how much space is available in the xmit buffer? */
3766
3767 static int
3768 rs_write_room(struct tty_struct *tty)
3769 {
3770         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3771
3772         return CIRC_SPACE(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
3773 }
3774
3775 /* How many chars are in the xmit buffer?
3776  * This does not include any chars in the transmitter FIFO.
3777  * Use wait_until_sent for waiting for FIFO drain.
3778  */
3779
3780 static int
3781 rs_chars_in_buffer(struct tty_struct *tty)
3782 {
3783         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3784
3785         return CIRC_CNT(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
3786 }
3787
3788 /* discard everything in the xmit buffer */
3789
3790 static void
3791 rs_flush_buffer(struct tty_struct *tty)
3792 {
3793         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3794         unsigned long flags;
3795
3796         save_flags(flags);
3797         cli();
3798         info->xmit.head = info->xmit.tail = 0;
3799         restore_flags(flags);
3800
3801         wake_up_interruptible(&tty->write_wait);
3802
3803         if ((tty->flags & (1 << TTY_DO_WRITE_WAKEUP)) &&
3804             tty->ldisc.write_wakeup)
3805                 (tty->ldisc.write_wakeup)(tty);
3806 }
3807
3808 /*
3809  * This function is used to send a high-priority XON/XOFF character to
3810  * the device
3811  *
3812  * Since we use DMA we don't check for info->x_char in transmit_chars_dma(),
3813  * but we do it in handle_ser_tx_interrupt().
3814  * We disable DMA channel and enable tx ready interrupt and write the
3815  * character when possible.
3816  */
3817 static void rs_send_xchar(struct tty_struct *tty, char ch)
3818 {
3819         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3820         unsigned long flags;
3821         save_flags(flags); cli();
3822         if (info->uses_dma_out) {
3823                 /* Put the DMA on hold and disable the channel */
3824                 *info->ocmdadr = IO_STATE(R_DMA_CH6_CMD, cmd, hold);
3825                 while (IO_EXTRACT(R_DMA_CH6_CMD, cmd, *info->ocmdadr) !=
3826                        IO_STATE_VALUE(R_DMA_CH6_CMD, cmd, hold));
3827                 e100_disable_txdma_channel(info);
3828         }
3829
3830         /* Must make sure transmitter is not stopped before we can transmit */
3831         if (tty->stopped)
3832                 rs_start(tty);
3833
3834         /* Enable manual transmit interrupt and send from there */
3835         DFLOW(DEBUG_LOG(info->line, "rs_send_xchar 0x%02X\n", ch));
3836         info->x_char = ch;
3837         e100_enable_serial_tx_ready_irq(info);
3838         restore_flags(flags);
3839 }
3840
3841 /*
3842  * ------------------------------------------------------------
3843  * rs_throttle()
3844  *
3845  * This routine is called by the upper-layer tty layer to signal that
3846  * incoming characters should be throttled.
3847  * ------------------------------------------------------------
3848  */
3849 static void
3850 rs_throttle(struct tty_struct * tty)
3851 {
3852         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3853 #ifdef SERIAL_DEBUG_THROTTLE
3854         char    buf[64];
3855
3856         printk("throttle %s: %lu....\n", tty_name(tty, buf),
3857                (unsigned long)tty->ldisc.chars_in_buffer(tty));
3858 #endif
3859         DFLOW(DEBUG_LOG(info->line,"rs_throttle %lu\n", tty->ldisc.chars_in_buffer(tty)));
3860
3861         /* Do RTS before XOFF since XOFF might take some time */
3862         if (tty->termios->c_cflag & CRTSCTS) {
3863                 /* Turn off RTS line */
3864                 e100_rts(info, 0);
3865         }
3866         if (I_IXOFF(tty))
3867                 rs_send_xchar(tty, STOP_CHAR(tty));
3868
3869 }
3870
3871 static void
3872 rs_unthrottle(struct tty_struct * tty)
3873 {
3874         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
3875 #ifdef SERIAL_DEBUG_THROTTLE
3876         char    buf[64];
3877
3878         printk("unthrottle %s: %lu....\n", tty_name(tty, buf),
3879                (unsigned long)tty->ldisc.chars_in_buffer(tty));
3880 #endif
3881         DFLOW(DEBUG_LOG(info->line,"rs_unthrottle ldisc %d\n", tty->ldisc.chars_in_buffer(tty)));
3882         DFLOW(DEBUG_LOG(info->line,"rs_unthrottle flip.count: %i\n", tty->flip.count));
3883         /* Do RTS before XOFF since XOFF might take some time */
3884         if (tty->termios->c_cflag & CRTSCTS) {
3885                 /* Assert RTS line  */
3886                 e100_rts(info, 1);
3887         }
3888
3889         if (I_IXOFF(tty)) {
3890                 if (info->x_char)
3891                         info->x_char = 0;
3892                 else
3893                         rs_send_xchar(tty, START_CHAR(tty));
3894         }
3895
3896 }
3897
3898 /*
3899  * ------------------------------------------------------------
3900  * rs_ioctl() and friends
3901  * ------------------------------------------------------------
3902  */
3903
3904 static int
3905 get_serial_info(struct e100_serial * info,
3906                 struct serial_struct * retinfo)
3907 {
3908         struct serial_struct tmp;
3909
3910         /* this is all probably wrong, there are a lot of fields
3911          * here that we don't have in e100_serial and maybe we
3912          * should set them to something else than 0.
3913          */
3914
3915         if (!retinfo)
3916                 return -EFAULT;
3917         memset(&tmp, 0, sizeof(tmp));
3918         tmp.type = info->type;
3919         tmp.line = info->line;
3920         tmp.port = (int)info->port;
3921         tmp.irq = info->irq;
3922         tmp.flags = info->flags;
3923         tmp.baud_base = info->baud_base;
3924         tmp.close_delay = info->close_delay;
3925         tmp.closing_wait = info->closing_wait;
3926         tmp.custom_divisor = info->custom_divisor;
3927         if (copy_to_user(retinfo, &tmp, sizeof(*retinfo)))
3928                 return -EFAULT;
3929         return 0;
3930 }
3931
3932 static int
3933 set_serial_info(struct e100_serial *info,
3934                 struct serial_struct *new_info)
3935 {
3936         struct serial_struct new_serial;
3937         struct e100_serial old_info;
3938         int retval = 0;
3939
3940         if (copy_from_user(&new_serial, new_info, sizeof(new_serial)))
3941                 return -EFAULT;
3942
3943         old_info = *info;
3944
3945         if (!capable(CAP_SYS_ADMIN)) {
3946                 if ((new_serial.type != info->type) ||
3947                     (new_serial.close_delay != info->close_delay) ||
3948                     ((new_serial.flags & ~ASYNC_USR_MASK) !=
3949                      (info->flags & ~ASYNC_USR_MASK)))
3950                         return -EPERM;
3951                 info->flags = ((info->flags & ~ASYNC_USR_MASK) |
3952                                (new_serial.flags & ASYNC_USR_MASK));
3953                 goto check_and_exit;
3954         }
3955
3956         if (info->count > 1)
3957                 return -EBUSY;
3958
3959         /*
3960          * OK, past this point, all the error checking has been done.
3961          * At this point, we start making changes.....
3962          */
3963
3964         info->baud_base = new_serial.baud_base;
3965         info->flags = ((info->flags & ~ASYNC_FLAGS) |
3966                        (new_serial.flags & ASYNC_FLAGS));
3967         info->custom_divisor = new_serial.custom_divisor;
3968         info->type = new_serial.type;
3969         info->close_delay = new_serial.close_delay;
3970         info->closing_wait = new_serial.closing_wait;
3971         info->tty->low_latency = (info->flags & ASYNC_LOW_LATENCY) ? 1 : 0;
3972
3973  check_and_exit:
3974         if (info->flags & ASYNC_INITIALIZED) {
3975                 change_speed(info);
3976         } else
3977                 retval = startup(info);
3978         return retval;
3979 }
3980
3981 /*
3982  * get_lsr_info - get line status register info
3983  *
3984  * Purpose: Let user call ioctl() to get info when the UART physically
3985  *          is emptied.  On bus types like RS485, the transmitter must
3986  *          release the bus after transmitting. This must be done when
3987  *          the transmit shift register is empty, not be done when the
3988  *          transmit holding register is empty.  This functionality
3989  *          allows an RS485 driver to be written in user space.
3990  */
3991 static int
3992 get_lsr_info(struct e100_serial * info, unsigned int *value)
3993 {
3994         unsigned int result = TIOCSER_TEMT;
3995 #ifndef CONFIG_SVINTO_SIM
3996         unsigned long curr_time = jiffies;
3997         unsigned long curr_time_usec = GET_JIFFIES_USEC();
3998         unsigned long elapsed_usec =
3999                 (curr_time - info->last_tx_active) * 1000000/HZ +
4000                 curr_time_usec - info->last_tx_active_usec;
4001
4002         if (info->xmit.head != info->xmit.tail ||
4003             elapsed_usec < 2*info->char_time_usec) {
4004                 result = 0;
4005         }
4006 #endif
4007
4008         if (copy_to_user(value, &result, sizeof(int)))
4009                 return -EFAULT;
4010         return 0;
4011 }
4012
4013 #ifdef SERIAL_DEBUG_IO
4014 struct state_str
4015 {
4016         int state;
4017         const char *str;
4018 };
4019
4020 const struct state_str control_state_str[] = {
4021         {TIOCM_DTR, "DTR" },
4022         {TIOCM_RTS, "RTS"},
4023         {TIOCM_ST, "ST?" },
4024         {TIOCM_SR, "SR?" },
4025         {TIOCM_CTS, "CTS" },
4026         {TIOCM_CD, "CD" },
4027         {TIOCM_RI, "RI" },
4028         {TIOCM_DSR, "DSR" },
4029         {0, NULL }
4030 };
4031
4032 char *get_control_state_str(int MLines, char *s)
4033 {
4034         int i = 0;
4035
4036         s[0]='\0';
4037         while (control_state_str[i].str != NULL) {
4038                 if (MLines & control_state_str[i].state) {
4039                         if (s[0] != '\0') {
4040                                 strcat(s, ", ");
4041                         }
4042                         strcat(s, control_state_str[i].str);
4043                 }
4044                 i++;
4045         }
4046         return s;
4047 }
4048 #endif
4049
4050 static int
4051 get_modem_info(struct e100_serial * info, unsigned int *value)
4052 {
4053         unsigned int result;
4054         /* Polarity isn't verified */
4055 #if 0 /*def SERIAL_DEBUG_IO  */
4056
4057         printk("get_modem_info: RTS: %i DTR: %i CD: %i RI: %i DSR: %i CTS: %i\n",
4058                E100_RTS_GET(info),
4059                E100_DTR_GET(info),
4060                E100_CD_GET(info),
4061                E100_RI_GET(info),
4062                E100_DSR_GET(info),
4063                E100_CTS_GET(info));
4064 #endif
4065
4066         result =
4067                 (!E100_RTS_GET(info) ? TIOCM_RTS : 0)
4068                 | (!E100_DTR_GET(info) ? TIOCM_DTR : 0)
4069                 | (!E100_RI_GET(info) ? TIOCM_RNG : 0)
4070                 | (!E100_DSR_GET(info) ? TIOCM_DSR : 0)
4071                 | (!E100_CD_GET(info) ? TIOCM_CAR : 0)
4072                 | (!E100_CTS_GET(info) ? TIOCM_CTS : 0);
4073
4074 #ifdef SERIAL_DEBUG_IO
4075         printk("e100ser: modem state: %i 0x%08X\n", result, result);
4076         {
4077                 char s[100];
4078
4079                 get_control_state_str(result, s);
4080                 printk("state: %s\n", s);
4081         }
4082 #endif
4083         if (copy_to_user(value, &result, sizeof(int)))
4084                 return -EFAULT;
4085         return 0;
4086 }
4087
4088
4089 static int
4090 set_modem_info(struct e100_serial * info, unsigned int cmd,
4091                unsigned int *value)
4092 {
4093         unsigned int arg;
4094
4095         if (copy_from_user(&arg, value, sizeof(int)))
4096                 return -EFAULT;
4097
4098         switch (cmd) {
4099         case TIOCMBIS:
4100                 if (arg & TIOCM_RTS) {
4101                         e100_rts(info, 1);
4102                 }
4103                 if (arg & TIOCM_DTR) {
4104                         e100_dtr(info, 1);
4105                 }
4106                 /* Handle FEMALE behaviour */
4107                 if (arg & TIOCM_RI) {
4108                         e100_ri_out(info, 1);
4109                 }
4110                 if (arg & TIOCM_CD) {
4111                         e100_cd_out(info, 1);
4112                 }
4113                 break;
4114         case TIOCMBIC:
4115                 if (arg & TIOCM_RTS) {
4116                         e100_rts(info, 0);
4117                 }
4118                 if (arg & TIOCM_DTR) {
4119                         e100_dtr(info, 0);
4120                 }
4121                 /* Handle FEMALE behaviour */
4122                 if (arg & TIOCM_RI) {
4123                         e100_ri_out(info, 0);
4124                 }
4125                 if (arg & TIOCM_CD) {
4126                         e100_cd_out(info, 0);
4127                 }
4128                 break;
4129         case TIOCMSET:
4130                 e100_rts(info, arg & TIOCM_RTS);
4131                 e100_dtr(info, arg & TIOCM_DTR);
4132                 /* Handle FEMALE behaviour */
4133                 e100_ri_out(info, arg & TIOCM_RI);
4134                 e100_cd_out(info, arg & TIOCM_CD);
4135                 break;
4136         default:
4137                 return -EINVAL;
4138         }
4139         return 0;
4140 }
4141
4142
4143 static void
4144 rs_break(struct tty_struct *tty, int break_state)
4145 {
4146         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
4147         unsigned long flags;
4148
4149         if (!info->port)
4150                 return;
4151
4152         save_flags(flags);
4153         cli();
4154         if (break_state == -1) {
4155                 /* Go to manual mode and set the txd pin to 0 */
4156                 info->tx_ctrl &= 0x3F; /* Clear bit 7 (txd) and 6 (tr_enable) */
4157         } else {
4158                 info->tx_ctrl |= (0x80 | 0x40); /* Set bit 7 (txd) and 6 (tr_enable) */
4159         }
4160         info->port[REG_TR_CTRL] = info->tx_ctrl;
4161         restore_flags(flags);
4162 }
4163
4164 static int
4165 rs_ioctl(struct tty_struct *tty, struct file * file,
4166          unsigned int cmd, unsigned long arg)
4167 {
4168         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
4169
4170         if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
4171             (cmd != TIOCSERCONFIG) && (cmd != TIOCSERGWILD)  &&
4172             (cmd != TIOCSERSWILD) && (cmd != TIOCSERGSTRUCT)) {
4173                 if (tty->flags & (1 << TTY_IO_ERROR))
4174                         return -EIO;
4175         }
4176
4177         switch (cmd) {
4178                 case TIOCMGET:
4179                         return get_modem_info(info, (unsigned int *) arg);
4180                 case TIOCMBIS:
4181                 case TIOCMBIC:
4182                 case TIOCMSET:
4183                         return set_modem_info(info, cmd, (unsigned int *) arg);
4184                 case TIOCGSERIAL:
4185                         return get_serial_info(info,
4186                                                (struct serial_struct *) arg);
4187                 case TIOCSSERIAL:
4188                         return set_serial_info(info,
4189                                                (struct serial_struct *) arg);
4190                 case TIOCSERGETLSR: /* Get line status register */
4191                         return get_lsr_info(info, (unsigned int *) arg);
4192
4193                 case TIOCSERGSTRUCT:
4194                         if (copy_to_user((struct e100_serial *) arg,
4195                                          info, sizeof(struct e100_serial)))
4196                                 return -EFAULT;
4197                         return 0;
4198
4199 #if defined(CONFIG_ETRAX_RS485)
4200                 case TIOCSERSETRS485:
4201                 {
4202                         struct rs485_control rs485ctrl;
4203                         if (copy_from_user(&rs485ctrl, (struct rs485_control*)arg, sizeof(rs485ctrl)))
4204                                 return -EFAULT;
4205
4206                         return e100_enable_rs485(tty, &rs485ctrl);
4207                 }
4208
4209                 case TIOCSERWRRS485:
4210                 {
4211                         struct rs485_write rs485wr;
4212                         if (copy_from_user(&rs485wr, (struct rs485_write*)arg, sizeof(rs485wr)))
4213                                 return -EFAULT;
4214
4215                         return e100_write_rs485(tty, 1, rs485wr.outc, rs485wr.outc_size);
4216                 }
4217 #endif
4218
4219                 default:
4220                         return -ENOIOCTLCMD;
4221         }
4222         return 0;
4223 }
4224
4225 static void
4226 rs_set_termios(struct tty_struct *tty, struct termios *old_termios)
4227 {
4228         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
4229
4230         if (tty->termios->c_cflag == old_termios->c_cflag &&
4231             tty->termios->c_iflag == old_termios->c_iflag)
4232                 return;
4233
4234         change_speed(info);
4235
4236         /* Handle turning off CRTSCTS */
4237         if ((old_termios->c_cflag & CRTSCTS) &&
4238             !(tty->termios->c_cflag & CRTSCTS)) {
4239                 tty->hw_stopped = 0;
4240                 rs_start(tty);
4241         }
4242
4243 }
4244
4245 /* In debugport.c - register a console write function that uses the normal
4246  * serial driver
4247  */
4248 typedef int (*debugport_write_function)(int i, const char *buf, unsigned int len);
4249
4250 extern debugport_write_function debug_write_function;
4251
4252 static int rs_debug_write_function(int i, const char *buf, unsigned int len)
4253 {
4254         int cnt;
4255         int written = 0;
4256         struct tty_struct *tty;
4257         static int recurse_cnt = 0;
4258
4259         tty = rs_table[i].tty;
4260         if (tty)  {
4261                 unsigned long flags;
4262                 if (recurse_cnt > 5) /* We skip this debug output */
4263                         return 1;
4264
4265                 local_irq_save(flags);
4266                 recurse_cnt++;
4267                 local_irq_restore(flags);
4268                 do {
4269                         cnt = rs_write(tty, 0, buf + written, len);
4270                         if (cnt >= 0) {
4271                                 written += cnt;
4272                                 buf += cnt;
4273                                 len -= cnt;
4274                         } else
4275                                 len = cnt;
4276                 } while(len > 0);
4277                 local_irq_save(flags);
4278                 recurse_cnt--;
4279                 local_irq_restore(flags);
4280                 return 1;
4281         }
4282         return 0;
4283 }
4284
4285 /*
4286  * ------------------------------------------------------------
4287  * rs_close()
4288  *
4289  * This routine is called when the serial port gets closed.  First, we
4290  * wait for the last remaining data to be sent.  Then, we unlink its
4291  * S structure from the interrupt chain if necessary, and we free
4292  * that IRQ if nothing is left in the chain.
4293  * ------------------------------------------------------------
4294  */
4295 static void
4296 rs_close(struct tty_struct *tty, struct file * filp)
4297 {
4298         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
4299         unsigned long flags;
4300
4301         if (!info)
4302                 return;
4303
4304         /* interrupts are disabled for this entire function */
4305
4306         save_flags(flags);
4307         cli();
4308
4309         if (tty_hung_up_p(filp)) {
4310                 restore_flags(flags);
4311                 return;
4312         }
4313
4314 #ifdef SERIAL_DEBUG_OPEN
4315         printk("[%d] rs_close ttyS%d, count = %d\n", current->pid,
4316                info->line, info->count);
4317 #endif
4318         if ((tty->count == 1) && (info->count != 1)) {
4319                 /*
4320                  * Uh, oh.  tty->count is 1, which means that the tty
4321                  * structure will be freed.  Info->count should always
4322                  * be one in these conditions.  If it's greater than
4323                  * one, we've got real problems, since it means the
4324                  * serial port won't be shutdown.
4325                  */
4326                 printk(KERN_CRIT
4327                        "rs_close: bad serial port count; tty->count is 1, "
4328                        "info->count is %d\n", info->count);
4329                 info->count = 1;
4330         }
4331         if (--info->count < 0) {
4332                 printk(KERN_CRIT "rs_close: bad serial port count for ttyS%d: %d\n",
4333                        info->line, info->count);
4334                 info->count = 0;
4335         }
4336         if (info->count) {
4337                 restore_flags(flags);
4338                 return;
4339         }
4340         info->flags |= ASYNC_CLOSING;
4341         /*
4342          * Save the termios structure, since this port may have
4343          * separate termios for callout and dialin.
4344          */
4345         if (info->flags & ASYNC_NORMAL_ACTIVE)
4346                 info->normal_termios = *tty->termios;
4347         /*
4348          * Now we wait for the transmit buffer to clear; and we notify
4349          * the line discipline to only process XON/XOFF characters.
4350          */
4351         tty->closing = 1;
4352         if (info->closing_wait != ASYNC_CLOSING_WAIT_NONE)
4353                 tty_wait_until_sent(tty, info->closing_wait);
4354         /*
4355          * At this point we stop accepting input.  To do this, we
4356          * disable the serial receiver and the DMA receive interrupt.
4357          */
4358 #ifdef SERIAL_HANDLE_EARLY_ERRORS
4359         e100_disable_serial_data_irq(info);
4360 #endif
4361
4362 #ifndef CONFIG_SVINTO_SIM
4363         e100_disable_rx(info);
4364         e100_disable_rx_irq(info);
4365
4366         if (info->flags & ASYNC_INITIALIZED) {
4367                 /*
4368                  * Before we drop DTR, make sure the UART transmitter
4369                  * has completely drained; this is especially
4370                  * important as we have a transmit FIFO!
4371                  */
4372                 rs_wait_until_sent(tty, HZ);
4373         }
4374 #endif
4375
4376         shutdown(info);
4377         if (tty->driver->flush_buffer)
4378                 tty->driver->flush_buffer(tty);
4379         if (tty->ldisc.flush_buffer)
4380                 tty->ldisc.flush_buffer(tty);
4381         tty->closing = 0;
4382         info->event = 0;
4383         info->tty = 0;
4384         if (info->blocked_open) {
4385                 if (info->close_delay)
4386                         schedule_timeout_interruptible(info->close_delay);
4387                 wake_up_interruptible(&info->open_wait);
4388         }
4389         info->flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
4390         wake_up_interruptible(&info->close_wait);
4391         restore_flags(flags);
4392
4393         /* port closed */
4394
4395 #if defined(CONFIG_ETRAX_RS485)
4396         if (info->rs485.enabled) {
4397                 info->rs485.enabled = 0;
4398 #if defined(CONFIG_ETRAX_RS485_ON_PA)
4399                 *R_PORT_PA_DATA = port_pa_data_shadow &= ~(1 << rs485_pa_bit);
4400 #endif
4401 #if defined(CONFIG_ETRAX_RS485_ON_PORT_G)
4402                 REG_SHADOW_SET(R_PORT_G_DATA, port_g_data_shadow,
4403                                rs485_port_g_bit, 0);
4404 #endif
4405 #if defined(CONFIG_ETRAX_RS485_LTC1387)
4406                 REG_SHADOW_SET(R_PORT_G_DATA, port_g_data_shadow,
4407                                CONFIG_ETRAX_RS485_LTC1387_DXEN_PORT_G_BIT, 0);
4408                 REG_SHADOW_SET(R_PORT_G_DATA, port_g_data_shadow,
4409                                CONFIG_ETRAX_RS485_LTC1387_RXEN_PORT_G_BIT, 0);
4410 #endif
4411         }
4412 #endif
4413 }
4414
4415 /*
4416  * rs_wait_until_sent() --- wait until the transmitter is empty
4417  */
4418 static void rs_wait_until_sent(struct tty_struct *tty, int timeout)
4419 {
4420         unsigned long orig_jiffies;
4421         struct e100_serial *info = (struct e100_serial *)tty->driver_data;
4422         unsigned long curr_time = jiffies;
4423         unsigned long curr_time_usec = GET_JIFFIES_USEC();
4424         long elapsed_usec =
4425                 (curr_time - info->last_tx_active) * (1000000/HZ) +
4426                 curr_time_usec - info->last_tx_active_usec;
4427
4428         /*
4429          * Check R_DMA_CHx_STATUS bit 0-6=number of available bytes in FIFO
4430          * R_DMA_CHx_HWSW bit 31-16=nbr of bytes left in DMA buffer (0=64k)
4431          */
4432         orig_jiffies = jiffies;
4433         while (info->xmit.head != info->xmit.tail || /* More in send queue */
4434                (*info->ostatusadr & 0x007f) ||  /* more in FIFO */
4435                (elapsed_usec < 2*info->char_time_usec)) {
4436                 schedule_timeout_interruptible(1);
4437                 if (signal_pending(current))
4438                         break;
4439                 if (timeout && time_after(jiffies, orig_jiffies + timeout))
4440                         break;
4441                 curr_time = jiffies;
4442                 curr_time_usec = GET_JIFFIES_USEC();
4443                 elapsed_usec =
4444                         (curr_time - info->last_tx_active) * (1000000/HZ) +
4445                         curr_time_usec - info->last_tx_active_usec;
4446         }
4447         set_current_state(TASK_RUNNING);
4448 }
4449
4450 /*
4451  * rs_hangup() --- called by tty_hangup() when a hangup is signaled.
4452  */
4453 void
4454 rs_hangup(struct tty_struct *tty)
4455 {
4456         struct e100_serial * info = (struct e100_serial *)tty->driver_data;
4457
4458         rs_flush_buffer(tty);
4459         shutdown(info);
4460         info->event = 0;
4461         info->count = 0;
4462         info->flags &= ~ASYNC_NORMAL_ACTIVE;
4463         info->tty = 0;
4464         wake_up_interruptible(&info->open_wait);
4465 }
4466
4467 /*
4468  * ------------------------------------------------------------
4469  * rs_open() and friends
4470  * ------------------------------------------------------------
4471  */
4472 static int
4473 block_til_ready(struct tty_struct *tty, struct file * filp,
4474                 struct e100_serial *info)
4475 {
4476         DECLARE_WAITQUEUE(wait, current);
4477         unsigned long   flags;
4478         int             retval;
4479         int             do_clocal = 0, extra_count = 0;
4480
4481         /*
4482          * If the device is in the middle of being closed, then block
4483          * until it's done, and then try again.
4484          */
4485         if (tty_hung_up_p(filp) ||
4486             (info->flags & ASYNC_CLOSING)) {
4487                 if (info->flags & ASYNC_CLOSING)
4488                         interruptible_sleep_on(&info->close_wait);
4489 #ifdef SERIAL_DO_RESTART
4490                 if (info->flags & ASYNC_HUP_NOTIFY)
4491                         return -EAGAIN;
4492                 else
4493                         return -ERESTARTSYS;
4494 #else
4495                 return -EAGAIN;
4496 #endif
4497         }
4498
4499         /*
4500          * If non-blocking mode is set, or the port is not enabled,
4501          * then make the check up front and then exit.
4502          */
4503         if ((filp->f_flags & O_NONBLOCK) ||
4504             (tty->flags & (1 << TTY_IO_ERROR))) {
4505                 info->flags |= ASYNC_NORMAL_ACTIVE;
4506                 return 0;
4507         }
4508
4509         if (tty->termios->c_cflag & CLOCAL) {
4510                         do_clocal = 1;
4511         }
4512
4513         /*
4514          * Block waiting for the carrier detect and the line to become
4515          * free (i.e., not in use by the callout).  While we are in
4516          * this loop, info->count is dropped by one, so that
4517          * rs_close() knows when to free things.  We restore it upon
4518          * exit, either normal or abnormal.
4519          */
4520         retval = 0;
4521         add_wait_queue(&info->open_wait, &wait);
4522 #ifdef SERIAL_DEBUG_OPEN
4523         printk("block_til_ready before block: ttyS%d, count = %d\n",
4524                info->line, info->count);
4525 #endif
4526         save_flags(flags);
4527         cli();
4528         if (!tty_hung_up_p(filp)) {
4529                 extra_count++;
4530                 info->count--;
4531         }
4532         restore_flags(flags);
4533         info->blocked_open++;
4534         while (1) {
4535                 save_flags(flags);
4536                 cli();
4537                 /* assert RTS and DTR */
4538                 e100_rts(info, 1);
4539                 e100_dtr(info, 1);
4540                 restore_flags(flags);
4541                 set_current_state(TASK_INTERRUPTIBLE);
4542                 if (tty_hung_up_p(filp) ||
4543                     !(info->flags & ASYNC_INITIALIZED)) {
4544 #ifdef SERIAL_DO_RESTART
4545                         if (info->flags & ASYNC_HUP_NOTIFY)
4546                                 retval = -EAGAIN;
4547                         else
4548                                 retval = -ERESTARTSYS;
4549 #else
4550                         retval = -EAGAIN;
4551 #endif
4552                         break;
4553                 }
4554                 if (!(info->flags & ASYNC_CLOSING) && do_clocal)
4555                         /* && (do_clocal || DCD_IS_ASSERTED) */
4556                         break;
4557                 if (signal_pending(current)) {
4558                         retval = -ERESTARTSYS;
4559                         break;
4560                 }
4561 #ifdef SERIAL_DEBUG_OPEN
4562                 printk("block_til_ready blocking: ttyS%d, count = %d\n",
4563                        info->line, info->count);
4564 #endif
4565                 schedule();
4566         }
4567         set_current_state(TASK_RUNNING);
4568         remove_wait_queue(&info->open_wait, &wait);
4569         if (extra_count)
4570                 info->count++;
4571         info->blocked_open--;
4572 #ifdef SERIAL_DEBUG_OPEN
4573         printk("block_til_ready after blocking: ttyS%d, count = %d\n",
4574                info->line, info->count);
4575 #endif
4576         if (retval)
4577                 return retval;
4578         info->flags |= ASYNC_NORMAL_ACTIVE;
4579         return 0;
4580 }
4581
4582 /*
4583  * This routine is called whenever a serial port is opened.
4584  * It performs the serial-specific initialization for the tty structure.
4585  */
4586 static int
4587 rs_open(struct tty_struct *tty, struct file * filp)
4588 {
4589         struct e100_serial      *info;
4590         int                     retval, line;
4591         unsigned long           page;
4592
4593         /* find which port we want to open */
4594
4595         line = tty->index;
4596
4597         if (line < 0 || line >= NR_PORTS)
4598                 return -ENODEV;
4599
4600         /* find the corresponding e100_serial struct in the table */
4601         info = rs_table + line;
4602
4603         /* don't allow the opening of ports that are not enabled in the HW config */
4604         if (!info->enabled)
4605                 return -ENODEV;
4606
4607 #ifdef SERIAL_DEBUG_OPEN
4608         printk("[%d] rs_open %s, count = %d\n", current->pid, tty->name,
4609                info->count);
4610 #endif
4611
4612         info->count++;
4613         tty->driver_data = info;
4614         info->tty = tty;
4615
4616         info->tty->low_latency = (info->flags & ASYNC_LOW_LATENCY) ? 1 : 0;
4617
4618         if (!tmp_buf) {
4619                 page = get_zeroed_page(GFP_KERNEL);
4620                 if (!page) {
4621                         return -ENOMEM;
4622                 }
4623                 if (tmp_buf)
4624                         free_page(page);
4625                 else
4626                         tmp_buf = (unsigned char *) page;
4627         }
4628
4629         /*
4630          * If the port is in the middle of closing, bail out now
4631          */
4632         if (tty_hung_up_p(filp) ||
4633             (info->flags & ASYNC_CLOSING)) {
4634                 if (info->flags & ASYNC_CLOSING)
4635                         interruptible_sleep_on(&info->close_wait);
4636 #ifdef SERIAL_DO_RESTART
4637                 return ((info->flags & ASYNC_HUP_NOTIFY) ?
4638                         -EAGAIN : -ERESTARTSYS);
4639 #else
4640                 return -EAGAIN;
4641 #endif
4642         }
4643
4644         /*
4645          * Start up the serial port
4646          */
4647
4648         retval = startup(info);
4649         if (retval)
4650                 return retval;
4651
4652         retval = block_til_ready(tty, filp, info);
4653         if (retval) {
4654 #ifdef SERIAL_DEBUG_OPEN
4655                 printk("rs_open returning after block_til_ready with %d\n",
4656                        retval);
4657 #endif
4658                 return retval;
4659         }
4660
4661         if ((info->count == 1) && (info->flags & ASYNC_SPLIT_TERMIOS)) {
4662                 *tty->termios = info->normal_termios;
4663                 change_speed(info);
4664         }
4665
4666 #ifdef SERIAL_DEBUG_OPEN
4667         printk("rs_open ttyS%d successful...\n", info->line);
4668 #endif
4669         DLOG_INT_TRIG( log_int_pos = 0);
4670
4671         DFLIP(  if (info->line == SERIAL_DEBUG_LINE) {
4672                         info->icount.rx = 0;
4673                 } );
4674
4675         return 0;
4676 }
4677
4678 /*
4679  * /proc fs routines....
4680  */
4681
4682 static int line_info(char *buf, struct e100_serial *info)
4683 {
4684         char    stat_buf[30];
4685         int     ret;
4686         unsigned long tmp;
4687
4688         ret = sprintf(buf, "%d: uart:E100 port:%lX irq:%d",
4689                       info->line, (unsigned long)info->port, info->irq);
4690
4691         if (!info->port || (info->type == PORT_UNKNOWN)) {
4692                 ret += sprintf(buf+ret, "\n");
4693                 return ret;
4694         }
4695
4696         stat_buf[0] = 0;
4697         stat_buf[1] = 0;
4698         if (!E100_RTS_GET(info))
4699                 strcat(stat_buf, "|RTS");
4700         if (!E100_CTS_GET(info))
4701                 strcat(stat_buf, "|CTS");
4702         if (!E100_DTR_GET(info))
4703                 strcat(stat_buf, "|DTR");
4704         if (!E100_DSR_GET(info))
4705                 strcat(stat_buf, "|DSR");
4706         if (!E100_CD_GET(info))
4707                 strcat(stat_buf, "|CD");
4708         if (!E100_RI_GET(info))
4709                 strcat(stat_buf, "|RI");
4710
4711         ret += sprintf(buf+ret, " baud:%d", info->baud);
4712
4713         ret += sprintf(buf+ret, " tx:%lu rx:%lu",
4714                        (unsigned long)info->icount.tx,
4715                        (unsigned long)info->icount.rx);
4716         tmp = CIRC_CNT(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
4717         if (tmp) {
4718                 ret += sprintf(buf+ret, " tx_pend:%lu/%lu",
4719                                (unsigned long)tmp,
4720                                (unsigned long)SERIAL_XMIT_SIZE);
4721         }
4722
4723         ret += sprintf(buf+ret, " rx_pend:%lu/%lu",
4724                        (unsigned long)info->recv_cnt,
4725                        (unsigned long)info->max_recv_cnt);
4726
4727 #if 1
4728         if (info->tty) {
4729
4730                 if (info->tty->stopped)
4731                         ret += sprintf(buf+ret, " stopped:%i",
4732                                        (int)info->tty->stopped);
4733                 if (info->tty->hw_stopped)
4734                         ret += sprintf(buf+ret, " hw_stopped:%i",
4735                                        (int)info->tty->hw_stopped);
4736         }
4737
4738         {
4739                 unsigned char rstat = info->port[REG_STATUS];
4740                 if (rstat & IO_MASK(R_SERIAL0_STATUS, xoff_detect) )
4741                         ret += sprintf(buf+ret, " xoff_detect:1");
4742         }
4743
4744 #endif
4745
4746
4747
4748
4749         if (info->icount.frame)
4750                 ret += sprintf(buf+ret, " fe:%lu",
4751                                (unsigned long)info->icount.frame);
4752
4753         if (info->icount.parity)
4754                 ret += sprintf(buf+ret, " pe:%lu",
4755                                (unsigned long)info->icount.parity);
4756
4757         if (info->icount.brk)
4758                 ret += sprintf(buf+ret, " brk:%lu",
4759                                (unsigned long)info->icount.brk);
4760
4761         if (info->icount.overrun)
4762                 ret += sprintf(buf+ret, " oe:%lu",
4763                                (unsigned long)info->icount.overrun);
4764
4765         /*
4766          * Last thing is the RS-232 status lines
4767          */
4768         ret += sprintf(buf+ret, " %s\n", stat_buf+1);
4769         return ret;
4770 }
4771
4772 int rs_read_proc(char *page, char **start, off_t off, int count,
4773                  int *eof, void *data)
4774 {
4775         int i, len = 0, l;
4776         off_t   begin = 0;
4777
4778         len += sprintf(page, "serinfo:1.0 driver:%s\n",
4779                        serial_version);
4780         for (i = 0; i < NR_PORTS && len < 4000; i++) {
4781                 if (!rs_table[i].enabled)
4782                         continue;
4783                 l = line_info(page + len, &rs_table[i]);
4784                 len += l;
4785                 if (len+begin > off+count)
4786                         goto done;
4787                 if (len+begin < off) {
4788                         begin += len;
4789                         len = 0;
4790                 }
4791         }
4792 #ifdef DEBUG_LOG_INCLUDED
4793         for (i = 0; i < debug_log_pos; i++) {
4794                 len += sprintf(page + len, "%-4i %lu.%lu ", i, debug_log[i].time, timer_data_to_ns(debug_log[i].timer_data));
4795                 len += sprintf(page + len, debug_log[i].string, debug_log[i].value);
4796                 if (len+begin > off+count)
4797                         goto done;
4798                 if (len+begin < off) {
4799                         begin += len;
4800                         len = 0;
4801                 }
4802         }
4803         len += sprintf(page + len, "debug_log %i/%i  %li bytes\n",
4804                        i, DEBUG_LOG_SIZE, begin+len);
4805         debug_log_pos = 0;
4806 #endif
4807
4808         *eof = 1;
4809 done:
4810         if (off >= len+begin)
4811                 return 0;
4812         *start = page + (off-begin);
4813         return ((count < begin+len-off) ? count : begin+len-off);
4814 }
4815
4816 /* Finally, routines used to initialize the serial driver. */
4817
4818 static void
4819 show_serial_version(void)
4820 {
4821         printk(KERN_INFO
4822                "ETRAX 100LX serial-driver %s, (c) 2000-2004 Axis Communications AB\r\n",
4823                &serial_version[11]); /* "$Revision: x.yy" */
4824 }
4825
4826 /* rs_init inits the driver at boot (using the module_init chain) */
4827
4828 static struct tty_operations rs_ops = {
4829         .open = rs_open,
4830         .close = rs_close,
4831         .write = rs_write,
4832         .flush_chars = rs_flush_chars,
4833         .write_room = rs_write_room,
4834         .chars_in_buffer = rs_chars_in_buffer,
4835         .flush_buffer = rs_flush_buffer,
4836         .ioctl = rs_ioctl,
4837         .throttle = rs_throttle,
4838         .unthrottle = rs_unthrottle,
4839         .set_termios = rs_set_termios,
4840         .stop = rs_stop,
4841         .start = rs_start,
4842         .hangup = rs_hangup,
4843         .break_ctl = rs_break,
4844         .send_xchar = rs_send_xchar,
4845         .wait_until_sent = rs_wait_until_sent,
4846         .read_proc = rs_read_proc,
4847 };
4848
4849 static int __init
4850 rs_init(void)
4851 {
4852         int i;
4853         struct e100_serial *info;
4854         struct tty_driver *driver = alloc_tty_driver(NR_PORTS);
4855
4856         if (!driver)
4857                 return -ENOMEM;
4858
4859         show_serial_version();
4860
4861         /* Setup the timed flush handler system */
4862
4863 #if !defined(CONFIG_ETRAX_SERIAL_FAST_TIMER)
4864         init_timer(&flush_timer);
4865         flush_timer.function = timed_flush_handler;
4866         mod_timer(&flush_timer, jiffies + CONFIG_ETRAX_SERIAL_RX_TIMEOUT_TICKS);
4867 #endif
4868
4869         /* Initialize the tty_driver structure */
4870
4871         driver->driver_name = "serial";
4872         driver->name = "ttyS";
4873         driver->major = TTY_MAJOR;
4874         driver->minor_start = 64;
4875         driver->type = TTY_DRIVER_TYPE_SERIAL;
4876         driver->subtype = SERIAL_TYPE_NORMAL;
4877         driver->init_termios = tty_std_termios;
4878         driver->init_termios.c_cflag =
4879                 B115200 | CS8 | CREAD | HUPCL | CLOCAL; /* is normally B9600 default... */
4880         driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
4881         driver->termios = serial_termios;
4882         driver->termios_locked = serial_termios_locked;
4883
4884         tty_set_operations(driver, &rs_ops);
4885         serial_driver = driver;
4886         if (tty_register_driver(driver))
4887                 panic("Couldn't register serial driver\n");
4888         /* do some initializing for the separate ports */
4889
4890         for (i = 0, info = rs_table; i < NR_PORTS; i++,info++) {
4891                 info->uses_dma_in = 0;
4892                 info->uses_dma_out = 0;
4893                 info->line = i;
4894                 info->tty = 0;
4895                 info->type = PORT_ETRAX;
4896                 info->tr_running = 0;
4897                 info->forced_eop = 0;
4898                 info->baud_base = DEF_BAUD_BASE;
4899                 info->custom_divisor = 0;
4900                 info->flags = 0;
4901                 info->close_delay = 5*HZ/10;
4902                 info->closing_wait = 30*HZ;
4903                 info->x_char = 0;
4904                 info->event = 0;
4905                 info->count = 0;
4906                 info->blocked_open = 0;
4907                 info->normal_termios = driver->init_termios;
4908                 init_waitqueue_head(&info->open_wait);
4909                 init_waitqueue_head(&info->close_wait);
4910                 info->xmit.buf = NULL;
4911                 info->xmit.tail = info->xmit.head = 0;
4912                 info->first_recv_buffer = info->last_recv_buffer = NULL;
4913                 info->recv_cnt = info->max_recv_cnt = 0;
4914                 info->last_tx_active_usec = 0;
4915                 info->last_tx_active = 0;
4916
4917 #if defined(CONFIG_ETRAX_RS485)
4918                 /* Set sane defaults */
4919                 info->rs485.rts_on_send = 0;
4920                 info->rs485.rts_after_sent = 1;
4921                 info->rs485.delay_rts_before_send = 0;
4922                 info->rs485.enabled = 0;
4923 #endif
4924                 INIT_WORK(&info->work, do_softint, info);
4925
4926                 if (info->enabled) {
4927                         printk(KERN_INFO "%s%d at 0x%x is a builtin UART with DMA\n",
4928                                serial_driver->name, info->line, (unsigned int)info->port);
4929                 }
4930         }
4931 #ifdef CONFIG_ETRAX_FAST_TIMER
4932 #ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
4933         memset(fast_timers, 0, sizeof(fast_timers));
4934 #endif
4935 #ifdef CONFIG_ETRAX_RS485
4936         memset(fast_timers_rs485, 0, sizeof(fast_timers_rs485));
4937 #endif
4938         fast_timer_init();
4939 #endif
4940
4941 #ifndef CONFIG_SVINTO_SIM
4942         /* Not needed in simulator.  May only complicate stuff. */
4943         /* hook the irq's for DMA channel 6 and 7, serial output and input, and some more... */
4944
4945         if (request_irq(SERIAL_IRQ_NBR, ser_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial ", NULL))
4946                 panic("irq8");
4947
4948 #ifdef CONFIG_ETRAX_SERIAL_PORT0
4949 #ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA6_OUT
4950         if (request_irq(SER0_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_DISABLED, "serial 0 dma tr", NULL))
4951                 panic("irq22");
4952 #endif
4953 #ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA7_IN
4954         if (request_irq(SER0_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_DISABLED, "serial 0 dma rec", NULL))
4955                 panic("irq23");
4956 #endif
4957 #endif
4958
4959 #ifdef CONFIG_ETRAX_SERIAL_PORT1
4960 #ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA8_OUT
4961         if (request_irq(SER1_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_DISABLED, "serial 1 dma tr", NULL))
4962                 panic("irq24");
4963 #endif
4964 #ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA9_IN
4965         if (request_irq(SER1_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_DISABLED, "serial 1 dma rec", NULL))
4966                 panic("irq25");
4967 #endif
4968 #endif
4969 #ifdef CONFIG_ETRAX_SERIAL_PORT2
4970         /* DMA Shared with par0 (and SCSI0 and ATA) */
4971 #ifdef CONFIG_ETRAX_SERIAL_PORT2_DMA2_OUT
4972         if (request_irq(SER2_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 2 dma tr", NULL))
4973                 panic("irq18");
4974 #endif
4975 #ifdef CONFIG_ETRAX_SERIAL_PORT2_DMA3_IN
4976         if (request_irq(SER2_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 2 dma rec", NULL))
4977                 panic("irq19");
4978 #endif
4979 #endif
4980 #ifdef CONFIG_ETRAX_SERIAL_PORT3
4981         /* DMA Shared with par1 (and SCSI1 and Extern DMA 0) */
4982 #ifdef CONFIG_ETRAX_SERIAL_PORT3_DMA4_OUT
4983         if (request_irq(SER3_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 3 dma tr", NULL))
4984                 panic("irq20");
4985 #endif
4986 #ifdef CONFIG_ETRAX_SERIAL_PORT3_DMA5_IN
4987         if (request_irq(SER3_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 3 dma rec", NULL))
4988                 panic("irq21");
4989 #endif
4990 #endif
4991
4992 #ifdef CONFIG_ETRAX_SERIAL_FLUSH_DMA_FAST
4993         if (request_irq(TIMER1_IRQ_NBR, timeout_interrupt, IRQF_SHARED | IRQF_DISABLED,
4994                        "fast serial dma timeout", NULL)) {
4995                 printk(KERN_CRIT "err: timer1 irq\n");
4996         }
4997 #endif
4998 #endif /* CONFIG_SVINTO_SIM */
4999         debug_write_function = rs_debug_write_function;
5000         return 0;
5001 }
5002
5003 /* this makes sure that rs_init is called during kernel boot */
5004
5005 module_init(rs_init);