diff options
author | giraffedata <giraffedata@9d0c8265-081b-0410-96cb-a4ca84ce46f8> | 2006-08-19 03:12:28 +0000 |
---|---|---|
committer | giraffedata <giraffedata@9d0c8265-081b-0410-96cb-a4ca84ce46f8> | 2006-08-19 03:12:28 +0000 |
commit | 1fd361a1ea06e44286c213ca1f814f49306fdc43 (patch) | |
tree | 64c8c96cf54d8718847339a403e5e67b922e8c3f /converter/ppm/hpcdtoppm/pcdovtoppm | |
download | netpbm-mirror-1fd361a1ea06e44286c213ca1f814f49306fdc43.tar.gz netpbm-mirror-1fd361a1ea06e44286c213ca1f814f49306fdc43.tar.xz netpbm-mirror-1fd361a1ea06e44286c213ca1f814f49306fdc43.zip |
Create Subversion repository
git-svn-id: http://svn.code.sf.net/p/netpbm/code/trunk@1 9d0c8265-081b-0410-96cb-a4ca84ce46f8
Diffstat (limited to 'converter/ppm/hpcdtoppm/pcdovtoppm')
-rwxr-xr-x | converter/ppm/hpcdtoppm/pcdovtoppm | 214 |
1 files changed, 214 insertions, 0 deletions
diff --git a/converter/ppm/hpcdtoppm/pcdovtoppm b/converter/ppm/hpcdtoppm/pcdovtoppm new file mode 100755 index 00000000..1f8b3006 --- /dev/null +++ b/converter/ppm/hpcdtoppm/pcdovtoppm @@ -0,0 +1,214 @@ +#!/bin/sh +# +# pcdovtoppm - generate a single PPM file from a PCD overview file +# +# Based on pnmindex (PBMPLUS), which was written by Jef Poskanzer, +# this script makes also use of hpcdtoppm, written by Hadmut Danisch. +# +# Formerly called Pcdindex. +# +# A similar result can be achieved by using "hpcdtoppm -Overview" +# followed by "pnmindex -black" on the generated PPM images. +# This shell just makes it more convenient and transparent to +# convert from one PCD to one PPM overview file. +# +# Additional options (compared to pnmindex) are -maxwidth and +# -font <font>. See "man pbmtext" on how to create your own font. +# +# Pieter S. van der Meulen, 1992. +# Rewritten in sh by Steve McIntyre <93sam@debian.org>, 2001 + +# You may want to change the default values in the next 6 lines: +maxwidth=1152 # maximum width of the index image +size=192 # make the images about this big +across=6 # show this many images per row +colors="noquant" # maximum amount of colors or noquant (no quantization) +back="-black" # default background color +font=" " # default font or none (pbmtext's internal font) + +usage () +{ + echo "Usage: $0 [-m W] [-s S] [-a A] [-c N|n] [-f F] [-b|-w] <overview.pcd>" + echo " with" + echo " W = maximum width of the result image (default: $maxwidth)" + echo " S = maximum size of each of the images (default: $size)" + echo " A = maximum number of images across (default: $across)" + echo " N = maximum number of colors or noquant (default: $colors)" + echo -n " F = font to be used for annotation (default: " + if [ "$font" = " " ] ; then + echo "internal font)" + else + echo "$font)" + fi + echo " -b/-w = black/white background color (default: $back)" + echo " " + echo " e.g.: $0 -m 768 -s 96 -f smallfont.pbm overview.pcd > overview.ppm" + echo " or : $0 /cdrom/photo_cd/overview.pcd | ppmtojpeg > overview.jpg" + exit 1 +} + +# Parse the options +while :; do + case "$1" in + -m*) + if [ $# -lt 2 ] ; then usage; fi + maxwidth="$2" + shift + shift + ;; + + -s*) + if [ $# -lt 2 ] ; then usage; fi + size="$2" + shift + shift + ;; + + -a*) + if [ $# -lt 2 ] ; then usage; fi + across="$2" + shift + shift + ;; + + -c*) + if [ $# -lt 2 ] ; then usage; fi + colors="$2" + shift + shift + ;; + + -f*) + if [ $# -lt 2 ] ; then usage; fi + font="-font $2" + shift + shift + ;; + + -b*) + back="-black" + shift + ;; + + -w*) + back="-white" + shift + ;; + + -*) + echo "$0 : Unknown option $1" + echo " " + usage + ;; + + *) + break + ;; + + esac +done + +if [ $# = 0 ]; then + usage +fi + +tmpfile=`tempfile -p pi -m 600` + +rowfiles=() +imagefiles=() +row=1 +col=1 +width=$size + +# Convert the PCD overview file to many PPM images +if [ -f $1 ] ; then + hpcdtoppm -Overview $1 $tmpfile +else + echo "$0 : Could not access $1" + echo " " + usage +fi + +for i in "$tmpfile"* +do + if [ -f $i ] ; then + description=`pnmfile $i` + if [ "${description[4]}" -le $size -a \ + "${description[6]}" -le $size ] ; then + cat $i > $tmpfile + else + if [ "$colors" = "n" ] ; then + pnmscale -quiet -xysize $size $size $i > $tmpfile + else + pnmscale -quiet -xysize $size $size $i | \ + ppmquant -quiet $colors > $tmpfile + fi + fi + fi + imagefile=pi.${row}.${col}.$$ + rm -f $imagefile + ttext="$i:t" + + if [ "$back" = "-white" ] ; then + pbmtext $font "$ttext" | pnmcrop -quiet | pnmmargin -white 2| \ + pnmcat $back -tb $tmpfile - > $imagefile + else + pbmtext $font "$ttext" | pnmcrop -quiet | pnmmargin -white 2 | \ + pnminvert | pnmcat $back -tb $tmpfile - > $imagefile + fi + + rm -f $tmpfile + description=`pnmfile $imagefile` + width=$(( $width + ${description[4]} )) + imagefiles="$imagefiles $imagefile" + + if [ $col -ge $across -o $width -gt $maxwidth ] ; then + rowfile=pi.${row}.$$ + rm -f $rowfile + if [ "$colors" = "n" ] ; then + pnmcat $back -lr -jbottom $imagefiles > $rowfile + else + pnmcat $back -lr -jbottom $imagefiles | \ + ppmquant -quiet $colors > $rowfile + fi + rm -f $imagefiles + imagefiles=() + rowfiles="$rowfiles $rowfile" + col=1 + row=$(( $row + 1 )) + width=$size + else + col=$(( $col + 1 )) + fi +done + +if [ ${#imagefiles[*]} -gt 0 ] ; then + rowfile=pi.${row}.$$ + rm -f $rowfile + if [ "$colors" = "n" ] ; then + pnmcat $back -lr -jbottom $imagefiles > $rowfile + else + pnmcat $back -lr -jbottom $imagefiles | \ + ppmquant -quiet $colors > $rowfile + fi + rm -f $imagefiles + rowfiles="$rowfiles $rowfile" +fi + +if [ ${#rowfiles[*]} == 1 ]; then + cat $rowfiles +else + if [ "$colors" = "n" ] ; then + pnmcat $back -tb $rowfiles + else + pnmcat $back -tb $rowfiles | ppmquant -quiet $colors + fi +fi + +rm -f $rowfiles + +exit 0 + + + + |