workbench/libs/realtime/deleteplayer.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8 #include <proto/exec.h>
   9 #include <proto/utility.h>
  10 #include <proto/realtime.h>
  11
  12 #include "realtime_intern.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17
  18 #include <libraries/realtime.h>
  19
  20     AROS_LH1(VOID, DeletePlayer,
  21
  22 /*  SYNOPSIS */
  23
  24         AROS_LHA(struct Player *, player, A0),
  25
  26 /*  LOCATION */
  27
  28         struct Library *, RealTimeBase, 8, RealTime)
  29
  30 /*  FUNCTION
  31
  32     Delete a player. If this was the last player of a specific conductor,
  33     this conductor is deleted too.
  34
  35     INPUTS
  36
  37     player  --  Player to delete; may be NULL in which case this function
  38                 does nothing.
  39
  40     RESULT
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49
  50     CreatePlayerA()
  51
  52     INTERNALS
  53
  54     HISTORY
  55
  56     26.7.99  SDuvan  implemented
  57
  58 ******************************************************************************/
  59
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     struct Conductor *conductor;
  64
  65     if (player == NULL)
  66     {
  67         return;
  68     }
  69
  70     conductor = player->pl_Source;
  71
  72     if (conductor != NULL)
  73     {
  74         APTR lock;
  75
  76         lock = LockRealTime(RT_CONDUCTORS);
  77         Remove((struct Node *)player);
  78
  79         /* If this was the last player of this conductor, we delete the
  80            conductor, too. */
  81         if (IsListEmpty(&conductor->cdt_Players))
  82         {
  83             Remove((struct Node *)conductor);
  84             FreeMem(conductor, sizeof(struct Conductor));
  85         }
  86
  87         UnlockRealTime(lock);
  88     }
  89
  90     FreeMem(player, sizeof(struct Player));
  91
  92     AROS_LIBFUNC_EXIT
  93 } /* DeletePlayer */