Bibliothèque de traitements d'images en virgule flottante.
http://la.buvette.org/photos/cumul/
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
243 lines
5.4 KiB
243 lines
5.4 KiB
/* |
|
* filterstack.c |
|
*/ |
|
|
|
#include <stdio.h> |
|
#include <stdlib.h> |
|
#include <stdint.h> |
|
#include <string.h> |
|
#include <ctype.h> |
|
#include <alloca.h> |
|
|
|
#include "../floatimg.h" |
|
#include "crapulator.h" |
|
#include "filterstack.h" |
|
|
|
// #undef DEBUG_LEVEL |
|
// #define DEBUG_LEVEL 1 |
|
|
|
/* -------------------------------------------------------------- */ |
|
|
|
extern int verbosity; |
|
|
|
static FilterStack f_stacks[NUMBER_OF_STACK]; |
|
|
|
/* -------------------------------------------------------------- */ |
|
int filterstack_init(int numid, int notused) |
|
{ |
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( %d %d )\n", __func__, numid, notused); |
|
#endif |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
memset(&f_stacks[numid], 0, sizeof(FilterSlot)); |
|
|
|
return 0; |
|
} |
|
/* -------------------------------------------------------------- */ |
|
int filterstack_add(int numid, int code, int ival, float fval) |
|
{ |
|
int idxsl; |
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( %d %d %f )\n", __func__, code, ival, fval); |
|
#endif |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
if (f_stacks[numid].count == FILTER_BY_STACK) { |
|
fprintf(stderr, "%s: stack is full\n", __func__); |
|
return -1; |
|
} |
|
|
|
idxsl = f_stacks[numid].count; /* aliasing */ |
|
|
|
f_stacks[numid].slots[idxsl].numero = code; |
|
f_stacks[numid].slots[idxsl].ival = ival; |
|
f_stacks[numid].slots[idxsl].fval = fval; |
|
|
|
f_stacks[numid].count++; |
|
|
|
return 0; |
|
} |
|
/* -------------------------------------------------------------- */ |
|
int filterstack_list(int numid, const char *txt) |
|
{ |
|
int idx; |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
fprintf(stderr, "---- %2d ---- %-20s -----------\n", numid, txt); |
|
// fprintf(stderr, "stack at %p, size %d, current %d\n", |
|
// f_slots, nbre_filters, idx_slot); |
|
fprintf(stderr, "idx ___ fx# _ name ________ ival _ fval ___\n"); |
|
|
|
for (idx=0; idx<f_stacks[numid].count; idx++) { |
|
|
|
fprintf(stderr, "%3d %3d %-10s %3d %f\n", idx, |
|
f_stacks[numid].slots[idx].numero, |
|
crap_name_from_number(f_stacks[numid].slots[idx].numero), |
|
f_stacks[numid].slots[idx].ival, |
|
f_stacks[numid].slots[idx].fval); |
|
|
|
} |
|
|
|
return 0; |
|
} |
|
/* -------------------------------------------------------------- */ |
|
int filterstack_run(int numid, FloatImg *target, int notused) |
|
{ |
|
int idx, foo, eff; |
|
float fv; |
|
|
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( %p %d )\n", __func__, target, notused); |
|
#endif |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
if (0==f_stacks[numid].count) { |
|
fprintf(stderr, "%s: stack %d empty ?\n", __func__, numid); |
|
return -11; |
|
} |
|
|
|
for (idx=0; idx<f_stacks[numid].count; idx++) { |
|
|
|
eff = f_stacks[numid].slots[idx].numero; |
|
fv = f_stacks[numid].slots[idx].fval; |
|
|
|
if (verbosity > 1) |
|
fprintf(stderr, "stack %d idx %d : effect %2d on %p\n", |
|
numid, idx, eff, target); |
|
|
|
foo = crapulator(target, eff, fv); |
|
|
|
if (foo) { |
|
fprintf(stderr, |
|
"crapulator give me error %d on effect %d (%s)\n", |
|
foo, eff, |
|
crap_name_from_number(eff)); |
|
return foo; |
|
} |
|
} |
|
|
|
return 0; |
|
} |
|
/* -------------------------------------------------------------- */ |
|
int load_stack_from_file(int numid, char *fname, int notused) |
|
{ |
|
FILE *fp; |
|
// int a, b; |
|
// float f; |
|
// char line[100]; |
|
|
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( '%s' %d )\n", __func__, fname, notused); |
|
#endif |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
if (NULL==(fp=fopen(fname, "r"))) { |
|
perror(fname); |
|
return -1; |
|
} |
|
|
|
/* |
|
* here was dragons |
|
*/ |
|
/* hadoc parser ? */ |
|
|
|
fclose(fp); |
|
|
|
return -1; |
|
} |
|
/* -------------------------------------------------------------- */ |
|
int parse_filter_chain(int numid, char *argument) |
|
{ |
|
char *cptr, *tmparg; |
|
int value, foo; |
|
|
|
if (numid < 0 || numid > NUMBER_OF_STACK) { |
|
fprintf(stderr, "%s: slot number %d is invalid\n", __func__, numid); |
|
exit(1); |
|
} |
|
|
|
#if DEBUG_LEVEL |
|
fprintf(stderr, "\n%s: arg = '%s'\n", __func__, argument); |
|
#endif |
|
|
|
foo = filterstack_init(numid, 8); |
|
if (foo) { |
|
fprintf(stderr, "%s: filterstack init --> %d\n", __func__, foo); |
|
return foo; |
|
} |
|
|
|
/* BUG ? |
|
If the 'argument' string is coming from a default value (as defined |
|
here in main), strtok make a nice segfault. so I make a copy of that |
|
string... |
|
*/ |
|
tmparg = alloca(strlen(argument) + 1); |
|
if (NULL==tmparg) { |
|
fprintf(stderr, "memory panic in %s:%s\n", __FILE__, __func__); |
|
exit(1); |
|
} |
|
strcpy(tmparg, argument); |
|
|
|
for (;;) { |
|
cptr = strtok(tmparg, ":"); |
|
// fprintf(stderr, "cptr %p\n", cptr); |
|
if (NULL==cptr) break; |
|
tmparg = NULL; /* for the next pass of strtok */ |
|
// fprintf(stderr, " parsing '%s'\n", cptr); |
|
|
|
if (isalpha(*cptr)) { |
|
value = crap_number_from_name(cptr); |
|
// fprintf(stderr, "%s: '%s' -> %d\n", __func__, |
|
// cptr, value); |
|
if (value < 0) { |
|
fprintf(stderr, "%s: '%s' not found\n", |
|
__func__, cptr); |
|
return -1; |
|
} |
|
foo = filterstack_add(numid, value, 1, 1.0); |
|
continue; |
|
} |
|
|
|
if ('@' == cptr[0]) { |
|
fprintf(stderr, "%s: got indirect '%s'\n", __func__, |
|
cptr+1); |
|
continue; |
|
} |
|
|
|
if (1 == sscanf(cptr, "%d", &value)) { |
|
foo = filterstack_add(numid, value, 1, 1.0); |
|
if (foo) { |
|
fprintf(stderr, "%s: err %d add\n", |
|
__func__, foo); |
|
} |
|
continue; |
|
} |
|
} |
|
|
|
if (verbosity > 1) filterstack_list(numid, __func__); |
|
return 0; |
|
} |
|
/* ----------------------------------------------------------- */ |
|
|
|
|
|
|