workbench/system/SysMon/video.c

   1 /*
   2     Copyright © 1995-2019, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include "sysmon_intern.h"
   7
   8 #include <clib/alib_protos.h>
   9
  10 /* Video information */
  11 #include <proto/graphics.h>
  12 #include <proto/oop.h>
  13 #include <hidd/gfx.h>
  14 OOP_Object * gfxhidd;
  15 #undef HiddBitMapAttrBase
  16 OOP_AttrBase HiddGfxAttrBase;
  17 OOP_AttrBase HiddBitMapAttrBase;
  18 struct Library * OOPBase = NULL;
  19
  20 /* Videofunctions */
  21 static BOOL InitVideo(struct SysMonData *smdata)
  22 {
  23     struct OOP_ABDescr attrbases[] =
  24     {
  25         { IID_Hidd_Gfx,         &HiddGfxAttrBase        },
  26         { IID_Hidd_BitMap,      &HiddBitMapAttrBase     },
  27         { NULL,                 NULL                    }
  28     };
  29     struct Screen * wbscreen;
  30
  31     OOPBase = OpenLibrary("oop.library", 0L);
  32
  33     if (!OOPBase)
  34         return FALSE;
  35
  36     if (!OOP_ObtainAttrBases(attrbases))
  37         return FALSE;
  38
  39     wbscreen = LockPubScreen(NULL);
  40     OOP_GetAttr(HIDD_BM_OBJ(wbscreen->RastPort.BitMap), aHidd_BitMap_GfxHidd, (APTR)&gfxhidd);
  41     bug("[SysMon:Video] %s: gfxhidd @ 0x%p\n", __func__, gfxhidd);
  42     UnlockPubScreen(NULL, wbscreen);
  43
  44     return TRUE;
  45 }
  46
  47 static VOID DeInitVideo(struct SysMonData *smdata)
  48 {
  49     OOP_ReleaseAttrBase(IID_Hidd_BitMap);
  50
  51     CloseLibrary(OOPBase);
  52 }
  53
  54 VOID UpdateVideoStaticInformation(struct SysMonData * smdata)
  55 {
  56     TEXT buffer[64] = {0};
  57     struct TagItem memTags[] =
  58     {
  59         {vHidd_Gfx_MemTotal,            0       },
  60         {vHidd_Gfx_MemAddressableTotal, 0       },
  61         {TAG_DONE,                      0       }
  62     };
  63
  64     bug("[SysMon:Video] %s: memTags @ 0x%p\n", __func__, memTags);
  65     OOP_GetAttr(gfxhidd, aHidd_Gfx_MemoryAttribs, (IPTR *)memTags);
  66
  67     __sprintf(buffer, "%ld kB", (ULONG)(memTags[0].ti_Data / 1024));
  68     set(smdata->memorysize[MEMORY_VMEM], MUIA_Text_Contents, buffer);
  69     __sprintf(buffer, "%ld kB", (ULONG)(memTags[1].ti_Data / 1024));
  70     set(smdata->memorysize[MEMORY_VMEMWINDOW], MUIA_Text_Contents, buffer);
  71 }
  72
  73 VOID UpdateVideoInformation(struct SysMonData * smdata)
  74 {
  75     TEXT buffer[64] = {0};
  76     struct TagItem memTags[] =
  77     {
  78         {vHidd_Gfx_MemFree,             0       },
  79         {vHidd_Gfx_MemAddressableFree,  0       },
  80         {TAG_DONE,                      0       }
  81     };
  82
  83     bug("[SysMon:Video] %s: memTags @ 0x%p\n", __func__, memTags);
  84     OOP_GetAttr(gfxhidd, aHidd_Gfx_MemoryAttribs, (IPTR *)memTags);
  85
  86     __sprintf(buffer, "%ld kB", (ULONG)(memTags[0].ti_Data / 1024));
  87     set(smdata->memoryfree[MEMORY_VMEM], MUIA_Text_Contents, buffer);
  88     __sprintf(buffer, "%ld kB", (ULONG)(memTags[1].ti_Data / 1024));
  89     set(smdata->memoryfree[MEMORY_VMEMWINDOW], MUIA_Text_Contents, buffer);
  90 }
  91
  92 struct SysMonModule videomodule =
  93 {
  94     .Init = InitVideo,
  95     .DeInit = DeInitVideo,
  96 };