arch/m68k-amiga/hidd/keyboard/kbd_init.c

   1 /*
   2     Copyright © 1995-2019, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define DEBUG 0
   7 #include <aros/debug.h>
   8
   9 #include <aros/symbolsets.h>
  10 #include <proto/oop.h>
  11
  12 #include <hidd/hidd.h>
  13 #include <hidd/keyboard.h>
  14
  15 #include "kbd.h"
  16
  17 #undef XSD
  18 #define XSD(cl)         ksd
  19
  20 static int AmigaKbd_Init(struct kbdbase *LIBBASE)
  21 {
  22     struct kbd_staticdata *ksd = &LIBBASE->ksd;
  23     struct OOP_ABDescr attrbases[] =
  24     {
  25         {IID_Hidd       , &HiddAttrBase   },
  26         {IID_Hidd_Kbd   , &HiddKbdAB   },
  27         {NULL           , NULL              }
  28     };
  29     OOP_Object *kbd;
  30     OOP_Object *drv = NULL;
  31
  32     EnterFunc(bug("AmigaKbd_Init\n"));
  33
  34     InitSemaphore( &ksd->sema );
  35
  36     kbd = OOP_NewObject(NULL, CLID_Hidd_Kbd, NULL);
  37     if (kbd) {
  38         if (OOP_ObtainAttrBases(attrbases))
  39         {
  40             HiddKbdBase = OOP_GetMethodID(IID_Hidd_Kbd, 0);
  41             drv = HIDD_Kbd_AddHardwareDriver(kbd, LIBBASE->ksd.kbdclass, NULL);
  42         }
  43         OOP_DisposeObject(kbd);
  44     }
  45
  46     if (!drv)
  47         return FALSE;
  48
  49     LIBBASE->library.lib_OpenCnt = 1;
  50
  51     ReturnInt("AmigaKbd_Init", int, TRUE);
  52 }
  53
  54 static int AmigaKbd_Expunge(struct kbdbase *LIBBASE)
  55 {
  56     struct kbd_staticdata *ksd = &LIBBASE->ksd;
  57     struct OOP_ABDescr attrbases[] =
  58     {
  59         {IID_Hidd_Kbd   , &LIBBASE->ksd.hiddKbdAB   },
  60         {NULL           , NULL              }
  61     };
  62
  63     EnterFunc(bug("AmigaKbd_Expunge\n"));
  64
  65     OOP_ReleaseAttrBases(attrbases);
  66
  67     ReturnInt("AmigaKbd_Expunge", int, TRUE);
  68 }
  69
  70 ADD2INITLIB(AmigaKbd_Init, 0)
  71 ADD2EXPUNGELIB(AmigaKbd_Expunge, 0)