Csound Csound-dev Csound-tekno Search About

Re: [Cs-dev] pre-release questions

Date2006-10-17 15:02
FromMichael Gogins
SubjectRe: [Cs-dev] pre-release questions
Simply omit the remote code from all but Linux builds. Is it a plugin? If it isn't, it should be. 

Developers, please, if you write code that only works on one platform, do not cause it to be built on other platforms. If you would like somebody to port your code to another platform, please ask. 

-----Original Message-----
>From: Anthony Kozar 
>Sent: Oct 17, 2006 12:45 AM
>To: New Csound Developer list 
>Subject: [Cs-dev] pre-release questions
>
>I've compiled the current contents of CVS on MacOS 9 but not without a few
>difficulties.  In addition, I have noticed a few other things that I am not
>sure are right.
>
>I've already mentioned in a previous email about the new function pointers
>in CSOUND and that they may need to be moved to the empty slots in the
>public section.
>
>Furthermore, I am guessing that the API minor version number now needs to be
>incremented (to 1.03?).
>
>And I have noticed a number of uses of the exit() function within the Csound
>library and the stdutil plugin.  Is it OK to call exit() from within Csound?
>Does this exit the host application or does it get "caught" somewhere before
>that?
>
>(exit() can be found in several of the import/export utilities and within
>the new remote event code in musmon.c).
>
>Finally, regarding the remote event code -- this assumes a Unix-like socket
>interface that does not exist on MacOS 9.  I could see no way to turn off
>this code so I had to conditionalize all of it with the preprocessor,
>sometimes on a line-by-line basis.  The result is kind of ugly so I have not
>committed the changes yet (the diffs are below).  I am open to better
>suggestions on how to turn this code off.
>
>Anthony Kozar
>anthonykozar AT sbcglobal DOT net
>
>
>--- csound5/H/sysdep.h    25 Jan 2006 22:10:26 -0000    1.39
>+++ csound5/H/sysdep.h    17 Oct 2006 04:39:46 -0000
>@@ -117,6 +117,7 @@
> #  endif
> #  define  O_NDELAY (0)
> #  define  DIRSEP ':'
>+#  define  NO_REMOTE
> #elif defined(SYMANTEC)
> #  include      /* for open() etc protos on mac */
> #  define  DIRSEP ':'
>
>
>--- csound5/H/csoundCore.h    14 Oct 2006 18:45:05 -0000    1.201
>+++ csound5/H/csoundCore.h    17 Oct 2006 04:39:45 -0000
>@@ -642,7 +642,10 @@
> #include "prototyp.h"
> #include "cwindow.h"
> #include "envvar.h"
>-#include "remote.h"
>+
>+#ifndef NO_REMOTE
>+#  include "remote.h"
>+#endif
> 
> #define CS_STATE_PRE    (1)
> #define CS_STATE_COMP   (2)
>@@ -1190,8 +1193,10 @@
>     int           (*doCsoundCallback)(CSOUND *, void *, unsigned int);
>     const unsigned char *strhash_tabl_8;
>     unsigned int  (*strHash32)(const char *s);
>+#ifndef NO_REMOTE
>     REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications buffer */
>     void          *remoteGlobals;
>+#endif
>     /* VL: pvs bus */
>     int            nchanif, nchanof;
>     char          *chanif, *chanof;
>
>
>--- csound5/Top/csound.c    14 Oct 2006 18:45:05 -0000    1.175
>+++ csound5/Top/csound.c    17 Oct 2006 04:39:43 -0000
>@@ -583,8 +583,10 @@
>         csoundDoCallback_,  /*  doCsoundCallback    */
>         &(strhash_tabl_8[0]),   /*  strhash_tabl_8  */
>         csound_str_hash_32, /*  strHash32           */
>+#ifndef NO_REMOTE
>         {0, 0, ""},     /* REMOT_BUF */
>         NULL,            /*  remoteGlobals       */
>+#endif
>         0, 0,           /* nchanof, nchanif */
>         NULL, NULL,     /*  chanif, chanof */
>         csoundPvsinSet,
>
>
>--- csound5/Engine/entry1.c    13 Oct 2006 11:08:16 -0000    1.89
>+++ csound5/Engine/entry1.c    17 Oct 2006 04:39:46 -0000
>@@ -89,10 +89,12 @@
> { "ctrlinit",S(CTLINIT),1,      "",     "im",   ctrlinit                },
> { "massign",S(MASSIGN), 1,      "",     "iTp",  massign                 },
> { "turnon", S(TURNON),  1,      "",     "To",   turnon                  },
>+#ifndef NO_REMOTE
> { "insremot",S(INSREMOT),1,     "",     "SSm",  insremot                },
> { "midremot",S(MIDREMOT),1,     "",     "SSm",  midremot                },
> { "insglobal",S(INSGLOBAL),1,   "",     "Sm",   insglobal               },
> { "midglobal",S(MIDGLOBAL),1,   "",     "Sm",   midglobal               },
>+#endif
> { "=",      0,          0,      "",     ""                              },
> { "init",   0xffff      /* base names for later prefixes,suffixes */    },
> { "betarand", 0xffff                                                    },
>
>
>--- csound5/H/entry1.h    12 Oct 2006 14:08:08 -0000    1.13
>+++ csound5/H/entry1.h    17 Oct 2006 04:39:45 -0000
>@@ -54,7 +54,9 @@
> #include "str_ops.h"
> #include "bus.h"
> #include "pstream.h"
>-#include "remote.h"
>+#ifndef NO_REMOTE
>+#  include "remote.h"
>+#endif
> 
> #define S(x)    sizeof(x)
> 
>
>--- csound5/Engine/musmon.c    14 Oct 2006 16:40:40 -0000    1.114
>+++ csound5/Engine/musmon.c    17 Oct 2006 04:39:47 -0000
>@@ -28,7 +28,9 @@
> #include "soundio.h"
> #include "namedins.h"
> #include "oload.h"
>-#include "remote.h"
>+#ifndef NO_REMOTE
>+#  include "remote.h"
>+#endif
> #include 
> 
> #define SEGAMPS 01
>@@ -416,7 +418,9 @@
>         csound->Message(csound, Str("no sound written to disk\n"));
>     }
>     /* close any remote.c sockets */
>+#ifndef NO_REMOTE
>     if (csound->remoteGlobals) remote_Cleanup(csound);
>+#endif
>     if (csound->oparms->ringbell)
>       cs_beep(csound);
>     return dispexit(csound);    /* hold or terminate the display output
>*/
>@@ -627,6 +631,7 @@
>                                     evt->strarg);
>           break;
>         }
>+#ifndef NO_REMOTE
>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>SR(insrfd)[insno])) {
>           /* RM: if this note labeled as remote */
>           if (rfd == GLOBAL_REMOT)
>@@ -636,6 +641,7 @@
>             break;                       /* RM: and quit */
>           }
>         }
>+#endif
>         evt->p[1] = (MYFLT) insno;
>         if (csound->oparms->Beatmode && !rtEvt && evt->p3orig > FL(0.0))
>           evt->p[3] = evt->p3orig * (MYFLT) csound->beatTime;
>@@ -654,6 +660,7 @@
>                           insno, csound->maxinsno);
>           break;
>         }
>+#ifndef NO_REMOTE
>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>SR(insrfd)[insno])) {
>           /* RM: if this note labeled as remote  */
>           if (rfd == GLOBAL_REMOT)
>@@ -663,6 +670,7 @@
>              break;                        /* RM: and quit              */
>           }
>         }
>+#endif
>         if (evt->p[1] < FL(0.0))           /* if p1 neg,             */
>           infoff(csound, -evt->p[1]);      /*  turnoff any infin cpy */
>         else {
>@@ -680,8 +688,10 @@
>       {
>         FUNC  *dummyftp;
>         csound->hfgens(csound, &dummyftp, evt, 0); /* construct locally */
>+#ifndef NO_REMOTE
>         if (csound->remoteGlobals && SR(insrfd_count))
>           insGlobevt(csound, evt); /* RM: & optionally send to all remotes
>*/
>+#endif
>       }
>       break;
>     case 'a':
>@@ -742,6 +752,7 @@
>       /* RM: Events are sorted on insertion, so just check the first */
>       evt = &(e->evt);
>       insno = (int)(evt->p[1]);
>+#ifndef NO_REMOTE
>       if (csound->remoteGlobals && SR(insrfd) && (rfd = SR(insrfd)[insno]))
>{
>         if (rfd == GLOBAL_REMOT)
>           insGlobevt(csound, evt);       /* RM: do a global send and allow
>local */
>@@ -749,6 +760,7 @@
>           insSendevt(csound, evt, rfd);  /* RM: or send to single remote
>Csound */
>         return 0;
>       }
>+#endif
>       /* pop from the list */
>       csound->OrcTrigEvts = e->nxt;
>       retval = process_score_event(csound, evt, 1);
>@@ -766,6 +778,7 @@
>       /* realtime or Midifile  */
>       mep = csound->midiGlobals->Midevtblk;
>       chn = csound->m_chnbp[mep->chan];
>+#ifndef NO_REMOTE
>       if (SR(chnrfd) && (rfd = SR(chnrfd)[mep->chan+1])) { /* RM: USE CHAN
>+ 1 */
>         if (rfd == GLOBAL_REMOT)
>           MIDIGlobevt(csound, mep);
>@@ -773,6 +786,7 @@
>         return 0;
>       }
>       else  /* RM: this part is broken out  -- bv  */
>+#endif
>         process_midi_event(csound, mep, chn);
>     }
>     return retval;
>@@ -893,7 +907,11 @@
>     /*   events is not sorted by instrument number */
>     /*   (although it never was sorted anyway...)  */
> 
>-    if (O->RTevents || (csound->remoteGlobals && SR(socksin))) {
>+    if (O->RTevents
>+#ifndef NO_REMOTE
>+                    || (csound->remoteGlobals && SR(socksin))
>+#endif
>+       ) {
>       int nrecvd;
>       /* run all registered callback functions */
>       if (csound->evtFuncChain != NULL && !csound->advanceCnt) {
>@@ -910,6 +928,7 @@
>           goto scode;
>       }
>       /* RM */
>+#ifndef NO_REMOTE
>       if (csound->remoteGlobals && (sinp = SR(socksin))){
>         while ((conn = *sinp++)) {
>           while ((nrecvd = SVrecv(csound, conn,
>(void*)&(csound->SVrecvbuf), sizeof(REMOT_BUF) )) > 0) {
>@@ -946,6 +965,7 @@
>           }
>         }
>       }
>+#endif
>       /* MIDI note messages */
>       if (O->Midiin || O->FMidiin)
>         while ((sensType = sensMidi(csound)) != 0)
>@@ -958,8 +978,10 @@
>  scode:
>     /* end of section (retval == 1), score (retval == 2), */
>     /* or lplay list (retval == 3) */
>+#ifndef NO_REMOTE
>     if (csound->remoteGlobals && SR(insrfd_count))
>       insGlobevt(csound, e);/* RM: send s,e, or l to any remotes */
>+#endif
>     e->opcod = '\0';
>     if (retval == 3) {
>       section_amps(csound, 2);
>
>
>
>
>-------------------------------------------------------------------------
>Using Tomcat but need to do more? Need to support web services, security?
>Get stuff done quickly with pre-integrated technology to make your job easier
>Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
>http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
>_______________________________________________
>Csound-devel mailing list
>Csound-devel@lists.sourceforge.net
>https://lists.sourceforge.net/lists/listinfo/csound-devel




-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net

Date2006-10-17 15:40
FromAnthony Kozar
SubjectRe: [Cs-dev] pre-release questions
I don't think it was possible to put it all in a plugin because there were
significant changes to musmon.c to support the remote events.  I have used
the macro NO_REMOTE to comment out the code for MacOS 9.  The reason I am
asking about it before committing though is because I ended up with some
code like this:

    if (O->RTevents
#ifndef NO_REMOTE
                    || (csound->remoteGlobals && SR(socksin))
#endif
       ) {

I did not want to make such ugly changes to someone else's code without
asking first if there is a better way to go about it.  I am also commenting
out the new globals in the CSOUND struct:

#ifndef NO_REMOTE
    REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications buffer */
    void          *remoteGlobals;
#endif

I did this because REMOT_BUF is defined in remote.h which has a lot of
declarations that would not work.  I suppose it might be possible to comment
out the bits in remote.h instead and provide alternate empty functions for
the code in remote.c but that was more work and I was not sure if that was a
safe route to go.  (As it is, I am not completely sure that the parts of
musmon.c that I commented out will not be a problem since I do not
understand that code).

Perhaps it would be easier if I commit the changes so that others can
examine and comment on them??

Anthony


Michael Gogins wrote on 10/17/06 10:02 AM:

> Simply omit the remote code from all but Linux builds. Is it a plugin? If it
> isn't, it should be. 


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net

Date2006-10-18 04:03
From"Dr. Richard Boulanger"
SubjectRe: [Cs-dev] pre-release questions
I am hoping that this remote code will work on my osX Mac! (and  
possibly even MacCsound!)
  I have been using it with the OLPC boards - and it is amazing!!!!
Wait until you check it out with at few laptops with builtin wireless  
internet cards.  It is very very cool.

Rick


On Oct 17, 2006, at 10:02 AM, Michael Gogins wrote:

> Simply omit the remote code from all but Linux builds. Is it a  
> plugin? If it isn't, it should be.
>
> Developers, please, if you write code that only works on one  
> platform, do not cause it to be built on other platforms. If you  
> would like somebody to port your code to another platform, please ask.
>
> -----Original Message-----
>> From: Anthony Kozar 
>> Sent: Oct 17, 2006 12:45 AM
>> To: New Csound Developer list 
>> Subject: [Cs-dev] pre-release questions
>>
>> I've compiled the current contents of CVS on MacOS 9 but not  
>> without a few
>> difficulties.  In addition, I have noticed a few other things that  
>> I am not
>> sure are right.
>>
>> I've already mentioned in a previous email about the new function  
>> pointers
>> in CSOUND and that they may need to be moved to the empty slots in  
>> the
>> public section.
>>
>> Furthermore, I am guessing that the API minor version number now  
>> needs to be
>> incremented (to 1.03?).
>>
>> And I have noticed a number of uses of the exit() function within  
>> the Csound
>> library and the stdutil plugin.  Is it OK to call exit() from  
>> within Csound?
>> Does this exit the host application or does it get "caught"  
>> somewhere before
>> that?
>>
>> (exit() can be found in several of the import/export utilities and  
>> within
>> the new remote event code in musmon.c).
>>
>> Finally, regarding the remote event code -- this assumes a Unix- 
>> like socket
>> interface that does not exist on MacOS 9.  I could see no way to  
>> turn off
>> this code so I had to conditionalize all of it with the preprocessor,
>> sometimes on a line-by-line basis.  The result is kind of ugly so  
>> I have not
>> committed the changes yet (the diffs are below).  I am open to better
>> suggestions on how to turn this code off.
>>
>> Anthony Kozar
>> anthonykozar AT sbcglobal DOT net
>>
>>
>> --- csound5/H/sysdep.h    25 Jan 2006 22:10:26 -0000    1.39
>> +++ csound5/H/sysdep.h    17 Oct 2006 04:39:46 -0000
>> @@ -117,6 +117,7 @@
>> #  endif
>> #  define  O_NDELAY (0)
>> #  define  DIRSEP ':'
>> +#  define  NO_REMOTE
>> #elif defined(SYMANTEC)
>> #  include      /* for open() etc protos on mac */
>> #  define  DIRSEP ':'
>>
>>
>> --- csound5/H/csoundCore.h    14 Oct 2006 18:45:05 -0000    1.201
>> +++ csound5/H/csoundCore.h    17 Oct 2006 04:39:45 -0000
>> @@ -642,7 +642,10 @@
>> #include "prototyp.h"
>> #include "cwindow.h"
>> #include "envvar.h"
>> -#include "remote.h"
>> +
>> +#ifndef NO_REMOTE
>> +#  include "remote.h"
>> +#endif
>>
>> #define CS_STATE_PRE    (1)
>> #define CS_STATE_COMP   (2)
>> @@ -1190,8 +1193,10 @@
>>     int           (*doCsoundCallback)(CSOUND *, void *, unsigned  
>> int);
>>     const unsigned char *strhash_tabl_8;
>>     unsigned int  (*strHash32)(const char *s);
>> +#ifndef NO_REMOTE
>>     REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications  
>> buffer */
>>     void          *remoteGlobals;
>> +#endif
>>     /* VL: pvs bus */
>>     int            nchanif, nchanof;
>>     char          *chanif, *chanof;
>>
>>
>> --- csound5/Top/csound.c    14 Oct 2006 18:45:05 -0000    1.175
>> +++ csound5/Top/csound.c    17 Oct 2006 04:39:43 -0000
>> @@ -583,8 +583,10 @@
>>         csoundDoCallback_,  /*  doCsoundCallback    */
>>         &(strhash_tabl_8[0]),   /*  strhash_tabl_8  */
>>         csound_str_hash_32, /*  strHash32           */
>> +#ifndef NO_REMOTE
>>         {0, 0, ""},     /* REMOT_BUF */
>>         NULL,            /*  remoteGlobals       */
>> +#endif
>>         0, 0,           /* nchanof, nchanif */
>>         NULL, NULL,     /*  chanif, chanof */
>>         csoundPvsinSet,
>>
>>
>> --- csound5/Engine/entry1.c    13 Oct 2006 11:08:16 -0000    1.89
>> +++ csound5/Engine/entry1.c    17 Oct 2006 04:39:46 -0000
>> @@ -89,10 +89,12 @@
>> { "ctrlinit",S(CTLINIT),1,      "",     "im",    
>> ctrlinit                },
>> { "massign",S(MASSIGN), 1,      "",     "iTp",   
>> massign                 },
>> { "turnon", S(TURNON),  1,      "",     "To",    
>> turnon                  },
>> +#ifndef NO_REMOTE
>> { "insremot",S(INSREMOT),1,     "",     "SSm",   
>> insremot                },
>> { "midremot",S(MIDREMOT),1,     "",     "SSm",   
>> midremot                },
>> { "insglobal",S(INSGLOBAL),1,   "",     "Sm",    
>> insglobal               },
>> { "midglobal",S(MIDGLOBAL),1,   "",     "Sm",    
>> midglobal               },
>> +#endif
>> { "=",      0,          0,      "",      
>> ""                              },
>> { "init",   0xffff      /* base names for later prefixes,suffixes  
>> */    },
>> { "betarand",  
>> 0xffff                                                    },
>>
>>
>> --- csound5/H/entry1.h    12 Oct 2006 14:08:08 -0000    1.13
>> +++ csound5/H/entry1.h    17 Oct 2006 04:39:45 -0000
>> @@ -54,7 +54,9 @@
>> #include "str_ops.h"
>> #include "bus.h"
>> #include "pstream.h"
>> -#include "remote.h"
>> +#ifndef NO_REMOTE
>> +#  include "remote.h"
>> +#endif
>>
>> #define S(x)    sizeof(x)
>>
>>
>> --- csound5/Engine/musmon.c    14 Oct 2006 16:40:40 -0000    1.114
>> +++ csound5/Engine/musmon.c    17 Oct 2006 04:39:47 -0000
>> @@ -28,7 +28,9 @@
>> #include "soundio.h"
>> #include "namedins.h"
>> #include "oload.h"
>> -#include "remote.h"
>> +#ifndef NO_REMOTE
>> +#  include "remote.h"
>> +#endif
>> #include 
>>
>> #define SEGAMPS 01
>> @@ -416,7 +418,9 @@
>>         csound->Message(csound, Str("no sound written to disk\n"));
>>     }
>>     /* close any remote.c sockets */
>> +#ifndef NO_REMOTE
>>     if (csound->remoteGlobals) remote_Cleanup(csound);
>> +#endif
>>     if (csound->oparms->ringbell)
>>       cs_beep(csound);
>>     return dispexit(csound);    /* hold or terminate the display  
>> output
>> */
>> @@ -627,6 +631,7 @@
>>                                     evt->strarg);
>>           break;
>>         }
>> +#ifndef NO_REMOTE
>>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>> SR(insrfd)[insno])) {
>>           /* RM: if this note labeled as remote */
>>           if (rfd == GLOBAL_REMOT)
>> @@ -636,6 +641,7 @@
>>             break;                       /* RM: and quit */
>>           }
>>         }
>> +#endif
>>         evt->p[1] = (MYFLT) insno;
>>         if (csound->oparms->Beatmode && !rtEvt && evt->p3orig > FL 
>> (0.0))
>>           evt->p[3] = evt->p3orig * (MYFLT) csound->beatTime;
>> @@ -654,6 +660,7 @@
>>                           insno, csound->maxinsno);
>>           break;
>>         }
>> +#ifndef NO_REMOTE
>>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>> SR(insrfd)[insno])) {
>>           /* RM: if this note labeled as remote  */
>>           if (rfd == GLOBAL_REMOT)
>> @@ -663,6 +670,7 @@
>>              break;                        /* RM: and  
>> quit              */
>>           }
>>         }
>> +#endif
>>         if (evt->p[1] < FL(0.0))           /* if p1  
>> neg,             */
>>           infoff(csound, -evt->p[1]);      /*  turnoff any infin  
>> cpy */
>>         else {
>> @@ -680,8 +688,10 @@
>>       {
>>         FUNC  *dummyftp;
>>         csound->hfgens(csound, &dummyftp, evt, 0); /* construct  
>> locally */
>> +#ifndef NO_REMOTE
>>         if (csound->remoteGlobals && SR(insrfd_count))
>>           insGlobevt(csound, evt); /* RM: & optionally send to all  
>> remotes
>> */
>> +#endif
>>       }
>>       break;
>>     case 'a':
>> @@ -742,6 +752,7 @@
>>       /* RM: Events are sorted on insertion, so just check the  
>> first */
>>       evt = &(e->evt);
>>       insno = (int)(evt->p[1]);
>> +#ifndef NO_REMOTE
>>       if (csound->remoteGlobals && SR(insrfd) && (rfd = SR(insrfd) 
>> [insno]))
>> {
>>         if (rfd == GLOBAL_REMOT)
>>           insGlobevt(csound, evt);       /* RM: do a global send  
>> and allow
>> local */
>> @@ -749,6 +760,7 @@
>>           insSendevt(csound, evt, rfd);  /* RM: or send to single  
>> remote
>> Csound */
>>         return 0;
>>       }
>> +#endif
>>       /* pop from the list */
>>       csound->OrcTrigEvts = e->nxt;
>>       retval = process_score_event(csound, evt, 1);
>> @@ -766,6 +778,7 @@
>>       /* realtime or Midifile  */
>>       mep = csound->midiGlobals->Midevtblk;
>>       chn = csound->m_chnbp[mep->chan];
>> +#ifndef NO_REMOTE
>>       if (SR(chnrfd) && (rfd = SR(chnrfd)[mep->chan+1])) { /* RM:  
>> USE CHAN
>> + 1 */
>>         if (rfd == GLOBAL_REMOT)
>>           MIDIGlobevt(csound, mep);
>> @@ -773,6 +786,7 @@
>>         return 0;
>>       }
>>       else  /* RM: this part is broken out  -- bv  */
>> +#endif
>>         process_midi_event(csound, mep, chn);
>>     }
>>     return retval;
>> @@ -893,7 +907,11 @@
>>     /*   events is not sorted by instrument number */
>>     /*   (although it never was sorted anyway...)  */
>>
>> -    if (O->RTevents || (csound->remoteGlobals && SR(socksin))) {
>> +    if (O->RTevents
>> +#ifndef NO_REMOTE
>> +                    || (csound->remoteGlobals && SR(socksin))
>> +#endif
>> +       ) {
>>       int nrecvd;
>>       /* run all registered callback functions */
>>       if (csound->evtFuncChain != NULL && !csound->advanceCnt) {
>> @@ -910,6 +928,7 @@
>>           goto scode;
>>       }
>>       /* RM */
>> +#ifndef NO_REMOTE
>>       if (csound->remoteGlobals && (sinp = SR(socksin))){
>>         while ((conn = *sinp++)) {
>>           while ((nrecvd = SVrecv(csound, conn,
>> (void*)&(csound->SVrecvbuf), sizeof(REMOT_BUF) )) > 0) {
>> @@ -946,6 +965,7 @@
>>           }
>>         }
>>       }
>> +#endif
>>       /* MIDI note messages */
>>       if (O->Midiin || O->FMidiin)
>>         while ((sensType = sensMidi(csound)) != 0)
>> @@ -958,8 +978,10 @@
>>  scode:
>>     /* end of section (retval == 1), score (retval == 2), */
>>     /* or lplay list (retval == 3) */
>> +#ifndef NO_REMOTE
>>     if (csound->remoteGlobals && SR(insrfd_count))
>>       insGlobevt(csound, e);/* RM: send s,e, or l to any remotes */
>> +#endif
>>     e->opcod = '\0';
>>     if (retval == 3) {
>>       section_amps(csound, 2);
>>
>>
>>
>>
>> --------------------------------------------------------------------- 
>> ----
>> Using Tomcat but need to do more? Need to support web services,  
>> security?
>> Get stuff done quickly with pre-integrated technology to make your  
>> job easier
>> Download IBM WebSphere Application Server v.1.0.1 based on Apache  
>> Geronimo
>> http://sel.as-us.falkag.net/sel? 
>> cmd=lnk&kid=120709&bid=263057&dat=121642
>> _______________________________________________
>> Csound-devel mailing list
>> Csound-devel@lists.sourceforge.net
>> https://lists.sourceforge.net/lists/listinfo/csound-devel
>
>
>
>
> ---------------------------------------------------------------------- 
> ---
> Using Tomcat but need to do more? Need to support web services,  
> security?
> Get stuff done quickly with pre-integrated technology to make your  
> job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache  
> Geronimo
> http://sel.as-us.falkag.net/sel? 
> cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Csound-devel mailing list
> Csound-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/csound-devel


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net

Date2006-10-18 04:13
From"Dr. Richard Boulanger"
SubjectRe: [Cs-dev] pre-release questions
Oh man....
This is Barry Vercoe's code!   He is finally contributing to Csound5.
And... there's a problem.  Oh brother.

Well.... He is groaning to me every day about all the ifDefs in  
Csound5 and
how he can't find his way around it.

I am sure that he will not be thrilled to see how his new code,  
before he even got
to test it with a release version of Csound5 - got changed before he  
even looked.

Can these changes wait for the next release?

Rick

On Oct 17, 2006, at 10:40 AM, Anthony Kozar wrote:

> I don't think it was possible to put it all in a plugin because  
> there were
> significant changes to musmon.c to support the remote events.  I  
> have used
> the macro NO_REMOTE to comment out the code for MacOS 9.  The  
> reason I am
> asking about it before committing though is because I ended up with  
> some
> code like this:
>
>     if (O->RTevents
> #ifndef NO_REMOTE
>                     || (csound->remoteGlobals && SR(socksin))
> #endif
>        ) {
>
> I did not want to make such ugly changes to someone else's code  
> without
> asking first if there is a better way to go about it.  I am also  
> commenting
> out the new globals in the CSOUND struct:
>
> #ifndef NO_REMOTE
>     REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications  
> buffer */
>     void          *remoteGlobals;
> #endif
>
> I did this because REMOT_BUF is defined in remote.h which has a lot of
> declarations that would not work.  I suppose it might be possible  
> to comment
> out the bits in remote.h instead and provide alternate empty  
> functions for
> the code in remote.c but that was more work and I was not sure if  
> that was a
> safe route to go.  (As it is, I am not completely sure that the  
> parts of
> musmon.c that I commented out will not be a problem since I do not
> understand that code).
>
> Perhaps it would be easier if I commit the changes so that others can
> examine and comment on them??
>
> Anthony
>
>
> Michael Gogins wrote on 10/17/06 10:02 AM:
>
>> Simply omit the remote code from all but Linux builds. Is it a  
>> plugin? If it
>> isn't, it should be.
>
>
> ---------------------------------------------------------------------- 
> ---
> Using Tomcat but need to do more? Need to support web services,  
> security?
> Get stuff done quickly with pre-integrated technology to make your  
> job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache  
> Geronimo
> http://sel.as-us.falkag.net/sel? 
> cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Csound-devel mailing list
> Csound-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/csound-devel


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net

Date2006-10-18 10:08
FromVictor Lazzarini
SubjectRe: [Cs-dev] pre-release questions
yes, the original linux code builds on OSX fine (just had to
fix the location of one header file). So I expect it will work as
well. You'll be able to try it as soon as we release 5.04.

Victor

At 04:03 18/10/2006, you wrote:
>I am hoping that this remote code will work on my osX Mac! (and
>possibly even MacCsound!)
>   I have been using it with the OLPC boards - and it is amazing!!!!
>Wait until you check it out with at few laptops with builtin wireless
>internet cards.  It is very very cool.
>
>Rick
>
>
>On Oct 17, 2006, at 10:02 AM, Michael Gogins wrote:
>
> > Simply omit the remote code from all but Linux builds. Is it a
> > plugin? If it isn't, it should be.
> >
> > Developers, please, if you write code that only works on one
> > platform, do not cause it to be built on other platforms. If you
> > would like somebody to port your code to another platform, please ask.
> >
> > -----Original Message-----
> >> From: Anthony Kozar 
> >> Sent: Oct 17, 2006 12:45 AM
> >> To: New Csound Developer list 
> >> Subject: [Cs-dev] pre-release questions
> >>
> >> I've compiled the current contents of CVS on MacOS 9 but not
> >> without a few
> >> difficulties.  In addition, I have noticed a few other things that
> >> I am not
> >> sure are right.
> >>
> >> I've already mentioned in a previous email about the new function
> >> pointers
> >> in CSOUND and that they may need to be moved to the empty slots in
> >> the
> >> public section.
> >>
> >> Furthermore, I am guessing that the API minor version number now
> >> needs to be
> >> incremented (to 1.03?).
> >>
> >> And I have noticed a number of uses of the exit() function within
> >> the Csound
> >> library and the stdutil plugin.  Is it OK to call exit() from
> >> within Csound?
> >> Does this exit the host application or does it get "caught"
> >> somewhere before
> >> that?
> >>
> >> (exit() can be found in several of the import/export utilities and
> >> within
> >> the new remote event code in musmon.c).
> >>
> >> Finally, regarding the remote event code -- this assumes a Unix-
> >> like socket
> >> interface that does not exist on MacOS 9.  I could see no way to
> >> turn off
> >> this code so I had to conditionalize all of it with the preprocessor,
> >> sometimes on a line-by-line basis.  The result is kind of ugly so
> >> I have not
> >> committed the changes yet (the diffs are below).  I am open to better
> >> suggestions on how to turn this code off.
> >>
> >> Anthony Kozar
> >> anthonykozar AT sbcglobal DOT net
> >>
> >>
> >> --- csound5/H/sysdep.h    25 Jan 2006 22:10:26 -0000    1.39
> >> +++ csound5/H/sysdep.h    17 Oct 2006 04:39:46 -0000
> >> @@ -117,6 +117,7 @@
> >> #  endif
> >> #  define  O_NDELAY (0)
> >> #  define  DIRSEP ':'
> >> +#  define  NO_REMOTE
> >> #elif defined(SYMANTEC)
> >> #  include      /* for open() etc protos on mac */
> >> #  define  DIRSEP ':'
> >>
> >>
> >> --- csound5/H/csoundCore.h    14 Oct 2006 18:45:05 -0000    1.201
> >> +++ csound5/H/csoundCore.h    17 Oct 2006 04:39:45 -0000
> >> @@ -642,7 +642,10 @@
> >> #include "prototyp.h"
> >> #include "cwindow.h"
> >> #include "envvar.h"
> >> -#include "remote.h"
> >> +
> >> +#ifndef NO_REMOTE
> >> +#  include "remote.h"
> >> +#endif
> >>
> >> #define CS_STATE_PRE    (1)
> >> #define CS_STATE_COMP   (2)
> >> @@ -1190,8 +1193,10 @@
> >>     int           (*doCsoundCallback)(CSOUND *, void *, unsigned
> >> int);
> >>     const unsigned char *strhash_tabl_8;
> >>     unsigned int  (*strHash32)(const char *s);
> >> +#ifndef NO_REMOTE
> >>     REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications
> >> buffer */
> >>     void          *remoteGlobals;
> >> +#endif
> >>     /* VL: pvs bus */
> >>     int            nchanif, nchanof;
> >>     char          *chanif, *chanof;
> >>
> >>
> >> --- csound5/Top/csound.c    14 Oct 2006 18:45:05 -0000    1.175
> >> +++ csound5/Top/csound.c    17 Oct 2006 04:39:43 -0000
> >> @@ -583,8 +583,10 @@
> >>         csoundDoCallback_,  /*  doCsoundCallback    */
> >>         &(strhash_tabl_8[0]),   /*  strhash_tabl_8  */
> >>         csound_str_hash_32, /*  strHash32           */
> >> +#ifndef NO_REMOTE
> >>         {0, 0, ""},     /* REMOT_BUF */
> >>         NULL,            /*  remoteGlobals       */
> >> +#endif
> >>         0, 0,           /* nchanof, nchanif */
> >>         NULL, NULL,     /*  chanif, chanof */
> >>         csoundPvsinSet,
> >>
> >>
> >> --- csound5/Engine/entry1.c    13 Oct 2006 11:08:16 -0000    1.89
> >> +++ csound5/Engine/entry1.c    17 Oct 2006 04:39:46 -0000
> >> @@ -89,10 +89,12 @@
> >> { "ctrlinit",S(CTLINIT),1,      "",     "im",
> >> ctrlinit                },
> >> { "massign",S(MASSIGN), 1,      "",     "iTp",
> >> massign                 },
> >> { "turnon", S(TURNON),  1,      "",     "To",
> >> turnon                  },
> >> +#ifndef NO_REMOTE
> >> { "insremot",S(INSREMOT),1,     "",     "SSm",
> >> insremot                },
> >> { "midremot",S(MIDREMOT),1,     "",     "SSm",
> >> midremot                },
> >> { "insglobal",S(INSGLOBAL),1,   "",     "Sm",
> >> insglobal               },
> >> { "midglobal",S(MIDGLOBAL),1,   "",     "Sm",
> >> midglobal               },
> >> +#endif
> >> { "=",      0,          0,      "",
> >> ""                              },
> >> { "init",   0xffff      /* base names for later prefixes,suffixes
> >> */    },
> >> { "betarand",
> >> 0xffff                                                    },
> >>
> >>
> >> --- csound5/H/entry1.h    12 Oct 2006 14:08:08 -0000    1.13
> >> +++ csound5/H/entry1.h    17 Oct 2006 04:39:45 -0000
> >> @@ -54,7 +54,9 @@
> >> #include "str_ops.h"
> >> #include "bus.h"
> >> #include "pstream.h"
> >> -#include "remote.h"
> >> +#ifndef NO_REMOTE
> >> +#  include "remote.h"
> >> +#endif
> >>
> >> #define S(x)    sizeof(x)
> >>
> >>
> >> --- csound5/Engine/musmon.c    14 Oct 2006 16:40:40 -0000    1.114
> >> +++ csound5/Engine/musmon.c    17 Oct 2006 04:39:47 -0000
> >> @@ -28,7 +28,9 @@
> >> #include "soundio.h"
> >> #include "namedins.h"
> >> #include "oload.h"
> >> -#include "remote.h"
> >> +#ifndef NO_REMOTE
> >> +#  include "remote.h"
> >> +#endif
> >> #include 
> >>
> >> #define SEGAMPS 01
> >> @@ -416,7 +418,9 @@
> >>         csound->Message(csound, Str("no sound written to disk\n"));
> >>     }
> >>     /* close any remote.c sockets */
> >> +#ifndef NO_REMOTE
> >>     if (csound->remoteGlobals) remote_Cleanup(csound);
> >> +#endif
> >>     if (csound->oparms->ringbell)
> >>       cs_beep(csound);
> >>     return dispexit(csound);    /* hold or terminate the display
> >> output
> >> */
> >> @@ -627,6 +631,7 @@
> >>                                     evt->strarg);
> >>           break;
> >>         }
> >> +#ifndef NO_REMOTE
> >>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
> >> SR(insrfd)[insno])) {
> >>           /* RM: if this note labeled as remote */
> >>           if (rfd == GLOBAL_REMOT)
> >> @@ -636,6 +641,7 @@
> >>             break;                       /* RM: and quit */
> >>           }
> >>         }
> >> +#endif
> >>         evt->p[1] = (MYFLT) insno;
> >>         if (csound->oparms->Beatmode && !rtEvt && evt->p3orig > FL
> >> (0.0))
> >>           evt->p[3] = evt->p3orig * (MYFLT) csound->beatTime;
> >> @@ -654,6 +660,7 @@
> >>                           insno, csound->maxinsno);
> >>           break;
> >>         }
> >> +#ifndef NO_REMOTE
> >>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
> >> SR(insrfd)[insno])) {
> >>           /* RM: if this note labeled as remote  */
> >>           if (rfd == GLOBAL_REMOT)
> >> @@ -663,6 +670,7 @@
> >>              break;                        /* RM: and
> >> quit              */
> >>           }
> >>         }
> >> +#endif
> >>         if (evt->p[1] < FL(0.0))           /* if p1
> >> neg,             */
> >>           infoff(csound, -evt->p[1]);      /*  turnoff any infin
> >> cpy */
> >>         else {
> >> @@ -680,8 +688,10 @@
> >>       {
> >>         FUNC  *dummyftp;
> >>         csound->hfgens(csound, &dummyftp, evt, 0); /* construct
> >> locally */
> >> +#ifndef NO_REMOTE
> >>         if (csound->remoteGlobals && SR(insrfd_count))
> >>           insGlobevt(csound, evt); /* RM: & optionally send to all
> >> remotes
> >> */
> >> +#endif
> >>       }
> >>       break;
> >>     case 'a':
> >> @@ -742,6 +752,7 @@
> >>       /* RM: Events are sorted on insertion, so just check the
> >> first */
> >>       evt = &(e->evt);
> >>       insno = (int)(evt->p[1]);
> >> +#ifndef NO_REMOTE
> >>       if (csound->remoteGlobals && SR(insrfd) && (rfd = SR(insrfd)
> >> [insno]))
> >> {
> >>         if (rfd == GLOBAL_REMOT)
> >>           insGlobevt(csound, evt);       /* RM: do a global send
> >> and allow
> >> local */
> >> @@ -749,6 +760,7 @@
> >>           insSendevt(csound, evt, rfd);  /* RM: or send to single
> >> remote
> >> Csound */
> >>         return 0;
> >>       }
> >> +#endif
> >>       /* pop from the list */
> >>       csound->OrcTrigEvts = e->nxt;
> >>       retval = process_score_event(csound, evt, 1);
> >> @@ -766,6 +778,7 @@
> >>       /* realtime or Midifile  */
> >>       mep = csound->midiGlobals->Midevtblk;
> >>       chn = csound->m_chnbp[mep->chan];
> >> +#ifndef NO_REMOTE
> >>       if (SR(chnrfd) && (rfd = SR(chnrfd)[mep->chan+1])) { /* RM:
> >> USE CHAN
> >> + 1 */
> >>         if (rfd == GLOBAL_REMOT)
> >>           MIDIGlobevt(csound, mep);
> >> @@ -773,6 +786,7 @@
> >>         return 0;
> >>       }
> >>       else  /* RM: this part is broken out  -- bv  */
> >> +#endif
> >>         process_midi_event(csound, mep, chn);
> >>     }
> >>     return retval;
> >> @@ -893,7 +907,11 @@
> >>     /*   events is not sorted by instrument number */
> >>     /*   (although it never was sorted anyway...)  */
> >>
> >> -    if (O->RTevents || (csound->remoteGlobals && SR(socksin))) {
> >> +    if (O->RTevents
> >> +#ifndef NO_REMOTE
> >> +                    || (csound->remoteGlobals && SR(socksin))
> >> +#endif
> >> +       ) {
> >>       int nrecvd;
> >>       /* run all registered callback functions */
> >>       if (csound->evtFuncChain != NULL && !csound->advanceCnt) {
> >> @@ -910,6 +928,7 @@
> >>           goto scode;
> >>       }
> >>       /* RM */
> >> +#ifndef NO_REMOTE
> >>       if (csound->remoteGlobals && (sinp = SR(socksin))){
> >>         while ((conn = *sinp++)) {
> >>           while ((nrecvd = SVrecv(csound, conn,
> >> (void*)&(csound->SVrecvbuf), sizeof(REMOT_BUF) )) > 0) {
> >> @@ -946,6 +965,7 @@
> >>           }
> >>         }
> >>       }
> >> +#endif
> >>       /* MIDI note messages */
> >>       if (O->Midiin || O->FMidiin)
> >>         while ((sensType = sensMidi(csound)) != 0)
> >> @@ -958,8 +978,10 @@
> >>  scode:
> >>     /* end of section (retval == 1), score (retval == 2), */
> >>     /* or lplay list (retval == 3) */
> >> +#ifndef NO_REMOTE
> >>     if (csound->remoteGlobals && SR(insrfd_count))
> >>       insGlobevt(csound, e);/* RM: send s,e, or l to any remotes */
> >> +#endif
> >>     e->opcod = '\0';
> >>     if (retval == 3) {
> >>       section_amps(csound, 2);
> >>
> >>
> >>
> >>
> >> ---------------------------------------------------------------------
> >> ----
> >> Using Tomcat but need to do more? Need to support web services,
> >> security?
> >> Get stuff done quickly with pre-integrated technology to make your
> >> job easier
> >> Download IBM WebSphere Application Server v.1.0.1 based on Apache
> >> Geronimo
> >> http://sel.as-us.falkag.net/sel?
> >> cmd=lnk&kid=120709&bid=263057&dat=121642
> >> _______________________________________________
> >> Csound-devel mailing list
> >> Csound-devel@lists.sourceforge.net
> >> https://lists.sourceforge.net/lists/listinfo/csound-devel
> >
> >
> >
> >
> > ----------------------------------------------------------------------
> > ---
> > Using Tomcat but need to do more? Need to support web services,
> > security?
> > Get stuff done quickly with pre-integrated technology to make your
> > job easier
> > Download IBM WebSphere Application Server v.1.0.1 based on Apache
> > Geronimo
> > http://sel.as-us.falkag.net/sel?
> > cmd=lnk&kid=120709&bid=263057&dat=121642
> > _______________________________________________
> > Csound-devel mailing list
> > Csound-devel@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/csound-devel
>
>
>-------------------------------------------------------------------------
>Using Tomcat but need to do more? Need to support web services, security?
>Get stuff done quickly with pre-integrated technology to make your job easier
>Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
>http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
>_______________________________________________
>Csound-devel mailing list
>Csound-devel@lists.sourceforge.net
>https://lists.sourceforge.net/lists/listinfo/csound-devel

Victor Lazzarini
Music Technology Laboratory
Music Department
National University of Ireland, Maynooth 


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net

Date2006-10-18 11:04
From"Dr. Richard Boulanger"
SubjectRe: [Cs-dev] pre-release questions
Awesome.  Can't wait!!!

-Rick

On Oct 18, 2006, at 5:08 AM, Victor Lazzarini wrote:

> yes, the original linux code builds on OSX fine (just had to
> fix the location of one header file). So I expect it will work as
> well. You'll be able to try it as soon as we release 5.04.
>
> Victor
>
> At 04:03 18/10/2006, you wrote:
>> I am hoping that this remote code will work on my osX Mac! (and
>> possibly even MacCsound!)
>>   I have been using it with the OLPC boards - and it is amazing!!!!
>> Wait until you check it out with at few laptops with builtin wireless
>> internet cards.  It is very very cool.
>>
>> Rick
>>
>>
>> On Oct 17, 2006, at 10:02 AM, Michael Gogins wrote:
>>
>>> Simply omit the remote code from all but Linux builds. Is it a
>>> plugin? If it isn't, it should be.
>>>
>>> Developers, please, if you write code that only works on one
>>> platform, do not cause it to be built on other platforms. If you
>>> would like somebody to port your code to another platform, please  
>>> ask.
>>>
>>> -----Original Message-----
>>>> From: Anthony Kozar 
>>>> Sent: Oct 17, 2006 12:45 AM
>>>> To: New Csound Developer list 
>>>> Subject: [Cs-dev] pre-release questions
>>>>
>>>> I've compiled the current contents of CVS on MacOS 9 but not
>>>> without a few
>>>> difficulties.  In addition, I have noticed a few other things that
>>>> I am not
>>>> sure are right.
>>>>
>>>> I've already mentioned in a previous email about the new function
>>>> pointers
>>>> in CSOUND and that they may need to be moved to the empty slots in
>>>> the
>>>> public section.
>>>>
>>>> Furthermore, I am guessing that the API minor version number now
>>>> needs to be
>>>> incremented (to 1.03?).
>>>>
>>>> And I have noticed a number of uses of the exit() function within
>>>> the Csound
>>>> library and the stdutil plugin.  Is it OK to call exit() from
>>>> within Csound?
>>>> Does this exit the host application or does it get "caught"
>>>> somewhere before
>>>> that?
>>>>
>>>> (exit() can be found in several of the import/export utilities and
>>>> within
>>>> the new remote event code in musmon.c).
>>>>
>>>> Finally, regarding the remote event code -- this assumes a Unix-
>>>> like socket
>>>> interface that does not exist on MacOS 9.  I could see no way to
>>>> turn off
>>>> this code so I had to conditionalize all of it with the  
>>>> preprocessor,
>>>> sometimes on a line-by-line basis.  The result is kind of ugly so
>>>> I have not
>>>> committed the changes yet (the diffs are below).  I am open to  
>>>> better
>>>> suggestions on how to turn this code off.
>>>>
>>>> Anthony Kozar
>>>> anthonykozar AT sbcglobal DOT net
>>>>
>>>>
>>>> --- csound5/H/sysdep.h    25 Jan 2006 22:10:26 -0000    1.39
>>>> +++ csound5/H/sysdep.h    17 Oct 2006 04:39:46 -0000
>>>> @@ -117,6 +117,7 @@
>>>> #  endif
>>>> #  define  O_NDELAY (0)
>>>> #  define  DIRSEP ':'
>>>> +#  define  NO_REMOTE
>>>> #elif defined(SYMANTEC)
>>>> #  include      /* for open() etc protos on mac */
>>>> #  define  DIRSEP ':'
>>>>
>>>>
>>>> --- csound5/H/csoundCore.h    14 Oct 2006 18:45:05 -0000    1.201
>>>> +++ csound5/H/csoundCore.h    17 Oct 2006 04:39:45 -0000
>>>> @@ -642,7 +642,10 @@
>>>> #include "prototyp.h"
>>>> #include "cwindow.h"
>>>> #include "envvar.h"
>>>> -#include "remote.h"
>>>> +
>>>> +#ifndef NO_REMOTE
>>>> +#  include "remote.h"
>>>> +#endif
>>>>
>>>> #define CS_STATE_PRE    (1)
>>>> #define CS_STATE_COMP   (2)
>>>> @@ -1190,8 +1193,10 @@
>>>>     int           (*doCsoundCallback)(CSOUND *, void *, unsigned
>>>> int);
>>>>     const unsigned char *strhash_tabl_8;
>>>>     unsigned int  (*strHash32)(const char *s);
>>>> +#ifndef NO_REMOTE
>>>>     REMOT_BUF     SVrecvbuf;  /* RM: rt_evt input Communications
>>>> buffer */
>>>>     void          *remoteGlobals;
>>>> +#endif
>>>>     /* VL: pvs bus */
>>>>     int            nchanif, nchanof;
>>>>     char          *chanif, *chanof;
>>>>
>>>>
>>>> --- csound5/Top/csound.c    14 Oct 2006 18:45:05 -0000    1.175
>>>> +++ csound5/Top/csound.c    17 Oct 2006 04:39:43 -0000
>>>> @@ -583,8 +583,10 @@
>>>>         csoundDoCallback_,  /*  doCsoundCallback    */
>>>>         &(strhash_tabl_8[0]),   /*  strhash_tabl_8  */
>>>>         csound_str_hash_32, /*  strHash32           */
>>>> +#ifndef NO_REMOTE
>>>>         {0, 0, ""},     /* REMOT_BUF */
>>>>         NULL,            /*  remoteGlobals       */
>>>> +#endif
>>>>         0, 0,           /* nchanof, nchanif */
>>>>         NULL, NULL,     /*  chanif, chanof */
>>>>         csoundPvsinSet,
>>>>
>>>>
>>>> --- csound5/Engine/entry1.c    13 Oct 2006 11:08:16 -0000    1.89
>>>> +++ csound5/Engine/entry1.c    17 Oct 2006 04:39:46 -0000
>>>> @@ -89,10 +89,12 @@
>>>> { "ctrlinit",S(CTLINIT),1,      "",     "im",
>>>> ctrlinit                },
>>>> { "massign",S(MASSIGN), 1,      "",     "iTp",
>>>> massign                 },
>>>> { "turnon", S(TURNON),  1,      "",     "To",
>>>> turnon                  },
>>>> +#ifndef NO_REMOTE
>>>> { "insremot",S(INSREMOT),1,     "",     "SSm",
>>>> insremot                },
>>>> { "midremot",S(MIDREMOT),1,     "",     "SSm",
>>>> midremot                },
>>>> { "insglobal",S(INSGLOBAL),1,   "",     "Sm",
>>>> insglobal               },
>>>> { "midglobal",S(MIDGLOBAL),1,   "",     "Sm",
>>>> midglobal               },
>>>> +#endif
>>>> { "=",      0,          0,      "",
>>>> ""                              },
>>>> { "init",   0xffff      /* base names for later prefixes,suffixes
>>>> */    },
>>>> { "betarand",
>>>> 0xffff                                                    },
>>>>
>>>>
>>>> --- csound5/H/entry1.h    12 Oct 2006 14:08:08 -0000    1.13
>>>> +++ csound5/H/entry1.h    17 Oct 2006 04:39:45 -0000
>>>> @@ -54,7 +54,9 @@
>>>> #include "str_ops.h"
>>>> #include "bus.h"
>>>> #include "pstream.h"
>>>> -#include "remote.h"
>>>> +#ifndef NO_REMOTE
>>>> +#  include "remote.h"
>>>> +#endif
>>>>
>>>> #define S(x)    sizeof(x)
>>>>
>>>>
>>>> --- csound5/Engine/musmon.c    14 Oct 2006 16:40:40 -0000    1.114
>>>> +++ csound5/Engine/musmon.c    17 Oct 2006 04:39:47 -0000
>>>> @@ -28,7 +28,9 @@
>>>> #include "soundio.h"
>>>> #include "namedins.h"
>>>> #include "oload.h"
>>>> -#include "remote.h"
>>>> +#ifndef NO_REMOTE
>>>> +#  include "remote.h"
>>>> +#endif
>>>> #include 
>>>>
>>>> #define SEGAMPS 01
>>>> @@ -416,7 +418,9 @@
>>>>         csound->Message(csound, Str("no sound written to disk\n"));
>>>>     }
>>>>     /* close any remote.c sockets */
>>>> +#ifndef NO_REMOTE
>>>>     if (csound->remoteGlobals) remote_Cleanup(csound);
>>>> +#endif
>>>>     if (csound->oparms->ringbell)
>>>>       cs_beep(csound);
>>>>     return dispexit(csound);    /* hold or terminate the display
>>>> output
>>>> */
>>>> @@ -627,6 +631,7 @@
>>>>                                     evt->strarg);
>>>>           break;
>>>>         }
>>>> +#ifndef NO_REMOTE
>>>>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>>>> SR(insrfd)[insno])) {
>>>>           /* RM: if this note labeled as remote */
>>>>           if (rfd == GLOBAL_REMOT)
>>>> @@ -636,6 +641,7 @@
>>>>             break;                       /* RM: and quit */
>>>>           }
>>>>         }
>>>> +#endif
>>>>         evt->p[1] = (MYFLT) insno;
>>>>         if (csound->oparms->Beatmode && !rtEvt && evt->p3orig > FL
>>>> (0.0))
>>>>           evt->p[3] = evt->p3orig * (MYFLT) csound->beatTime;
>>>> @@ -654,6 +660,7 @@
>>>>                           insno, csound->maxinsno);
>>>>           break;
>>>>         }
>>>> +#ifndef NO_REMOTE
>>>>         if (csound->remoteGlobals && SR(insrfd) && (rfd =
>>>> SR(insrfd)[insno])) {
>>>>           /* RM: if this note labeled as remote  */
>>>>           if (rfd == GLOBAL_REMOT)
>>>> @@ -663,6 +670,7 @@
>>>>              break;                        /* RM: and
>>>> quit              */
>>>>           }
>>>>         }
>>>> +#endif
>>>>         if (evt->p[1] < FL(0.0))           /* if p1
>>>> neg,             */
>>>>           infoff(csound, -evt->p[1]);      /*  turnoff any infin
>>>> cpy */
>>>>         else {
>>>> @@ -680,8 +688,10 @@
>>>>       {
>>>>         FUNC  *dummyftp;
>>>>         csound->hfgens(csound, &dummyftp, evt, 0); /* construct
>>>> locally */
>>>> +#ifndef NO_REMOTE
>>>>         if (csound->remoteGlobals && SR(insrfd_count))
>>>>           insGlobevt(csound, evt); /* RM: & optionally send to all
>>>> remotes
>>>> */
>>>> +#endif
>>>>       }
>>>>       break;
>>>>     case 'a':
>>>> @@ -742,6 +752,7 @@
>>>>       /* RM: Events are sorted on insertion, so just check the
>>>> first */
>>>>       evt = &(e->evt);
>>>>       insno = (int)(evt->p[1]);
>>>> +#ifndef NO_REMOTE
>>>>       if (csound->remoteGlobals && SR(insrfd) && (rfd = SR(insrfd)
>>>> [insno]))
>>>> {
>>>>         if (rfd == GLOBAL_REMOT)
>>>>           insGlobevt(csound, evt);       /* RM: do a global send
>>>> and allow
>>>> local */
>>>> @@ -749,6 +760,7 @@
>>>>           insSendevt(csound, evt, rfd);  /* RM: or send to single
>>>> remote
>>>> Csound */
>>>>         return 0;
>>>>       }
>>>> +#endif
>>>>       /* pop from the list */
>>>>       csound->OrcTrigEvts = e->nxt;
>>>>       retval = process_score_event(csound, evt, 1);
>>>> @@ -766,6 +778,7 @@
>>>>       /* realtime or Midifile  */
>>>>       mep = csound->midiGlobals->Midevtblk;
>>>>       chn = csound->m_chnbp[mep->chan];
>>>> +#ifndef NO_REMOTE
>>>>       if (SR(chnrfd) && (rfd = SR(chnrfd)[mep->chan+1])) { /* RM:
>>>> USE CHAN
>>>> + 1 */
>>>>         if (rfd == GLOBAL_REMOT)
>>>>           MIDIGlobevt(csound, mep);
>>>> @@ -773,6 +786,7 @@
>>>>         return 0;
>>>>       }
>>>>       else  /* RM: this part is broken out  -- bv  */
>>>> +#endif
>>>>         process_midi_event(csound, mep, chn);
>>>>     }
>>>>     return retval;
>>>> @@ -893,7 +907,11 @@
>>>>     /*   events is not sorted by instrument number */
>>>>     /*   (although it never was sorted anyway...)  */
>>>>
>>>> -    if (O->RTevents || (csound->remoteGlobals && SR(socksin))) {
>>>> +    if (O->RTevents
>>>> +#ifndef NO_REMOTE
>>>> +                    || (csound->remoteGlobals && SR(socksin))
>>>> +#endif
>>>> +       ) {
>>>>       int nrecvd;
>>>>       /* run all registered callback functions */
>>>>       if (csound->evtFuncChain != NULL && !csound->advanceCnt) {
>>>> @@ -910,6 +928,7 @@
>>>>           goto scode;
>>>>       }
>>>>       /* RM */
>>>> +#ifndef NO_REMOTE
>>>>       if (csound->remoteGlobals && (sinp = SR(socksin))){
>>>>         while ((conn = *sinp++)) {
>>>>           while ((nrecvd = SVrecv(csound, conn,
>>>> (void*)&(csound->SVrecvbuf), sizeof(REMOT_BUF) )) > 0) {
>>>> @@ -946,6 +965,7 @@
>>>>           }
>>>>         }
>>>>       }
>>>> +#endif
>>>>       /* MIDI note messages */
>>>>       if (O->Midiin || O->FMidiin)
>>>>         while ((sensType = sensMidi(csound)) != 0)
>>>> @@ -958,8 +978,10 @@
>>>>  scode:
>>>>     /* end of section (retval == 1), score (retval == 2), */
>>>>     /* or lplay list (retval == 3) */
>>>> +#ifndef NO_REMOTE
>>>>     if (csound->remoteGlobals && SR(insrfd_count))
>>>>       insGlobevt(csound, e);/* RM: send s,e, or l to any remotes */
>>>> +#endif
>>>>     e->opcod = '\0';
>>>>     if (retval == 3) {
>>>>       section_amps(csound, 2);
>>>>
>>>>
>>>>
>>>>
>>>> ------------------------------------------------------------------- 
>>>> --
>>>> ----
>>>> Using Tomcat but need to do more? Need to support web services,
>>>> security?
>>>> Get stuff done quickly with pre-integrated technology to make your
>>>> job easier
>>>> Download IBM WebSphere Application Server v.1.0.1 based on Apache
>>>> Geronimo
>>>> http://sel.as-us.falkag.net/sel?
>>>> cmd=lnk&kid=120709&bid=263057&dat=121642
>>>> _______________________________________________
>>>> Csound-devel mailing list
>>>> Csound-devel@lists.sourceforge.net
>>>> https://lists.sourceforge.net/lists/listinfo/csound-devel
>>>
>>>
>>>
>>>
>>> -------------------------------------------------------------------- 
>>> --
>>> ---
>>> Using Tomcat but need to do more? Need to support web services,
>>> security?
>>> Get stuff done quickly with pre-integrated technology to make your
>>> job easier
>>> Download IBM WebSphere Application Server v.1.0.1 based on Apache
>>> Geronimo
>>> http://sel.as-us.falkag.net/sel?
>>> cmd=lnk&kid=120709&bid=263057&dat=121642
>>> _______________________________________________
>>> Csound-devel mailing list
>>> Csound-devel@lists.sourceforge.net
>>> https://lists.sourceforge.net/lists/listinfo/csound-devel
>>
>>
>> --------------------------------------------------------------------- 
>> ----
>> Using Tomcat but need to do more? Need to support web services,  
>> security?
>> Get stuff done quickly with pre-integrated technology to make your  
>> job easier
>> Download IBM WebSphere Application Server v.1.0.1 based on Apache  
>> Geronimo
>> http://sel.as-us.falkag.net/sel? 
>> cmd=lnk&kid=120709&bid=263057&dat=121642
>> _______________________________________________
>> Csound-devel mailing list
>> Csound-devel@lists.sourceforge.net
>> https://lists.sourceforge.net/lists/listinfo/csound-devel
>
> Victor Lazzarini
> Music Technology Laboratory
> Music Department
> National University of Ireland, Maynooth
>
>
> ---------------------------------------------------------------------- 
> ---
> Using Tomcat but need to do more? Need to support web services,  
> security?
> Get stuff done quickly with pre-integrated technology to make your  
> job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache  
> Geronimo
> http://sel.as-us.falkag.net/sel? 
> cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Csound-devel mailing list
> Csound-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/csound-devel


-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net