Mixer: Add basic OSC support.
This commit is contained in:
parent
93dd9870ae
commit
a91bc7566f
|
@ -20,5 +20,8 @@ require_command ar ar
|
|||
require_command makedepend makedepend
|
||||
require_package JACK 0.103.0 jack
|
||||
require_package lrdf 0.4.0 lrdf
|
||||
require_package liblo 0.23 liblo
|
||||
|
||||
test_version `version_of liblo` 0.26 || warn "Version $(version_of liblo) of liblo is slow to create servers. Consider upgrading to 0.26 or later"
|
||||
|
||||
end
|
||||
|
|
|
@ -8,7 +8,7 @@ Mixer_SRCS:=$(Mixer_SRCS:.fl=.C)
|
|||
Mixer_SRCS:=$(sort $(Mixer_SRCS))
|
||||
Mixer_OBJS:=$(Mixer_SRCS:.C=.o)
|
||||
|
||||
Mixer_LIBS := $(FLTK_LIBS) $(JACK_LIBS) $(LASH_LIBS) $(LRDF_LIBS)
|
||||
Mixer_LIBS := $(FLTK_LIBS) $(JACK_LIBS) $(LASH_LIBS) $(LRDF_LIBS) $(LIBLO_LIBS)
|
||||
|
||||
src/mixer: $(Mixer_OBJS) FL/libfl_widgets.a nonlib/libnonlib.a
|
||||
@ echo -n Linking mixer...
|
||||
|
|
|
@ -42,9 +42,13 @@
|
|||
#include "debug.h"
|
||||
|
||||
#include "FL/color_scheme.H"
|
||||
#include "OSC/Endpoint.H"
|
||||
#include <lo/lo.h>
|
||||
|
||||
const double STATUS_UPDATE_FREQ = 0.2f;
|
||||
|
||||
const double OSC_INTERVAL = 0.1f;
|
||||
|
||||
extern char *user_config_dir;
|
||||
|
||||
#include "debug.h"
|
||||
|
@ -55,6 +59,108 @@ extern char *user_config_dir;
|
|||
/* ((Mixer*)v)->update(); */
|
||||
/* } */
|
||||
|
||||
|
||||
|
||||
/************************/
|
||||
/* OSC Message Handlers */
|
||||
/************************/
|
||||
|
||||
OSC_HANDLER( generic )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( quit )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
((Mixer*)user_data)->command_quit();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( save )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
if ( ((Mixer*)user_data)->command_save() )
|
||||
OSC_REPLY_OK();
|
||||
else
|
||||
OSC_REPLY_ERR();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( load )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
const char *project_path = &argv[0]->s;
|
||||
const char *project_display_name = &argv[1]->s;
|
||||
|
||||
if ( ((Mixer*)user_data)->command_load( project_path, project_display_name ) )
|
||||
OSC_REPLY_OK();
|
||||
else
|
||||
OSC_REPLY_ERR();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( new )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
const char *project_path = &argv[0]->s;
|
||||
const char *project_display_name = &argv[1]->s;
|
||||
|
||||
if ( ((Mixer*)user_data)->command_new( project_path, project_display_name ) )
|
||||
OSC_REPLY_OK();
|
||||
else
|
||||
OSC_REPLY_ERR();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( root )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
OSC_REPLY( "load\nsave\nquit\nnew\n");
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( add_strip )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
((Mixer*)user_data)->command_add_strip();
|
||||
|
||||
OSC_REPLY_OK();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
OSC_HANDLER( finger )
|
||||
{
|
||||
OSC_DMSG();
|
||||
|
||||
lo_address src = lo_message_get_source( msg );
|
||||
|
||||
const char *s = "APP_TITLE\n";
|
||||
|
||||
/* if ( 1 >= lo_send_from( src, ((Mixer*)user_data)->osc_endpoint, LO_TT_IMMEDIATE, "/finger-reply", "s", s ) ) */
|
||||
/* { */
|
||||
/* DMESSAGE( "Failed to send reply" ); */
|
||||
/* } */
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
void Mixer::cb_menu(Fl_Widget* o) {
|
||||
Fl_Menu_Bar *menu = (Fl_Menu_Bar*)o;
|
||||
|
@ -276,6 +382,34 @@ Mixer::Mixer ( int X, int Y, int W, int H, const char *L ) :
|
|||
update_menu();
|
||||
|
||||
load_options();
|
||||
|
||||
osc_endpoint = new OSC::Endpoint();
|
||||
|
||||
osc_endpoint->url();
|
||||
|
||||
// if ( 1 >= lo_send_from( src, ((Mixer*)user_data)->osc_endpoint, LO_TT_IMMEDIATE, "/finger-reply", "s", s ) )
|
||||
|
||||
osc_endpoint->add_method( "/nsm/quit", "", OSC_NAME( quit ), this );
|
||||
osc_endpoint->add_method( "/nsm/load", "ss", OSC_NAME( load ), this );
|
||||
osc_endpoint->add_method( "/nsm/save", "", OSC_NAME( save ), this );
|
||||
osc_endpoint->add_method( "/nsm/new", "ss", OSC_NAME( new ), this );
|
||||
osc_endpoint->add_method( "/nsm/", "", OSC_NAME( root ), this );
|
||||
osc_endpoint->add_method( "/finger", "", OSC_NAME( finger ), this );
|
||||
osc_endpoint->add_method( "/mixer/add_strip", "", OSC_NAME( add_strip ), this );
|
||||
// osc_endpoint->add_method( NULL, "", osc_generic, this );
|
||||
|
||||
// osc_endpoint->start();
|
||||
|
||||
/* poll so we can keep OSC handlers running in the GUI thread and avoid extra sync */
|
||||
Fl::add_timeout( OSC_INTERVAL, check_osc, this );
|
||||
}
|
||||
|
||||
void
|
||||
Mixer::check_osc ( void * v )
|
||||
{
|
||||
((Mixer*)v)->osc_endpoint->check();
|
||||
Fl::repeat_timeout( OSC_INTERVAL, check_osc, v );
|
||||
|
||||
}
|
||||
|
||||
Mixer::~Mixer ( )
|
||||
|
|
|
@ -29,9 +29,15 @@
|
|||
class Fl_Flowpack;
|
||||
class Fl_Menu_Bar;
|
||||
|
||||
#include "OSC/Endpoint.H"
|
||||
|
||||
class Mixer : public Fl_Group
|
||||
{
|
||||
|
||||
public:
|
||||
|
||||
OSC::Endpoint *osc_endpoint;
|
||||
|
||||
private:
|
||||
|
||||
int _rows;
|
||||
|
@ -85,6 +91,10 @@ public:
|
|||
Mixer ( int X, int Y, int W, int H, const char *L );
|
||||
virtual ~Mixer();
|
||||
|
||||
static void check_osc ( void * v );
|
||||
|
||||
void announce ( const char *nash_url );
|
||||
|
||||
public:
|
||||
|
||||
bool command_save ( void );
|
||||
|
|
|
@ -155,8 +155,8 @@ main ( int argc, char **argv )
|
|||
else
|
||||
{
|
||||
FATAL( "Missing instance name" );
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
else if ( !strncmp( argv[i], "--", 2 ) )
|
||||
{
|
||||
WARNING( "Unrecognized option: %s", argv[i] );
|
||||
|
|
|
@ -0,0 +1,227 @@
|
|||
|
||||
/*******************************************************************************/
|
||||
/* Copyright (C) 2010 Jonathan Moore Liles */
|
||||
/* */
|
||||
/* This program is free software; you can redistribute it and/or modify it */
|
||||
/* under the terms of the GNU General Public License as published by the */
|
||||
/* Free Software Foundation; either version 2 of the License, or (at your */
|
||||
/* option) any later version. */
|
||||
/* */
|
||||
/* This program is distributed in the hope that it will be useful, but WITHOUT */
|
||||
/* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or */
|
||||
/* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for */
|
||||
/* more details. */
|
||||
/* */
|
||||
/* You should have received a copy of the GNU General Public License along */
|
||||
/* with This program; see the file COPYING. If not,write to the Free Software */
|
||||
/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||
/*******************************************************************************/
|
||||
|
||||
#include <lo/lo.h>
|
||||
#include "debug.h"
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
|
||||
#include "Endpoint.H"
|
||||
|
||||
namespace OSC
|
||||
{
|
||||
|
||||
void
|
||||
Endpoint::error_handler(int num, const char *msg, const char *path)
|
||||
{
|
||||
WARNING( "LibLO server error %d in path %s: %s\n", num, path, msg);
|
||||
}
|
||||
|
||||
Endpoint::Endpoint ( const char *port )
|
||||
{
|
||||
DMESSAGE( "Creating OSC server" );
|
||||
|
||||
// _st = lo_server_thread_new( s, error_handler );
|
||||
// _server = lo_server_thread_get_server( _st );
|
||||
|
||||
_server = lo_server_new( port, error_handler );
|
||||
|
||||
if ( ! _server )
|
||||
FATAL( "Error creating OSC server" );
|
||||
|
||||
char *url = lo_server_get_url(_server);
|
||||
printf("OSC: %s\n",url);
|
||||
free(url);
|
||||
}
|
||||
|
||||
Endpoint::~Endpoint ( )
|
||||
{
|
||||
// lo_server_thread_free( _st );
|
||||
lo_server_free( _server );
|
||||
}
|
||||
|
||||
void
|
||||
Endpoint::add_method ( const char *path, const char *typespec, lo_method_handler handler, void *user_data )
|
||||
{
|
||||
lo_server_add_method( _server, path, typespec, handler, user_data );
|
||||
}
|
||||
|
||||
void
|
||||
Endpoint::del_method ( const char *path, const char *typespec )
|
||||
{
|
||||
lo_server_del_method( _server, path, typespec );
|
||||
}
|
||||
|
||||
/* void * */
|
||||
/* Endpoint::osc_thread ( void * arg ) */
|
||||
/* { */
|
||||
/* ((Endpoint*)arg)->osc_thread(); */
|
||||
|
||||
/* return NULL; */
|
||||
/* } */
|
||||
|
||||
/* void */
|
||||
/* Endpoint::osc_thread ( void ) */
|
||||
/* { */
|
||||
/* _thread.name( "OSC" ); */
|
||||
|
||||
/* DMESSAGE( "OSC Thread running" ); */
|
||||
|
||||
/* for ( ;; ) */
|
||||
/* { */
|
||||
/* lo_server_recv( _sever ); */
|
||||
/* } */
|
||||
/* } */
|
||||
|
||||
void
|
||||
Endpoint::start ( void )
|
||||
{
|
||||
|
||||
/* if ( !_thread.clone( &Endpoint::osc_thread, this ) ) */
|
||||
/* FATAL( "Could not create OSC thread" ); */
|
||||
|
||||
/* lo_server_thread_start( _st ); */
|
||||
|
||||
}
|
||||
|
||||
void
|
||||
Endpoint::stop ( void )
|
||||
{
|
||||
// lo_server_thread_stop( _st );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::port ( void ) const
|
||||
{
|
||||
return lo_server_get_port( _server );
|
||||
}
|
||||
|
||||
char *
|
||||
Endpoint::url ( void ) const
|
||||
{
|
||||
return lo_server_get_url( _server );
|
||||
}
|
||||
|
||||
/** Process any waiting events and return immediately */
|
||||
void
|
||||
Endpoint::check ( void ) const
|
||||
{
|
||||
wait( 0 );
|
||||
}
|
||||
|
||||
/** Process any waiting events and return immediately */
|
||||
void
|
||||
Endpoint::wait ( int timeout ) const
|
||||
{
|
||||
lo_server_recv_noblock( _server, timeout );
|
||||
}
|
||||
|
||||
/** Process events forever */
|
||||
void
|
||||
Endpoint::run ( void ) const
|
||||
{
|
||||
for ( ;; )
|
||||
{
|
||||
lo_server_recv( _server );
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, std::list< OSC_Value > values )
|
||||
{
|
||||
|
||||
lo_message m = lo_message_new();
|
||||
|
||||
for ( std::list< OSC_Value >::const_iterator i = values.begin();
|
||||
i != values.end();
|
||||
++i )
|
||||
{
|
||||
const OSC_Value *ov = &(*i);
|
||||
|
||||
switch ( ov->type() )
|
||||
{
|
||||
case 'f':
|
||||
lo_message_add_float( m, ((OSC_Float*)ov)->value() );
|
||||
break;
|
||||
case 'i':
|
||||
lo_message_add_int32( m, ((OSC_Int*)ov)->value() );
|
||||
break;
|
||||
case 's':
|
||||
DMESSAGE( "Adding string %s", ((OSC_String*)ov)->value() );
|
||||
lo_message_add_string( m, ((OSC_String*)ov)->value() );
|
||||
break;
|
||||
default:
|
||||
FATAL( "Unknown format: %c", ov->type() );
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
DMESSAGE( "Path: %s", path );
|
||||
|
||||
lo_bundle b = lo_bundle_new( LO_TT_IMMEDIATE );
|
||||
|
||||
lo_bundle_add_message(b, path, m );
|
||||
|
||||
int r = lo_send_bundle_from( to, _server, b );
|
||||
|
||||
// int r = lo_send_message_from( to, _server, path, m );
|
||||
|
||||
// lo_message_free( m );
|
||||
|
||||
return r;
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "" );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, int v )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "i", v );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, float v )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "f", v );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, double v )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "d", v );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, const char * v )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "s", v );
|
||||
}
|
||||
|
||||
int
|
||||
Endpoint::send ( lo_address to, const char *path, const char * v1, const char *v2 )
|
||||
{
|
||||
return lo_send_from( to, _server, LO_TT_IMMEDIATE, path, "ss", v1, v2 );
|
||||
}
|
||||
|
||||
}
|
|
@ -0,0 +1,158 @@
|
|||
|
||||
/*******************************************************************************/
|
||||
/* Copyright (C) 2010 Jonathan Moore Liles */
|
||||
/* */
|
||||
/* This program is free software; you can redistribute it and/or modify it */
|
||||
/* under the terms of the GNU General Public License as published by the */
|
||||
/* Free Software Foundation; either version 2 of the License, or (at your */
|
||||
/* option) any later version. */
|
||||
/* */
|
||||
/* This program is distributed in the hope that it will be useful, but WITHOUT */
|
||||
/* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or */
|
||||
/* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for */
|
||||
/* more details. */
|
||||
/* */
|
||||
/* You should have received a copy of the GNU General Public License along */
|
||||
/* with This program; see the file COPYING. If not,write to the Free Software */
|
||||
/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||
/*******************************************************************************/
|
||||
|
||||
#pragma once
|
||||
|
||||
#include <lo/lo.h>
|
||||
//#include "util/Thread.H"
|
||||
#include <list>
|
||||
|
||||
namespace OSC
|
||||
{
|
||||
|
||||
class OSC_Value
|
||||
{
|
||||
|
||||
protected:
|
||||
|
||||
char _type;
|
||||
|
||||
float f;
|
||||
double d;
|
||||
int i;
|
||||
const char *s;
|
||||
|
||||
public:
|
||||
|
||||
OSC_Value ( const OSC_Value &rhs )
|
||||
{
|
||||
_type = rhs._type;
|
||||
|
||||
f =rhs.f;
|
||||
d = rhs.d;
|
||||
i = rhs.i;
|
||||
s = rhs.s;
|
||||
}
|
||||
|
||||
OSC_Value ( )
|
||||
{
|
||||
_type = 0;
|
||||
|
||||
f = 0;
|
||||
d = 0;
|
||||
i = 0;
|
||||
s = 0;
|
||||
}
|
||||
|
||||
virtual ~OSC_Value ( ) { }
|
||||
virtual char type ( void ) const { return _type; }
|
||||
};
|
||||
|
||||
class OSC_Float : public OSC_Value
|
||||
{
|
||||
|
||||
public:
|
||||
|
||||
float value ( void ) const { return f; }
|
||||
|
||||
OSC_Float ( float v )
|
||||
{
|
||||
_type = 'f';
|
||||
f = v;
|
||||
}
|
||||
};
|
||||
|
||||
class OSC_Int : public OSC_Value
|
||||
{
|
||||
|
||||
public:
|
||||
|
||||
int value ( void ) const { return i; }
|
||||
|
||||
OSC_Int ( int v )
|
||||
{
|
||||
_type = 'i';
|
||||
i = v;
|
||||
}
|
||||
};
|
||||
|
||||
class OSC_String : public OSC_Value
|
||||
{
|
||||
public:
|
||||
|
||||
const char * value ( void ) const { return s; }
|
||||
|
||||
OSC_String ( const char *v )
|
||||
{
|
||||
_type = 's';
|
||||
s = v;
|
||||
}
|
||||
};
|
||||
|
||||
class Endpoint
|
||||
{
|
||||
static void error_handler(int num, const char *msg, const char *path);
|
||||
|
||||
// Thread _thread;
|
||||
|
||||
// lo_server_thread _st;
|
||||
lo_server _server;
|
||||
|
||||
public:
|
||||
|
||||
Endpoint ( const char *port = 0 );
|
||||
|
||||
~Endpoint ( );
|
||||
|
||||
void add_method ( const char *path, const char *typespec, lo_method_handler handler, void *user_data );
|
||||
void del_method ( const char *path, const char *typespec );
|
||||
void start ( void );
|
||||
void stop ( void );
|
||||
int port ( void ) const;
|
||||
char * url ( void ) const;
|
||||
|
||||
void check ( void ) const;
|
||||
void wait ( int timeout ) const;
|
||||
void run ( void ) const;
|
||||
|
||||
int send ( lo_address to, const char *path, std::list< OSC_Value > values );
|
||||
|
||||
/* overloads for common message formats */
|
||||
int send ( lo_address to, const char *path );
|
||||
int send ( lo_address to, const char *path, float v );
|
||||
int send ( lo_address to, const char *path, double v );
|
||||
int send ( lo_address to, const char *path, int v );
|
||||
int send ( lo_address to, const char *path, long v );
|
||||
int send ( lo_address to, const char *path, const char *v );
|
||||
int send ( lo_address to, const char *path, const char *v1, const char *v2 );
|
||||
|
||||
};
|
||||
|
||||
};
|
||||
|
||||
|
||||
/* helper macros for defining OSC handlers */
|
||||
#define OSC_NAME( name ) osc_ ## name
|
||||
#define OSC_DMSG() DMESSAGE( "Got OSC message: %s", path );
|
||||
#define OSC_HANDLER( name ) static int OSC_NAME( name ) ( const char *path, const char *types, lo_arg **argv, int argc, lo_message msg, void *user_data )
|
||||
|
||||
|
||||
#define OSC_REPLY_OK() ((Mixer*)user_data)->osc_endpoint->send( lo_message_get_source( msg ), "/reply", path, "ok" )
|
||||
#define OSC_REPLY( msg_str ) ((Mixer*)user_data)->osc_endpoint->send( lo_message_get_source( msg ), "/reply", path, msg_str )
|
||||
#define OSC_REPLY_ERR() ((Mixer*)user_data)->osc_endpoint->send( lo_message_get_source( msg ), "/reply", path, "err" )
|
|
@ -1,6 +1,6 @@
|
|||
# -*- mode: makefile; -*-
|
||||
|
||||
nonlib_SRCS := $(wildcard nonlib/*.C nonlib/*.c nonlib/JACK/*.C nonlib/LASH/*.C)
|
||||
nonlib_SRCS := $(wildcard nonlib/*.C nonlib/JACK/*.C nonlib/LASH/*.C nonlib/OSC/*.C)
|
||||
|
||||
nonlib_SRCS:=$(sort $(nonlib_SRCS))
|
||||
nonlib_OBJS:=$(nonlib_SRCS:.C=.o)
|
||||
|
|
|
@ -282,11 +282,19 @@ require_package ()
|
|||
|
||||
_test_version ()
|
||||
{
|
||||
[ $1 -gt $4 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -gt $5 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -eq $5 ] && [ $3 -gt $6 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -eq $5 ] && [ $3 -eq $6 ] && return 0
|
||||
return 1
|
||||
if [ $# == 6 ]
|
||||
then
|
||||
[ $1 -gt $4 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -gt $5 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -eq $5 ] && [ $3 -gt $6 ] && return 0
|
||||
[ $1 -eq $4 ] && [ $2 -eq $5 ] && [ $3 -eq $6 ] && return 0
|
||||
return 1
|
||||
elif [ $# == 4 ]
|
||||
then
|
||||
[ $1 -gt $3 ] && return 0
|
||||
[ $1 -eq $3 ] && [ $2 -eq $4 ] && return 0
|
||||
return 1;
|
||||
fi
|
||||
}
|
||||
|
||||
# return true if #1 is greater than or equal to $2
|
||||
|
|
Loading…
Reference in New Issue