// gcc -std=gnu99 -Isimavr/sim simavr/sim/sim_hex.c -o sim_hex -DIHEX_TEST -Dtest_main=main
int test_main(int argc, char * argv[])
{
struct ihex_chunk_t chunk[4];
for (int fi = 1; fi < argc; fi++) {
int c = read_ihex_chunks(argv[fi], chunk, 4);
if (c == -1) {
perror(argv[fi]);
continue;
}
for (int ci = 0; ci < c; ci++) {
char n[96];
sprintf(n, "%s[%d] = %08x", argv[fi], ci, chunk[ci].baseaddr);
hdump(n, chunk[ci].data, chunk[ci].size);
}
}
}
int main(int argc, char *argv[])
{
elf_firmware_t f = {{0}};
long f_cpu = 0;
int trace = 0;
int gdb = 0;
int log = 1;
char name[16] = "";
uint32_t loadBase = AVR_SEGMENT_OFFSET_FLASH;
int trace_vectors[8] = {0};
int trace_vectors_count = 0;
if (argc == 1)
display_usage(basename(argv[0]));
for (int pi = 1; pi < argc; pi++) {
if (!strcmp(argv[pi], "--list-cores")) {
list_cores();
} else if (!strcmp(argv[pi], "-h") || !strcmp(argv[pi], "--help")) {
display_usage(basename(argv[0]));
} else if (!strcmp(argv[pi], "-m") || !strcmp(argv[pi], "-mcu")) {
if (pi < argc-1)
strcpy(name, argv[++pi]);
else
display_usage(basename(argv[0]));
} else if (!strcmp(argv[pi], "-f") || !strcmp(argv[pi], "-freq")) {
if (pi < argc-1)
f_cpu = atoi(argv[++pi]);
else
display_usage(basename(argv[0]));
} else if (!strcmp(argv[pi], "-t") || !strcmp(argv[pi], "-trace")) {
trace++;
} else if (!strcmp(argv[pi], "-ti")) {
if (pi < argc-1)
trace_vectors[trace_vectors_count++] = atoi(argv[++pi]);
} else if (!strcmp(argv[pi], "-g") || !strcmp(argv[pi], "-gdb")) {
gdb++;
} else if (!strcmp(argv[pi], "-v")) {
log++;
} else if (!strcmp(argv[pi], "-ee")) {
loadBase = AVR_SEGMENT_OFFSET_EEPROM;
} else if (!strcmp(argv[pi], "-ff")) {
loadBase = AVR_SEGMENT_OFFSET_FLASH;
} else if (argv[pi][0] != '-') {
char * filename = argv[pi];
char * suffix = strrchr(filename, '.');
if (suffix && !strcasecmp(suffix, ".hex")) {
if (!name[0] || !f_cpu) {
fprintf(stderr, "%s: -mcu and -freq are mandatory to load .hex files\n", argv[0]);
exit(1);
}
ihex_chunk_p chunk = NULL;
int cnt = read_ihex_chunks(filename, &chunk);
if (cnt <= 0) {
fprintf(stderr, "%s: Unable to load IHEX file %s\n",
argv[0], argv[pi]);
exit(1);
}
printf("Loaded %d section of ihex\n", cnt);
for (int ci = 0; ci < cnt; ci++) {
if (chunk[ci].baseaddr < (1*1024*1024)) {
f.flash = chunk[ci].data;
f.flashsize = chunk[ci].size;
f.flashbase = chunk[ci].baseaddr;
printf("Load HEX flash %08x, %d\n", f.flashbase, f.flashsize);
} else if (chunk[ci].baseaddr >= AVR_SEGMENT_OFFSET_EEPROM ||
chunk[ci].baseaddr + loadBase >= AVR_SEGMENT_OFFSET_EEPROM) {
// eeprom!
f.eeprom = chunk[ci].data;
f.eesize = chunk[ci].size;
printf("Load HEX eeprom %08x, %d\n", chunk[ci].baseaddr, f.eesize);
}
}
} else {
if (elf_read_firmware(filename, &f) == -1) {
fprintf(stderr, "%s: Unable to load firmware from file %s\n",
argv[0], filename);
exit(1);
}
}
}
}
if (strlen(name))
strcpy(f.mmcu, name);
if (f_cpu)
f.frequency = f_cpu;
avr = avr_make_mcu_by_name(f.mmcu);
if (!avr) {
fprintf(stderr, "%s: AVR '%s' not known\n", argv[0], f.mmcu);
exit(1);
}
avr_init(avr);
avr_load_firmware(avr, &f);
if (f.flashbase) {
printf("Attempted to load a bootloader at %04x\n", f.flashbase);
avr->pc = f.flashbase;
}
avr->log = (log > LOG_TRACE ? LOG_TRACE : log);
avr->trace = trace;
for (int ti = 0; ti < trace_vectors_count; ti++) {
for (int vi = 0; vi < avr->interrupts.vector_count; vi++)
if (avr->interrupts.vector[vi]->vector == trace_vectors[ti])
avr->interrupts.vector[vi]->trace = 1;
}
// even if not setup at startup, activate gdb if crashing
avr->gdb_port = 1234;
if (gdb) {
avr->state = cpu_Stopped;
avr_gdb_init(avr);
}
signal(SIGINT, sig_int);
signal(SIGTERM, sig_int);
for (;;) {
int state = avr_run(avr);
if ( state == cpu_Done || state == cpu_Crashed)
break;
}
avr_terminate(avr);
}
