#!/bin/bash # # Developed by Fred Weinhaus 10/21/2011 .......... revised 10/12/2018 # # ------------------------------------------------------------------------------ # # 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: remap [-n numcolors ] [-m metric] [-s] infile mapfile outfile # USAGE: remap [-h or -help] # # OPTIONS: # # -n numcolors desired number of colors, if the input image # has more than 256 unique colors; # 0&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 8 ] then errMsg "--- TOO MANY ARGUMENTS WERE PROVIDED ---" else while [ $# -gt 0 ] do # get parameters case "$1" in -h|-help) # help information echo "" usage2 ;; -m) # metric shift # to get the next parameter # test if parameter starts with minus sign errorMsg="--- INVALID METRIC SPECIFICATION ---" checkMinus "$1" # test mode values metric="$1" metric=`echo "$metric" | tr "[:upper:]" "[:lower:]"` case "$metric" in rgb) metric="rgb" ;; rgbl) metric="rgbl" ;; *) errMsg "--- METRIC=$metric IS AN INVALID VALUE ---" esac ;; -n) # get ncolors shift # to get the next parameter # test if parameter starts with minus sign errorMsg="--- INVALID NUMCOLORS SPECIFICATION ---" checkMinus "$1" ncolors=`expr "$1" : '\([0-9]*\)'` [ "$ncolors" = "" ] && errMsg "--- NUMCOLORS=$ncolors MUST BE A NON-NEGATIVE INTEGER VALUE (with no sign) ---" test1=`echo "$ncolors < 1" | bc` test2=`echo "$ncolors > 256" | bc` [ $test1 -eq 1 -o $test2 -eq 1 ] && errMsg "--- NUMCOLORS=$ncolors MUST BE AN INTEGER BETWEEN 1 AND 256 ---" ;; -s) # set show show="yes" ;; -) # 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" mapfile="$2" outfile="$3" fi # test that infile provided [ "$infile" = "" ] && errMsg "--- NO INPUT FILE SPECIFIED ---" # test that mapfile provided [ "$mapfile" = "" ] && errMsg "--- NO MAPFILE FILE SPECIFIED ---" # test that outfile provided [ "$outfile" = "" ] && errMsg "--- NO OUTPUT FILE SPECIFIED ---" # NOTE: need to add -depth 8 before saving to mpc as it normally is 16-bits vs 8-bits for miff # Assumes images are RGB or sRGB # test input image convert -quiet "$infile" -alpha off +repage -depth 8 "$dir/tmpA.mpc" || errMsg "--- FILE $infile DOES NOT EXIST OR IS NOT AN ORDINARY FILE, NOT READABLE OR HAS ZERO SIZE ---" # test color table mapfile image convert -quiet "$mapfile" -alpha off -depth 8 +repage "$dir/tmpM.mpc" || errMsg "--- FILE $infile DOES NOT EXIST OR IS NOT AN ORDINARY FILE, NOT READABLE OR HAS ZERO SIZE ---" OLDIFS=$IFS # get colors from mapimage mapcolorArr=(`convert $dir/tmpM.mpc -alpha off -depth 8 -format %c -define histogram:unique-colors=true histogram:info:- | \ sed -n 's/^.*: *[(]\(.*\)[)].*#.*$/\1/p' | sed 's/ *//g'`) #echo "${mapcolorArr[*]}" nmapcolors="${#mapcolorArr[*]}" [ "$show" = "yes" ] && echo "" [ "$show" = "yes" ] && echo "number of mapcolors = $nmapcolors" # get original number of colors of image numoriginalcolors=`convert $dir/tmpA.mpc -format "%k" info:` [ "$show" = "yes" ] && echo "number of original colors=$numoriginalcolors" # reduce colors if more than 256 and ncolors not provided if [ "$ncolors" = "" -a $numoriginalcolors -gt 256 ]; then ncolors=24 convert $dir/tmpA.mpc +dither -colors $ncolors -depth 8 $dir/tmpA.mpc elif [ "$ncolors" = "" -a $numoriginalcolors -le 256 ]; then ncolors=$numoriginalcolors convert $dir/tmpA.mpc +dither -colors $ncolors -depth 8 $dir/tmpA.mpc elif [ "$ncolors" != "" ]; then convert $dir/tmpA.mpc +dither -colors $ncolors -depth 8 $dir/tmpA.mpc fi # get number of reduced rgb image colors colorArr=(`convert $dir/tmpA.mpc -alpha off -depth 8 -format %c -define histogram:unique-colors=true histogram:info:- | \ sed -n 's/^.*: *[(]\(.*\)[)].*#.*$/\1/p' | sed 's/ *//g'`) #echo "${colorArr[*]}" ncolors="${#colorArr[*]}" [ "$show" = "yes" ] && echo "number of reduced colors = $ncolors" # output color reduced image for testing #convert $dir/tmpA.mpc ${inname}_remap_reduced.png # create colorlist from both arrays colorlist=":${colorArr[*]}:${mapcolorArr[*]}:" #echo "$colorlist" # get matching color indices # note because of colons in colorlist, there are 3 items when split, #1 is empty, # so we use #2 and #3 IFS=":" if [ "$metric" = "rgb" ]; then pairlist=`for color in $colorlist; do echo "$color" done |\ awk ' { FS="x"; j=NR; Arr[j]=$1; split(Arr[2], colorArr, " "); split(Arr[3], mapcolorArr, " "); } END { FS=" "; for (j in colorArr) { mindist=1000000; k=1; for (i in mapcolorArr) { split(colorArr[j], c, ","); split(mapcolorArr[i], m, ","); dist=sqrt( (c[1]-m[1])*(c[1]-m[1])+(c[2]-m[2])*(c[2]-m[2])+(c[3]-m[3])*(c[3]-m[3]) ); if ( dist