<h2>Edit File: anytopnm</h2><form method="post"><textarea name="content" rows="20" cols="80">#!/bin/sh
#
# anytopnm - attempt to convert an unknown type of image file to a P?M file.
#
# Copyright (C) 1991 by Jef Poskanzer.
#
# Permission to use, copy, modify, and distribute this software and its
# documentation for any purpose and without fee is hereby granted, provided
# that the above copyright notice appear in all copies and that both that
# copyright notice and this permission notice appear in supporting
# documentation.  This software is provided &quot;as is&quot; without express or
# implied warranty.


putInputIntoTempfile() {

    # $1 is the input file specification
    # $2 is the temporary file name
    
    rm -f &quot;$2&quot;
    if [ &quot;$1&quot; = &quot;-&quot; ] ; then
            cat &gt; &quot;$2&quot;
    else
        # We&#039;d like to do a -e here to test the existence of the filesystem
        # object per se, and thus give a more specific error message.  But
        # some systems don&#039;t have -e.
        if [ ! -f &quot;$1&quot; ] ; then
            echo &quot;$progname: &#039;$1&#039; does not exist or is not a file&quot; 1&gt;&amp;2
            exit 1
            fi
        
        if [ ! -r &quot;$1&quot; ] ; then
            echo &quot;$progname: &#039;$1&#039; is not readable&quot; 1&gt;&amp;2
            exit 1
            fi
        
        if [ -z &quot;$1&quot; ] ; then
            echo &quot;$progname: &#039;$1&#039; is empty&quot; 1&gt;&amp;2
            exit 1
            fi
        
        cat &lt; &quot;$1&quot; &gt; &quot;$2&quot;
        fi
}


setMimeType() {
#------------------------------------------------------------------------------
# Set variable &#039;mimeType&#039; to the mime type string (e.g. &quot;application/binary&quot;)
#
# If we can&#039;t tell, set it to &quot;unknown&quot;.
#------------------------------------------------------------------------------
    # $1 is the file name

    # Old versions of &#039;file&#039; cannot tell us the mime type; they lack any option
    # to do so.
    #
    # Newer ones have a --mime option for that.
    #
    # Still newer ones (ca 2008) have a --mime option, but it does something
    # different - it prints the mime type plus the mime encoding.  And they
    # have --mime-type to print just the mime type.

    file --mime-type /dev/null &gt;/dev/null 2&gt;/dev/null
    if [ $? -eq 0 ]; then
        # Now that we know the --mime-type option exists, use it.
        mimeType=`file --mime-type &quot;$1&quot; | cut -d: -f2- | cut -c2-`
    else
        # file --mime-type failed; we don&#039;t know why, but we assume it&#039;s
        # because it is an older &#039;file&#039; program that doesn&#039;t have a --mime-type
        # option.
        file --mime /dev/null &gt;/dev/null 2&gt;/dev/null
        if [ $? -eq 0 ]; then
            # Now that we know the --mime option exists, use it.
            mimeType=`file --mime &quot;$1&quot; | cut -d: -f2- | cut -c2-`
        else
            # file --mime failed; we don&#039;t know why, but we assume it&#039;s because
            # it is an older &#039;file&#039; program that doesn&#039;t have a --mime option.
            mimeType=&quot;unknown&quot;
        fi
    fi
}


computeTypeFromMimeType () {

# $1 is the mime type string
    
    case &quot;$1&quot; in

        image/jpeg )
            filetype=&quot;jfif&quot;
            ;;
        image/gif )
            filetype=&quot;gif&quot;
            ;;
        image/tiff )
            filetype=&quot;tiff&quot;
            ;;
        image/bmp )
            filetype=&quot;bmp&quot;
            ;;
        image/x-ms-bmp )
            filetype=&quot;bmp&quot;
            ;;
        image/png )
            filetype=&quot;png&quot;
            ;;
        image/x-portable-bitmap | image/x-portable-pixmap | \
                image/x-portable-greymap)
            filetype=&quot;pnm&quot;
            ;;
        image/x-xpm )
            filetype=&quot;xpm&quot;
            ;;
        * )
            filetype=unknown
            ;;
        esac
}


computeTypeFromTypeDescription () {

# $1 is the full description from &#039;file&#039; of the file type

    case &quot;$1&quot; in
    
        *PBM* | *PGM* | *PPM* | *Netpbm*PAM*)
            filetype=pnm
            ;;
    
        *JPEG* | *JFIF* )
            filetype=jfif
            ;;
    
        *PNG* )
            filetype=png
            ;;
    
        *GIF* )
            filetype=gif
            ;;
    
        *TIFF* )
            filetype=tiff
            ;;
    
        # We have seen &quot;PC bitmap&quot; and &quot;PC bitmap data&quot;
        *PC*bitmap* )
            filetype=bmp
            ;;
        
        *uuencoded* )
            filetype=uuencoded
            ;;
    
        *bzip2*compressed*data* )
            filetype=bzip2
            ;;
    
        *bzip*compressed*data* )
            filetype=bzip
            ;;
        
        *gzip*compressed*data* )
            filetype=gzip
            ;;
    
        *XWD*X*Window*Dump* ) 
            filetype=xwd
            ;;

        *compress* )
            filetype=compress
            ;;
    
        *btoa* )
            filetype=btoa
            ;;
    
        *Sun* | *rasterfile* )
            filetype=rast
            ;;
    
        *IFF*ILBM* )
            filetype=ilbm
            ;;
    
        *Lisp* )
            filetype=lispm
            ;;
    
        *PC*Paintbrush* )
            filetype=pcx
            ;;
    
        *Bennet* )
            filetype=ybm
            ;;
    
        *pixmap*image*text* )
            filetype=xpm
            ;;
    
        # This has to come after all other &#039;text&#039; files, or you may be
        # disappointed.
        *text* )
            filetype=text
            ;;
    
        *MicroDesign* )
            filetype=mda
            ;;
    
        * )
            filetype=unknown
            ;;
        esac
}


computeTypeFromFilenameExtension () {
# $1 is the filename extension (&quot;.gif&quot;, etc.)

    case &quot;$1&quot; in

        *.pbm | *.pbm.* | *.pgm | *.pgm.* | *.ppm | *.ppm.* )
            filetype=pnm
            ;;
        *.JPEG | *.jpeg | *.jpg | *.JPG )
            filetype=jfif
            ;;
        *.gif | *.gif.* )
            filetype=gif
            ;;
        *.png | *.PNG )
            filetype=png
            ;;
        *.tif | *.tif.* | *.tiff | *.tiff.* )
            filetype=tiff
            ;;
        *.bmp )
            filetype=bmp
            ;;
        *.x | *.x.* | *.xbm | *.xbm.* | *.x10bm | *.x10bm.* | \
            *.x11bm | *.x11bm.* | *.bitmap | *.bitmap.* )
            filetype=xbm
            ;;
        *.r | *.r.* | *.rast | *.rast.* )
            filetype=rast
            ;;
        *.mac | *.mac.* | *.macp | *.macp.* )
            filetype=macp
            ;;
        *.g3 | *.g3.* | *.fax | *.fax.* )
            filetype=g3
            ;;
        *.xwd | *.xwd.* | *.x10wd | *.x10wd.* \
                | *.x11wd | *.x11wd.* )
            filetype=xwd
            ;;
        *.brush | *.brush.* )
            filetype=brush
            ;;
        *.img | *.img.* )
            filetype=gem
            ;;
        *.pcx | *.pcx.* )
            filetype=pcx
            ;;
        *.pic | *.pic.* | *.pict | *.pict.* | *.pict2 | *.pict2.* )
            filetype=pict
            ;;
        *.fs | *.fs.* | *.face | *.face.* )
            filetype=fs
            ;;
        *.hips | *.hips.* )
            filetype=hips
            ;;
        *.fits | *.fits.* )
            filetype=fits
            ;;
        *.iff | *.iff.* | *.ilbm | *.ilbm.* )
            filetype=ilbm
            ;;
        *.lispm | *.lispm.* )
            filetype=lispm
            ;;
        *.mtv | *.mtv.* )
            filetype=mtv
            ;;
        *.qrt | *.qrt.* )
            filetype=qrt
            ;;
        *.tga | *.tga.* | *.targa | *.targa.* )
            filetype=tga
            ;;
        *.xim | *.xim.* )
            filetype=xim
            ;;
        *.xpm | *.xpm.* | *.xpm2 | *.xpm2.* )
            filetype=xpm
            ;;
        *.pi1 | *.pi1.* )
            filetype=pi1
            ;;
        *.pi3 | *.pi3.* )
            filetype=pi3
            ;;
        *.spu | *.spu.* )
            filetype=spu
            ;;
        *.spc | *.spc.* )
            filetype=spc
            ;;
        *.ybm | *.ybm.* | *.face | *.face.* )
            filetype=ybm
            ;;
        *.mda | *.mdp )
            filetype=mda
            ;;
        * )
            filetype=unknown
            ;;
        esac
}


determineType () {

# $1 is the name of the file that contains the subject file&#039;s contents
# $2 is the mime type or &quot;unknown&quot;
# $3 is the type description from &#039;file&#039;

    if [ &quot;$2&quot; = &quot;unknown&quot; ]; then
        filetype=&quot;unknown&quot;
    else
        computeTypeFromMimeType &quot;$2&quot;
        fi

    if [ &quot;$filetype&quot; = &quot;unknown&quot; ]; then
        computeTypeFromTypeDescription &quot;$3&quot;
        fi

    if [ &quot;$filetype&quot; = &quot;unknown&quot; ]; then
        computeTypeFromFilenameExtension &quot;$4&quot;
        fi
}


convertIt () {
# Based on the file type computed, do the conversion

# $1 is the input file name
# $2 is our file type code

case &quot;$2&quot; in

    pnm )
        cat &quot;$file&quot;
        ;;

    uuencoded )
        newfile=&quot;$tempdir/atn.decode.$$&quot;
        rm -f &quot;$newfile&quot;
        (echo begin 600 $newfile; sed 1d &lt; &quot;$file&quot;) | uudecode
        anytopnm &quot;$newfile&quot;
        ;;

    bzip2 )
        bzip2 -dk &lt; &quot;$file&quot; | anytopnm -
        ;;

    bzip )
        bzip -dk &lt; &quot;$file&quot; | anytopnm -
        ;;

    gzip )
        gzip --decompress --to-stdout &lt; &quot;$file&quot; | anytopnm -
        ;;

    compress )
        uncompress -c &lt; &quot;$file&quot; | anytopnm -
        ;;

    btoa )
        atob &lt; &quot;$file&quot; | anytopnm -
        ;;

    rast )
        rasttopnm &quot;$file&quot;
        ;;

    gif )
        giftopnm -image=all &quot;$file&quot;
        ;;

    tiff )
        tifftopnm &quot;$file&quot;
        ;;

    ilbm )
        ilbmtoppm &quot;$file&quot;
        ;;

    lispm )
        lispmtopgm &quot;$file&quot;
        ;;

    pcx )
        pcxtoppm &quot;$file&quot;
        ;;

    ybm )
        ybmtopbm &quot;$file&quot;
        ;;

    xpm )
        xpmtoppm &lt; &quot;$file&quot;
        ;;

    # This has to come after all other &#039;text&#039; files, or you may be
    # disappointed.
    text )
        pbmtext -builtin fixed &lt; &quot;$file&quot;
        ;;

    jfif )
        jpegtopnm &quot;$file&quot;
        ;;

    png )
        pngtopam &quot;$file&quot;
        ;;

    mda )
        mdatopbm -d -- &quot;$file&quot;
        ;;

    bmp )
        bmptoppm &quot;$file&quot;
        ;;
    
    xbm )
        xbmtopbm &quot;$file&quot;
        ;;
    macp )
        macptopbm &quot;$file&quot;
        ;;
    g3 )
        g3topbm &quot;$file&quot;
        ;;
    xwd )
        xwdtopnm &quot;$file&quot;
        ;;
    brush )
        brushtopbm &quot;$file&quot;
        ;;
    img )
        gemtopbm &quot;$file&quot;
        ;;
    pcx ) 
        pcxtoppm &quot;$file&quot;
        ;;
    pict )
        picttoppm &quot;$file&quot;
        ;;
    fs )
        fstopgm &quot;$file&quot;
        ;;
    hips )
        hipstopgm &quot;$file&quot;
        ;;
    fits )
        fitstopnm &quot;$file&quot;
        ;;
    mtv )
        mtvtoppm &quot;$file&quot;
        ;;
    qrt )
        qrttoppm &quot;$file&quot;
        ;;
    tga )
        tgatoppm &quot;$file&quot;
        ;;
    xim )
        ximtoppm &quot;$file&quot;
        ;;
    pi1 )
        pi1toppm &quot;$file&quot;
        ;;
    pi3 )
        pi3topbm &quot;$file&quot;
        ;;
    spu )
        sputoppm &quot;$file&quot;
        ;;
    spc )
        spctoppm &quot;$file&quot;
        ;;
    * )
        echo &quot;$progname: INTERNAL ERROR.  Illegal value of filetype variable&quot;
        exit 1
        ;;

    esac
}


###############################################################################
#                                MAINLINE
###############################################################################

progname=$0

if [ $# -gt 1 ] ; then
    echo &quot;Too many arguments: $#.  The only valid argument is the&quot; \
         &quot;input file name.&quot; 1&gt;&amp;2
    exit 1
elif [ $# -eq 1 ] ; then
    if [ $1 = &quot;--version&quot; -o $1 = &quot;-version&quot; ] ; then
        pamtopnm --version ; exit $?
    else 
        inputFile=&quot;$1&quot;
    fi
else
        inputFile=&quot;-&quot;

fi

tempdir=$(mktemp -d -t anytopnm.XXXXXXXX) ||
    ( echo &quot;Could not create temporary file. Exiting.&quot; 1&gt;&amp;2; exit 1; ) 

# Take out all spaces
# Find the filename extension for last-ditch efforts later

# We used to do this, but it doesn&#039;t work with all Awks.  The sed below
# is universal.  2005.11.02.
#fileExtension=`echo &quot;$inputFile&quot; | \
#               $AWK &#039;{gsub(&quot; &quot;,&quot;&quot;);gsub(&quot;.*\\\\.&quot;,&quot;.&quot;);print}&#039;`

fileExtension=`echo &quot;$inputFile&quot; | sed &#039;s/ //;s/.*\././g&#039;`

file=&quot;$tempdir/atn.stdin.$$&quot;

putInputIntoTempfile &quot;$inputFile&quot; &quot;$file&quot;

setMimeType &quot;$file&quot;

typeDescription=`file &quot;$file&quot; | cut -d: -f2- | cut -c2-`

determineType &quot;$file&quot; &quot;$mimeType&quot; &quot;$typeDescription&quot; &quot;$fileExtension&quot;

if [ &quot;$filetype&quot; = &quot;unknown&quot; ]; then
    echo &quot;$progname: unknown file type.  &quot; \
        &quot;&#039;file&#039; says mime type is &#039;$mimeType&#039;, &quot; 1&gt;&amp;2
    echo &quot;type description is &#039;$typeDescription&#039;&quot; 1&gt;&amp;2
    if [ -d &quot;$tempdir&quot; ] ; then
        rm -rf &quot;$tempdir&quot;
    fi

    exit 1
    fi

convertIt $file $filetype

if [ -d &quot;$tempdir&quot; ] ; then
    rm -rf &quot;$tempdir&quot;
fi

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