From 4f8c7c28f8ece71d15ed28ae30f253725f1efa39 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sat, 20 Oct 2012 18:32:25 +0000 Subject: update code format to pd-style: astyle --style=ansi --align-pointer=name *.c svn path=/trunk/externals/moonlib/; revision=16427 --- absolutepath.c | 145 +++++++++++++++++++++++++++++---------------------------- 1 file changed, 75 insertions(+), 70 deletions(-) (limited to 'absolutepath.c') diff --git a/absolutepath.c b/absolutepath.c index 0b44dcb..e6d94d7 100644 --- a/absolutepath.c +++ b/absolutepath.c @@ -1,6 +1,6 @@ #ifndef _WIN32 /* -Copyright (C) 2002 Antoine Rousseau +Copyright (C) 2002 Antoine Rousseau This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public @@ -14,7 +14,7 @@ Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software -Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ @@ -44,9 +44,9 @@ typedef struct _absolutepath { t_object x_obj; t_canvas *x_canvas; - int x_dolzero; - int x_realized; -}t_absolutepath; + int x_dolzero; + int x_realized; +} t_absolutepath; t_class *absolutepath_class; @@ -54,89 +54,94 @@ void absolutepath_setup(void); static t_glist *getcanvas(t_glist *can,int d0) { - t_canvas *retcan=0; - t_gobj *ob; - - if((can->gl_env)&&(can->gl_env->ce_dollarzero==d0)){ - return can; - } - - ob=can->gl_list; - while(ob&&(retcan==0)) { - if (pd_class(&ob->g_pd) == canvas_class) - retcan=getcanvas((t_glist *)ob,d0); - ob=ob->g_next; - } - - if((!retcan)&&(can->gl_next)) retcan=getcanvas((t_glist *)can->gl_next,d0); - return retcan; + t_canvas *retcan=0; + t_gobj *ob; + + if((can->gl_env)&&(can->gl_env->ce_dollarzero==d0)) + { + return can; + } + + ob=can->gl_list; + while(ob&&(retcan==0)) + { + if (pd_class(&ob->g_pd) == canvas_class) + retcan=getcanvas((t_glist *)ob,d0); + ob=ob->g_next; + } + + if((!retcan)&&(can->gl_next)) retcan=getcanvas((t_glist *)can->gl_next,d0); + return retcan; } static void absolutepath_symbol(t_absolutepath *x,t_symbol *sym) { - t_canvas *can=0; + t_canvas *can=0; char buf[MAXPDSTRING], *bufptr, - *instr=sym->s_name, - canname[MAXPDSTRING],totaldir[MAXPDSTRING], - *cnamedir, - *candir; - unsigned int n,i=0; - int fd; - - if(!x->x_realized) can=(t_canvas*)getcanvas(canvas_list,x->x_dolzero); - if(can) { - x->x_canvas = can; - x->x_realized = 1; - //post("found $0 canvas : %x %d ",x->x_canvas, x->x_canvas->gl_env->ce_dollarzero ); - } - - if(!instr) return; - - candir=canvas_getdir(x->x_canvas)->s_name; - if(!candir) candir=""; - - //post("input= %s candir= %s glname=%s",instr,candir,x->x_canvas->gl_name->s_name); - - strcpy(canname,x->x_canvas->gl_name->s_name); - cnamedir=dirname(canname); - - if (strcmp(cnamedir,".")) { - sprintf(totaldir,"%s/%s",candir,cnamedir); - fd=open_via_path(totaldir,instr ,"",buf, &bufptr, MAXPDSTRING, 1); - } - else - fd=open_via_path(candir, instr, "",buf, &bufptr, MAXPDSTRING, 1); - - if (fd>=0) { - close(fd); - buf[strlen(buf)]='/'; - outlet_symbol(x->x_obj.ob_outlet,gensym(buf)); - } - return; + *instr=sym->s_name, + canname[MAXPDSTRING],totaldir[MAXPDSTRING], + *cnamedir, + *candir; + unsigned int n,i=0; + int fd; + + if(!x->x_realized) can=(t_canvas *)getcanvas(canvas_list,x->x_dolzero); + if(can) + { + x->x_canvas = can; + x->x_realized = 1; + //post("found $0 canvas : %x %d ",x->x_canvas, x->x_canvas->gl_env->ce_dollarzero ); + } + + if(!instr) return; + + candir=canvas_getdir(x->x_canvas)->s_name; + if(!candir) candir=""; + + //post("input= %s candir= %s glname=%s",instr,candir,x->x_canvas->gl_name->s_name); + + strcpy(canname,x->x_canvas->gl_name->s_name); + cnamedir=dirname(canname); + + if (strcmp(cnamedir,".")) + { + sprintf(totaldir,"%s/%s",candir,cnamedir); + fd=open_via_path(totaldir,instr ,"",buf, &bufptr, MAXPDSTRING, 1); + } + else + fd=open_via_path(candir, instr, "",buf, &bufptr, MAXPDSTRING, 1); + + if (fd>=0) + { + close(fd); + buf[strlen(buf)]='/'; + outlet_symbol(x->x_obj.ob_outlet,gensym(buf)); + } + return; } static void *absolutepath_new(t_float dolzero) { - t_absolutepath *x = (t_absolutepath *)pd_new(absolutepath_class); - t_canvas *can=canvas_list; - int d0; - - outlet_new(&x->x_obj, 0); + t_absolutepath *x = (t_absolutepath *)pd_new(absolutepath_class); + t_canvas *can=canvas_list; + int d0; + + outlet_new(&x->x_obj, 0); x->x_canvas = canvas_getcurrent(); - x->x_dolzero = dolzero; - x->x_realized=dolzero?0:1; + x->x_dolzero = dolzero; + x->x_realized=dolzero?0:1; - return (void *)x; + return (void *)x; } void absolutepath_setup(void) { - absolutepath_class = class_new(gensym("absolutepath"),(t_newmethod)absolutepath_new, - 0, sizeof(t_absolutepath), 0,A_DEFFLOAT, 0); + absolutepath_class = class_new(gensym("absolutepath"),(t_newmethod)absolutepath_new, + 0, sizeof(t_absolutepath), 0,A_DEFFLOAT, 0); - class_addsymbol(absolutepath_class, absolutepath_symbol); + class_addsymbol(absolutepath_class, absolutepath_symbol); } #endif /* NOT _WIN32 */ -- cgit v1.2.1