xref: /openbmc/u-boot/common/console.c (revision 415a613b)
1 /*
2  * (C) Copyright 2000
3  * Paolo Scaffardi, AIRVENT SAM s.p.a - RIMINI(ITALY), arsenio@tin.it
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 <stdarg.h>
26 #include <malloc.h>
27 #include <console.h>
28 #include <exports.h>
29 
30 DECLARE_GLOBAL_DATA_PTR;
31 
32 #ifdef CONFIG_AMIGAONEG3SE
33 int console_changed = 0;
34 #endif
35 
36 #ifdef CFG_CONSOLE_IS_IN_ENV
37 /*
38  * if overwrite_console returns 1, the stdin, stderr and stdout
39  * are switched to the serial port, else the settings in the
40  * environment are used
41  */
42 #ifdef CFG_CONSOLE_OVERWRITE_ROUTINE
43 extern int overwrite_console (void);
44 #define OVERWRITE_CONSOLE overwrite_console ()
45 #else
46 #define OVERWRITE_CONSOLE 0
47 #endif /* CFG_CONSOLE_OVERWRITE_ROUTINE */
48 
49 #endif /* CFG_CONSOLE_IS_IN_ENV */
50 
51 static int console_setfile (int file, device_t * dev)
52 {
53 	int error = 0;
54 
55 	if (dev == NULL)
56 		return -1;
57 
58 	switch (file) {
59 	case stdin:
60 	case stdout:
61 	case stderr:
62 		/* Start new device */
63 		if (dev->start) {
64 			error = dev->start ();
65 			/* If it's not started dont use it */
66 			if (error < 0)
67 				break;
68 		}
69 
70 		/* Assign the new device (leaving the existing one started) */
71 		stdio_devices[file] = dev;
72 
73 		/*
74 		 * Update monitor functions
75 		 * (to use the console stuff by other applications)
76 		 */
77 		switch (file) {
78 		case stdin:
79 			gd->jt[XF_getc] = dev->getc;
80 			gd->jt[XF_tstc] = dev->tstc;
81 			break;
82 		case stdout:
83 			gd->jt[XF_putc] = dev->putc;
84 			gd->jt[XF_puts] = dev->puts;
85 			gd->jt[XF_printf] = printf;
86 			break;
87 		}
88 		break;
89 
90 	default:		/* Invalid file ID */
91 		error = -1;
92 	}
93 	return error;
94 }
95 
96 /** U-Boot INITIAL CONSOLE-NOT COMPATIBLE FUNCTIONS *************************/
97 
98 void serial_printf (const char *fmt, ...)
99 {
100 	va_list args;
101 	uint i;
102 	char printbuffer[CFG_PBSIZE];
103 
104 	va_start (args, fmt);
105 
106 	/* For this to work, printbuffer must be larger than
107 	 * anything we ever want to print.
108 	 */
109 	i = vsprintf (printbuffer, fmt, args);
110 	va_end (args);
111 
112 	serial_puts (printbuffer);
113 }
114 
115 int fgetc (int file)
116 {
117 	if (file < MAX_FILES)
118 		return stdio_devices[file]->getc ();
119 
120 	return -1;
121 }
122 
123 int ftstc (int file)
124 {
125 	if (file < MAX_FILES)
126 		return stdio_devices[file]->tstc ();
127 
128 	return -1;
129 }
130 
131 void fputc (int file, const char c)
132 {
133 	if (file < MAX_FILES)
134 		stdio_devices[file]->putc (c);
135 }
136 
137 void fputs (int file, const char *s)
138 {
139 	if (file < MAX_FILES)
140 		stdio_devices[file]->puts (s);
141 }
142 
143 void fprintf (int file, const char *fmt, ...)
144 {
145 	va_list args;
146 	uint i;
147 	char printbuffer[CFG_PBSIZE];
148 
149 	va_start (args, fmt);
150 
151 	/* For this to work, printbuffer must be larger than
152 	 * anything we ever want to print.
153 	 */
154 	i = vsprintf (printbuffer, fmt, args);
155 	va_end (args);
156 
157 	/* Send to desired file */
158 	fputs (file, printbuffer);
159 }
160 
161 /** U-Boot INITIAL CONSOLE-COMPATIBLE FUNCTION *****************************/
162 
163 int getc (void)
164 {
165 	if (gd->flags & GD_FLG_DEVINIT) {
166 		/* Get from the standard input */
167 		return fgetc (stdin);
168 	}
169 
170 	/* Send directly to the handler */
171 	return serial_getc ();
172 }
173 
174 int tstc (void)
175 {
176 	if (gd->flags & GD_FLG_DEVINIT) {
177 		/* Test the standard input */
178 		return ftstc (stdin);
179 	}
180 
181 	/* Send directly to the handler */
182 	return serial_tstc ();
183 }
184 
185 void putc (const char c)
186 {
187 #ifdef CONFIG_SILENT_CONSOLE
188 	if (gd->flags & GD_FLG_SILENT)
189 		return;
190 #endif
191 
192 	if (gd->flags & GD_FLG_DEVINIT) {
193 		/* Send to the standard output */
194 		fputc (stdout, c);
195 	} else {
196 		/* Send directly to the handler */
197 		serial_putc (c);
198 	}
199 }
200 
201 void puts (const char *s)
202 {
203 #ifdef CONFIG_SILENT_CONSOLE
204 	if (gd->flags & GD_FLG_SILENT)
205 		return;
206 #endif
207 
208 	if (gd->flags & GD_FLG_DEVINIT) {
209 		/* Send to the standard output */
210 		fputs (stdout, s);
211 	} else {
212 		/* Send directly to the handler */
213 		serial_puts (s);
214 	}
215 }
216 
217 void printf (const char *fmt, ...)
218 {
219 	va_list args;
220 	uint i;
221 	char printbuffer[CFG_PBSIZE];
222 
223 	va_start (args, fmt);
224 
225 	/* For this to work, printbuffer must be larger than
226 	 * anything we ever want to print.
227 	 */
228 	i = vsprintf (printbuffer, fmt, args);
229 	va_end (args);
230 
231 	/* Print the string */
232 	puts (printbuffer);
233 }
234 
235 void vprintf (const char *fmt, va_list args)
236 {
237 	uint i;
238 	char printbuffer[CFG_PBSIZE];
239 
240 	/* For this to work, printbuffer must be larger than
241 	 * anything we ever want to print.
242 	 */
243 	i = vsprintf (printbuffer, fmt, args);
244 
245 	/* Print the string */
246 	puts (printbuffer);
247 }
248 
249 /* test if ctrl-c was pressed */
250 static int ctrlc_disabled = 0;	/* see disable_ctrl() */
251 static int ctrlc_was_pressed = 0;
252 int ctrlc (void)
253 {
254 	if (!ctrlc_disabled && gd->have_console) {
255 		if (tstc ()) {
256 			switch (getc ()) {
257 			case 0x03:		/* ^C - Control C */
258 				ctrlc_was_pressed = 1;
259 				return 1;
260 			default:
261 				break;
262 			}
263 		}
264 	}
265 	return 0;
266 }
267 
268 /* pass 1 to disable ctrlc() checking, 0 to enable.
269  * returns previous state
270  */
271 int disable_ctrlc (int disable)
272 {
273 	int prev = ctrlc_disabled;	/* save previous state */
274 
275 	ctrlc_disabled = disable;
276 	return prev;
277 }
278 
279 int had_ctrlc (void)
280 {
281 	return ctrlc_was_pressed;
282 }
283 
284 void clear_ctrlc (void)
285 {
286 	ctrlc_was_pressed = 0;
287 }
288 
289 #ifdef CONFIG_MODEM_SUPPORT_DEBUG
290 char	screen[1024];
291 char *cursor = screen;
292 int once = 0;
293 inline void dbg(const char *fmt, ...)
294 {
295 	va_list	args;
296 	uint	i;
297 	char	printbuffer[CFG_PBSIZE];
298 
299 	if (!once) {
300 		memset(screen, 0, sizeof(screen));
301 		once++;
302 	}
303 
304 	va_start(args, fmt);
305 
306 	/* For this to work, printbuffer must be larger than
307 	 * anything we ever want to print.
308 	 */
309 	i = vsprintf(printbuffer, fmt, args);
310 	va_end(args);
311 
312 	if ((screen + sizeof(screen) - 1 - cursor) < strlen(printbuffer)+1) {
313 		memset(screen, 0, sizeof(screen));
314 		cursor = screen;
315 	}
316 	sprintf(cursor, printbuffer);
317 	cursor += strlen(printbuffer);
318 
319 }
320 #else
321 inline void dbg(const char *fmt, ...)
322 {
323 }
324 #endif
325 
326 /** U-Boot INIT FUNCTIONS *************************************************/
327 
328 int console_assign (int file, char *devname)
329 {
330 	int flag, i;
331 
332 	/* Check for valid file */
333 	switch (file) {
334 	case stdin:
335 		flag = DEV_FLAGS_INPUT;
336 		break;
337 	case stdout:
338 	case stderr:
339 		flag = DEV_FLAGS_OUTPUT;
340 		break;
341 	default:
342 		return -1;
343 	}
344 
345 	/* Check for valid device name */
346 
347 	for (i = 1; i <= ListNumItems (devlist); i++) {
348 		device_t *dev = ListGetPtrToItem (devlist, i);
349 
350 		if (strcmp (devname, dev->name) == 0) {
351 			if (dev->flags & flag)
352 				return console_setfile (file, dev);
353 
354 			return -1;
355 		}
356 	}
357 
358 	return -1;
359 }
360 
361 /* Called before relocation - use serial functions */
362 int console_init_f (void)
363 {
364 	gd->have_console = 1;
365 
366 #ifdef CONFIG_SILENT_CONSOLE
367 	if (getenv("silent") != NULL)
368 		gd->flags |= GD_FLG_SILENT;
369 #endif
370 
371 	return (0);
372 }
373 
374 #if defined(CFG_CONSOLE_IS_IN_ENV) || defined(CONFIG_SPLASH_SCREEN) || defined(CONFIG_SILENT_CONSOLE)
375 /* search a device */
376 device_t *search_device (int flags, char *name)
377 {
378 	int i, items;
379 	device_t *dev = NULL;
380 
381 	items = ListNumItems (devlist);
382 	if (name == NULL)
383 		return dev;
384 
385 	for (i = 1; i <= items; i++) {
386 		dev = ListGetPtrToItem (devlist, i);
387 		if ((dev->flags & flags) && (strcmp (name, dev->name) == 0)) {
388 			break;
389 		}
390 	}
391 	return dev;
392 }
393 #endif /* CFG_CONSOLE_IS_IN_ENV || CONFIG_SPLASH_SCREEN */
394 
395 #ifdef CFG_CONSOLE_IS_IN_ENV
396 /* Called after the relocation - use desired console functions */
397 int console_init_r (void)
398 {
399 	char *stdinname, *stdoutname, *stderrname;
400 	device_t *inputdev = NULL, *outputdev = NULL, *errdev = NULL;
401 #ifdef CFG_CONSOLE_ENV_OVERWRITE
402 	int i;
403 #endif /* CFG_CONSOLE_ENV_OVERWRITE */
404 
405 	/* set default handlers at first */
406 	gd->jt[XF_getc] = serial_getc;
407 	gd->jt[XF_tstc] = serial_tstc;
408 	gd->jt[XF_putc] = serial_putc;
409 	gd->jt[XF_puts] = serial_puts;
410 	gd->jt[XF_printf] = serial_printf;
411 
412 	/* stdin stdout and stderr are in environment */
413 	/* scan for it */
414 	stdinname  = getenv ("stdin");
415 	stdoutname = getenv ("stdout");
416 	stderrname = getenv ("stderr");
417 
418 	if (OVERWRITE_CONSOLE == 0) { 	/* if not overwritten by config switch */
419 		inputdev  = search_device (DEV_FLAGS_INPUT,  stdinname);
420 		outputdev = search_device (DEV_FLAGS_OUTPUT, stdoutname);
421 		errdev    = search_device (DEV_FLAGS_OUTPUT, stderrname);
422 	}
423 	/* if the devices are overwritten or not found, use default device */
424 	if (inputdev == NULL) {
425 		inputdev  = search_device (DEV_FLAGS_INPUT,  "serial");
426 	}
427 	if (outputdev == NULL) {
428 		outputdev = search_device (DEV_FLAGS_OUTPUT, "serial");
429 	}
430 	if (errdev == NULL) {
431 		errdev    = search_device (DEV_FLAGS_OUTPUT, "serial");
432 	}
433 	/* Initializes output console first */
434 	if (outputdev != NULL) {
435 		console_setfile (stdout, outputdev);
436 	}
437 	if (errdev != NULL) {
438 		console_setfile (stderr, errdev);
439 	}
440 	if (inputdev != NULL) {
441 		console_setfile (stdin, inputdev);
442 	}
443 
444 	gd->flags |= GD_FLG_DEVINIT;	/* device initialization completed */
445 
446 #ifndef CFG_CONSOLE_INFO_QUIET
447 	/* Print information */
448 	puts ("In:    ");
449 	if (stdio_devices[stdin] == NULL) {
450 		puts ("No input devices available!\n");
451 	} else {
452 		printf ("%s\n", stdio_devices[stdin]->name);
453 	}
454 
455 	puts ("Out:   ");
456 	if (stdio_devices[stdout] == NULL) {
457 		puts ("No output devices available!\n");
458 	} else {
459 		printf ("%s\n", stdio_devices[stdout]->name);
460 	}
461 
462 	puts ("Err:   ");
463 	if (stdio_devices[stderr] == NULL) {
464 		puts ("No error devices available!\n");
465 	} else {
466 		printf ("%s\n", stdio_devices[stderr]->name);
467 	}
468 #endif /* CFG_CONSOLE_INFO_QUIET */
469 
470 #ifdef CFG_CONSOLE_ENV_OVERWRITE
471 	/* set the environment variables (will overwrite previous env settings) */
472 	for (i = 0; i < 3; i++) {
473 		setenv (stdio_names[i], stdio_devices[i]->name);
474 	}
475 #endif /* CFG_CONSOLE_ENV_OVERWRITE */
476 
477 #if 0
478 	/* If nothing usable installed, use only the initial console */
479 	if ((stdio_devices[stdin] == NULL) && (stdio_devices[stdout] == NULL))
480 		return (0);
481 #endif
482 	return (0);
483 }
484 
485 #else /* CFG_CONSOLE_IS_IN_ENV */
486 
487 /* Called after the relocation - use desired console functions */
488 int console_init_r (void)
489 {
490 	device_t *inputdev = NULL, *outputdev = NULL;
491 	int i, items = ListNumItems (devlist);
492 
493 #ifdef CONFIG_SPLASH_SCREEN
494 	/* suppress all output if splash screen is enabled and we have
495 	   a bmp to display                                            */
496 	if (getenv("splashimage") != NULL)
497 		gd->flags |= GD_FLG_SILENT;
498 #endif
499 
500 	/* Scan devices looking for input and output devices */
501 	for (i = 1;
502 	     (i <= items) && ((inputdev == NULL) || (outputdev == NULL));
503 	     i++
504 	    ) {
505 		device_t *dev = ListGetPtrToItem (devlist, i);
506 
507 		if ((dev->flags & DEV_FLAGS_INPUT) && (inputdev == NULL)) {
508 			inputdev = dev;
509 		}
510 		if ((dev->flags & DEV_FLAGS_OUTPUT) && (outputdev == NULL)) {
511 			outputdev = dev;
512 		}
513 	}
514 
515 	/* Initializes output console first */
516 	if (outputdev != NULL) {
517 		console_setfile (stdout, outputdev);
518 		console_setfile (stderr, outputdev);
519 	}
520 
521 	/* Initializes input console */
522 	if (inputdev != NULL) {
523 		console_setfile (stdin, inputdev);
524 	}
525 
526 	gd->flags |= GD_FLG_DEVINIT;	/* device initialization completed */
527 
528 #ifndef CFG_CONSOLE_INFO_QUIET
529 	/* Print information */
530 	puts ("In:    ");
531 	if (stdio_devices[stdin] == NULL) {
532 		puts ("No input devices available!\n");
533 	} else {
534 		printf ("%s\n", stdio_devices[stdin]->name);
535 	}
536 
537 	puts ("Out:   ");
538 	if (stdio_devices[stdout] == NULL) {
539 		puts ("No output devices available!\n");
540 	} else {
541 		printf ("%s\n", stdio_devices[stdout]->name);
542 	}
543 
544 	puts ("Err:   ");
545 	if (stdio_devices[stderr] == NULL) {
546 		puts ("No error devices available!\n");
547 	} else {
548 		printf ("%s\n", stdio_devices[stderr]->name);
549 	}
550 #endif /* CFG_CONSOLE_INFO_QUIET */
551 
552 	/* Setting environment variables */
553 	for (i = 0; i < 3; i++) {
554 		setenv (stdio_names[i], stdio_devices[i]->name);
555 	}
556 
557 #if 0
558 	/* If nothing usable installed, use only the initial console */
559 	if ((stdio_devices[stdin] == NULL) && (stdio_devices[stdout] == NULL))
560 		return (0);
561 #endif
562 
563 	return (0);
564 }
565 
566 #endif /* CFG_CONSOLE_IS_IN_ENV */
567