[PD-cvs] externals/miXed/riddle riddle.c, NONE, 1.1 riddle.h, NONE, 1.1
Krzysztof Czaja
krzyszcz at users.sourceforge.net
Sun Jun 24 02:20:25 CEST 2007
Update of /cvsroot/pure-data/externals/miXed/riddle
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5264
Added Files:
riddle.c riddle.h
Log Message:
--- NEW FILE: riddle.h ---
/* Copyright (c) 2007 krzYszcz and others.
* For information on usage and redistribution, and for a DISCLAIMER OF ALL
* WARRANTIES, see the file, "LICENSE.txt," in this distribution. */
#ifndef __RIDDLE_H__
#define __RIDDLE_H__
EXTERN_STRUCT _riddle;
#define t_riddle struct _riddle
EXTERN_STRUCT _rdsource;
#define t_rdsource struct _rdsource
EXTERN_STRUCT _rdsink;
#define t_rdsink struct _rdsink
EXTERN_STRUCT _rdpool;
#define t_rdpool struct _rdpool
EXTERN_STRUCT _rdbuffer;
#define t_rdbuffer struct _rdbuffer
typedef void (*t_rdblockfn)(t_riddle *);
typedef void (*t_rddspfn)(t_riddle *, t_signal **);
struct _riddle
{
t_sic rd_sic;
/* designed for system-level control: block mismatches, etc.
(user-level control via '_idle' slot in graphpool) */
int rd_disabled;
int rd_wasdisabled;
t_rdblockfn rd_blockfn;
t_rddspfn rd_dspfn;
t_rdpool *rd_graphpool;
int rd_graphsr;
int rd_graphblock;
int rd_nsiginlets;
int rd_nremoteslots;
t_rdsource *rd_inslots; /* rd_nsiginlets + rd_nremoteslots elements */
t_rdsource *rd_remoteslots; /* == rd_inslots + rd_nsiginlets */
int rd_nsigoutlets;
t_rdsink *rd_outslots; /* rd_nsigoutlets elements */
int rd_remotesource; /* LATER consider storing remote sources here */
};
void riddlebug_post(t_riddle *rd, char *pfx, char *fmt, ...);
int riddle_getsr(t_riddle *rd);
int riddle_getgraphblock(t_riddle *rd);
int riddle_getsourceblock(t_riddle *rd, int siginno);
t_symbol *riddle_getsourcepattern(t_riddle *rd, int siginno, int *maxblockp);
int riddle_getoutblock(t_riddle *rd, int sigoutno);
t_symbol *riddle_getoutpattern(t_riddle *rd, int sigoutno, int *maxblockp);
void riddle_setoutblock(t_riddle *rd, int sigoutno, int newblock);
void riddle_setoutpattern(t_riddle *rd, int sigoutno,
t_symbol *pattern, int maxblock);
int riddle_checksourceblock(t_riddle *rd, int siginno, int reqblock);
int riddle_checksourcepattern(t_riddle *rd, int siginno,
t_symbol *reqpattern, int *maxblockp);
int riddle_checkanysource(t_riddle *rd, int siginno);
int riddle_isdisabled(t_riddle *rd);
void riddle_disable(t_riddle *rd);
void riddle_mute(t_riddle *rd, t_signal **sp);
t_class *riddle_setup(t_symbol *name, t_newmethod newfn, t_method freefn,
size_t sz, t_method floatfn,
t_rdblockfn blockfn, t_rddspfn dspfn);
void riddle_updatedsp(void);
void rdpool_set(t_rdpool *rp, t_symbol *key, int size, t_float *data);
void rdpool_setbygraph(t_canvas *graph, t_symbol *key, int size, t_float *data);
t_float *rdpool_get(t_rdpool *rp, t_symbol *key, int *sizep);
t_float *riddle_getlink(t_riddle *rd, t_symbol *key, int *sizep);
t_canvas *riddle_getgraph(t_riddle *rd, int sigoutno);
t_rdbuffer *riddle_getbuffer(t_symbol *name);
t_rdbuffer *rdbuffer_getwriter(t_rdbuffer *rb);
void rdbuffer_validate(t_rdbuffer *rb, int nblock);
void rdbuffer_reset(t_rdbuffer *rb);
int rdbuffer_getframesize(t_rdbuffer *rb);
t_float *rdbuffer_gethead(t_rdbuffer *rb);
void rdbuffer_stephead(t_rdbuffer *rb);
void rdbuffer_movehead(t_rdbuffer *rb, int nframes);
void rdbuffer_delayhead(t_rdbuffer *rb, int nframes);
void rdbuffer_free(t_rdbuffer *rb);
t_rdbuffer *rdbuffer_new(t_riddle *owner, t_symbol *name, int nframes);
t_rdbuffer *rdbuffer_newreader(t_riddle *owner, t_symbol *name);
int riddle_erbfill(int nbands, int *buf, int nblock, int sr);
#endif
--- NEW FILE: riddle.c ---
/* Copyright (c) 2007 krzYszcz and others.
* For information on usage and redistribution, and for a DISCLAIMER OF ALL
* WARRANTIES, see the file, "LICENSE.txt," in this distribution. */
#include <stdio.h>
#include <stdarg.h>
#include <string.h>
#include <math.h>
#include "m_pd.h"
#include "common/loud.h"
#include "common/grow.h"
#include "sickle/sic.h"
#include "riddle.h"
/* obj_starttraverseoutlet, obj_nexttraverseoutlet, obj_noutlets,
obj_nsiginlets, obj_nsigoutlets, obj_siginletindex, obj_sigoutletindex,
obj_issignalinlet, obj_issignaloutlet */
#include "m_imp.h"
[...1307 lines suppressed...]
double fc = df;
int i, erbcount = 0, bincount = 0, lastbin = 0;
int bufsize = nbands + 1;
while (erbcount < nbands && fc < fmax)
{
/* the formula is taken from ~jos/bbt
(the results slightly differ from moore-glasberg's demos) */
double erbnumber = coef * log(.00437 * fc + 1.);
bincount++;
if ((int)erbnumber > erbcount) /* LATER rethink */
{
buf[erbcount++] = bincount - lastbin;
lastbin = bincount;
}
fc += df;
}
for (i = erbcount; i < bufsize; i++)
buf[i] = 0;
return (erbcount);
}
More information about the Pd-cvs
mailing list