silencing an useless code

Fonderie/crapulator.c

@@ -400,10 +400,12 @@ switch (idFx) {
 		break;
 
 	case CR_message:
+#if (0)
 		fprintf(stderr, "### msg from pid %d, fval=%f ###\n",
 						getpid(), fval);
 		/* here, we can display stats ! */
 		fimg_describe(image, "in crapulator");
+#endif
 		retval = 0;
 		break;
 
@@ -478,13 +480,19 @@ void list_crapulors(char *texte)
 int		idx;
 
 #define OUT	stdout
-if (NULL!=texte) fprintf(OUT, "______________. %s\n", texte);
+
+if (NULL!=texte && verbosity) fprintf(OUT, "___ %s\n ___", texte);
 for (idx=0; CrapL[idx].id!=-1; idx++) {
-	fprintf(OUT, " %-12s | %4d  |  %5d  |  %8.3f\n",
+	if (verbosity) {
+		fprintf(OUT, " %-12s | %4d  |  %5d  |  %8.3f\n",
 					CrapL[idx].name,
 					CrapL[idx].id,
 					CrapL[idx].ipar,
 					CrapL[idx].fpar);
+		}
+	else	{
+		fprintf(OUT, "%s\n", CrapL[idx].name);
+		}
 	}
 #undef OUT
 }

contrib/.gitignore

@@ -2,8 +2,12 @@
 fimg2povhf
 demo_fmorph
 
+toto
+
 *.tga
 *.png
 *.pnm
 *.gif
 *.fimg
+*.mp4
+

contrib/README.md

@@ -4,9 +4,11 @@
 
 Need some external garbage, sorry.
 
-Try to compile this really old code:
-   http://la.buvette.org/devel/libimage/libimage.html
+## do_eff_spass.sh
+
+Script shell permettant (en théorie) de faire un montage
+d'une petite séquence de chacun des effets disponibles
+dans la Fonderie. `singlepass` inside.
 
-Use the code, frtk !
 
 

contrib/do_eff_spass.sh

@@ -0,0 +1,115 @@
+#!/bin/bash
+
+set -e
+
+SPASS="../Fonderie/singlepass"
+
+SRCDIR=$HOME"/Essais/PS-eye/frames/"
+DSTPOL=$HOME"/TMP/"
+echo "source = " $SRCDIR "    spool = " $DSTPOL
+
+LINKFARM=$DSTPOL"LinkFarm"
+echo "linkfarm = " $LINKFARM
+
+VIDZ="$HOME/BU/vrac/all_effects.mp4"
+echo "lolvidz  = " $VIDZ
+
+LINKNUM=0
+
+#	--------------------------------------------
+
+do_an_effect_pass()
+{
+local effect=$1
+local ddir=$2
+figlet "$effect" ; echo
+
+echo "  ===> " $ddir
+ls $ddir | wc
+
+rm -f    $ddir/?????.png
+ls $ddir | wc
+
+$SPASS  -F $effect 				\
+	-g $SRCDIR/'?????.fimg'			\
+	-O $ddir				\
+	-r 2
+ls $ddir | wc
+}
+
+#	--------------------------------------------
+
+make_the_linkfarm_from()
+{
+local effname=$1
+local sdir=$2
+
+echo	"====== Linkfarming from " $sdir 		\
+	"====== avec" $(ls $sdir | wc -l) "images"
+
+for img in $(ls -1 $sdir/?????.png)
+do
+	
+	linkname=$(printf "%s/L%05d.png" $LINKFARM $LINKNUM)
+	# echo "image = " $img 
+	# echo "link  = " $linkname
+
+	mogrify							\
+		-font Noto-Serif-Bold				\
+		-pointsize 70					\
+		-kerning 4					\
+		-fill Gray90					\
+		-stroke Gray10					\
+		-strokewidth 3					\
+		-annotate +35+85 $effname			\
+		$img
+
+	ln --force --symbolic $img $linkname
+
+	LINKNUM=$(( LINKNUM + 1 ))
+done
+echo "linkfarming done"
+}
+#	--------------------------------------------
+#		traite tous les effets
+
+do_all_the_effects()
+{
+EFFECTS=$( $SPASS -L | sort )
+
+for effect in $EFFECTS
+do
+	DDIR=$DSTPOL"/$effect"
+
+	if [ -d $DDIR ] ; then
+		rm -f $DDIR"/?????.png"
+	fi
+	if [ ! -r $DDIR ] ; then
+		mkdir -v $DDIR
+	fi
+
+	do_an_effect_pass $effect $DDIR
+	make_the_linkfarm_from $effect $DDIR
+
+done
+}
+
+#	--------------------------------------------
+#			MAIN
+
+rm -v -f $LINKFARM/L?????.png
+
+
+
+do_all_the_effects
+
+banner encoding
+
+ffmpeg  -nostdin                                                \
+        -y -r 30 -f image2 -i ${LINKFARM}/L%05d.png               \
+	-metadata artist='---[ tTh ]---'			\
+	-metadata title='---[ All the 'Fonderie' effects ]---'	\
+ 	-preset veryslow					\
+        -c:v libx264 -pix_fmt yuv420p                            \
+        $VIDZ
+

funcs/pixelize.c

@@ -91,8 +91,7 @@ if (verbosity) {
 
 foo = fimg_pixelize_h_0(psrc, pdst, flag ? largeur : 32);
 if (foo) {
-	fprintf(stderr, "PANIC in %s\n", __func__);
-	abort();
+	fprintf(stderr, "pixelize_h_0 give err %d  in %s\n", foo, __func__);
 	}
 
 count--;		/* nice trick bro */

lib/fimg-file.c

@@ -251,7 +251,7 @@ if (	(filehead.w != where->width) ||
 
 /* XXX preparer la gestion des metadata */
 if ('a' == filehead.magic[4]) {
-	fprintf(stderr,"****** %s have metadata\n", fname);
+	if (verbosity > 1) fprintf(stderr,"****** %s have metadata\n", fname);
 	foo = fseek(fp, (long)sizeof(FimgMetaData), SEEK_CUR);
 	if (foo) {
 		fprintf(stderr, "%s: seek error\n", __func__);
@@ -327,8 +327,8 @@ if (foo) {
 /*
  *	Oh boy, we have to skeep the metadata chunck
  */
-if ('a' == filehead.magic[4])	{
-	if (verbosity)
+if ('a' == filehead.magic[4]) {
+	if (verbosity > 1)
 		{ fprintf(stderr, "%s: %s has metadata\n", __func__, fname); }
 	foo = fseek(fp, (long)sizeof(FimgMetaData), SEEK_CUR);
 	if (foo) {