# HG changeset patch
# User Pascal Bellard <pascal.bellard@slitaz.org>
# Date 1561975445 -7200
# Node ID 5b7852dbf3f4fc53bf26314e04a838003d67105c
# Parent  ab1b43f959957b3548a79457246fc3ebb5cda394
sane-backends: enlarge preview image

diff -r ab1b43f95995 -r 5b7852dbf3f4 sane-backends/stuff/tazpanel/sane.cgi
--- a/sane-backends/stuff/tazpanel/sane.cgi	Sun Jun 30 11:35:08 2019 +0200
+++ b/sane-backends/stuff/tazpanel/sane.cgi	Mon Jul 01 12:04:05 2019 +0200
@@ -93,7 +93,7 @@
 	*)	echo -n "scanimage -d '$(echo $device | sed 's/,.*//')' --resolution '$(inrange $resolution $(xPOST res_min) $(xPOST res_max))dpi'$CMD"
 		if [ -z "$1" -a "$(which convert)" ]; then
 			echo -n "> /tmp/sane$$.pnm ; convert -resize "
-			echo $ARGS $(GET width) | awk '{ printf "%dx%d",$5,int(($2*$5)/$1)}'
+			echo $ARGS 1024 | awk '{ printf "%dx%d",$5,int(($2*$5)/$1)}'
 			echo -n " /tmp/sane$$.pnm /tmp/sane$$.png ;"
 			echo -n "cat /tmp/sane$$.png ; rm -f /tmp/sane$$.pn?"
 		fi
@@ -109,8 +109,12 @@
 	case "$1" in
 	list)
 		echo -n "<option value=\"$key\""
-		[ "$(which $exe 2> /dev/null)" ] || 
-		echo -n " disabled title=\"$exe not found: install $pkg\""
+		disabled=""
+		for i in ${exe//|/ }; do
+			[ "$(which $i 2> /dev/null)" ] || 
+			disabled=" disabled title=\"$i not found: install package $pkg\""
+		done
+		echo -n "$disabled"
 		[ "$key" == "pnm" ] &&
 		echo -n " title=\"not supported by most browsers\""
 		echo ">$key" ;;
@@ -141,6 +145,7 @@
 		esac ;;
 	esac
 done <<EOT
+#png		tazsane.png		image/png		pnm2png|convert		imagemagick 	> $tmp.pnm; [ "$(which pnm2png)" ] && pnm2png < $tmp.pnm || convert $tmp.pnm png:-
 png		tazsane.png		image/png		convert		imagemagick 	> $tmp.pnm; convert $tmp.pnm png:-
 jpeg		tazsane.jpg		image/jpeg		convert		imagemagick 	> $tmp.pnm; convert $tmp.pnm jpg:-
 jpeg2000	tazsane.jp2		image/jpeg2000-image	convert		imagemagick 	> $tmp.pnm; convert $tmp.pnm jp2:-
@@ -324,7 +329,6 @@
 } END { print "" }
 ' | sed 1d)"
 fi
-echo "<!-- $params -->"
 output="$(n=$(echo "$params" | wc -l); echo "$params" | \
 while read name def min max help; do
 	name="${name#-}"
@@ -357,7 +361,7 @@
 		[ "$(xPOST $name)" ] && def=$(xPOST $name)
 		[ $def -lt $min ] && def=$min
 		[ $def -gt $max ] && def=$max
-		f="<fieldset><legend>$(_ "$name")</legend><input name=\"$name\" value=\"$def\""
+		f="<fieldset><legend>$(_ "$name")</legend><input type=\"range\" min=\"$min\" max=\"$max\" name=\"$name\" value=\"$def\""
 		u=""
 		case "$name" in
 		x|y|l|t) cat <<EOT
@@ -455,7 +459,7 @@
 [ -s "$tmpreview" ] && cat <<EOT
 <div margin="15px" style="overflow-x: auto">
 	<script type="text/javascript" src="lib/crop.js"></script>
-	<img src="$tmpreview" onload=cropInit(this,'x','y','width','height')>
+	<img src="$tmpreview" style="width:100%" onload=cropInit(this,'x','y','width','height')>
 </div>
 EOT
 xhtml_footer