|
- #include <stdlib.h>
- #include <stdio.h>
- #include <fcntl.h>
- #include <unistd.h>
-
- #include "common.h"
-
- /* Push specified file to specified device running the BASIC shell and verify
- * that the sent contents is correct.
- */
-
- int main(int argc, char **argv)
- {
- if (argc != 4) {
- fprintf(stderr, "Usage: ./upload device memptr fname\n");
- return 1;
- }
- unsigned int memptr = strtol(argv[2], NULL, 16);
- FILE *fp = fopen(argv[3], "r");
- if (!fp) {
- fprintf(stderr, "Can't open %s.\n", argv[3]);
- return 1;
- }
- fseek(fp, 0, SEEK_END);
- unsigned int bytecount = ftell(fp);
- fprintf(stderr, "memptr: 0x%04x bytecount: 0x%04x.\n", memptr, bytecount);
- if (!bytecount) {
- // Nothing to read
- fclose(fp);
- return 0;
- }
- if (memptr+bytecount > 0xffff) {
- fprintf(stderr, "memptr+bytecount out of range.\n");
- fclose(fp);
- return 1;
- }
- rewind(fp);
- int fd = open(argv[1], O_RDWR|O_NOCTTY);
- char s[0x40];
- sprintf(s, "m=0x%04x", memptr);
- sendcmdp(fd, s);
- sprintf(s, "while m<0x%04x getc:puth a:poke m a:m=m+1", memptr+bytecount);
- sendcmd(fd, s);
-
- int returncode = 0;
- while (fread(s, 1, 1, fp)) {
- putchar('.');
- fflush(stdout);
- unsigned char c = s[0];
- write(fd, &c, 1);
- usleep(1000); // let it breathe
- read(fd, s, 2); // read hex pair
- s[2] = 0; // null terminate
- unsigned char c2 = strtol(s, NULL, 16);
- if (c != c2) {
- // mismatch!
- unsigned int pos = ftell(fp);
- fprintf(stderr, "Mismatch at byte %d! %d != %d.\n", pos, c, c2);
- // we don't exit now because we need to "consume" our whole program.
- returncode = 1;
- }
- }
- printf("Done!\n");
- fclose(fp);
- return returncode;
- }
|