home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 592b.lha / Zoom_v5.3a / Support / ZoomCheck.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-01-02  |  9.6 KB  |  310 lines
  1. /*****************************************************************************
  2. *
  3. *    ZoomCheck.c --    Source code to simple Zoom file integrity checking tool
  4. *
  5. *                        (c) Copyright 1991 by Olaf Barthel, all rights reserved
  6. *
  7. *                        This program assumes Motorola order of word and long word
  8. *                        values, so don't expect this to work straight on an Intel
  9. *                        processor based machine without having applied the
  10. *                        necessary fixes first.
  11. *
  12. *    Author -------    Olaf Barthel
  13. *                        Brabeckstrasse 35
  14. *                        D-3000 Hannover 71
  15. *
  16. *                        Federal Republic of Germany
  17. *
  18. *                        Z-Netz: O.BARTHEL@A-Link-H
  19. *                        Usenet: o.barthel@a-link-h.zer.sub.org
  20. *                                cbmvax.commodore.com!cbmehq!sourcery!olsen
  21. *
  22. *****************************************************************************/
  23.  
  24. #include <stdlib.h>
  25. #include <string.h>
  26. #include <stdio.h>
  27.  
  28. typedef long         LONG;
  29. typedef unsigned long     ULONG;
  30. typedef short         WORD;
  31. typedef unsigned short     UWORD;
  32. typedef char         BYTE;
  33. typedef unsigned char     UBYTE;
  34. typedef void        *APTR;
  35.  
  36. #ifndef TRUE
  37. #define TRUE    1
  38. #endif    /* TRUE */
  39.  
  40. #ifndef FALSE
  41. #define FALSE    0
  42. #endif    /* FALSE */
  43.  
  44. #ifndef NULL
  45. #define NULL    0L
  46. #endif    /* NULL */
  47.  
  48. #define TRACKSIZE    (512 * 11 * 2 + 352)
  49. #define ZOM5        ((ULONG)('Z') << 24 | (ULONG)('O') << 16 | 'M' << 8 | '5')
  50.  
  51. struct DateStamp
  52. {
  53.     LONG     ds_Days;          /* Number of days since Jan. 1, 1978 */
  54.     LONG     ds_Minute;          /* Number of minutes past midnight */
  55.     LONG     ds_Tick;          /* Number of ticks past minute */
  56. };
  57.  
  58. struct ZoomHeader
  59. {
  60.     ULONG                    HeaderID;        /* Should be `ZOM5' */
  61.  
  62.     BYTE                    From,To;            /* First and last track. */
  63.  
  64.     BYTE                    Version;            /* Which Zoom version created this file. */
  65.  
  66.     BYTE                    OnlyTracks;        /* TRUE if file only contains whole tracks. */
  67.  
  68.     ULONG                    Flags;            /* Miscellaneous flag bits. */
  69.  
  70.     struct DateStamp    Date;                /* File creation date. */
  71.  
  72.     ULONG                    TextLength;        /* Compressed size of text attached to this file. */
  73.     ULONG                    PackedLength;    /* Size of text attached to this file. */
  74.  
  75.     LONG                    NoteOffset;        /* Notes attached to this file. */
  76.  
  77.     BYTE                    Encrypted;        /* TRUE if file is encrypted with password. */
  78.     BYTE                    Reserved0;        /* Reserved data. */
  79.  
  80.     WORD                    Reserved1;        /* Reserved data. */
  81.  
  82.     ULONG                    Root;                /* Encryption key. */
  83.  
  84.     ULONG                    Reserved2[7];    /* Reserved data. */
  85. };
  86.  
  87. struct TrackHeader
  88. {
  89.     BYTE        Tracks[5];            /* Single track offsets. */
  90.     ULONG        Bits[5];                /* Bitmapped track block usage. */
  91.  
  92.     UWORD        Length,                /* Final compressed data. */
  93.                 SqueezedLength,    /* Run-encoded data. */
  94.                 FatLength,            /* Full uncompressed track length. */
  95.                 Packed;                /* TRUE if data is compressed, FALSE if not compressed. */
  96.  
  97.     ULONG        CRC;                    /* 32 bit checksum. */
  98. };
  99.  
  100.     /* DoBlockCRC(register UBYTE *Mem,register LONG Size):
  101.      *
  102.      *        Use CRC 32 bit table to calculate a checksum.
  103.      */
  104.  
  105. ULONG
  106. DoBlockCRC(register UBYTE *Mem,register LONG Size)
  107. {
  108.     static ULONG CRCTable[256] =
  109.     {
  110.         0x00000000,0x77073096,0xEE0E612C,0x990951BA,0x076DC419,0x706AF48F,0xE963A535,0x9E6495A3,
  111.         0x0EDB8832,0x79DCB8A4,0xE0D5E91E,0x97D2D988,0x09B64C2B,0x7EB17CBD,0xE7B82D07,0x90BF1D91,
  112.         0x1DB71064,0x6AB020F2,0xF3B97148,0x84BE41DE,0x1ADAD47D,0x6DDDE4EB,0xF4D4B551,0x83D385C7,
  113.         0x136C9856,0x646BA8C0,0xFD62F97A,0x8A65C9EC,0x14015C4F,0x63066CD9,0xFA0F3D63,0x8D080DF5,
  114.         0x3B6E20C8,0x4C69105E,0xD56041E4,0xA2677172,0x3C03E4D1,0x4B04D447,0xD20D85FD,0xA50AB56B,
  115.         0x35B5A8FA,0x42B2986C,0xDBBBC9D6,0xACBCF940,0x32D86CE3,0x45DF5C75,0xDCD60DCF,0xABD13D59,
  116.         0x26D930AC,0x51DE003A,0xC8D75180,0xBFD06116,0x21B4F4B5,0x56B3C423,0xCFBA9599,0xB8BDA50F,
  117.         0x2802B89E,0x5F058808,0xC60CD9B2,0xB10BE924,0x2F6F7C87,0x58684C11,0xC1611DAB,0xB6662D3D,
  118.         0x76DC4190,0x01DB7106,0x98D220BC,0xEFD5102A,0x71B18589,0x06B6B51F,0x9FBFE4A5,0xE8B8D433,
  119.         0x7807C9A2,0x0F00F934,0x9609A88E,0xE10E9818,0x7F6A0DBB,0x086D3D2D,0x91646C97,0xE6635C01,
  120.         0x6B6B51F4,0x1C6C6162,0x856530D8,0xF262004E,0x6C0695ED,0x1B01A57B,0x8208F4C1,0xF50FC457,
  121.         0x65B0D9C6,0x12B7E950,0x8BBEB8EA,0xFCB9887C,0x62DD1DDF,0x15DA2D49,0x8CD37CF3,0xFBD44C65,
  122.         0x4DB26158,0x3AB551CE,0xA3BC0074,0xD4BB30E2,0x4ADFA541,0x3DD895D7,0xA4D1C46D,0xD3D6F4FB,
  123.         0x4369E96A,0x346ED9FC,0xAD678846,0xDA60B8D0,0x44042D73,0x33031DE5,0xAA0A4C5F,0xDD0D7CC9,
  124.         0x5005713C,0x270241AA,0xBE0B1010,0xC90C2086,0x5768B525,0x206F85B3,0xB966D409,0xCE61E49F,
  125.         0x5EDEF90E,0x29D9C998,0xB0D09822,0xC7D7A8B4,0x59B33D17,0x2EB40D81,0xB7BD5C3B,0xC0BA6CAD,
  126.         0xEDB88320,0x9ABFB3B6,0x03B6E20C,0x74B1D29A,0xEAD54739,0x9DD277AF,0x04DB2615,0x73DC1683,
  127.         0xE3630B12,0x94643B84,0x0D6D6A3E,0x7A6A5AA8,0xE40ECF0B,0x9309FF9D,0x0A00AE27,0x7D079EB1,
  128.         0xF00F9344,0x8708A3D2,0x1E01F268,0x6906C2FE,0xF762575D,0x806567CB,0x196C3671,0x6E6B06E7,
  129.         0xFED41B76,0x89D32BE0,0x10DA7A5A,0x67DD4ACC,0xF9B9DF6F,0x8EBEEFF9,0x17B7BE43,0x60B08ED5,
  130.         0xD6D6A3E8,0xA1D1937E,0x38D8C2C4,0x4FDFF252,0xD1BB67F1,0xA6BC5767,0x3FB506DD,0x48B2364B,
  131.         0xD80D2BDA,0xAF0A1B4C,0x36034AF6,0x41047A60,0xDF60EFC3,0xA867DF55,0x316E8EEF,0x4669BE79,
  132.         0xCB61B38C,0xBC66831A,0x256FD2A0,0x5268E236,0xCC0C7795,0xBB0B4703,0x220216B9,0x5505262F,
  133.         0xC5BA3BBE,0xB2BD0B28,0x2BB45A92,0x5CB36A04,0xC2D7FFA7,0xB5D0CF31,0x2CD99E8B,0x5BDEAE1D,
  134.         0x9B64C2B0,0xEC63F226,0x756AA39C,0x026D930A,0x9C0906A9,0xEB0E363F,0x72076785,0x05005713,
  135.         0x95BF4A82,0xE2B87A14,0x7BB12BAE,0x0CB61B38,0x92D28E9B,0xE5D5BE0D,0x7CDCEFB7,0x0BDBDF21,
  136.         0x86D3D2D4,0xF1D4E242,0x68DDB3F8,0x1FDA836E,0x81BE16CD,0xF6B9265B,0x6FB077E1,0x18B74777,
  137.         0x88085AE6,0xFF0F6A70,0x66063BCA,0x11010B5C,0x8F659EFF,0xF862AE69,0x616BFFD3,0x166CCF45,
  138.         0xA00AE278,0xD70DD2EE,0x4E048354,0x3903B3C2,0xA7672661,0xD06016F7,0x4969474D,0x3E6E77DB,
  139.         0xAED16A4A,0xD9D65ADC,0x40DF0B66,0x37D83BF0,0xA9BCAE53,0xDEBB9EC5,0x47B2CF7F,0x30B5FFE9,
  140.         0xBDBDF21C,0xCABAC28A,0x53B39330,0x24B4A3A6,0xBAD03605,0xCDD70693,0x54DE5729,0x23D967BF,
  141.         0xB3667A2E,0xC4614AB8,0x5D681B02,0x2A6F2B94,0xB40BBE37,0xC30C8EA1,0x5A05DF1B,0x2D02EF8D
  142.     };
  143.     
  144.     register ULONG CRC = 0;
  145.     
  146.     while(Size--)
  147.         CRC = CRCTable[(CRC ^ *Mem++) & 0xFF] ^ ((CRC >> 8) & 0x00FFFFFF);
  148.     
  149.     return(CRC);
  150. }
  151.  
  152.     /* ZoomCheck(char *Name):
  153.      *
  154.      *        Check a Zoom output file for integrity.
  155.      */
  156.  
  157. BYTE
  158. ZoomCheck(char *Name)
  159. {
  160.     FILE                        *ZoomFile;
  161.     struct ZoomHeader         ZoomHeader;
  162.     struct TrackHeader     TrackHeader;
  163.     ULONG                         TrackCRC;
  164.     WORD                         i,j;
  165.     BYTE                         Success = FALSE,TextOkay = TRUE;
  166.     APTR                         Buffer,TextBuffer;
  167.  
  168.     if(ZoomFile = fopen(Name,"rb"))
  169.     {
  170.         if(Buffer = malloc(TRACKSIZE * 5))
  171.         {
  172.             if(fread(&ZoomHeader,sizeof(struct ZoomHeader),1,ZoomFile) == 1)
  173.             {
  174.                 if(ZoomHeader . HeaderID == ZOM5)
  175.                 {
  176.                     if(fread(&TrackCRC,sizeof(ULONG),1,ZoomFile) == 1)
  177.                     {
  178.                         if(TrackCRC == DoBlockCRC((UBYTE *)&ZoomHeader,sizeof(struct ZoomHeader)))
  179.                         {
  180.                             if(ZoomHeader . TextLength)
  181.                             {
  182.                                 TextOkay = FALSE;
  183.  
  184.                                 if(TextBuffer = malloc(ZoomHeader . TextLength))
  185.                                 {
  186.                                     if(fread(TextBuffer,ZoomHeader . TextLength,1,ZoomFile) == 1)
  187.                                     {
  188.                                         if(fread(&TrackCRC,sizeof(ULONG),1,ZoomFile) == 1)
  189.                                         {
  190.                                             if(DoBlockCRC((UBYTE *)TextBuffer,ZoomHeader . TextLength) == TrackCRC)
  191.                                                 TextOkay = TRUE;
  192.                                             else
  193.                                                 printf("ZoomCheck: File \"%s\" has a checksum error.\n",Name);
  194.                                         }
  195.                                         else
  196.                                             printf("ZoomCheck: Error reading file \"%s\".\n",Name);
  197.                                     }
  198.                                     else
  199.                                         printf("ZoomCheck: Error reading file \"%s\".\n",Name);
  200.  
  201.                                     free(TextBuffer);
  202.                                 }
  203.                                 else
  204.                                     printf("ZoomCheck: Out of memory.\n");
  205.                             }
  206.  
  207.                             if(TextOkay)
  208.                             {
  209.                                 for(i = ZoomHeader . From ; i <= ZoomHeader . To ; i++)
  210.                                 {
  211.                                     Success = FALSE;
  212.  
  213.                                     if(fread(&TrackHeader,sizeof(struct TrackHeader),1,ZoomFile) == 1)
  214.                                     {
  215.                                         if(fread(&TrackCRC,sizeof(ULONG),1,ZoomFile) == 1)
  216.                                         {
  217.                                             if(DoBlockCRC((UBYTE *)&TrackHeader,sizeof(struct TrackHeader)) == TrackCRC)
  218.                                             {
  219.                                                 if(fread(Buffer,TrackHeader . Length,1,ZoomFile) == 1)
  220.                                                 {
  221.                                                     if(DoBlockCRC((UBYTE *)Buffer,TrackHeader . Length) == TrackHeader . CRC)
  222.                                                     {
  223.                                                         Success = TRUE;
  224.  
  225.                                                         for(j = 0 ; j < 5 ; j++)
  226.                                                         {
  227.                                                             if(TrackHeader . Tracks[j] != -1)
  228.                                                                 i = TrackHeader . Tracks[j];
  229.                                                             else
  230.                                                                 break;
  231.                                                         }
  232.                                                     }
  233.                                                     else
  234.                                                     {
  235.                                                         printf("ZoomCheck: File \"%s\" has a checksum error, track %d.\n",Name,i);
  236.                                                         break;
  237.                                                     }
  238.                                                 }
  239.                                                 else
  240.                                                 {
  241.                                                     printf("ZoomCheck: Error reading file \"%s\", track %d.\n",Name,i);
  242.                                                     break;
  243.                                                 }
  244.                                             }
  245.                                             else
  246.                                             {
  247.                                                 printf("ZoomCheck: File \"%s\" has a checksum error, track %d.\n",Name,i);
  248.                                                 break;
  249.                                             }
  250.                                         }
  251.                                         else
  252.                                         {
  253.                                             printf("ZoomCheck: Error reading file \"%s\", track %d.\n",Name,i);
  254.                                             break;
  255.                                         }
  256.                                     }
  257.                                     else
  258.                                     {
  259.                                         printf("ZoomCheck: Error reading file \"%s\", track %d.\n",Name,i);
  260.                                         break;
  261.                                     }
  262.                                 }
  263.                             }
  264.                         }
  265.                         else
  266.                             printf("ZoomCheck: File \"%s\" has a checksum error.\n",Name);
  267.                     }
  268.                     else
  269.                         printf("ZoomCheck: Error reading file \"%s\".\n",Name);
  270.                 }
  271.                 else
  272.                     printf("ZoomCheck: \"%s\" is not a Zoom 5.x format file.\n",Name);
  273.             }
  274.             else
  275.                 printf("ZoomCheck: Error reading file \"%s\".\n",Name);
  276.  
  277.             free(Buffer);
  278.         }
  279.         else
  280.             printf("ZoomCheck: Out of memory.\n");
  281.  
  282.         fclose(ZoomFile);
  283.     }
  284.     else
  285.         printf("ZoomCheck: failed to open file \"%s\".\n",Name);
  286.  
  287.     return(Success);
  288. }
  289.  
  290. void
  291. main(int argc,char **argv)
  292. {
  293.     if(argc > 1)
  294.     {
  295.         if(argv[1][0] != '?')
  296.         {
  297.             if(ZoomCheck(argv[1]))
  298.             {
  299.                 printf("ZoomCheck: No errors encountered checking file \"%s\".\n",argv[1]);
  300.  
  301.                 exit(0);
  302.             }
  303.             else
  304.                 exit(5);
  305.         }
  306.     }
  307.  
  308.     printf("Usage: ZoomCheck <Zoom file>\n");
  309. }
  310.