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