/* * crapulator.c */ #include #include #include #include #include "../floatimg.h" #include "fonctions.h" #include "crapulator.h" #include "glitches.h" #include "sfx.h" /* -------------------------------------------------------------- */ 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_0(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 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); } /* * may be, here, we can check for negative values ? */ 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 (666==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 = binarize(image, 0); break; case CR_trinarize: retval = 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; 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 */ } /* -------------------------------------------------------------- */