workbench/libs/camd/getsysex.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_LH3(ULONG, GetSysEx,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct MidiNode *, midinode, A0),
  23         AROS_LHA(UBYTE *, Buf, A1),
  24         AROS_LHA(ULONG, len, D0),
  25
  26 /*  LOCATION */
  27         struct CamdBase *, CamdBase, 27, Camd)
  28
  29 /*  FUNCTION
  30                 Remind me to fill in things here later.
  31
  32     INPUTS
  33
  34     RESULT
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41                 Not tested. SysEx receiving does probably have some bugs.
  42
  43     SEE ALSO
  44                 SkipSysEx, QuierySysEx
  45
  46     INTERNALS
  47
  48     HISTORY
  49
  50         2001-01-12 ksvalast first created
  51
  52 *****************************************************************************/
  53 {
  54     AROS_LIBFUNC_INIT
  55
  56         struct MyMidiNode *mymidinode=(struct MyMidiNode *)midinode;
  57         ULONG numread=0;
  58         UBYTE data;
  59
  60         if(mymidinode->sysex_nextis0==TRUE) return 0;
  61
  62         ObtainSemaphore(&mymidinode->sysexsemaphore2);
  63
  64                 mymidinode->sysex_nextis0=FALSE;
  65
  66                 while(numread<len){
  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                         Buf[numread]=data;
  73                         numread++;
  74
  75                         if(data==0xf7){
  76                                 mymidinode->sysex_nextis0=TRUE;
  77                                 break;
  78                         }
  79                 }
  80
  81         ReleaseSemaphore(&mymidinode->sysexsemaphore2);
  82
  83
  84         return numread;
  85
  86
  87    AROS_LIBFUNC_EXIT
  88 }
  89
  90
  91