workbench/classes/zune/prefseditor/prefseditor.c

   1 /*
   2     Copyright © 2004, The AROS Development Team. All rights reserved.
   3     This file is part of the PrefsEditor class, which is distributed under
   4     the terms of version 2.1 of the GNU Lesser General Public License.
   5
   6     $Id$
   7 */
   8
   9 #define MUIMASTER_YES_INLINE_STDARG
  10
  11 #include <utility/tagitem.h>
  12 #include <libraries/mui.h>
  13 #include <dos/dos.h>
  14
  15 #include <proto/exec.h>
  16 #include <proto/muimaster.h>
  17 #include <proto/intuition.h>
  18 #include <proto/utility.h>
  19 #include <proto/locale.h>
  20 #include <proto/dos.h>
  21 #include <proto/alib.h>
  22
  23 #include "support.h"
  24 #include "prefseditor.h"
  25 #include "prefseditor_private.h"
  26
  27 #include <aros/debug.h>
  28
  29 /*** Macros and defines *****************************************************/
  30 #define SETUP_INST_DATA struct PrefsEditor_DATA *data = INST_DATA(CLASS, self)
  31
  32 #define ENV    ((IPTR) "ENV:")
  33 #define ENVARC ((IPTR) "ENVARC:")
  34
  35 /*** Methods ****************************************************************/
  36 Object *PrefsEditor__OM_NEW
  37 (
  38     Class *CLASS, Object *self, struct opSet *message
  39 )
  40 {
  41     self = (Object *) DoSuperMethodA(CLASS, self, (Msg)message);
  42
  43     if (self != NULL)
  44     {
  45         SETUP_INST_DATA;
  46
  47         /*-- Handle initial attribute values -------------------------------*/
  48         SetAttrsA(self, message->ops_AttrList);
  49
  50         /*-- Set defaults --------------------------------------------------*/
  51         data->ped_CanSave = TRUE;
  52         data->ped_CanTest = TRUE;
  53     }
  54
  55     return self;
  56 }
  57
  58 IPTR PrefsEditor__MUIM_Setup
  59 (
  60     Class *CLASS, Object *self, struct MUIP_Setup *message
  61 )
  62 {
  63     SETUP_INST_DATA;
  64     BPTR lock;
  65
  66     if (!DoSuperMethodA(CLASS, self, (Msg) message)) return FALSE;
  67
  68     /*-- Load preferences --------------------------------------------------*/
  69     if (!DoMethod(self, MUIM_PrefsEditor_ImportFromDirectory, ENV))
  70     {
  71         DoMethod(self, MUIM_PrefsEditor_ImportFromDirectory, ENVARC);
  72     }
  73
  74     /*-- Store backup of initial preferences -------------------------------*/
  75     data->ped_BackupFH = CreateTemporary(data->ped_BackupPath, BACKUP_PREFIX);
  76     if (data->ped_BackupFH != NULL)
  77     {
  78         if
  79         (
  80             !DoMethod
  81             (
  82                 self, MUIM_PrefsEditor_ExportFH, (IPTR) data->ped_BackupFH
  83             )
  84         )
  85         {
  86             /* Remove the incomplete backup file */
  87             Close(data->ped_BackupFH);
  88             DeleteFile(data->ped_BackupPath);
  89             data->ped_BackupFH = NULL;
  90         }
  91     }
  92
  93     if (data->ped_BackupFH == NULL)
  94     {
  95         data->ped_CanTest = FALSE;
  96     }
  97
  98     /*-- Completely disable save if ENVARC: is write-protected -------------*/
  99     lock = Lock("ENVARC:", SHARED_LOCK);
 100     if (lock != NULL)
 101     {
 102         struct InfoData id;
 103
 104         if (Info(lock, &id))
 105         {
 106             if (id.id_DiskState == ID_WRITE_PROTECTED)
 107             {
 108                 data->ped_CanSave = FALSE;
 109             }
 110         }
 111
 112         UnLock(lock);
 113     }
 114     else
 115     {
 116         data->ped_CanSave = FALSE;
 117     }
 118
 119     return TRUE;
 120 }
 121
 122 IPTR PrefsEditor__MUIM_Cleanup
 123 (
 124     Class *CLASS, Object *self, struct MUIP_Cleanup *message
 125 )
 126 {
 127     SETUP_INST_DATA;
 128
 129     if (data->ped_BackupFH != NULL)
 130     {
 131         Close(data->ped_BackupFH);
 132         DeleteFile(data->ped_BackupPath);
 133     }
 134
 135     return DoSuperMethodA(CLASS, self, (Msg) message);
 136 }
 137
 138 IPTR PrefsEditor__OM_DISPOSE
 139 (
 140     Class *CLASS, Object *self, Msg message
 141 )
 142 {
 143     SETUP_INST_DATA;
 144
 145     if (data->ped_Name != NULL) FreeVec(data->ped_Name);
 146     if (data->ped_Path != NULL) FreeVec(data->ped_Path);
 147
 148     return DoSuperMethodA(CLASS, self, message);
 149 }
 150
 151 IPTR PrefsEditor__OM_SET
 152 (
 153     Class *CLASS, Object *self, struct opSet *message
 154 )
 155 {
 156     SETUP_INST_DATA;
 157     const struct TagItem *tstate = message->ops_AttrList;
 158     struct TagItem *tag,
 159                     noforward_attrs[] =
 160                     {
 161                         { MUIA_Group_Forward, FALSE        },
 162                         { TAG_MORE,           (IPTR)tstate }
 163                     };
 164     struct opSet noforward_message = *message;
 165     noforward_message.ops_AttrList = noforward_attrs;
 166
 167     while ((tag = NextTagItem(&tstate)) != NULL)
 168     {
 169         switch (tag->ti_Tag)
 170         {
 171             case MUIA_PrefsEditor_Changed:
 172                 data->ped_Changed = tag->ti_Data;
 173                 break;
 174
 175             case MUIA_PrefsEditor_Testing:
 176                 data->ped_Testing = tag->ti_Data;
 177                 break;
 178
 179             case MUIA_PrefsEditor_Name:
 180                 if (data->ped_Name != NULL) FreeVec(data->ped_Name);
 181                 data->ped_Name = StrDup((CONST_STRPTR) tag->ti_Data);
 182                 break;
 183
 184             case MUIA_PrefsEditor_Path:
 185                 if (data->ped_Path != NULL) FreeVec(data->ped_Path);
 186                 data->ped_Path = StrDup((CONST_STRPTR) tag->ti_Data);
 187                 break;
 188         }
 189     }
 190
 191     return DoSuperMethodA(CLASS, self, (Msg) &noforward_message);
 192 }
 193
 194 IPTR PrefsEditor__OM_GET
 195 (
 196     Class *CLASS, Object *self, struct opGet *message
 197 )
 198 {
 199     SETUP_INST_DATA;
 200     IPTR *store = message->opg_Storage;
 201     IPTR  rv    = TRUE;
 202
 203     switch (message->opg_AttrID)
 204     {
 205         case MUIA_PrefsEditor_Changed:
 206             *store = data->ped_Changed;
 207             break;
 208
 209         case MUIA_PrefsEditor_Testing:
 210             *store = data->ped_Testing;
 211             break;
 212
 213         case MUIA_PrefsEditor_CanSave:
 214             *store = data->ped_CanSave;
 215             break;
 216
 217         case MUIA_PrefsEditor_CanTest:
 218             *store = data->ped_CanTest;
 219             break;
 220
 221         case MUIA_PrefsEditor_Name:
 222             *store = (IPTR) data->ped_Name;
 223             break;
 224
 225         case MUIA_PrefsEditor_Path:
 226             *store = (IPTR) data->ped_Path;
 227             break;
 228
 229         default:
 230             rv = DoSuperMethodA(CLASS, self, (Msg) message);
 231     }
 232
 233     return rv;
 234 }
 235
 236 IPTR PrefsEditor__MUIM_PrefsEditor_ExportToDirectory
 237 (
 238     Class *CLASS, Object *self,
 239     struct MUIP_PrefsEditor_ExportToDirectory *message
 240 )
 241 {
 242     SETUP_INST_DATA;
 243     BOOL success = FALSE;
 244     BPTR lock    = Lock(message->directory, ACCESS_READ);
 245
 246     if (lock != NULL)
 247     {
 248         BPTR oldcd = CurrentDir(lock);
 249
 250         success = DoMethod
 251         (
 252             self, MUIM_PrefsEditor_Export, (IPTR) data->ped_Path
 253         );
 254
 255         CurrentDir(oldcd);
 256
 257         UnLock(lock);
 258     }
 259
 260     return success;
 261 }
 262
 263 IPTR PrefsEditor__MUIM_PrefsEditor_ImportFromDirectory
 264 (
 265     Class *CLASS, Object *self,
 266     struct MUIP_PrefsEditor_ImportFromDirectory *message
 267 )
 268 {
 269     SETUP_INST_DATA;
 270     BOOL success = FALSE;
 271     BPTR lock    = Lock(message->directory, ACCESS_READ);
 272
 273     if (lock != NULL)
 274     {
 275         BPTR oldcd = CurrentDir(lock);
 276
 277         success = DoMethod
 278         (
 279             self, MUIM_PrefsEditor_Import, (IPTR) data->ped_Path
 280         );
 281
 282         CurrentDir(oldcd);
 283
 284         UnLock(lock);
 285
 286     }
 287
 288     return success;
 289 }
 290
 291 IPTR PrefsEditor__MUIM_PrefsEditor_Import
 292 (
 293     Class *CLASS, Object *self, struct MUIP_PrefsEditor_Import *message
 294 )
 295 {
 296     BOOL success = FALSE;
 297     BPTR fh;
 298
 299     if ((fh = Open(message->filename, MODE_OLDFILE)) != NULL)
 300     {
 301         success = DoMethod(self, MUIM_PrefsEditor_ImportFH, (IPTR) fh);
 302         Close(fh);
 303     }
 304
 305     return success;
 306 }
 307
 308 IPTR PrefsEditor__MUIM_PrefsEditor_Export
 309 (
 310     Class *CLASS, Object *self, struct MUIP_PrefsEditor_Export *message
 311 )
 312 {
 313     BOOL success = FALSE;
 314     BPTR fh;
 315
 316     fh = Open(message->filename, MODE_NEWFILE);
 317
 318     if (fh == NULL && IoErr() == ERROR_OBJECT_NOT_FOUND)
 319     {
 320         /* Attempt to create missing directories */
 321         /* MakeDirs() will modify the string in-place */
 322         STRPTR tmp = StrDup(message->filename);
 323         if (tmp != NULL)
 324         {
 325             MakeDirs(tmp);
 326             fh = Open(message->filename, MODE_NEWFILE);
 327             FreeVec(tmp);
 328         }
 329     }
 330
 331     if (fh != NULL)
 332     {
 333         success = DoMethod(self, MUIM_PrefsEditor_ExportFH, (IPTR) fh);
 334         Close(fh);
 335     }
 336
 337     return success;
 338 }
 339
 340 IPTR PrefsEditor__MUIM_PrefsEditor_Test
 341 (
 342     Class *CLASS, Object *self, Msg message
 343 )
 344 {
 345     if (DoMethod(self, MUIM_PrefsEditor_ExportToDirectory, ENV))
 346     {
 347         SET(self, MUIA_PrefsEditor_Changed, FALSE);
 348         SET(self, MUIA_PrefsEditor_Testing, TRUE);
 349
 350         return TRUE;
 351     }
 352
 353     return FALSE;
 354 }
 355
 356 IPTR PrefsEditor__MUIM_PrefsEditor_Revert
 357 (
 358     Class *CLASS, Object *self, Msg message
 359 )
 360 {
 361     SETUP_INST_DATA;
 362
 363     if (Seek(data->ped_BackupFH, 0, OFFSET_BEGINNING) == -1)
 364                  return FALSE;//error
 365
 366     if
 367     (
 368            DoMethod(self, MUIM_PrefsEditor_ImportFH, (IPTR) data->ped_BackupFH)
 369         && DoMethod(self, MUIM_PrefsEditor_ExportToDirectory, ENV)
 370     )
 371     {
 372         SET(self, MUIA_PrefsEditor_Changed, FALSE);
 373         SET(self, MUIA_PrefsEditor_Testing, FALSE);
 374
 375         return TRUE;
 376     }
 377
 378      return FALSE;//error
 379
 380 }
 381
 382 IPTR PrefsEditor__MUIM_PrefsEditor_Save
 383 (
 384     Class *CLASS, Object *self, Msg message
 385 )
 386 {
 387     if
 388     (
 389            DoMethod(self, MUIM_PrefsEditor_Use)
 390         && DoMethod(self, MUIM_PrefsEditor_ExportToDirectory, ENVARC)
 391     )
 392     {
 393         return TRUE;
 394     }
 395
 396     return FALSE;
 397 }
 398
 399 IPTR PrefsEditor__MUIM_PrefsEditor_Use
 400 (
 401     Class *CLASS, Object *self, Msg message
 402 )
 403 {
 404     if (DoMethod(self, MUIM_PrefsEditor_ExportToDirectory, ENV))
 405     {
 406         SET(self, MUIA_PrefsEditor_Changed, FALSE);
 407         SET(self, MUIA_PrefsEditor_Testing, FALSE);
 408
 409         return TRUE;
 410     }
 411
 412     return FALSE;
 413 }
 414
 415 IPTR PrefsEditor__MUIM_PrefsEditor_Cancel
 416 (
 417     Class *CLASS, Object *self, Msg message
 418 )
 419 {
 420     if (XGET(self, MUIA_PrefsEditor_Testing))
 421     {
 422         return DoMethod(self, MUIM_PrefsEditor_Revert);
 423     }
 424
 425     return TRUE;
 426 }