Merge tag 'for_linus' of git://git.kernel.org/pub/scm/linux/kernel/git/mst/vhost
[linux-2.6-microblaze.git] / drivers / tty / amiserial.c
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Serial driver for the amiga builtin port.
4  *
5  * This code was created by taking serial.c version 4.30 from kernel
6  * release 2.3.22, replacing all hardware related stuff with the
7  * corresponding amiga hardware actions, and removing all irrelevant
8  * code. As a consequence, it uses many of the constants and names
9  * associated with the registers and bits of 16550 compatible UARTS -
10  * but only to keep track of status, etc in the state variables. It
11  * was done this was to make it easier to keep the code in line with
12  * (non hardware specific) changes to serial.c.
13  *
14  * The port is registered with the tty driver as minor device 64, and
15  * therefore other ports should should only use 65 upwards.
16  *
17  * Richard Lucock 28/12/99
18  *
19  *  Copyright (C) 1991, 1992  Linus Torvalds
20  *  Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 
21  *              1998, 1999  Theodore Ts'o
22  *
23  */
24
25 #include <linux/delay.h>
26
27 /* Set of debugging defines */
28
29 #undef SERIAL_DEBUG_INTR
30 #undef SERIAL_DEBUG_OPEN
31 #undef SERIAL_DEBUG_FLOW
32 #undef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
33
34 /* Sanity checks */
35
36 #if defined(MODULE) && defined(SERIAL_DEBUG_MCOUNT)
37 #define DBG_CNT(s) printk("(%s): [%x] refc=%d, serc=%d, ttyc=%d -> %s\n", \
38  tty->name, (info->tport.flags), serial_driver->refcount,info->count,tty->count,s)
39 #else
40 #define DBG_CNT(s)
41 #endif
42
43 /*
44  * End of serial driver configuration section.
45  */
46
47 #include <linux/module.h>
48
49 #include <linux/types.h>
50 #include <linux/serial.h>
51 #include <linux/serial_reg.h>
52 static char *serial_version = "4.30";
53
54 #include <linux/errno.h>
55 #include <linux/signal.h>
56 #include <linux/sched.h>
57 #include <linux/kernel.h>
58 #include <linux/timer.h>
59 #include <linux/interrupt.h>
60 #include <linux/tty.h>
61 #include <linux/tty_flip.h>
62 #include <linux/circ_buf.h>
63 #include <linux/console.h>
64 #include <linux/major.h>
65 #include <linux/string.h>
66 #include <linux/fcntl.h>
67 #include <linux/ptrace.h>
68 #include <linux/ioport.h>
69 #include <linux/mm.h>
70 #include <linux/seq_file.h>
71 #include <linux/slab.h>
72 #include <linux/init.h>
73 #include <linux/bitops.h>
74 #include <linux/platform_device.h>
75
76 #include <asm/setup.h>
77
78
79 #include <asm/irq.h>
80
81 #include <asm/amigahw.h>
82 #include <asm/amigaints.h>
83
84 struct serial_state {
85         struct tty_port         tport;
86         struct circ_buf         xmit;
87         struct async_icount     icount;
88
89         unsigned long           port;
90         int                     baud_base;
91         int                     xmit_fifo_size;
92         int                     custom_divisor;
93         int                     read_status_mask;
94         int                     ignore_status_mask;
95         int                     timeout;
96         int                     quot;
97         int                     IER;    /* Interrupt Enable Register */
98         int                     MCR;    /* Modem control register */
99         int                     x_char; /* xon/xoff character */
100 };
101
102 #define custom amiga_custom
103 static char *serial_name = "Amiga-builtin serial driver";
104
105 static struct tty_driver *serial_driver;
106
107 /* number of characters left in xmit buffer before we ask for more */
108 #define WAKEUP_CHARS 256
109
110 static unsigned char current_ctl_bits;
111
112 static void change_speed(struct tty_struct *tty, struct serial_state *info,
113                 struct ktermios *old);
114 static void rs_wait_until_sent(struct tty_struct *tty, int timeout);
115
116
117 static struct serial_state rs_table[1];
118
119 #define NR_PORTS ARRAY_SIZE(rs_table)
120
121 #include <linux/uaccess.h>
122
123 #define serial_isroot() (capable(CAP_SYS_ADMIN))
124
125 /* some serial hardware definitions */
126 #define SDR_OVRUN   (1<<15)
127 #define SDR_RBF     (1<<14)
128 #define SDR_TBE     (1<<13)
129 #define SDR_TSRE    (1<<12)
130
131 #define SERPER_PARENB    (1<<15)
132
133 #define AC_SETCLR   (1<<15)
134 #define AC_UARTBRK  (1<<11)
135
136 #define SER_DTR     (1<<7)
137 #define SER_RTS     (1<<6)
138 #define SER_DCD     (1<<5)
139 #define SER_CTS     (1<<4)
140 #define SER_DSR     (1<<3)
141
142 static __inline__ void rtsdtr_ctrl(int bits)
143 {
144     ciab.pra = ((bits & (SER_RTS | SER_DTR)) ^ (SER_RTS | SER_DTR)) | (ciab.pra & ~(SER_RTS | SER_DTR));
145 }
146
147 /*
148  * ------------------------------------------------------------
149  * rs_stop() and rs_start()
150  *
151  * This routines are called before setting or resetting tty->flow.stopped.
152  * They enable or disable transmitter interrupts, as necessary.
153  * ------------------------------------------------------------
154  */
155 static void rs_stop(struct tty_struct *tty)
156 {
157         struct serial_state *info = tty->driver_data;
158         unsigned long flags;
159
160         local_irq_save(flags);
161         if (info->IER & UART_IER_THRI) {
162                 info->IER &= ~UART_IER_THRI;
163                 /* disable Tx interrupt and remove any pending interrupts */
164                 custom.intena = IF_TBE;
165                 mb();
166                 custom.intreq = IF_TBE;
167                 mb();
168         }
169         local_irq_restore(flags);
170 }
171
172 static void rs_start(struct tty_struct *tty)
173 {
174         struct serial_state *info = tty->driver_data;
175         unsigned long flags;
176
177         local_irq_save(flags);
178         if (info->xmit.head != info->xmit.tail
179             && info->xmit.buf
180             && !(info->IER & UART_IER_THRI)) {
181                 info->IER |= UART_IER_THRI;
182                 custom.intena = IF_SETCLR | IF_TBE;
183                 mb();
184                 /* set a pending Tx Interrupt, transmitter should restart now */
185                 custom.intreq = IF_SETCLR | IF_TBE;
186                 mb();
187         }
188         local_irq_restore(flags);
189 }
190
191 /*
192  * ----------------------------------------------------------------------
193  *
194  * Here starts the interrupt handling routines.  All of the following
195  * subroutines are declared as inline and are folded into
196  * rs_interrupt().  They were separated out for readability's sake.
197  *
198  * Note: rs_interrupt() is a "fast" interrupt, which means that it
199  * runs with interrupts turned off.  People who may want to modify
200  * rs_interrupt() should try to keep the interrupt handler as fast as
201  * possible.  After you are done making modifications, it is not a bad
202  * idea to do:
203  * 
204  * gcc -S -DKERNEL -Wall -Wstrict-prototypes -O6 -fomit-frame-pointer serial.c
205  *
206  * and look at the resulting assemble code in serial.s.
207  *
208  *                              - Ted Ts'o (tytso@mit.edu), 7-Mar-93
209  * -----------------------------------------------------------------------
210  */
211
212 static void receive_chars(struct serial_state *info)
213 {
214         int status;
215         int serdatr;
216         unsigned char ch, flag;
217         struct  async_icount *icount;
218         int oe = 0;
219
220         icount = &info->icount;
221
222         status = UART_LSR_DR; /* We obviously have a character! */
223         serdatr = custom.serdatr;
224         mb();
225         custom.intreq = IF_RBF;
226         mb();
227
228         if((serdatr & 0x1ff) == 0)
229             status |= UART_LSR_BI;
230         if(serdatr & SDR_OVRUN)
231             status |= UART_LSR_OE;
232
233         ch = serdatr & 0xff;
234         icount->rx++;
235
236 #ifdef SERIAL_DEBUG_INTR
237         printk("DR%02x:%02x...", ch, status);
238 #endif
239         flag = TTY_NORMAL;
240
241         /*
242          * We don't handle parity or frame errors - but I have left
243          * the code in, since I'm not sure that the errors can't be
244          * detected.
245          */
246
247         if (status & (UART_LSR_BI | UART_LSR_PE |
248                       UART_LSR_FE | UART_LSR_OE)) {
249           /*
250            * For statistics only
251            */
252           if (status & UART_LSR_BI) {
253             status &= ~(UART_LSR_FE | UART_LSR_PE);
254             icount->brk++;
255           } else if (status & UART_LSR_PE)
256             icount->parity++;
257           else if (status & UART_LSR_FE)
258             icount->frame++;
259           if (status & UART_LSR_OE)
260             icount->overrun++;
261
262           /*
263            * Now check to see if character should be
264            * ignored, and mask off conditions which
265            * should be ignored.
266            */
267           if (status & info->ignore_status_mask)
268             goto out;
269
270           status &= info->read_status_mask;
271
272           if (status & (UART_LSR_BI)) {
273 #ifdef SERIAL_DEBUG_INTR
274             printk("handling break....");
275 #endif
276             flag = TTY_BREAK;
277             if (info->tport.flags & ASYNC_SAK)
278               do_SAK(info->tport.tty);
279           } else if (status & UART_LSR_PE)
280             flag = TTY_PARITY;
281           else if (status & UART_LSR_FE)
282             flag = TTY_FRAME;
283           if (status & UART_LSR_OE) {
284             /*
285              * Overrun is special, since it's
286              * reported immediately, and doesn't
287              * affect the current character
288              */
289              oe = 1;
290           }
291         }
292         tty_insert_flip_char(&info->tport, ch, flag);
293         if (oe == 1)
294                 tty_insert_flip_char(&info->tport, 0, TTY_OVERRUN);
295         tty_flip_buffer_push(&info->tport);
296 out:
297         return;
298 }
299
300 static void transmit_chars(struct serial_state *info)
301 {
302         custom.intreq = IF_TBE;
303         mb();
304         if (info->x_char) {
305                 custom.serdat = info->x_char | 0x100;
306                 mb();
307                 info->icount.tx++;
308                 info->x_char = 0;
309                 return;
310         }
311         if (info->xmit.head == info->xmit.tail
312             || info->tport.tty->flow.stopped
313             || info->tport.tty->hw_stopped) {
314                 info->IER &= ~UART_IER_THRI;
315                 custom.intena = IF_TBE;
316                 mb();
317                 return;
318         }
319
320         custom.serdat = info->xmit.buf[info->xmit.tail++] | 0x100;
321         mb();
322         info->xmit.tail = info->xmit.tail & (SERIAL_XMIT_SIZE-1);
323         info->icount.tx++;
324
325         if (CIRC_CNT(info->xmit.head,
326                      info->xmit.tail,
327                      SERIAL_XMIT_SIZE) < WAKEUP_CHARS)
328                 tty_wakeup(info->tport.tty);
329
330 #ifdef SERIAL_DEBUG_INTR
331         printk("THRE...");
332 #endif
333         if (info->xmit.head == info->xmit.tail) {
334                 custom.intena = IF_TBE;
335                 mb();
336                 info->IER &= ~UART_IER_THRI;
337         }
338 }
339
340 static void check_modem_status(struct serial_state *info)
341 {
342         struct tty_port *port = &info->tport;
343         unsigned char status = ciab.pra & (SER_DCD | SER_CTS | SER_DSR);
344         unsigned char dstatus;
345         struct  async_icount *icount;
346
347         /* Determine bits that have changed */
348         dstatus = status ^ current_ctl_bits;
349         current_ctl_bits = status;
350
351         if (dstatus) {
352                 icount = &info->icount;
353                 /* update input line counters */
354                 if (dstatus & SER_DSR)
355                         icount->dsr++;
356                 if (dstatus & SER_DCD) {
357                         icount->dcd++;
358                 }
359                 if (dstatus & SER_CTS)
360                         icount->cts++;
361                 wake_up_interruptible(&port->delta_msr_wait);
362         }
363
364         if (tty_port_check_carrier(port) && (dstatus & SER_DCD)) {
365 #if (defined(SERIAL_DEBUG_OPEN) || defined(SERIAL_DEBUG_INTR))
366                 printk("ttyS%d CD now %s...", info->line,
367                        (!(status & SER_DCD)) ? "on" : "off");
368 #endif
369                 if (!(status & SER_DCD))
370                         wake_up_interruptible(&port->open_wait);
371                 else {
372 #ifdef SERIAL_DEBUG_OPEN
373                         printk("doing serial hangup...");
374 #endif
375                         if (port->tty)
376                                 tty_hangup(port->tty);
377                 }
378         }
379         if (tty_port_cts_enabled(port)) {
380                 if (port->tty->hw_stopped) {
381                         if (!(status & SER_CTS)) {
382 #if (defined(SERIAL_DEBUG_INTR) || defined(SERIAL_DEBUG_FLOW))
383                                 printk("CTS tx start...");
384 #endif
385                                 port->tty->hw_stopped = 0;
386                                 info->IER |= UART_IER_THRI;
387                                 custom.intena = IF_SETCLR | IF_TBE;
388                                 mb();
389                                 /* set a pending Tx Interrupt, transmitter should restart now */
390                                 custom.intreq = IF_SETCLR | IF_TBE;
391                                 mb();
392                                 tty_wakeup(port->tty);
393                                 return;
394                         }
395                 } else {
396                         if ((status & SER_CTS)) {
397 #if (defined(SERIAL_DEBUG_INTR) || defined(SERIAL_DEBUG_FLOW))
398                                 printk("CTS tx stop...");
399 #endif
400                                 port->tty->hw_stopped = 1;
401                                 info->IER &= ~UART_IER_THRI;
402                                 /* disable Tx interrupt and remove any pending interrupts */
403                                 custom.intena = IF_TBE;
404                                 mb();
405                                 custom.intreq = IF_TBE;
406                                 mb();
407                         }
408                 }
409         }
410 }
411
412 static irqreturn_t ser_vbl_int( int irq, void *data)
413 {
414         /* vbl is just a periodic interrupt we tie into to update modem status */
415         struct serial_state *info = data;
416         /*
417          * TBD - is it better to unregister from this interrupt or to
418          * ignore it if MSI is clear ?
419          */
420         if(info->IER & UART_IER_MSI)
421           check_modem_status(info);
422         return IRQ_HANDLED;
423 }
424
425 static irqreturn_t ser_rx_int(int irq, void *dev_id)
426 {
427         struct serial_state *info = dev_id;
428
429 #ifdef SERIAL_DEBUG_INTR
430         printk("ser_rx_int...");
431 #endif
432
433         if (!info->tport.tty)
434                 return IRQ_NONE;
435
436         receive_chars(info);
437 #ifdef SERIAL_DEBUG_INTR
438         printk("end.\n");
439 #endif
440         return IRQ_HANDLED;
441 }
442
443 static irqreturn_t ser_tx_int(int irq, void *dev_id)
444 {
445         struct serial_state *info = dev_id;
446
447         if (custom.serdatr & SDR_TBE) {
448 #ifdef SERIAL_DEBUG_INTR
449           printk("ser_tx_int...");
450 #endif
451
452           if (!info->tport.tty)
453                 return IRQ_NONE;
454
455           transmit_chars(info);
456 #ifdef SERIAL_DEBUG_INTR
457           printk("end.\n");
458 #endif
459         }
460         return IRQ_HANDLED;
461 }
462
463 /*
464  * -------------------------------------------------------------------
465  * Here ends the serial interrupt routines.
466  * -------------------------------------------------------------------
467  */
468
469 /*
470  * ---------------------------------------------------------------
471  * Low level utility subroutines for the serial driver:  routines to
472  * figure out the appropriate timeout for an interrupt chain, routines
473  * to initialize and startup a serial port, and routines to shutdown a
474  * serial port.  Useful stuff like that.
475  * ---------------------------------------------------------------
476  */
477
478 static int startup(struct tty_struct *tty, struct serial_state *info)
479 {
480         struct tty_port *port = &info->tport;
481         unsigned long flags;
482         int     retval=0;
483         unsigned long page;
484
485         page = get_zeroed_page(GFP_KERNEL);
486         if (!page)
487                 return -ENOMEM;
488
489         local_irq_save(flags);
490
491         if (tty_port_initialized(port)) {
492                 free_page(page);
493                 goto errout;
494         }
495
496         if (info->xmit.buf)
497                 free_page(page);
498         else
499                 info->xmit.buf = (unsigned char *) page;
500
501 #ifdef SERIAL_DEBUG_OPEN
502         printk("starting up ttys%d ...", info->line);
503 #endif
504
505         /* Clear anything in the input buffer */
506
507         custom.intreq = IF_RBF;
508         mb();
509
510         retval = request_irq(IRQ_AMIGA_VERTB, ser_vbl_int, 0, "serial status", info);
511         if (retval) {
512           if (serial_isroot()) {
513               set_bit(TTY_IO_ERROR, &tty->flags);
514             retval = 0;
515           }
516           goto errout;
517         }
518
519         /* enable both Rx and Tx interrupts */
520         custom.intena = IF_SETCLR | IF_RBF | IF_TBE;
521         mb();
522         info->IER = UART_IER_MSI;
523
524         /* remember current state of the DCD and CTS bits */
525         current_ctl_bits = ciab.pra & (SER_DCD | SER_CTS | SER_DSR);
526
527         info->MCR = 0;
528         if (C_BAUD(tty))
529           info->MCR = SER_DTR | SER_RTS;
530         rtsdtr_ctrl(info->MCR);
531
532         clear_bit(TTY_IO_ERROR, &tty->flags);
533         info->xmit.head = info->xmit.tail = 0;
534
535         /*
536          * and set the speed of the serial port
537          */
538         change_speed(tty, info, NULL);
539
540         tty_port_set_initialized(port, 1);
541         local_irq_restore(flags);
542         return 0;
543
544 errout:
545         local_irq_restore(flags);
546         return retval;
547 }
548
549 /*
550  * This routine will shutdown a serial port; interrupts are disabled, and
551  * DTR is dropped if the hangup on close termio flag is on.
552  */
553 static void shutdown(struct tty_struct *tty, struct serial_state *info)
554 {
555         unsigned long   flags;
556         struct serial_state *state;
557
558         if (!tty_port_initialized(&info->tport))
559                 return;
560
561         state = info;
562
563 #ifdef SERIAL_DEBUG_OPEN
564         printk("Shutting down serial port %d ....\n", info->line);
565 #endif
566
567         local_irq_save(flags); /* Disable interrupts */
568
569         /*
570          * clear delta_msr_wait queue to avoid mem leaks: we may free the irq
571          * here so the queue might never be waken up
572          */
573         wake_up_interruptible(&info->tport.delta_msr_wait);
574
575         /*
576          * Free the IRQ, if necessary
577          */
578         free_irq(IRQ_AMIGA_VERTB, info);
579
580         if (info->xmit.buf) {
581                 free_page((unsigned long) info->xmit.buf);
582                 info->xmit.buf = NULL;
583         }
584
585         info->IER = 0;
586         custom.intena = IF_RBF | IF_TBE;
587         mb();
588
589         /* disable break condition */
590         custom.adkcon = AC_UARTBRK;
591         mb();
592
593         if (C_HUPCL(tty))
594                 info->MCR &= ~(SER_DTR|SER_RTS);
595         rtsdtr_ctrl(info->MCR);
596
597         set_bit(TTY_IO_ERROR, &tty->flags);
598
599         tty_port_set_initialized(&info->tport, 0);
600         local_irq_restore(flags);
601 }
602
603
604 /*
605  * This routine is called to set the UART divisor registers to match
606  * the specified baud rate for a serial port.
607  */
608 static void change_speed(struct tty_struct *tty, struct serial_state *info,
609                          struct ktermios *old_termios)
610 {
611         struct tty_port *port = &info->tport;
612         int     quot = 0, baud_base, baud;
613         unsigned cflag, cval = 0;
614         int     bits;
615         unsigned long   flags;
616
617         cflag = tty->termios.c_cflag;
618
619         /* Byte size is always 8 bits plus parity bit if requested */
620
621         cval = 3; bits = 10;
622         if (cflag & CSTOPB) {
623                 cval |= 0x04;
624                 bits++;
625         }
626         if (cflag & PARENB) {
627                 cval |= UART_LCR_PARITY;
628                 bits++;
629         }
630         if (!(cflag & PARODD))
631                 cval |= UART_LCR_EPAR;
632 #ifdef CMSPAR
633         if (cflag & CMSPAR)
634                 cval |= UART_LCR_SPAR;
635 #endif
636
637         /* Determine divisor based on baud rate */
638         baud = tty_get_baud_rate(tty);
639         if (!baud)
640                 baud = 9600;    /* B0 transition handled in rs_set_termios */
641         baud_base = info->baud_base;
642         if (baud == 38400 && (port->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
643                 quot = info->custom_divisor;
644         else {
645                 if (baud == 134)
646                         /* Special case since 134 is really 134.5 */
647                         quot = (2*baud_base / 269);
648                 else if (baud)
649                         quot = baud_base / baud;
650         }
651         /* If the quotient is zero refuse the change */
652         if (!quot && old_termios) {
653                 /* FIXME: Will need updating for new tty in the end */
654                 tty->termios.c_cflag &= ~CBAUD;
655                 tty->termios.c_cflag |= (old_termios->c_cflag & CBAUD);
656                 baud = tty_get_baud_rate(tty);
657                 if (!baud)
658                         baud = 9600;
659                 if (baud == 38400 &&
660                     (port->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
661                         quot = info->custom_divisor;
662                 else {
663                         if (baud == 134)
664                                 /* Special case since 134 is really 134.5 */
665                                 quot = (2*baud_base / 269);
666                         else if (baud)
667                                 quot = baud_base / baud;
668                 }
669         }
670         /* As a last resort, if the quotient is zero, default to 9600 bps */
671         if (!quot)
672                 quot = baud_base / 9600;
673         info->quot = quot;
674         info->timeout = ((info->xmit_fifo_size*HZ*bits*quot) / baud_base);
675         info->timeout += HZ/50;         /* Add .02 seconds of slop */
676
677         /* CTS flow control flag and modem status interrupts */
678         info->IER &= ~UART_IER_MSI;
679         if (port->flags & ASYNC_HARDPPS_CD)
680                 info->IER |= UART_IER_MSI;
681         tty_port_set_cts_flow(port, cflag & CRTSCTS);
682         if (cflag & CRTSCTS)
683                 info->IER |= UART_IER_MSI;
684         tty_port_set_check_carrier(port, ~cflag & CLOCAL);
685         if (~cflag & CLOCAL)
686                 info->IER |= UART_IER_MSI;
687         /* TBD:
688          * Does clearing IER_MSI imply that we should disable the VBL interrupt ?
689          */
690
691         /*
692          * Set up parity check flag
693          */
694
695         info->read_status_mask = UART_LSR_OE | UART_LSR_DR;
696         if (I_INPCK(tty))
697                 info->read_status_mask |= UART_LSR_FE | UART_LSR_PE;
698         if (I_BRKINT(tty) || I_PARMRK(tty))
699                 info->read_status_mask |= UART_LSR_BI;
700
701         /*
702          * Characters to ignore
703          */
704         info->ignore_status_mask = 0;
705         if (I_IGNPAR(tty))
706                 info->ignore_status_mask |= UART_LSR_PE | UART_LSR_FE;
707         if (I_IGNBRK(tty)) {
708                 info->ignore_status_mask |= UART_LSR_BI;
709                 /*
710                  * If we're ignore parity and break indicators, ignore 
711                  * overruns too.  (For real raw support).
712                  */
713                 if (I_IGNPAR(tty))
714                         info->ignore_status_mask |= UART_LSR_OE;
715         }
716         /*
717          * !!! ignore all characters if CREAD is not set
718          */
719         if ((cflag & CREAD) == 0)
720                 info->ignore_status_mask |= UART_LSR_DR;
721         local_irq_save(flags);
722
723         {
724           short serper;
725
726         /* Set up the baud rate */
727           serper = quot - 1;
728
729         /* Enable or disable parity bit */
730
731         if(cval & UART_LCR_PARITY)
732           serper |= (SERPER_PARENB);
733
734         custom.serper = serper;
735         mb();
736         }
737
738         local_irq_restore(flags);
739 }
740
741 static int rs_put_char(struct tty_struct *tty, unsigned char ch)
742 {
743         struct serial_state *info;
744         unsigned long flags;
745
746         info = tty->driver_data;
747
748         if (!info->xmit.buf)
749                 return 0;
750
751         local_irq_save(flags);
752         if (CIRC_SPACE(info->xmit.head,
753                        info->xmit.tail,
754                        SERIAL_XMIT_SIZE) == 0) {
755                 local_irq_restore(flags);
756                 return 0;
757         }
758
759         info->xmit.buf[info->xmit.head++] = ch;
760         info->xmit.head &= SERIAL_XMIT_SIZE-1;
761         local_irq_restore(flags);
762         return 1;
763 }
764
765 static void rs_flush_chars(struct tty_struct *tty)
766 {
767         struct serial_state *info = tty->driver_data;
768         unsigned long flags;
769
770         if (info->xmit.head == info->xmit.tail
771             || tty->flow.stopped
772             || tty->hw_stopped
773             || !info->xmit.buf)
774                 return;
775
776         local_irq_save(flags);
777         info->IER |= UART_IER_THRI;
778         custom.intena = IF_SETCLR | IF_TBE;
779         mb();
780         /* set a pending Tx Interrupt, transmitter should restart now */
781         custom.intreq = IF_SETCLR | IF_TBE;
782         mb();
783         local_irq_restore(flags);
784 }
785
786 static int rs_write(struct tty_struct * tty, const unsigned char *buf, int count)
787 {
788         int     c, ret = 0;
789         struct serial_state *info = tty->driver_data;
790         unsigned long flags;
791
792         if (!info->xmit.buf)
793                 return 0;
794
795         local_irq_save(flags);
796         while (1) {
797                 c = CIRC_SPACE_TO_END(info->xmit.head,
798                                       info->xmit.tail,
799                                       SERIAL_XMIT_SIZE);
800                 if (count < c)
801                         c = count;
802                 if (c <= 0) {
803                         break;
804                 }
805                 memcpy(info->xmit.buf + info->xmit.head, buf, c);
806                 info->xmit.head = ((info->xmit.head + c) &
807                                    (SERIAL_XMIT_SIZE-1));
808                 buf += c;
809                 count -= c;
810                 ret += c;
811         }
812         local_irq_restore(flags);
813
814         if (info->xmit.head != info->xmit.tail
815             && !tty->flow.stopped
816             && !tty->hw_stopped
817             && !(info->IER & UART_IER_THRI)) {
818                 info->IER |= UART_IER_THRI;
819                 local_irq_disable();
820                 custom.intena = IF_SETCLR | IF_TBE;
821                 mb();
822                 /* set a pending Tx Interrupt, transmitter should restart now */
823                 custom.intreq = IF_SETCLR | IF_TBE;
824                 mb();
825                 local_irq_restore(flags);
826         }
827         return ret;
828 }
829
830 static unsigned int rs_write_room(struct tty_struct *tty)
831 {
832         struct serial_state *info = tty->driver_data;
833
834         return CIRC_SPACE(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
835 }
836
837 static unsigned int rs_chars_in_buffer(struct tty_struct *tty)
838 {
839         struct serial_state *info = tty->driver_data;
840
841         return CIRC_CNT(info->xmit.head, info->xmit.tail, SERIAL_XMIT_SIZE);
842 }
843
844 static void rs_flush_buffer(struct tty_struct *tty)
845 {
846         struct serial_state *info = tty->driver_data;
847         unsigned long flags;
848
849         local_irq_save(flags);
850         info->xmit.head = info->xmit.tail = 0;
851         local_irq_restore(flags);
852         tty_wakeup(tty);
853 }
854
855 /*
856  * This function is used to send a high-priority XON/XOFF character to
857  * the device
858  */
859 static void rs_send_xchar(struct tty_struct *tty, char ch)
860 {
861         struct serial_state *info = tty->driver_data;
862         unsigned long flags;
863
864         info->x_char = ch;
865         if (ch) {
866                 /* Make sure transmit interrupts are on */
867
868                 /* Check this ! */
869                 local_irq_save(flags);
870                 if(!(custom.intenar & IF_TBE)) {
871                     custom.intena = IF_SETCLR | IF_TBE;
872                     mb();
873                     /* set a pending Tx Interrupt, transmitter should restart now */
874                     custom.intreq = IF_SETCLR | IF_TBE;
875                     mb();
876                 }
877                 local_irq_restore(flags);
878
879                 info->IER |= UART_IER_THRI;
880         }
881 }
882
883 /*
884  * ------------------------------------------------------------
885  * rs_throttle()
886  * 
887  * This routine is called by the upper-layer tty layer to signal that
888  * incoming characters should be throttled.
889  * ------------------------------------------------------------
890  */
891 static void rs_throttle(struct tty_struct * tty)
892 {
893         struct serial_state *info = tty->driver_data;
894         unsigned long flags;
895 #ifdef SERIAL_DEBUG_THROTTLE
896         printk("throttle %s ....\n", tty_name(tty));
897 #endif
898
899         if (I_IXOFF(tty))
900                 rs_send_xchar(tty, STOP_CHAR(tty));
901
902         if (C_CRTSCTS(tty))
903                 info->MCR &= ~SER_RTS;
904
905         local_irq_save(flags);
906         rtsdtr_ctrl(info->MCR);
907         local_irq_restore(flags);
908 }
909
910 static void rs_unthrottle(struct tty_struct * tty)
911 {
912         struct serial_state *info = tty->driver_data;
913         unsigned long flags;
914 #ifdef SERIAL_DEBUG_THROTTLE
915         printk("unthrottle %s ....\n", tty_name(tty));
916 #endif
917
918         if (I_IXOFF(tty)) {
919                 if (info->x_char)
920                         info->x_char = 0;
921                 else
922                         rs_send_xchar(tty, START_CHAR(tty));
923         }
924         if (C_CRTSCTS(tty))
925                 info->MCR |= SER_RTS;
926         local_irq_save(flags);
927         rtsdtr_ctrl(info->MCR);
928         local_irq_restore(flags);
929 }
930
931 /*
932  * ------------------------------------------------------------
933  * rs_ioctl() and friends
934  * ------------------------------------------------------------
935  */
936
937 static int get_serial_info(struct tty_struct *tty, struct serial_struct *ss)
938 {
939         struct serial_state *state = tty->driver_data;
940         unsigned int close_delay, closing_wait;
941
942         tty_lock(tty);
943         close_delay = jiffies_to_msecs(state->tport.close_delay) / 10;
944         closing_wait = state->tport.closing_wait;
945         if (closing_wait != ASYNC_CLOSING_WAIT_NONE)
946                 closing_wait = jiffies_to_msecs(closing_wait) / 10;
947
948         ss->line = tty->index;
949         ss->port = state->port;
950         ss->flags = state->tport.flags;
951         ss->xmit_fifo_size = state->xmit_fifo_size;
952         ss->baud_base = state->baud_base;
953         ss->close_delay = close_delay;
954         ss->closing_wait = closing_wait;
955         ss->custom_divisor = state->custom_divisor;
956         tty_unlock(tty);
957         return 0;
958 }
959
960 static int set_serial_info(struct tty_struct *tty, struct serial_struct *ss)
961 {
962         struct serial_state *state = tty->driver_data;
963         struct tty_port *port = &state->tport;
964         bool change_spd;
965         int                     retval = 0;
966         unsigned int close_delay, closing_wait;
967
968         tty_lock(tty);
969         change_spd = ((ss->flags ^ port->flags) & ASYNC_SPD_MASK) ||
970                 ss->custom_divisor != state->custom_divisor;
971         if (ss->irq || ss->port != state->port ||
972                         ss->xmit_fifo_size != state->xmit_fifo_size) {
973                 tty_unlock(tty);
974                 return -EINVAL;
975         }
976
977         close_delay = msecs_to_jiffies(ss->close_delay * 10);
978         closing_wait = ss->closing_wait;
979         if (closing_wait != ASYNC_CLOSING_WAIT_NONE)
980                 closing_wait = msecs_to_jiffies(closing_wait * 10);
981
982         if (!serial_isroot()) {
983                 if ((ss->baud_base != state->baud_base) ||
984                     (close_delay != port->close_delay) ||
985                     (closing_wait != port->closing_wait) ||
986                     (ss->xmit_fifo_size != state->xmit_fifo_size) ||
987                     ((ss->flags & ~ASYNC_USR_MASK) !=
988                      (port->flags & ~ASYNC_USR_MASK))) {
989                         tty_unlock(tty);
990                         return -EPERM;
991                 }
992                 port->flags = ((port->flags & ~ASYNC_USR_MASK) |
993                                (ss->flags & ASYNC_USR_MASK));
994                 state->custom_divisor = ss->custom_divisor;
995                 goto check_and_exit;
996         }
997
998         if (ss->baud_base < 9600) {
999                 tty_unlock(tty);
1000                 return -EINVAL;
1001         }
1002
1003         /*
1004          * OK, past this point, all the error checking has been done.
1005          * At this point, we start making changes.....
1006          */
1007
1008         state->baud_base = ss->baud_base;
1009         port->flags = ((port->flags & ~ASYNC_FLAGS) |
1010                         (ss->flags & ASYNC_FLAGS));
1011         state->custom_divisor = ss->custom_divisor;
1012         port->close_delay = close_delay;
1013         port->closing_wait = closing_wait;
1014
1015 check_and_exit:
1016         if (tty_port_initialized(port)) {
1017                 if (change_spd) {
1018                         /* warn about deprecation unless clearing */
1019                         if (ss->flags & ASYNC_SPD_MASK)
1020                                 dev_warn_ratelimited(tty->dev, "use of SPD flags is deprecated\n");
1021                         change_speed(tty, state, NULL);
1022                 }
1023         } else
1024                 retval = startup(tty, state);
1025         tty_unlock(tty);
1026         return retval;
1027 }
1028
1029 /*
1030  * get_lsr_info - get line status register info
1031  *
1032  * Purpose: Let user call ioctl() to get info when the UART physically
1033  *          is emptied.  On bus types like RS485, the transmitter must
1034  *          release the bus after transmitting. This must be done when
1035  *          the transmit shift register is empty, not be done when the
1036  *          transmit holding register is empty.  This functionality
1037  *          allows an RS485 driver to be written in user space. 
1038  */
1039 static int get_lsr_info(struct serial_state *info, unsigned int __user *value)
1040 {
1041         unsigned char status;
1042         unsigned int result;
1043         unsigned long flags;
1044
1045         local_irq_save(flags);
1046         status = custom.serdatr;
1047         mb();
1048         local_irq_restore(flags);
1049         result = ((status & SDR_TSRE) ? TIOCSER_TEMT : 0);
1050         if (copy_to_user(value, &result, sizeof(int)))
1051                 return -EFAULT;
1052         return 0;
1053 }
1054
1055
1056 static int rs_tiocmget(struct tty_struct *tty)
1057 {
1058         struct serial_state *info = tty->driver_data;
1059         unsigned char control, status;
1060         unsigned long flags;
1061
1062         if (tty_io_error(tty))
1063                 return -EIO;
1064
1065         control = info->MCR;
1066         local_irq_save(flags);
1067         status = ciab.pra;
1068         local_irq_restore(flags);
1069         return    ((control & SER_RTS) ? TIOCM_RTS : 0)
1070                 | ((control & SER_DTR) ? TIOCM_DTR : 0)
1071                 | (!(status  & SER_DCD) ? TIOCM_CAR : 0)
1072                 | (!(status  & SER_DSR) ? TIOCM_DSR : 0)
1073                 | (!(status  & SER_CTS) ? TIOCM_CTS : 0);
1074 }
1075
1076 static int rs_tiocmset(struct tty_struct *tty, unsigned int set,
1077                                                 unsigned int clear)
1078 {
1079         struct serial_state *info = tty->driver_data;
1080         unsigned long flags;
1081
1082         if (tty_io_error(tty))
1083                 return -EIO;
1084
1085         local_irq_save(flags);
1086         if (set & TIOCM_RTS)
1087                 info->MCR |= SER_RTS;
1088         if (set & TIOCM_DTR)
1089                 info->MCR |= SER_DTR;
1090         if (clear & TIOCM_RTS)
1091                 info->MCR &= ~SER_RTS;
1092         if (clear & TIOCM_DTR)
1093                 info->MCR &= ~SER_DTR;
1094         rtsdtr_ctrl(info->MCR);
1095         local_irq_restore(flags);
1096         return 0;
1097 }
1098
1099 /*
1100  * rs_break() --- routine which turns the break handling on or off
1101  */
1102 static int rs_break(struct tty_struct *tty, int break_state)
1103 {
1104         unsigned long flags;
1105
1106         local_irq_save(flags);
1107         if (break_state == -1)
1108           custom.adkcon = AC_SETCLR | AC_UARTBRK;
1109         else
1110           custom.adkcon = AC_UARTBRK;
1111         mb();
1112         local_irq_restore(flags);
1113         return 0;
1114 }
1115
1116 /*
1117  * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
1118  * Return: write counters to the user passed counter struct
1119  * NB: both 1->0 and 0->1 transitions are counted except for
1120  *     RI where only 0->1 is counted.
1121  */
1122 static int rs_get_icount(struct tty_struct *tty,
1123                                 struct serial_icounter_struct *icount)
1124 {
1125         struct serial_state *info = tty->driver_data;
1126         struct async_icount cnow;
1127         unsigned long flags;
1128
1129         local_irq_save(flags);
1130         cnow = info->icount;
1131         local_irq_restore(flags);
1132         icount->cts = cnow.cts;
1133         icount->dsr = cnow.dsr;
1134         icount->rng = cnow.rng;
1135         icount->dcd = cnow.dcd;
1136         icount->rx = cnow.rx;
1137         icount->tx = cnow.tx;
1138         icount->frame = cnow.frame;
1139         icount->overrun = cnow.overrun;
1140         icount->parity = cnow.parity;
1141         icount->brk = cnow.brk;
1142         icount->buf_overrun = cnow.buf_overrun;
1143
1144         return 0;
1145 }
1146
1147 static int rs_ioctl(struct tty_struct *tty,
1148                     unsigned int cmd, unsigned long arg)
1149 {
1150         struct serial_state *info = tty->driver_data;
1151         struct async_icount cprev, cnow;        /* kernel counter temps */
1152         void __user *argp = (void __user *)arg;
1153         unsigned long flags;
1154         DEFINE_WAIT(wait);
1155         int ret;
1156
1157         if ((cmd != TIOCSERCONFIG) &&
1158             (cmd != TIOCMIWAIT) && (cmd != TIOCGICOUNT)) {
1159                 if (tty_io_error(tty))
1160                     return -EIO;
1161         }
1162
1163         switch (cmd) {
1164                 case TIOCSERCONFIG:
1165                         return 0;
1166
1167                 case TIOCSERGETLSR: /* Get line status register */
1168                         return get_lsr_info(info, argp);
1169
1170                 /*
1171                  * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change
1172                  * - mask passed in arg for lines of interest
1173                  *   (use |'ed TIOCM_RNG/DSR/CD/CTS for masking)
1174                  * Caller should use TIOCGICOUNT to see which one it was
1175                  */
1176                 case TIOCMIWAIT:
1177                         local_irq_save(flags);
1178                         /* note the counters on entry */
1179                         cprev = info->icount;
1180                         local_irq_restore(flags);
1181                         while (1) {
1182                                 prepare_to_wait(&info->tport.delta_msr_wait,
1183                                                 &wait, TASK_INTERRUPTIBLE);
1184                                 local_irq_save(flags);
1185                                 cnow = info->icount; /* atomic copy */
1186                                 local_irq_restore(flags);
1187                                 if (cnow.rng == cprev.rng && cnow.dsr == cprev.dsr && 
1188                                     cnow.dcd == cprev.dcd && cnow.cts == cprev.cts) {
1189                                         ret = -EIO; /* no change => error */
1190                                         break;
1191                                 }
1192                                 if ( ((arg & TIOCM_RNG) && (cnow.rng != cprev.rng)) ||
1193                                      ((arg & TIOCM_DSR) && (cnow.dsr != cprev.dsr)) ||
1194                                      ((arg & TIOCM_CD)  && (cnow.dcd != cprev.dcd)) ||
1195                                      ((arg & TIOCM_CTS) && (cnow.cts != cprev.cts)) ) {
1196                                         ret = 0;
1197                                         break;
1198                                 }
1199                                 schedule();
1200                                 /* see if a signal did it */
1201                                 if (signal_pending(current)) {
1202                                         ret = -ERESTARTSYS;
1203                                         break;
1204                                 }
1205                                 cprev = cnow;
1206                         }
1207                         finish_wait(&info->tport.delta_msr_wait, &wait);
1208                         return ret;
1209
1210                 default:
1211                         return -ENOIOCTLCMD;
1212                 }
1213         return 0;
1214 }
1215
1216 static void rs_set_termios(struct tty_struct *tty, struct ktermios *old_termios)
1217 {
1218         struct serial_state *info = tty->driver_data;
1219         unsigned long flags;
1220         unsigned int cflag = tty->termios.c_cflag;
1221
1222         change_speed(tty, info, old_termios);
1223
1224         /* Handle transition to B0 status */
1225         if ((old_termios->c_cflag & CBAUD) && !(cflag & CBAUD)) {
1226                 info->MCR &= ~(SER_DTR|SER_RTS);
1227                 local_irq_save(flags);
1228                 rtsdtr_ctrl(info->MCR);
1229                 local_irq_restore(flags);
1230         }
1231
1232         /* Handle transition away from B0 status */
1233         if (!(old_termios->c_cflag & CBAUD) && (cflag & CBAUD)) {
1234                 info->MCR |= SER_DTR;
1235                 if (!C_CRTSCTS(tty) || !tty_throttled(tty))
1236                         info->MCR |= SER_RTS;
1237                 local_irq_save(flags);
1238                 rtsdtr_ctrl(info->MCR);
1239                 local_irq_restore(flags);
1240         }
1241
1242         /* Handle turning off CRTSCTS */
1243         if ((old_termios->c_cflag & CRTSCTS) && !C_CRTSCTS(tty)) {
1244                 tty->hw_stopped = 0;
1245                 rs_start(tty);
1246         }
1247
1248 #if 0
1249         /*
1250          * No need to wake up processes in open wait, since they
1251          * sample the CLOCAL flag once, and don't recheck it.
1252          * XXX  It's not clear whether the current behavior is correct
1253          * or not.  Hence, this may change.....
1254          */
1255         if (!(old_termios->c_cflag & CLOCAL) && C_CLOCAL(tty))
1256                 wake_up_interruptible(&info->open_wait);
1257 #endif
1258 }
1259
1260 /*
1261  * ------------------------------------------------------------
1262  * rs_close()
1263  * 
1264  * This routine is called when the serial port gets closed.  First, we
1265  * wait for the last remaining data to be sent.  Then, we unlink its
1266  * async structure from the interrupt chain if necessary, and we free
1267  * that IRQ if nothing is left in the chain.
1268  * ------------------------------------------------------------
1269  */
1270 static void rs_close(struct tty_struct *tty, struct file * filp)
1271 {
1272         struct serial_state *state = tty->driver_data;
1273         struct tty_port *port = &state->tport;
1274
1275         if (tty_port_close_start(port, tty, filp) == 0)
1276                 return;
1277
1278         /*
1279          * At this point we stop accepting input.  To do this, we
1280          * disable the receive line status interrupts, and tell the
1281          * interrupt driver to stop checking the data ready bit in the
1282          * line status register.
1283          */
1284         state->read_status_mask &= ~UART_LSR_DR;
1285         if (tty_port_initialized(port)) {
1286                 /* disable receive interrupts */
1287                 custom.intena = IF_RBF;
1288                 mb();
1289                 /* clear any pending receive interrupt */
1290                 custom.intreq = IF_RBF;
1291                 mb();
1292
1293                 /*
1294                  * Before we drop DTR, make sure the UART transmitter
1295                  * has completely drained; this is especially
1296                  * important if there is a transmit FIFO!
1297                  */
1298                 rs_wait_until_sent(tty, state->timeout);
1299         }
1300         shutdown(tty, state);
1301         rs_flush_buffer(tty);
1302                 
1303         tty_ldisc_flush(tty);
1304         port->tty = NULL;
1305
1306         tty_port_close_end(port, tty);
1307 }
1308
1309 /*
1310  * rs_wait_until_sent() --- wait until the transmitter is empty
1311  */
1312 static void rs_wait_until_sent(struct tty_struct *tty, int timeout)
1313 {
1314         struct serial_state *info = tty->driver_data;
1315         unsigned long orig_jiffies, char_time;
1316         int lsr;
1317
1318         if (info->xmit_fifo_size == 0)
1319                 return; /* Just in case.... */
1320
1321         orig_jiffies = jiffies;
1322
1323         /*
1324          * Set the check interval to be 1/5 of the estimated time to
1325          * send a single character, and make it at least 1.  The check
1326          * interval should also be less than the timeout.
1327          * 
1328          * Note: we have to use pretty tight timings here to satisfy
1329          * the NIST-PCTS.
1330          */
1331         char_time = (info->timeout - HZ/50) / info->xmit_fifo_size;
1332         char_time = char_time / 5;
1333         if (char_time == 0)
1334                 char_time = 1;
1335         if (timeout)
1336           char_time = min_t(unsigned long, char_time, timeout);
1337         /*
1338          * If the transmitter hasn't cleared in twice the approximate
1339          * amount of time to send the entire FIFO, it probably won't
1340          * ever clear.  This assumes the UART isn't doing flow
1341          * control, which is currently the case.  Hence, if it ever
1342          * takes longer than info->timeout, this is probably due to a
1343          * UART bug of some kind.  So, we clamp the timeout parameter at
1344          * 2*info->timeout.
1345          */
1346         if (!timeout || timeout > 2*info->timeout)
1347                 timeout = 2*info->timeout;
1348 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
1349         printk("In rs_wait_until_sent(%d) check=%lu...", timeout, char_time);
1350         printk("jiff=%lu...", jiffies);
1351 #endif
1352         while(!((lsr = custom.serdatr) & SDR_TSRE)) {
1353 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
1354                 printk("serdatr = %d (jiff=%lu)...", lsr, jiffies);
1355 #endif
1356                 msleep_interruptible(jiffies_to_msecs(char_time));
1357                 if (signal_pending(current))
1358                         break;
1359                 if (timeout && time_after(jiffies, orig_jiffies + timeout))
1360                         break;
1361         }
1362         __set_current_state(TASK_RUNNING);
1363
1364 #ifdef SERIAL_DEBUG_RS_WAIT_UNTIL_SENT
1365         printk("lsr = %d (jiff=%lu)...done\n", lsr, jiffies);
1366 #endif
1367 }
1368
1369 /*
1370  * rs_hangup() --- called by tty_hangup() when a hangup is signaled.
1371  */
1372 static void rs_hangup(struct tty_struct *tty)
1373 {
1374         struct serial_state *info = tty->driver_data;
1375
1376         rs_flush_buffer(tty);
1377         shutdown(tty, info);
1378         info->tport.count = 0;
1379         tty_port_set_active(&info->tport, 0);
1380         info->tport.tty = NULL;
1381         wake_up_interruptible(&info->tport.open_wait);
1382 }
1383
1384 /*
1385  * This routine is called whenever a serial port is opened.  It
1386  * enables interrupts for a serial port, linking in its async structure into
1387  * the IRQ chain.   It also performs the serial-specific
1388  * initialization for the tty structure.
1389  */
1390 static int rs_open(struct tty_struct *tty, struct file * filp)
1391 {
1392         struct serial_state *info = rs_table + tty->index;
1393         struct tty_port *port = &info->tport;
1394         int retval;
1395
1396         port->count++;
1397         port->tty = tty;
1398         tty->driver_data = info;
1399         tty->port = port;
1400
1401         retval = startup(tty, info);
1402         if (retval) {
1403                 return retval;
1404         }
1405
1406         return tty_port_block_til_ready(port, tty, filp);
1407 }
1408
1409 /*
1410  * /proc fs routines....
1411  */
1412
1413 static inline void line_info(struct seq_file *m, int line,
1414                 struct serial_state *state)
1415 {
1416         char    stat_buf[30], control, status;
1417         unsigned long flags;
1418
1419         seq_printf(m, "%d: uart:amiga_builtin", line);
1420
1421         local_irq_save(flags);
1422         status = ciab.pra;
1423         control = tty_port_initialized(&state->tport) ? state->MCR : status;
1424         local_irq_restore(flags);
1425
1426         stat_buf[0] = 0;
1427         stat_buf[1] = 0;
1428         if(!(control & SER_RTS))
1429                 strcat(stat_buf, "|RTS");
1430         if(!(status & SER_CTS))
1431                 strcat(stat_buf, "|CTS");
1432         if(!(control & SER_DTR))
1433                 strcat(stat_buf, "|DTR");
1434         if(!(status & SER_DSR))
1435                 strcat(stat_buf, "|DSR");
1436         if(!(status & SER_DCD))
1437                 strcat(stat_buf, "|CD");
1438
1439         if (state->quot)
1440                 seq_printf(m, " baud:%d", state->baud_base / state->quot);
1441
1442         seq_printf(m, " tx:%d rx:%d", state->icount.tx, state->icount.rx);
1443
1444         if (state->icount.frame)
1445                 seq_printf(m, " fe:%d", state->icount.frame);
1446
1447         if (state->icount.parity)
1448                 seq_printf(m, " pe:%d", state->icount.parity);
1449
1450         if (state->icount.brk)
1451                 seq_printf(m, " brk:%d", state->icount.brk);
1452
1453         if (state->icount.overrun)
1454                 seq_printf(m, " oe:%d", state->icount.overrun);
1455
1456         /*
1457          * Last thing is the RS-232 status lines
1458          */
1459         seq_printf(m, " %s\n", stat_buf+1);
1460 }
1461
1462 static int rs_proc_show(struct seq_file *m, void *v)
1463 {
1464         seq_printf(m, "serinfo:1.0 driver:%s\n", serial_version);
1465         line_info(m, 0, &rs_table[0]);
1466         return 0;
1467 }
1468
1469 /*
1470  * ---------------------------------------------------------------------
1471  * rs_init() and friends
1472  *
1473  * rs_init() is called at boot-time to initialize the serial driver.
1474  * ---------------------------------------------------------------------
1475  */
1476
1477 /*
1478  * This routine prints out the appropriate serial driver version
1479  * number, and identifies which options were configured into this
1480  * driver.
1481  */
1482 static void show_serial_version(void)
1483 {
1484         printk(KERN_INFO "%s version %s\n", serial_name, serial_version);
1485 }
1486
1487
1488 static const struct tty_operations serial_ops = {
1489         .open = rs_open,
1490         .close = rs_close,
1491         .write = rs_write,
1492         .put_char = rs_put_char,
1493         .flush_chars = rs_flush_chars,
1494         .write_room = rs_write_room,
1495         .chars_in_buffer = rs_chars_in_buffer,
1496         .flush_buffer = rs_flush_buffer,
1497         .ioctl = rs_ioctl,
1498         .throttle = rs_throttle,
1499         .unthrottle = rs_unthrottle,
1500         .set_termios = rs_set_termios,
1501         .stop = rs_stop,
1502         .start = rs_start,
1503         .hangup = rs_hangup,
1504         .break_ctl = rs_break,
1505         .send_xchar = rs_send_xchar,
1506         .wait_until_sent = rs_wait_until_sent,
1507         .tiocmget = rs_tiocmget,
1508         .tiocmset = rs_tiocmset,
1509         .get_icount = rs_get_icount,
1510         .set_serial = set_serial_info,
1511         .get_serial = get_serial_info,
1512         .proc_show = rs_proc_show,
1513 };
1514
1515 static int amiga_carrier_raised(struct tty_port *port)
1516 {
1517         return !(ciab.pra & SER_DCD);
1518 }
1519
1520 static void amiga_dtr_rts(struct tty_port *port, int raise)
1521 {
1522         struct serial_state *info = container_of(port, struct serial_state,
1523                         tport);
1524         unsigned long flags;
1525
1526         if (raise)
1527                 info->MCR |= SER_DTR|SER_RTS;
1528         else
1529                 info->MCR &= ~(SER_DTR|SER_RTS);
1530
1531         local_irq_save(flags);
1532         rtsdtr_ctrl(info->MCR);
1533         local_irq_restore(flags);
1534 }
1535
1536 static const struct tty_port_operations amiga_port_ops = {
1537         .carrier_raised = amiga_carrier_raised,
1538         .dtr_rts = amiga_dtr_rts,
1539 };
1540
1541 /*
1542  * The serial driver boot-time initialization code!
1543  */
1544 static int __init amiga_serial_probe(struct platform_device *pdev)
1545 {
1546         unsigned long flags;
1547         struct serial_state * state;
1548         int error;
1549
1550         serial_driver = alloc_tty_driver(NR_PORTS);
1551         if (!serial_driver)
1552                 return -ENOMEM;
1553
1554         show_serial_version();
1555
1556         /* Initialize the tty_driver structure */
1557
1558         serial_driver->driver_name = "amiserial";
1559         serial_driver->name = "ttyS";
1560         serial_driver->major = TTY_MAJOR;
1561         serial_driver->minor_start = 64;
1562         serial_driver->type = TTY_DRIVER_TYPE_SERIAL;
1563         serial_driver->subtype = SERIAL_TYPE_NORMAL;
1564         serial_driver->init_termios = tty_std_termios;
1565         serial_driver->init_termios.c_cflag =
1566                 B9600 | CS8 | CREAD | HUPCL | CLOCAL;
1567         serial_driver->flags = TTY_DRIVER_REAL_RAW;
1568         tty_set_operations(serial_driver, &serial_ops);
1569
1570         state = rs_table;
1571         state->port = (int)&custom.serdatr; /* Just to give it a value */
1572         state->custom_divisor = 0;
1573         state->icount.cts = state->icount.dsr = 
1574           state->icount.rng = state->icount.dcd = 0;
1575         state->icount.rx = state->icount.tx = 0;
1576         state->icount.frame = state->icount.parity = 0;
1577         state->icount.overrun = state->icount.brk = 0;
1578         tty_port_init(&state->tport);
1579         state->tport.ops = &amiga_port_ops;
1580         tty_port_link_device(&state->tport, serial_driver, 0);
1581
1582         error = tty_register_driver(serial_driver);
1583         if (error)
1584                 goto fail_put_tty_driver;
1585
1586         printk(KERN_INFO "ttyS0 is the amiga builtin serial port\n");
1587
1588         /* Hardware set up */
1589
1590         state->baud_base = amiga_colorclock;
1591         state->xmit_fifo_size = 1;
1592
1593         /* set ISRs, and then disable the rx interrupts */
1594         error = request_irq(IRQ_AMIGA_TBE, ser_tx_int, 0, "serial TX", state);
1595         if (error)
1596                 goto fail_unregister;
1597
1598         error = request_irq(IRQ_AMIGA_RBF, ser_rx_int, 0,
1599                             "serial RX", state);
1600         if (error)
1601                 goto fail_free_irq;
1602
1603         local_irq_save(flags);
1604
1605         /* turn off Rx and Tx interrupts */
1606         custom.intena = IF_RBF | IF_TBE;
1607         mb();
1608
1609         /* clear any pending interrupt */
1610         custom.intreq = IF_RBF | IF_TBE;
1611         mb();
1612
1613         local_irq_restore(flags);
1614
1615         /*
1616          * set the appropriate directions for the modem control flags,
1617          * and clear RTS and DTR
1618          */
1619         ciab.ddra |= (SER_DTR | SER_RTS);   /* outputs */
1620         ciab.ddra &= ~(SER_DCD | SER_CTS | SER_DSR);  /* inputs */
1621
1622         platform_set_drvdata(pdev, state);
1623
1624         return 0;
1625
1626 fail_free_irq:
1627         free_irq(IRQ_AMIGA_TBE, state);
1628 fail_unregister:
1629         tty_unregister_driver(serial_driver);
1630 fail_put_tty_driver:
1631         tty_port_destroy(&state->tport);
1632         put_tty_driver(serial_driver);
1633         return error;
1634 }
1635
1636 static int __exit amiga_serial_remove(struct platform_device *pdev)
1637 {
1638         struct serial_state *state = platform_get_drvdata(pdev);
1639
1640         /* printk("Unloading %s: version %s\n", serial_name, serial_version); */
1641         tty_unregister_driver(serial_driver);
1642         put_tty_driver(serial_driver);
1643         tty_port_destroy(&state->tport);
1644
1645         free_irq(IRQ_AMIGA_TBE, state);
1646         free_irq(IRQ_AMIGA_RBF, state);
1647
1648         return 0;
1649 }
1650
1651 static struct platform_driver amiga_serial_driver = {
1652         .remove = __exit_p(amiga_serial_remove),
1653         .driver   = {
1654                 .name   = "amiga-serial",
1655         },
1656 };
1657
1658 module_platform_driver_probe(amiga_serial_driver, amiga_serial_probe);
1659
1660
1661 #if defined(CONFIG_SERIAL_CONSOLE) && !defined(MODULE)
1662
1663 /*
1664  * ------------------------------------------------------------
1665  * Serial console driver
1666  * ------------------------------------------------------------
1667  */
1668
1669 static void amiga_serial_putc(char c)
1670 {
1671         custom.serdat = (unsigned char)c | 0x100;
1672         while (!(custom.serdatr & 0x2000))
1673                 barrier();
1674 }
1675
1676 /*
1677  *      Print a string to the serial port trying not to disturb
1678  *      any possible real use of the port...
1679  *
1680  *      The console must be locked when we get here.
1681  */
1682 static void serial_console_write(struct console *co, const char *s,
1683                                 unsigned count)
1684 {
1685         unsigned short intena = custom.intenar;
1686
1687         custom.intena = IF_TBE;
1688
1689         while (count--) {
1690                 if (*s == '\n')
1691                         amiga_serial_putc('\r');
1692                 amiga_serial_putc(*s++);
1693         }
1694
1695         custom.intena = IF_SETCLR | (intena & IF_TBE);
1696 }
1697
1698 static struct tty_driver *serial_console_device(struct console *c, int *index)
1699 {
1700         *index = 0;
1701         return serial_driver;
1702 }
1703
1704 static struct console sercons = {
1705         .name =         "ttyS",
1706         .write =        serial_console_write,
1707         .device =       serial_console_device,
1708         .flags =        CON_PRINTBUFFER,
1709         .index =        -1,
1710 };
1711
1712 /*
1713  *      Register console.
1714  */
1715 static int __init amiserial_console_init(void)
1716 {
1717         if (!MACH_IS_AMIGA)
1718                 return -ENODEV;
1719
1720         register_console(&sercons);
1721         return 0;
1722 }
1723 console_initcall(amiserial_console_init);
1724
1725 #endif /* CONFIG_SERIAL_CONSOLE && !MODULE */
1726
1727 MODULE_LICENSE("GPL");
1728 MODULE_ALIAS("platform:amiga-serial");