arch/m68k-amiga/hidd/parallel/ParallelClass.c

   1 /*
   2     Copyright © 1995-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Parallel hidd class implementation.
   6     Lang: english
   7 */
   8
   9 #define __OOP_NOATTRBASES__
  10
  11 #include <proto/exec.h>
  12 #include <proto/utility.h>
  13 #include <proto/oop.h>
  14 #include <exec/libraries.h>
  15
  16 #include <utility/tagitem.h>
  17 #include <hidd/parallel.h>
  18
  19
  20 #include "parallel_intern.h"
  21
  22 #include <aros/debug.h>
  23
  24
  25 /*static AttrBase HiddGCAttrBase;*/
  26
  27 static OOP_AttrBase HiddParallelUnitAB;
  28
  29 /*** HIDDParallel::NewUnit() *********************************************************/
  30
  31
  32 OOP_Object *AmigaPar__Hidd_Parallel__NewUnit(OOP_Class *cl, OOP_Object *obj,
  33                                           struct pHidd_Parallel_NewUnit *msg)
  34 {
  35         OOP_Object *su = NULL;
  36         struct HIDDParallelData * data = OOP_INST_DATA(cl, obj);
  37         ULONG unitnum = -1;
  38
  39         EnterFunc(bug("HIDDParallel::NewParallel()\n"));
  40
  41         D(bug("Request for unit number %d\n",msg->unitnum));
  42
  43         if (msg->unitnum >= 0 && msg->unitnum < PAR_MAX_UNITS) {
  44             unitnum = msg->unitnum;
  45
  46             if (0 != (data->usedunits & (1 << unitnum))) {
  47                 unitnum = -1;
  48             }
  49         } else if (msg->unitnum == -1) {
  50                 /* search for the next available unit */
  51                 unitnum = 0;
  52
  53                 while (unitnum < PAR_MAX_UNITS) {
  54                         if (0 == (data->usedunits & (1 << unitnum))) {
  55                                 break;
  56                         }
  57
  58                         unitnum++;
  59                 }
  60         }
  61
  62         if (unitnum >= 0 && unitnum < PAR_MAX_UNITS) {
  63                 struct TagItem tags[] =
  64                 {
  65                         {aHidd_ParallelUnit_Unit, unitnum},
  66                         {TAG_DONE                      }
  67                 };
  68
  69                 su = OOP_NewObject(NULL, CLID_Hidd_ParallelUnit, tags);
  70                 data->ParallelUnits[unitnum] = su;
  71
  72                 /*
  73                 ** Mark it as used
  74                 */
  75                 data->usedunits |= (1 << unitnum);
  76         }
  77
  78         ReturnPtr("HIDDParallel::NewParallel", OOP_Object *, su);
  79 }
  80
  81
  82 /*** HIDDParallel::DisposeUnit() ****************************************************/
  83
  84 VOID AmigaPar__Hidd_Parallel__DisposeUnit(OOP_Class *cl, OOP_Object *obj,
  85                                        struct pHidd_Parallel_DisposeUnit *msg)
  86 {
  87         OOP_Object * pu = msg->unit;
  88         struct HIDDParallelData * data = OOP_INST_DATA(cl, obj);
  89
  90         EnterFunc(bug("HIDDParallel::DisposeUnit()\n"));
  91
  92         if(pu) {
  93                 ULONG unitnum = 0;
  94
  95                 while (unitnum < PAR_MAX_UNITS) {
  96                         if (data->ParallelUnits[unitnum] == pu) {
  97                                 D(bug("Disposing ParallelUnit!\n"));
  98                                 OOP_DisposeObject(pu);
  99                                 data->ParallelUnits[unitnum] = NULL;
 100                                 data->usedunits &= ~(1 << unitnum);
 101                                 break;
 102                         }
 103
 104                         unitnum++;
 105                 }
 106         }
 107
 108         ReturnVoid("HIDDParallel::DisposeUnit");
 109 }