blob: 9851d9eff022a6e655db1011fa1f93cbd8cd03b4 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/* $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!
Thomas Gleixner40663cc2006-07-01 19:29:43 -0700418 * Use IRQF_SHARED when request_irq() for ser2 and ser3 (shared with) par0 and par1.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700419 * 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
426static char *serial_version = "$Revision: 1.25 $";
427
Linus Torvalds1da177e2005-04-16 15:20:36 -0700428#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>
Arjan van de Venf392ecf2006-01-12 18:44:32 +0000444#include <linux/mutex.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700445
446#include <asm/io.h>
447#include <asm/irq.h>
448#include <asm/system.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700449#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
Linus Torvalds1da177e2005-04-16 15:20:36 -0700483struct 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
543struct 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
553struct debug_log_info debug_log[DEBUG_LOG_SIZE];
554int 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
562void 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
584unsigned long timer_data_to_ns(unsigned long timer_data);
585
586static void change_speed(struct e100_serial *info);
587static void rs_throttle(struct tty_struct * tty);
588static void rs_wait_until_sent(struct tty_struct *tty, int timeout);
589static int rs_write(struct tty_struct * tty, int from_user,
590 const unsigned char *buf, int count);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700591#ifdef CONFIG_ETRAX_RS485
592static int e100_write_rs485(struct tty_struct * tty, int from_user,
593 const unsigned char *buf, int count);
594#endif
595static 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. */
644static 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;
658unsigned 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
664static 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
807static struct termios *serial_termios[NR_PORTS];
808static struct termios *serial_termios_locked[NR_PORTS];
809#ifdef CONFIG_ETRAX_SERIAL_FAST_TIMER
810static struct fast_timer fast_timers[NR_PORTS];
811#endif
812
813#ifdef CONFIG_ETRAX_SERIAL_PROC_ENTRY
814#define PROCSTAT(x) x
815struct 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
829static 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
840static struct fast_timer fast_timers_rs485[NR_PORTS];
841#endif
842#if defined(CONFIG_ETRAX_RS485_ON_PA)
843static int rs485_pa_bit = CONFIG_ETRAX_RS485_ON_PA_BIT;
844#endif
845#if defined(CONFIG_ETRAX_RS485_ON_PORT_G)
846static 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
872static 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
1110struct 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
1127static 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
1201struct 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
1221static 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 */
1313static unsigned char *tmp_buf;
Arjan van de Venf392ecf2006-01-12 18:44:32 +00001314static DEFINE_MUTEX(tmp_buf_mutex);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001315
1316/* Calculate the chartime depending on baudrate, numbor of bits etc. */
1317static 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
1348static int
1349cflag_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
1367static unsigned char
1368cflag_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
1401static inline void
1402e100_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 */
1436static inline void
1437e100_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 */
1455static inline void
1456e100_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}
1473static inline void
1474e100_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
1492static inline void
1493e100_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
1502static inline void
1503e100_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
1514static inline void
1515e100_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
1524static inline void
1525e100_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001536static void e100_disable_txdma_irq(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001537{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001545static void e100_enable_txdma_irq(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001546{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001554static void e100_disable_txdma_channel(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001555{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001594static void e100_enable_txdma_channel(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001595{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001619static void e100_disable_rxdma_channel(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001620{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001658static void e100_enable_rxdma_channel(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001659{
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
1686static inline void
1687e100_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
1696static inline void
1697e100_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
1710static inline void
1711e100_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
1720static inline void
1721e100_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
1733static 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}
1740static 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. */
1750static int
1751e100_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
1785static int
1786e100_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 */
1806static 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
1829static void
1830rs_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
1853static void
1854rs_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 */
Adrian Bunk41c28ff2006-03-23 03:00:56 -08001905static void rs_sched_event(struct e100_serial *info, int event)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001906{
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
1924static void
1925transmit_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
2032static void
2033start_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
2051static int serial_fast_timer_started = 0;
2052static int serial_fast_timer_expired = 0;
2053static 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
2080static struct etrax_recv_buffer *
2081alloc_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
2095static void
2096append_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
2117static int
2118add_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002145static unsigned int handle_descr_data(struct e100_serial *info,
2146 struct etrax_dma_descr *descr,
2147 unsigned int recvl)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002148{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002173static unsigned int handle_all_descr_data(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002174{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002220static void receive_chars_dma(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002221{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002281static int start_recv_dma(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002282{
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
2314static void
2315start_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
Linus Torvalds1da177e2005-04-16 15:20:36 -07002336/* 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
2348static irqreturn_t
2349tr_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
2397static irqreturn_t
2398rec_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002437static int force_eop_if_needed(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002438{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002481static void flush_to_flip_buffer(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002482{
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) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07002575 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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002586static void check_flush_timeout(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002587{
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
2604static 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
2622static struct timer_list flush_timer;
2623
2624static void
2625timed_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/*
2655BREAK handling on ETRAX 100:
2656ETRAX will generate interrupt although there is no stop bit between the
2657characters.
2658
2659Depending on how long the break sequence is, the end of the breaksequence
2660will look differently:
2661| indicates start/end of a character.
2662
2663B= Break character (0x00) with framing error.
2664E= Error byte with parity error received after B characters.
2665F= "Faked" valid byte received immediately after B characters.
2666V= Valid byte
2667
26681.
2669 B BL ___________________________ V
2670.._|__________|__________| |valid data |
2671
2672Multiple frame errors with data == 0x00 (B),
2673the timing matches up "perfectly" so no extra ending char is detected.
2674The RXD pin is 1 in the last interrupt, in that case
2675we set info->errorcode = ERRCODE_INSERT_BREAK, but we can't really
2676know if another byte will come and this really is case 2. below
2677(e.g F=0xFF or 0xFE)
2678If RXD pin is 0 we can expect another character (see 2. below).
2679
2680
26812.
2682
2683 B B E or F__________________..__ V
2684.._|__________|__________|______ | |valid data
2685 "valid" or
2686 parity error
2687
2688Multiple frame errors with data == 0x00 (B),
2689but the part of the break trigs is interpreted as a start bit (and possibly
2690some 0 bits followed by a number of 1 bits and a stop bit).
2691Depending on parity settings etc. this last character can be either
2692a fake "valid" char (F) or have a parity error (E).
2693
2694If the character is valid it will be put in the buffer,
2695we set info->errorcode = ERRCODE_SET_BREAK so the receive interrupt
2696will set the flags so the tty will handle it,
2697if it's an error byte it will not be put in the buffer
2698and we set info->errorcode = ERRCODE_INSERT_BREAK.
2699
2700To distinguish a V byte in 1. from an F byte in 2. we keep a timestamp
2701of the last faulty char (B) and compares it with the current time:
2702If the time elapsed time is less then 2*char_time_usec we will assume
2703it's a faked F char and not a Valid char and set
2704info->errorcode = ERRCODE_SET_BREAK.
2705
2706Flaws in the above solution:
2707~~~~~~~~~~~~~~~~~~~~~~~~~~~~
2708We use the timer to distinguish a F character from a V character,
2709if a V character is to close after the break we might make the wrong decision.
2710
2711TODO: The break will be delayed until an F or V character is received.
2712
2713*/
2714
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002715static
Linus Torvalds1da177e2005-04-16 15:20:36 -07002716struct 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]);
2742more_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002849static struct e100_serial* handle_ser_rx_interrupt(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002850{
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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08002968static void handle_ser_tx_interrupt(struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07002969{
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 */
3056static irqreturn_t
3057ser_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 */
3166static void
3167do_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
3184static int
3185startup(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 */
3335static void
3336shutdown(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
3409static void
3410change_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
3569static void
3570rs_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08003594static int rs_raw_write(struct tty_struct * tty, int from_user,
3595 const unsigned char *buf, int count)
Linus Torvalds1da177e2005-04-16 15:20:36 -07003596{
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) {
Arjan van de Venf392ecf2006-01-12 18:44:32 +00003630 mutex_lock(&tmp_buf_mutex);
Linus Torvalds1da177e2005-04-16 15:20:36 -07003631 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 }
Arjan van de Venf392ecf2006-01-12 18:44:32 +00003661 mutex_unlock(&tmp_buf_mutex);
Linus Torvalds1da177e2005-04-16 15:20:36 -07003662 } 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
3700static int
3701rs_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
3767static int
3768rs_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
3780static int
3781rs_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
3790static void
3791rs_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 */
3817static 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 */
3849static void
3850rs_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
3871static void
3872rs_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
3904static int
3905get_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
3932static int
3933set_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 */
3991static int
3992get_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
4014struct state_str
4015{
4016 int state;
4017 const char *str;
4018};
4019
4020const 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
4032char *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
4050static int
4051get_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
4089static int
4090set_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
4143static void
4144rs_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
4164static int
4165rs_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
4225static void
4226rs_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 */
4248typedef int (*debugport_write_function)(int i, const char *buf, unsigned int len);
4249
4250extern debugport_write_function debug_write_function;
4251
4252static 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 */
4295static void
4296rs_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) {
Nishanth Aravamudan3c76bc52005-11-07 01:01:21 -08004385 if (info->close_delay)
4386 schedule_timeout_interruptible(info->close_delay);
Linus Torvalds1da177e2005-04-16 15:20:36 -07004387 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 */
4418static 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)) {
Nishanth Aravamudan3c76bc52005-11-07 01:01:21 -08004436 schedule_timeout_interruptible(1);
Linus Torvalds1da177e2005-04-16 15:20:36 -07004437 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 */
4453void
4454rs_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 */
4472static int
4473block_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 */
4586static int
4587rs_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
Adrian Bunk41c28ff2006-03-23 03:00:56 -08004682static int line_info(char *buf, struct e100_serial *info)
Linus Torvalds1da177e2005-04-16 15:20:36 -07004683{
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
4772int 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;
4809done:
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
4818static void
4819show_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
Jeff Dikeb68e31d2006-10-02 02:17:18 -07004828static const struct tty_operations rs_ops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -07004829 .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
4849static int __init
4850rs_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... */
Greg Kroah-Hartman331b8312005-06-20 21:15:16 -07004880 driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
Linus Torvalds1da177e2005-04-16 15:20:36 -07004881 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
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004945 if (request_irq(SERIAL_IRQ_NBR, ser_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial ", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004946 panic("irq8");
4947
4948#ifdef CONFIG_ETRAX_SERIAL_PORT0
4949#ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA6_OUT
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004950 if (request_irq(SER0_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_DISABLED, "serial 0 dma tr", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004951 panic("irq22");
4952#endif
4953#ifdef CONFIG_ETRAX_SERIAL_PORT0_DMA7_IN
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004954 if (request_irq(SER0_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_DISABLED, "serial 0 dma rec", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004955 panic("irq23");
4956#endif
4957#endif
4958
4959#ifdef CONFIG_ETRAX_SERIAL_PORT1
4960#ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA8_OUT
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004961 if (request_irq(SER1_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_DISABLED, "serial 1 dma tr", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004962 panic("irq24");
4963#endif
4964#ifdef CONFIG_ETRAX_SERIAL_PORT1_DMA9_IN
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004965 if (request_irq(SER1_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_DISABLED, "serial 1 dma rec", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004966 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
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004972 if (request_irq(SER2_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 2 dma tr", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004973 panic("irq18");
4974#endif
4975#ifdef CONFIG_ETRAX_SERIAL_PORT2_DMA3_IN
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004976 if (request_irq(SER2_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 2 dma rec", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004977 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
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004983 if (request_irq(SER3_DMA_TX_IRQ_NBR, tr_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 3 dma tr", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004984 panic("irq20");
4985#endif
4986#ifdef CONFIG_ETRAX_SERIAL_PORT3_DMA5_IN
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004987 if (request_irq(SER3_DMA_RX_IRQ_NBR, rec_interrupt, IRQF_SHARED | IRQF_DISABLED, "serial 3 dma rec", NULL))
Linus Torvalds1da177e2005-04-16 15:20:36 -07004988 panic("irq21");
4989#endif
4990#endif
4991
4992#ifdef CONFIG_ETRAX_SERIAL_FLUSH_DMA_FAST
Thomas Gleixner40663cc2006-07-01 19:29:43 -07004993 if (request_irq(TIMER1_IRQ_NBR, timeout_interrupt, IRQF_SHARED | IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -07004994 "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
5005module_init(rs_init);