workbench/libs/muimaster/classes/settings.c

   1 /*
   2     Copyright © 2002-2006, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <graphics/gfx.h>
   7 #include <graphics/view.h>
   8 #include <clib/alib_protos.h>
   9 #include <proto/exec.h>
  10 #include <proto/graphics.h>
  11 #include <proto/utility.h>
  12 #include <proto/intuition.h>
  13 #include <proto/muimaster.h>
  14
  15 #include "mui.h"
  16 #include "muimaster_intern.h"
  17 #include "support.h"
  18
  19 extern struct Library *MUIMasterBase;
  20
  21 struct MUI_SettingsData
  22 {
  23     int dummy;
  24 };
  25
  26 static IPTR ListDisplayFunc(struct Hook *hook, char **array, char *entry)
  27 {
  28     *array++ = "";
  29     *array++ = "";
  30     *array = entry;
  31
  32     return 0;
  33 }
  34
  35 /**************************************************************************
  36  OM_NEW
  37 **************************************************************************/
  38 IPTR Settings__OM_NEW(struct IClass * cl, Object * obj, struct opSet * msg)
  39 {
  40     struct MUI_Settings *data;
  41     struct TagItem *tag, *tags;
  42     Object *listobj;
  43     static const struct Hook list_display_hook =
  44     {
  45         {NULL, NULL}, HookEntry, ListDisplayFunc, NULL
  46     };
  47
  48     obj = (Object *)DoSuperNewTags(cl, obj, NULL,
  49         Child, HGroup,
  50             Child, VGroup,
  51                 Child, ListviewObject,
  52                     MUIA_Listview_List, listobj = ListObject,
  53                         InputListFrame,
  54                         MUIA_List_AdjustWidth, TRUE,
  55                         MUIA_List_Format, "DELTA=2,DELTA=5,",
  56                         MUIA_List_DisplayHook, &list_display_hook,
  57                         End, /* ListObject */
  58                     End, /* ListviewObject */
  59                 Child, HGroup,
  60                     Child, MUI_NewObject(MUIC_Popimage,
  61                         MUIA_FixHeight, 20,
  62                         MUIA_Imageadjust_Type, MUIV_Imageadjust_Type_All,
  63                         TAG_DONE), /* Popframe really */
  64                     Child, MUI_NewObject(MUIC_Popimage,
  65                         MUIA_FixHeight, 20,
  66                         MUIA_Imageadjust_Type, MUIV_Imageadjust_Type_All,
  67                         TAG_DONE),
  68                     End, /* HGroup */
  69                 End, /* VGroup */
  70             Child, MUI_NewObject(MUIC_Settingsgroup,
  71                 TAG_DONE),
  72             End, /* HGroup */
  73         TAG_MORE, msg->ops_AttrList);
  74     if (!obj)
  75         return FALSE;
  76
  77     data = INST_DATA(cl, obj);
  78
  79     /* parse initial taglist */
  80
  81     for (tags = msg->ops_AttrList; (tag = NextTagItem(&tags));)
  82     {
  83         switch (tag->ti_Tag)
  84         {
  85         }
  86     }
  87
  88     return (IPTR) obj;
  89 }
  90
  91 BOOPSI_DISPATCHER(IPTR, Settings_Dispatcher, cl, obj, msg)
  92 {
  93     switch (msg->MethodID)
  94     {
  95     case OM_NEW:
  96         return Settings__OM_NEW(cl, obj, (struct opSet *)msg);
  97     }
  98
  99     return DoSuperMethodA(cl, obj, msg);
 100 }
 101 BOOPSI_DISPATCHER_END
 102
 103 /*
 104  * Class descriptor.
 105  */
 106 const struct __MUIBuiltinClass _MUI_Settings_desc =
 107 {
 108     MUIC_Settings,
 109     MUIC_Group,
 110     sizeof(struct MUI_SettingsData),
 111     (void *) Settings_Dispatcher
 112 };