diff options
author | Thomas White <taw@bitwiz.org.uk> | 2014-12-26 22:34:04 +0000 |
---|---|---|
committer | Thomas White <taw@bitwiz.org.uk> | 2014-12-26 22:34:04 +0000 |
commit | e8c7ca3bbc48da3d9806b92abb3827e331594eee (patch) | |
tree | 835a47ee47920f1839071c43ead401bf9c4358e1 /src/sc_interp.c | |
parent | b6963faaa75b3fa6ff22ec0bf43670ac9b34279f (diff) |
Callback stuff
Diffstat (limited to 'src/sc_interp.c')
-rw-r--r-- | src/sc_interp.c | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/src/sc_interp.c b/src/sc_interp.c index 7799971..f628754 100644 --- a/src/sc_interp.c +++ b/src/sc_interp.c @@ -85,6 +85,7 @@ struct _sccallbacklist int max_callbacks; char **names; SCCallbackFunc *funcs; + void **vps; }; @@ -101,6 +102,9 @@ SCCallbackList *sc_callback_list_new() cbl->funcs = calloc(8, sizeof(cbl->funcs[0])); if ( cbl->funcs == NULL ) return NULL; + cbl->vps = calloc(8, sizeof(cbl->vps[0])); + if ( cbl->vps == NULL ) return NULL; + cbl->max_callbacks = 8; cbl->n_callbacks = 0; @@ -120,35 +124,41 @@ void sc_callback_list_free(SCCallbackList *cbl) free(cbl->names); free(cbl->funcs); + free(cbl->vps); free(cbl); } void sc_callback_list_add_callback(SCCallbackList *cbl, const char *name, - SCCallbackFunc func) + SCCallbackFunc func, void *vp) { if ( cbl->n_callbacks == cbl->max_callbacks ) { SCCallbackFunc *funcs_new; char **names_new; + void **vps_new; int mcn = cbl->max_callbacks + 8; names_new = realloc(cbl->names, mcn*sizeof(char *)); funcs_new = realloc(cbl->funcs, mcn*sizeof(SCCallbackFunc)); + vps_new = realloc(cbl->vps, mcn*sizeof(void *)); - if ( (names_new == NULL) || (funcs_new == NULL) ) { + if ( (names_new == NULL) || (funcs_new == NULL) + || (vps_new == NULL) ) { fprintf(stderr, "Failed to grow callback list\n"); return; } cbl->names = names_new; cbl->funcs = funcs_new; + cbl->vps = vps_new; cbl->max_callbacks = mcn; } cbl->names[cbl->n_callbacks] = strdup(name); cbl->funcs[cbl->n_callbacks] = func; + cbl->vps[cbl->n_callbacks] = vp; cbl->n_callbacks++; } @@ -163,7 +173,7 @@ void sc_interp_set_callbacks(SCInterpreter *scin, SCCallbackList *cbl) } -static void do_callback(SCInterpreter *scin, const char *name) +static void do_callback(SCInterpreter *scin, SCBlock *bl, const char *name) { int i; SCCallbackList *cbl = scin->cbl; @@ -175,7 +185,7 @@ static void do_callback(SCInterpreter *scin, const char *name) for ( i=0; i<cbl->n_callbacks; i++ ) { if ( strcmp(cbl->names[i], name) != 0 ) continue; - cbl->funcs[i](NULL, NULL); + cbl->funcs[i](scin, bl, cbl->vps[i]); return; } @@ -917,7 +927,7 @@ int sc_interp_add_blocks(SCInterpreter *scin, SCBlock *bl) set_frame_bggrad(sc_interp_get_frame(scin), options, GRAD_VERT); } else if ( strcmp(name, "callback") == 0 ) { - do_callback(scin, options); + do_callback(scin, bl, options); } else { |