You can not select more than 25 topics
			Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
		
		
			
		
		
		
			
				
					269 lines
				
				8.3 KiB
			
		
		
			
		
	
	
					269 lines
				
				8.3 KiB
			| 
											9 months ago
										 | #!/bin/bash
 | ||
|  | #
 | ||
|  | # Developed by Fred Weinhaus revised 6/9/2012 .......... revised 4/25/2015
 | ||
|  | #
 | ||
|  | # ------------------------------------------------------------------------------
 | ||
|  | #
 | ||
|  | # Licensing:
 | ||
|  | #
 | ||
|  | # Copyright © Fred Weinhaus
 | ||
|  | #
 | ||
|  | # My scripts are available free of charge for non-commercial use, ONLY.
 | ||
|  | #
 | ||
|  | # For use of my scripts in commercial (for-profit) environments or
 | ||
|  | # non-free applications, please contact me (Fred Weinhaus) for
 | ||
|  | # licensing arrangements. My email address is fmw at alink dot net.
 | ||
|  | #
 | ||
|  | # If you: 1) redistribute, 2) incorporate any of these scripts into other
 | ||
|  | # free applications or 3) reprogram them in another scripting language,
 | ||
|  | # then you must contact me for permission, especially if the result might
 | ||
|  | # be used in a commercial or for-profit environment.
 | ||
|  | #
 | ||
|  | # My scripts are also subject, in a subordinate manner, to the ImageMagick
 | ||
|  | # license, which can be found at: http://www.imagemagick.org/script/license.php
 | ||
|  | #
 | ||
|  | # ------------------------------------------------------------------------------
 | ||
|  | #
 | ||
|  | ####
 | ||
|  | #
 | ||
|  | # USAGE: splitcrop [-x xcoord] [-y ycoord] [-L] infile [outfile]
 | ||
|  | # USAGE: splitcrop [-h or -help]
 | ||
|  | #
 | ||
|  | # OPTIONS:
 | ||
|  | #
 | ||
|  | # -x     xcoord     x coordinate for split; 0<integer<width; default=center
 | ||
|  | # -y     xcoord     y coordinate for split; 0<integer<height; default=center
 | ||
|  | # -L                list crop dimensions and offsets to the terminal
 | ||
|  | #
 | ||
|  | # Note, the output images will be named automatically from the outfile name and
 | ||
|  | # suffix.  Two or four of the following: _left, _right, _top, _bottom,
 | ||
|  | # _topleft, _topright, _bottomleft, _bottomright will be appended before the
 | ||
|  | # suffix. If no outfile is provided, then the infile name and suffix will be
 | ||
|  | # used for the output.
 | ||
|  | #
 | ||
|  | ###
 | ||
|  | #
 | ||
|  | # NAME: SPLITCROP
 | ||
|  | #
 | ||
|  | # PURPOSE: To crop an image into two or four sections according to the given
 | ||
|  | # x,y coordinates.
 | ||
|  | #
 | ||
|  | # DESCRIPTION: SPLITCROP crops an image into two or four sections according to
 | ||
|  | # the given x,y coordinates. One or both of the x,y coordinates may be
 | ||
|  | # specified. If one coordinate is specified, then the image will be split into
 | ||
|  | # two parts. If two coordinate are specified, then the image will be split both
 | ||
|  | # ways into four parts. Note that these are coordinates and not sizes. The top,
 | ||
|  | # left or topleft section will include the coordinate specified. The size of
 | ||
|  | # the split will be the coordinate plus 1. If the image dimension is odd,
 | ||
|  | # then the top, left or topleft will contain the extra pixel(s).
 | ||
|  | #
 | ||
|  | # OPTIONS:
 | ||
|  | #
 | ||
|  | # -x xcoord ... XCOORD is the x coordinate for the split. Values are
 | ||
|  | # 0<integers<width. The default=center of image
 | ||
|  | #
 | ||
|  | # -y ycoord ... YCOORD is the y coordinate for the split. Values are
 | ||
|  | # 0<integers<height. The default=center of image
 | ||
|  | #
 | ||
|  | # -L ... LIST crop dimensions and offsets to the terminal
 | ||
|  | #
 | ||
|  | # CAVEAT: No guarantee that this script will work on all platforms,
 | ||
|  | # nor that trapping of inconsistent parameters is complete and
 | ||
|  | # foolproof. Use At Your Own Risk.
 | ||
|  | #
 | ||
|  | ######
 | ||
|  | #
 | ||
|  | 
 | ||
|  | # set default values
 | ||
|  | xcoord=""			# x coordinate for split
 | ||
|  | ycoord=""			# y coordinate for split
 | ||
|  | list="off"
 | ||
|  | 
 | ||
|  | # set directory for temporary files
 | ||
|  | dir="."    # suggestions are dir="." or dir="/tmp"
 | ||
|  | 
 | ||
|  | # set up functions to report Usage and Usage with Description
 | ||
|  | PROGNAME="splitcrop" # search for executable on path
 | ||
|  | PROGDIR=`dirname $PROGNAME`            # extract directory of program
 | ||
|  | PROGNAME=`basename $PROGNAME`          # base name of program
 | ||
|  | usage1()
 | ||
|  | 	{
 | ||
|  | 	echo >&2 ""
 | ||
|  | 	echo >&2 "$PROGNAME:" "$@"
 | ||
|  | 	sed >&2 -e '1,/^####/d;  /^###/g;  /^#/!q;  s/^#//;  s/^ //;  4,$p' "$PROGDIR/$PROGNAME"
 | ||
|  | 	}
 | ||
|  | usage2()
 | ||
|  | 	{
 | ||
|  | 	echo >&2 ""
 | ||
|  | 	echo >&2 "$PROGNAME:" "$@"
 | ||
|  | 	sed >&2 -e '1,/^####/d;  /^######/g;  /^#/!q;  s/^#*//;  s/^ //;  4,$p' "$PROGDIR/$PROGNAME"
 | ||
|  | 	}
 | ||
|  | 
 | ||
|  | 
 | ||
|  | # function to report error messages
 | ||
|  | errMsg()
 | ||
|  | 	{
 | ||
|  | 	echo ""
 | ||
|  | 	echo $1
 | ||
|  | 	echo ""
 | ||
|  | 	usage1
 | ||
|  | 	exit 1
 | ||
|  | 	}
 | ||
|  | 
 | ||
|  | 
 | ||
|  | # function to test for minus at start of value of second part of option 1 or 2
 | ||
|  | checkMinus()
 | ||
|  | 	{
 | ||
|  | 	test=`echo "$1" | grep -c '^-.*$'`   # returns 1 if match; 0 otherwise
 | ||
|  |     [ $test -eq 1 ] && errMsg "$errorMsg"
 | ||
|  | 	}
 | ||
|  | 
 | ||
|  | 
 | ||
|  | # test for correct number of arguments and get values
 | ||
|  | if [ $# -eq 0 ]
 | ||
|  | 	then
 | ||
|  | 	# help information
 | ||
|  |    echo ""
 | ||
|  |    usage2
 | ||
|  |    exit 0
 | ||
|  | elif [ $# -gt 6 ]
 | ||
|  | 	then
 | ||
|  | 	errMsg "--- TOO MANY ARGUMENTS WERE PROVIDED ---"
 | ||
|  | else
 | ||
|  | 	while [ $# -gt 0 ]
 | ||
|  | 		do
 | ||
|  | 			# get parameter values
 | ||
|  | 			case "$1" in
 | ||
|  | 		  -h|-help)    # help information
 | ||
|  | 					   echo ""
 | ||
|  | 					   usage2
 | ||
|  | 					   exit 0
 | ||
|  | 					   ;;
 | ||
|  | 				-x)    # get xcoord
 | ||
|  | 					   shift  # to get the next parameter
 | ||
|  | 					   # test if parameter starts with minus sign
 | ||
|  | 					   errorMsg="--- INVALID XCOORD SPECIFICATION ---"
 | ||
|  | 					   checkMinus "$1"
 | ||
|  | 					   xcoord=`expr "$1" : '\([0-9]*\)'`
 | ||
|  | 					   [ "$xcoord" = "" ] && errMsg "--- XCOORD=$xcoord MUST BE A NON-NEGATIVE INTEGER ---"
 | ||
|  | 					   ;;
 | ||
|  | 				-y)    # get ycoord
 | ||
|  | 					   shift  # to get the neyt parameter
 | ||
|  | 					   # test if parameter starts with minus sign
 | ||
|  | 					   errorMsg="--- INVALID YCOORD SPECIFICATION ---"
 | ||
|  | 					   checkMinus "$1"
 | ||
|  | 					   ycoord=`expr "$1" : '\([0-9]*\)'`
 | ||
|  | 					   [ "$ycoord" = "" ] && errMsg "--- YCOORD=$ycoord MUST BE A NON-NEGATIVE INTEGER ---"
 | ||
|  | 					   ;;
 | ||
|  | 				-L)    # get list
 | ||
|  | 					   list="on"
 | ||
|  | 					   ;;
 | ||
|  | 				 -)    # STDIN and end of arguments
 | ||
|  | 					   break
 | ||
|  | 					   ;;
 | ||
|  | 				-*)    # any other - argument
 | ||
|  | 					   errMsg "--- UNKNOWN OPTION ---"
 | ||
|  | 					   ;;
 | ||
|  | 		     	 *)    # end of arguments
 | ||
|  | 					   break
 | ||
|  | 					   ;;
 | ||
|  | 			esac
 | ||
|  | 			shift   # next option
 | ||
|  | 	done
 | ||
|  | 	#
 | ||
|  | 	# get infile and outfile
 | ||
|  | 	infile="$1"
 | ||
|  | 	outfile="$2"
 | ||
|  | fi
 | ||
|  | 
 | ||
|  | # test that infile provided
 | ||
|  | [ "$infile" = "" ] && errMsg "NO INPUT FILE SPECIFIED"
 | ||
|  | 
 | ||
|  | # test that outfile provided
 | ||
|  | 
 | ||
|  | if [ "$outfile" = "" ]; then
 | ||
|  | 	# separate infile to outname and suffix
 | ||
|  | 	outname=`echo "$infile" | sed -n 's/^\(.*\)[\.].*$/\1/p'`
 | ||
|  | 	suffix=`echo "$infile" | sed -n 's/^.*[\.]\(.*\)$/\1/p'`
 | ||
|  | else
 | ||
|  | 	# separate outfile to outname and suffix
 | ||
|  | 	outname=`echo "$outfile" | sed -n 's/^\(.*\)[\.].*$/\1/p'`
 | ||
|  | 	suffix=`echo "$outfile" | sed -n 's/^.*[\.]\(.*\)$/\1/p'`
 | ||
|  | fi
 | ||
|  | 
 | ||
|  | # setup temporary images
 | ||
|  | tmpA1="$dir/split_A_$$.mpc"
 | ||
|  | tmpA2="$dir/split_A_$$.cache"
 | ||
|  | trap "rm -f $tmpA1 $tmpA2;" 0
 | ||
|  | trap "rm -f $tmpA1 $tmpA2; exit 1" 1 2 3 15
 | ||
|  | trap "rm -f $tmpA1 $tmpA2; exit 1" ERR
 | ||
|  | 
 | ||
|  | 
 | ||
|  | # read the input image into the temporary cached image and test if valid
 | ||
|  | convert -quiet "$infile" +repage "$tmpA1" ||
 | ||
|  | 	errMsg "--- FILE $infile DOES NOT EXIST OR IS NOT AN ORDINARY FILE, NOT READABLE OR HAS ZERO size  ---"
 | ||
|  | 
 | ||
|  | 
 | ||
|  | # get input dimensions
 | ||
|  | ww=`convert $tmpA1 -format "%w" info:`
 | ||
|  | hh=`convert $tmpA1 -format "%h" info:`
 | ||
|  | #echo "ww=$ww; hh=$hh"
 | ||
|  | 
 | ||
|  | x=$xcoord
 | ||
|  | y=$ycoord
 | ||
|  | 
 | ||
|  | # trap for no coordinates specified
 | ||
|  | if [ "$x" = ""  -a "$y" = "" ]; then
 | ||
|  | 	x=`convert xc: -format "%[fx:round($ww/2)-1]" info:`
 | ||
|  | 	y=`convert xc: -format "%[fx:round($hh/2)-1]" info:`
 | ||
|  | fi
 | ||
|  | 
 | ||
|  | # trap for coordinates at boundary or outside image
 | ||
|  | if [ "$x" != "" ]; then
 | ||
|  | 	( [ $x -eq 0 ] || [ $x -ge $ww ] ) && errMsg "--- INVALID X COORDINATE SPECIFIED  ---"
 | ||
|  | fi
 | ||
|  | if [ "$y" != "" ]; then
 | ||
|  | 	 ( [ $y -eq 0 ] || [ $y -ge $ww ] ) && errMsg "--- INVALID Y COORDINATE SPECIFIED  ---"
 | ||
|  | fi
 | ||
|  | 
 | ||
|  | # options depending upon whether x or y or (x and y) specified
 | ||
|  | if [ "$x" != "" -a "$y" != "" ]; then
 | ||
|  | 	#split into four parts
 | ||
|  | 	tlsize=`convert xc: -format "%[fx:$x+1]x%[fx:$y+1]+0+0" info:`
 | ||
|  | 	trsize=`convert xc: -format "%[fx:$ww-$x-1]x%[fx:$y+1]+%[fx:$x+1]+0" info:`
 | ||
|  | 	blsize=`convert xc: -format "%[fx:$x+1]x%[fx:$hh-$y-1]+0+%[fx:$y+1]" info:`
 | ||
|  | 	brsize=`convert xc: -format "%[fx:$ww-$x-1]x%[fx:$hh-$y-1]+%[fx:$x+1]+%[fx:$y+1]" info:`
 | ||
|  | 	if [ "$list" = "on" ]; then
 | ||
|  | 		echo "tlsize=$tlsize"
 | ||
|  | 		echo "trsize=$trsize"
 | ||
|  | 		echo "blsize=$blsize"
 | ||
|  | 		echo "brsize=$brsize"
 | ||
|  | 	fi
 | ||
|  | 	convert $tmpA1 -crop $tlsize +repage "${outname}_topleft.$suffix"
 | ||
|  | 	convert $tmpA1 -crop $trsize +repage "${outname}_topright.$suffix"
 | ||
|  | 	convert $tmpA1 -crop $blsize +repage "${outname}_bottomleft.$suffix"
 | ||
|  | 	convert $tmpA1 -crop $brsize +repage "${outname}_bottomright.$suffix"
 | ||
|  | elif [ "$x" != "" ]; then
 | ||
|  | 	#split into two parts horizontally
 | ||
|  | 	lsize=`convert xc: -format "%[fx:$x+1]x${hh}+0+0" info:`
 | ||
|  | 	rsize=`convert xc: -format "%[fx:$ww-$x-1]x${hh}+%[fx:$x+1]+0" info:`
 | ||
|  | 	if [ "$list" = "on" ]; then
 | ||
|  | 		echo "lsize=$lsize"
 | ||
|  | 		echo "rsize=$rsize"
 | ||
|  | 	fi
 | ||
|  | 	convert $tmpA1 -crop $lsize +repage "${outname}_left.$suffix"
 | ||
|  | 	convert $tmpA1 -crop $rsize +repage "${outname}_right.$suffix"
 | ||
|  | elif [ "$y" != "" ]; then
 | ||
|  | 	#split into two parts vertically
 | ||
|  | 	tsize=`convert xc: -format "${ww}x%[fx:$y+1]+0+0" info:`
 | ||
|  | 	bsize=`convert xc: -format "${ww}x%[fx:$hh-$y-1]+0+%[fx:$y+1]" info:`
 | ||
|  | 	if [ "$list" = "on" ]; then
 | ||
|  | 		echo "tsize=$tsize"
 | ||
|  | 		echo "bsize=$bsize"
 | ||
|  | 	fi
 | ||
|  | 	convert $tmpA1 -crop $tsize +repage "${outname}_top.$suffix"
 | ||
|  | 	convert $tmpA1 -crop $bsize +repage "${outname}_bottom.$suffix"
 | ||
|  | fi
 | ||
|  | 
 | ||
|  | exit 0
 |