compiler/alib/timedelay.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: TimeDelay() - wait a specified time.
   6     Lang: english
   7 */
   8
   9
  10 #include <exec/types.h>
  11 #include <aros/asmcall.h>
  12 #include <devices/timer.h>
  13 #include <exec/tasks.h>
  14 #include <proto/exec.h>
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19         LONG TimeDelay(
  20
  21 /*  SYNOPSIS */
  22         LONG Unit,
  23         ULONG Seconds,
  24         ULONG MicroSeconds)
  25
  26 /*  FUNCTION
  27         TimeDelay() waits for the specified period of time before returning
  28         to the caller.
  29
  30     INPUTS
  31         Unit         -  The timer.device unit to use for this command.
  32         Seconds      -  The number of seconds to wait.
  33         MicroSeconds -  The number of microseconds to wait.
  34
  35     RESULT
  36         Zero if everything went ok, non-zero if there was a problem.
  37
  38     NOTES
  39         If this function fails, the most likely reasons are:
  40         - invalid timer.device unit numbers
  41
  42         This function uses the SIGF_SINGLE signal, strange things can
  43         happen if you are waiting on this signal when you call this
  44         function. Basically: Don't use it and call this function.
  45
  46     EXAMPLE
  47
  48     BUGS
  49
  50     SEE ALSO
  51         timer.device/TR_ADDREQUEST
  52
  53     INTERNALS
  54
  55     HISTORY
  56
  57 ******************************************************************************/
  58 {
  59     struct timerequest tr;
  60     struct MsgPort mp;
  61     UBYTE error = 0;
  62
  63     /* Create a message port */
  64     mp.mp_Node.ln_Type = NT_MSGPORT;
  65     mp.mp_Node.ln_Pri = 0;
  66     mp.mp_Node.ln_Name = NULL;
  67     mp.mp_Flags = PA_SIGNAL;
  68     mp.mp_SigTask = FindTask(NULL);
  69     mp.mp_SigBit = SIGB_SINGLE;
  70     NEWLIST(&mp.mp_MsgList);
  71
  72     tr.tr_node.io_Message.mn_Node.ln_Type = NT_MESSAGE;
  73     tr.tr_node.io_Message.mn_Node.ln_Pri = 0;
  74     tr.tr_node.io_Message.mn_Node.ln_Name = NULL;
  75     tr.tr_node.io_Message.mn_ReplyPort = &mp;
  76     tr.tr_node.io_Message.mn_Length = sizeof(struct timerequest);
  77
  78     SetSignal(0, SIGF_SINGLE);
  79
  80     if(OpenDevice("timer.device", Unit, (struct IORequest *)&tr, 0) == 0)
  81     {
  82         tr.tr_node.io_Command = TR_ADDREQUEST;
  83         tr.tr_node.io_Flags = 0;
  84         tr.tr_time.tv_secs = Seconds;
  85         tr.tr_time.tv_micro = MicroSeconds;
  86
  87         DoIO((struct IORequest *)&tr);
  88
  89         CloseDevice((struct IORequest *)&tr);
  90         error = 1;
  91     }
  92
  93     return error;
  94
  95 } /* TimeDelay() */