drivers/serial/m32r_sio.c

   1 /*
   2  *  m32r_sio.c
   3  *
   4  *  Driver for M32R serial ports
   5  *
   6  *  Based on drivers/char/serial.c, by Linus Torvalds, Theodore Ts'o.
   7  *  Based on drivers/serial/8250.c.
   8  *
   9  *  Copyright (C) 2001  Russell King.
  10  *  Copyright (C) 2004  Hirokazu Takata <takata at linux-m32r.org>
  11  *
  12  * This program is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU General Public License as published by
  14  * the Free Software Foundation; either version 2 of the License, or
  15  * (at your option) any later version.
  16  */
  17
  18 /*
  19  * A note about mapbase / membase
  20  *
  21  *  mapbase is the physical address of the IO port.  Currently, we don't
  22  *  support this very well, and it may well be dropped from this driver
  23  *  in future.  As such, mapbase should be NULL.
  24  *
  25  *  membase is an 'ioremapped' cookie.  This is compatible with the old
  26  *  serial.c driver, and is currently the preferred form.
  27  */
  28
  29 #if defined(CONFIG_SERIAL_M32R_SIO_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
  30 #define SUPPORT_SYSRQ
  31 #endif
  32
  33 #include <linux/module.h>
  34 #include <linux/tty.h>
  35 #include <linux/ioport.h>
  36 #include <linux/init.h>
  37 #include <linux/console.h>
  38 #include <linux/sysrq.h>
  39 #include <linux/serial.h>
  40 #include <linux/serialP.h>
  41 #include <linux/delay.h>
  42
  43 #include <asm/m32r.h>
  44 #include <asm/io.h>
  45 #include <asm/irq.h>
  46
  47 #define PORT_M32R_BASE  PORT_M32R_SIO
  48 #define PORT_INDEX(x)   (x - PORT_M32R_BASE + 1)
  49 #define BAUD_RATE       115200
  50
  51 #include <linux/serial_core.h>
  52 #include "m32r_sio.h"
  53 #include "m32r_sio_reg.h"
  54
  55 /*
  56  * Debugging.
  57  */
  58 #if 0
  59 #define DEBUG_AUTOCONF(fmt...)  printk(fmt)
  60 #else
  61 #define DEBUG_AUTOCONF(fmt...)  do { } while (0)
  62 #endif
  63
  64 #if 0
  65 #define DEBUG_INTR(fmt...)      printk(fmt)
  66 #else
  67 #define DEBUG_INTR(fmt...)      do { } while (0)
  68 #endif
  69
  70 #define PASS_LIMIT      256
  71
  72 /*
  73  * We default to IRQ0 for the "no irq" hack.   Some
  74  * machine types want others as well - they're free
  75  * to redefine this in their header file.
  76  */
  77 #define is_real_interrupt(irq)  ((irq) != 0)
  78
  79 #define BASE_BAUD       115200
  80
  81 /* Standard COM flags */
  82 #define STD_COM_FLAGS (UPF_BOOT_AUTOCONF | UPF_SKIP_TEST)
  83
  84 /*
  85  * SERIAL_PORT_DFNS tells us about built-in ports that have no
  86  * standard enumeration mechanism.   Platforms that can find all
  87  * serial ports via mechanisms like ACPI or PCI need not supply it.
  88  */
  89 #if defined(CONFIG_PLAT_USRV)
  90
  91 #define SERIAL_PORT_DFNS                                                \
  92        /* UART  CLK     PORT   IRQ            FLAGS */                  \
  93         { 0, BASE_BAUD, 0x3F8, PLD_IRQ_UART0, STD_COM_FLAGS }, /* ttyS0 */ \
  94         { 0, BASE_BAUD, 0x2F8, PLD_IRQ_UART1, STD_COM_FLAGS }, /* ttyS1 */
  95
  96 #else /* !CONFIG_PLAT_USRV */
  97
  98 #if defined(CONFIG_SERIAL_M32R_PLDSIO)
  99 #define SERIAL_PORT_DFNS                                                \
 100         { 0, BASE_BAUD, ((unsigned long)PLD_ESIO0CR), PLD_IRQ_SIO0_RCV, \
 101           STD_COM_FLAGS }, /* ttyS0 */
 102 #else
 103 #define SERIAL_PORT_DFNS                                                \
 104         { 0, BASE_BAUD, M32R_SIO_OFFSET, M32R_IRQ_SIO0_R,               \
 105           STD_COM_FLAGS }, /* ttyS0 */
 106 #endif
 107
 108 #endif /* !CONFIG_PLAT_USRV */
 109
 110 static struct old_serial_port old_serial_port[] = {
 111         SERIAL_PORT_DFNS
 112 };
 113
 114 #define UART_NR ARRAY_SIZE(old_serial_port)
 115
 116 struct uart_sio_port {
 117         struct uart_port        port;
 118         struct timer_list       timer;          /* "no irq" timer */
 119         struct list_head        list;           /* ports on this IRQ */
 120         unsigned short          rev;
 121         unsigned char           acr;
 122         unsigned char           ier;
 123         unsigned char           lcr;
 124         unsigned char           mcr_mask;       /* mask of user bits */
 125         unsigned char           mcr_force;      /* mask of forced bits */
 126         unsigned char           lsr_break_flag;
 127
 128         /*
 129          * We provide a per-port pm hook.
 130          */
 131         void                    (*pm)(struct uart_port *port,
 132                                       unsigned int state, unsigned int old);
 133 };
 134
 135 struct irq_info {
 136         spinlock_t              lock;
 137         struct list_head        *head;
 138 };
 139
 140 static struct irq_info irq_lists[NR_IRQS];
 141
 142 /*
 143  * Here we define the default xmit fifo size used for each type of UART.
 144  */
 145 static const struct serial_uart_config uart_config[] = {
 146         [PORT_UNKNOWN] = {
 147                 .name                   = "unknown",
 148                 .dfl_xmit_fifo_size     = 1,
 149                 .flags                  = 0,
 150         },
 151         [PORT_INDEX(PORT_M32R_SIO)] = {
 152                 .name                   = "M32RSIO",
 153                 .dfl_xmit_fifo_size     = 1,
 154                 .flags                  = 0,
 155         },
 156 };
 157
 158 #ifdef CONFIG_SERIAL_M32R_PLDSIO
 159
 160 #define __sio_in(x) inw((unsigned long)(x))
 161 #define __sio_out(v,x) outw((v),(unsigned long)(x))
 162
 163 static inline void sio_set_baud_rate(unsigned long baud)
 164 {
 165         unsigned short sbaud;
 166         sbaud = (boot_cpu_data.bus_clock / (baud * 4))-1;
 167         __sio_out(sbaud, PLD_ESIO0BAUR);
 168 }
 169
 170 static void sio_reset(void)
 171 {
 172         unsigned short tmp;
 173
 174         tmp = __sio_in(PLD_ESIO0RXB);
 175         tmp = __sio_in(PLD_ESIO0RXB);
 176         tmp = __sio_in(PLD_ESIO0CR);
 177         sio_set_baud_rate(BAUD_RATE);
 178         __sio_out(0x0300, PLD_ESIO0CR);
 179         __sio_out(0x0003, PLD_ESIO0CR);
 180 }
 181
 182 static void sio_init(void)
 183 {
 184         unsigned short tmp;
 185
 186         tmp = __sio_in(PLD_ESIO0RXB);
 187         tmp = __sio_in(PLD_ESIO0RXB);
 188         tmp = __sio_in(PLD_ESIO0CR);
 189         __sio_out(0x0300, PLD_ESIO0CR);
 190         __sio_out(0x0003, PLD_ESIO0CR);
 191 }
 192
 193 static void sio_error(int *status)
 194 {
 195         printk("SIO0 error[%04x]\n", *status);
 196         do {
 197                 sio_init();
 198         } while ((*status = __sio_in(PLD_ESIO0CR)) != 3);
 199 }
 200
 201 #else /* not CONFIG_SERIAL_M32R_PLDSIO */
 202
 203 #define __sio_in(x) inl(x)
 204 #define __sio_out(v,x) outl((v),(x))
 205
 206 static inline void sio_set_baud_rate(unsigned long baud)
 207 {
 208         unsigned long i, j;
 209
 210         i = boot_cpu_data.bus_clock / (baud * 16);
 211         j = (boot_cpu_data.bus_clock - (i * baud * 16)) / baud;
 212         i -= 1;
 213         j = (j + 1) >> 1;
 214
 215         __sio_out(i, M32R_SIO0_BAUR_PORTL);
 216         __sio_out(j, M32R_SIO0_RBAUR_PORTL);
 217 }
 218
 219 static void sio_reset(void)
 220 {
 221         __sio_out(0x00000300, M32R_SIO0_CR_PORTL);      /* init status */
 222         __sio_out(0x00000800, M32R_SIO0_MOD1_PORTL);    /* 8bit        */
 223         __sio_out(0x00000080, M32R_SIO0_MOD0_PORTL);    /* 1stop non   */
 224         sio_set_baud_rate(BAUD_RATE);
 225         __sio_out(0x00000000, M32R_SIO0_TRCR_PORTL);
 226         __sio_out(0x00000003, M32R_SIO0_CR_PORTL);      /* RXCEN */
 227 }
 228
 229 static void sio_init(void)
 230 {
 231         unsigned int tmp;
 232
 233         tmp = __sio_in(M32R_SIO0_RXB_PORTL);
 234         tmp = __sio_in(M32R_SIO0_RXB_PORTL);
 235         tmp = __sio_in(M32R_SIO0_STS_PORTL);
 236         __sio_out(0x00000003, M32R_SIO0_CR_PORTL);
 237 }
 238
 239 static void sio_error(int *status)
 240 {
 241         printk("SIO0 error[%04x]\n", *status);
 242         do {
 243                 sio_init();
 244         } while ((*status = __sio_in(M32R_SIO0_CR_PORTL)) != 3);
 245 }
 246
 247 #endif /* CONFIG_SERIAL_M32R_PLDSIO */
 248
 249 static unsigned int sio_in(struct uart_sio_port *up, int offset)
 250 {
 251         return __sio_in(up->port.iobase + offset);
 252 }
 253
 254 static void sio_out(struct uart_sio_port *up, int offset, int value)
 255 {
 256         __sio_out(value, up->port.iobase + offset);
 257 }
 258
 259 static unsigned int serial_in(struct uart_sio_port *up, int offset)
 260 {
 261         if (!offset)
 262                 return 0;
 263
 264         return __sio_in(offset);
 265 }
 266
 267 static void serial_out(struct uart_sio_port *up, int offset, int value)
 268 {
 269         if (!offset)
 270                 return;
 271
 272         __sio_out(value, offset);
 273 }
 274
 275 static void m32r_sio_stop_tx(struct uart_port *port)
 276 {
 277         struct uart_sio_port *up = (struct uart_sio_port *)port;
 278
 279         if (up->ier & UART_IER_THRI) {
 280                 up->ier &= ~UART_IER_THRI;
 281                 serial_out(up, UART_IER, up->ier);
 282         }
 283 }
 284
 285 static void m32r_sio_start_tx(struct uart_port *port)
 286 {
 287 #ifdef CONFIG_SERIAL_M32R_PLDSIO
 288         struct uart_sio_port *up = (struct uart_sio_port *)port;
 289         struct circ_buf *xmit = &up->port.info->xmit;
 290
 291         if (!(up->ier & UART_IER_THRI)) {
 292                 up->ier |= UART_IER_THRI;
 293                 serial_out(up, UART_IER, up->ier);
 294                 serial_out(up, UART_TX, xmit->buf[xmit->tail]);
 295                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
 296                 up->port.icount.tx++;
 297         }
 298         while((serial_in(up, UART_LSR) & UART_EMPTY) != UART_EMPTY);
 299 #else
 300         struct uart_sio_port *up = (struct uart_sio_port *)port;
 301
 302         if (!(up->ier & UART_IER_THRI)) {
 303                 up->ier |= UART_IER_THRI;
 304                 serial_out(up, UART_IER, up->ier);
 305         }
 306 #endif
 307 }
 308
 309 static void m32r_sio_stop_rx(struct uart_port *port)
 310 {
 311         struct uart_sio_port *up = (struct uart_sio_port *)port;
 312
 313         up->ier &= ~UART_IER_RLSI;
 314         up->port.read_status_mask &= ~UART_LSR_DR;
 315         serial_out(up, UART_IER, up->ier);
 316 }
 317
 318 static void m32r_sio_enable_ms(struct uart_port *port)
 319 {
 320         struct uart_sio_port *up = (struct uart_sio_port *)port;
 321
 322         up->ier |= UART_IER_MSI;
 323         serial_out(up, UART_IER, up->ier);
 324 }
 325
 326 static void receive_chars(struct uart_sio_port *up, int *status)
 327 {
 328         struct tty_struct *tty = up->port.info->tty;
 329         unsigned char ch;
 330         unsigned char flag;
 331         int max_count = 256;
 332
 333         do {
 334                 ch = sio_in(up, SIORXB);
 335                 flag = TTY_NORMAL;
 336                 up->port.icount.rx++;
 337
 338                 if (unlikely(*status & (UART_LSR_BI | UART_LSR_PE |
 339                                        UART_LSR_FE | UART_LSR_OE))) {
 340                         /*
 341                          * For statistics only
 342                          */
 343                         if (*status & UART_LSR_BI) {
 344                                 *status &= ~(UART_LSR_FE | UART_LSR_PE);
 345                                 up->port.icount.brk++;
 346                                 /*
 347                                  * We do the SysRQ and SAK checking
 348                                  * here because otherwise the break
 349                                  * may get masked by ignore_status_mask
 350                                  * or read_status_mask.
 351                                  */
 352                                 if (uart_handle_break(&up->port))
 353                                         goto ignore_char;
 354                         } else if (*status & UART_LSR_PE)
 355                                 up->port.icount.parity++;
 356                         else if (*status & UART_LSR_FE)
 357                                 up->port.icount.frame++;
 358                         if (*status & UART_LSR_OE)
 359                                 up->port.icount.overrun++;
 360
 361                         /*
 362                          * Mask off conditions which should be ingored.
 363                          */
 364                         *status &= up->port.read_status_mask;
 365
 366                         if (up->port.line == up->port.cons->index) {
 367                                 /* Recover the break flag from console xmit */
 368                                 *status |= up->lsr_break_flag;
 369                                 up->lsr_break_flag = 0;
 370                         }
 371
 372                         if (*status & UART_LSR_BI) {
 373                                 DEBUG_INTR("handling break....");
 374                                 flag = TTY_BREAK;
 375                         } else if (*status & UART_LSR_PE)
 376                                 flag = TTY_PARITY;
 377                         else if (*status & UART_LSR_FE)
 378                                 flag = TTY_FRAME;
 379                 }
 380                 if (uart_handle_sysrq_char(&up->port, ch))
 381                         goto ignore_char;
 382                 if ((*status & up->port.ignore_status_mask) == 0)
 383                         tty_insert_flip_char(tty, ch, flag);
 384
 385                 if (*status & UART_LSR_OE) {
 386                         /*
 387                          * Overrun is special, since it's reported
 388                          * immediately, and doesn't affect the current
 389                          * character.
 390                          */
 391                         tty_insert_flip_char(tty, 0, TTY_OVERRUN);
 392                 }
 393         ignore_char:
 394                 *status = serial_in(up, UART_LSR);
 395         } while ((*status & UART_LSR_DR) && (max_count-- > 0));
 396         tty_flip_buffer_push(tty);
 397 }
 398
 399 static void transmit_chars(struct uart_sio_port *up)
 400 {
 401         struct circ_buf *xmit = &up->port.info->xmit;
 402         int count;
 403
 404         if (up->port.x_char) {
 405 #ifndef CONFIG_SERIAL_M32R_PLDSIO       /* XXX */
 406                 serial_out(up, UART_TX, up->port.x_char);
 407 #endif
 408                 up->port.icount.tx++;
 409                 up->port.x_char = 0;
 410                 return;
 411         }
 412         if (uart_circ_empty(xmit) || uart_tx_stopped(&up->port)) {
 413                 m32r_sio_stop_tx(&up->port);
 414                 return;
 415         }
 416
 417         count = up->port.fifosize;
 418         do {
 419                 serial_out(up, UART_TX, xmit->buf[xmit->tail]);
 420                 xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
 421                 up->port.icount.tx++;
 422                 if (uart_circ_empty(xmit))
 423                         break;
 424                 while (!serial_in(up, UART_LSR) & UART_LSR_THRE);
 425
 426         } while (--count > 0);
 427
 428         if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
 429                 uart_write_wakeup(&up->port);
 430
 431         DEBUG_INTR("THRE...");
 432
 433         if (uart_circ_empty(xmit))
 434                 m32r_sio_stop_tx(&up->port);
 435 }
 436
 437 /*
 438  * This handles the interrupt from one port.
 439  */
 440 static inline void m32r_sio_handle_port(struct uart_sio_port *up,
 441         unsigned int status)
 442 {
 443         DEBUG_INTR("status = %x...", status);
 444
 445         if (status & 0x04)
 446                 receive_chars(up, &status);
 447         if (status & 0x01)
 448                 transmit_chars(up);
 449 }
 450
 451 /*
 452  * This is the serial driver's interrupt routine.
 453  *
 454  * Arjan thinks the old way was overly complex, so it got simplified.
 455  * Alan disagrees, saying that need the complexity to handle the weird
 456  * nature of ISA shared interrupts.  (This is a special exception.)
 457  *
 458  * In order to handle ISA shared interrupts properly, we need to check
 459  * that all ports have been serviced, and therefore the ISA interrupt
 460  * line has been de-asserted.
 461  *
 462  * This means we need to loop through all ports. checking that they
 463  * don't have an interrupt pending.
 464  */
 465 static irqreturn_t m32r_sio_interrupt(int irq, void *dev_id)
 466 {
 467         struct irq_info *i = dev_id;
 468         struct list_head *l, *end = NULL;
 469         int pass_counter = 0;
 470
 471         DEBUG_INTR("m32r_sio_interrupt(%d)...", irq);
 472
 473 #ifdef CONFIG_SERIAL_M32R_PLDSIO
 474 //      if (irq == PLD_IRQ_SIO0_SND)
 475 //              irq = PLD_IRQ_SIO0_RCV;
 476 #else
 477         if (irq == M32R_IRQ_SIO0_S)
 478                 irq = M32R_IRQ_SIO0_R;
 479 #endif
 480
 481         spin_lock(&i->lock);
 482
 483         l = i->head;
 484         do {
 485                 struct uart_sio_port *up;
 486                 unsigned int sts;
 487
 488                 up = list_entry(l, struct uart_sio_port, list);
 489
 490                 sts = sio_in(up, SIOSTS);
 491                 if (sts & 0x5) {
 492                         spin_lock(&up->port.lock);
 493                         m32r_sio_handle_port(up, sts);
 494                         spin_unlock(&up->port.lock);
 495
 496                         end = NULL;
 497                 } else if (end == NULL)
 498                         end = l;
 499
 500                 l = l->next;
 501
 502                 if (l == i->head && pass_counter++ > PASS_LIMIT) {
 503                         if (sts & 0xe0)
 504                                 sio_error(&sts);
 505                         break;
 506                 }
 507         } while (l != end);
 508
 509         spin_unlock(&i->lock);
 510
 511         DEBUG_INTR("end.\n");
 512
 513         return IRQ_HANDLED;
 514 }
 515
 516 /*
 517  * To support ISA shared interrupts, we need to have one interrupt
 518  * handler that ensures that the IRQ line has been deasserted
 519  * before returning.  Failing to do this will result in the IRQ
 520  * line being stuck active, and, since ISA irqs are edge triggered,
 521  * no more IRQs will be seen.
 522  */
 523 static void serial_do_unlink(struct irq_info *i, struct uart_sio_port *up)
 524 {
 525         spin_lock_irq(&i->lock);
 526
 527         if (!list_empty(i->head)) {
 528                 if (i->head == &up->list)
 529                         i->head = i->head->next;
 530                 list_del(&up->list);
 531         } else {
 532                 BUG_ON(i->head != &up->list);
 533                 i->head = NULL;
 534         }
 535
 536         spin_unlock_irq(&i->lock);
 537 }
 538
 539 static int serial_link_irq_chain(struct uart_sio_port *up)
 540 {
 541         struct irq_info *i = irq_lists + up->port.irq;
 542         int ret, irq_flags = up->port.flags & UPF_SHARE_IRQ ? IRQF_SHARED : 0;
 543
 544         spin_lock_irq(&i->lock);
 545
 546         if (i->head) {
 547                 list_add(&up->list, i->head);
 548                 spin_unlock_irq(&i->lock);
 549
 550                 ret = 0;
 551         } else {
 552                 INIT_LIST_HEAD(&up->list);
 553                 i->head = &up->list;
 554                 spin_unlock_irq(&i->lock);
 555
 556                 ret = request_irq(up->port.irq, m32r_sio_interrupt,
 557                                   irq_flags, "SIO0-RX", i);
 558                 ret |= request_irq(up->port.irq + 1, m32r_sio_interrupt,
 559                                   irq_flags, "SIO0-TX", i);
 560                 if (ret < 0)
 561                         serial_do_unlink(i, up);
 562         }
 563
 564         return ret;
 565 }
 566
 567 static void serial_unlink_irq_chain(struct uart_sio_port *up)
 568 {
 569         struct irq_info *i = irq_lists + up->port.irq;
 570
 571         BUG_ON(i->head == NULL);
 572
 573         if (list_empty(i->head)) {
 574                 free_irq(up->port.irq, i);
 575                 free_irq(up->port.irq + 1, i);
 576         }
 577
 578         serial_do_unlink(i, up);
 579 }
 580
 581 /*
 582  * This function is used to handle ports that do not have an interrupt.
 583  */
 584 static void m32r_sio_timeout(unsigned long data)
 585 {
 586         struct uart_sio_port *up = (struct uart_sio_port *)data;
 587         unsigned int timeout;
 588         unsigned int sts;
 589
 590         sts = sio_in(up, SIOSTS);
 591         if (sts & 0x5) {
 592                 spin_lock(&up->port.lock);
 593                 m32r_sio_handle_port(up, sts);
 594                 spin_unlock(&up->port.lock);
 595         }
 596
 597         timeout = up->port.timeout;
 598         timeout = timeout > 6 ? (timeout / 2 - 2) : 1;
 599         mod_timer(&up->timer, jiffies + timeout);
 600 }
 601
 602 static unsigned int m32r_sio_tx_empty(struct uart_port *port)
 603 {
 604         struct uart_sio_port *up = (struct uart_sio_port *)port;
 605         unsigned long flags;
 606         unsigned int ret;
 607
 608         spin_lock_irqsave(&up->port.lock, flags);
 609         ret = serial_in(up, UART_LSR) & UART_LSR_TEMT ? TIOCSER_TEMT : 0;
 610         spin_unlock_irqrestore(&up->port.lock, flags);
 611
 612         return ret;
 613 }
 614
 615 static unsigned int m32r_sio_get_mctrl(struct uart_port *port)
 616 {
 617         return 0;
 618 }
 619
 620 static void m32r_sio_set_mctrl(struct uart_port *port, unsigned int mctrl)
 621 {
 622
 623 }
 624
 625 static void m32r_sio_break_ctl(struct uart_port *port, int break_state)
 626 {
 627
 628 }
 629
 630 static int m32r_sio_startup(struct uart_port *port)
 631 {
 632         struct uart_sio_port *up = (struct uart_sio_port *)port;
 633         int retval;
 634
 635         sio_init();
 636
 637         /*
 638          * If the "interrupt" for this port doesn't correspond with any
 639          * hardware interrupt, we use a timer-based system.  The original
 640          * driver used to do this with IRQ0.
 641          */
 642         if (!is_real_interrupt(up->port.irq)) {
 643                 unsigned int timeout = up->port.timeout;
 644
 645                 timeout = timeout > 6 ? (timeout / 2 - 2) : 1;
 646
 647                 up->timer.data = (unsigned long)up;
 648                 mod_timer(&up->timer, jiffies + timeout);
 649         } else {
 650                 retval = serial_link_irq_chain(up);
 651                 if (retval)
 652                         return retval;
 653         }
 654
 655         /*
 656          * Finally, enable interrupts.  Note: Modem status interrupts
 657          * are set via set_termios(), which will be occurring imminently
 658          * anyway, so we don't enable them here.
 659          * - M32R_SIO: 0x0c
 660          * - M32R_PLDSIO: 0x04
 661          */
 662         up->ier = UART_IER_MSI | UART_IER_RLSI | UART_IER_RDI;
 663         sio_out(up, SIOTRCR, up->ier);
 664
 665         /*
 666          * And clear the interrupt registers again for luck.
 667          */
 668         sio_reset();
 669
 670         return 0;
 671 }
 672
 673 static void m32r_sio_shutdown(struct uart_port *port)
 674 {
 675         struct uart_sio_port *up = (struct uart_sio_port *)port;
 676
 677         /*
 678          * Disable interrupts from this port
 679          */
 680         up->ier = 0;
 681         sio_out(up, SIOTRCR, 0);
 682
 683         /*
 684          * Disable break condition and FIFOs
 685          */
 686
 687         sio_init();
 688
 689         if (!is_real_interrupt(up->port.irq))
 690                 del_timer_sync(&up->timer);
 691         else
 692                 serial_unlink_irq_chain(up);
 693 }
 694
 695 static unsigned int m32r_sio_get_divisor(struct uart_port *port,
 696         unsigned int baud)
 697 {
 698         return uart_get_divisor(port, baud);
 699 }
 700
 701 static void m32r_sio_set_termios(struct uart_port *port,
 702         struct termios *termios, struct termios *old)
 703 {
 704         struct uart_sio_port *up = (struct uart_sio_port *)port;
 705         unsigned char cval = 0;
 706         unsigned long flags;
 707         unsigned int baud, quot;
 708
 709         switch (termios->c_cflag & CSIZE) {
 710         case CS5:
 711                 cval = UART_LCR_WLEN5;
 712                 break;
 713         case CS6:
 714                 cval = UART_LCR_WLEN6;
 715                 break;
 716         case CS7:
 717                 cval = UART_LCR_WLEN7;
 718                 break;
 719         default:
 720         case CS8:
 721                 cval = UART_LCR_WLEN8;
 722                 break;
 723         }
 724
 725         if (termios->c_cflag & CSTOPB)
 726                 cval |= UART_LCR_STOP;
 727         if (termios->c_cflag & PARENB)
 728                 cval |= UART_LCR_PARITY;
 729         if (!(termios->c_cflag & PARODD))
 730                 cval |= UART_LCR_EPAR;
 731 #ifdef CMSPAR
 732         if (termios->c_cflag & CMSPAR)
 733                 cval |= UART_LCR_SPAR;
 734 #endif
 735
 736         /*
 737          * Ask the core to calculate the divisor for us.
 738          */
 739 #ifdef CONFIG_SERIAL_M32R_PLDSIO
 740         baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk/4);
 741 #else
 742         baud = uart_get_baud_rate(port, termios, old, 0, port->uartclk/16);
 743 #endif
 744         quot = m32r_sio_get_divisor(port, baud);
 745
 746         /*
 747          * Ok, we're now changing the port state.  Do it with
 748          * interrupts disabled.
 749          */
 750         spin_lock_irqsave(&up->port.lock, flags);
 751
 752         sio_set_baud_rate(baud);
 753
 754         /*
 755          * Update the per-port timeout.
 756          */
 757         uart_update_timeout(port, termios->c_cflag, baud);
 758
 759         up->port.read_status_mask = UART_LSR_OE | UART_LSR_THRE | UART_LSR_DR;
 760         if (termios->c_iflag & INPCK)
 761                 up->port.read_status_mask |= UART_LSR_FE | UART_LSR_PE;
 762         if (termios->c_iflag & (BRKINT | PARMRK))
 763                 up->port.read_status_mask |= UART_LSR_BI;
 764
 765         /*
 766          * Characteres to ignore
 767          */
 768         up->port.ignore_status_mask = 0;
 769         if (termios->c_iflag & IGNPAR)
 770                 up->port.ignore_status_mask |= UART_LSR_PE | UART_LSR_FE;
 771         if (termios->c_iflag & IGNBRK) {
 772                 up->port.ignore_status_mask |= UART_LSR_BI;
 773                 /*
 774                  * If we're ignoring parity and break indicators,
 775                  * ignore overruns too (for real raw support).
 776                  */
 777                 if (termios->c_iflag & IGNPAR)
 778                         up->port.ignore_status_mask |= UART_LSR_OE;
 779         }
 780
 781         /*
 782          * ignore all characters if CREAD is not set
 783          */
 784         if ((termios->c_cflag & CREAD) == 0)
 785                 up->port.ignore_status_mask |= UART_LSR_DR;
 786
 787         /*
 788          * CTS flow control flag and modem status interrupts
 789          */
 790         up->ier &= ~UART_IER_MSI;
 791         if (UART_ENABLE_MS(&up->port, termios->c_cflag))
 792                 up->ier |= UART_IER_MSI;
 793
 794         serial_out(up, UART_IER, up->ier);
 795
 796         up->lcr = cval;                                 /* Save LCR */
 797         spin_unlock_irqrestore(&up->port.lock, flags);
 798 }
 799
 800 static void m32r_sio_pm(struct uart_port *port, unsigned int state,
 801         unsigned int oldstate)
 802 {
 803         struct uart_sio_port *up = (struct uart_sio_port *)port;
 804
 805         if (up->pm)
 806                 up->pm(port, state, oldstate);
 807 }
 808
 809 /*
 810  * Resource handling.  This is complicated by the fact that resources
 811  * depend on the port type.  Maybe we should be claiming the standard
 812  * 8250 ports, and then trying to get other resources as necessary?
 813  */
 814 static int
 815 m32r_sio_request_std_resource(struct uart_sio_port *up, struct resource **res)
 816 {
 817         unsigned int size = 8 << up->port.regshift;
 818 #ifndef CONFIG_SERIAL_M32R_PLDSIO
 819         unsigned long start;
 820 #endif
 821         int ret = 0;
 822
 823         switch (up->port.iotype) {
 824         case UPIO_MEM:
 825                 if (up->port.mapbase) {
 826 #ifdef CONFIG_SERIAL_M32R_PLDSIO
 827                         *res = request_mem_region(up->port.mapbase, size, "serial");
 828 #else
 829                         start = up->port.mapbase;
 830                         *res = request_mem_region(start, size, "serial");
 831 #endif
 832                         if (!*res)
 833                                 ret = -EBUSY;
 834                 }
 835                 break;
 836
 837         case UPIO_PORT:
 838                 *res = request_region(up->port.iobase, size, "serial");
 839                 if (!*res)
 840                         ret = -EBUSY;
 841                 break;
 842         }
 843         return ret;
 844 }
 845
 846 static void m32r_sio_release_port(struct uart_port *port)
 847 {
 848         struct uart_sio_port *up = (struct uart_sio_port *)port;
 849         unsigned long start, offset = 0, size = 0;
 850
 851         size <<= up->port.regshift;
 852
 853         switch (up->port.iotype) {
 854         case UPIO_MEM:
 855                 if (up->port.mapbase) {
 856                         /*
 857                          * Unmap the area.
 858                          */
 859                         iounmap(up->port.membase);
 860                         up->port.membase = NULL;
 861
 862                         start = up->port.mapbase;
 863
 864                         if (size)
 865                                 release_mem_region(start + offset, size);
 866                         release_mem_region(start, 8 << up->port.regshift);
 867                 }
 868                 break;
 869
 870         case UPIO_PORT:
 871                 start = up->port.iobase;
 872
 873                 if (size)
 874                         release_region(start + offset, size);
 875                 release_region(start + offset, 8 << up->port.regshift);
 876                 break;
 877
 878         default:
 879                 break;
 880         }
 881 }
 882
 883 static int m32r_sio_request_port(struct uart_port *port)
 884 {
 885         struct uart_sio_port *up = (struct uart_sio_port *)port;
 886         struct resource *res = NULL;
 887         int ret = 0;
 888
 889         ret = m32r_sio_request_std_resource(up, &res);
 890
 891         /*
 892          * If we have a mapbase, then request that as well.
 893          */
 894         if (ret == 0 && up->port.flags & UPF_IOREMAP) {
 895                 int size = res->end - res->start + 1;
 896
 897                 up->port.membase = ioremap(up->port.mapbase, size);
 898                 if (!up->port.membase)
 899                         ret = -ENOMEM;
 900         }
 901
 902         if (ret < 0) {
 903                 if (res)
 904                         release_resource(res);
 905         }
 906
 907         return ret;
 908 }
 909
 910 static void m32r_sio_config_port(struct uart_port *port, int flags)
 911 {
 912         struct uart_sio_port *up = (struct uart_sio_port *)port;
 913
 914         spin_lock_irqsave(&up->port.lock, flags);
 915
 916         up->port.type = (PORT_M32R_SIO - PORT_M32R_BASE + 1);
 917         up->port.fifosize = uart_config[up->port.type].dfl_xmit_fifo_size;
 918
 919         spin_unlock_irqrestore(&up->port.lock, flags);
 920 }
 921
 922 static int
 923 m32r_sio_verify_port(struct uart_port *port, struct serial_struct *ser)
 924 {
 925         if (ser->irq >= NR_IRQS || ser->irq < 0 ||
 926             ser->baud_base < 9600 || ser->type < PORT_UNKNOWN ||
 927             ser->type >= ARRAY_SIZE(uart_config))
 928                 return -EINVAL;
 929         return 0;
 930 }
 931
 932 static const char *
 933 m32r_sio_type(struct uart_port *port)
 934 {
 935         int type = port->type;
 936
 937         if (type >= ARRAY_SIZE(uart_config))
 938                 type = 0;
 939         return uart_config[type].name;
 940 }
 941
 942 static struct uart_ops m32r_sio_pops = {
 943         .tx_empty       = m32r_sio_tx_empty,
 944         .set_mctrl      = m32r_sio_set_mctrl,
 945         .get_mctrl      = m32r_sio_get_mctrl,
 946         .stop_tx        = m32r_sio_stop_tx,
 947         .start_tx       = m32r_sio_start_tx,
 948         .stop_rx        = m32r_sio_stop_rx,
 949         .enable_ms      = m32r_sio_enable_ms,
 950         .break_ctl      = m32r_sio_break_ctl,
 951         .startup        = m32r_sio_startup,
 952         .shutdown       = m32r_sio_shutdown,
 953         .set_termios    = m32r_sio_set_termios,
 954         .pm             = m32r_sio_pm,
 955         .type           = m32r_sio_type,
 956         .release_port   = m32r_sio_release_port,
 957         .request_port   = m32r_sio_request_port,
 958         .config_port    = m32r_sio_config_port,
 959         .verify_port    = m32r_sio_verify_port,
 960 };
 961
 962 static struct uart_sio_port m32r_sio_ports[UART_NR];
 963
 964 static void __init m32r_sio_init_ports(void)
 965 {
 966         struct uart_sio_port *up;
 967         static int first = 1;
 968         int i;
 969
 970         if (!first)
 971                 return;
 972         first = 0;
 973
 974         for (i = 0, up = m32r_sio_ports; i < ARRAY_SIZE(old_serial_port);
 975              i++, up++) {
 976                 up->port.iobase   = old_serial_port[i].port;
 977                 up->port.irq      = irq_canonicalize(old_serial_port[i].irq);
 978                 up->port.uartclk  = old_serial_port[i].baud_base * 16;
 979                 up->port.flags    = old_serial_port[i].flags;
 980                 up->port.membase  = old_serial_port[i].iomem_base;
 981                 up->port.iotype   = old_serial_port[i].io_type;
 982                 up->port.regshift = old_serial_port[i].iomem_reg_shift;
 983                 up->port.ops      = &m32r_sio_pops;
 984         }
 985 }
 986
 987 static void __init m32r_sio_register_ports(struct uart_driver *drv)
 988 {
 989         int i;
 990
 991         m32r_sio_init_ports();
 992
 993         for (i = 0; i < UART_NR; i++) {
 994                 struct uart_sio_port *up = &m32r_sio_ports[i];
 995
 996                 up->port.line = i;
 997                 up->port.ops = &m32r_sio_pops;
 998                 init_timer(&up->timer);
 999                 up->timer.function = m32r_sio_timeout;
1000
1001                 /*
1002                  * ALPHA_KLUDGE_MCR needs to be killed.
1003                  */
1004                 up->mcr_mask = ~ALPHA_KLUDGE_MCR;
1005                 up->mcr_force = ALPHA_KLUDGE_MCR;
1006
1007                 uart_add_one_port(drv, &up->port);
1008         }
1009 }
1010
1011 #ifdef CONFIG_SERIAL_M32R_SIO_CONSOLE
1012
1013 /*
1014  *      Wait for transmitter & holding register to empty
1015  */
1016 static inline void wait_for_xmitr(struct uart_sio_port *up)
1017 {
1018         unsigned int status, tmout = 10000;
1019
1020         /* Wait up to 10ms for the character(s) to be sent. */
1021         do {
1022                 status = sio_in(up, SIOSTS);
1023
1024                 if (--tmout == 0)
1025                         break;
1026                 udelay(1);
1027         } while ((status & UART_EMPTY) != UART_EMPTY);
1028
1029         /* Wait up to 1s for flow control if necessary */
1030         if (up->port.flags & UPF_CONS_FLOW) {
1031                 tmout = 1000000;
1032                 while (--tmout)
1033                         udelay(1);
1034         }
1035 }
1036
1037 static void m32r_sio_console_putchar(struct uart_port *port, int ch)
1038 {
1039         struct uart_sio_port *up = (struct uart_sio_port *)port;
1040
1041         wait_for_xmitr(up);
1042         sio_out(up, SIOTXB, ch);
1043 }
1044
1045 /*
1046  *      Print a string to the serial port trying not to disturb
1047  *      any possible real use of the port...
1048  *
1049  *      The console_lock must be held when we get here.
1050  */
1051 static void m32r_sio_console_write(struct console *co, const char *s,
1052         unsigned int count)
1053 {
1054         struct uart_sio_port *up = &m32r_sio_ports[co->index];
1055         unsigned int ier;
1056
1057         /*
1058          *      First save the UER then disable the interrupts
1059          */
1060         ier = sio_in(up, SIOTRCR);
1061         sio_out(up, SIOTRCR, 0);
1062
1063         uart_console_write(&up->port, s, count, m32r_sio_console_putchar);
1064
1065         /*
1066          *      Finally, wait for transmitter to become empty
1067          *      and restore the IER
1068          */
1069         wait_for_xmitr(up);
1070         sio_out(up, SIOTRCR, ier);
1071 }
1072
1073 static int __init m32r_sio_console_setup(struct console *co, char *options)
1074 {
1075         struct uart_port *port;
1076         int baud = 9600;
1077         int bits = 8;
1078         int parity = 'n';
1079         int flow = 'n';
1080
1081         /*
1082          * Check whether an invalid uart number has been specified, and
1083          * if so, search for the first available port that does have
1084          * console support.
1085          */
1086         if (co->index >= UART_NR)
1087                 co->index = 0;
1088         port = &m32r_sio_ports[co->index].port;
1089
1090         /*
1091          * Temporary fix.
1092          */
1093         spin_lock_init(&port->lock);
1094
1095         if (options)
1096                 uart_parse_options(options, &baud, &parity, &bits, &flow);
1097
1098         return uart_set_options(port, co, baud, parity, bits, flow);
1099 }
1100
1101 static struct uart_driver m32r_sio_reg;
1102 static struct console m32r_sio_console = {
1103         .name           = "ttyS",
1104         .write          = m32r_sio_console_write,
1105         .device         = uart_console_device,
1106         .setup          = m32r_sio_console_setup,
1107         .flags          = CON_PRINTBUFFER,
1108         .index          = -1,
1109         .data           = &m32r_sio_reg,
1110 };
1111
1112 static int __init m32r_sio_console_init(void)
1113 {
1114         sio_reset();
1115         sio_init();
1116         m32r_sio_init_ports();
1117         register_console(&m32r_sio_console);
1118         return 0;
1119 }
1120 console_initcall(m32r_sio_console_init);
1121
1122 #define M32R_SIO_CONSOLE        &m32r_sio_console
1123 #else
1124 #define M32R_SIO_CONSOLE        NULL
1125 #endif
1126
1127 static struct uart_driver m32r_sio_reg = {
1128         .owner                  = THIS_MODULE,
1129         .driver_name            = "sio",
1130         .dev_name               = "ttyS",
1131         .major                  = TTY_MAJOR,
1132         .minor                  = 64,
1133         .nr                     = UART_NR,
1134         .cons                   = M32R_SIO_CONSOLE,
1135 };
1136
1137 /**
1138  *      m32r_sio_suspend_port - suspend one serial port
1139  *      @line: serial line number
1140  *
1141  *      Suspend one serial port.
1142  */
1143 void m32r_sio_suspend_port(int line)
1144 {
1145         uart_suspend_port(&m32r_sio_reg, &m32r_sio_ports[line].port);
1146 }
1147
1148 /**
1149  *      m32r_sio_resume_port - resume one serial port
1150  *      @line: serial line number
1151  *
1152  *      Resume one serial port.
1153  */
1154 void m32r_sio_resume_port(int line)
1155 {
1156         uart_resume_port(&m32r_sio_reg, &m32r_sio_ports[line].port);
1157 }
1158
1159 static int __init m32r_sio_init(void)
1160 {
1161         int ret, i;
1162
1163         printk(KERN_INFO "Serial: M32R SIO driver $Revision: 1.11 $ ");
1164
1165         for (i = 0; i < NR_IRQS; i++)
1166                 spin_lock_init(&irq_lists[i].lock);
1167
1168         ret = uart_register_driver(&m32r_sio_reg);
1169         if (ret >= 0)
1170                 m32r_sio_register_ports(&m32r_sio_reg);
1171
1172         return ret;
1173 }
1174
1175 static void __exit m32r_sio_exit(void)
1176 {
1177         int i;
1178
1179         for (i = 0; i < UART_NR; i++)
1180                 uart_remove_one_port(&m32r_sio_reg, &m32r_sio_ports[i].port);
1181
1182         uart_unregister_driver(&m32r_sio_reg);
1183 }
1184
1185 module_init(m32r_sio_init);
1186 module_exit(m32r_sio_exit);
1187
1188 EXPORT_SYMBOL(m32r_sio_suspend_port);
1189 EXPORT_SYMBOL(m32r_sio_resume_port);
1190
1191 MODULE_LICENSE("GPL");
1192 MODULE_DESCRIPTION("Generic M32R SIO serial driver $Revision: 1.11 $");