Mercurial > code > home > repos > scanner

comparison scan_adf_odd_then_even @ 0:3dc320b8f0c7 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
scanimage shell scripts
author drewp@bigasterisk.com
date Mon, 30 Sep 2024 16:47:14 -0700
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:3dc320b8f0c7
1 #!/bin/zsh
2
3 . ./_init.sh
4
5 print "insert fronts, page 1 first: "
6 read
7 OUT=scan.%02d.png START_PAGE=1 INCR_PAGE=2 SOURCE=ADF ${SCAN}
8
9 print "insert backs, last page first: "
10 read
11 OUT=scan.%02d.back.png START_PAGE=2 INCR_PAGE=2 SOURCE=ADF ${SCAN}
12
13 paste \
14 =(ls -1 scan*.back.png) \
15 =(ls -1r scan*.back.png) \
16 | perl -lpe '@_=split; $_[1]=~s/\.back//; $_="mv $_[0] $_[1]"' \
17 | sh
18
19 for x (scan.*.png) {
20 gm convert -units PixelsPerInch -resample 150x150 -quality 90 $x $x:r.jpg
21 }
22 gm convert scan.*.jpg scan.pdf
23
24 scp scan.pdf ditto:/opt/paperless/consume/scan-`date +%s`.pdf