workbench/classes/zune/calendar/calendar_init.c

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