workbench/libs/muiscreen/openpubfile.c

   1 /*
   2     Copyright © 2009, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <libraries/muiscreen.h>
   7 #include <proto/dos.h>
   8 #include <dos/dos.h>
   9 #include <proto/iffparse.h>
  10 #include <prefs/prefhdr.h>
  11 #define DEBUG 1
  12 #include <aros/debug.h>
  13
  14 #include "fileformat.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <proto/muiscreen.h>
  20
  21         AROS_LH2(APTR, MUIS_OpenPubFile,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(char*, name,  A0),
  25         AROS_LHA(ULONG, mode, D0),
  26
  27 /*  LOCATION */
  28         struct Library *, MUIScreenBase, 9, MUIScreen)
  29
  30 /*  FUNCTION
  31
  32     INPUTS
  33
  34     RESULT
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43
  44     INTERNALS
  45
  46 ******************************************************************************/
  47
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct IFFHandle *iff;
  52
  53     D(bug("MUIS_OpenPubFile(%s, %d)\n", name, mode));
  54
  55     if ((iff = AllocIFF()))
  56     {
  57         if ((iff->iff_Stream = (IPTR) Open(name, mode)))
  58         {
  59             InitIFFasDOS(iff);
  60             if (!OpenIFF(iff, (mode == MODE_OLDFILE ? IFFF_READ : IFFF_WRITE)))
  61             {
  62                 if (mode == MODE_NEWFILE)
  63                 {
  64                     if (!PushChunk(iff, ID_PREF, ID_FORM, IFFSIZE_UNKNOWN))
  65                     {
  66                         if (!PushChunk(iff, ID_PREF, ID_PRHD, sizeof(struct FilePrefHeader)))
  67                         {
  68                             struct FilePrefHeader head;
  69
  70                             head.ph_Version  = 0; // FIXME: shouold be PHV_CURRENT, but see <prefs/prefhdr.h>
  71                             head.ph_Type     = 0;
  72                             head.ph_Flags[0] =
  73                             head.ph_Flags[1] =
  74                             head.ph_Flags[2] =
  75                             head.ph_Flags[3] = 0;
  76
  77                             if (WriteChunkBytes(iff, &head, sizeof(head)) == sizeof(head))
  78                             {
  79                                 PopChunk(iff);
  80                                 return (APTR) iff;
  81                             }
  82                         }
  83                     }
  84                 }
  85                 else
  86                     return (APTR) iff;
  87             }
  88         }
  89     }
  90
  91     return NULL;
  92
  93     AROS_LIBFUNC_EXIT
  94 }