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