workbench/hidds/graphics/sync.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Sync info class
   6     Lang: English.
   7 */
   8
   9 /****************************************************************************************/
  10
  11 #include <proto/oop.h>
  12 #include <proto/utility.h>
  13 #include <exec/memory.h>
  14 #include <oop/oop.h>
  15 #include <utility/tagitem.h>
  16 #include <hidd/graphics.h>
  17
  18 #define DEBUG 0
  19 #include <aros/debug.h>
  20
  21 #include "graphics_intern.h"
  22
  23 /****************************************************************************************/
  24
  25 OOP_Object *Sync__Root__New(OOP_Class *cl, OOP_Object *o, struct pRoot_New *msg)
  26 {
  27     struct sync_data    *data;
  28     BOOL                ok = FALSE;
  29
  30     DECLARE_ATTRCHECK(sync);
  31
  32     EnterFunc(bug("Sync::New()\n"));
  33
  34     /* Get object from superclass */
  35     o = (OOP_Object *)OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
  36     if (NULL == o)
  37         return NULL;
  38
  39     /* If we got a NULL attrlist we just allocate an empty object an exit */
  40     if (NULL == msg->attrList)
  41         return o;
  42
  43     data = OOP_INST_DATA(cl, o);
  44
  45     if (!parse_sync_tags(msg->attrList, data, ATTRCHECK(sync), CSD(cl) ))
  46     {
  47         D(bug("!!! ERROR PARSING SYNC ATTRS IN Sync::New() !!!\n"));
  48     }
  49     else
  50     {
  51         ok = TRUE;
  52     }
  53
  54     if (!ok)
  55     {
  56         OOP_MethodID dispose_mid;
  57
  58         dispose_mid = OOP_GetMethodID(IID_Root, moRoot_Dispose);
  59         OOP_CoerceMethod(cl, o, (OOP_Msg)&dispose_mid);
  60         o = NULL;
  61     }
  62
  63     return o;
  64 }
  65
  66 /****************************************************************************************/
  67
  68 VOID Sync__Root__Get(OOP_Class *cl, OOP_Object *o, struct pRoot_Get *msg)
  69 {
  70     struct sync_data    *data;
  71     ULONG               idx;
  72
  73     data = OOP_INST_DATA(cl, o);
  74
  75     if (IS_SYNC_ATTR(msg->attrID, idx))
  76     {
  77         switch (idx)
  78         {
  79             case aoHidd_Sync_PixelTime:
  80                 *msg->storage = (IPTR)data->pixtime;
  81                 break;
  82
  83             case aoHidd_Sync_PixelClock:
  84             {
  85             #if AROS_NOFPU
  86                 #warning Find code for non-FPU!
  87                 *msg->storage = (ULONG)0x12345678;
  88             #else
  89                 DOUBLE pixtime, pixclock;
  90
  91                 pixtime = (DOUBLE)data->pixtime;
  92
  93                 pixtime /= 1000000000000;       /* pixtime is in 10E-12 secs */
  94                 pixclock = 1 / pixtime;         /* convert to Hz */
  95                 *msg->storage = (ULONG)pixclock;
  96             #endif
  97                 break;
  98             }
  99
 100             case aoHidd_Sync_LeftMargin:
 101                 *msg->storage = (IPTR)data->left_margin;
 102                 break;
 103
 104             case aoHidd_Sync_RightMargin:
 105                 *msg->storage = (IPTR)data->right_margin;
 106                 break;
 107
 108             case aoHidd_Sync_HSyncLength:
 109                 *msg->storage = (IPTR)data->hsync_length;
 110                 break;
 111
 112             case aoHidd_Sync_UpperMargin:
 113                 *msg->storage = (IPTR)data->upper_margin;
 114                 break;
 115
 116             case aoHidd_Sync_LowerMargin:
 117                 *msg->storage = (IPTR)data->lower_margin;
 118                 break;
 119
 120             case aoHidd_Sync_VSyncLength:
 121                 *msg->storage = (IPTR)data->vsync_length;
 122                 break;
 123
 124             case aoHidd_Sync_HDisp:
 125                 *msg->storage = (IPTR)data->hdisp;
 126                 break;
 127
 128             case aoHidd_Sync_VDisp:
 129                 *msg->storage = (IPTR)data->vdisp;
 130                 break;
 131
 132             case aoHidd_Sync_HSyncStart:
 133                 *msg->storage = (IPTR)(data->hdisp + data->right_margin);
 134                 break;
 135
 136             case aoHidd_Sync_HSyncEnd:
 137                 *msg->storage = (IPTR)(data->hdisp + data->right_margin + data->hsync_length);
 138                 break;
 139
 140             case aoHidd_Sync_HTotal:
 141                 *msg->storage = (IPTR)(data->hdisp + data->right_margin + data->hsync_length + data->left_margin);
 142                 break;
 143
 144             case aoHidd_Sync_VSyncStart:
 145                 *msg->storage = (IPTR)(data->vdisp + data->lower_margin);
 146                 break;
 147
 148             case aoHidd_Sync_VSyncEnd:
 149                 *msg->storage = (IPTR)(data->vdisp + data->lower_margin + data->vsync_length);
 150                 break;
 151
 152             case aoHidd_Sync_VTotal:
 153                 *msg->storage = (IPTR)(data->vdisp + data->lower_margin + data->vsync_length + data->upper_margin);
 154                 break;
 155
 156             case aoHidd_Sync_Description:
 157                 *msg->storage = (IPTR)data->description;
 158                 break;
 159
 160             default:
 161                 D(bug("!!! TRYING TO GET UNKNOWN ATTR FROM SYNC OBJECT !!!\n"));
 162                 OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
 163                 break;
 164
 165         }
 166
 167     }
 168     else
 169     {
 170         OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
 171     }
 172
 173     return;
 174
 175 }
 176
 177 /****************************************************************************************/