Adoptable Modules > Palm-1.013 > Palm::ZirePhoto

Download:
Palm-1.013.tar.gz

Dependencies

Annotate this POD

CPAN RT

Open  0
View/Report Bugs
Module Version: 1.013   Source   Latest Release: Palm-1.014

NAME ^

Palm::ZirePhoto - Handler for Palm Zire71 Photo thumbnail databases.

SYNOPSIS ^

    use Palm::ZirePhoto;

DESCRIPTION ^

The Zire71 PDB handler is a helper class for the Palm::PDB package. It parses Zire71 Photo thumbnail databases (and, hopefully, Tungsten Photo databases). Actual photos are separate databases and must be processed separately.

This database is currently only capable of reading.

AppInfo block

The AppInfo block begins with standard category support. See Palm::StdAppInfo for details.

Records

Records may contain no data fields. This occurs when the record has been marked deleted on the Palm, presumably in order to save space (Photo has no provision for archiving when deleting and the separate database storage for the actual images would make it pointless anyways).

    $record = $pdb->{records}[N]

    $record->{'width'}
    $record->{'height'}
    $record->{'size'}

The actual JPEG images dimensions and (compressed) file size.

    $record->{'thumb'}

The thumbnail is a very small (max size approx 84x84) JPEG format image.

    $record->{'name'}

Image name. Appending .jpg to this will give the database name of the actual image data.

    $record->{'time1'}
    $record->{'time2'}

Unix epoch time of when the image was last modified (time1) and when it was created (time2).

Photo Databases

Actual photos are stored in separate databases. Each record is preceeded by an 8 byte header that describes it a) as a data block (DBLK) and b) the size of the block. Records are generally 4k, except for the last. To convert a Photo database to a JPEG image, one would do something like:

        use Palm::Raw;

        my $pdb = new Palm::PDB;
        $pdb->Load( "image.jpg.pdb" );
        open F, ">image.jpg";
        for( @{$pdb->{records}} ) {
                print F substr($_->{'data'}, 8);
        }
        close F;

Notes are stored at the end of the JPEG image. Use ParseNote to get it.

METHODS ^

Handling Palm photos can be a bit complicated. Some helper methods are exported to make some special cases a bit easier.

ParseNote

        my $photo = read_jpeg_file( "image.jpg" );
        my $note = Palm::ZirePhoto::ParseNote($photo);
        print "Note: $note" if defined $note;

The Palm photo application stores user notes at the end of the JPEG file itself. This method will extract that note and return it. undef is returned if the note is unavailable.

ParseAlbum

        my $album = slurp("/DCIM/Unfiled/Album.db");
        my @records = Palm::ZirePhoto::ParseAlbum( $album );
        print $_->{name},"\n" for( @records );

Photos on memory cards are stored in subdirectories of /DCIM. The meta-data for these images are stored in Album.db files under each category directory. This method will parse out the meta-data into an array of records similar to those returned by ParseRecord. Thumbnail information, however, is not available.

SOURCE CONTROL ^

The source is in Github:

        http://github.com/briandfoy/p5-Palm/tree/master

AUTHOR ^

Alessandro Zummo, <a.zummo@towertech.it>

Currently maintained by brian d foy, <bdfoy@cpan.org>

SEE ALSO ^

Palm::PDB(3)

Palm::StdAppInfo(3)

syntax highlighting: