arch/all-unix/hidd/serial/SerialClass.c

   1 /*
   2     Copyright © 1995-2005, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Serial hidd class implementation.
   6     Lang: english
   7 */
   8
   9 #include <proto/exec.h>
  10 #include <proto/utility.h>
  11 #include <proto/oop.h>
  12 #include <exec/libraries.h>
  13
  14 #include <utility/tagitem.h>
  15 #include <hidd/serial.h>
  16
  17
  18 #include "serial_intern.h"
  19
  20 #undef  SDEBUG
  21 #undef  DEBUG
  22 #define SDEBUG 0
  23 #define DEBUG 0
  24 #include <aros/debug.h>
  25
  26
  27
  28 /*** HIDDSerial::NewUnit() *********************************************************/
  29
  30 OOP_Object *UXSer__Hidd_Serial__NewUnit(OOP_Class *cl, OOP_Object *obj,
  31                                         struct pHidd_Serial_NewUnit *msg)
  32 {
  33   OOP_Object *su = NULL;
  34   struct HIDDSerialData * data = OOP_INST_DATA(cl, obj);
  35   ULONG unitnum = -1;
  36
  37   EnterFunc(bug("HIDDSerial::NewSerial()\n"));
  38
  39   D(bug("Request for unit number %d\n",msg->unitnum));
  40
  41   switch (msg->unitnum)
  42   {
  43     case 0:
  44     case 1:
  45     case 2:
  46     case 3:
  47       unitnum = msg->unitnum;
  48       if (0 != (data->usedunits & (1 << unitnum)))
  49         unitnum = -1;
  50     break;
  51
  52     case -1: /* search for the next available unit */
  53     {
  54       unitnum = 0;
  55       while (unitnum < SER_MAX_UNITS)
  56       {
  57         if (0 == (data->usedunits & (1 << unitnum)))
  58           break;
  59         unitnum++;
  60       }
  61     }
  62     break;
  63
  64
  65   }
  66
  67   if (unitnum >= 0 && unitnum < SER_MAX_UNITS)
  68   {
  69     struct TagItem tags[] =
  70     {
  71 #define csd CSD(cl)
  72         {aHidd_SerialUnit_Unit, unitnum},
  73 #undef csd
  74         {TAG_DONE                      }
  75     };
  76
  77     su = OOP_NewObject(NULL, CLID_Hidd_SerialUnit, tags);
  78     data->SerialUnits[unitnum] = su;
  79     /*
  80     ** Mark it as used
  81     */
  82     data->usedunits |= (1 << unitnum);
  83   }
  84
  85   ReturnPtr("HIDDSerial::NewSerial", OOP_Object *, su);
  86 }
  87
  88
  89 /*** HIDDSerial::DisposeUnit() ****************************************************/
  90
  91 VOID UXSer__Hidd_Serial__DisposeUnit(OOP_Class *cl, OOP_Object *obj,
  92                                      struct pHidd_Serial_DisposeUnit *msg)
  93 {
  94     OOP_Object * su = msg->unit;
  95     struct HIDDSerialData * data = OOP_INST_DATA(cl, obj);
  96
  97     EnterFunc(bug("HIDDSerial::DisposeUnit()\n"));
  98
  99     if(su)
 100     {
 101         ULONG unitnum = 0;
 102
 103         while (unitnum < SER_MAX_UNITS)
 104         {
 105             if (data->SerialUnits[unitnum] == su)
 106             {
 107                 D(bug("Disposing SerialUnit!\n"));
 108                 OOP_DisposeObject(su);
 109                 data->SerialUnits[unitnum] = NULL;
 110                 data->usedunits &= ~(1 << unitnum);
 111                 break;
 112             }
 113
 114             unitnum++;
 115         }
 116
 117     }
 118
 119     ReturnVoid("HIDDSerial::DisposeUnit");
 120 }