workbench/libs/camd/flushmidi.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9
  10 #include <proto/exec.h>
  11
  12 #include "camd_intern.h"
  13
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18
  19         AROS_LH1(void, FlushMidi,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct MidiNode *, midinode, A0),
  23
  24 /*  LOCATION */
  25         struct CamdBase *, CamdBase, 13, Camd)
  26
  27 /*  FUNCTION
  28                 Remind me to fill in things here later.
  29
  30     INPUTS
  31
  32     RESULT
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39                 Not tested.
  40
  41     SEE ALSO
  42                 GetMidi(), GetSysEx()
  43
  44     INTERNALS
  45
  46     HISTORY
  47
  48         2001-01-12 ksvalast first created
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53
  54         struct MyMidiNode *mymidinode=(struct MyMidiNode *)midinode;
  55
  56         ObtainSemaphore(CB(CamdBase)->CLSemaphore);
  57         ObtainSemaphore(&mymidinode->receiversemaphore);
  58                 mymidinode->unpicked=0;
  59                 mymidinode->in_curr=mymidinode->in_start;
  60                 mymidinode->in_curr_get=mymidinode->in_start;
  61                 mymidinode->error=0;
  62         ReleaseSemaphore(&mymidinode->receiversemaphore);
  63         ReleaseSemaphore(CB(CamdBase)->CLSemaphore);
  64
  65         ObtainSemaphore(&mymidinode->sysexsemaphore2);
  66         ObtainSemaphore(&mymidinode->sysexsemaphore);
  67                         mymidinode->sysex_read=mymidinode->sysex_start;
  68                         mymidinode->sysex_write=mymidinode->sysex_write;
  69                         mymidinode->sysex_laststart=mymidinode->sysex_write;
  70         ReleaseSemaphore(&mymidinode->sysexsemaphore);
  71         ReleaseSemaphore(&mymidinode->sysexsemaphore2);
  72
  73    AROS_LIBFUNC_EXIT
  74
  75 }
  76