forked from tTh/FloatImg
390 lines
7.7 KiB
C
390 lines
7.7 KiB
C
/*
|
|
* crapulator.c
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include "../floatimg.h"
|
|
|
|
#include "fifo.h"
|
|
#include "crapulator.h"
|
|
#include "glitches.h"
|
|
#include "sfx.h"
|
|
|
|
extern int verbosity;
|
|
|
|
/* -------------------------------------------------------------- */
|
|
static int trier_les_pixels(FloatImg *pimg)
|
|
{
|
|
FloatImg copy;
|
|
int foo;
|
|
|
|
fimg_clone(pimg, ©, 1);
|
|
|
|
foo = fimg_qsort_rgb_a(pimg, ©, 0);
|
|
if (foo) {
|
|
fprintf(stderr, "%s: err qsort rgb = %d\n", __func__, foo);
|
|
return foo;
|
|
}
|
|
|
|
incrustation_vignette(pimg, ©, 0);
|
|
|
|
fimg_copy_data(©, pimg);
|
|
|
|
fimg_destroy(©);
|
|
|
|
return 0;
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
static int effect_3(FloatImg *image)
|
|
{
|
|
float value;
|
|
int foo;
|
|
|
|
value = fimg_get_maxvalue(image);
|
|
fimg_mul_cste(image, -1.0);
|
|
fimg_add_cste(image, value);
|
|
foo = fimg_count_negativ(image);
|
|
if (foo) {
|
|
fimg_dump_to_file(image, "err.fimg", 0);
|
|
fprintf(stderr, "%s negativ %d\n",
|
|
__func__, foo);
|
|
return -78;
|
|
}
|
|
return 0;
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
static int insitu_ctr2x2(FloatImg *pimg)
|
|
{
|
|
FloatImg img;
|
|
int retval;
|
|
|
|
fimg_clone(pimg, &img, 0);
|
|
retval = fimg_contour_2x2(pimg, &img, 0);
|
|
if (retval) {
|
|
fprintf(stderr, "%s : err contour %d\n",
|
|
__func__, retval);
|
|
exit(1);
|
|
}
|
|
fimg_copy_data(&img, pimg);
|
|
fimg_destroy(&img);
|
|
|
|
return 0;
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
static int insitu_filtre3x3(FloatImg *pimg, int typef)
|
|
{
|
|
FloatImg img;
|
|
int foo, retval;
|
|
FimgFilter3x3 *pfiltre;
|
|
|
|
FimgFilter3x3 lowpass = {
|
|
{
|
|
1.0, 2.0, 1.0,
|
|
2.0, 4.0, 2.0,
|
|
1.0, 2.0, 1.0,
|
|
},
|
|
16.0, 0.0
|
|
};
|
|
|
|
FimgFilter3x3 hipass = {
|
|
{
|
|
-1.0, -1.0, -1.0,
|
|
-1.0, 9.0, -1.0,
|
|
-1.0, -1.0, -1.0,
|
|
},
|
|
1.0, 0.0
|
|
};
|
|
|
|
FimgFilter3x3 diagonal = {
|
|
{
|
|
2.0, 1.0, 0.0,
|
|
1.0, 0.0, -1.0,
|
|
0.0, -1.0, -2.0,
|
|
},
|
|
1.0, 0.0
|
|
};
|
|
|
|
switch (typef) {
|
|
case 0: pfiltre = &lowpass; break;
|
|
case 1: pfiltre = &hipass; break;
|
|
case 2: pfiltre = &diagonal; break;
|
|
default:
|
|
fprintf(stderr, "%s: bad filter number %d\n",
|
|
__func__, typef);
|
|
return -6;
|
|
break;
|
|
}
|
|
|
|
fimg_clone(pimg, &img, 0);
|
|
|
|
retval = fimg_filter_3x3(pimg, &img, pfiltre);
|
|
if (retval) {
|
|
fprintf(stderr, "%s error %d on filter\n", __func__, retval);
|
|
exit(1);
|
|
}
|
|
(void)fimg_killborders(&img); /* nice try ? */
|
|
|
|
foo = fimg_auto_shift_to_zero(&img, &img);
|
|
if (foo) {
|
|
fprintf(stderr, "%s: err %d zero shift\n", __func__, foo);
|
|
exit(1);
|
|
}
|
|
|
|
/** may be, we can check for negative values ? */
|
|
/** or is this useless because whe have shifted to zero ? */
|
|
if (verbosity > 1) {
|
|
foo = fimg_count_negativ(&img);
|
|
if (foo) {
|
|
fprintf(stderr, "%s -> %d / %d negative pixels\n", __func__,
|
|
foo, img.width*img.height);
|
|
}
|
|
}
|
|
|
|
fimg_killborders(&img);
|
|
fimg_copy_data(&img, pimg);
|
|
fimg_destroy(&img);
|
|
|
|
return retval;
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
/*
|
|
* This is the main filter engine used both for input and
|
|
* output processing. It can be called by the filterstack
|
|
* processor.
|
|
*/
|
|
|
|
#define DEBUG_THIS_CRAP 0
|
|
|
|
int crapulator(FloatImg *image, int idFx, float fval)
|
|
{
|
|
int retval;
|
|
// FloatImg imgtmp;
|
|
|
|
#if DEBUG_LEVEL
|
|
fprintf(stderr, ">>> %s ( %p %d %f )\n", __func__,
|
|
image, idFx, fval);
|
|
#endif
|
|
|
|
#if DEBUG_THIS_CRAP
|
|
static int count = 0;
|
|
int flag_debug = 0;
|
|
if (DEBUG_THIS_CRAP==count) {
|
|
flag_debug = 1;
|
|
fprintf(stderr, "DEBUG PT 1 in %s:%d\n", __func__, __LINE__);
|
|
fimg_save_as_png(image, "crap_before.png", 0);
|
|
}
|
|
#endif
|
|
|
|
retval = 0;
|
|
|
|
switch (idFx) {
|
|
case CR_none: /* DO NOTHING */
|
|
retval = 0;
|
|
break;
|
|
|
|
case CR_cos01:
|
|
fimg_cos_01(image, image,
|
|
fimg_get_maxvalue(image));
|
|
break;
|
|
case CR_cos010:
|
|
fimg_cos_010(image, image,
|
|
fimg_get_maxvalue(image));
|
|
break;
|
|
case CR_fx3:
|
|
retval = effect_3(image);
|
|
break;
|
|
case CR_rnd48a:
|
|
brotche_rand48_a(image, 0.20,
|
|
fimg_get_maxvalue(image));
|
|
break;
|
|
case CR_rnd48b:
|
|
brotche_rand48_b(image, 0.10,
|
|
fimg_get_maxvalue(image)*0.8);
|
|
break;
|
|
case CR_killcola:
|
|
retval = fimg_killcolors_a(image, 0.0);
|
|
break;
|
|
case CR_colmixa:
|
|
retval = fimg_colors_mixer_a(image, 2.0);
|
|
break;
|
|
case CR_ctr2x2:
|
|
retval = insitu_ctr2x2(image);
|
|
break;
|
|
case CR_classtrial:
|
|
retval = fimg_classif_trial(image, image, 0.37, 0);
|
|
break;
|
|
case CR_binarize:
|
|
retval = fimg_binarize(image, 0);
|
|
break;
|
|
case CR_trinarize:
|
|
retval = fimg_trinarize(image, 0);
|
|
break;
|
|
case CR_liss2x2:
|
|
retval = fimg_lissage_2x2(image);
|
|
// (void)fimg_killborders(image);
|
|
break;
|
|
case CR_liss3x3:
|
|
/* smooth filter */
|
|
retval = insitu_filtre3x3(image, 0);
|
|
break;
|
|
case CR_desaturate:
|
|
retval = fimg_desaturate(image, image, 0);
|
|
break;
|
|
case CR_killlines:
|
|
retval = kill_a_few_lines(image, fval,
|
|
image->height/20);
|
|
break;
|
|
case CR_water:
|
|
retval = bouger_les_pixels(image, 12);
|
|
break;
|
|
case CR_mirsplit:
|
|
retval = mirror_split(image, 0);
|
|
break;
|
|
case CR_updown:
|
|
retval = upside_down(image);
|
|
break;
|
|
case CR_hipass:
|
|
/* hipass filter */
|
|
retval = insitu_filtre3x3(image, 1);
|
|
break;
|
|
case CR_diagonal:
|
|
retval = insitu_filtre3x3(image, 2);
|
|
break;
|
|
case CR_octotree:
|
|
retval = octotree_classif(image, 0.500, 0);
|
|
break;
|
|
|
|
case CR_trinitron:
|
|
retval = trinitron(image, 0);
|
|
break;
|
|
|
|
/* here are the glitches */
|
|
case CR_bsombra: /* experiment ! */
|
|
retval = des_bords_sombres_a(image, 160);
|
|
break;
|
|
case CR_vsglitch:
|
|
/* please make this function more tweakable */
|
|
retval = vertical_singlitch(image, 290+rand()%45,
|
|
fval, 0.19, 0);
|
|
break;
|
|
|
|
case CR_rndblks:
|
|
retval = random_blocks(image, 70);
|
|
break;
|
|
|
|
case CR_shiftln0:
|
|
retval = multilines_shift_0(image, 11, 120);
|
|
break;
|
|
|
|
case CR_qsortrgb:
|
|
retval = trier_les_pixels(image);
|
|
break;
|
|
|
|
case CR_multidots:
|
|
retval = plot_multidots(image, 42);
|
|
break;
|
|
|
|
case CR_message:
|
|
fprintf(stderr, "### msg from pid %d, fval=%f ###\n",
|
|
getpid(), fval);
|
|
retval = 0;
|
|
break;
|
|
|
|
case CR_nothing:
|
|
retval = do_something(image, 3);
|
|
break;
|
|
|
|
case CR_hilightr:
|
|
retval = fimg_highlight_color(image, image, 'R', 1.717);
|
|
break;
|
|
|
|
default :
|
|
fprintf(stderr, "%s : effect #%d invalid\n",
|
|
__func__, idFx);
|
|
return -77;
|
|
}
|
|
|
|
#if DEBUG_THIS_CRAP
|
|
if (flag_debug) {
|
|
fprintf(stderr, "DEBUG PT 2 in %s:%d\n", __func__, __LINE__);
|
|
fimg_save_as_png(image, "crap_after.png", 0);
|
|
flag_debug = 0;
|
|
}
|
|
count++;
|
|
#endif
|
|
|
|
return retval;
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
typedef struct {
|
|
int id;
|
|
char *name;
|
|
int ipar;
|
|
float fpar;
|
|
int flags;
|
|
} Crapulor;
|
|
|
|
/* Warning: overengeniring inside */
|
|
#include "crapstr.h" /* generated file ! */
|
|
#define NBCRAP (sizeof(CrapL)/sizeof(Crapulor))
|
|
|
|
void list_crapulors(char *texte)
|
|
{
|
|
int idx;
|
|
|
|
#define OUT stdout
|
|
fprintf(OUT, "______________. %s\n", texte);
|
|
for (idx=0; CrapL[idx].id!=-1; idx++) {
|
|
fprintf(OUT, " %-12s | %4d | %5d | %8.3f\n",
|
|
CrapL[idx].name,
|
|
CrapL[idx].id,
|
|
CrapL[idx].ipar,
|
|
CrapL[idx].fpar);
|
|
}
|
|
#undef OUT
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
char * crap_name_from_number(int num)
|
|
{
|
|
int idx;
|
|
|
|
#if DEBUG_LEVEL
|
|
fprintf(stderr, ">>> %s ( %d )\n", __func__, num);
|
|
#endif
|
|
|
|
for (idx=0; CrapL[idx].id!=-1; idx++) {
|
|
if (num == CrapL[idx].id) {
|
|
return CrapL[idx].name;
|
|
}
|
|
}
|
|
|
|
return "???";
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
int crap_number_from_name(char *name)
|
|
{
|
|
int idx, retval;
|
|
|
|
#if DEBUG_LEVEL
|
|
fprintf(stderr, ">>> %s ( '%s' )\n", __func__, name);
|
|
#endif
|
|
|
|
retval = -1; /* not found */
|
|
for (idx=0; CrapL[idx].id!=-1; idx++) {
|
|
if (0 == strcmp(CrapL[idx].name, name)) {
|
|
// fprintf(stderr, "found '%s' -> %d\n", name,
|
|
// CrapL[idx].id);
|
|
retval = CrapL[idx].id;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return retval; /* not found */
|
|
}
|
|
/* -------------------------------------------------------------- */
|
|
|