diff options
Diffstat (limited to 'test/paramRoute.c')
| -rw-r--r-- | test/paramRoute.c | 174 |
1 files changed, 174 insertions, 0 deletions
diff --git a/test/paramRoute.c b/test/paramRoute.c new file mode 100644 index 0000000..780dfed --- /dev/null +++ b/test/paramRoute.c @@ -0,0 +1,174 @@ +/* + * paramRoute.c + * + * Copyright 2009 Thomas O Fredericks <tom@hp> + * + * 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; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, + * MA 02110-1301, USA. + */ + + + + +#include "tof.h" +#include "param.h" + + +static t_class *paramRoute_class; + +typedef struct _paramRoute +{ + t_object x_obj; + t_symbol *basepath; + t_outlet *x_outlet; + t_symbol *s_save; + t_symbol *s_load; + t_symbol* s_empty; + t_canvas* canvas; + t_symbol* id; + +} t_paramRoute; + + +static t_symbol* paramRoute_makefilename( t_symbol *basename, t_float n) { + + + + int d = (int) n; + int length = strlen(basename->s_name); + char* buf = getbytes( (length + 6) * sizeof (*buf)); + char* number = getbytes( 6 * sizeof (*number)); + + int i; + int j = 0; + for ( i=0; i< length; i++ ) { + if ( (basename->s_name)[i] != '/' ) { + buf[j] = (basename->s_name)[i]; + j++; + } + } + buf[j] = '\0'; + + if ( strlen(buf) == 0 ) { + sprintf(number,"p%03d",d); + } else { + sprintf(number,".p%03d",d); + } + + strcat(buf,number); + t_symbol* filename = gensym(buf); + freebytes(number, 6 * sizeof (*number)); + freebytes(buf, (length + 6) * sizeof (*buf)); + + post("File name:%s",filename->s_name); + return filename; +} + +static void paramRoute_anything(t_paramRoute *x, t_symbol *s, int ac, t_atom *av) { + + //I DEACTIVATED THE SAVE & LOAD FEATURES UNTIL I BETTER DEFINE PARAMROUTE'S STATE SAVING + + if (s == x->s_save) { // Save + + //~ if (x->id) { + //~ int n = 0; + //~ if ( ac ) n = atom_getfloat(av); + //~ t_symbol* filename = paramRoute_makefilename(x->id,n); + //~ if ( param_write(x->canvas,filename, x->id) ) + //~ pd_error("[paramRoute] could not write %s",filename->s_name); + //~ } else { + //~ pd_error(x,"[paramRoute] requires an /id"); + //~ } + } else if ( s == x->s_load) { // Load + //~ if (x->id) { + //~ int n = 0; + //~ if ( ac ) n = atom_getfloat(av); + //~ t_symbol* filename = paramRoute_makefilename(x->id,n); + //~ if ( param_read(x->canvas, paramRoute_makefilename(x->id,n)) ) + //~ pd_error("[paramRoute] could not read %s",filename->s_name);; + //~ } else { + //~ pd_error(x,"[paramRoute] requires an /id"); + //~ } + } else { // Try to send + + if (ac) { + int sendBufLength = strlen(x->basepath->s_name) + strlen(s->s_name) + 1; + char *sendBuf = (char*)getbytes((sendBufLength)*sizeof(char)); + + strcpy(sendBuf, x->basepath->s_name); + strcat(sendBuf, s->s_name); + t_symbol* target = gensym(sendBuf); + freebytes(sendBuf, (sendBufLength)*sizeof(char)); + + if (target->s_thing) { + if (target->s_thing) pd_forwardmess(target->s_thing, ac, av); + } else { + outlet_anything(x->x_outlet,s,ac,av); + } + + } + + } + +} + +// DECONSTRUCTOR +static void paramRoute_free(t_paramRoute*x) +{ + +} + +// CONSTRUCTOR +static void *paramRoute_new(t_symbol *s, int ac, t_atom *av) { + t_paramRoute *x = (t_paramRoute *)pd_new(paramRoute_class); + + x->s_save = gensym("save"); + x->s_load = gensym("load"); + x->s_empty = gensym(""); + + // String variables + char *separator = "/"; + char sbuf_name[MAXPDSTRING]; + char sbuf_temp[MAXPDSTRING]; + sbuf_name[0] = '\0'; + sbuf_temp[0] = '\0'; + + // GET THE CURRENT CANVAS + t_canvas *canvas=tof_get_canvas(); + + // Get the root canvas + x->canvas = tof_get_root_canvas(canvas); + + struct param_build_info build_info; + get_param_build_info(canvas,ac,av,&build_info,0); + + //param_get_id_stuff(canvas,sbuf_name, sbuf_temp, &(x->x_saveable)); + x->id = build_info.id; + x->basepath = build_info.basepath; + //if (x->basepath) post("PARAMROUTE BASEPATH: %s",x->basepath->s_name); + //if (x->id) post("PARAMROUTE ID: %s",x->id->s_name); + // INLETS AND OUTLETS + x->x_outlet = outlet_new(&x->x_obj, &s_list); + return (x); +} + +void paramRoute_setup(void) { + paramRoute_class = class_new(gensym("paramRoute"), + (t_newmethod)paramRoute_new, (t_method)paramRoute_free, + sizeof(t_paramRoute), 0, A_GIMME, 0); + + class_addanything(paramRoute_class, paramRoute_anything); + +} |