?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
[PATCH] Small update to CREDITS
[pv_ops_mirror.git] / drivers / char / specialix.c
bloba1d303f9a33dd30fa2260b82cacf4fdf1fa78308
1 /*
2 * specialix.c -- specialix IO8+ multiport serial driver.
3 *
4 * Copyright (C) 1997 Roger Wolff (R.E.Wolff@BitWizard.nl)
5 * Copyright (C) 1994-1996 Dmitry Gorodchanin (pgmdsg@ibi.com)
6 *
7 * Specialix pays for the development and support of this driver.
8 * Please DO contact io8-linux@specialix.co.uk if you require
9 * support. But please read the documentation (specialix.txt)
10 * first.
11 *
12 * This driver was developped in the BitWizard linux device
13 * driver service. If you require a linux device driver for your
14 * product, please contact devices@BitWizard.nl for a quote.
15 *
16 * This code is firmly based on the riscom/8 serial driver,
17 * written by Dmitry Gorodchanin. The specialix IO8+ card
18 * programming information was obtained from the CL-CD1865 Data
19 * Book, and Specialix document number 6200059: IO8+ Hardware
20 * Functional Specification.
21 *
22 * This program is free software; you can redistribute it and/or
23 * modify it under the terms of the GNU General Public License as
24 * published by the Free Software Foundation; either version 2 of
25 * the License, or (at your option) any later version.
26 *
27 * This program is distributed in the hope that it will be
28 * useful, but WITHOUT ANY WARRANTY; without even the implied
29 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
30 * PURPOSE. See the GNU General Public License for more details.
31 *
32 * You should have received a copy of the GNU General Public
33 * License along with this program; if not, write to the Free
34 * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139,
35 * USA.
36 *
37 * Revision history:
38 *
39 * Revision 1.0: April 1st 1997.
40 * Initial release for alpha testing.
41 * Revision 1.1: April 14th 1997.
42 * Incorporated Richard Hudsons suggestions,
43 * removed some debugging printk's.
44 * Revision 1.2: April 15th 1997.
45 * Ported to 2.1.x kernels.
46 * Revision 1.3: April 17th 1997
47 * Backported to 2.0. (Compatibility macros).
48 * Revision 1.4: April 18th 1997
49 * Fixed DTR/RTS bug that caused the card to indicate
50 * "don't send data" to a modem after the password prompt.
51 * Fixed bug for premature (fake) interrupts.
52 * Revision 1.5: April 19th 1997
53 * fixed a minor typo in the header file, cleanup a little.
54 * performance warnings are now MAXed at once per minute.
55 * Revision 1.6: May 23 1997
56 * Changed the specialix=... format to include interrupt.
57 * Revision 1.7: May 27 1997
58 * Made many more debug printk's a compile time option.
59 * Revision 1.8: Jul 1 1997
60 * port to linux-2.1.43 kernel.
61 * Revision 1.9: Oct 9 1998
62 * Added stuff for the IO8+/PCI version.
63 * Revision 1.10: Oct 22 1999 / Jan 21 2000.
64 * Added stuff for setserial.
65 * Nicolas Mailhot (Nicolas.Mailhot@email.enst.fr)
66 *
67 */
68
69 #define VERSION "1.11"
70
71
72 /*
73 * There is a bunch of documentation about the card, jumpers, config
74 * settings, restrictions, cables, device names and numbers in
75 * Documentation/specialix.txt
76 */
77
78 #include <linux/module.h>
79
80 #include <asm/io.h>
81 #include <linux/kernel.h>
82 #include <linux/sched.h>
83 #include <linux/ioport.h>
84 #include <linux/interrupt.h>
85 #include <linux/errno.h>
86 #include <linux/tty.h>
87 #include <linux/tty_flip.h>
88 #include <linux/mm.h>
89 #include <linux/serial.h>
90 #include <linux/fcntl.h>
91 #include <linux/major.h>
92 #include <linux/delay.h>
93 #include <linux/pci.h>
94 #include <linux/init.h>
95 #include <asm/uaccess.h>
96
97 #include "specialix_io8.h"
98 #include "cd1865.h"
99
100
101 /*
102 This driver can spew a whole lot of debugging output at you. If you
103 need maximum performance, you should disable the DEBUG define. To
104 aid in debugging in the field, I'm leaving the compile-time debug
105 features enabled, and disable them "runtime". That allows me to
106 instruct people with problems to enable debugging without requiring
107 them to recompile...
108 */
109 #define DEBUG
110
111 static int sx_debug;
112 static int sx_rxfifo = SPECIALIX_RXFIFO;
113
114 #ifdef DEBUG
115 #define dprintk(f, str...) if (sx_debug & f) printk (str)
116 #else
117 #define dprintk(f, str...) /* nothing */
118 #endif
119
120 #define SX_DEBUG_FLOW 0x0001
121 #define SX_DEBUG_DATA 0x0002
122 #define SX_DEBUG_PROBE 0x0004
123 #define SX_DEBUG_CHAN 0x0008
124 #define SX_DEBUG_INIT 0x0010
125 #define SX_DEBUG_RX 0x0020
126 #define SX_DEBUG_TX 0x0040
127 #define SX_DEBUG_IRQ 0x0080
128 #define SX_DEBUG_OPEN 0x0100
129 #define SX_DEBUG_TERMIOS 0x0200
130 #define SX_DEBUG_SIGNALS 0x0400
131 #define SX_DEBUG_FIFO 0x0800
132
133
134 #define func_enter() dprintk (SX_DEBUG_FLOW, "io8: enter %s\n",__FUNCTION__)
135 #define func_exit() dprintk (SX_DEBUG_FLOW, "io8: exit %s\n", __FUNCTION__)
136
137 #define jiffies_from_ms(a) ((((a) * HZ)/1000)+1)
138
139
140 /* Configurable options: */
141
142 /* Am I paranoid or not ? ;-) */
143 #define SPECIALIX_PARANOIA_CHECK
144
145 /* Do I trust the IRQ from the card? (enabeling it doesn't seem to help)
146 When the IRQ routine leaves the chip in a state that is keeps on
147 requiring attention, the timer doesn't help either. */
148 #undef SPECIALIX_TIMER
149
150 #ifdef SPECIALIX_TIMER
151 static int sx_poll = HZ;
152 #endif
153
154
155
156 /*
157 * The following defines are mostly for testing purposes. But if you need
158 * some nice reporting in your syslog, you can define them also.
159 */
160 #undef SX_REPORT_FIFO
161 #undef SX_REPORT_OVERRUN
162
163
164
165 #ifdef CONFIG_SPECIALIX_RTSCTS
166 #define SX_CRTSCTS(bla) 1
167 #else
168 #define SX_CRTSCTS(tty) C_CRTSCTS(tty)
169 #endif
170
171
172 /* Used to be outb (0xff, 0x80); */
173 #define short_pause() udelay (1)
174
175
176 #define SPECIALIX_LEGAL_FLAGS \
177 (ASYNC_HUP_NOTIFY | ASYNC_SAK | ASYNC_SPLIT_TERMIOS | \
178 ASYNC_SPD_HI | ASYNC_SPEED_VHI | ASYNC_SESSION_LOCKOUT | \
179 ASYNC_PGRP_LOCKOUT | ASYNC_CALLOUT_NOHUP)
180
181 #undef RS_EVENT_WRITE_WAKEUP
182 #define RS_EVENT_WRITE_WAKEUP 0
183
184 static struct tty_driver *specialix_driver;
185 static unsigned char * tmp_buf;
186
187 static unsigned long baud_table[] = {
188 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400, 4800,
189 9600, 19200, 38400, 57600, 115200, 0,
190 };
191
192 static struct specialix_board sx_board[SX_NBOARD] = {
193 { 0, SX_IOBASE1, 9, },
194 { 0, SX_IOBASE2, 11, },
195 { 0, SX_IOBASE3, 12, },
196 { 0, SX_IOBASE4, 15, },
197 };
198
199 static struct specialix_port sx_port[SX_NBOARD * SX_NPORT];
200
201
202 #ifdef SPECIALIX_TIMER
203 static struct timer_list missed_irq_timer;
204 static irqreturn_t sx_interrupt(int irq, void * dev_id, struct pt_regs * regs);
205 #endif
206
207
208
209 static inline int sx_paranoia_check(struct specialix_port const * port,
210 char *name, const char *routine)
211 {
212 #ifdef SPECIALIX_PARANOIA_CHECK
213 static const char *badmagic =
214 KERN_ERR "sx: Warning: bad specialix port magic number for device %s in %s\n";
215 static const char *badinfo =
216 KERN_ERR "sx: Warning: null specialix port for device %s in %s\n";
217
218 if (!port) {
219 printk(badinfo, name, routine);
220 return 1;
221 }
222 if (port->magic != SPECIALIX_MAGIC) {
223 printk(badmagic, name, routine);
224 return 1;
225 }
226 #endif
227 return 0;
228 }
229
230
231 /*
232 *
233 * Service functions for specialix IO8+ driver.
234 *
235 */
236
237 /* Get board number from pointer */
238 static inline int board_No (struct specialix_board * bp)
239 {
240 return bp - sx_board;
241 }
242
243
244 /* Get port number from pointer */
245 static inline int port_No (struct specialix_port const * port)
246 {
247 return SX_PORT(port - sx_port);
248 }
249
250
251 /* Get pointer to board from pointer to port */
252 static inline struct specialix_board * port_Board(struct specialix_port const * port)
253 {
254 return &sx_board[SX_BOARD(port - sx_port)];
255 }
256
257
258 /* Input Byte from CL CD186x register */
259 static inline unsigned char sx_in(struct specialix_board * bp, unsigned short reg)
260 {
261 bp->reg = reg | 0x80;
262 outb (reg | 0x80, bp->base + SX_ADDR_REG);
263 return inb (bp->base + SX_DATA_REG);
264 }
265
266
267 /* Output Byte to CL CD186x register */
268 static inline void sx_out(struct specialix_board * bp, unsigned short reg,
269 unsigned char val)
270 {
271 bp->reg = reg | 0x80;
272 outb (reg | 0x80, bp->base + SX_ADDR_REG);
273 outb (val, bp->base + SX_DATA_REG);
274 }
275
276
277 /* Input Byte from CL CD186x register */
278 static inline unsigned char sx_in_off(struct specialix_board * bp, unsigned short reg)
279 {
280 bp->reg = reg;
281 outb (reg, bp->base + SX_ADDR_REG);
282 return inb (bp->base + SX_DATA_REG);
283 }
284
285
286 /* Output Byte to CL CD186x register */
287 static inline void sx_out_off(struct specialix_board * bp, unsigned short reg,
288 unsigned char val)
289 {
290 bp->reg = reg;
291 outb (reg, bp->base + SX_ADDR_REG);
292 outb (val, bp->base + SX_DATA_REG);
293 }
294
295
296 /* Wait for Channel Command Register ready */
297 static inline void sx_wait_CCR(struct specialix_board * bp)
298 {
299 unsigned long delay, flags;
300 unsigned char ccr;
301
302 for (delay = SX_CCR_TIMEOUT; delay; delay--) {
303 spin_lock_irqsave(&bp->lock, flags);
304 ccr = sx_in(bp, CD186x_CCR);
305 spin_unlock_irqrestore(&bp->lock, flags);
306 if (!ccr)
307 return;
308 udelay (1);
309 }
310
311 printk(KERN_ERR "sx%d: Timeout waiting for CCR.\n", board_No(bp));
312 }
313
314
315 /* Wait for Channel Command Register ready */
316 static inline void sx_wait_CCR_off(struct specialix_board * bp)
317 {
318 unsigned long delay;
319 unsigned char crr;
320 unsigned long flags;
321
322 for (delay = SX_CCR_TIMEOUT; delay; delay--) {
323 spin_lock_irqsave(&bp->lock, flags);
324 crr = sx_in_off(bp, CD186x_CCR);
325 spin_unlock_irqrestore(&bp->lock, flags);
326 if (!crr)
327 return;
328 udelay (1);
329 }
330
331 printk(KERN_ERR "sx%d: Timeout waiting for CCR.\n", board_No(bp));
332 }
333
334
335 /*
336 * specialix IO8+ IO range functions.
337 */
338
339 static inline int sx_request_io_range(struct specialix_board * bp)
340 {
341 return request_region(bp->base,
342 bp->flags & SX_BOARD_IS_PCI ? SX_PCI_IO_SPACE : SX_IO_SPACE,
343 "specialix IO8+") == NULL;
344 }
345
346
347 static inline void sx_release_io_range(struct specialix_board * bp)
348 {
349 release_region(bp->base,
350 bp->flags&SX_BOARD_IS_PCI?SX_PCI_IO_SPACE:SX_IO_SPACE);
351 }
352
353
354 /* Must be called with enabled interrupts */
355 /* Ugly. Very ugly. Don't use this for anything else than initialization
356 code */
357 static inline void sx_long_delay(unsigned long delay)
358 {
359 unsigned long i;
360
361 for (i = jiffies + delay; time_after(i, jiffies); ) ;
362 }
363
364
365
366 /* Set the IRQ using the RTS lines that run to the PAL on the board.... */
367 static int sx_set_irq ( struct specialix_board *bp)
368 {
369 int virq;
370 int i;
371 unsigned long flags;
372
373 if (bp->flags & SX_BOARD_IS_PCI)
374 return 1;
375 switch (bp->irq) {
376 /* In the same order as in the docs... */
377 case 15: virq = 0;break;
378 case 12: virq = 1;break;
379 case 11: virq = 2;break;
380 case 9: virq = 3;break;
381 default: printk (KERN_ERR "Speclialix: cannot set irq to %d.\n", bp->irq);
382 return 0;
383 }
384 spin_lock_irqsave(&bp->lock, flags);
385 for (i=0;i<2;i++) {
386 sx_out(bp, CD186x_CAR, i);
387 sx_out(bp, CD186x_MSVRTS, ((virq >> i) & 0x1)? MSVR_RTS:0);
388 }
389 spin_unlock_irqrestore(&bp->lock, flags);
390 return 1;
391 }
392
393
394 /* Reset and setup CD186x chip */
395 static int sx_init_CD186x(struct specialix_board * bp)
396 {
397 unsigned long flags;
398 int scaler;
399 int rv = 1;
400
401 func_enter();
402 sx_wait_CCR_off(bp); /* Wait for CCR ready */
403 spin_lock_irqsave(&bp->lock, flags);
404 sx_out_off(bp, CD186x_CCR, CCR_HARDRESET); /* Reset CD186x chip */
405 spin_unlock_irqrestore(&bp->lock, flags);
406 sx_long_delay(HZ/20); /* Delay 0.05 sec */
407 spin_lock_irqsave(&bp->lock, flags);
408 sx_out_off(bp, CD186x_GIVR, SX_ID); /* Set ID for this chip */
409 sx_out_off(bp, CD186x_GICR, 0); /* Clear all bits */
410 sx_out_off(bp, CD186x_PILR1, SX_ACK_MINT); /* Prio for modem intr */
411 sx_out_off(bp, CD186x_PILR2, SX_ACK_TINT); /* Prio for transmitter intr */
412 sx_out_off(bp, CD186x_PILR3, SX_ACK_RINT); /* Prio for receiver intr */
413 /* Set RegAckEn */
414 sx_out_off(bp, CD186x_SRCR, sx_in (bp, CD186x_SRCR) | SRCR_REGACKEN);
415
416 /* Setting up prescaler. We need 4 ticks per 1 ms */
417 scaler = SX_OSCFREQ/SPECIALIX_TPS;
418
419 sx_out_off(bp, CD186x_PPRH, scaler >> 8);
420 sx_out_off(bp, CD186x_PPRL, scaler & 0xff);
421 spin_unlock_irqrestore(&bp->lock, flags);
422
423 if (!sx_set_irq (bp)) {
424 /* Figure out how to pass this along... */
425 printk (KERN_ERR "Cannot set irq to %d.\n", bp->irq);
426 rv = 0;
427 }
428
429 func_exit();
430 return rv;
431 }
432
433
434 static int read_cross_byte (struct specialix_board *bp, int reg, int bit)
435 {
436 int i;
437 int t;
438 unsigned long flags;
439
440 spin_lock_irqsave(&bp->lock, flags);
441 for (i=0, t=0;i<8;i++) {
442 sx_out_off (bp, CD186x_CAR, i);
443 if (sx_in_off (bp, reg) & bit)
444 t |= 1 << i;
445 }
446 spin_unlock_irqrestore(&bp->lock, flags);
447
448 return t;
449 }
450
451
452 #ifdef SPECIALIX_TIMER
453 void missed_irq (unsigned long data)
454 {
455 unsigned char irq;
456 unsigned long flags;
457 struct specialix_board *bp = (struct specialix_board *)data;
458
459 spin_lock_irqsave(&bp->lock, flags);
460 irq = sx_in ((struct specialix_board *)data, CD186x_SRSR) &
461 (SRSR_RREQint |
462 SRSR_TREQint |
463 SRSR_MREQint);
464 spin_unlock_irqrestore(&bp->lock, flags);
465 if (irq) {
466 printk (KERN_INFO "Missed interrupt... Calling int from timer. \n");
467 sx_interrupt (((struct specialix_board *)data)->irq,
468 (void*)data, NULL);
469 }
470 missed_irq_timer.expires = jiffies + sx_poll;
471 add_timer (&missed_irq_timer);
472 }
473 #endif
474
475
476
477 /* Main probing routine, also sets irq. */
478 static int sx_probe(struct specialix_board *bp)
479 {
480 unsigned char val1, val2;
481 #if 0
482 int irqs = 0;
483 int retries;
484 #endif
485 int rev;
486 int chip;
487
488 func_enter();
489
490 if (sx_request_io_range(bp)) {
491 func_exit();
492 return 1;
493 }
494
495 /* Are the I/O ports here ? */
496 sx_out_off(bp, CD186x_PPRL, 0x5a);
497 short_pause ();
498 val1 = sx_in_off(bp, CD186x_PPRL);
499
500 sx_out_off(bp, CD186x_PPRL, 0xa5);
501 short_pause ();
502 val2 = sx_in_off(bp, CD186x_PPRL);
503
504
505 if ((val1 != 0x5a) || (val2 != 0xa5)) {
506 printk(KERN_INFO "sx%d: specialix IO8+ Board at 0x%03x not found.\n",
507 board_No(bp), bp->base);
508 sx_release_io_range(bp);
509 func_exit();
510 return 1;
511 }
512
513 /* Check the DSR lines that Specialix uses as board
514 identification */
515 val1 = read_cross_byte (bp, CD186x_MSVR, MSVR_DSR);
516 val2 = read_cross_byte (bp, CD186x_MSVR, MSVR_RTS);
517 dprintk (SX_DEBUG_INIT, "sx%d: DSR lines are: %02x, rts lines are: %02x\n",
518 board_No(bp), val1, val2);
519
520 /* They managed to switch the bit order between the docs and
521 the IO8+ card. The new PCI card now conforms to old docs.
522 They changed the PCI docs to reflect the situation on the
523 old card. */
524 val2 = (bp->flags & SX_BOARD_IS_PCI)?0x4d : 0xb2;
525 if (val1 != val2) {
526 printk(KERN_INFO "sx%d: specialix IO8+ ID %02x at 0x%03x not found (%02x).\n",
527 board_No(bp), val2, bp->base, val1);
528 sx_release_io_range(bp);
529 func_exit();
530 return 1;
531 }
532
533
534 #if 0
535 /* It's time to find IRQ for this board */
536 for (retries = 0; retries < 5 && irqs <= 0; retries++) {
537 irqs = probe_irq_on();
538 sx_init_CD186x(bp); /* Reset CD186x chip */
539 sx_out(bp, CD186x_CAR, 2); /* Select port 2 */
540 sx_wait_CCR(bp);
541 sx_out(bp, CD186x_CCR, CCR_TXEN); /* Enable transmitter */
542 sx_out(bp, CD186x_IER, IER_TXRDY); /* Enable tx empty intr */
543 sx_long_delay(HZ/20);
544 irqs = probe_irq_off(irqs);
545
546 dprintk (SX_DEBUG_INIT, "SRSR = %02x, ", sx_in(bp, CD186x_SRSR));
547 dprintk (SX_DEBUG_INIT, "TRAR = %02x, ", sx_in(bp, CD186x_TRAR));
548 dprintk (SX_DEBUG_INIT, "GIVR = %02x, ", sx_in(bp, CD186x_GIVR));
549 dprintk (SX_DEBUG_INIT, "GICR = %02x, ", sx_in(bp, CD186x_GICR));
550 dprintk (SX_DEBUG_INIT, "\n");
551
552 /* Reset CD186x again */
553 if (!sx_init_CD186x(bp)) {
554 /* Hmmm. This is dead code anyway. */
555 }
556
557 dprintk (SX_DEBUG_INIT "val1 = %02x, val2 = %02x, val3 = %02x.\n",
558 val1, val2, val3);
559
560 }
561
562 #if 0
563 if (irqs <= 0) {
564 printk(KERN_ERR "sx%d: Can't find IRQ for specialix IO8+ board at 0x%03x.\n",
565 board_No(bp), bp->base);
566 sx_release_io_range(bp);
567 func_exit();
568 return 1;
569 }
570 #endif
571 printk (KERN_INFO "Started with irq=%d, but now have irq=%d.\n", bp->irq, irqs);
572 if (irqs > 0)
573 bp->irq = irqs;
574 #endif
575 /* Reset CD186x again */
576 if (!sx_init_CD186x(bp)) {
577 sx_release_io_range(bp);
578 func_exit();
579 return 1;
580 }
581
582 sx_request_io_range(bp);
583 bp->flags |= SX_BOARD_PRESENT;
584
585 /* Chip revcode pkgtype
586 GFRCR SRCR bit 7
587 CD180 rev B 0x81 0
588 CD180 rev C 0x82 0
589 CD1864 rev A 0x82 1
590 CD1865 rev A 0x83 1 -- Do not use!!! Does not work.
591 CD1865 rev B 0x84 1
592 -- Thanks to Gwen Wang, Cirrus Logic.
593 */
594
595 switch (sx_in_off(bp, CD186x_GFRCR)) {
596 case 0x82:chip = 1864;rev='A';break;
597 case 0x83:chip = 1865;rev='A';break;
598 case 0x84:chip = 1865;rev='B';break;
599 case 0x85:chip = 1865;rev='C';break; /* Does not exist at this time */
600 default:chip=-1;rev='x';
601 }
602
603 dprintk (SX_DEBUG_INIT, " GFCR = 0x%02x\n", sx_in_off(bp, CD186x_GFRCR) );
604
605 #ifdef SPECIALIX_TIMER
606 init_timer (&missed_irq_timer);
607 missed_irq_timer.function = missed_irq;
608 missed_irq_timer.data = (unsigned long) bp;
609 missed_irq_timer.expires = jiffies + sx_poll;
610 add_timer (&missed_irq_timer);
611 #endif
612
613 printk(KERN_INFO"sx%d: specialix IO8+ board detected at 0x%03x, IRQ %d, CD%d Rev. %c.\n",
614 board_No(bp),
615 bp->base, bp->irq,
616 chip, rev);
617
618 func_exit();
619 return 0;
620 }
621
622 /*
623 *
624 * Interrupt processing routines.
625 * */
626
627 static inline void sx_mark_event(struct specialix_port * port, int event)
628 {
629 func_enter();
630
631 set_bit(event, &port->event);
632 schedule_work(&port->tqueue);
633
634 func_exit();
635 }
636
637
638 static inline struct specialix_port * sx_get_port(struct specialix_board * bp,
639 unsigned char const * what)
640 {
641 unsigned char channel;
642 struct specialix_port * port = NULL;
643
644 channel = sx_in(bp, CD186x_GICR) >> GICR_CHAN_OFF;
645 dprintk (SX_DEBUG_CHAN, "channel: %d\n", channel);
646 if (channel < CD186x_NCH) {
647 port = &sx_port[board_No(bp) * SX_NPORT + channel];
648 dprintk (SX_DEBUG_CHAN, "port: %d %p flags: 0x%x\n",board_No(bp) * SX_NPORT + channel, port, port->flags & ASYNC_INITIALIZED);
649
650 if (port->flags & ASYNC_INITIALIZED) {
651 dprintk (SX_DEBUG_CHAN, "port: %d %p\n", channel, port);
652 func_exit();
653 return port;
654 }
655 }
656 printk(KERN_INFO "sx%d: %s interrupt from invalid port %d\n",
657 board_No(bp), what, channel);
658 return NULL;
659 }
660
661
662 static inline void sx_receive_exc(struct specialix_board * bp)
663 {
664 struct specialix_port *port;
665 struct tty_struct *tty;
666 unsigned char status;
667 unsigned char ch, flag;
668
669 func_enter();
670
671 port = sx_get_port(bp, "Receive");
672 if (!port) {
673 dprintk (SX_DEBUG_RX, "Hmm, couldn't find port.\n");
674 func_exit();
675 return;
676 }
677 tty = port->tty;
678
679 status = sx_in(bp, CD186x_RCSR);
680
681 dprintk (SX_DEBUG_RX, "status: 0x%x\n", status);
682 if (status & RCSR_OE) {
683 port->overrun++;
684 dprintk(SX_DEBUG_FIFO, "sx%d: port %d: Overrun. Total %ld overruns.\n",
685 board_No(bp), port_No(port), port->overrun);
686 }
687 status &= port->mark_mask;
688
689 /* This flip buffer check needs to be below the reading of the
690 status register to reset the chip's IRQ.... */
691 if (tty_buffer_request_room(tty, 1) == 0) {
692 dprintk(SX_DEBUG_FIFO, "sx%d: port %d: Working around flip buffer overflow.\n",
693 board_No(bp), port_No(port));
694 func_exit();
695 return;
696 }
697
698 ch = sx_in(bp, CD186x_RDR);
699 if (!status) {
700 func_exit();
701 return;
702 }
703 if (status & RCSR_TOUT) {
704 printk(KERN_INFO "sx%d: port %d: Receiver timeout. Hardware problems ?\n",
705 board_No(bp), port_No(port));
706 func_exit();
707 return;
708
709 } else if (status & RCSR_BREAK) {
710 dprintk(SX_DEBUG_RX, "sx%d: port %d: Handling break...\n",
711 board_No(bp), port_No(port));
712 flag = TTY_BREAK;
713 if (port->flags & ASYNC_SAK)
714 do_SAK(tty);
715
716 } else if (status & RCSR_PE)
717 flag = TTY_PARITY;
718
719 else if (status & RCSR_FE)
720 flag = TTY_FRAME;
721
722 else if (status & RCSR_OE)
723 flag = TTY_OVERRUN;
724
725 else
726 flag = TTY_NORMAL;
727
728 if(tty_insert_flip_char(tty, ch, flag))
729 tty_flip_buffer_push(tty);
730 func_exit();
731 }
732
733
734 static inline void sx_receive(struct specialix_board * bp)
735 {
736 struct specialix_port *port;
737 struct tty_struct *tty;
738 unsigned char count;
739
740 func_enter();
741
742 if (!(port = sx_get_port(bp, "Receive"))) {
743 dprintk (SX_DEBUG_RX, "Hmm, couldn't find port.\n");
744 func_exit();
745 return;
746 }
747 tty = port->tty;
748
749 count = sx_in(bp, CD186x_RDCR);
750 dprintk (SX_DEBUG_RX, "port: %p: count: %d\n", port, count);
751 port->hits[count > 8 ? 9 : count]++;
752
753 tty_buffer_request_room(tty, count);
754
755 while (count--)
756 tty_insert_flip_char(tty, sx_in(bp, CD186x_RDR), TTY_NORMAL);
757 tty_flip_buffer_push(tty);
758 func_exit();
759 }
760
761
762 static inline void sx_transmit(struct specialix_board * bp)
763 {
764 struct specialix_port *port;
765 struct tty_struct *tty;
766 unsigned char count;
767
768 func_enter();
769 if (!(port = sx_get_port(bp, "Transmit"))) {
770 func_exit();
771 return;
772 }
773 dprintk (SX_DEBUG_TX, "port: %p\n", port);
774 tty = port->tty;
775
776 if (port->IER & IER_TXEMPTY) {
777 /* FIFO drained */
778 sx_out(bp, CD186x_CAR, port_No(port));
779 port->IER &= ~IER_TXEMPTY;
780 sx_out(bp, CD186x_IER, port->IER);
781 func_exit();
782 return;
783 }
784
785 if ((port->xmit_cnt <= 0 && !port->break_length)
786 || tty->stopped || tty->hw_stopped) {
787 sx_out(bp, CD186x_CAR, port_No(port));
788 port->IER &= ~IER_TXRDY;
789 sx_out(bp, CD186x_IER, port->IER);
790 func_exit();
791 return;
792 }
793
794 if (port->break_length) {
795 if (port->break_length > 0) {
796 if (port->COR2 & COR2_ETC) {
797 sx_out(bp, CD186x_TDR, CD186x_C_ESC);
798 sx_out(bp, CD186x_TDR, CD186x_C_SBRK);
799 port->COR2 &= ~COR2_ETC;
800 }
801 count = min_t(int, port->break_length, 0xff);
802 sx_out(bp, CD186x_TDR, CD186x_C_ESC);
803 sx_out(bp, CD186x_TDR, CD186x_C_DELAY);
804 sx_out(bp, CD186x_TDR, count);
805 if (!(port->break_length -= count))
806 port->break_length--;
807 } else {
808 sx_out(bp, CD186x_TDR, CD186x_C_ESC);
809 sx_out(bp, CD186x_TDR, CD186x_C_EBRK);
810 sx_out(bp, CD186x_COR2, port->COR2);
811 sx_wait_CCR(bp);
812 sx_out(bp, CD186x_CCR, CCR_CORCHG2);
813 port->break_length = 0;
814 }
815
816 func_exit();
817 return;
818 }
819
820 count = CD186x_NFIFO;
821 do {
822 sx_out(bp, CD186x_TDR, port->xmit_buf[port->xmit_tail++]);
823 port->xmit_tail = port->xmit_tail & (SERIAL_XMIT_SIZE-1);
824 if (--port->xmit_cnt <= 0)
825 break;
826 } while (--count > 0);
827
828 if (port->xmit_cnt <= 0) {
829 sx_out(bp, CD186x_CAR, port_No(port));
830 port->IER &= ~IER_TXRDY;
831 sx_out(bp, CD186x_IER, port->IER);
832 }
833 if (port->xmit_cnt <= port->wakeup_chars)
834 sx_mark_event(port, RS_EVENT_WRITE_WAKEUP);
835
836 func_exit();
837 }
838
839
840 static inline void sx_check_modem(struct specialix_board * bp)
841 {
842 struct specialix_port *port;
843 struct tty_struct *tty;
844 unsigned char mcr;
845 int msvr_cd;
846
847 dprintk (SX_DEBUG_SIGNALS, "Modem intr. ");
848 if (!(port = sx_get_port(bp, "Modem")))
849 return;
850
851 tty = port->tty;
852
853 mcr = sx_in(bp, CD186x_MCR);
854 printk ("mcr = %02x.\n", mcr);
855
856 if ((mcr & MCR_CDCHG)) {
857 dprintk (SX_DEBUG_SIGNALS, "CD just changed... ");
858 msvr_cd = sx_in(bp, CD186x_MSVR) & MSVR_CD;
859 if (msvr_cd) {
860 dprintk (SX_DEBUG_SIGNALS, "Waking up guys in open.\n");
861 wake_up_interruptible(&port->open_wait);
862 } else {
863 dprintk (SX_DEBUG_SIGNALS, "Sending HUP.\n");
864 schedule_work(&port->tqueue_hangup);
865 }
866 }
867
868 #ifdef SPECIALIX_BRAIN_DAMAGED_CTS
869 if (mcr & MCR_CTSCHG) {
870 if (sx_in(bp, CD186x_MSVR) & MSVR_CTS) {
871 tty->hw_stopped = 0;
872 port->IER |= IER_TXRDY;
873 if (port->xmit_cnt <= port->wakeup_chars)
874 sx_mark_event(port, RS_EVENT_WRITE_WAKEUP);
875 } else {
876 tty->hw_stopped = 1;
877 port->IER &= ~IER_TXRDY;
878 }
879 sx_out(bp, CD186x_IER, port->IER);
880 }
881 if (mcr & MCR_DSSXHG) {
882 if (sx_in(bp, CD186x_MSVR) & MSVR_DSR) {
883 tty->hw_stopped = 0;
884 port->IER |= IER_TXRDY;
885 if (port->xmit_cnt <= port->wakeup_chars)
886 sx_mark_event(port, RS_EVENT_WRITE_WAKEUP);
887 } else {
888 tty->hw_stopped = 1;
889 port->IER &= ~IER_TXRDY;
890 }
891 sx_out(bp, CD186x_IER, port->IER);
892 }
893 #endif /* SPECIALIX_BRAIN_DAMAGED_CTS */
894
895 /* Clear change bits */
896 sx_out(bp, CD186x_MCR, 0);
897 }
898
899
900 /* The main interrupt processing routine */
901 static irqreturn_t sx_interrupt(int irq, void *dev_id, struct pt_regs *regs)
902 {
903 unsigned char status;
904 unsigned char ack;
905 struct specialix_board *bp;
906 unsigned long loop = 0;
907 int saved_reg;
908 unsigned long flags;
909
910 func_enter();
911
912 bp = dev_id;
913 spin_lock_irqsave(&bp->lock, flags);
914
915 dprintk (SX_DEBUG_FLOW, "enter %s port %d room: %ld\n", __FUNCTION__, port_No(sx_get_port(bp, "INT")), SERIAL_XMIT_SIZE - sx_get_port(bp, "ITN")->xmit_cnt - 1);
916 if (!bp || !(bp->flags & SX_BOARD_ACTIVE)) {
917 dprintk (SX_DEBUG_IRQ, "sx: False interrupt. irq %d.\n", irq);
918 spin_unlock_irqrestore(&bp->lock, flags);
919 func_exit();
920 return IRQ_NONE;
921 }
922
923 saved_reg = bp->reg;
924
925 while ((++loop < 16) && (status = (sx_in(bp, CD186x_SRSR) &
926 (SRSR_RREQint |
927 SRSR_TREQint |
928 SRSR_MREQint)))) {
929 if (status & SRSR_RREQint) {
930 ack = sx_in(bp, CD186x_RRAR);
931
932 if (ack == (SX_ID | GIVR_IT_RCV))
933 sx_receive(bp);
934 else if (ack == (SX_ID | GIVR_IT_REXC))
935 sx_receive_exc(bp);
936 else
937 printk(KERN_ERR "sx%d: status: 0x%x Bad receive ack 0x%02x.\n",
938 board_No(bp), status, ack);
939
940 } else if (status & SRSR_TREQint) {
941 ack = sx_in(bp, CD186x_TRAR);
942
943 if (ack == (SX_ID | GIVR_IT_TX))
944 sx_transmit(bp);
945 else
946 printk(KERN_ERR "sx%d: status: 0x%x Bad transmit ack 0x%02x. port: %d\n",
947 board_No(bp), status, ack, port_No (sx_get_port (bp, "Int")));
948 } else if (status & SRSR_MREQint) {
949 ack = sx_in(bp, CD186x_MRAR);
950
951 if (ack == (SX_ID | GIVR_IT_MODEM))
952 sx_check_modem(bp);
953 else
954 printk(KERN_ERR "sx%d: status: 0x%x Bad modem ack 0x%02x.\n",
955 board_No(bp), status, ack);
956
957 }
958
959 sx_out(bp, CD186x_EOIR, 0); /* Mark end of interrupt */
960 }
961 bp->reg = saved_reg;
962 outb (bp->reg, bp->base + SX_ADDR_REG);
963 spin_unlock_irqrestore(&bp->lock, flags);
964 func_exit();
965 return IRQ_HANDLED;
966 }
967
968
969 /*
970 * Routines for open & close processing.
971 */
972
973 static void turn_ints_off (struct specialix_board *bp)
974 {
975 unsigned long flags;
976
977 func_enter();
978 if (bp->flags & SX_BOARD_IS_PCI) {
979 /* This was intended for enabeling the interrupt on the
980 * PCI card. However it seems that it's already enabled
981 * and as PCI interrupts can be shared, there is no real
982 * reason to have to turn it off. */
983 }
984
985 spin_lock_irqsave(&bp->lock, flags);
986 (void) sx_in_off (bp, 0); /* Turn off interrupts. */
987 spin_unlock_irqrestore(&bp->lock, flags);
988
989 func_exit();
990 }
991
992 static void turn_ints_on (struct specialix_board *bp)
993 {
994 unsigned long flags;
995
996 func_enter();
997
998 if (bp->flags & SX_BOARD_IS_PCI) {
999 /* play with the PCI chip. See comment above. */
1000 }
1001 spin_lock_irqsave(&bp->lock, flags);
1002 (void) sx_in (bp, 0); /* Turn ON interrupts. */
1003 spin_unlock_irqrestore(&bp->lock, flags);
1004
1005 func_exit();
1006 }
1007
1008
1009 /* Called with disabled interrupts */
1010 static inline int sx_setup_board(struct specialix_board * bp)
1011 {
1012 int error;
1013
1014 if (bp->flags & SX_BOARD_ACTIVE)
1015 return 0;
1016
1017 if (bp->flags & SX_BOARD_IS_PCI)
1018 error = request_irq(bp->irq, sx_interrupt, IRQF_DISABLED | IRQF_SHARED, "specialix IO8+", bp);
1019 else
1020 error = request_irq(bp->irq, sx_interrupt, IRQF_DISABLED, "specialix IO8+", bp);
1021
1022 if (error)
1023 return error;
1024
1025 turn_ints_on (bp);
1026 bp->flags |= SX_BOARD_ACTIVE;
1027
1028 return 0;
1029 }
1030
1031
1032 /* Called with disabled interrupts */
1033 static inline void sx_shutdown_board(struct specialix_board *bp)
1034 {
1035 func_enter();
1036
1037 if (!(bp->flags & SX_BOARD_ACTIVE)) {
1038 func_exit();
1039 return;
1040 }
1041
1042 bp->flags &= ~SX_BOARD_ACTIVE;
1043
1044 dprintk (SX_DEBUG_IRQ, "Freeing IRQ%d for board %d.\n",
1045 bp->irq, board_No (bp));
1046 free_irq(bp->irq, bp);
1047
1048 turn_ints_off (bp);
1049
1050
1051 func_exit();
1052 }
1053
1054
1055 /*
1056 * Setting up port characteristics.
1057 * Must be called with disabled interrupts
1058 */
1059 static void sx_change_speed(struct specialix_board *bp, struct specialix_port *port)
1060 {
1061 struct tty_struct *tty;
1062 unsigned long baud;
1063 long tmp;
1064 unsigned char cor1 = 0, cor3 = 0;
1065 unsigned char mcor1 = 0, mcor2 = 0;
1066 static unsigned long again;
1067 unsigned long flags;
1068
1069 func_enter();
1070
1071 if (!(tty = port->tty) || !tty->termios) {
1072 func_exit();
1073 return;
1074 }
1075
1076 port->IER = 0;
1077 port->COR2 = 0;
1078 /* Select port on the board */
1079 spin_lock_irqsave(&bp->lock, flags);
1080 sx_out(bp, CD186x_CAR, port_No(port));
1081
1082 /* The Specialix board doens't implement the RTS lines.
1083 They are used to set the IRQ level. Don't touch them. */
1084 if (SX_CRTSCTS(tty))
1085 port->MSVR = MSVR_DTR | (sx_in(bp, CD186x_MSVR) & MSVR_RTS);
1086 else
1087 port->MSVR = (sx_in(bp, CD186x_MSVR) & MSVR_RTS);
1088 spin_unlock_irqrestore(&bp->lock, flags);
1089 dprintk (SX_DEBUG_TERMIOS, "sx: got MSVR=%02x.\n", port->MSVR);
1090 baud = C_BAUD(tty);
1091
1092 if (baud & CBAUDEX) {
1093 baud &= ~CBAUDEX;
1094 if (baud < 1 || baud > 2)
1095 port->tty->termios->c_cflag &= ~CBAUDEX;
1096 else
1097 baud += 15;
1098 }
1099 if (baud == 15) {
1100 if ((port->flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
1101 baud ++;
1102 if ((port->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
1103 baud += 2;
1104 }
1105
1106
1107 if (!baud_table[baud]) {
1108 /* Drop DTR & exit */
1109 dprintk (SX_DEBUG_TERMIOS, "Dropping DTR... Hmm....\n");
1110 if (!SX_CRTSCTS (tty)) {
1111 port -> MSVR &= ~ MSVR_DTR;
1112 spin_lock_irqsave(&bp->lock, flags);
1113 sx_out(bp, CD186x_MSVR, port->MSVR );
1114 spin_unlock_irqrestore(&bp->lock, flags);
1115 }
1116 else
1117 dprintk (SX_DEBUG_TERMIOS, "Can't drop DTR: no DTR.\n");
1118 return;
1119 } else {
1120 /* Set DTR on */
1121 if (!SX_CRTSCTS (tty)) {
1122 port ->MSVR |= MSVR_DTR;
1123 }
1124 }
1125
1126 /*
1127 * Now we must calculate some speed depended things
1128 */
1129
1130 /* Set baud rate for port */
1131 tmp = port->custom_divisor ;
1132 if ( tmp )
1133 printk (KERN_INFO "sx%d: Using custom baud rate divisor %ld. \n"
1134 "This is an untested option, please be carefull.\n",
1135 port_No (port), tmp);
1136 else
1137 tmp = (((SX_OSCFREQ + baud_table[baud]/2) / baud_table[baud] +
1138 CD186x_TPC/2) / CD186x_TPC);
1139
1140 if ((tmp < 0x10) && time_before(again, jiffies)) {
1141 again = jiffies + HZ * 60;
1142 /* Page 48 of version 2.0 of the CL-CD1865 databook */
1143 if (tmp >= 12) {
1144 printk (KERN_INFO "sx%d: Baud rate divisor is %ld. \n"
1145 "Performance degradation is possible.\n"
1146 "Read specialix.txt for more info.\n",
1147 port_No (port), tmp);
1148 } else {
1149 printk (KERN_INFO "sx%d: Baud rate divisor is %ld. \n"
1150 "Warning: overstressing Cirrus chip. "
1151 "This might not work.\n"
1152 "Read specialix.txt for more info.\n",
1153 port_No (port), tmp);
1154 }
1155 }
1156 spin_lock_irqsave(&bp->lock, flags);
1157 sx_out(bp, CD186x_RBPRH, (tmp >> 8) & 0xff);
1158 sx_out(bp, CD186x_TBPRH, (tmp >> 8) & 0xff);
1159 sx_out(bp, CD186x_RBPRL, tmp & 0xff);
1160 sx_out(bp, CD186x_TBPRL, tmp & 0xff);
1161 spin_unlock_irqrestore(&bp->lock, flags);
1162 if (port->custom_divisor) {
1163 baud = (SX_OSCFREQ + port->custom_divisor/2) / port->custom_divisor;
1164 baud = ( baud + 5 ) / 10;
1165 } else
1166 baud = (baud_table[baud] + 5) / 10; /* Estimated CPS */
1167
1168 /* Two timer ticks seems enough to wakeup something like SLIP driver */
1169 tmp = ((baud + HZ/2) / HZ) * 2 - CD186x_NFIFO;
1170 port->wakeup_chars = (tmp < 0) ? 0 : ((tmp >= SERIAL_XMIT_SIZE) ?
1171 SERIAL_XMIT_SIZE - 1 : tmp);
1172
1173 /* Receiver timeout will be transmission time for 1.5 chars */
1174 tmp = (SPECIALIX_TPS + SPECIALIX_TPS/2 + baud/2) / baud;
1175 tmp = (tmp > 0xff) ? 0xff : tmp;
1176 spin_lock_irqsave(&bp->lock, flags);
1177 sx_out(bp, CD186x_RTPR, tmp);
1178 spin_unlock_irqrestore(&bp->lock, flags);
1179 switch (C_CSIZE(tty)) {
1180 case CS5:
1181 cor1 |= COR1_5BITS;
1182 break;
1183 case CS6:
1184 cor1 |= COR1_6BITS;
1185 break;
1186 case CS7:
1187 cor1 |= COR1_7BITS;
1188 break;
1189 case CS8:
1190 cor1 |= COR1_8BITS;
1191 break;
1192 }
1193
1194 if (C_CSTOPB(tty))
1195 cor1 |= COR1_2SB;
1196
1197 cor1 |= COR1_IGNORE;
1198 if (C_PARENB(tty)) {
1199 cor1 |= COR1_NORMPAR;
1200 if (C_PARODD(tty))
1201 cor1 |= COR1_ODDP;
1202 if (I_INPCK(tty))
1203 cor1 &= ~COR1_IGNORE;
1204 }
1205 /* Set marking of some errors */
1206 port->mark_mask = RCSR_OE | RCSR_TOUT;
1207 if (I_INPCK(tty))
1208 port->mark_mask |= RCSR_FE | RCSR_PE;
1209 if (I_BRKINT(tty) || I_PARMRK(tty))
1210 port->mark_mask |= RCSR_BREAK;
1211 if (I_IGNPAR(tty))
1212 port->mark_mask &= ~(RCSR_FE | RCSR_PE);
1213 if (I_IGNBRK(tty)) {
1214 port->mark_mask &= ~RCSR_BREAK;
1215 if (I_IGNPAR(tty))
1216 /* Real raw mode. Ignore all */
1217 port->mark_mask &= ~RCSR_OE;
1218 }
1219 /* Enable Hardware Flow Control */
1220 if (C_CRTSCTS(tty)) {
1221 #ifdef SPECIALIX_BRAIN_DAMAGED_CTS
1222 port->IER |= IER_DSR | IER_CTS;
1223 mcor1 |= MCOR1_DSRZD | MCOR1_CTSZD;
1224 mcor2 |= MCOR2_DSROD | MCOR2_CTSOD;
1225 spin_lock_irqsave(&bp->lock, flags);
1226 tty->hw_stopped = !(sx_in(bp, CD186x_MSVR) & (MSVR_CTS|MSVR_DSR));
1227 spin_unlock_irqrestore(&bp->lock, flags);
1228 #else
1229 port->COR2 |= COR2_CTSAE;
1230 #endif
1231 }
1232 /* Enable Software Flow Control. FIXME: I'm not sure about this */
1233 /* Some people reported that it works, but I still doubt it */
1234 if (I_IXON(tty)) {
1235 port->COR2 |= COR2_TXIBE;
1236 cor3 |= (COR3_FCT | COR3_SCDE);
1237 if (I_IXANY(tty))
1238 port->COR2 |= COR2_IXM;
1239 spin_lock_irqsave(&bp->lock, flags);
1240 sx_out(bp, CD186x_SCHR1, START_CHAR(tty));
1241 sx_out(bp, CD186x_SCHR2, STOP_CHAR(tty));
1242 sx_out(bp, CD186x_SCHR3, START_CHAR(tty));
1243 sx_out(bp, CD186x_SCHR4, STOP_CHAR(tty));
1244 spin_unlock_irqrestore(&bp->lock, flags);
1245 }
1246 if (!C_CLOCAL(tty)) {
1247 /* Enable CD check */
1248 port->IER |= IER_CD;
1249 mcor1 |= MCOR1_CDZD;
1250 mcor2 |= MCOR2_CDOD;
1251 }
1252
1253 if (C_CREAD(tty))
1254 /* Enable receiver */
1255 port->IER |= IER_RXD;
1256
1257 /* Set input FIFO size (1-8 bytes) */
1258 cor3 |= sx_rxfifo;
1259 /* Setting up CD186x channel registers */
1260 spin_lock_irqsave(&bp->lock, flags);
1261 sx_out(bp, CD186x_COR1, cor1);
1262 sx_out(bp, CD186x_COR2, port->COR2);
1263 sx_out(bp, CD186x_COR3, cor3);
1264 spin_unlock_irqrestore(&bp->lock, flags);
1265 /* Make CD186x know about registers change */
1266 sx_wait_CCR(bp);
1267 spin_lock_irqsave(&bp->lock, flags);
1268 sx_out(bp, CD186x_CCR, CCR_CORCHG1 | CCR_CORCHG2 | CCR_CORCHG3);
1269 /* Setting up modem option registers */
1270 dprintk (SX_DEBUG_TERMIOS, "Mcor1 = %02x, mcor2 = %02x.\n", mcor1, mcor2);
1271 sx_out(bp, CD186x_MCOR1, mcor1);
1272 sx_out(bp, CD186x_MCOR2, mcor2);
1273 spin_unlock_irqrestore(&bp->lock, flags);
1274 /* Enable CD186x transmitter & receiver */
1275 sx_wait_CCR(bp);
1276 spin_lock_irqsave(&bp->lock, flags);
1277 sx_out(bp, CD186x_CCR, CCR_TXEN | CCR_RXEN);
1278 /* Enable interrupts */
1279 sx_out(bp, CD186x_IER, port->IER);
1280 /* And finally set the modem lines... */
1281 sx_out(bp, CD186x_MSVR, port->MSVR);
1282 spin_unlock_irqrestore(&bp->lock, flags);
1283
1284 func_exit();
1285 }
1286
1287
1288 /* Must be called with interrupts enabled */
1289 static int sx_setup_port(struct specialix_board *bp, struct specialix_port *port)
1290 {
1291 unsigned long flags;
1292
1293 func_enter();
1294
1295 if (port->flags & ASYNC_INITIALIZED) {
1296 func_exit();
1297 return 0;
1298 }
1299
1300 if (!port->xmit_buf) {
1301 /* We may sleep in get_zeroed_page() */
1302 unsigned long tmp;
1303
1304 if (!(tmp = get_zeroed_page(GFP_KERNEL))) {
1305 func_exit();
1306 return -ENOMEM;
1307 }
1308
1309 if (port->xmit_buf) {
1310 free_page(tmp);
1311 func_exit();
1312 return -ERESTARTSYS;
1313 }
1314 port->xmit_buf = (unsigned char *) tmp;
1315 }
1316
1317 spin_lock_irqsave(&port->lock, flags);
1318
1319 if (port->tty)
1320 clear_bit(TTY_IO_ERROR, &port->tty->flags);
1321
1322 port->xmit_cnt = port->xmit_head = port->xmit_tail = 0;
1323 sx_change_speed(bp, port);
1324 port->flags |= ASYNC_INITIALIZED;
1325
1326 spin_unlock_irqrestore(&port->lock, flags);
1327
1328
1329 func_exit();
1330 return 0;
1331 }
1332
1333
1334 /* Must be called with interrupts disabled */
1335 static void sx_shutdown_port(struct specialix_board *bp, struct specialix_port *port)
1336 {
1337 struct tty_struct *tty;
1338 int i;
1339 unsigned long flags;
1340
1341 func_enter();
1342
1343 if (!(port->flags & ASYNC_INITIALIZED)) {
1344 func_exit();
1345 return;
1346 }
1347
1348 if (sx_debug & SX_DEBUG_FIFO) {
1349 dprintk(SX_DEBUG_FIFO, "sx%d: port %d: %ld overruns, FIFO hits [ ",
1350 board_No(bp), port_No(port), port->overrun);
1351 for (i = 0; i < 10; i++) {
1352 dprintk(SX_DEBUG_FIFO, "%ld ", port->hits[i]);
1353 }
1354 dprintk(SX_DEBUG_FIFO, "].\n");
1355 }
1356
1357 if (port->xmit_buf) {
1358 free_page((unsigned long) port->xmit_buf);
1359 port->xmit_buf = NULL;
1360 }
1361
1362 /* Select port */
1363 spin_lock_irqsave(&bp->lock, flags);
1364 sx_out(bp, CD186x_CAR, port_No(port));
1365
1366 if (!(tty = port->tty) || C_HUPCL(tty)) {
1367 /* Drop DTR */
1368 sx_out(bp, CD186x_MSVDTR, 0);
1369 }
1370 spin_unlock_irqrestore(&bp->lock, flags);
1371 /* Reset port */
1372 sx_wait_CCR(bp);
1373 spin_lock_irqsave(&bp->lock, flags);
1374 sx_out(bp, CD186x_CCR, CCR_SOFTRESET);
1375 /* Disable all interrupts from this port */
1376 port->IER = 0;
1377 sx_out(bp, CD186x_IER, port->IER);
1378 spin_unlock_irqrestore(&bp->lock, flags);
1379 if (tty)
1380 set_bit(TTY_IO_ERROR, &tty->flags);
1381 port->flags &= ~ASYNC_INITIALIZED;
1382
1383 if (!bp->count)
1384 sx_shutdown_board(bp);
1385 func_exit();
1386 }
1387
1388
1389 static int block_til_ready(struct tty_struct *tty, struct file * filp,
1390 struct specialix_port *port)
1391 {
1392 DECLARE_WAITQUEUE(wait, current);
1393 struct specialix_board *bp = port_Board(port);
1394 int retval;
1395 int do_clocal = 0;
1396 int CD;
1397 unsigned long flags;
1398
1399 func_enter();
1400
1401 /*
1402 * If the device is in the middle of being closed, then block
1403 * until it's done, and then try again.
1404 */
1405 if (tty_hung_up_p(filp) || port->flags & ASYNC_CLOSING) {
1406 interruptible_sleep_on(&port->close_wait);
1407 if (port->flags & ASYNC_HUP_NOTIFY) {
1408 func_exit();
1409 return -EAGAIN;
1410 } else {
1411 func_exit();
1412 return -ERESTARTSYS;
1413 }
1414 }
1415
1416 /*
1417 * If non-blocking mode is set, or the port is not enabled,
1418 * then make the check up front and then exit.
1419 */
1420 if ((filp->f_flags & O_NONBLOCK) ||
1421 (tty->flags & (1 << TTY_IO_ERROR))) {
1422 port->flags |= ASYNC_NORMAL_ACTIVE;
1423 func_exit();
1424 return 0;
1425 }
1426
1427 if (C_CLOCAL(tty))
1428 do_clocal = 1;
1429
1430 /*
1431 * Block waiting for the carrier detect and the line to become
1432 * free (i.e., not in use by the callout). While we are in
1433 * this loop, info->count is dropped by one, so that
1434 * rs_close() knows when to free things. We restore it upon
1435 * exit, either normal or abnormal.
1436 */
1437 retval = 0;
1438 add_wait_queue(&port->open_wait, &wait);
1439 spin_lock_irqsave(&port->lock, flags);
1440 if (!tty_hung_up_p(filp)) {
1441 port->count--;
1442 }
1443 spin_unlock_irqrestore(&port->lock, flags);
1444 port->blocked_open++;
1445 while (1) {
1446 spin_lock_irqsave(&bp->lock, flags);
1447 sx_out(bp, CD186x_CAR, port_No(port));
1448 CD = sx_in(bp, CD186x_MSVR) & MSVR_CD;
1449 if (SX_CRTSCTS (tty)) {
1450 /* Activate RTS */
1451 port->MSVR |= MSVR_DTR; /* WTF? */
1452 sx_out (bp, CD186x_MSVR, port->MSVR);
1453 } else {
1454 /* Activate DTR */
1455 port->MSVR |= MSVR_DTR;
1456 sx_out (bp, CD186x_MSVR, port->MSVR);
1457 }
1458 spin_unlock_irqrestore(&bp->lock, flags);
1459 set_current_state(TASK_INTERRUPTIBLE);
1460 if (tty_hung_up_p(filp) ||
1461 !(port->flags & ASYNC_INITIALIZED)) {
1462 if (port->flags & ASYNC_HUP_NOTIFY)
1463 retval = -EAGAIN;
1464 else
1465 retval = -ERESTARTSYS;
1466 break;
1467 }
1468 if (!(port->flags & ASYNC_CLOSING) &&
1469 (do_clocal || CD))
1470 break;
1471 if (signal_pending(current)) {
1472 retval = -ERESTARTSYS;
1473 break;
1474 }
1475 schedule();
1476 }
1477
1478 set_current_state(TASK_RUNNING);
1479 remove_wait_queue(&port->open_wait, &wait);
1480 spin_lock_irqsave(&port->lock, flags);
1481 if (!tty_hung_up_p(filp)) {
1482 port->count++;
1483 }
1484 port->blocked_open--;
1485 spin_unlock_irqrestore(&port->lock, flags);
1486 if (retval) {
1487 func_exit();
1488 return retval;
1489 }
1490
1491 port->flags |= ASYNC_NORMAL_ACTIVE;
1492 func_exit();
1493 return 0;
1494 }
1495
1496
1497 static int sx_open(struct tty_struct * tty, struct file * filp)
1498 {
1499 int board;
1500 int error;
1501 struct specialix_port * port;
1502 struct specialix_board * bp;
1503 int i;
1504 unsigned long flags;
1505
1506 func_enter();
1507
1508 board = SX_BOARD(tty->index);
1509
1510 if (board >= SX_NBOARD || !(sx_board[board].flags & SX_BOARD_PRESENT)) {
1511 func_exit();
1512 return -ENODEV;
1513 }
1514
1515 bp = &sx_board[board];
1516 port = sx_port + board * SX_NPORT + SX_PORT(tty->index);
1517 port->overrun = 0;
1518 for (i = 0; i < 10; i++)
1519 port->hits[i]=0;
1520
1521 dprintk (SX_DEBUG_OPEN, "Board = %d, bp = %p, port = %p, portno = %d.\n",
1522 board, bp, port, SX_PORT(tty->index));
1523
1524 if (sx_paranoia_check(port, tty->name, "sx_open")) {
1525 func_enter();
1526 return -ENODEV;
1527 }
1528
1529 if ((error = sx_setup_board(bp))) {
1530 func_exit();
1531 return error;
1532 }
1533
1534 spin_lock_irqsave(&bp->lock, flags);
1535 port->count++;
1536 bp->count++;
1537 tty->driver_data = port;
1538 port->tty = tty;
1539 spin_unlock_irqrestore(&bp->lock, flags);
1540
1541 if ((error = sx_setup_port(bp, port))) {
1542 func_enter();
1543 return error;
1544 }
1545
1546 if ((error = block_til_ready(tty, filp, port))) {
1547 func_enter();
1548 return error;
1549 }
1550
1551 func_exit();
1552 return 0;
1553 }
1554
1555
1556 static void sx_close(struct tty_struct * tty, struct file * filp)
1557 {
1558 struct specialix_port *port = (struct specialix_port *) tty->driver_data;
1559 struct specialix_board *bp;
1560 unsigned long flags;
1561 unsigned long timeout;
1562
1563 func_enter();
1564 if (!port || sx_paranoia_check(port, tty->name, "close")) {
1565 func_exit();
1566 return;
1567 }
1568 spin_lock_irqsave(&port->lock, flags);
1569
1570 if (tty_hung_up_p(filp)) {
1571 spin_unlock_irqrestore(&port->lock, flags);
1572 func_exit();
1573 return;
1574 }
1575
1576 bp = port_Board(port);
1577 if ((tty->count == 1) && (port->count != 1)) {
1578 printk(KERN_ERR "sx%d: sx_close: bad port count;"
1579 " tty->count is 1, port count is %d\n",
1580 board_No(bp), port->count);
1581 port->count = 1;
1582 }
1583
1584 if (port->count > 1) {
1585 port->count--;
1586 bp->count--;
1587
1588 spin_unlock_irqrestore(&port->lock, flags);
1589
1590 func_exit();
1591 return;
1592 }
1593 port->flags |= ASYNC_CLOSING;
1594 /*
1595 * Now we wait for the transmit buffer to clear; and we notify
1596 * the line discipline to only process XON/XOFF characters.
1597 */
1598 tty->closing = 1;
1599 spin_unlock_irqrestore(&port->lock, flags);
1600 dprintk (SX_DEBUG_OPEN, "Closing\n");
1601 if (port->closing_wait != ASYNC_CLOSING_WAIT_NONE) {
1602 tty_wait_until_sent(tty, port->closing_wait);
1603 }
1604 /*
1605 * At this point we stop accepting input. To do this, we
1606 * disable the receive line status interrupts, and tell the
1607 * interrupt driver to stop checking the data ready bit in the
1608 * line status register.
1609 */
1610 dprintk (SX_DEBUG_OPEN, "Closed\n");
1611 port->IER &= ~IER_RXD;
1612 if (port->flags & ASYNC_INITIALIZED) {
1613 port->IER &= ~IER_TXRDY;
1614 port->IER |= IER_TXEMPTY;
1615 spin_lock_irqsave(&bp->lock, flags);
1616 sx_out(bp, CD186x_CAR, port_No(port));
1617 sx_out(bp, CD186x_IER, port->IER);
1618 spin_unlock_irqrestore(&bp->lock, flags);
1619 /*
1620 * Before we drop DTR, make sure the UART transmitter
1621 * has completely drained; this is especially
1622 * important if there is a transmit FIFO!
1623 */
1624 timeout = jiffies+HZ;
1625 while(port->IER & IER_TXEMPTY) {
1626 set_current_state (TASK_INTERRUPTIBLE);
1627 msleep_interruptible(jiffies_to_msecs(port->timeout));
1628 if (time_after(jiffies, timeout)) {
1629 printk (KERN_INFO "Timeout waiting for close\n");
1630 break;
1631 }
1632 }
1633
1634 }
1635
1636 if (--bp->count < 0) {
1637 printk(KERN_ERR "sx%d: sx_shutdown_port: bad board count: %d port: %d\n",
1638 board_No(bp), bp->count, tty->index);
1639 bp->count = 0;
1640 }
1641 if (--port->count < 0) {
1642 printk(KERN_ERR "sx%d: sx_close: bad port count for tty%d: %d\n",
1643 board_No(bp), port_No(port), port->count);
1644 port->count = 0;
1645 }
1646
1647 sx_shutdown_port(bp, port);
1648 if (tty->driver->flush_buffer)
1649 tty->driver->flush_buffer(tty);
1650 tty_ldisc_flush(tty);
1651 spin_lock_irqsave(&port->lock, flags);
1652 tty->closing = 0;
1653 port->event = 0;
1654 port->tty = NULL;
1655 spin_unlock_irqrestore(&port->lock, flags);
1656 if (port->blocked_open) {
1657 if (port->close_delay) {
1658 msleep_interruptible(jiffies_to_msecs(port->close_delay));
1659 }
1660 wake_up_interruptible(&port->open_wait);
1661 }
1662 port->flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
1663 wake_up_interruptible(&port->close_wait);
1664
1665 func_exit();
1666 }
1667
1668
1669 static int sx_write(struct tty_struct * tty,
1670 const unsigned char *buf, int count)
1671 {
1672 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1673 struct specialix_board *bp;
1674 int c, total = 0;
1675 unsigned long flags;
1676
1677 func_enter();
1678 if (sx_paranoia_check(port, tty->name, "sx_write")) {
1679 func_exit();
1680 return 0;
1681 }
1682
1683 bp = port_Board(port);
1684
1685 if (!port->xmit_buf || !tmp_buf) {
1686 func_exit();
1687 return 0;
1688 }
1689
1690 while (1) {
1691 spin_lock_irqsave(&port->lock, flags);
1692 c = min_t(int, count, min(SERIAL_XMIT_SIZE - port->xmit_cnt - 1,
1693 SERIAL_XMIT_SIZE - port->xmit_head));
1694 if (c <= 0) {
1695 spin_unlock_irqrestore(&port->lock, flags);
1696 break;
1697 }
1698 memcpy(port->xmit_buf + port->xmit_head, buf, c);
1699 port->xmit_head = (port->xmit_head + c) & (SERIAL_XMIT_SIZE-1);
1700 port->xmit_cnt += c;
1701 spin_unlock_irqrestore(&port->lock, flags);
1702
1703 buf += c;
1704 count -= c;
1705 total += c;
1706 }
1707
1708 spin_lock_irqsave(&bp->lock, flags);
1709 if (port->xmit_cnt && !tty->stopped && !tty->hw_stopped &&
1710 !(port->IER & IER_TXRDY)) {
1711 port->IER |= IER_TXRDY;
1712 sx_out(bp, CD186x_CAR, port_No(port));
1713 sx_out(bp, CD186x_IER, port->IER);
1714 }
1715 spin_unlock_irqrestore(&bp->lock, flags);
1716 func_exit();
1717
1718 return total;
1719 }
1720
1721
1722 static void sx_put_char(struct tty_struct * tty, unsigned char ch)
1723 {
1724 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1725 unsigned long flags;
1726 struct specialix_board * bp;
1727
1728 func_enter();
1729
1730 if (sx_paranoia_check(port, tty->name, "sx_put_char")) {
1731 func_exit();
1732 return;
1733 }
1734 dprintk (SX_DEBUG_TX, "check tty: %p %p\n", tty, port->xmit_buf);
1735 if (!port->xmit_buf) {
1736 func_exit();
1737 return;
1738 }
1739 bp = port_Board(port);
1740 spin_lock_irqsave(&port->lock, flags);
1741
1742 dprintk (SX_DEBUG_TX, "xmit_cnt: %d xmit_buf: %p\n", port->xmit_cnt, port->xmit_buf);
1743 if ((port->xmit_cnt >= SERIAL_XMIT_SIZE - 1) || (!port->xmit_buf)) {
1744 spin_unlock_irqrestore(&port->lock, flags);
1745 dprintk (SX_DEBUG_TX, "Exit size\n");
1746 func_exit();
1747 return;
1748 }
1749 dprintk (SX_DEBUG_TX, "Handle xmit: %p %p\n", port, port->xmit_buf);
1750 port->xmit_buf[port->xmit_head++] = ch;
1751 port->xmit_head &= SERIAL_XMIT_SIZE - 1;
1752 port->xmit_cnt++;
1753 spin_unlock_irqrestore(&port->lock, flags);
1754
1755 func_exit();
1756 }
1757
1758
1759 static void sx_flush_chars(struct tty_struct * tty)
1760 {
1761 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1762 unsigned long flags;
1763 struct specialix_board * bp = port_Board(port);
1764
1765 func_enter();
1766
1767 if (sx_paranoia_check(port, tty->name, "sx_flush_chars")) {
1768 func_exit();
1769 return;
1770 }
1771 if (port->xmit_cnt <= 0 || tty->stopped || tty->hw_stopped ||
1772 !port->xmit_buf) {
1773 func_exit();
1774 return;
1775 }
1776 spin_lock_irqsave(&bp->lock, flags);
1777 port->IER |= IER_TXRDY;
1778 sx_out(port_Board(port), CD186x_CAR, port_No(port));
1779 sx_out(port_Board(port), CD186x_IER, port->IER);
1780 spin_unlock_irqrestore(&bp->lock, flags);
1781
1782 func_exit();
1783 }
1784
1785
1786 static int sx_write_room(struct tty_struct * tty)
1787 {
1788 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1789 int ret;
1790
1791 func_enter();
1792
1793 if (sx_paranoia_check(port, tty->name, "sx_write_room")) {
1794 func_exit();
1795 return 0;
1796 }
1797
1798 ret = SERIAL_XMIT_SIZE - port->xmit_cnt - 1;
1799 if (ret < 0)
1800 ret = 0;
1801
1802 func_exit();
1803 return ret;
1804 }
1805
1806
1807 static int sx_chars_in_buffer(struct tty_struct *tty)
1808 {
1809 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1810
1811 func_enter();
1812
1813 if (sx_paranoia_check(port, tty->name, "sx_chars_in_buffer")) {
1814 func_exit();
1815 return 0;
1816 }
1817 func_exit();
1818 return port->xmit_cnt;
1819 }
1820
1821
1822 static void sx_flush_buffer(struct tty_struct *tty)
1823 {
1824 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1825 unsigned long flags;
1826 struct specialix_board * bp;
1827
1828 func_enter();
1829
1830 if (sx_paranoia_check(port, tty->name, "sx_flush_buffer")) {
1831 func_exit();
1832 return;
1833 }
1834
1835 bp = port_Board(port);
1836 spin_lock_irqsave(&port->lock, flags);
1837 port->xmit_cnt = port->xmit_head = port->xmit_tail = 0;
1838 spin_unlock_irqrestore(&port->lock, flags);
1839 tty_wakeup(tty);
1840
1841 func_exit();
1842 }
1843
1844
1845 static int sx_tiocmget(struct tty_struct *tty, struct file *file)
1846 {
1847 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1848 struct specialix_board * bp;
1849 unsigned char status;
1850 unsigned int result;
1851 unsigned long flags;
1852
1853 func_enter();
1854
1855 if (sx_paranoia_check(port, tty->name, __FUNCTION__)) {
1856 func_exit();
1857 return -ENODEV;
1858 }
1859
1860 bp = port_Board(port);
1861 spin_lock_irqsave (&bp->lock, flags);
1862 sx_out(bp, CD186x_CAR, port_No(port));
1863 status = sx_in(bp, CD186x_MSVR);
1864 spin_unlock_irqrestore(&bp->lock, flags);
1865 dprintk (SX_DEBUG_INIT, "Got msvr[%d] = %02x, car = %d.\n",
1866 port_No(port), status, sx_in (bp, CD186x_CAR));
1867 dprintk (SX_DEBUG_INIT, "sx_port = %p, port = %p\n", sx_port, port);
1868 if (SX_CRTSCTS(port->tty)) {
1869 result = /* (status & MSVR_RTS) ? */ TIOCM_DTR /* : 0) */
1870 | ((status & MSVR_DTR) ? TIOCM_RTS : 0)
1871 | ((status & MSVR_CD) ? TIOCM_CAR : 0)
1872 |/* ((status & MSVR_DSR) ? */ TIOCM_DSR /* : 0) */
1873 | ((status & MSVR_CTS) ? TIOCM_CTS : 0);
1874 } else {
1875 result = /* (status & MSVR_RTS) ? */ TIOCM_RTS /* : 0) */
1876 | ((status & MSVR_DTR) ? TIOCM_DTR : 0)
1877 | ((status & MSVR_CD) ? TIOCM_CAR : 0)
1878 |/* ((status & MSVR_DSR) ? */ TIOCM_DSR /* : 0) */
1879 | ((status & MSVR_CTS) ? TIOCM_CTS : 0);
1880 }
1881
1882 func_exit();
1883
1884 return result;
1885 }
1886
1887
1888 static int sx_tiocmset(struct tty_struct *tty, struct file *file,
1889 unsigned int set, unsigned int clear)
1890 {
1891 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
1892 unsigned long flags;
1893 struct specialix_board *bp;
1894
1895 func_enter();
1896
1897 if (sx_paranoia_check(port, tty->name, __FUNCTION__)) {
1898 func_exit();
1899 return -ENODEV;
1900 }
1901
1902 bp = port_Board(port);
1903
1904 spin_lock_irqsave(&port->lock, flags);
1905 /* if (set & TIOCM_RTS)
1906 port->MSVR |= MSVR_RTS; */
1907 /* if (set & TIOCM_DTR)
1908 port->MSVR |= MSVR_DTR; */
1909
1910 if (SX_CRTSCTS(port->tty)) {
1911 if (set & TIOCM_RTS)
1912 port->MSVR |= MSVR_DTR;
1913 } else {
1914 if (set & TIOCM_DTR)
1915 port->MSVR |= MSVR_DTR;
1916 }
1917
1918 /* if (clear & TIOCM_RTS)
1919 port->MSVR &= ~MSVR_RTS; */
1920 /* if (clear & TIOCM_DTR)
1921 port->MSVR &= ~MSVR_DTR; */
1922 if (SX_CRTSCTS(port->tty)) {
1923 if (clear & TIOCM_RTS)
1924 port->MSVR &= ~MSVR_DTR;
1925 } else {
1926 if (clear & TIOCM_DTR)
1927 port->MSVR &= ~MSVR_DTR;
1928 }
1929 spin_lock_irqsave(&bp->lock, flags);
1930 sx_out(bp, CD186x_CAR, port_No(port));
1931 sx_out(bp, CD186x_MSVR, port->MSVR);
1932 spin_unlock_irqrestore(&bp->lock, flags);
1933 spin_unlock_irqrestore(&port->lock, flags);
1934 func_exit();
1935 return 0;
1936 }
1937
1938
1939 static inline void sx_send_break(struct specialix_port * port, unsigned long length)
1940 {
1941 struct specialix_board *bp = port_Board(port);
1942 unsigned long flags;
1943
1944 func_enter();
1945
1946 spin_lock_irqsave (&port->lock, flags);
1947 port->break_length = SPECIALIX_TPS / HZ * length;
1948 port->COR2 |= COR2_ETC;
1949 port->IER |= IER_TXRDY;
1950 spin_lock_irqsave(&bp->lock, flags);
1951 sx_out(bp, CD186x_CAR, port_No(port));
1952 sx_out(bp, CD186x_COR2, port->COR2);
1953 sx_out(bp, CD186x_IER, port->IER);
1954 spin_unlock_irqrestore(&bp->lock, flags);
1955 spin_unlock_irqrestore (&port->lock, flags);
1956 sx_wait_CCR(bp);
1957 spin_lock_irqsave(&bp->lock, flags);
1958 sx_out(bp, CD186x_CCR, CCR_CORCHG2);
1959 spin_unlock_irqrestore(&bp->lock, flags);
1960 sx_wait_CCR(bp);
1961
1962 func_exit();
1963 }
1964
1965
1966 static inline int sx_set_serial_info(struct specialix_port * port,
1967 struct serial_struct __user * newinfo)
1968 {
1969 struct serial_struct tmp;
1970 struct specialix_board *bp = port_Board(port);
1971 int change_speed;
1972
1973 func_enter();
1974 /*
1975 if (!access_ok(VERIFY_READ, (void *) newinfo, sizeof(tmp))) {
1976 func_exit();
1977 return -EFAULT;
1978 }
1979 */
1980 if (copy_from_user(&tmp, newinfo, sizeof(tmp))) {
1981 func_enter();
1982 return -EFAULT;
1983 }
1984
1985 #if 0
1986 if ((tmp.irq != bp->irq) ||
1987 (tmp.port != bp->base) ||
1988 (tmp.type != PORT_CIRRUS) ||
1989 (tmp.baud_base != (SX_OSCFREQ + CD186x_TPC/2) / CD186x_TPC) ||
1990 (tmp.custom_divisor != 0) ||
1991 (tmp.xmit_fifo_size != CD186x_NFIFO) ||
1992 (tmp.flags & ~SPECIALIX_LEGAL_FLAGS)) {
1993 func_exit();
1994 return -EINVAL;
1995 }
1996 #endif
1997
1998 change_speed = ((port->flags & ASYNC_SPD_MASK) !=
1999 (tmp.flags & ASYNC_SPD_MASK));
2000 change_speed |= (tmp.custom_divisor != port->custom_divisor);
2001
2002 if (!capable(CAP_SYS_ADMIN)) {
2003 if ((tmp.close_delay != port->close_delay) ||
2004 (tmp.closing_wait != port->closing_wait) ||
2005 ((tmp.flags & ~ASYNC_USR_MASK) !=
2006 (port->flags & ~ASYNC_USR_MASK))) {
2007 func_exit();
2008 return -EPERM;
2009 }
2010 port->flags = ((port->flags & ~ASYNC_USR_MASK) |
2011 (tmp.flags & ASYNC_USR_MASK));
2012 port->custom_divisor = tmp.custom_divisor;
2013 } else {
2014 port->flags = ((port->flags & ~ASYNC_FLAGS) |
2015 (tmp.flags & ASYNC_FLAGS));
2016 port->close_delay = tmp.close_delay;
2017 port->closing_wait = tmp.closing_wait;
2018 port->custom_divisor = tmp.custom_divisor;
2019 }
2020 if (change_speed) {
2021 sx_change_speed(bp, port);
2022 }
2023 func_exit();
2024 return 0;
2025 }
2026
2027
2028 static inline int sx_get_serial_info(struct specialix_port * port,
2029 struct serial_struct __user *retinfo)
2030 {
2031 struct serial_struct tmp;
2032 struct specialix_board *bp = port_Board(port);
2033
2034 func_enter();
2035
2036 /*
2037 if (!access_ok(VERIFY_WRITE, (void *) retinfo, sizeof(tmp)))
2038 return -EFAULT;
2039 */
2040
2041 memset(&tmp, 0, sizeof(tmp));
2042 tmp.type = PORT_CIRRUS;
2043 tmp.line = port - sx_port;
2044 tmp.port = bp->base;
2045 tmp.irq = bp->irq;
2046 tmp.flags = port->flags;
2047 tmp.baud_base = (SX_OSCFREQ + CD186x_TPC/2) / CD186x_TPC;
2048 tmp.close_delay = port->close_delay * HZ/100;
2049 tmp.closing_wait = port->closing_wait * HZ/100;
2050 tmp.custom_divisor = port->custom_divisor;
2051 tmp.xmit_fifo_size = CD186x_NFIFO;
2052 if (copy_to_user(retinfo, &tmp, sizeof(tmp))) {
2053 func_exit();
2054 return -EFAULT;
2055 }
2056
2057 func_exit();
2058 return 0;
2059 }
2060
2061
2062 static int sx_ioctl(struct tty_struct * tty, struct file * filp,
2063 unsigned int cmd, unsigned long arg)
2064 {
2065 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2066 int retval;
2067 void __user *argp = (void __user *)arg;
2068
2069 func_enter();
2070
2071 if (sx_paranoia_check(port, tty->name, "sx_ioctl")) {
2072 func_exit();
2073 return -ENODEV;
2074 }
2075
2076 switch (cmd) {
2077 case TCSBRK: /* SVID version: non-zero arg --> no break */
2078 retval = tty_check_change(tty);
2079 if (retval) {
2080 func_exit();
2081 return retval;
2082 }
2083 tty_wait_until_sent(tty, 0);
2084 if (!arg)
2085 sx_send_break(port, HZ/4); /* 1/4 second */
2086 return 0;
2087 case TCSBRKP: /* support for POSIX tcsendbreak() */
2088 retval = tty_check_change(tty);
2089 if (retval) {
2090 func_exit();
2091 return retval;
2092 }
2093 tty_wait_until_sent(tty, 0);
2094 sx_send_break(port, arg ? arg*(HZ/10) : HZ/4);
2095 func_exit();
2096 return 0;
2097 case TIOCGSOFTCAR:
2098 if (put_user(C_CLOCAL(tty)?1:0, (unsigned long __user *)argp)) {
2099 func_exit();
2100 return -EFAULT;
2101 }
2102 func_exit();
2103 return 0;
2104 case TIOCSSOFTCAR:
2105 if (get_user(arg, (unsigned long __user *) argp)) {
2106 func_exit();
2107 return -EFAULT;
2108 }
2109 tty->termios->c_cflag =
2110 ((tty->termios->c_cflag & ~CLOCAL) |
2111 (arg ? CLOCAL : 0));
2112 func_exit();
2113 return 0;
2114 case TIOCGSERIAL:
2115 func_exit();
2116 return sx_get_serial_info(port, argp);
2117 case TIOCSSERIAL:
2118 func_exit();
2119 return sx_set_serial_info(port, argp);
2120 default:
2121 func_exit();
2122 return -ENOIOCTLCMD;
2123 }
2124 func_exit();
2125 return 0;
2126 }
2127
2128
2129 static void sx_throttle(struct tty_struct * tty)
2130 {
2131 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2132 struct specialix_board *bp;
2133 unsigned long flags;
2134
2135 func_enter();
2136
2137 if (sx_paranoia_check(port, tty->name, "sx_throttle")) {
2138 func_exit();
2139 return;
2140 }
2141
2142 bp = port_Board(port);
2143
2144 /* Use DTR instead of RTS ! */
2145 if (SX_CRTSCTS (tty))
2146 port->MSVR &= ~MSVR_DTR;
2147 else {
2148 /* Auch!!! I think the system shouldn't call this then. */
2149 /* Or maybe we're supposed (allowed?) to do our side of hw
2150 handshake anyway, even when hardware handshake is off.
2151 When you see this in your logs, please report.... */
2152 printk (KERN_ERR "sx%d: Need to throttle, but can't (hardware hs is off)\n",
2153 port_No (port));
2154 }
2155 spin_lock_irqsave(&bp->lock, flags);
2156 sx_out(bp, CD186x_CAR, port_No(port));
2157 spin_unlock_irqrestore(&bp->lock, flags);
2158 if (I_IXOFF(tty)) {
2159 spin_unlock_irqrestore(&bp->lock, flags);
2160 sx_wait_CCR(bp);
2161 spin_lock_irqsave(&bp->lock, flags);
2162 sx_out(bp, CD186x_CCR, CCR_SSCH2);
2163 spin_unlock_irqrestore(&bp->lock, flags);
2164 sx_wait_CCR(bp);
2165 }
2166 spin_lock_irqsave(&bp->lock, flags);
2167 sx_out(bp, CD186x_MSVR, port->MSVR);
2168 spin_unlock_irqrestore(&bp->lock, flags);
2169
2170 func_exit();
2171 }
2172
2173
2174 static void sx_unthrottle(struct tty_struct * tty)
2175 {
2176 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2177 struct specialix_board *bp;
2178 unsigned long flags;
2179
2180 func_enter();
2181
2182 if (sx_paranoia_check(port, tty->name, "sx_unthrottle")) {
2183 func_exit();
2184 return;
2185 }
2186
2187 bp = port_Board(port);
2188
2189 spin_lock_irqsave(&port->lock, flags);
2190 /* XXXX Use DTR INSTEAD???? */
2191 if (SX_CRTSCTS(tty)) {
2192 port->MSVR |= MSVR_DTR;
2193 } /* Else clause: see remark in "sx_throttle"... */
2194 spin_lock_irqsave(&bp->lock, flags);
2195 sx_out(bp, CD186x_CAR, port_No(port));
2196 spin_unlock_irqrestore(&bp->lock, flags);
2197 if (I_IXOFF(tty)) {
2198 spin_unlock_irqrestore(&port->lock, flags);
2199 sx_wait_CCR(bp);
2200 spin_lock_irqsave(&bp->lock, flags);
2201 sx_out(bp, CD186x_CCR, CCR_SSCH1);
2202 spin_unlock_irqrestore(&bp->lock, flags);
2203 sx_wait_CCR(bp);
2204 spin_lock_irqsave(&port->lock, flags);
2205 }
2206 spin_lock_irqsave(&bp->lock, flags);
2207 sx_out(bp, CD186x_MSVR, port->MSVR);
2208 spin_unlock_irqrestore(&bp->lock, flags);
2209 spin_unlock_irqrestore(&port->lock, flags);
2210
2211 func_exit();
2212 }
2213
2214
2215 static void sx_stop(struct tty_struct * tty)
2216 {
2217 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2218 struct specialix_board *bp;
2219 unsigned long flags;
2220
2221 func_enter();
2222
2223 if (sx_paranoia_check(port, tty->name, "sx_stop")) {
2224 func_exit();
2225 return;
2226 }
2227
2228 bp = port_Board(port);
2229
2230 spin_lock_irqsave(&port->lock, flags);
2231 port->IER &= ~IER_TXRDY;
2232 spin_lock_irqsave(&bp->lock, flags);
2233 sx_out(bp, CD186x_CAR, port_No(port));
2234 sx_out(bp, CD186x_IER, port->IER);
2235 spin_unlock_irqrestore(&bp->lock, flags);
2236 spin_unlock_irqrestore(&port->lock, flags);
2237
2238 func_exit();
2239 }
2240
2241
2242 static void sx_start(struct tty_struct * tty)
2243 {
2244 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2245 struct specialix_board *bp;
2246 unsigned long flags;
2247
2248 func_enter();
2249
2250 if (sx_paranoia_check(port, tty->name, "sx_start")) {
2251 func_exit();
2252 return;
2253 }
2254
2255 bp = port_Board(port);
2256
2257 spin_lock_irqsave(&port->lock, flags);
2258 if (port->xmit_cnt && port->xmit_buf && !(port->IER & IER_TXRDY)) {
2259 port->IER |= IER_TXRDY;
2260 spin_lock_irqsave(&bp->lock, flags);
2261 sx_out(bp, CD186x_CAR, port_No(port));
2262 sx_out(bp, CD186x_IER, port->IER);
2263 spin_unlock_irqrestore(&bp->lock, flags);
2264 }
2265 spin_unlock_irqrestore(&port->lock, flags);
2266
2267 func_exit();
2268 }
2269
2270
2271 /*
2272 * This routine is called from the work-queue when the interrupt
2273 * routine has signalled that a hangup has occurred. The path of
2274 * hangup processing is:
2275 *
2276 * serial interrupt routine -> (workqueue) ->
2277 * do_sx_hangup() -> tty->hangup() -> sx_hangup()
2278 *
2279 */
2280 static void do_sx_hangup(void *private_)
2281 {
2282 struct specialix_port *port = (struct specialix_port *) private_;
2283 struct tty_struct *tty;
2284
2285 func_enter();
2286
2287 tty = port->tty;
2288 if (tty)
2289 tty_hangup(tty); /* FIXME: module removal race here */
2290
2291 func_exit();
2292 }
2293
2294
2295 static void sx_hangup(struct tty_struct * tty)
2296 {
2297 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2298 struct specialix_board *bp;
2299 unsigned long flags;
2300
2301 func_enter();
2302
2303 if (sx_paranoia_check(port, tty->name, "sx_hangup")) {
2304 func_exit();
2305 return;
2306 }
2307
2308 bp = port_Board(port);
2309
2310 sx_shutdown_port(bp, port);
2311 spin_lock_irqsave(&port->lock, flags);
2312 port->event = 0;
2313 bp->count -= port->count;
2314 if (bp->count < 0) {
2315 printk(KERN_ERR "sx%d: sx_hangup: bad board count: %d port: %d\n",
2316 board_No(bp), bp->count, tty->index);
2317 bp->count = 0;
2318 }
2319 port->count = 0;
2320 port->flags &= ~ASYNC_NORMAL_ACTIVE;
2321 port->tty = NULL;
2322 spin_unlock_irqrestore(&port->lock, flags);
2323 wake_up_interruptible(&port->open_wait);
2324
2325 func_exit();
2326 }
2327
2328
2329 static void sx_set_termios(struct tty_struct * tty, struct termios * old_termios)
2330 {
2331 struct specialix_port *port = (struct specialix_port *)tty->driver_data;
2332 unsigned long flags;
2333 struct specialix_board * bp;
2334
2335 if (sx_paranoia_check(port, tty->name, "sx_set_termios"))
2336 return;
2337
2338 if (tty->termios->c_cflag == old_termios->c_cflag &&
2339 tty->termios->c_iflag == old_termios->c_iflag)
2340 return;
2341
2342 bp = port_Board(port);
2343 spin_lock_irqsave(&port->lock, flags);
2344 sx_change_speed(port_Board(port), port);
2345 spin_unlock_irqrestore(&port->lock, flags);
2346
2347 if ((old_termios->c_cflag & CRTSCTS) &&
2348 !(tty->termios->c_cflag & CRTSCTS)) {
2349 tty->hw_stopped = 0;
2350 sx_start(tty);
2351 }
2352 }
2353
2354
2355 static void do_softint(void *private_)
2356 {
2357 struct specialix_port *port = (struct specialix_port *) private_;
2358 struct tty_struct *tty;
2359
2360 func_enter();
2361
2362 if(!(tty = port->tty)) {
2363 func_exit();
2364 return;
2365 }
2366
2367 if (test_and_clear_bit(RS_EVENT_WRITE_WAKEUP, &port->event)) {
2368 tty_wakeup(tty);
2369 //wake_up_interruptible(&tty->write_wait);
2370 }
2371
2372 func_exit();
2373 }
2374
2375 static struct tty_operations sx_ops = {
2376 .open = sx_open,
2377 .close = sx_close,
2378 .write = sx_write,
2379 .put_char = sx_put_char,
2380 .flush_chars = sx_flush_chars,
2381 .write_room = sx_write_room,
2382 .chars_in_buffer = sx_chars_in_buffer,
2383 .flush_buffer = sx_flush_buffer,
2384 .ioctl = sx_ioctl,
2385 .throttle = sx_throttle,
2386 .unthrottle = sx_unthrottle,
2387 .set_termios = sx_set_termios,
2388 .stop = sx_stop,
2389 .start = sx_start,
2390 .hangup = sx_hangup,
2391 .tiocmget = sx_tiocmget,
2392 .tiocmset = sx_tiocmset,
2393 };
2394
2395 static int sx_init_drivers(void)
2396 {
2397 int error;
2398 int i;
2399
2400 func_enter();
2401
2402 specialix_driver = alloc_tty_driver(SX_NBOARD * SX_NPORT);
2403 if (!specialix_driver) {
2404 printk(KERN_ERR "sx: Couldn't allocate tty_driver.\n");
2405 func_exit();
2406 return 1;
2407 }
2408
2409 if (!(tmp_buf = (unsigned char *) get_zeroed_page(GFP_KERNEL))) {
2410 printk(KERN_ERR "sx: Couldn't get free page.\n");
2411 put_tty_driver(specialix_driver);
2412 func_exit();
2413 return 1;
2414 }
2415 specialix_driver->owner = THIS_MODULE;
2416 specialix_driver->name = "ttyW";
2417 specialix_driver->major = SPECIALIX_NORMAL_MAJOR;
2418 specialix_driver->type = TTY_DRIVER_TYPE_SERIAL;
2419 specialix_driver->subtype = SERIAL_TYPE_NORMAL;
2420 specialix_driver->init_termios = tty_std_termios;
2421 specialix_driver->init_termios.c_cflag =
2422 B9600 | CS8 | CREAD | HUPCL | CLOCAL;
2423 specialix_driver->flags = TTY_DRIVER_REAL_RAW;
2424 tty_set_operations(specialix_driver, &sx_ops);
2425
2426 if ((error = tty_register_driver(specialix_driver))) {
2427 put_tty_driver(specialix_driver);
2428 free_page((unsigned long)tmp_buf);
2429 printk(KERN_ERR "sx: Couldn't register specialix IO8+ driver, error = %d\n",
2430 error);
2431 func_exit();
2432 return 1;
2433 }
2434 memset(sx_port, 0, sizeof(sx_port));
2435 for (i = 0; i < SX_NPORT * SX_NBOARD; i++) {
2436 sx_port[i].magic = SPECIALIX_MAGIC;
2437 INIT_WORK(&sx_port[i].tqueue, do_softint, &sx_port[i]);
2438 INIT_WORK(&sx_port[i].tqueue_hangup, do_sx_hangup, &sx_port[i]);
2439 sx_port[i].close_delay = 50 * HZ/100;
2440 sx_port[i].closing_wait = 3000 * HZ/100;
2441 init_waitqueue_head(&sx_port[i].open_wait);
2442 init_waitqueue_head(&sx_port[i].close_wait);
2443 spin_lock_init(&sx_port[i].lock);
2444 }
2445
2446 func_exit();
2447 return 0;
2448 }
2449
2450 static void sx_release_drivers(void)
2451 {
2452 func_enter();
2453
2454 free_page((unsigned long)tmp_buf);
2455 tty_unregister_driver(specialix_driver);
2456 put_tty_driver(specialix_driver);
2457 func_exit();
2458 }
2459
2460 /*
2461 * This routine must be called by kernel at boot time
2462 */
2463 static int __init specialix_init(void)
2464 {
2465 int i;
2466 int found = 0;
2467
2468 func_enter();
2469
2470 printk(KERN_INFO "sx: Specialix IO8+ driver v" VERSION ", (c) R.E.Wolff 1997/1998.\n");
2471 printk(KERN_INFO "sx: derived from work (c) D.Gorodchanin 1994-1996.\n");
2472 #ifdef CONFIG_SPECIALIX_RTSCTS
2473 printk (KERN_INFO "sx: DTR/RTS pin is always RTS.\n");
2474 #else
2475 printk (KERN_INFO "sx: DTR/RTS pin is RTS when CRTSCTS is on.\n");
2476 #endif
2477
2478 for (i = 0; i < SX_NBOARD; i++)
2479 spin_lock_init(&sx_board[i].lock);
2480
2481 if (sx_init_drivers()) {
2482 func_exit();
2483 return -EIO;
2484 }
2485
2486 for (i = 0; i < SX_NBOARD; i++)
2487 if (sx_board[i].base && !sx_probe(&sx_board[i]))
2488 found++;
2489
2490 #ifdef CONFIG_PCI
2491 {
2492 struct pci_dev *pdev = NULL;
2493
2494 i=0;
2495 while (i < SX_NBOARD) {
2496 if (sx_board[i].flags & SX_BOARD_PRESENT) {
2497 i++;
2498 continue;
2499 }
2500 pdev = pci_find_device (PCI_VENDOR_ID_SPECIALIX,
2501 PCI_DEVICE_ID_SPECIALIX_IO8,
2502 pdev);
2503 if (!pdev) break;
2504
2505 if (pci_enable_device(pdev))
2506 continue;
2507
2508 sx_board[i].irq = pdev->irq;
2509
2510 sx_board[i].base = pci_resource_start (pdev, 2);
2511
2512 sx_board[i].flags |= SX_BOARD_IS_PCI;
2513 if (!sx_probe(&sx_board[i]))
2514 found ++;
2515 }
2516 }
2517 #endif
2518
2519 if (!found) {
2520 sx_release_drivers();
2521 printk(KERN_INFO "sx: No specialix IO8+ boards detected.\n");
2522 func_exit();
2523 return -EIO;
2524 }
2525
2526 func_exit();
2527 return 0;
2528 }
2529
2530 static int iobase[SX_NBOARD] = {0,};
2531
2532 static int irq [SX_NBOARD] = {0,};
2533
2534 module_param_array(iobase, int, NULL, 0);
2535 module_param_array(irq, int, NULL, 0);
2536 module_param(sx_debug, int, 0);
2537 module_param(sx_rxfifo, int, 0);
2538 #ifdef SPECIALIX_TIMER
2539 module_param(sx_poll, int, 0);
2540 #endif
2541
2542 /*
2543 * You can setup up to 4 boards.
2544 * by specifying "iobase=0xXXX,0xXXX ..." as insmod parameter.
2545 * You should specify the IRQs too in that case "irq=....,...".
2546 *
2547 * More than 4 boards in one computer is not possible, as the card can
2548 * only use 4 different interrupts.
2549 *
2550 */
2551 static int __init specialix_init_module(void)
2552 {
2553 int i;
2554
2555 func_enter();
2556
2557 if (iobase[0] || iobase[1] || iobase[2] || iobase[3]) {
2558 for(i = 0; i < SX_NBOARD; i++) {
2559 sx_board[i].base = iobase[i];
2560 sx_board[i].irq = irq[i];
2561 sx_board[i].count= 0;
2562 }
2563 }
2564
2565 func_exit();
2566
2567 return specialix_init();
2568 }
2569
2570 static void __exit specialix_exit_module(void)
2571 {
2572 int i;
2573
2574 func_enter();
2575
2576 sx_release_drivers();
2577 for (i = 0; i < SX_NBOARD; i++)
2578 if (sx_board[i].flags & SX_BOARD_PRESENT)
2579 sx_release_io_range(&sx_board[i]);
2580 #ifdef SPECIALIX_TIMER
2581 del_timer (&missed_irq_timer);
2582 #endif
2583
2584 func_exit();
2585 }
2586
2587 static struct pci_device_id specialx_pci_tbl[] __devinitdata = {
2588 { PCI_DEVICE(PCI_VENDOR_ID_SPECIALIX, PCI_DEVICE_ID_SPECIALIX_IO8) },
2589 { }
2590 };
2591 MODULE_DEVICE_TABLE(pci, specialx_pci_tbl);
2592
2593 module_init(specialix_init_module);
2594 module_exit(specialix_exit_module);
2595
2596 MODULE_LICENSE("GPL");
Mirror for ia64_pv_ops.git