workbench/classes/zune/clock/clock_init.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/types.h>
   7 #include <exec/libraries.h>
   8 #include <dos/dosextens.h>
   9 #include <aros/libcall.h>
  10 #include <aros/debug.h>
  11
  12 #include <proto/exec.h>
  13 #include <proto/timer.h>
  14
  15 #include <aros/symbolsets.h>
  16 #include LC_LIBDEFS_FILE
  17
  18 #include <utility/date.h>
  19
  20
  21 /*** Variables **************************************************************/
  22 struct Device      *TimerBase;
  23 struct timerequest *TimerIO;
  24
  25 /*** Library startup and shutdown *******************************************/
  26 static int Clock_Startup(LIBBASETYPEPTR LIBBASE)
  27 {
  28     TimerIO   = NULL;
  29     TimerBase = NULL;
  30
  31     TimerIO = AllocMem(sizeof(struct timerequest), MEMF_CLEAR);
  32     if(TimerIO == NULL) goto error;
  33
  34     TimerIO->tr_node.io_Message.mn_Length = sizeof(struct timerequest);
  35
  36     if
  37     (
  38         0 == OpenDevice
  39         (
  40             "timer.device", UNIT_VBLANK, (struct IORequest *) TimerIO, 0
  41         )
  42     )
  43     {
  44         TimerBase = (struct Device *) TimerIO->tr_node.io_Device;
  45     }
  46     else
  47     {
  48         goto error;
  49     }
  50
  51     return TRUE;
  52
  53 error:
  54     if (TimerBase != NULL) CloseDevice((struct IORequest *) TimerIO);
  55     if (TimerIO != NULL) FreeMem(TimerIO, sizeof(struct timerequest));
  56
  57     return FALSE;
  58 }
  59
  60 static int Clock_Shutdown(LIBBASETYPEPTR LIBBASE)
  61 {
  62     if (TimerBase != NULL) CloseDevice((struct IORequest *) TimerIO);
  63     if (TimerIO != NULL) FreeMem(TimerIO, sizeof( struct timerequest ));
  64     return TRUE;
  65 }
  66
  67 ADD2INITLIB(Clock_Startup, 1);
  68 ADD2EXPUNGELIB(Clock_Shutdown, 1);