<?php
/**
 *
 * Enable this filter to scan images (or xmp sidecar files) for metadata.
 *
 * Relevant metadata found will be incorporated into the image (or album object)
 * see “Adobe XMP Specification" http://www.aiim.org/documents/standards/xmpspecification.pdf
 * for xmp metadata description. This plugin attempts to map the xmp metadata to IPTC fields
 *
 * If a sidecar file exists, it will take precedence (the image file will not be
 * examined.) The sidecar file should reside in the same folder, have the same prefix name as the
 * image (album), and the suffix ".xmp". Thus, the sidecar for <image>.jpg would be named <image>.xmp.
 *
 * NOTE: dynamic albums have an ".alb" suffix. Append ".xmp" to that name so
 * that the dynamic album sidecar would be named <album>.alb.xmp
 *
 * There is one option for this plugin--to enable searching within the actual image file for
 * an xmp block. This is disabled by default scanning image files can add considerably to the
 * processing time.
 *
 * All functions within this plugin are for internal use. The plugin does not present any
 * theme interface.
 *
 * @author Stephen Billard (sbillard)
 * @package plugins
 */

$plugin_is_filter = 9|CLASS_PLUGIN;
$plugin_description = gettext('Extracts <em>XMP</em> metadata from images and <code>XMP</code> sidecar files.');
$plugin_author = "Stephen Billard (sbillard)";

$option_interface = 'xmpMetadata';

zp_register_filter('album_instantiate', 'xmpMetadata::album_instantiate');
zp_register_filter('new_album', 'xmpMetadata::new_album');
zp_register_filter('album_refresh', 'xmpMetadata::new_album');
zp_register_filter('image_instantiate', 'xmpMetadata::image_instantiate');
zp_register_filter('image_metadata', 'xmpMetadata::new_image');
zp_register_filter('upload_filetypes', 'xmpMetadata::sidecars');
zp_register_filter('save_album_utilities_data', 'xmpMetadata::putXMP');
zp_register_filter('edit_album_utilities', 'xmpMetadata::create');
zp_register_filter('save_image_utilities_data', 'xmpMetadata::putXMP');
zp_register_filter('edit_image_utilities', 'xmpMetadata::create');
zp_register_filter('bulk_image_actions', 'xmpMetadata::bulkActions');
zp_register_filter('bulk_album_actions', 'xmpMetadata::bulkActions');

require_once(dirname(dirname(__FILE__)).'/exif/exif.php');

define('XMP_EXTENSION',strtolower(getOption('xmpMetadata_suffix')));


/**
 * Plugin option handling class
 *
 */
class xmpMetadata {

	private static $XML_trans = array(
																		'&#128;'		=>	'€',
																		'&#130;'		=>	'‚',
																		'&#131;'		=>	'ƒ',
																		'&#132;'		=>	'„',
																		'&#133;'		=>	'…',
																		'&#134;'		=>	'†',
																		'&#135;'		=>	'‡',
																		'&#136;'		=>	'ˆ',
																		'&#137;'		=>	'‰',
																		'&#138;'		=>	'Š',
																		'&#139;'		=>	'‹',
																		'&#140;'		=>	'Œ',
																		'&#142;'		=>	'Ž',
																		'&#145;'		=>	'‘',
																		'&#146;'		=>	'’',
																		'&#147;'		=>	'“',
																		'&#148;'		=>	'”',
																		'&#149;'		=>	'•',
																		'&#150;'		=>	'–',
																		'&#151;'		=>	'—',
																		'&#152;'		=>	'˜',
																		'&#153;'		=>	'™',
																		'&#154;'		=>	'š',
																		'&#155;'		=>	'›',
																		'&#156;'		=>	'œ',
																		'&#158;'		=>	'ž',
																		'&#159;'		=>	'Ÿ',
																		'&#161;'		=>	'¡',
																		'&#162;'		=>	'¢',
																		'&#163;'		=>	'£',
																		'&#164;'		=>	'¤',
																		'&#165;'		=>	'¥',
																		'&#166;'		=>	'¦',
																		'&#167;'		=>	'§',
																		'&#168;'		=>	'¨',
																		'&#169;'		=>	'©',
																		'&#170;'		=>	'ª',
																		'&#171;'		=>	'«',
																		'&#172;'		=>	'¬',
																		'&#173;'		=>	'­',
																		'&#174;'		=>	'®',
																		'&#175;'		=>	'¯',
																		'&#176;'		=>	'°',
																		'&#177;'		=>	'±',
																		'&#178;'		=>	'²',
																		'&#179;'		=>	'³',
																		'&#180;'		=>	'´',
																		'&#181;'		=>	'µ',
																		'&#182;'		=>	'¶',
																		'&#183;'		=>	'·',
																		'&#184;'		=>	'¸',
																		'&#185;'		=>	'¹',
																		'&#186;'		=>	'º',
																		'&#187;'		=>	'»',
																		'&#188;'		=>	'¼',
																		'&#189;'		=>	'½',
																		'&#190;'		=>	'¾',
																		'&#191;'		=>	'¿',
																		'&#192;'		=>	'À',
																		'&#193;'		=>	'Á',
																		'&#194;'		=>	'Â',
																		'&#195;'		=>	'Ã',
																		'&#196;'		=>	'Ä',
																		'&#197;'		=>	'Å',
																		'&#198;'		=>	'Æ',
																		'&#199;'		=>	'Ç',
																		'&#200;'		=>	'È',
																		'&#201;'		=>	'É',
																		'&#202;'		=>	'Ê',
																		'&#203;'		=>	'Ë',
																		'&#204;'		=>	'Ì',
																		'&#205;'		=>	'Í',
																		'&#206;'		=>	'Î',
																		'&#207;'		=>	'Ï',
																		'&#208;'		=>	'Ð',
																		'&#209;'		=>	'Ñ',
																		'&#210;'		=>	'Ò',
																		'&#211;'		=>	'Ó',
																		'&#212;'		=>	'Ô',
																		'&#213;'		=>	'Õ',
																		'&#214;'		=>	'Ö',
																		'&#215;'		=>	'×',
																		'&#216;'		=>	'Ø',
																		'&#217;'		=>	'Ù',
																		'&#218;'		=>	'Ú',
																		'&#219;'		=>	'Û',
																		'&#220;'		=>	'Ü',
																		'&#221;'		=>	'Ý',
																		'&#222;'		=>	'Þ',
																		'&#223;'		=>	'ß',
																		'&#224;'		=>	'à',
																		'&#225;'		=>	'á',
																		'&#226;'		=>	'â',
																		'&#227;'		=>	'ã',
																		'&#228;'		=>	'ä',
																		'&#229;'		=>	'å',
																		'&#230;'		=>	'æ',
																		'&#231;'		=>	'ç',
																		'&#232;'		=>	'è',
																		'&#233;'		=>	'é',
																		'&#234;'		=>	'ê',
																		'&#235;'		=>	'ë',
																		'&#236;'		=>	'ì',
																		'&#237;'		=>	'í',
																		'&#238;'		=>	'î',
																		'&#239;'		=>	'ï',
																		'&#240;'		=>	'ð',
																		'&#241;'		=>	'ñ',
																		'&#242;'		=>	'ò',
																		'&#243;'		=>	'ó',
																		'&#244;'		=>	'ô',
																		'&#245;'		=>	'õ',
																		'&#246;'		=>	'ö',
																		'&#247;'		=>	'÷',
																		'&#248;'		=>	'ø',
																		'&#249;'		=>	'ù',
																		'&#250;'		=>	'ú',
																		'&#251;'		=>	'û',
																		'&#252;'		=>	'ü',
																		'&#253;'		=>	'ý',
																		'&#254;'		=>	'þ',
																		'&#255;'		=>	'ÿ',
																		'&#256;'		=>	'Ā',
																		'&#257;'		=>	'ā',
																		'&#258;'		=>	'Ă',
																		'&#259;'		=>	'ă',
																		'&#260;'		=>	'Ą',
																		'&#261;'		=>	'ą',
																		'&#262;'		=>	'Ć',
																		'&#263;'		=>	'ć',
																		'&#264;'		=>	'Ĉ',
																		'&#265;'		=>	'ĉ',
																		'&#266;'		=>	'Ċ',
																		'&#267;'		=>	'ċ',
																		'&#268;'		=>	'Č',
																		'&#269;'		=>	'č',
																		'&#270;'		=>	'Ď',
																		'&#271;'		=>	'ď',
																		'&#272;'		=>	'Đ',
																		'&#273;'		=>	'đ',
																		'&#274;'		=>	'Ē',
																		'&#275;'		=>	'ē',
																		'&#276;'		=>	'Ĕ',
																		'&#277;'		=>	'ĕ',
																		'&#278;'		=>	'Ė',
																		'&#279;'		=>	'ė',
																		'&#280;'		=>	'Ę',
																		'&#281;'		=>	'ę',
																		'&#282;'		=>	'Ě',
																		'&#283;'		=>	'ě',
																		'&#284;'		=>	'Ĝ',
																		'&#285;'		=>	'ĝ',
																		'&#286;'		=>	'Ğ',
																		'&#287;'		=>	'ğ',
																		'&#288;'		=>	'Ġ',
																		'&#289;'		=>	'ġ',
																		'&#290;'		=>	'Ģ',
																		'&#291;'		=>	'ģ',
																		'&#292;'		=>	'Ĥ',
																		'&#293;'		=>	'ĥ',
																		'&#294;'		=>	'Ħ',
																		'&#295;'		=>	'ħ',
																		'&#296;'		=>	'Ĩ',
																		'&#297;'		=>	'ĩ',
																		'&#298;'		=>	'Ī',
																		'&#299;'		=>	'ī',
																		'&#300;'		=>	'Ĭ',
																		'&#301;'		=>	'ĭ',
																		'&#302;'		=>	'Į',
																		'&#303;'		=>	'į',
																		'&#304;'		=>	'İ',
																		'&#305;'		=>	'ı',
																		'&#306;'		=>	'Ĳ',
																		'&#307;'		=>	'ĳ',
																		'&#308;'		=>	'Ĵ',
																		'&#309;'		=>	'ĵ',
																		'&#310;'		=>	'Ķ',
																		'&#311;'		=>	'ķ',
																		'&#312;'		=>	'ĸ',
																		'&#313;'		=>	'Ĺ',
																		'&#314;'		=>	'ĺ',
																		'&#315;'		=>	'Ļ',
																		'&#316;'		=>	'ļ',
																		'&#317;'		=>	'Ľ',
																		'&#318;'		=>	'ľ',
																		'&#319;'		=>	'Ŀ',
																		'&#320;'		=>	'ŀ',
																		'&#321;'		=>	'Ł',
																		'&#322;'		=>	'ł',
																		'&#323;'		=>	'Ń',
																		'&#324;'		=>	'ń',
																		'&#325;'		=>	'Ņ',
																		'&#326;'		=>	'ņ',
																		'&#327;'		=>	'Ň',
																		'&#328;'		=>	'ň',
																		'&#329;'		=>	'ŉ',
																		'&#330;'		=>	'Ŋ',
																		'&#331;'		=>	'ŋ',
																		'&#332;'		=>	'Ō',
																		'&#333;'		=>	'ō',
																		'&#334;'		=>	'Ŏ',
																		'&#335;'		=>	'ŏ',
																		'&#336;'		=>	'Ő',
																		'&#337;'		=>	'ő',
																		'&#338;'		=>	'Œ',
																		'&#339;'		=>	'œ',
																		'&#340;'		=>	'Ŕ',
																		'&#341;'		=>	'ŕ',
																		'&#342;'		=>	'Ŗ',
																		'&#343;'		=>	'ŗ',
																		'&#344;'		=>	'Ř',
																		'&#345;'		=>	'ř',
																		'&#346;'		=>	'Ś',
																		'&#347;'		=>	'ś',
																		'&#348;'		=>	'Ŝ',
																		'&#349;'		=>	'ŝ',
																		'&#34;'			=>	'"',
																		'&#350;'		=>	'Ş',
																		'&#351;'		=>	'ş',
																		'&#352;'		=>	'Š',
																		'&#353;'		=>	'š',
																		'&#354;'		=>	'Ţ',
																		'&#355;'		=>	'ţ',
																		'&#356;'		=>	'Ť',
																		'&#357;'		=>	'ť',
																		'&#358;'		=>	'Ŧ',
																		'&#359;'		=>	'ŧ',
																		'&#360;'		=>	'Ũ',
																		'&#361;'		=>	'ũ',
																		'&#362;'		=>	'Ū',
																		'&#363;'		=>	'ū',
																		'&#364;'		=>	'Ŭ',
																		'&#365;'		=>	'ŭ',
																		'&#366;'		=>	'Ů',
																		'&#367;'		=>	'ů',
																		'&#368;'		=>	'Ű',
																		'&#369;'		=>	'ű',
																		'&#370;'		=>	'Ų',
																		'&#371;'		=>	'ų',
																		'&#372;'		=>	'Ŵ',
																		'&#373;'		=>	'ŵ',
																		'&#374;'		=>	'Ŷ',
																		'&#375;'		=>	'ŷ',
																		'&#377;'		=>	'Ź',
																		'&#378;'		=>	'ź',
																		'&#379;'		=>	'Ż',
																		'&#380;'		=>	'ż',
																		'&#381;'		=>	'Ž',
																		'&#382;'		=>	'ž',
																		'&#383;'		=>	'ſ',
																		'&#38;'			=>	'&',
																		'&#39;'			=>	'\'',
																		'&#402;'		=>	'ƒ',
																		'&#439;'		=>	'Ʒ',
																		'&#452;'		=>	'Ǆ',
																		'&#453;'		=>	'ǅ',
																		'&#454;'		=>	'ǆ',
																		'&#455;'		=>	'Ǉ',
																		'&#456;'		=>	'ǈ',
																		'&#457;'		=>	'ǉ',
																		'&#458;'		=>	'Ǌ',
																		'&#459;'		=>	'ǋ',
																		'&#460;'		=>	'ǌ',
																		'&#478;'		=>	'Ǟ',
																		'&#479;'		=>	'ǟ',
																		'&#484;'		=>	'Ǥ',
																		'&#485;'		=>	'ǥ',
																		'&#486;'		=>	'Ǧ',
																		'&#487;'		=>	'ǧ',
																		'&#488;'		=>	'Ǩ',
																		'&#489;'		=>	'ǩ',
																		'&#494;'		=>	'Ǯ',
																		'&#495;'		=>	'ǯ',
																		'&#497;'		=>	'Ǳ',
																		'&#499;'		=>	'ǳ',
																		'&#500;'		=>	'Ǵ',
																		'&#501;'		=>	'ǵ',
																		'&#506;'		=>	'Ǻ',
																		'&#507;'		=>	'ǻ',
																		'&#508;'		=>	'Ǽ',
																		'&#509;'		=>	'ǽ',
																		'&#510;'		=>	'Ǿ',
																		'&#511;'		=>	'ǿ',
																		'&#60;'			=>	'<',
																		'&#62;'			=>	'>',
																		'&#636;'		=>	'ɼ',
																		'&#64257;'	=>	'ﬁ',
																		'&#64258;'	=>	'ﬂ',
																		'&#658;'		=>	'ʒ',
																		'&#728;'		=>	'˘',
																		'&#729;'		=>	'˙',
																		'&#730;'		=>	'˚',
																		'&#731;'		=>	'˛',
																		'&#732;'		=>	'˜',
																		'&#733;'		=>	'˝',
																		'&#7682;'		=>	'Ḃ',
																		'&#7683;'		=>	'ḃ',
																		'&#7690;'		=>	'Ḋ',
																		'&#7691;'		=>	'ḋ',
																		'&#7696;'		=>	'Ḑ',
																		'&#7697;'		=>	'ḑ',
																		'&#7710;'		=>	'Ḟ',
																		'&#7711;'		=>	'ḟ',
																		'&#7728;'		=>	'Ḱ',
																		'&#7729;'		=>	'ḱ',
																		'&#7744;'		=>	'Ṁ',
																		'&#7745;'		=>	'ṁ',
																		'&#7766;'		=>	'Ṗ',
																		'&#7767;'		=>	'ṗ',
																		'&#7776;'		=>	'Ṡ',
																		'&#7777;'		=>	'ṡ',
																		'&#7786;'		=>	'Ṫ',
																		'&#7787;'		=>	'ṫ',
																		'&#7808;'		=>	'Ẁ',
																		'&#7809;'		=>	'ẁ',
																		'&#7810;'		=>	'Ẃ',
																		'&#7811;'		=>	'ẃ',
																		'&#7812;'		=>	'Ẅ',
																		'&#7813;'		=>	'ẅ',
																		'&#7922;'		=>	'Ỳ',
																		'&#7923;'		=>	'ỳ',
																		'&#8213;'		=>	'―',
																		'&#8227;'		=>	'‣',
																		'&#8252;'		=>	'‼',
																		'&#8254;'		=>	'‾',
																		'&#8260;'		=>	'⁄',
																		'&#8319;'		=>	'ⁿ',
																		'&#8355;'		=>	'₣',
																		'&#8356;'		=>	'₤',
																		'&#8359;'		=>	'₧',
																		'&#8453;'		=>	'℅',
																		'&#8470;'		=>	'№',
																		'&#8539;'		=>	'⅛',
																		'&#8540;'		=>	'⅜',
																		'&#8541;'		=>	'⅝',
																		'&#8542;'		=>	'⅞',
																		'&#8592;'		=>	'←',
																		'&#8593;'		=>	'↑',
																		'&#8594;'		=>	'→',
																		'&#8595;'		=>	'↓',
																		'&#8706;'		=>	'∂',
																		'&#8710;'		=>	'∆',
																		'&#8719;'		=>	'∏',
																		'&#8721;'		=>	'∑',
																		'&#8729;'		=>	'∙',
																		'&#8730;'		=>	'√',
																		'&#8734;'		=>	'∞',
																		'&#8735;'		=>	'∟',
																		'&#8745;'		=>	'∩',
																		'&#8747;'		=>	'∫',
																		'&#8776;'		=>	'≈',
																		'&#8800;'		=>	'≠',
																		'&#8801;'		=>	'≡',
																		'&#8804;'		=>	'≤',
																		'&#8805;'		=>	'≥',
																		'&#94;'			=>	'^',
																		'&#9792;'		=>	'♀',
																		'&#9794;'		=>	'♂',
																		'&#9824;'		=>	'♠',
																		'&#9827;'		=>	'♣',
																		'&#9829;'		=>	'♥',
																		'&#9830;'		=>	'♦',
																		'&#9833;'		=>	'♩',
																		'&#9834;'		=>	'♪',
																		'&#9836;'		=>	'♬',
																		'&#9837;'		=>	'♭',
																		'&#9839;'		=>	'♯',
																		'&498;'			=>	'ǲ',
																		'&AElig;'		=>	'Æ',
																		'&Aacute;'	=>	'Á',
																		'&Acirc;'		=>	'Â',
																		'&Agrave;'	=>	'À',
																		'&Aring;'		=>	'Å',
																		'&Atilde;'	=>	'Ã',
																		'&Auml;'		=>	'Ä',
																		'&Ccedil;'	=>	'Ç',
																		'&Dagger;'	=>	'‡',
																		'&ETH;'			=>	'Ð',
																		'&Eacute;'	=>	'É',
																		'&Ecirc;'		=>	'Ê',
																		'&Egrave;'	=>	'È',
																		'&Euml;'		=>	'Ë',
																		'&Iacute;'	=>	'Í',
																		'&Icirc;'		=>	'Î',
																		'&Igrave;'	=>	'Ì',
																		'&Iuml;'		=>	'Ï',
																		'&Ntilde;'	=>	'Ñ',
																		'&OElig;'		=>	'Œ',
																		'&Oacute;'	=>	'Ó',
																		'&Ocirc;'		=>	'Ô',
																		'&Ograve;'	=>	'Ò',
																		'&Oslash;'	=>	'Ø',
																		'&Otilde;'	=>	'Õ',
																		'&Ouml;'		=>	'Ö',
																		'&THORN;'		=>	'Þ',
																		'&Uacute;'	=>	'Ú',
																		'&Ucirc;'		=>	'Û',
																		'&Ugrave;'	=>	'Ù',
																		'&Uuml;'		=>	'Ü',
																		'&Yacute;'	=>	'Ý',
																		'&Yuml;'		=>	'Ÿ',
																		'&aacute;'	=>	'á',
																		'&acirc;'		=>	'â',
																		'&acute;'		=>	'´',
																		'&aelig;'		=>	'æ',
																		'&agrave;'	=>	'à',
																		'&amp;'			=>	'&',
																		'&aring;'		=>	'å',
																		'&atilde;'	=>	'ã',
																		'&auml;'		=>	'ä',
																		'&brvbar;'	=>	'¦',
																		'&ccedil;'	=>	'ç',
																		'&cedil;'		=>	'¸',
																		'&cent;'		=>	'¢',
																		'&clubs;'		=>	'♣',
																		'&copy;'		=>	'©',
																		'&curren;'	=>	'¤',
																		'&dagger;'	=>	'†',
																		'&darr;'		=>	'↓',
																		'&dbquo;'		=>	'„',
																		'&deg;'			=>	'°',
																		'&diams;'		=>	'♦',
																		'&divide;'	=>	'÷',
																		'&eacute;'	=>	'é',
																		'&ecirc;'		=>	'ê',
																		'&egrave;'	=>	'è',
																		'&eth;'			=>	'ð',
																		'&euml;'		=>	'ë',
																		'&euro;'		=>	'€',
																		'&frac12;'	=>	'½',
																		'&frac14;'	=>	'¼',
																		'&frac34;'	=>	'¾',
																		'&gt;'			=>	'>',
																		'&hearts;'	=>	'♥',
																		'&iacute;'	=>	'í',
																		'&icirc;'		=>	'î',
																		'&iexcl;'		=>	'¡',
																		'&igrave;'	=>	'ì',
																		'&iquest;'	=>	'¿',
																		'&iuml;'		=>	'ï',
																		'&laquo;'		=>	'«',
																		'&larr;'		=>	'←',
																		'&ldquo;'		=>	'“',
																		'&lsaquo;'	=>	'‹',
																		'&lsquo;'		=>	'‘',
																		'&lt;'			=>	'<',
																		'&macr;'		=>	'¯',
																		'&mdash;'		=>	'—',
																		'&micro;'		=>	'µ',
																		'&middot;'	=>	'·',
																		'&ndash;'		=>	'–',
																		'&not;'			=>	'¬',
																		'&ntilde;'	=>	'ñ',
																		'&oacute;'	=>	'ó',
																		'&ocirc;'		=>	'ô',
																		'&oelig;'		=>	'œ',
																		'&ograve;'	=>	'ò',
																		'&oline;'		=>	'‾',
																		'&ordf;'		=>	'ª',
																		'&ordm;'		=>	'º',
																		'&oslash;'	=>	'ø',
																		'&otilde;'	=>	'õ',
																		'&ouml;'		=>	'ö',
																		'&para;'		=>	'¶',
																		'&permil;'	=>	'‰',
																		'&plusmn;'	=>	'±',
																		'&pound;'		=>	'£',
																		'&quot;'		=>	'"',
																		'&raquo;'		=>	'»',
																		'&rarr;'		=>	'→',
																		'&rdquo;'		=>	'”',
																		'&reg;'			=>	'®',
																		'&rsaquo;'	=>	'›',
																		'&rsquo;'		=>	'’',
																		'&sbquo;'		=>	'‚',
																		'&sect;'		=>	'§',
																		'&shy;'			=>	'­',
																		'&spades;'	=>	'♠',
																		'&sup1;'		=>	'¹',
																		'&sup2;'		=>	'²',
																		'&sup3;'		=>	'³',
																		'&szlig;'		=>	'ß',
																		'&thorn;'		=>	'þ',
																		'&tilde'		=>	'˜',
																		'&tilde;'		=>	'˜',
																		'&times;'		=>	'×',
																		'&trade;'		=>	'™',
																		'&uacute;'	=>	'ú',
																		'&uarr;'		=>	'↑',
																		'&ucirc;'		=>	'û',
																		'&ugrave;'	=>	'ù',
																		'&uml;'			=>	'¨',
																		'&uuml;'		=>	'ü',
																		'&yacute;'	=>	'ý',
																		'&yen;'			=>	'¥',
																		'&yuml;'		=>	'ÿ'
																		);


	/**
	 * Class instantiation function
	 *
	 * @return xmpMetadata_options
	 */
	function __construct() {
		setOptionDefault('xmpMetadata_suffix','xmp');
	}

	/**
	 * Option interface
	 *
	 * @return array
	 */
	function getOptionsSupported() {
		global $_zp_supported_images, $_zp_extra_filetypes;
		$list = $_zp_supported_images;
		foreach (array('gif','bmp') as $suffix) {
			$key = array_search($suffix, $list);
			if ($key !== false)	unset($list[$key]);
		}
		natcasesort($list);
		$types = array();
		foreach ($_zp_extra_filetypes as $suffix=>$type) {
			if ($type == 'Video') $types[] = $suffix;
		}
		natcasesort($types);
		$list = array_merge($list, $types);
		$listi = array();
		foreach ($list as $suffix) {
			$listi[$suffix] = 'xmpMetadata_examine_images_'.$suffix;
		}
		return array(	gettext('Sidecar file extension') => array('key' => 'xmpMetadata_suffix', 'type' => OPTION_TYPE_TEXTBOX,
										'desc' => gettext('The plugin will look for files with <em>image_name.extension</em> and extract XMP metadata from them into the <em>image_name</em> record.')),
									gettext('Process extensions') => array('key' => 'xmpMetadata_examine_imagefile', 'type' => OPTION_TYPE_CHECKBOX_UL,
										'checkboxes' => $listi,
										'desc' => gettext('If no sidecar file exists and the extension is enabled, the plugin will search within that type <em>image</em> file for an <code>XMP</code> block. <strong>Warning</strong> do not set this option unless you require it. Searching image files can be computationally intensive.'))
		);
	}

	/**
	 * Custom option handler
	 *
	 * @param string $option
	 * @param mixed $currentValue
	 */
	function handleOption($option, $currentValue) {
	}

	/**
	 * Parses xmp metadata for interesting tags
	 *
	 * @param string $xmpdata
	 * @return array
	 */
	private static function xmpMetadata_extract($xmpdata) {
		$desiredtags = array(
			'EXIFLensType'					=>	'<aux:Lens>',
			'EXIFLensInfo'					=>	'<aux:LensInfo>',
			'EXIFArtist'						=>	'<dc:creator>',
			'IPTCCopyright'					=>	'<dc:rights>',
			'IPTCImageCaption'			=>	'<dc:description>',
			'IPTCObjectName'				=>	'<dc:title>',
			'IPTCKeywords'  				=>	'<dc:subject>',
			'EXIFExposureTime'			=>	'<exif:ExposureTime>',
			'EXIFFNumber'						=>	'<exif:FNumber>',
			'EXIFAperatureValue'		=>	'<exif:ApertureValue>',
			'EXIFExposureProgram'		=>	'<exif:ExposureProgram>',
			'EXIFISOSpeedRatings'		=>	'<exif:ISOSpeedRatings>',
			'EXIFDateTimeOriginal'	=>	'<exif:DateTimeOriginal>',
			'EXIFExposureBiasValue'	=>	'<exif:ExposureBiasValue>',
			'EXIFGPSLatitude'				=>	'<exif:GPSLatitude>',
			'EXIFGPSLongitude'			=>	'<exif:GPSLongitude>',
			'EXIFGPSAltitude'				=>	'<exif:GPSAltitude>',
			'EXIFGPSAltituedRef'		=>	'<exif:GPSAltitudeRef>',
			'EXIFMeteringMode'			=>	'<exif:MeteringMode>',
			'EXIFFocalLength'				=>	'<exif:FocalLength>',
			'EXIFContrast'					=>	'<exif:Contrast>',
			'EXIFSharpness'					=>	'<exif:Sharpness>',
			'EXIFExposureTime'			=>	'<exif:ShutterSpeedValue>',
			'EXIFSaturation'				=>	'<exif:Saturation>',
			'EXIFWhiteBalance'			=>	'<exif:WhiteBalance>',
			'IPTCLocationCode' 			=>	'<Iptc4xmpCore:CountryCode>',
			'IPTCSubLocation' 			=>	'<Iptc4xmpCore:Location>',
			'rating'								=>	'<MicrosoftPhoto:Rating>',
			'IPTCSource'						=>	'<photoshop:Source>',
			'IPTCCity' 							=>	'<photoshop:City>',
			'IPTCState' 						=>	'<photoshop:State>',
			'IPTCLocationName' 			=>	'<photoshop:Country>',
			'IPTCImageHeadline'  		=>	'<photoshop:Headline>',
			'IPTCImageCredit' 			=>	'<photoshop:Credit>',
			'EXIFMake'							=>	'<tiff:Make>',
			'EXIFModel'							=>	'<tiff:Model>',
			'EXIFOrientation'				=>	'<tiff:Orientation>',
			'EXIFImageWidth'				=>	'<tiff:ImageWidth>',
			'EXIFImageHeight'				=>	'<tiff:ImageLength>',
			'owner'									=>	'<zp:Owner>',
			'thumb'									=>	'<zp:Thumbnail>',
			'watermark'							=>	'<zp:Watermark>',
			'watermark_use'					=>	'<zp:Watermark_use>',
			'watermark_thumb'				=>	'<zp:Watermark_thumb>',
			'custom_data'						=>	'<zp:CustomData',
			'codeblock'							=>	'<zp:Codeblock>'
			);
		$xmp_parsed = array();
		while (!empty($xmpdata)) {
			$s = strpos($xmpdata, '<');
			$e = strpos($xmpdata,'>',$s);
			$tag = substr($xmpdata,$s,$e-$s+1);
			$xmpdata = substr($xmpdata,$e+1);
			$key = array_search($tag,$desiredtags);
			if ($key !== false) {
				$close = str_replace('<','</',$tag);
				$e = strpos($xmpdata,$close);
				$meta = trim(substr($xmpdata,0,$e));
				$xmpdata = substr($xmpdata,$e+strlen($close));
				if (strpos($meta, '<') === false) {
					$xmp_parsed[$key] = xmpMetadata::decode($meta);
				} else {
					$elements = array();
					while (!empty($meta)) {
						$s = strpos($meta, '<');
						$e = strpos($meta,'>',$s);
						$tag = substr($meta,$s,$e-$s+1);
						$meta = substr($meta,$e+1);
						if (strpos($tag,'rdf:li') !== false) {
							$e = strpos($meta,'</rdf:li>');
							$elements[] = xmpMetadata::decode(trim(substr($meta, 0, $e)));
							$meta = substr($meta,$e+9);
						}
					}
					$xmp_parsed[$key] = $elements;
				}
			} else {	// look for shorthand elements
				if (strpos($tag,'<rdf:Description')!==false) {
					$meta = substr($tag, 17);	// strip off the description tag leaving the elements
					while (preg_match('/^[a-zA-z0-9_]+\:[a-zA-z0-9_]+\=".*"/', $meta, $element)) {
							$item = $element[0];
							$meta = trim(substr($meta, strlen($item)));
							$i = strpos($item,'=');
							$tag = '<'.substr($item,0,$i).'>';
							$v = xmpMetadata::decode(trim(substr($item,$i+2,-1)));
							$key = array_search($tag,$desiredtags);
							if ($key !== false) {
								$xmp_parsed[$key] = $v;
							}
						}
				}
			}
		}
		return ($xmp_parsed);
	}

	/**
	 * insures that the metadata is a string
	 *
	 * @param mixed $meta
	 * @return string
	 */
	private static function xmpMetadata_to_string($meta) {
		if (is_array($meta)) {
			$meta = implode(',',$meta);
		}
		return trim($meta);
	}

	/**
	 * Filter called when an album object is instantiated
	 * sets the sidecars to include xmp files
	 *
	 * @param $album album object
	 * @return $object
	 */
	static function album_instantiate($album) {
		$album->sidecars[XMP_EXTENSION] = XMP_EXTENSION;
		return $album;
	}

	/**
	 * Filter for handling album objects
	 *
	 * @param object $album
	 * @return object
	 */
	static function new_album($album) {
		$metadata_path = dirname($album->localpath).'/'.basename($album->localpath).'*';
		$files = safe_glob($metadata_path);
		if (count($files)>0) {
			foreach ($files as $file) {
				if (strtolower(getSuffix($file)) == XMP_EXTENSION) {
					$source = file_get_contents($file);
					$metadata = xmpMetadata::xmpMetadata_extract($source);
					if (array_key_exists('IPTCImageCaption' ,$metadata)) {
						$album->setDesc(xmpMetadata::xmpMetadata_to_string($metadata['IPTCImageCaption' ]));
					}
					if (array_key_exists('IPTCImageHeadline',$metadata)) {
						$album->setTitle(xmpMetadata::xmpMetadata_to_string($metadata['IPTCImageHeadline']));
					}
					if (array_key_exists('IPTCLocationName',$metadata)) {
						$album->setLocation(xmpMetadata::xmpMetadata_to_string($metadata['IPTCLocationName']));
					}
					if (array_key_exists('IPTCKeywords',$metadata)) {
						$album->setTags(xmpMetadata::xmpMetadata_to_string($metadata['IPTCKeywords']));
					}
					if (array_key_exists('EXIFDateTimeOriginal',$metadata)) {
						$album->setDateTime($metadata['EXIFDateTimeOriginal']);
					}
					if (array_key_exists('thumb',$metadata)) {
						$album->setAlbumThumb($metadata['thumb']);
					}
					if (array_key_exists('owner',$metadata)) {
						$album->setOwner($metadata['owner']);
					}
					if (array_key_exists('custom_data',$metadata)) {
						$album->setCustomData($metadata['custom_data']);
					}
					if (array_key_exists('codeblock',$metadata)) {
						$album->setCodeblock($metadata['codeblock']);
					}
					if (array_key_exists('watermark',$metadata)) {
						$album->setWatermark($metadata['watermark']);
					}
					if (array_key_exists('watermark_thumb',$metadata)) {
						$album->setWatermarkThumb($metadata['watermark_thumb']);
					}
					if (array_key_exists('rating',$metadata)) {
						$v = min(getoption('rating_stars_count'),$metadata['rating'])*min(1,getOption('rating_split_stars'));
						$album->set('total_value', $v);
						$album->set('rating', $v);
						$album->set('total_votes', 1);
					}
					$album->save();
					break;
				}
			}
			return $album;
		}
	}

	/**
	 * Finds and returns xmp metadata
	 *
	 * @param int $j
	 * @return string
	 */
	private static function extractXMP($f) {
		if (preg_match('~<.*?xmpmeta~',$f, $m)) {
			$open = $m[0];
			$close = str_replace('<','</',$open);
			$j = strpos($f, $open);
			if ($j !== false) {
				$k = strpos($f, $close,$j+4);
				$meta = substr($f, $j, $k+14-$j);
				$l = 0;
				return $meta;
			}
		}
		return false;
	}

	/**
	 * convert a fractional representation to something more user friendly
	 *
	 * @param $element string
	 * @return string
	 */
	private static function rationalNum($element) {
		// deal with the fractional representation
		$n = explode('/',$element);
		$v = sprintf('%f', $n[0]/$n[1]);
		for ($i=strlen($v)-1;$i>1;$i--) {
			if (substr($v,$i,1) != '0') break;
		}
		if (substr($v,$i,1)=='.') $i--;
		return substr($v,0,$i+1);
	}

	private static function encode($str) {
		return strtr($str, array_flip(xmpMetadata::$XML_trans));
	}

	private static function decode($str) {
		return strtr($str, xmpMetadata::$XML_trans);
	}


	static function image_instantiate($image) {
		$image->sidecars[XMP_EXTENSION] = XMP_EXTENSION;
		return $image;
	}
	/**
	 * Filter for handling image objects
	 *
	 * @param object $image
	 * @return object
	 */
	static function new_image($image) {
		global $_zp_exifvars;
		$source = '';
		$metadata_path = '';
		$files = safe_glob(substr($image->localpath, 0, strrpos($image->localpath, '.')).'.*');
		if (count($files)>0) {
			foreach ($files as $file) {
				if (strtolower(getSuffix($file)) == XMP_EXTENSION) {
					$metadata_path = $file;
					break;
				}
			}
		}
		if (!empty($metadata_path)) {
			$source = xmpMetadata::extractXMP(file_get_contents($metadata_path));
		} else if (getOption('xmpMetadata_examine_images_'.strtolower(substr(strrchr($image->localpath, "."), 1)))) {
			$f = file_get_contents($image->localpath);
			$l = filesize($image->localpath);
			$abort = 0;
			$i = 0;
			while ($i<$l && $abort<200 && !$source) {
				$tag = bin2hex(substr($f,$i,2));
				$size = hexdec(bin2hex(substr($f,$i+2,2)));
				switch ($tag) {
					case 'ffe1': // EXIF
					case 'ffe2': // EXIF extension
					case 'fffe': // COM
					case 'ffe0': // IPTC marker
						$source = $this->extractXMP($f);
						$i = $i + $size+2;
						$abort = 0;
						break;
					default:
						if (substr($f,$i,1)=='<') {
							$source = $this->extractXMP($f);
						}
						$i=$i+1;
						$abort++;
						break;
				}
			}
		}
		if (!empty($source)) {
			$metadata = xmpMetadata::xmpMetadata_extract($source);
			$image->set('hasMetadata',count($metadata>0));
			foreach ($metadata as $field=>$element) {
				if (array_key_exists($field,$_zp_exifvars)) {
					if (!$_zp_exifvars[$field][5]) {
						continue;	//	the field has been disabled
					}
				}
				$v = xmpMetadata::xmpMetadata_to_string($element);

				switch ($field) {
					case 'EXIFDateTimeOriginal':
						$image->setDateTime($element);
						break;
					case 'IPTCImageCaption':
						$image->setDesc($v);
						break;
					case 'IPTCCity':
						$image->setCity($v);
						break;
					case 'IPTCState':
						$image->setState($v);
						break;
					case 'IPTCLocationName':
						$image->setCountry($v);
						break;
					case 'IPTCSubLocation':
						$image->setLocation($v);
						break;
					case 'EXIFExposureTime':
						$v = formatExposure(xmpMetadata::rationalNum($element));
						break;
					case 'EXIFFocalLength':
						$v = xmpMetadata::rationalNum($element).' mm';
						break;
					case 'EXIFAperatureValue':
					case 'EXIFFNumber':
						$v = 'f/'.xmpMetadata::rationalNum($element);
						break;
					case 'EXIFExposureBiasValue':
					case 'EXIFGPSAltitude':
						$v = xmpMetadata::rationalNum($element);
						break;
					case 'EXIFGPSLatitude':
					case 'EXIFGPSLongitude':
						$ref = substr($element,-1,1);
						$image->set($field.'Ref', $ref);
						$element = substr($element,0,-1);
						$n = explode(',',$element);
						if (count($n)==3) {
							$v = $n[0]+($n[1]+($n[2]/60)/60);
						} else {
							$v = $n[0]+$n[1]/60;
						}
						break;
					case 'rating':
						$v = min(getoption('rating_stars_count'),$v)*min(1,getOption('rating_split_stars'));
						$image->set('total_value', $v);
						$image->set('total_votes', 1);
						break;
					case 'watermark':
					case 'watermark_use':
					case 'custom_data':
					case 'codeblock':
					case 'owner':
						$image->set($field, $v);
						break;
					case 'IPTCKeywords':
						$image->setTags($element);
						break;
				}
				if (array_key_exists($field,$_zp_exifvars)) {
					$image->set($field, $v);
				}
			}
			$image->save();
		}
		return $image;
	}

	static function sidecars($types) {
		$types[] = XMP_EXTENSION;
		return $types;
	}

	static function putXMP($object, $prefix) {
		if (isset($_POST['xmpMedadataPut_'.$prefix])) {
			xmpMetadata::publish($object);
		}
		return $object;
	}

	static function publish($object) {
		$desiredtags = array(	'copyright'				=>	'<dc:rights>',
													'desc'						=>	'<dc:description>',
													'title'						=>	'<dc:title>',
													'tags'  					=>	'<dc:subject>',
													'location' 				=>	'<Iptc4xmpCore:Location>',
													'city' 						=>	'<photoshop:City>',
													'state' 					=>	'<photoshop:State>',
													'country' 				=>	'<photoshop:Country>',
													'title'						=>	'<photoshop:Headline>',
													'credit' 					=>	'<photoshop:Credit>',
													'thumb'						=>	'<zp:Thumbnail>',
													'owner'						=>	'<zp:Owner>',
													'watermark'				=>	'<zp:Watermark>',
													'watermark_use'		=>	'<zp:Watermark_use>',
													'watermark_thumb'	=>	'<zp:Watermark_thumb>',
													'custom_data'			=>	'<zp:CustomData>',
													'codeblock'				=>	'<zp:Codeblock>',
													'date'						=>	'<exif:DateTimeOriginal>',
													'rating'					=>	'<MicrosoftPhoto:Rating>'
													);
		$process = array('dc','Iptc4xmpCore','photoshop','xap');
		if (get_class($object)=='Album') {
			$file =$object->localpath;
			if (substr($file, -1) == '/') {
				$file = substr($file, 0, -1);
			}
			$file .= '.xmp';
		} else {
			$file = stripSuffix($object->localpath).'.xmp';
		}
		@chmod($file, 0666);
		$f = fopen($file, 'w');
		fwrite($f, '<x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="Adobe XMP Core 4.2-c020 1.124078, Tue Sep 11 2007 23:21:40 ">'."\n");
		fwrite($f, ' <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">'."\n");
		$last_element = $special = $output = false;
		foreach ($desiredtags as $field=>$elementXML) {
			$elementXML = substr($elementXML, 1, -1);
			if ($last_element != $elementXML) {
				if ($output) {
					fwrite($f, '  </rdf:Description>'."\n");
					fwrite($f, '  <rdf:Description rdf:about="" xmlns:dc="http://purl.org/dc/elements/1.1/">'."\n");
				}
				$last_element = $elementXML;
				$output = false;
			}
			$v = xmpMetadata::encode($object->get($field));
			$tag = $elementXML;
			switch ($elementXML) {
				case 'dc:creator':
					$special = 'rdf:Seq';
					$tag = 'rdf:li';
					if ($v) {
						fwrite($f, "   <$elementXML>\n");
						fwrite($f, "    <$special>\n");
						fwrite($f, "     <$tag>$v</$tag>\n");
						fwrite($f, "    </$special>\n");
						fwrite($f, "   </$elementXML>\n");
						$output = true;
					}
					break;
				case 'dc:rights':
				case 'xapRights:UsageTerms':
					$special = 'rdf:Alt';
					$tag = 'rdf:li';
					if ($v) {
						fwrite($f, "   <$elementXML>\n");
						fwrite($f, "    <$special>\n");
						fwrite($f, "     <$tag>$v</$tag>\n");
						fwrite($f, "    </$special>\n");
						fwrite($f, "   </$elementXML>\n");
						$output = true;
					}
					break;
				case 'dc:subject':
					$tags = $object->getTags();
					if (!empty($tags)) {
						fwrite($f, "   <$elementXML>\n");
						fwrite($f, "    <rdf:Bag>\n");
						foreach ($tags as $tag) {
							fwrite($f, "     <rdf:li>".xmpMetadata::encode($tag)."</rdf:li>\n");
						}
						fwrite($f, "    </rdf:Bag>\n");
						fwrite($f, "   </$elementXML>\n");
						$output = true;
					}
					break;
				default:
					if ($v) {
						fwrite($f, "   <$tag>$v</$tag>\n");
						$output = true;
					}
					break;
			}
		}
		fwrite($f, '  </rdf:Description>'."\n");
		fwrite($f, ' </rdf:RDF>'."\n");
		fwrite($f, '</x:xmpmeta>'."\n");
		fclose($f);
		clearstatcache();
		@chmod($file, CHMOD_VALUE & 0666);
		return gettext('Metadata exported');
	}

	static function create($html, $object, $prefix) {
		if ($html) $html .= '<hr />';
		$html .= '<label><input type="checkbox" name="xmpMedadataPut_'.$prefix.'" value="1" /> '.gettext('Export metadata info to XMP sidecar.').'</label>';
		return $html;
	}

	static function bulkActions($actions) {
		return array_merge($actions,array(gettext('Export Metadata') => 'xmpMetadataPublish'));
	}

}
?>