Less .sh and more explicit my-

[dotfiles.git] / bin / bin / my-scan

diff --git a/bin/bin/my-scan b/bin/bin/my-scan
new file mode 100755 (executable)
index 0000000..083c089
--- /dev/null
+++ b/bin/bin/my-scan
@@ -0,0 +1,87 @@
+#!/bin/sh
+
+rotate=0
+crop=0
+cur=noname.ppm
+ctr=${1:-1}
+ctr=$(( $ctr - 1 ))
+
+scan() {
+    preview=$1
+    shift
+    [ -z "$NEGATIVE" ] && src="Flatbed" || src="Transparency Adapter"
+    [ -z "$NEGATIVE" ] && depth=8 || depth=16
+    [ -z "$NEGATIVE" ] && resolution=800 || resolution=1600
+    if [ "$preview" = "yes" ]; then
+        depth=8
+        resolution=150
+    fi
+    scanimage \
+        --format=pnm \
+        --mode=Color \
+        --depth $depth \
+        --progress \
+        --resolution=$resolution \
+        --source="$src" \
+        $@ > tmp.ppm
+}
+
+process() {
+    [ $rotate -eq 0 ] && rotator=cat || rotator="pamflip -rotate$rotate"
+    [ -z "$NEGATIVE" ] && inverter=cat || inverter=pnminvert
+    $rotator | pnmcrop -closeness=$crop | $inverter
+}
+
+preview() {
+    process < tmp.ppm | pamdepth 255 | pnmscale -w 600 > preview.ppm
+    sxiv preview.ppm
+}
+
+do_next() {
+    rotate=180
+    [ -z "$NEGATIVE" ] && crop=40 || crop=10
+    ctr=$(( $ctr + 1 ))
+    cur=`printf "%03d.ppm" $ctr`
+}
+
+do_next
+
+while : ; do
+    echo -n "$cur: C:$crop R:$rotate v/r/c/s/p/n> "
+    read c
+    case $c in
+    v)
+        scan yes --preview=yes
+        preview
+        ;;
+    s)
+        scan no --preview=no --high-quality=yes
+        preview
+        ;;
+    p)
+        preview
+        ;;
+    n)
+        cat tmp.ppm | process > $cur
+        do_next
+        ;;
+    r)
+        echo -n "Rotate (n/r/l/t):"
+        read rotate
+        case $rotate in
+        n) rotate=180 ;;
+        r) rotate=90 ;;
+        l) rotate=270 ;;
+        t) rotate=0 ;;
+        *) echo ? ;;
+        esac
+        ;;
+    c)
+        echo -n Crop:
+        read crop
+        ;;
+    *)
+        echo ?
+        ;;
+    esac
+done