common/stdio.c

   1 /*
   2  * Copyright (C) 2009 Sergey Kubushyn <ksi@koi8.net>
   3  *
   4  * Changes for multibus/multiadapter I2C support.
   5  *
   6  * (C) Copyright 2000
   7  * Paolo Scaffardi, AIRVENT SAM s.p.a - RIMINI(ITALY), arsenio@tin.it
   8  *
   9  * SPDX-License-Identifier:     GPL-2.0+
  10  */
  11
  12 #include <config.h>
  13 #include <common.h>
  14 #include <dm.h>
  15 #include <errno.h>
  16 #include <stdarg.h>
  17 #include <malloc.h>
  18 #include <stdio_dev.h>
  19 #include <serial.h>
  20 #ifdef CONFIG_LOGBUFFER
  21 #include <logbuff.h>
  22 #endif
  23
  24 #if defined(CONFIG_HARD_I2C) || defined(CONFIG_SYS_I2C)
  25 #include <i2c.h>
  26 #endif
  27
  28 #include <dm/device-internal.h>
  29
  30 DECLARE_GLOBAL_DATA_PTR;
  31
  32 static struct stdio_dev devs;
  33 struct stdio_dev *stdio_devices[] = { NULL, NULL, NULL };
  34 char *stdio_names[MAX_FILES] = { "stdin", "stdout", "stderr" };
  35
  36 #if defined(CONFIG_SPLASH_SCREEN) && !defined(CONFIG_SYS_DEVICE_NULLDEV)
  37 #define CONFIG_SYS_DEVICE_NULLDEV       1
  38 #endif
  39
  40 #if CONFIG_IS_ENABLED(SYS_STDIO_DEREGISTER)
  41 #define CONFIG_SYS_DEVICE_NULLDEV       1
  42 #endif
  43
  44 #ifdef CONFIG_SYS_DEVICE_NULLDEV
  45 static void nulldev_putc(struct stdio_dev *dev, const char c)
  46 {
  47         /* nulldev is empty! */
  48 }
  49
  50 static void nulldev_puts(struct stdio_dev *dev, const char *s)
  51 {
  52         /* nulldev is empty! */
  53 }
  54
  55 static int nulldev_input(struct stdio_dev *dev)
  56 {
  57         /* nulldev is empty! */
  58         return 0;
  59 }
  60 #endif
  61
  62 static void stdio_serial_putc(struct stdio_dev *dev, const char c)
  63 {
  64         serial_putc(c);
  65 }
  66
  67 static void stdio_serial_puts(struct stdio_dev *dev, const char *s)
  68 {
  69         serial_puts(s);
  70 }
  71
  72 static int stdio_serial_getc(struct stdio_dev *dev)
  73 {
  74         return serial_getc();
  75 }
  76
  77 static int stdio_serial_tstc(struct stdio_dev *dev)
  78 {
  79         return serial_tstc();
  80 }
  81
  82 /**************************************************************************
  83  * SYSTEM DRIVERS
  84  **************************************************************************
  85  */
  86
  87 static void drv_system_init (void)
  88 {
  89         struct stdio_dev dev;
  90
  91         memset (&dev, 0, sizeof (dev));
  92
  93         strcpy (dev.name, "serial");
  94         dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT;
  95         dev.putc = stdio_serial_putc;
  96         dev.puts = stdio_serial_puts;
  97         dev.getc = stdio_serial_getc;
  98         dev.tstc = stdio_serial_tstc;
  99         stdio_register (&dev);
 100
 101 #ifdef CONFIG_SYS_DEVICE_NULLDEV
 102         memset (&dev, 0, sizeof (dev));
 103
 104         strcpy (dev.name, "nulldev");
 105         dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT;
 106         dev.putc = nulldev_putc;
 107         dev.puts = nulldev_puts;
 108         dev.getc = nulldev_input;
 109         dev.tstc = nulldev_input;
 110
 111         stdio_register (&dev);
 112 #endif
 113 }
 114
 115 /**************************************************************************
 116  * DEVICES
 117  **************************************************************************
 118  */
 119 struct list_head* stdio_get_list(void)
 120 {
 121         return &(devs.list);
 122 }
 123
 124 #ifdef CONFIG_DM_VIDEO
 125 /**
 126  * stdio_probe_device() - Find a device which provides the given stdio device
 127  *
 128  * This looks for a device of the given uclass which provides a particular
 129  * stdio device. It is currently really only useful for UCLASS_VIDEO.
 130  *
 131  * Ultimately we want to be able to probe a device by its stdio name. At
 132  * present devices register in their probe function (for video devices this
 133  * is done in vidconsole_post_probe()) and we don't know what name they will
 134  * use until they do so.
 135  * TODO(sjg@chromium.org): We should be able to determine the name before
 136  * probing, and probe the required device.
 137  *
 138  * @name:       stdio device name (e.g. "vidconsole")
 139  * id:          Uclass ID of device to look for (e.g. UCLASS_VIDEO)
 140  * @sdevp:      Returns stdout device, if found, else NULL
 141  * @return 0 if found, -ENOENT if no device found with that name, other -ve
 142  *         on other error
 143  */
 144 static int stdio_probe_device(const char *name, enum uclass_id id,
 145                               struct stdio_dev **sdevp)
 146 {
 147         struct stdio_dev *sdev;
 148         struct udevice *dev;
 149         int seq, ret;
 150
 151         *sdevp = NULL;
 152         seq = trailing_strtoln(name, NULL);
 153         if (seq == -1)
 154                 seq = 0;
 155         ret = uclass_get_device_by_seq(id, seq, &dev);
 156         if (ret == -ENODEV)
 157                 ret = uclass_first_device_err(id, &dev);
 158         if (ret) {
 159                 debug("No %s device for seq %d (%s)\n", uclass_get_name(id),
 160                       seq, name);
 161                 return ret;
 162         }
 163         /* The device should be be the last one registered */
 164         sdev = list_empty(&devs.list) ? NULL :
 165                         list_last_entry(&devs.list, struct stdio_dev, list);
 166         if (!sdev || strcmp(sdev->name, name)) {
 167                 debug("Device '%s' did not register with stdio as '%s'\n",
 168                       dev->name, name);
 169                 return -ENOENT;
 170         }
 171         *sdevp = sdev;
 172
 173         return 0;
 174 }
 175 #endif
 176
 177 struct stdio_dev *stdio_get_by_name(const char *name)
 178 {
 179         struct list_head *pos;
 180         struct stdio_dev *sdev;
 181
 182         if (!name)
 183                 return NULL;
 184
 185         list_for_each(pos, &(devs.list)) {
 186                 sdev = list_entry(pos, struct stdio_dev, list);
 187                 if (strcmp(sdev->name, name) == 0)
 188                         return sdev;
 189         }
 190 #ifdef CONFIG_DM_VIDEO
 191         /*
 192          * We did not find a suitable stdio device. If there is a video
 193          * driver with a name starting with 'vidconsole', we can try probing
 194          * that in the hope that it will produce the required stdio device.
 195          *
 196          * This function is sometimes called with the entire value of
 197          * 'stdout', which may include a list of devices separate by commas.
 198          * Obviously this is not going to work, so we ignore that case. The
 199          * call path in that case is console_init_r() -> search_device() ->
 200          * stdio_get_by_name().
 201          */
 202         if (!strncmp(name, "vidconsole", 10) && !strchr(name, ',') &&
 203             !stdio_probe_device(name, UCLASS_VIDEO, &sdev))
 204                 return sdev;
 205 #endif
 206
 207         return NULL;
 208 }
 209
 210 struct stdio_dev* stdio_clone(struct stdio_dev *dev)
 211 {
 212         struct stdio_dev *_dev;
 213
 214         if(!dev)
 215                 return NULL;
 216
 217         _dev = calloc(1, sizeof(struct stdio_dev));
 218
 219         if(!_dev)
 220                 return NULL;
 221
 222         memcpy(_dev, dev, sizeof(struct stdio_dev));
 223
 224         return _dev;
 225 }
 226
 227 int stdio_register_dev(struct stdio_dev *dev, struct stdio_dev **devp)
 228 {
 229         struct stdio_dev *_dev;
 230
 231         _dev = stdio_clone(dev);
 232         if(!_dev)
 233                 return -ENODEV;
 234         list_add_tail(&(_dev->list), &(devs.list));
 235         if (devp)
 236                 *devp = _dev;
 237
 238         return 0;
 239 }
 240
 241 int stdio_register(struct stdio_dev *dev)
 242 {
 243         return stdio_register_dev(dev, NULL);
 244 }
 245
 246 /* deregister the device "devname".
 247  * returns 0 if success, -1 if device is assigned and 1 if devname not found
 248  */
 249 #if CONFIG_IS_ENABLED(SYS_STDIO_DEREGISTER)
 250 int stdio_deregister_dev(struct stdio_dev *dev, int force)
 251 {
 252         int l;
 253         struct list_head *pos;
 254         char temp_names[3][16];
 255
 256         /* get stdio devices (ListRemoveItem changes the dev list) */
 257         for (l=0 ; l< MAX_FILES; l++) {
 258                 if (stdio_devices[l] == dev) {
 259                         if (force) {
 260                                 strcpy(temp_names[l], "nulldev");
 261                                 continue;
 262                         }
 263                         /* Device is assigned -> report error */
 264                         return -1;
 265                 }
 266                 memcpy (&temp_names[l][0],
 267                         stdio_devices[l]->name,
 268                         sizeof(temp_names[l]));
 269         }
 270
 271         list_del(&(dev->list));
 272         free(dev);
 273
 274         /* reassign Device list */
 275         list_for_each(pos, &(devs.list)) {
 276                 dev = list_entry(pos, struct stdio_dev, list);
 277                 for (l=0 ; l< MAX_FILES; l++) {
 278                         if(strcmp(dev->name, temp_names[l]) == 0)
 279                                 stdio_devices[l] = dev;
 280                 }
 281         }
 282         return 0;
 283 }
 284
 285 int stdio_deregister(const char *devname, int force)
 286 {
 287         struct stdio_dev *dev;
 288
 289         dev = stdio_get_by_name(devname);
 290
 291         if (!dev) /* device not found */
 292                 return -ENODEV;
 293
 294         return stdio_deregister_dev(dev, force);
 295 }
 296 #endif /* CONFIG_IS_ENABLED(SYS_STDIO_DEREGISTER) */
 297
 298 int stdio_init_tables(void)
 299 {
 300 #if defined(CONFIG_NEEDS_MANUAL_RELOC)
 301         /* already relocated for current ARM implementation */
 302         ulong relocation_offset = gd->reloc_off;
 303         int i;
 304
 305         /* relocate device name pointers */
 306         for (i = 0; i < (sizeof (stdio_names) / sizeof (char *)); ++i) {
 307                 stdio_names[i] = (char *) (((ulong) stdio_names[i]) +
 308                                                 relocation_offset);
 309         }
 310 #endif /* CONFIG_NEEDS_MANUAL_RELOC */
 311
 312         /* Initialize the list */
 313         INIT_LIST_HEAD(&(devs.list));
 314
 315         return 0;
 316 }
 317
 318 int stdio_add_devices(void)
 319 {
 320 #ifdef CONFIG_DM_KEYBOARD
 321         struct udevice *dev;
 322         struct uclass *uc;
 323         int ret;
 324
 325         /*
 326          * For now we probe all the devices here. At some point this should be
 327          * done only when the devices are required - e.g. we have a list of
 328          * input devices to start up in the stdin environment variable. That
 329          * work probably makes more sense when stdio itself is converted to
 330          * driver model.
 331          *
 332          * TODO(sjg@chromium.org): Convert changing uclass_first_device() etc.
 333          * to return the device even on error. Then we could use that here.
 334          */
 335         ret = uclass_get(UCLASS_KEYBOARD, &uc);
 336         if (ret)
 337                 return ret;
 338
 339         /* Don't report errors to the caller - assume that they are non-fatal */
 340         uclass_foreach_dev(dev, uc) {
 341                 ret = device_probe(dev);
 342                 if (ret)
 343                         printf("Failed to probe keyboard '%s'\n", dev->name);
 344         }
 345 #endif
 346 #ifdef CONFIG_SYS_I2C
 347         i2c_init_all();
 348 #else
 349 #if defined(CONFIG_HARD_I2C)
 350         i2c_init (CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE);
 351 #endif
 352 #endif
 353 #ifdef CONFIG_DM_VIDEO
 354         /*
 355          * If the console setting is not in environment variables then
 356          * console_init_r() will not be calling iomux_doenv() (which calls
 357          * search_device()). So we will not dynamically add devices by
 358          * calling stdio_probe_device().
 359          *
 360          * So just probe all video devices now so that whichever one is
 361          * required will be available.
 362          */
 363 #ifndef CONFIG_SYS_CONSOLE_IS_IN_ENV
 364         struct udevice *vdev;
 365 # ifndef CONFIG_DM_KEYBOARD
 366         int ret;
 367 # endif
 368
 369         for (ret = uclass_first_device(UCLASS_VIDEO, &vdev);
 370              vdev;
 371              ret = uclass_next_device(&vdev))
 372                 ;
 373         if (ret)
 374                 printf("%s: Video device failed (ret=%d)\n", __func__, ret);
 375 #endif /* !CONFIG_SYS_CONSOLE_IS_IN_ENV */
 376 #else
 377 # if defined(CONFIG_LCD)
 378         drv_lcd_init ();
 379 # endif
 380 # if defined(CONFIG_VIDEO) || defined(CONFIG_CFB_CONSOLE)
 381         drv_video_init ();
 382 # endif
 383 #endif /* CONFIG_DM_VIDEO */
 384 #if defined(CONFIG_KEYBOARD) && !defined(CONFIG_DM_KEYBOARD)
 385         drv_keyboard_init ();
 386 #endif
 387 #ifdef CONFIG_LOGBUFFER
 388         drv_logbuff_init ();
 389 #endif
 390         drv_system_init ();
 391         serial_stdio_init ();
 392 #ifdef CONFIG_USB_TTY
 393         drv_usbtty_init ();
 394 #endif
 395 #ifdef CONFIG_NETCONSOLE
 396         drv_nc_init ();
 397 #endif
 398 #ifdef CONFIG_JTAG_CONSOLE
 399         drv_jtag_console_init ();
 400 #endif
 401 #ifdef CONFIG_CBMEM_CONSOLE
 402         cbmemc_init();
 403 #endif
 404
 405         return 0;
 406 }
 407
 408 int stdio_init(void)
 409 {
 410         stdio_init_tables();
 411         stdio_add_devices();
 412
 413         return 0;
 414 }