<?php
/*************************
  Coppermine Photo Gallery
  ************************
  Copyright (c) 2003-2009 Coppermine Dev Team
  v1.1 originally written by Gregory DEMAR

  This program is free software; you can redistribute it and/or modify
  it under the terms of the GNU General Public License version 3
  as published by the Free Software Foundation.
  
  ********************************************
  Coppermine version: 1.4.23
  $HeadURL: https://coppermine.svn.sourceforge.net/svnroot/coppermine/trunk/cpg1.4.x/include/makers/olympus.php $
  $Revision: 5891 $
  $Author: gaugau $
  $Date: 2009-05-01 23:44:32 +0200 (Fr, 01 Mai 2009) $
**********************************************/

/*
        Exifer
        Extracts EXIF information from digital photos.
        Copyright © 2003 Jake Olefsky
        http://www.offsky.com/software/exif/index.php
        jake@olefsky.com
        Please see exif.php for the complete information about this software.
        ------------
        This program is free software; you can redistribute it and/or modify it under the terms of
        the GNU General Public License as published by the Free Software Foundation; either version 2
        of the License, or 

        This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
        without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
        See the GNU General Public License for more details. http://www.gnu.org/copyleft/gpl.html
*/

//=================
// Looks up the name of the tag for the MakerNote (Depends on Manufacturer)
//====================================================================
function lookup_Olympus_tag($tag) {
        switch($tag) {
                case "0200": $tag = "SpecialMode";
                	break;
                case "0201": $tag = "JpegQual";
                	break;
                case "0202": $tag = "Macro";
                	break;
                case "0203": $tag = "Unknown1";
                	break;
                case "0204": $tag = "DigiZoom";
                	break;
                case "0205": $tag = "Unknown2";
                	break;
                case "0206": $tag = "Unknown3";
                	break;
                case "0207": $tag = "SoftwareRelease";
                	break;
                case "0208": $tag = "PictInfo";
                	break;
                case "0209": $tag = "CameraID";
                	break;
                case "0f00": $tag = "DataDump";
                	break;
                default: $tag = "unknown:".$tag;
                	break;
        }
        return $tag;
}

//=================
// Formats Data for the data type
//====================================================================
function formatOlympusData($type,$tag,$intel,$data) {
        if($type=="ASCII") {
        } else if($type=="URATIONAL" || $type=="SRATIONAL") {
                $data = bin2hex($data);
                if($intel==1) $data = intel2Moto($data);
                $top = hexdec(substr($data,8,8));
                $bottom = hexdec(substr($data,0,8));
                if($bottom!=0) $data=$top/$bottom;
                else if($top==0) $data = 0;
                else $data=$top."/".$bottom;
                if($tag=="0204") { //DigitalZoom
                        $data=$data."x";
                }
                if($tag=="0205") { //Unknown2
                        $data=$top."/".$bottom;
                }
        } else if($type=="USHORT" || $type=="SSHORT" || $type=="ULONG" || $type=="SLONG" || $type=="FLOAT" || $type=="DOUBLE") {
                $data = bin2hex($data);
                if($intel==1) $data = intel2Moto($data);
                $data=hexdec($data);
                if($tag=="0201") { //JPEGQuality
                        if($data == 1) $data = "SQ";
                        else if($data == 2) $data = "HQ";
                        else if($data == 3) $data = "SHQ";
                        else $data = "Unknown: ".$data;
                }
                if($tag=="0202") { //Macro
                        if($data == 0) $data = "Normal";
                        else if($data == 1) $data = "Macro";
                        else $data = "Unknown: ".$data;
                }
        } else if($type=="UNDEFINED") {
        } else {
                $data = bin2hex($data);
                if($intel==1) $data = intel2Moto($data);
        }
        return $data;
}

//=================
// Olympus Special data section
//====================================================================
function parseOlympus($block,&$result,$seek, $globalOffset) {
        if($result['Endien']=="Intel") $intel=1;
        else $intel=0;
        $model = $result['IFD0']['Model'];
        $place=8; //current place
        $offset=8;
        if( substr($block,0,7)=="OLYMPUS")
        {
            if( substr($block,8,2)=="II")
                $intel=1;
            elseif( substr($block,8,2)=="MM")
                $intel=0;
            $place+=4;
        }
        //Get number of tags (2 bytes)
        $num = bin2hex(substr($block,$place,2));$place+=2;
        if($intel==1) {
        	$num = intel2Moto($num);
        }
        $result['SubIFD']['MakerNote']['MakerNoteNumTags'] = hexdec($num);
        //loop thru all tags  Each field is 12 bytes
        for($i=0;$i<hexdec($num);$i++) {
                //2 byte tag
                $tag = bin2hex(substr($block,$place,2));
                $place+=2;
                if($intel==1) {
                	$tag = intel2Moto($tag);
                }
                $tag_name = lookup_Olympus_tag($tag);
                //2 byte type
                $type = bin2hex(substr($block,$place,2));
                $place+=2;
                if($intel==1) {
                	$type = intel2Moto($type);
                }
                lookup_type($type,$size);
                //4 byte count of number of data units
                $count = bin2hex(substr($block,$place,4));
                $place+=4;
                if($intel==1) {
                	$count = intel2Moto($count);
                }
                $bytesofdata = $size*hexdec($count);
                //4 byte value of data or pointer to data
                $value = substr($block,$place,4);
                $place+=4;
                if($bytesofdata<=4) {
                        $data = $value;
                } else {
                        $value = bin2hex($value);
                        if($intel==1) $value = intel2Moto($value);
                        $v = fseek($seek,$globalOffset+hexdec($value));  //offsets are from TIFF header which is 12 bytes from the start of the file
                        if($v==0) {
                                $data = fread($seek, $bytesofdata);
                        } else if($v==-1) {
                                $result['Errors'] = $result['Errors']++;
                        }
                }
                $formated_data = formatOlympusData($type,$tag,$intel,$data);
                if($result['VerboseOutput']==1) {
                        $result['SubIFD']['MakerNote'][$tag_name] = $formated_data;
                        if($type=="URATIONAL" || $type=="SRATIONAL" || $type=="USHORT" || $type=="SSHORT" || $type=="ULONG" || $type=="SLONG" || $type=="FLOAT" || $type=="DOUBLE") {
                                $data = bin2hex($data);
                                if($intel==1) $data = intel2Moto($data);
                        }
                        $result['SubIFD']['MakerNote'][$tag_name."_Verbose"]['RawData'] = $data;
                        $result['SubIFD']['MakerNote'][$tag_name."_Verbose"]['Type'] = $type;
                        $result['SubIFD']['MakerNote'][$tag_name."_Verbose"]['Bytes'] = $bytesofdata;
                } else {
                        $result['SubIFD']['MakerNote'][$tag_name] = $formated_data;
                }
        }
}

?>