Mercurial > code > home > repos > scanner
changeset 0:3dc320b8f0c7 default tip
scanimage shell scripts
author | drewp@bigasterisk.com |
---|---|
date | Mon, 30 Sep 2024 16:47:14 -0700 |
parents | |
children | |
files | _init.sh _scan scan_adf_multipage scan_adf_odd_then_even scan_adf_singles |
diffstat | 5 files changed, 67 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/_init.sh Mon Sep 30 16:47:14 2024 -0700 @@ -0,0 +1,6 @@ +WORK=/tmp/scanner +SCAN=`realpath _scan` + +rm -rf ${WORK} +mkdir -p ${WORK} +cd $WORK
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/_scan Mon Sep 30 16:47:14 2024 -0700 @@ -0,0 +1,10 @@ +#!/bin/zsh + +scanimage \ +--device-name='airscan:e1:Brother MFC-J885DW' \ +--format=png \ +--batch=$OUT \ +--batch-start=$START_PAGE \ +--batch-increment=$INCR_PAGE \ +--progress \ +--source=$SOURCE
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scan_adf_multipage Mon Sep 30 16:47:14 2024 -0700 @@ -0,0 +1,14 @@ +#!/bin/zsh + +. ./_init.sh + +OUT=scan.%02d.png START_PAGE=1 INCR_PAGE=1 SOURCE=ADF ${SCAN} + +gm convert -units PixelsPerInch -resample 150x150 scan.*.png scan.pdf + +for x (scan.*.png) { + gm convert -units PixelsPerInch -resample 150x150 -quality 90 $x $x:r.jpg +} +gm convert scan.*.jpg scan.pdf + +scp scan.pdf ditto:/opt/paperless/consume/scan-`date +%s`.pdf \ No newline at end of file
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scan_adf_odd_then_even Mon Sep 30 16:47:14 2024 -0700 @@ -0,0 +1,24 @@ +#!/bin/zsh + +. ./_init.sh + +print "insert fronts, page 1 first: " +read +OUT=scan.%02d.png START_PAGE=1 INCR_PAGE=2 SOURCE=ADF ${SCAN} + +print "insert backs, last page first: " +read +OUT=scan.%02d.back.png START_PAGE=2 INCR_PAGE=2 SOURCE=ADF ${SCAN} + +paste \ + =(ls -1 scan*.back.png) \ + =(ls -1r scan*.back.png) \ + | perl -lpe '@_=split; $_[1]=~s/\.back//; $_="mv $_[0] $_[1]"' \ + | sh + +for x (scan.*.png) { + gm convert -units PixelsPerInch -resample 150x150 -quality 90 $x $x:r.jpg +} +gm convert scan.*.jpg scan.pdf + +scp scan.pdf ditto:/opt/paperless/consume/scan-`date +%s`.pdf
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scan_adf_singles Mon Sep 30 16:47:14 2024 -0700 @@ -0,0 +1,13 @@ +#!/bin/zsh + +. ./_init.sh + +OUT=scan.%02d.png START_PAGE=1 INCR_PAGE=1 SOURCE=ADF ${SCAN} + +for x (scan.*.png) { + JPG=${x:r}.jpg + PDF=`date +%s`-${x:r}.pdf + gm convert -units PixelsPerInch -resample 150x150 -quality 90 $x $JPG + gm convert $JPG $PDF + scp $PDF ditto:/opt/paperless/consume/ +} \ No newline at end of file