home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 June / SIMTEL_0692.cdr / msdos / filutl / format83.arc / FORMAT83.C next >
Encoding:
C/C++ Source or Header  |  1987-11-25  |  1.9 KB  |  81 lines
  1. /*_ format83.c   Thu Sep 17 1987   Modified by: Erik Lindberg */
  2. /*
  3.     This program is released to the public domain. It can be
  4.     used for any purpose whatsoever. If you can get some poor
  5.     sucker to pay money for it, tell me your secret.
  6.  
  7.     Prints a file to stdout in Intel HEX 83 format. I wrote this
  8.     to be easy to understand, modify, and *portable*. If you want
  9.     elegant, you can get there from here.
  10. */
  11.  
  12. #include <stdio.h>
  13.  
  14. #define REC    0x10        /* Size of a record. */
  15.  
  16. char *line, buffer[128];
  17. FILE *infile;
  18.  
  19. extern char hex();
  20.  
  21. main(argc,argv)
  22. int argc;
  23. char *argv[];
  24. {
  25.     int c=1, address=0;
  26.     int sum, i;
  27.     i=0;
  28.     if (!(infile = fopen(argv[++i],"rb"))) {
  29.         fprintf(stderr, "Error on open of file %s\n",argv[i]);
  30.         exit(1);
  31.     }
  32.  
  33.     while (c != EOF) {
  34.         sum = 0;
  35.         line = buffer;
  36.         for (i=0; i<REC && (c=getc(infile)) != EOF; i++) {
  37.             *line++ = hex(c>>4);
  38.             *line++ = hex(c);
  39.             sum += c;        /* Checksum each character. */
  40.         }
  41.         if (i) {
  42.             sum += address >> 8;    /* Checksum high address byte.*/
  43.             sum += address & 0xff;    /* Checksum low address byte.*/
  44.             sum += i;        /* Checksum record byte count.*/
  45.             line = buffer;        /* Now output the line! */
  46.             putchar(':');
  47.             puthex(i,2);        /* Byte count. */
  48.             puthex(address,4);    /* Do address and increment */
  49.             address += i;        /*    by bytes in record.   */
  50.             puthex(0,2);        /* Record type.           */
  51.             for(i*=2;i;i--)        /* Then the actual data.   */
  52.                 putchar(*line++);
  53.             puthex(0-sum,2);    /* Checksum is 1byte 2's comp.*/
  54.             printf("\n");
  55.         }
  56.     }
  57.     printf(":00000001FF\n");        /* End record. */
  58. }
  59.  
  60. /* Return ASCII hex character for binary value. */
  61.  
  62. char hex(c)
  63. int c;
  64. {
  65.     if((c &= 0x000f)<10)
  66.         c += '0';
  67.     else
  68.         c += 'A'-10;
  69.     return((char) c);
  70. }
  71.  
  72. /* Put specified number of digits in ASCII hex. */
  73.  
  74. puthex(val,digits)
  75. int val,digits;
  76. {
  77.     if (--digits)
  78.         puthex(val>>4,digits);
  79.     putchar(hex(val & 0x0f));
  80. }
  81.