arch/.unmaintained/m68k-pp-native/battclock/battclock_init.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Battery-backed up clock initialisation.
   6     Lang: english
   7 */
   8
   9 #include <exec/types.h>
  10 #include <exec/memory.h>
  11 #include <exec/resident.h>
  12 #include <utility/utility.h>
  13 #include <proto/exec.h>
  14 #include <proto/battclock.h>
  15
  16 #include <aros/asmcall.h>
  17 #include "battclock_intern.h"
  18 #include "libdefs.h"
  19
  20 #ifdef SysBase
  21 #undef SysBase
  22 #endif
  23
  24 static const UBYTE name[];
  25 static const UBYTE version[];
  26 static const void * const LIBFUNCTABLE[];
  27 extern const char LIBEND;
  28
  29 struct BattClockBase *AROS_SLIB_ENTRY(init, BASENAME)();
  30
  31 extern void AROS_SLIB_ENTRY(ReadBattClock,BASENAME)();
  32 extern void AROS_SLIB_ENTRY(ResetBattClock,BASENAME)();
  33 extern void AROS_SLIB_ENTRY(WriteBattClock,BASENAME)();
  34
  35 int Battclock_entry(void)
  36 {
  37     return -1;
  38 }
  39
  40 const struct Resident Battclock_resident __attribute__((section(".text"))) =
  41 {
  42     RTC_MATCHWORD,
  43     (struct Resident *)&Battclock_resident,
  44     (APTR)&LIBEND,
  45     RTF_COLDSTART,
  46     41,
  47     NT_RESOURCE,
  48     45,
  49     (UBYTE *)name,
  50     (UBYTE *)&version[6],
  51     (ULONG *)&AROS_SLIB_ENTRY(init,BASENAME)
  52 };
  53
  54 static const UBYTE name[] = NAME_STRING;
  55 static const UBYTE version[] = VERSION_STRING;
  56
  57 static const void * const LIBFUNCTABLE[] =
  58 {
  59     &AROS_SLIB_ENTRY(ResetBattClock,BASENAME),
  60     &AROS_SLIB_ENTRY(ReadBattClock,BASENAME),
  61     &AROS_SLIB_ENTRY(WriteBattClock,BASENAME),
  62     (void *)-1
  63 };
  64
  65 AROS_UFH3(struct BattClockBase *, AROS_SLIB_ENTRY(init,BASENAME),
  66     AROS_UFHA(ULONG,    dummy,  D0),
  67     AROS_UFHA(ULONG,    slist,  A0),
  68     AROS_UFHA(struct ExecBase *, SysBase, A6)
  69 )
  70 {
  71     UWORD neg = AROS_ALIGN(LIB_VECTSIZE * 3);
  72     struct BattClockBase * BattClockBase = NULL;
  73
  74     BattClockBase = (struct BattClockBase *)(((UBYTE *)
  75         AllocMem( neg + sizeof(struct BattClockBase),
  76                     MEMF_CLEAR | MEMF_PUBLIC)) + neg);
  77
  78     if( BattClockBase )
  79     {
  80         BattClockBase->bb_SysBase = SysBase;
  81         BattClockBase->bb_UtilBase = OpenLibrary("utility.library",0);
  82         BattClockBase->bb_Node.ln_Pri = 0;
  83         BattClockBase->bb_Node.ln_Type = NT_RESOURCE;
  84         BattClockBase->bb_Node.ln_Name = (STRPTR)name;
  85
  86         MakeFunctions(BattClockBase, (APTR)LIBFUNCTABLE, NULL);
  87         AddResource(BattClockBase);
  88     }
  89     return BattClockBase;
  90 }