xref: /openbmc/u-boot/lib/display_options.c (revision 9038cd53)
1 /*
2  * (C) Copyright 2000-2002
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * SPDX-License-Identifier:	GPL-2.0+
6  */
7 
8 #include <config.h>
9 #include <common.h>
10 #include <div64.h>
11 #include <inttypes.h>
12 #include <version.h>
13 #include <linux/ctype.h>
14 #include <asm/io.h>
15 
16 int display_options (void)
17 {
18 #if defined(BUILD_TAG)
19 	printf ("\n\n%s, Build: %s\n\n", version_string, BUILD_TAG);
20 #else
21 	printf ("\n\n%s\n\n", version_string);
22 #endif
23 	return 0;
24 }
25 
26 void print_freq(uint64_t freq, const char *s)
27 {
28 	unsigned long m = 0, n;
29 	uint32_t f;
30 	static const char names[] = {'G', 'M', 'K'};
31 	unsigned long d = 1e9;
32 	char c = 0;
33 	unsigned int i;
34 
35 	for (i = 0; i < ARRAY_SIZE(names); i++, d /= 1000) {
36 		if (freq >= d) {
37 			c = names[i];
38 			break;
39 		}
40 	}
41 
42 	if (!c) {
43 		printf("%" PRIu64 " Hz%s", freq, s);
44 		return;
45 	}
46 
47 	f = do_div(freq, d);
48 	n = freq;
49 
50 	/* If there's a remainder, show the first few digits */
51 	if (f) {
52 		m = f;
53 		while (m > 1000)
54 			m /= 10;
55 		while (m && !(m % 10))
56 			m /= 10;
57 		if (m >= 100)
58 			m = (m / 10) + (m % 100 >= 50);
59 	}
60 
61 	printf("%lu", n);
62 	if (m)
63 		printf(".%ld", m);
64 	printf(" %cHz%s", c, s);
65 }
66 
67 void print_size(uint64_t size, const char *s)
68 {
69 	unsigned long m = 0, n;
70 	uint64_t f;
71 	static const char names[] = {'E', 'P', 'T', 'G', 'M', 'K'};
72 	unsigned long d = 10 * ARRAY_SIZE(names);
73 	char c = 0;
74 	unsigned int i;
75 
76 	for (i = 0; i < ARRAY_SIZE(names); i++, d -= 10) {
77 		if (size >> d) {
78 			c = names[i];
79 			break;
80 		}
81 	}
82 
83 	if (!c) {
84 		printf("%" PRIu64 " Bytes%s", size, s);
85 		return;
86 	}
87 
88 	n = size >> d;
89 	f = size & ((1ULL << d) - 1);
90 
91 	/* If there's a remainder, deal with it */
92 	if (f) {
93 		m = (10ULL * f + (1ULL << (d - 1))) >> d;
94 
95 		if (m >= 10) {
96 			m -= 10;
97 			n += 1;
98 		}
99 	}
100 
101 	printf ("%lu", n);
102 	if (m) {
103 		printf (".%ld", m);
104 	}
105 	printf (" %ciB%s", c, s);
106 }
107 
108 #define MAX_LINE_LENGTH_BYTES (64)
109 #define DEFAULT_LINE_LENGTH_BYTES (16)
110 int print_buffer(ulong addr, const void *data, uint width, uint count,
111 		 uint linelen)
112 {
113 	/* linebuf as a union causes proper alignment */
114 	union linebuf {
115 #ifdef CONFIG_SYS_SUPPORT_64BIT_DATA
116 		uint64_t uq[MAX_LINE_LENGTH_BYTES/sizeof(uint64_t) + 1];
117 #endif
118 		uint32_t ui[MAX_LINE_LENGTH_BYTES/sizeof(uint32_t) + 1];
119 		uint16_t us[MAX_LINE_LENGTH_BYTES/sizeof(uint16_t) + 1];
120 		uint8_t  uc[MAX_LINE_LENGTH_BYTES/sizeof(uint8_t) + 1];
121 	} lb;
122 	int i;
123 #ifdef CONFIG_SYS_SUPPORT_64BIT_DATA
124 	uint64_t x;
125 #else
126 	uint32_t x;
127 #endif
128 
129 	if (linelen*width > MAX_LINE_LENGTH_BYTES)
130 		linelen = MAX_LINE_LENGTH_BYTES / width;
131 	if (linelen < 1)
132 		linelen = DEFAULT_LINE_LENGTH_BYTES / width;
133 
134 	while (count) {
135 		uint thislinelen = linelen;
136 		printf("%08lx:", addr);
137 
138 		/* check for overflow condition */
139 		if (count < thislinelen)
140 			thislinelen = count;
141 
142 		/* Copy from memory into linebuf and print hex values */
143 		for (i = 0; i < thislinelen; i++) {
144 			if (width == 4)
145 				x = lb.ui[i] = *(volatile uint32_t *)data;
146 #ifdef CONFIG_SYS_SUPPORT_64BIT_DATA
147 			else if (width == 8)
148 				x = lb.uq[i] = *(volatile uint64_t *)data;
149 #endif
150 			else if (width == 2)
151 				x = lb.us[i] = *(volatile uint16_t *)data;
152 			else
153 				x = lb.uc[i] = *(volatile uint8_t *)data;
154 #ifdef CONFIG_SYS_SUPPORT_64BIT_DATA
155 			printf(" %0*llx", width * 2, (long long)x);
156 #else
157 			printf(" %0*x", width * 2, x);
158 #endif
159 			data += width;
160 		}
161 
162 		while (thislinelen < linelen) {
163 			/* fill line with whitespace for nice ASCII print */
164 			for (i=0; i<width*2+1; i++)
165 				puts(" ");
166 			linelen--;
167 		}
168 
169 		/* Print data in ASCII characters */
170 		for (i = 0; i < thislinelen * width; i++) {
171 			if (!isprint(lb.uc[i]) || lb.uc[i] >= 0x80)
172 				lb.uc[i] = '.';
173 		}
174 		lb.uc[i] = '\0';
175 		printf("    %s\n", lb.uc);
176 
177 		/* update references */
178 		addr += thislinelen * width;
179 		count -= thislinelen;
180 
181 		if (ctrlc())
182 			return -1;
183 	}
184 
185 	return 0;
186 }
187