arch/ppc-chrp/battclock/writebattclock.c

   1 /*
   2     Copyright � 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id: writebattclock.c 26020 2007-05-07 19:49:07Z verhaegs $
   4
   5     Desc: WriteBattClock()
   6     Lang: english
   7 */
   8 #include "battclock_intern.h"
   9
  10 static int rtas_call(const char *method, int nargs, int nret, void *output, ...);
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/battclock.h>
  16 #include <proto/utility.h>
  17 #include <proto/rtas.h>
  18 #include <proto/exec.h>
  19 #include <utility/date.h>
  20 #include <stdarg.h>
  21
  22         AROS_LH1(void, WriteBattClock,
  23
  24 /*  SYNOPSIS */
  25         AROS_LHA(ULONG, time, D0),
  26
  27 /*  LOCATION */
  28         APTR *, BattClockBase, 3, Battclock)
  29
  30 /*  FUNCTION
  31         Set the systems battery backed up clock to the time specified. The
  32         value should be the number of seconds since 00:00:00 on 1.1.1978.
  33
  34     INPUTS
  35         time    -   The number of seconds elapsed since 00:00:00 1.1.1978
  36
  37     RESULT
  38         The clock will be set.
  39
  40     NOTES
  41         This may not do anything on some systems where the battery backed
  42         up clock either doesn't exist, or may not be writable.
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49         ReadBattClock, ResetBattClock
  50
  51     INTERNALS
  52
  53     HISTORY
  54         27-11-96    digulla automatically created from
  55                             battclock_lib.fd and clib/battclock_protos.h
  56
  57 *****************************************************************************/
  58 {
  59     AROS_LIBFUNC_INIT
  60
  61     struct ClockData date;
  62     ULONG out[8];
  63
  64     Amiga2Date(time, &date);
  65
  66     rtas_call("set-time-of-day", 7, 1, NULL, (ULONG)date.year, (ULONG)date.month, (ULONG)date.mday, (ULONG)date.hour, (ULONG)date.min, (ULONG)date.sec, 0);
  67
  68     AROS_LIBFUNC_EXIT
  69 } /* WriteBattClock */
  70
  71 static int rtas_call(const char *method, int nargs, int nret, void *output, ...)
  72 {
  73         va_list args;
  74         void *RTASBase = OpenResource("rtas.resource");
  75         int retval;
  76
  77         va_start(args, output);
  78         retval = RTASCall(method, nargs, nret, output, args);
  79         va_end(args);
  80
  81         return retval;
  82 }