aboutsummaryrefslogtreecommitdiff
path: root/src/iemlib2/mergefilename.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/iemlib2/mergefilename.c')
-rw-r--r--src/iemlib2/mergefilename.c161
1 files changed, 82 insertions, 79 deletions
diff --git a/src/iemlib2/mergefilename.c b/src/iemlib2/mergefilename.c
index 8d22b5e..701b3b6 100644
--- a/src/iemlib2/mergefilename.c
+++ b/src/iemlib2/mergefilename.c
@@ -25,6 +25,8 @@ typedef struct _mergefilename
{
t_object x_obj;
char x_sep[2];
+ char *x_mem;
+ t_int x_size;
} t_mergefilename;
static void mergefilename_separator(t_mergefilename *x, t_symbol *s, int ac, t_atom *av)
@@ -33,37 +35,35 @@ static void mergefilename_separator(t_mergefilename *x, t_symbol *s, int ac, t_a
{
if(IS_A_SYMBOL(av, 0))
{
- if(strlen(av->a_w.w_symbol->s_name) == 1)
- x->x_sep[0] = av->a_w.w_symbol->s_name[0];
- else if(!strcmp(av->a_w.w_symbol->s_name, "backslash"))
+ char *name=av->a_w.w_symbol->s_name;
+
+ if(strlen(name) == 1)
+ x->x_sep[0] = name[0];
+ else if(!strcmp(name, "backslash"))
x->x_sep[0] = '\\';
- else if(!strcmp(av->a_w.w_symbol->s_name, "slash"))
+ else if(!strcmp(name, "slash"))
x->x_sep[0] = '/';
- else if(!strcmp(av->a_w.w_symbol->s_name, "blank"))
+ else if(!strcmp(name, "blank"))
x->x_sep[0] = ' ';
- else if(!strcmp(av->a_w.w_symbol->s_name, "space"))
+ else if(!strcmp(name, "space"))
x->x_sep[0] = ' ';
- else if(!strcmp(av->a_w.w_symbol->s_name, "dollar"))
+ else if(!strcmp(name, "dollar"))
x->x_sep[0] = '$';
- else if(!strcmp(av->a_w.w_symbol->s_name, "comma"))
+ else if(!strcmp(name, "comma"))
x->x_sep[0] = ',';
- else if(!strcmp(av->a_w.w_symbol->s_name, "semi"))
+ else if(!strcmp(name, "semi"))
x->x_sep[0] = ';';
- else if(!strcmp(av->a_w.w_symbol->s_name, "leftbrace"))
+ else if(!strcmp(name, "leftbrace"))
x->x_sep[0] = '{';
- else if(!strcmp(av->a_w.w_symbol->s_name, "rightbrace"))
+ else if(!strcmp(name, "rightbrace"))
x->x_sep[0] = '}';
else
x->x_sep[0] = 0;
}
else if(IS_A_FLOAT(av, 0))
{
- int i;
- float f=fabs(av->a_w.w_float);
+ t_int i=atom_getintarg(0, ac, av);
- while(f >= 10.0)
- f *= 0.1;
- i = (int)f;
x->x_sep[0] = (char)i + '0';
}
}
@@ -73,11 +73,11 @@ static void mergefilename_separator(t_mergefilename *x, t_symbol *s, int ac, t_a
static void mergefilename_float(t_mergefilename *x, t_floatarg f)
{
- char fbuf[30];
+ char flt_buf[30];
- fbuf[0] = 0;
- sprintf(fbuf, "%g", f);
- outlet_symbol(x->x_obj.ob_outlet, gensym(fbuf));
+ flt_buf[0] = 0;
+ sprintf(flt_buf, "%g", f);
+ outlet_symbol(x->x_obj.ob_outlet, gensym(flt_buf));
}
static void mergefilename_symbol(t_mergefilename *x, t_symbol *s)
@@ -87,35 +87,34 @@ static void mergefilename_symbol(t_mergefilename *x, t_symbol *s)
static void mergefilename_list(t_mergefilename *x, t_symbol *s, int ac, t_atom *av)
{
- char *cbeg, fbuf[30];
- int size=400, i, len, cursize=0;
+ char flt_buf[30];
+ t_int i, length, accu_size=0;
- cbeg = (char *)getbytes(size * sizeof(char));
- cbeg[0] = 0;
+ x->x_mem[0] = 0;
if(ac > 0)
{
if(IS_A_SYMBOL(av, 0))
{
- len = strlen(av->a_w.w_symbol->s_name);
- if((len + cursize) >= (size-1))
+ length = strlen(av->a_w.w_symbol->s_name);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, av->a_w.w_symbol->s_name);
- cursize += len;
+ strcat(x->x_mem, av->a_w.w_symbol->s_name);
+ accu_size += length;
}
else if(IS_A_FLOAT(av, 0))
{
- sprintf(fbuf, "%g", av->a_w.w_float);
- len = strlen(fbuf);
- if((len + cursize) >= (size-1))
+ sprintf(flt_buf, "%g", av->a_w.w_float);
+ length = strlen(flt_buf);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, fbuf);
- cursize += len;
+ strcat(x->x_mem, flt_buf);
+ accu_size += length;
}
}
@@ -124,84 +123,86 @@ static void mergefilename_list(t_mergefilename *x, t_symbol *s, int ac, t_atom *
for(i=1; i<ac; i++)
{
av++;
- strcat(cbeg, x->x_sep);
+ strcat(x->x_mem, x->x_sep);
if(IS_A_SYMBOL(av, 0))
{
- len = strlen(av->a_w.w_symbol->s_name);
- if((len + cursize) >= (size-1))
+ length = strlen(av->a_w.w_symbol->s_name);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, av->a_w.w_symbol->s_name);
- cursize += len;
+ strcat(x->x_mem, av->a_w.w_symbol->s_name);
+ accu_size += length;
}
else if(IS_A_FLOAT(av, 0))
{
- sprintf(fbuf, "%g", av->a_w.w_float);
- len = strlen(fbuf);
- if((len + cursize) >= (size-1))
+ sprintf(flt_buf, "%g", av->a_w.w_float);
+ length = strlen(flt_buf);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, fbuf);
- cursize += len;
+ strcat(x->x_mem, flt_buf);
+ accu_size += length;
}
}
}
- outlet_symbol(x->x_obj.ob_outlet, gensym(cbeg));
- freebytes(cbeg, size * sizeof(char));
+ outlet_symbol(x->x_obj.ob_outlet, gensym(x->x_mem));
}
static void mergefilename_anything(t_mergefilename *x, t_symbol *s, int ac, t_atom *av)
{
- char *cbeg, fbuf[30];
- int size=400, i, len, cursize=0;
+ char flt_buf[30];
+ t_int i, length, accu_size=0;
- cbeg = (char *)getbytes(size * sizeof(char));
- cbeg[0] = 0;
- len = strlen(s->s_name);
- if((len + cursize) >= (size-1))
+ x->x_mem[0] = 0;
+ length = strlen(s->s_name);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, s->s_name);
- cursize += len;
+ strcat(x->x_mem, s->s_name);
+ accu_size += length;
if(ac > 0)
{
for(i=0; i<ac; i++)
{
- strcat(cbeg, x->x_sep);
+ strcat(x->x_mem, x->x_sep);
if(IS_A_SYMBOL(av, 0))
{
- len = strlen(av->a_w.w_symbol->s_name);
- if((len + cursize) >= (size-1))
+ length = strlen(av->a_w.w_symbol->s_name);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, av->a_w.w_symbol->s_name);
- cursize += len;
+ strcat(x->x_mem, av->a_w.w_symbol->s_name);
+ accu_size += length;
}
else if(IS_A_FLOAT(av, 0))
{
- sprintf(fbuf, "%g", av->a_w.w_float);
- len = strlen(fbuf);
- if((len + cursize) >= (size-1))
+ sprintf(flt_buf, "%g", av->a_w.w_float);
+ length = strlen(flt_buf);
+ if((length + accu_size) >= (x->x_size-2))
{
- cbeg = (char *)resizebytes(cbeg, size*sizeof(char), 2*(len + cursize)*sizeof(char));
- size = 2*(len + cursize);
+ x->x_mem = (char *)resizebytes(x->x_mem, x->x_size*sizeof(char), 2*(length + accu_size)*sizeof(char));
+ x->x_size = 2*(length + accu_size);
}
- strcat(cbeg, fbuf);
- cursize += len;
+ strcat(x->x_mem, flt_buf);
+ accu_size += length;
}
av++;
}
}
- outlet_symbol(x->x_obj.ob_outlet, gensym(cbeg));
- freebytes(cbeg, size * sizeof(char));
+ outlet_symbol(x->x_obj.ob_outlet, gensym(x->x_mem));
+}
+
+static void mergefilename_free(t_mergefilename *x)
+{
+ freebytes(x->x_mem, x->x_size*sizeof(char));
}
static void *mergefilename_new(t_symbol *s, int ac, t_atom *av)
@@ -212,6 +213,8 @@ static void *mergefilename_new(t_symbol *s, int ac, t_atom *av)
x->x_sep[1] = 0;
if(ac > 0)
mergefilename_separator(x, s, ac, av);
+ x->x_size = 400;
+ x->x_mem = (char *)getbytes(x->x_size*sizeof(char));
outlet_new(&x->x_obj, &s_symbol);
return (x);
}