1 /* 2 * (C) Copyright 2000, 2001 3 * Rich Ireland, Enterasys Networks, rireland@enterasys.com. 4 * 5 * SPDX-License-Identifier: GPL-2.0+ 6 */ 7 8 /* 9 * FPGA support 10 */ 11 #include <common.h> 12 #include <command.h> 13 #include <fpga.h> 14 #include <fs.h> 15 #include <malloc.h> 16 17 /* Local functions */ 18 static int fpga_get_op(char *opstr); 19 20 /* Local defines */ 21 enum { 22 FPGA_NONE = -1, 23 FPGA_INFO, 24 FPGA_LOAD, 25 FPGA_LOADB, 26 FPGA_DUMP, 27 FPGA_LOADMK, 28 FPGA_LOADP, 29 FPGA_LOADBP, 30 FPGA_LOADFS, 31 }; 32 33 /* ------------------------------------------------------------------------- */ 34 /* command form: 35 * fpga <op> <device number> <data addr> <datasize> 36 * where op is 'load', 'dump', or 'info' 37 * If there is no device number field, the fpga environment variable is used. 38 * If there is no data addr field, the fpgadata environment variable is used. 39 * The info command requires no data address field. 40 */ 41 int do_fpga(cmd_tbl_t *cmdtp, int flag, int argc, char *const argv[]) 42 { 43 int op, dev = FPGA_INVALID_DEVICE; 44 size_t data_size = 0; 45 void *fpga_data = NULL; 46 char *devstr = getenv("fpga"); 47 char *datastr = getenv("fpgadata"); 48 int rc = FPGA_FAIL; 49 int wrong_parms = 0; 50 #if defined(CONFIG_FIT) 51 const char *fit_uname = NULL; 52 ulong fit_addr; 53 #endif 54 #if defined(CONFIG_CMD_FPGA_LOADFS) 55 fpga_fs_info fpga_fsinfo; 56 fpga_fsinfo.fstype = FS_TYPE_ANY; 57 #endif 58 59 if (devstr) 60 dev = (int) simple_strtoul(devstr, NULL, 16); 61 if (datastr) 62 fpga_data = (void *)simple_strtoul(datastr, NULL, 16); 63 64 switch (argc) { 65 #if defined(CONFIG_CMD_FPGA_LOADFS) 66 case 9: 67 fpga_fsinfo.blocksize = (unsigned int) 68 simple_strtoul(argv[5], NULL, 16); 69 fpga_fsinfo.interface = argv[6]; 70 fpga_fsinfo.dev_part = argv[7]; 71 fpga_fsinfo.filename = argv[8]; 72 #endif 73 case 5: /* fpga <op> <dev> <data> <datasize> */ 74 data_size = simple_strtoul(argv[4], NULL, 16); 75 76 case 4: /* fpga <op> <dev> <data> */ 77 #if defined(CONFIG_FIT) 78 if (fit_parse_subimage(argv[3], (ulong)fpga_data, 79 &fit_addr, &fit_uname)) { 80 fpga_data = (void *)fit_addr; 81 debug("* fpga: subimage '%s' from FIT image ", 82 fit_uname); 83 debug("at 0x%08lx\n", fit_addr); 84 } else 85 #endif 86 { 87 fpga_data = (void *)simple_strtoul(argv[3], NULL, 16); 88 debug("* fpga: cmdline image address = 0x%08lx\n", 89 (ulong)fpga_data); 90 } 91 debug("%s: fpga_data = 0x%lx\n", __func__, (ulong)fpga_data); 92 93 case 3: /* fpga <op> <dev | data addr> */ 94 dev = (int)simple_strtoul(argv[2], NULL, 16); 95 debug("%s: device = %d\n", __func__, dev); 96 /* FIXME - this is a really weak test */ 97 if ((argc == 3) && (dev > fpga_count())) { 98 /* must be buffer ptr */ 99 debug("%s: Assuming buffer pointer in arg 3\n", 100 __func__); 101 102 #if defined(CONFIG_FIT) 103 if (fit_parse_subimage(argv[2], (ulong)fpga_data, 104 &fit_addr, &fit_uname)) { 105 fpga_data = (void *)fit_addr; 106 debug("* fpga: subimage '%s' from FIT image ", 107 fit_uname); 108 debug("at 0x%08lx\n", fit_addr); 109 } else 110 #endif 111 { 112 fpga_data = (void *)(uintptr_t)dev; 113 debug("* fpga: cmdline image addr = 0x%08lx\n", 114 (ulong)fpga_data); 115 } 116 117 debug("%s: fpga_data = 0x%lx\n", 118 __func__, (ulong)fpga_data); 119 dev = FPGA_INVALID_DEVICE; /* reset device num */ 120 } 121 122 case 2: /* fpga <op> */ 123 op = (int)fpga_get_op(argv[1]); 124 break; 125 126 default: 127 debug("%s: Too many or too few args (%d)\n", __func__, argc); 128 op = FPGA_NONE; /* force usage display */ 129 break; 130 } 131 132 if (dev == FPGA_INVALID_DEVICE) { 133 puts("FPGA device not specified\n"); 134 op = FPGA_NONE; 135 } 136 137 switch (op) { 138 case FPGA_NONE: 139 case FPGA_INFO: 140 break; 141 #if defined(CONFIG_CMD_FPGA_LOADFS) 142 case FPGA_LOADFS: 143 /* Blocksize can be zero */ 144 if (!fpga_fsinfo.interface || !fpga_fsinfo.dev_part || 145 !fpga_fsinfo.filename) 146 wrong_parms = 1; 147 #endif 148 case FPGA_LOAD: 149 case FPGA_LOADP: 150 case FPGA_LOADB: 151 case FPGA_LOADBP: 152 case FPGA_DUMP: 153 if (!fpga_data || !data_size) 154 wrong_parms = 1; 155 break; 156 #if defined(CONFIG_CMD_FPGA_LOADMK) 157 case FPGA_LOADMK: 158 if (!fpga_data) 159 wrong_parms = 1; 160 break; 161 #endif 162 } 163 164 if (wrong_parms) { 165 puts("Wrong parameters for FPGA request\n"); 166 op = FPGA_NONE; 167 } 168 169 switch (op) { 170 case FPGA_NONE: 171 return CMD_RET_USAGE; 172 173 case FPGA_INFO: 174 rc = fpga_info(dev); 175 break; 176 177 case FPGA_LOAD: 178 rc = fpga_load(dev, fpga_data, data_size, BIT_FULL); 179 break; 180 181 #if defined(CONFIG_CMD_FPGA_LOADP) 182 case FPGA_LOADP: 183 rc = fpga_load(dev, fpga_data, data_size, BIT_PARTIAL); 184 break; 185 #endif 186 187 case FPGA_LOADB: 188 rc = fpga_loadbitstream(dev, fpga_data, data_size, BIT_FULL); 189 break; 190 191 #if defined(CONFIG_CMD_FPGA_LOADBP) 192 case FPGA_LOADBP: 193 rc = fpga_loadbitstream(dev, fpga_data, data_size, BIT_PARTIAL); 194 break; 195 #endif 196 197 #if defined(CONFIG_CMD_FPGA_LOADFS) 198 case FPGA_LOADFS: 199 rc = fpga_fsload(dev, fpga_data, data_size, &fpga_fsinfo); 200 break; 201 #endif 202 203 #if defined(CONFIG_CMD_FPGA_LOADMK) 204 case FPGA_LOADMK: 205 switch (genimg_get_format(fpga_data)) { 206 #if defined(CONFIG_IMAGE_FORMAT_LEGACY) 207 case IMAGE_FORMAT_LEGACY: 208 { 209 image_header_t *hdr = 210 (image_header_t *)fpga_data; 211 ulong data; 212 uint8_t comp; 213 214 comp = image_get_comp(hdr); 215 if (comp == IH_COMP_GZIP) { 216 #if defined(CONFIG_GZIP) 217 ulong image_buf = image_get_data(hdr); 218 data = image_get_load(hdr); 219 ulong image_size = ~0UL; 220 221 if (gunzip((void *)data, ~0UL, 222 (void *)image_buf, 223 &image_size) != 0) { 224 puts("GUNZIP: error\n"); 225 return 1; 226 } 227 data_size = image_size; 228 #else 229 puts("Gunzip image is not supported\n"); 230 return 1; 231 #endif 232 } else { 233 data = (ulong)image_get_data(hdr); 234 data_size = image_get_data_size(hdr); 235 } 236 rc = fpga_load(dev, (void *)data, data_size, 237 BIT_FULL); 238 } 239 break; 240 #endif 241 #if defined(CONFIG_FIT) 242 case IMAGE_FORMAT_FIT: 243 { 244 const void *fit_hdr = (const void *)fpga_data; 245 int noffset; 246 const void *fit_data; 247 248 if (fit_uname == NULL) { 249 puts("No FIT subimage unit name\n"); 250 return 1; 251 } 252 253 if (!fit_check_format(fit_hdr)) { 254 puts("Bad FIT image format\n"); 255 return 1; 256 } 257 258 /* get fpga component image node offset */ 259 noffset = fit_image_get_node(fit_hdr, 260 fit_uname); 261 if (noffset < 0) { 262 printf("Can't find '%s' FIT subimage\n", 263 fit_uname); 264 return 1; 265 } 266 267 /* verify integrity */ 268 if (!fit_image_verify(fit_hdr, noffset)) { 269 puts ("Bad Data Hash\n"); 270 return 1; 271 } 272 273 /* get fpga subimage data address and length */ 274 if (fit_image_get_data(fit_hdr, noffset, 275 &fit_data, &data_size)) { 276 puts("Fpga subimage data not found\n"); 277 return 1; 278 } 279 280 rc = fpga_load(dev, fit_data, data_size, 281 BIT_FULL); 282 } 283 break; 284 #endif 285 default: 286 puts("** Unknown image type\n"); 287 rc = FPGA_FAIL; 288 break; 289 } 290 break; 291 #endif 292 293 case FPGA_DUMP: 294 rc = fpga_dump(dev, fpga_data, data_size); 295 break; 296 297 default: 298 printf("Unknown operation\n"); 299 return CMD_RET_USAGE; 300 } 301 return rc; 302 } 303 304 /* 305 * Map op to supported operations. We don't use a table since we 306 * would just have to relocate it from flash anyway. 307 */ 308 static int fpga_get_op(char *opstr) 309 { 310 int op = FPGA_NONE; 311 312 if (!strcmp("info", opstr)) 313 op = FPGA_INFO; 314 else if (!strcmp("loadb", opstr)) 315 op = FPGA_LOADB; 316 else if (!strcmp("load", opstr)) 317 op = FPGA_LOAD; 318 #if defined(CONFIG_CMD_FPGA_LOADP) 319 else if (!strcmp("loadp", opstr)) 320 op = FPGA_LOADP; 321 #endif 322 #if defined(CONFIG_CMD_FPGA_LOADBP) 323 else if (!strcmp("loadbp", opstr)) 324 op = FPGA_LOADBP; 325 #endif 326 #if defined(CONFIG_CMD_FPGA_LOADFS) 327 else if (!strcmp("loadfs", opstr)) 328 op = FPGA_LOADFS; 329 #endif 330 #if defined(CONFIG_CMD_FPGA_LOADMK) 331 else if (!strcmp("loadmk", opstr)) 332 op = FPGA_LOADMK; 333 #endif 334 else if (!strcmp("dump", opstr)) 335 op = FPGA_DUMP; 336 337 if (op == FPGA_NONE) 338 printf("Unknown fpga operation \"%s\"\n", opstr); 339 340 return op; 341 } 342 343 #if defined(CONFIG_CMD_FPGA_LOADFS) 344 U_BOOT_CMD(fpga, 9, 1, do_fpga, 345 #else 346 U_BOOT_CMD(fpga, 6, 1, do_fpga, 347 #endif 348 "loadable FPGA image support", 349 "[operation type] [device number] [image address] [image size]\n" 350 "fpga operations:\n" 351 " dump\t[dev] [address] [size]\tLoad device to memory buffer\n" 352 " info\t[dev]\t\t\tlist known device information\n" 353 " load\t[dev] [address] [size]\tLoad device from memory buffer\n" 354 #if defined(CONFIG_CMD_FPGA_LOADP) 355 " loadp\t[dev] [address] [size]\t" 356 "Load device from memory buffer with partial bitstream\n" 357 #endif 358 " loadb\t[dev] [address] [size]\t" 359 "Load device from bitstream buffer (Xilinx only)\n" 360 #if defined(CONFIG_CMD_FPGA_LOADBP) 361 " loadbp\t[dev] [address] [size]\t" 362 "Load device from bitstream buffer with partial bitstream" 363 "(Xilinx only)\n" 364 #endif 365 #if defined(CONFIG_CMD_FPGA_LOADFS) 366 "Load device from filesystem (FAT by default) (Xilinx only)\n" 367 " loadfs [dev] [address] [image size] [blocksize] <interface>\n" 368 " [<dev[:part]>] <filename>\n" 369 #endif 370 #if defined(CONFIG_CMD_FPGA_LOADMK) 371 " loadmk [dev] [address]\tLoad device generated with mkimage" 372 #if defined(CONFIG_FIT) 373 "\n" 374 "\tFor loadmk operating on FIT format uImage address must include\n" 375 "\tsubimage unit name in the form of addr:<subimg_uname>" 376 #endif 377 #endif 378 ); 379