workbench/tools/SysExplorer/enum_gfx.c

   1 /*
   2     Copyright (C) 2015-2017, 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/gfx.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     sysExplGlobalCount++;
  48     DoMethod(hidd_tree, MUIM_NListtree_Insert, name, &msg,
  49              parent, MUIV_NListtree_Insert_PrevNode_Tail, 0);
  50 }
  51
  52 void gfxEnum(OOP_Object *obj, struct MUI_NListtree_TreeNode *tn)
  53 {
  54     OOP_Object *display = NULL;
  55     struct List *displays = NULL;
  56
  57     D(bug("[SysExplorer:Gfx] %s: found '%s'\n", __PRETTY_FUNCTION__, OOP_OCLASS(obj)->ClassNode.ln_Name));
  58
  59     /* software rasterizer doesnt have an actual "sidplay" */
  60     if (OOP_OCLASS(obj) == OOP_FindClass(CLID_Hidd_Gfx))
  61         return;
  62
  63     OOP_GetAttr(obj, aHidd_Gfx_DisplayList, (IPTR *)&displays);
  64     if (displays)
  65     {
  66         ForeachNode(displays, display)
  67         {
  68             addGgfxDisplay(display, tn);
  69         }
  70     }
  71     else
  72     {
  73         OOP_GetAttr(obj, aHidd_Gfx_DisplayDefault, (IPTR *)&display);
  74         if (display)
  75             addGgfxDisplay(display, tn);
  76     }
  77 }
  78
  79 BOOL gfxValid(OOP_Object *obj, ULONG *flags)
  80 {
  81     if (OOP_OCLASS(obj) == OOP_FindClass(CLID_Hidd_Gfx))
  82     {
  83         ULONG _flags = *flags;
  84         _flags &= ~ TNF_LIST;
  85         *flags = _flags;
  86     }
  87     return TRUE;
  88 }
  89
  90 BOOL gfxenum_init(void)
  91 {
  92     D(bug("[SysExplorer:Gfx] Initialising..\n"));
  93
  94     OOP_ObtainAttrBases(gfx_abd);
  95     RegisterClassHandler(CLID_Hidd_Gfx, 60, &GfxWindow_CLASS, gfxEnum, gfxValid);
  96
  97     return TRUE;
  98 }
  99
 100 ADD2INIT(gfxenum_init, 10);