rom/exec/replymsg.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Reply a message
   6     Lang: english
   7 */
   8
   9 #include <aros/libcall.h>
  10 #include <exec/ports.h>
  11 #include <proto/exec.h>
  12
  13 #include "exec_intern.h"
  14 #include "exec_util.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19
  20         AROS_LH1(void, ReplyMsg,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(struct Message *, message, A1),
  24
  25 /*  LOCATION */
  26         struct ExecBase *, SysBase, 63, Exec)
  27
  28 /*  FUNCTION
  29         Send a message back to where it came from. It's generally not
  30         wise to access the fields of a message after it has been replied.
  31
  32     INPUTS
  33         message - a message got with GetMsg().
  34
  35     RESULT
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44         WaitPort(), GetMsg(), PutMsg()
  45
  46     INTERNALS
  47
  48 ******************************************************************************/
  49 {
  50     AROS_LIBFUNC_INIT
  51
  52     struct MsgPort *port;
  53
  54     /* handle FASTCALL before doing locking or anything else. yes, there's a
  55      * potential race here if some task was to change mn_ReplyPort before/as
  56      * we read it. thats why we fetch it again further down, after Disable().
  57      * all bets are of when using FASTCALL */
  58     port = message->mn_ReplyPort;
  59
  60     if (port != NULL && port->mp_Flags & PA_FASTCALL)
  61     {
  62         FastPutMsg(port, message, SysBase);
  63         return;
  64     }
  65
  66     /* Protect the message against access by other tasks. */
  67     Disable();
  68
  69     /* Get replyport */
  70     port=message->mn_ReplyPort;
  71
  72     /* Not set? Only mark the message as no longer sent. */
  73     if(port==NULL)
  74         message->mn_Node.ln_Type=NT_FREEMSG;
  75     else
  76     {
  77         /* Mark the message as replied */
  78         message->mn_Node.ln_Type=NT_REPLYMSG;
  79
  80         InternalPutMsg(port, message, SysBase);
  81     }
  82
  83     /* All done */
  84     Enable();
  85     AROS_LIBFUNC_EXIT
  86 } /* ReplyMsg() */
  87