common/serial.c

   1 /*
   2  * (C) Copyright 2004
   3  * Wolfgang Denk, DENX Software Engineering, [email protected].
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  */
  23
  24 #include <common.h>
  25 #include <serial.h>
  26 #include <stdio_dev.h>
  27 #include <post.h>
  28 #include <linux/compiler.h>
  29
  30 DECLARE_GLOBAL_DATA_PTR;
  31
  32 static struct serial_device *serial_devices;
  33 static struct serial_device *serial_current;
  34
  35 void serial_register(struct serial_device *dev)
  36 {
  37 #ifdef CONFIG_NEEDS_MANUAL_RELOC
  38         dev->init += gd->reloc_off;
  39         dev->setbrg += gd->reloc_off;
  40         dev->getc += gd->reloc_off;
  41         dev->tstc += gd->reloc_off;
  42         dev->putc += gd->reloc_off;
  43         dev->puts += gd->reloc_off;
  44 #endif
  45
  46         dev->next = serial_devices;
  47         serial_devices = dev;
  48 }
  49
  50 void serial_initialize(void)
  51 {
  52 #if defined(CONFIG_8xx_CONS_SMC1) || defined(CONFIG_8xx_CONS_SMC2)
  53         serial_register(&serial_smc_device);
  54 #endif
  55 #if     defined(CONFIG_8xx_CONS_SCC1) || defined(CONFIG_8xx_CONS_SCC2) || \
  56         defined(CONFIG_8xx_CONS_SCC3) || defined(CONFIG_8xx_CONS_SCC4)
  57         serial_register(&serial_scc_device);
  58 #endif
  59
  60 #if defined(CONFIG_SYS_NS16550_SERIAL)
  61 #if defined(CONFIG_SYS_NS16550_COM1)
  62         serial_register(&eserial1_device);
  63 #endif
  64 #if defined(CONFIG_SYS_NS16550_COM2)
  65         serial_register(&eserial2_device);
  66 #endif
  67 #if defined(CONFIG_SYS_NS16550_COM3)
  68         serial_register(&eserial3_device);
  69 #endif
  70 #if defined(CONFIG_SYS_NS16550_COM4)
  71         serial_register(&eserial4_device);
  72 #endif
  73 #endif /* CONFIG_SYS_NS16550_SERIAL */
  74 #if defined(CONFIG_FFUART)
  75         serial_register(&serial_ffuart_device);
  76 #endif
  77 #if defined(CONFIG_BTUART)
  78         serial_register(&serial_btuart_device);
  79 #endif
  80 #if defined(CONFIG_STUART)
  81         serial_register(&serial_stuart_device);
  82 #endif
  83 #if defined(CONFIG_S3C2410)
  84         serial_register(&s3c24xx_serial0_device);
  85         serial_register(&s3c24xx_serial1_device);
  86         serial_register(&s3c24xx_serial2_device);
  87 #endif
  88 #if defined(CONFIG_S5P)
  89         serial_register(&s5p_serial0_device);
  90         serial_register(&s5p_serial1_device);
  91         serial_register(&s5p_serial2_device);
  92         serial_register(&s5p_serial3_device);
  93 #endif
  94 #if defined(CONFIG_MPC512X)
  95 #if defined(CONFIG_SYS_PSC1)
  96         serial_register(&serial1_device);
  97 #endif
  98 #if defined(CONFIG_SYS_PSC3)
  99         serial_register(&serial3_device);
 100 #endif
 101 #if defined(CONFIG_SYS_PSC4)
 102         serial_register(&serial4_device);
 103 #endif
 104 #if defined(CONFIG_SYS_PSC6)
 105         serial_register(&serial6_device);
 106 #endif
 107 #endif
 108 #if defined(CONFIG_SYS_BFIN_UART)
 109         serial_register_bfin_uart();
 110 #endif
 111 #if defined(CONFIG_XILINX_UARTLITE)
 112 # ifdef XILINX_UARTLITE_BASEADDR
 113         serial_register(&uartlite_serial0_device);
 114 # endif /* XILINX_UARTLITE_BASEADDR */
 115 # ifdef XILINX_UARTLITE_BASEADDR1
 116         serial_register(&uartlite_serial1_device);
 117 # endif /* XILINX_UARTLITE_BASEADDR1 */
 118 # ifdef XILINX_UARTLITE_BASEADDR2
 119         serial_register(&uartlite_serial2_device);
 120 # endif /* XILINX_UARTLITE_BASEADDR2 */
 121 # ifdef XILINX_UARTLITE_BASEADDR3
 122         serial_register(&uartlite_serial3_device);
 123 # endif /* XILINX_UARTLITE_BASEADDR3 */
 124 #endif /* CONFIG_XILINX_UARTLITE */
 125 #if defined(CONFIG_ZYNQ_SERIAL)
 126 # ifdef CONFIG_ZYNQ_SERIAL_BASEADDR0
 127         serial_register(&uart_zynq_serial0_device);
 128 # endif
 129 # ifdef CONFIG_ZYNQ_SERIAL_BASEADDR1
 130         serial_register(&uart_zynq_serial1_device);
 131 # endif
 132 #endif
 133         serial_assign(default_serial_console()->name);
 134 }
 135
 136 void serial_stdio_init(void)
 137 {
 138         struct stdio_dev dev;
 139         struct serial_device *s = serial_devices;
 140
 141         while (s) {
 142                 memset(&dev, 0, sizeof(dev));
 143
 144                 strcpy(dev.name, s->name);
 145                 dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT;
 146
 147                 dev.start = s->init;
 148                 dev.stop = s->uninit;
 149                 dev.putc = s->putc;
 150                 dev.puts = s->puts;
 151                 dev.getc = s->getc;
 152                 dev.tstc = s->tstc;
 153
 154                 stdio_register(&dev);
 155
 156                 s = s->next;
 157         }
 158 }
 159
 160 int serial_assign(const char *name)
 161 {
 162         struct serial_device *s;
 163
 164         for (s = serial_devices; s; s = s->next) {
 165                 if (strcmp(s->name, name) == 0) {
 166                         serial_current = s;
 167                         return 0;
 168                 }
 169         }
 170
 171         return 1;
 172 }
 173
 174 void serial_reinit_all(void)
 175 {
 176         struct serial_device *s;
 177
 178         for (s = serial_devices; s; s = s->next)
 179                 s->init();
 180 }
 181
 182 static struct serial_device *get_current(void)
 183 {
 184         struct serial_device *dev;
 185
 186         if (!(gd->flags & GD_FLG_RELOC) || !serial_current) {
 187                 dev = default_serial_console();
 188
 189                 /* We must have a console device */
 190                 if (!dev)
 191                         panic("Cannot find console");
 192         } else
 193                 dev = serial_current;
 194         return dev;
 195 }
 196
 197 int serial_init(void)
 198 {
 199         return get_current()->init();
 200 }
 201
 202 void serial_setbrg(void)
 203 {
 204         get_current()->setbrg();
 205 }
 206
 207 int serial_getc(void)
 208 {
 209         return get_current()->getc();
 210 }
 211
 212 int serial_tstc(void)
 213 {
 214         return get_current()->tstc();
 215 }
 216
 217 void serial_putc(const char c)
 218 {
 219         get_current()->putc(c);
 220 }
 221
 222 void serial_puts(const char *s)
 223 {
 224         get_current()->puts(s);
 225 }
 226
 227 #if CONFIG_POST & CONFIG_SYS_POST_UART
 228 static const int bauds[] = CONFIG_SYS_BAUDRATE_TABLE;
 229
 230 /* Mark weak until post/cpu/.../uart.c migrate over */
 231 __weak
 232 int uart_post_test(int flags)
 233 {
 234         unsigned char c;
 235         int ret, saved_baud, b;
 236         struct serial_device *saved_dev, *s;
 237         bd_t *bd = gd->bd;
 238
 239         /* Save current serial state */
 240         ret = 0;
 241         saved_dev = serial_current;
 242         saved_baud = bd->bi_baudrate;
 243
 244         for (s = serial_devices; s; s = s->next) {
 245                 /* If this driver doesn't support loop back, skip it */
 246                 if (!s->loop)
 247                         continue;
 248
 249                 /* Test the next device */
 250                 serial_current = s;
 251
 252                 ret = serial_init();
 253                 if (ret)
 254                         goto done;
 255
 256                 /* Consume anything that happens to be queued */
 257                 while (serial_tstc())
 258                         serial_getc();
 259
 260                 /* Enable loop back */
 261                 s->loop(1);
 262
 263                 /* Test every available baud rate */
 264                 for (b = 0; b < ARRAY_SIZE(bauds); ++b) {
 265                         bd->bi_baudrate = bauds[b];
 266                         serial_setbrg();
 267
 268                         /*
 269                          * Stick to printable chars to avoid issues:
 270                          *  - terminal corruption
 271                          *  - serial program reacting to sequences and sending
 272                          *    back random extra data
 273                          *  - most serial drivers add in extra chars (like \r\n)
 274                          */
 275                         for (c = 0x20; c < 0x7f; ++c) {
 276                                 /* Send it out */
 277                                 serial_putc(c);
 278
 279                                 /* Make sure it's the same one */
 280                                 ret = (c != serial_getc());
 281                                 if (ret) {
 282                                         s->loop(0);
 283                                         goto done;
 284                                 }
 285
 286                                 /* Clean up the output in case it was sent */
 287                                 serial_putc('\b');
 288                                 ret = ('\b' != serial_getc());
 289                                 if (ret) {
 290                                         s->loop(0);
 291                                         goto done;
 292                                 }
 293                         }
 294                 }
 295
 296                 /* Disable loop back */
 297                 s->loop(0);
 298
 299                 /* XXX: There is no serial_uninit() !? */
 300                 if (s->uninit)
 301                         s->uninit();
 302         }
 303
 304  done:
 305         /* Restore previous serial state */
 306         serial_current = saved_dev;
 307         bd->bi_baudrate = saved_baud;
 308         serial_reinit_all();
 309         serial_setbrg();
 310
 311         return ret;
 312 }
 313 #endif