test/iffparsewrite.c

   1 #include <proto/exec.h>
   2 #include <proto/dos.h>
   3 #include <proto/iffparse.h>
   4 #include <dos/dos.h>
   5 #include <libraries/iffparse.h>
   6 #include <datatypes/pictureclass.h>
   7
   8 #include <stdio.h>
   9 #include <string.h>
  10 #include <stdlib.h>
  11
  12 struct Library *IFFParseBase;
  13
  14 static struct IFFHandle *iff;
  15 static LONG err;
  16
  17 int main(void)
  18 {
  19     IFFParseBase = OpenLibrary("iffparse.library",0);
  20     if (!IFFParseBase)
  21     {
  22         printf("Could not open iffparse.library!");
  23         exit(0);
  24     }
  25
  26     printf("Trying to write a test file called \"ram:test.iff\" ...\n\n");
  27
  28     if ((iff = AllocIFF()))
  29     {
  30         if ((iff->iff_Stream = (IPTR) Open("ram:test.iff", MODE_NEWFILE)))
  31         {
  32             InitIFFasDOS(iff);
  33
  34             err = OpenIFF(iff, IFFF_WRITE);
  35             if (err == 0)
  36             {
  37                 err = PushChunk(iff, ID_ILBM, ID_FORM, IFFSIZE_UNKNOWN);
  38                 if (err == 0)
  39                 {
  40                     err = PushChunk(iff, ID_ILBM, MAKE_ID('A', 'B', 'C', 'D'), IFFSIZE_UNKNOWN);
  41                     if (err == 0)
  42                     {
  43                         char *buffer = "1234567890";
  44
  45                         err = WriteChunkBytes(iff, buffer, strlen(buffer));
  46                         if (err == strlen(buffer))
  47                         {
  48                             printf("********* No errors during writing :-) **************\n");
  49
  50                         } else printf("WriteChunkBytes(iff, buffer, strlen(buffer)) returned %ld\n",(long)err);
  51
  52                         PopChunk(iff);
  53
  54                     } else printf("PushChunk(iff, ID_ILBM, MAKE_ID('A', 'B', 'C', 'D'), IFFSIZE_UNKNOWN) returned error %ld\n",(long)err);
  55
  56                     PopChunk(iff);
  57
  58                 } else printf("PushChunk(iff, ID_ILBM, ID_FORM, IFFSIZE) returned error %ld\n",(long)err);
  59
  60                 CloseIFF(iff);
  61
  62             } else printf("OpenIFF returned error %ld\n",(long)err);
  63
  64             Close((BPTR) iff->iff_Stream);
  65
  66         } else printf("Could not open ram:test.iff for write!\n");
  67
  68         FreeIFF(iff);
  69
  70     } else printf("AllocIFF failed!\n");
  71
  72     CloseLibrary(IFFParseBase);
  73
  74     return 0;
  75 }