rom/dos/replypkt.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10
  11 #include <proto/exec.h>
  12
  13 #include "dos_intern.h"
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <dos/dosextens.h>
  19 #include <proto/dos.h>
  20
  21         AROS_LH3(void, ReplyPkt,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(struct DosPacket *, dp, D1),
  25         AROS_LHA(SIPTR             , res1, D2),
  26         AROS_LHA(LONG              , res2, D3),
  27
  28 /*  LOCATION */
  29         struct DosLibrary *, DOSBase, 43, Dos)
  30
  31 /*  FUNCTION
  32
  33     INPUTS
  34
  35     RESULT
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct Process *me = (struct Process *)FindTask(NULL);
  52
  53     ASSERT_VALID_PROCESS(me);
  54
  55     internal_ReplyPkt(dp, &me->pr_MsgPort, res1, res2);
  56
  57     AROS_LIBFUNC_EXIT
  58 } /* ReplyPkt */
  59
  60 void internal_ReplyPkt(struct DosPacket *dp, struct MsgPort *replyPort, SIPTR res1, LONG res2)
  61 {
  62     struct MsgPort *mp;
  63     struct Message *mn;
  64
  65     mp = dp->dp_Port;
  66     mn = dp->dp_Link;
  67     mn->mn_Node.ln_Name = (char*)dp;
  68     dp->dp_Port = replyPort;
  69     dp->dp_Res1 = res1;
  70     dp->dp_Res2 = res2;
  71
  72     /*
  73      * Can't use ReplyMsg() here because mn_ReplyPort seems to be not set.
  74      * Tested with SFS.
  75      */
  76     PutMsg(mp, mn);
  77 }