<h2>Edit File: pcdindex</h2><form method="post"><textarea name="content" rows="20" cols="80">#!/usr/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 &quot;hpcdtoppm -Overview&quot;
# followed by &quot;pnmindex -black&quot; 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 &lt;font&gt;. See &quot;man pbmtext&quot; on how to create your own font.
#
# Pieter S. van der Meulen, 1992.
# Rewritten in sh by Steve McIntyre &lt;93sam@debian.org&gt;, 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=&quot;noquant&quot;  # maximum amount of colors or noquant (no quantization)
back=&quot;-black&quot;     # default background color
font=&quot; &quot;          # default font or none (pbmtext&#039;s internal font)

plainopt=&quot;&quot;       # output plain ppm
quietopt=&quot;&quot;       # quiet operation (currently no effect)
versionopt=0

usage ()
{
    echo &quot;Usage: $0 [-m W] [-s S] [-a A] [-c N|n] [-f F] [-b|-w] &lt;overview.pcd&gt;&quot;
    echo &quot; with&quot;
    echo &quot;      W = maximum width of the result image   (default: $maxwidth)&quot;
    echo &quot;      S = maximum size of each of the images  (default: $size)&quot;
    echo &quot;      A = maximum number of images across     (default: $across)&quot;
    echo &quot;      N = maximum number of colors or noquant (default: $colors)&quot;
    echo -n &quot;   F = font to be used for annotation      (default: &quot;
    if [ &quot;$font&quot; = &quot; &quot; ] ; then
                echo &quot;internal font)&quot;
    else
                echo &quot;$font)&quot;
    fi
    echo &quot;      -b/-w = black/white background color    (default: $back)&quot;
    echo &quot; &quot;
    echo &quot; e.g.: $0 -m 768 -s 96 -f smallfont.pbm overview.pcd &gt; overview.ppm&quot;
    echo &quot; or  : $0 /cdrom/photo_cd/overview.pcd | ppmtojpeg &gt; overview.jpg&quot;
    exit 1
}

version ()
{
    # report version using pnmscale
    pnmscale -version $quietopt
    exit 0
}

# Parse the options
while :; do
    case &quot;$1&quot; in 
        -m|-ma|-max|-maxw|-maxwi|-maxwid|-maxwidt|-maxwidth )
             if [ $# -lt 2 ] ; then usage; fi
             maxwidth=&quot;$2&quot;
             shift
             shift
             ;;

        -s|-si|-siz|-size )
             if [ $# -lt 2 ] ; then usage; fi
             size=&quot;$2&quot;
             shift
             shift
             ;;

         -a|-ac|-acr|-acro|-acros|-across )
             if [ $# -lt 2 ] ; then usage; fi
             across=&quot;$2&quot;
             shift
             shift
             ;;

         -c|-co|-col|-colo|-color|-colors )
             if [ $# -lt 2 ] ; then usage; fi
             colors=&quot;$2&quot;
             shift
             shift
             ;;

         -f|-fo|-fon|-font )
             if [ $# -lt 2 ] ; then usage; fi
             font=&quot;-font $2&quot;
             shift
             shift
             ;;

         -b|-bl|-bla|-blac|-black )
             back=&quot;-black&quot;
             shift
             ;;

         -w|-wh|-whi|-whit|-white )
             back=&quot;-white&quot;
             shift
             ;;
             
         -p|-pl|-pla|-plai|-plain )
             plainopt=&quot;-plain&quot;
             shift
             ;;
            
         -q|-qu|-qui|-quie|-quiet )
             quietopt=&quot;-quiet&quot;
             shift
             ;;
             
         -v|-ve|-ver|-vers|-versi|-versio|-version )
             versionopt=&quot;1&quot;
             shift
             ;;
                    
         -*)
             echo &quot;$0 : Unknown option $1&quot; 1&gt;&amp;2
             echo &quot; &quot; 1&gt;&amp;2
             usage
             ;;

         *)
             break
             ;;

    esac
done

if [ $versionopt -eq 1 ] ; then
    version
elif [ $# -eq 0 ] ; then
    usage
fi

tempdir=$(mktemp -d &quot;${TMPDIR:-/tmp}/pcdovtoppm.XXXXXXXX&quot;) ||
    { echo &quot;Could not create temporary file. Exiting.&quot; 1&gt;&amp;2; exit 1; }
trap &#039;rm -rf $tempdir&#039; 0

tmpfile=`tempfile -p pi -m 600`

# Convert the PCD overview file to many PPM images
if [ -f $1 ] ; then
    hpcdtoppm -Overview $1 $tmpfile ||
        { echo &quot;$0: Hpcdtoppm failed. Exiting&quot; 1&gt;&amp;2 ; exit 1; }
else
    echo &quot;$0 : Could not access $1&quot; 1&gt;&amp;2
    echo &quot; &quot; 1&gt;&amp;2
    usage
fi

imagefiles=
rowfiles=
row=1
col=1
width=$size

for i in &quot;$tmpfile&quot;* 
do
    if [ -f $i ] ; then
        thiswidth=$(pamfile -machine $i | cut -f 4 -d &#039; &#039;)
        thisheight=$(pamfile -machine $i | cut -f 5 -d &#039; &#039;)
        if [ &quot;$thiswidth&quot; -le $size -a &quot;$thisheight&quot; -le $size ] ; then
            cat $i &gt; $tmpfile
        else
            if [ &quot;$colors&quot; = &quot;n&quot; ] ; then
                pnmscale -quiet -xysize $size $size $i &gt; $tmpfile
            else
                pnmscale -quiet -xysize $size $size $i | \
                ppmquant -quiet $colors &gt; $tmpfile
            fi
        fi
    fi
    imagefile=${tempdir}/pi.${row}.${col}
    rm -f $imagefile
    ttext=&quot;$i:t&quot;

    if [ &quot;$back&quot; = &quot;-white&quot; ] ; then
        pbmtext $font &quot;$ttext&quot; | pnmcrop -quiet | pnmmargin -white 2| \
        pnmcat $back -tb $tmpfile - &gt; $imagefile
    else
        pbmtext $font &quot;$ttext&quot; | pnmcrop -quiet | pnmmargin -white 2 | \
        pnminvert | pnmcat $back -tb $tmpfile - &gt; $imagefile
    fi

    rm -f $tmpfile
    thisWidth=$(pamfile -machine $i | cut -f 4 -d &#039; &#039;)
    width=$(( $width + $thisWidth ))
    imagefiles=&quot;$imagefiles $imagefile&quot;

    if [ $col -ge $across -o $width -gt $maxwidth ] ; then
        rowfile=${tempdir}/pi.${row}
        rm -f $rowfile
    if [ &quot;$colors&quot; = &quot;n&quot; ] ; then
        pnmcat $back -lr -jbottom $imagefiles &gt; $rowfile
    else
        pnmcat $back -lr -jbottom $imagefiles | \
        ppmquant -quiet $colors &gt; $rowfile
    fi
    rm -f $imagefiles
    imagefiles=
    rowfiles=&quot;$rowfiles $rowfile&quot;
    col=1
    row=$(( $row + 1 ))
    width=$size
    else
        col=$(( $col + 1 ))
    fi
done

if [ -n $imagefiles ] ; then
    rowfile=${tempdir}/pi.${row}
    rm -f $rowfile
    if [ &quot;$colors&quot; = &quot;n&quot; ] ; then
        pnmcat $back -lr -jbottom $imagefiles &gt; $rowfile
    else
        pnmcat $back -lr -jbottom $imagefiles | \
        ppmquant -quiet $colors &gt; $rowfile
    fi
    rm -f $imagefiles
    rowfiles=&quot;$rowfiles $rowfile&quot;
fi

if [ $(echo $rowfiles|wc -w) -eq 1 ] ; then
    ppmtoppm $plainopt &lt; $rowfiles
else
    if [ &quot;$colors&quot; = &quot;n&quot; ] ; then
        pnmcat $back -tb $plainopt $rowfiles
    else
        pnmcat $back -tb $rowfiles | ppmquant $plainopt -quiet $colors
    fi
fi

rm -f $rowfiles

exit 0


</textarea><br><input type="hidden" name="edit_file" value="pcdindex"><input type="submit" value="Save"></form>