workbench/tools/SysExplorer/enum_gfx.c

   1 /*
   2     Copyright (C) 2015, The AROS Development Team.
   3     $Id$
   4 */
   5
   6 #define DEBUG 1
   7 #include <aros/debug.h>
   8
   9 #include <proto/alib.h>
  10 #include <proto/dos.h>
  11 #include <proto/exec.h>
  12 #include <proto/muimaster.h>
  13 #include <proto/oop.h>
  14 #include <proto/utility.h>
  15 #include <proto/intuition.h>
  16
  17 #include <mui/NListtree_mcc.h>
  18 #include <mui/NListview_mcc.h>
  19 #include <utility/tagitem.h>
  20 #include <utility/hooks.h>
  21
  22 #include <hidd/graphics.h>
  23
  24 #include "locale.h"
  25 #include "classes.h"
  26 #include "enums.h"
  27
  28 OOP_AttrBase HiddGfxAttrBase;
  29
  30 const struct OOP_ABDescr gfx_abd[] =
  31 {
  32     {IID_Hidd_Gfx,      &HiddGfxAttrBase},
  33     {NULL            ,  NULL          }
  34 };
  35
  36 static void addGgfxDisplay(OOP_Object *obj, struct MUI_NListtree_TreeNode *parent)
  37 {
  38     struct InsertObjectMsg msg =
  39     {
  40         .obj      = obj,
  41         .winClass = MonitorWindow_CLASS
  42     };
  43     CONST_STRPTR name;
  44
  45     OOP_GetAttr(obj, aHidd_Name, (IPTR *)&name);
  46
  47     DoMethod(hidd_tree, MUIM_NListtree_Insert, name, &msg,
  48              parent, MUIV_NListtree_Insert_PrevNode_Tail, 0);
  49 }
  50
  51 void gfxEnum(OOP_Object *obj, struct MUI_NListtree_TreeNode *tn)
  52 {
  53     OOP_Object *display = NULL;
  54     struct List *displays = NULL;
  55
  56     D(bug("[SysExplorer:Gfx] %s: found '%s'\n", __PRETTY_FUNCTION__, OOP_OCLASS(obj)->ClassNode.ln_Name));
  57
  58     /* software rasterizer doesnt have an actual "sidplay" */
  59     if (OOP_OCLASS(obj) == OOP_FindClass(CLID_Hidd_Gfx))
  60         return;
  61
  62     OOP_GetAttr(obj, aHidd_Gfx_DisplayList, (IPTR *)&displays);
  63     if (displays)
  64     {
  65         ForeachNode(displays, display)
  66         {
  67             addGgfxDisplay(display, tn);
  68         }
  69     }
  70     else
  71     {
  72         OOP_GetAttr(obj, aHidd_Gfx_DisplayDefault, (IPTR *)&display);
  73         if (display)
  74             addGgfxDisplay(display, tn);
  75     }
  76 }
  77
  78 BOOL gfxValid(OOP_Object *obj, ULONG *flags)
  79 {
  80     if (OOP_OCLASS(obj) == OOP_FindClass(CLID_Hidd_Gfx))
  81     {
  82         ULONG _flags = *flags;
  83         _flags &= ~ TNF_LIST;
  84         *flags = _flags;
  85     }
  86     return TRUE;
  87 }
  88
  89 BOOL gfxenum_init(void)
  90 {
  91     D(bug("[SysExplorer:Gfx] Initialising..\n"));
  92
  93     OOP_ObtainAttrBases(gfx_abd);
  94     RegisterClassHandler(CLID_Hidd_Gfx, 60, &GfxWindow_CLASS, gfxEnum, gfxValid);
  95
  96     return TRUE;
  97 }
  98
  99 ADD2INIT(gfxenum_init, 10);