workbench/network/stacks/AROSTCP/MUI.MiamiPanel/muimiamipanel_iffprefs.c

   1
   2 #include <proto/dos.h>
   3
   4 #include "muimiamipanel_intern.h"
   5 #include "muimiamipanel_iffprefs.h"
   6 #include "muimiamipanel_misc.h"
   7
   8 ULONG
   9 saveIFFPrefs(UBYTE *file,struct MPS_Prefs *prefs, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  10 {
  11     register struct IFFHandle *iffh;
  12     register ULONG             res = FALSE;
  13
  14     if (iffh = AllocIFF())
  15     {
  16         if (iffh->iff_Stream = Open(file,MODE_NEWFILE))
  17         {
  18             InitIFFasDOS(iffh);
  19
  20             if (!OpenIFF(iffh,IFFF_WRITE))
  21             {
  22                 struct PrefHeader      prhd;
  23                 register struct ifnode *ifnode;
  24
  25                 if (PushChunk(iffh,ID_PREF,ID_FORM,IFFSIZE_UNKNOWN)) goto fail;
  26                 if (PushChunk(iffh,ID_PREF,ID_PRHD,sizeof(struct PrefHeader))) goto fail;
  27
  28                 prhd.ph_Version = MPV_Prefs_Version;
  29                 prhd.ph_Type    = 0;
  30                 prhd.ph_Flags   = 0;
  31
  32                 if (WriteChunkBytes(iffh,&prhd,sizeof(struct PrefHeader))!=sizeof(struct PrefHeader))
  33                     goto fail;
  34
  35                 if (PopChunk(iffh)) goto fail;
  36
  37                 if (PushChunk(iffh,ID_PREF,ID_Prefs,SIZE_Prefs)) goto fail;
  38                 if (WriteChunkBytes(iffh,prefs,SIZE_Prefs)!=SIZE_Prefs) goto fail;
  39                 if (PopChunk(iffh)) goto fail;
  40
  41                 for (ifnode = (struct ifnode *)prefs->iflist.mlh_Head; ifnode->link.mln_Succ; ifnode = (struct ifnode *)ifnode->link.mln_Succ)
  42                 {
  43                     if (PushChunk(iffh,ID_PREF,ID_IFNode,SIZE_IFNode)) goto fail;
  44                     if (WriteChunkBytes(iffh,&ifnode->name,SIZE_IFNode)!=SIZE_IFNode) goto fail;
  45                     if (PopChunk(iffh)) goto fail;
  46                 }
  47
  48                 res = TRUE;
  49
  50                 fail: CloseIFF(iffh);
  51             }
  52
  53             Close(iffh->iff_Stream);
  54         }
  55
  56         FreeIFF(iffh);
  57     }
  58
  59     if (!res) DeleteFile(file);
  60
  61     return res;
  62 }
  63
  64 /**************************************************************************/
  65
  66 ULONG
  67 loadIFFPrefs(ULONG where,struct MPS_Prefs *prefs, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  68 {
  69     register struct IFFHandle *iffh;
  70     register ULONG            res = FALSE;
  71
  72     NEWLIST(&prefs->iflist);
  73
  74     if (iffh = AllocIFF())
  75     {
  76         register BPTR file;
  77
  78         if (where & MPV_LoadPrefs_Env)
  79         {
  80             file = Open(DEF_ENVFILE,MODE_OLDFILE);
  81             if (!file && (where & MPV_LoadPrefs_FallBack))
  82                 file = Open(DEF_ENVARCFILE,MODE_OLDFILE);
  83         }
  84         else file = Open(DEF_ENVARCFILE,MODE_OLDFILE);
  85
  86         if (file)
  87         {
  88             iffh->iff_Stream = file;
  89
  90             InitIFFasDOS(iffh);
  91
  92             if (!OpenIFF(iffh,IFFF_READ))
  93             {
  94                 struct PrefHeader           prhd;
  95                 register struct ContextNode *cn;
  96
  97                 if (StopChunk(iffh,ID_PREF,ID_PRHD)) goto fail;
  98                 if (StopChunk(iffh,ID_PREF,ID_Prefs)) goto fail;
  99                 if (StopChunk(iffh,ID_PREF,ID_IFNode)) goto fail;
 100
 101                 if (ParseIFF(iffh,IFFPARSE_SCAN)) goto fail;
 102
 103                 if (!(cn = CurrentChunk(iffh))) goto fail;
 104
 105                 if ((cn->cn_Type!=ID_PREF) || (cn->cn_ID!=ID_PRHD) ||
 106                     (cn->cn_Size!=sizeof(struct PrefHeader))) goto fail;
 107
 108                 if (ReadChunkBytes(iffh,&prhd,cn->cn_Size)!=cn->cn_Size) goto fail;
 109
 110                 if (prhd.ph_Version>MPV_Prefs_Version) goto fail;
 111
 112                 for (;;)
 113                 {
 114                     register ULONG error;
 115
 116                     error = ParseIFF(iffh,IFFPARSE_SCAN);
 117                     if (error==IFFERR_EOF) break;
 118                     else if (error) goto fail;
 119
 120                     if (!(cn = CurrentChunk(iffh))) goto fail;
 121
 122                     if (cn->cn_Type!=ID_PREF) continue;
 123
 124                     if ((cn->cn_ID==ID_Prefs) && (cn->cn_Size==SIZE_Prefs))
 125                     {
 126                         if (ReadChunkBytes(iffh,prefs,cn->cn_Size)!=cn->cn_Size)
 127                             goto fail;
 128                     }
 129
 130                     if ((cn->cn_ID==ID_IFNode) && (cn->cn_Size==SIZE_IFNode))
 131                     {
 132                         struct ifnode ifnode;
 133
 134                         if (ReadChunkBytes(iffh,&ifnode.name,cn->cn_Size)!=cn->cn_Size)
 135                             goto fail;
 136
 137                         createIFNode(prefs, ifnode.name, ifnode.scale, MiamiPanelBaseIntern);
 138                     }
 139                 }
 140
 141                 res = TRUE;
 142
 143                 fail: CloseIFF(iffh);
 144             }
 145
 146             Close(file);
 147         }
 148
 149         FreeIFF(iffh);
 150     }
 151
 152     //if (!res) freeIFList(prefs);
 153
 154     return res;
 155 }
 156
 157 /**************************************************************************/