X-Git-Url: https://git.ucc.asn.au/?p=dja%2Fscandal.git;a=blobdiff_plain;f=scan2pages.sh;h=321d31ca647a3c9e2927b72bc08026ef4f2fc22b;hp=249f2ad17eac469cdf9e8dff1723e3d245e7c6c4;hb=fd2bfda99261fbf0b9b1f78bf00b5d86e420d679;hpb=1712fed40fec85af818db1392af5e11a9e599dd7 diff --git a/scan2pages.sh b/scan2pages.sh index 249f2ad..321d31c 100755 --- a/scan2pages.sh +++ b/scan2pages.sh @@ -2,7 +2,7 @@ function usage { cat >&2 << __EOF__ -Usage: $0 [-vfpsmut] [-d depth] pdffile outdir +Usage: $0 [-vfpsmutb] [-D DPI] [-d depth] [-F format] pdffile outdir Convert pdffile - a pdf of scanned facing pages - to a set of images in outdir, each with only one page. OPTIONS: @@ -17,6 +17,7 @@ OPTIONS: -m: Forceably redo masking/trimming and other preprocessing. Impiles options below. -u: Forceably redo unpaper processing. Implies option below. IGNORED -t: Forceably redo final trimming and cleaning. IGNORED + -b: Optimize for BeBook One. __EOF__ } @@ -42,7 +43,8 @@ dpi= skipmask= verbose= extension="png" -while getopts 'vd:sfpmucF:' OPTION +bebook= +while getopts 'vd:D:sfpmucF:b' OPTION do case $OPTION in v) verbose=1 @@ -67,6 +69,8 @@ do ;; F) extension="$OPTARG" ;; + b) bebook=1 + ;; ?) usage exit 2 ;; @@ -144,11 +148,11 @@ for pg in `$my_seq 1 $pages`; do if [[ ! $skipmask && ( ! $([ -e $preppnm ]) || $forcemask ) ]]; then # create mask: # ... downscale, blur, - convert $convertflags -resize 25% -depth 8 -blur 10 $origpnm $dir/pg-mask-${pgn}.pnm ||exit 1 + convert $convertflags -resize 10% -depth 8 -blur 10 -median 2 $origpnm $dir/pg-mask-${pgn}.pnm ||exit 1 # ... get crop co-ords. They're off by ~2 as I don't know how to # properly correct for the border. - cropcords=$(convert -border 1x1 -bordercolor '#000' -resize 400% -trim -fuzz 90% -format "%wx%h%O" $dir/pg-mask-${pgn}.pnm info: || exit 1) + cropcords=$(convert -border 1x1 -bordercolor '#000' -resize 1000% -trim -fuzz 90% -format "%wx%h%O" $dir/pg-mask-${pgn}.pnm info: || exit 1) # ... crop and despeckle? the final pre-prepared image convert $convertflags -crop $cropcords $origpnm $preppnm || exit 1 @@ -162,12 +166,15 @@ for pg in `$my_seq 1 $pages`; do unppnm=$dir/upg-${pgn}-%01d.pnm unpaper $unpaperflags --layout double --overwrite --no-blackfilter -ni 10 -op 2 $preppnm $unppnm || exit 1 - # final convert and clean - convert $convertflags $dir/upg-${pgn}-?.pnm $dir/upg-${pgn}-%01d.${extension} || exit 1 - + #final convert and clean w/ bebook optimisation + if [[ $bebook ]]; then + convert $convertflags -colorspace Gray -median 1 $dir/upg-${pgn}-?.pnm -resize 1200x1600 $dir/final-${pgn}-%01d.${extension} || exit 1 + else + convert $convertflags $dir/upg-${pgn}-?.pnm $dir/final-${pgn}-%01d.${extension} || exit 1 + fi done mkdir $dir/pages -mv $dir/upg-*.${extension} $dir/pages +mv $dir/final-*.${extension} $dir/pages