workbench/libs/camd/skipsysex.c

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