exif(n) [osx man page]
exif(n) EXIF parsing exif(n) _________________________________________________________________ NAME
exif - Tcl EXIF extracts and parses EXIF fields from digital images SYNOPSIS
package require Tcl 8.2 package require exif ?1.1.2? exif::analyze channel ?thumbnail? exif::analyzeFile filename ?thumbnail? exif::fieldnames _________________________________________________________________ DESCRIPTION
The EXIF package is a recoding of Chris Breeze's Perl package to do the same thing. This version accepts a channel as input and returns a serialized array with all the recognised fields parsed out. There is also a function to obtain a list of all possible field names that might be present, which is useful in building GUIs that present such information. COMMANDS
exif::analyze channel ?thumbnail? channel should be an open file handle rewound to the start. It does not need to be seekable. channel will be set to binary mode and is left wherever it happens to stop being parsed, usually at the end of the file or the start of the image data. You must open and close the stream yourself. If no error is thrown, the return value is a serialized array with informative English text about what was found in the EXIF block. Failure during parsing or I/O throw errors. If thumbnail is present and not the empty string it will be interpreted as the name of a file, and the thumbnail image contained in the exif data will be written into it. exif::analyzeFile filename ?thumbnail? This is a file-based wrapper around exif::analyze. Instead of taking a stream it takes a filename and analyzes the contents of the specified file. exif::fieldnames This returns a list of all possible field names. That is, the array returned by exif::analyze will not contain keys that are not listed in the return from exif::fieldnames. Of course, if information is missing in the image file, exif::analyze may not return all the fields listed in the return from exif::fieldnames. This function is expected to be primarily useful for building GUIs to display results. N.B.: Read the implementation of exif::fieldnames before modifying the implementation of exif::analyze. COPYRIGHTS
(c) 2002 Darren New Hold harmless the author, and any lawful use is allowed. ACKNOWLEDGEMENTS
This code is a direct translation of version 1.3 of exif.pl by Chris Breeze. See the source for full headers, references, etc. BUGS, IDEAS, FEEDBACK This document, and the package it describes, will undoubtedly contain bugs and other problems. Please report such in the category exif of the Tcllib SF Trackers [http://sourceforge.net/tracker/?group_id=12883]. Please also report any ideas for enhancements you may have for either package and/or documentation. exif 1.1.2 exif(n)
Check Out this Related Man Page
jpeg(n) JPEG image manipulation jpeg(n) __________________________________________________________________________________________________________________________________________________ NAME
jpeg - JPEG querying and manipulation of meta data SYNOPSIS
package require Tcl 8.2 package require jpeg ?0.3.3? ::jpeg::isJPEG file ::jpeg::imageInfo file ::jpeg::dimensions file ::jpeg::getThumbnail file ::jpeg::getExif file ?section? ::jpeg::formatExif keys ::jpeg::exifKeys ::jpeg::removeExif file ::jpeg::stripJPEG file ::jpeg::getComments file ::jpeg::addComment file text... ::jpeg::removeComments file ::jpeg::replaceComment file text ::jpeg::debug file ::jpeg::markers channel _________________________________________________________________ DESCRIPTION
This package provides commands to query and modify JPEG images. JPEG stands for Joint Photography Experts Group and is a standard for the lossy compression of photographical images. It is specified at LINK_HERE. COMMANDS
::jpeg::isJPEG file Returns a boolean value indicating if file is a JPEG image. ::jpeg::imageInfo file Returns a dictionary with keys version, units, xdensity, ydensity, xthumb, and ythumb. The values are the associated properties of the JPEG image in file. Throws an error if file is not a JPEG image. ::jpeg::dimensions file Returns the dimensions of the JPEG file as a list of the horizontal and vertical pixel count. Throws an error if file is not a JPEG image. ::jpeg::getThumbnail file This procedure will return the binary thumbnail image data, if a JPEG thumbnail is included in file, and the empty string otherwise. Note that it is possible to include thumbnails in formats other than JPEG although that is not common. The command finds thumbnails that are encoded in either the JFXX or EXIF segments of the JPEG information. If both are present the EXIF thumbnail will take precedence. Throws an error if file is not a JPEG image. set fh [open thumbnail.jpg w+] puts -nonewline $fh [::jpeg::getThumbnail photo.jpg] close $fh ::jpeg::getExif file ?section? section must be one of main or thumbnail. The default is main. Returns a dictionary containing the EXIF information for the speci- fied section. For example: set exif { Make Canon Model {Canon DIGITAL IXUS} DateTime {2001:06:09 15:17:32} } Throws an error if file is not a JPEG image. ::jpeg::formatExif keys Takes a list of key-value pairs as returned by getExif and formats many of the values into a more human readable form. As few as one key-value may be passed in, the entire exif is not required. foreach {key val} [::jpeg::formatExif [::jpeg::getExif photo.jpg]] { puts "$key: $val" } array set exif [::jpeg::getExif photo.jpg] puts "max f-stop: [::jpeg::formatExif [list MaxAperture $exif(MaxAperture)]] ::jpeg::exifKeys Returns a list of the EXIF keys which are currently understood. There may be keys present in getExif data that are not understood. Those keys will appear in a 4 digit hexadecimal format. ::jpeg::removeExif file Removes the Exif data segment from the specified file and replaces it with a standard JFIF segment. Throws an error if file is not a JPEG image. ::jpeg::stripJPEG file Removes all metadata from the JPEG file leaving only the image. This includes comments, EXIF segments, JFXX segments, and applica- tion specific segments. Throws an error if file is not a JPEG image. ::jpeg::getComments file Returns a list containing all the JPEG comments found in the file. Throws an error if file is not a valid JPEG image. ::jpeg::addComment file text... Adds one or more plain text comments to the JPEG image in file. Throws an error if file is not a valid JPEG image. ::jpeg::removeComments file Removes all comments from the file specified. Throws an error if file is not a valid JPEG image. ::jpeg::replaceComment file text Replaces the first comment in the file with the new text. This is merely a shortcut for ::jpeg::removeComments and ::jpeg::addCom- ment Throws an error if file is not a valid JPEG image. ::jpeg::debug file Prints everything we know about the given file in a nice format. ::jpeg::markers channel This is an internal helper command, we document it for use by advanced users of the package. The argument channel is an open file handle positioned at the start of the first marker (usually 2 bytes). The command returns a list with one element for each JFIF marker found in the file. Each element consists of a list of the marker name, its offset in the file, and its length. The offset points to the beginning of the sections data, not the marker itself. The length is the length of the data from the offset listed to the start of the next marker. LIMITATIONS
can only work with files cant write exif data gps exif data not parsed makernote data not yet implemented BUGS, IDEAS, FEEDBACK This document, and the package it describes, will undoubtedly contain bugs and other problems. Please report such in the category jpeg of the Tcllib SF Trackers [http://sourceforge.net/tracker/?group_id=12883]. Please also report any ideas for enhancements you may have for either package and/or documentation. KEYWORDS
comment, exif, image, jfif, jpeg, thumbnail COPYRIGHT
Copyright (c) 2004-2005, Code: Aaron Faupell <afaupell@users.sourceforge.net> Copyright (c) 2007, Code: Andreas Kupries <andreas_kupries@users.sourceforge.net> Copyright (c) 2004-2007, Doc: Andreas Kupries <andreas_kupries@users.sourceforge.net> jpeg 0.3.3 jpeg(n)