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.
347 lines
11 KiB
347 lines
11 KiB
#!/bin/bash
|
|
#
|
|
# Developed by Fred Weinhaus 8/10/2015 .......... revised 8/10/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: tileimage [-a arrangement] [-o orientation ] [-r repeats] [-w width ]
|
|
# [-h height] [-b bgcolor] infile outfile
|
|
#
|
|
# USAGE: tileimage [-help]
|
|
#
|
|
# OPTIONS:
|
|
#
|
|
# -a arrangement tiling arrangement; choices are: repeat, halfdrop,
|
|
# brick, verticalmirror, horizontalmirror or rotate;
|
|
# default=repeat
|
|
# -o orientation orientation mode for image repeats; choices are: 0,
|
|
# 90, 180, 270, flip, flop, transpose, transverse;
|
|
# default=0
|
|
# -r repeats number of horizontal repeats; integer>0; default=4
|
|
# -w width width of canvas in pixels; integer>0; default=512
|
|
# -h height height of canvas in pixels; integer>0; default=512
|
|
# -b bgcolor background color for canvas, if image is transparent;
|
|
# any valid IM color; default="white"
|
|
#
|
|
###
|
|
#
|
|
# NAME: TILEIMAGE
|
|
#
|
|
# PURPOSE: To tile an image to a given size with various tile arrangements.
|
|
#
|
|
# DESCRIPTION: TILEIMAGE tiles an image to a given size. Several arrangements
|
|
# are possible as well as several orientations. The user can also specify the
|
|
# number of repeats across the width of the image. This script is typically
|
|
# used to tile objects on a constant color background.
|
|
#
|
|
# OPTIONS:
|
|
#
|
|
# -a arrangement ... tiling ARRANGEMENT. The choices are: repeat (r),
|
|
# halfdrop (h), brick (b), verticalmirror (vm), horizontalmirror (hm), or .
|
|
# rotate (ro). The default=repeat.
|
|
#
|
|
# -o orientation ... ORIENTATION mode for the image repeats. The choices are:
|
|
# 0 (degree rotation), 90 (degree rotation), 180 (degree rotation),
|
|
# 270 (degree rotation), flip, flop, transpose, transverse. The default=0.
|
|
#
|
|
# -r repeats ... REPEATS is the number of horizontal repeats across the image.
|
|
# Values are integers>0. The default=4.
|
|
#
|
|
# -w width ... WIDTH of output image in pixels. Values are integers>0. The
|
|
# default=512.
|
|
#
|
|
# -h height ... HEIGHT of output image in pixels. Values are integers>0. The
|
|
# default=512.
|
|
#
|
|
# -b bgcolor ... BGCOLOR is the desired background color for the output image,
|
|
# if the input image is transparent. Any valid IM color. The default="white".
|
|
#
|
|
# 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
|
|
arrangement="repeat"
|
|
orientation="0"
|
|
repeats=4
|
|
width=512
|
|
height=512
|
|
bgcolor="white"
|
|
|
|
# set directory for temporary files
|
|
dir="." # suggestions are dir="." or dir="/tmp"
|
|
|
|
# set up functions to report Usage and Usage with Description
|
|
PROGNAME=`type $0 | awk '{print $3}'` # 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 -n '/^###/q; /^#/!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 ""
|
|
usage1
|
|
exit 0
|
|
elif [ $# -gt 14 ]
|
|
then
|
|
errMsg "--- TOO MANY ARGUMENTS WERE PROVIDED ---"
|
|
else
|
|
while [ $# -gt 0 ]
|
|
do
|
|
# get parameter values
|
|
case "$1" in
|
|
-help) # help information
|
|
echo ""
|
|
usage1
|
|
exit 0
|
|
;;
|
|
-a) # arrangement
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID ARRANGEMENT SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
# test gravity values
|
|
arrangement="$1"
|
|
arrangement=`echo "$1" | tr '[A-Z]' '[a-z]'`
|
|
case "$arrangement" in
|
|
repeat|r) arrangement="repeat" ;;
|
|
halfdrop|h) arrangement="halfdrop" ;;
|
|
brick|b) arrangement="brick" ;;
|
|
verticalmirror|vm) arrangement="verticalmirror" ;;
|
|
horizontalmirror|hm) arrangement="horizontalmirror" ;;
|
|
rotate|ro) arrangement="rotate" ;;
|
|
*) errMsg "--- ARRANGEMENT=$arrangement IS AN INVALID OPTION ---" ;;
|
|
esac
|
|
;;
|
|
-o) # orientation
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID ORIENTATION SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
# test gravity values
|
|
orientation="$1"
|
|
orientation=`echo "$1" | tr '[A-Z]' '[a-z]'`
|
|
case "$orientation" in
|
|
0) orientation="0" ;;
|
|
90) orientation="90" ;;
|
|
180) orientation="180" ;;
|
|
270) orientation="270" ;;
|
|
flip) orientation="flip" ;;
|
|
flop) orientation="flop" ;;
|
|
transpose) orientation="transpose" ;;
|
|
transverse) orientation="transverse" ;;
|
|
*) errMsg "--- ORIENTATION=$orientation IS AN INVALID OPTION ---" ;;
|
|
esac
|
|
;;
|
|
-w) # get width
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID WIDTH SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
width=`expr "$1" : '\([.0-9]*\)'`
|
|
[ "$width" = "" ] && errMsg "--- WIDTH=$width MUST BE A NON-NEGATIVE FLOAT ---"
|
|
test=`echo "$width <= 0" | bc`
|
|
[ $test -eq 1 ] && errMsg "--- WIDTH=$width MUST BE A POSITIVE FLOAT ---"
|
|
;;
|
|
-h) # get height
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID HEIGHT SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
height=`expr "$1" : '\([.0-9]*\)'`
|
|
[ "$height" = "" ] && errMsg "--- HEIGHT=$height MUST BE A NON-NEGATIVE FLOAT ---"
|
|
test=`echo "$height <= 0" | bc`
|
|
[ $test -eq 1 ] && errMsg "--- HEIGHT=$height MUST BE A POSITIVE FLOAT ---"
|
|
;;
|
|
-r) # get repeats
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID REPEATS SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
repeats=`expr "$1" : '\([0-9]*\)'`
|
|
[ "$repeats" = "" ] && errMsg "--- REPEATS=$repeats MUST BE A NON-NEGATIVE INTEGER ---"
|
|
test=`echo "$repeats == 0" | bc`
|
|
[ $test -eq 1 ] && errMsg "--- REPEATS=$repeats MUST BE A POSITIVE INTEGER ---"
|
|
;;
|
|
-b) # get bgcolor
|
|
shift # to get the next parameter
|
|
# test if parameter starts with minus sign
|
|
errorMsg="--- INVALID BGCOLOR SPECIFICATION ---"
|
|
checkMinus "$1"
|
|
bgcolor="$1"
|
|
;;
|
|
-) # 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
|
|
[ "$outfile" = "" ] && errMsg "NO OUTPUT FILE SPECIFIED"
|
|
|
|
|
|
# setup temporary images
|
|
tmpA1="$dir/tileimage_1_$$.mpc"
|
|
tmpB1="$dir/tileimage_1_$$.cache"
|
|
trap "rm -f $tmpA1 $tmpB1;" 0
|
|
trap "rm -f $tmpA1 $tmpB1; exit 1" 1 2 3 15
|
|
trap "rm -f $tmpA1 $tmpB1; exit 1" ERR
|
|
|
|
|
|
# read the input image into the temporary cached image and test if valid
|
|
# 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 infile dimensions
|
|
ww=`identify -ping -format "%w" $tmpA1`
|
|
hh=`identify -ping -format "%h" $tmpA1`
|
|
|
|
# get scaling factor for infile in percent
|
|
factor=`convert xc: -format "%[fx:100*$width/($repeats*$ww)]" info:`
|
|
|
|
# scale the infile
|
|
convert $tmpA1 -resize $factor% $tmpA1
|
|
|
|
# compute resized dimensions
|
|
ww=`identify -ping -format "%w" $tmpA1`
|
|
hh=`identify -ping -format "%h" $tmpA1`
|
|
|
|
# get half sizes for offsets
|
|
ww2=`convert xc: -format "%[fx:round($ww/2)]" info:`
|
|
hh2=`convert xc: -format "%[fx:round($hh/2)]" info:`
|
|
|
|
|
|
# set up orientation
|
|
if [ "$orientation" = "0" ]; then
|
|
orienting=""
|
|
elif [ "$orientation" = "90" ]; then
|
|
orienting="-rotate 90"
|
|
elif [ "$orientation" = "180" ]; then
|
|
orienting="-rotate 180"
|
|
elif [ "$orientation" = "270" ]; then
|
|
orienting="-rotate 270"
|
|
elif [ "$orientation" = "flip" ]; then
|
|
orienting="-flip"
|
|
elif [ "$orientation" = "flop" ]; then
|
|
orienting="-flop"
|
|
elif [ "$orientation" = "transpose" ]; then
|
|
orienting="-transpose"
|
|
elif [ "$orientation" = "transverse" ]; then
|
|
orienting="-transverse"
|
|
fi
|
|
|
|
# process image
|
|
if [ "$arrangement" = "repeat" ]; then
|
|
#echo "repeat; orient=$orienting; width=$width; height=$height; bgcolor=$bgcolor;"
|
|
convert $tmpA1 $orienting -write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background $bgcolor -flatten "$outfile"
|
|
|
|
elif [ "$arrangement" = "halfdrop" ]; then
|
|
convert $tmpA1 \
|
|
\( -clone 0 $orienting -roll +0+${hh2} \) +append \
|
|
-write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background "$bgcolor" -flatten "$outfile"
|
|
|
|
elif [ "$arrangement" = "brick" ]; then
|
|
convert $tmpA1 \
|
|
\( -clone 0 $orienting -roll +${ww2}+0 \) -append \
|
|
-write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background "$bgcolor" -flatten "$outfile"
|
|
|
|
elif [ "$arrangement" = "verticalmirror" ]; then
|
|
convert $tmpA1 \
|
|
\( -clone 0 $orienting \) +append \
|
|
\( -clone 0 -flip \) -append \
|
|
-write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background "$bgcolor" -flatten "$outfile"
|
|
|
|
elif [ "$arrangement" = "horizontalmirror" ]; then
|
|
convert $tmpA1 \
|
|
\( -clone 0 $orienting \) -append \
|
|
\( -clone 0 -flop \) +append \
|
|
-write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background "$bgcolor" -flatten "$outfile"
|
|
|
|
elif [ "$arrangement" = "rotate" ]; then
|
|
convert $tmpA1 $orienting \
|
|
\( -clone 0 -rotate 90 \) +append \
|
|
\( -clone 0 -rotate 180 \) -append \
|
|
-write mpr:cell +delete \
|
|
-size ${width}x${height} tile:mpr:cell \
|
|
-background "$bgcolor" -flatten "$outfile"
|
|
|
|
fi
|
|
|
|
exit 0 |