Improved border artifact work; dealing with blank scans; 2up page detection

[dja/scandal.git] / detect2pages.sh

diff --git a/detect2pages.sh b/detect2pages.sh
new file mode 100755 (executable)
index 0000000..4b8c189
--- /dev/null
+++ b/detect2pages.sh
@@ -0,0 +1,45 @@
+#!/bin/bash
+
+#should probably have given up on shell and gone over to python.
+
+
+infile=$1
+pg=$2
+subpg=$3
+
+dir=$(dirname $infile)
+
+convert -blur 10 -gamma 0.00001 -median 1 $infile -resize 1x601\! -gamma 0.3 $dir/strip-${pg}-${subpg}.png
+
+#There seems to be a definte bias in my reader scans for things to be in the top part rather than the bottom part
+testpoints=`jot - 270 320`
+
+sum=0
+prev=0
+longestrun=0
+
+
+for testpoint in $testpoints; do
+       #convert -verbose strip-${pg}-${subpg}.png[1x1+0+${testpoint}] -format "%[fx:s.intensity]" info:
+       value=$(convert $dir/strip-${pg}-${subpg}.png[1x1+0+${testpoint}] -format "%[fx:s.intensity>0.3]" info:)
+       sum=$(expr $value + $sum)
+
+       if [[ $prev = 1 && $value = 0 ]]; then
+               if [[ $sum > $longestrun ]]; then
+                       longestrun=$sum;
+               fi;
+               sum=0
+       fi;
+
+       prev=$value
+
+       #echo "$testpoint: $value ($sum, $longestrun)"
+done;
+
+if [[ $sum > $longestrun ]]; then
+       longestrun=$sum;
+fi
+
+echo $longestrun
+
+exit $( expr $longestrun "<=" 10 )