<?php
/////////////////////////////////////////////////////////////////
/// getID3() by James Heinrich <info@getid3.org>               //
//  available at http://getid3.sourceforge.net                 //
//            or http://www.getid3.org                         //
/////////////////////////////////////////////////////////////////
// See readme.txt for more details                             //
/////////////////////////////////////////////////////////////////
//                                                             //
// write.vorbiscomment.php                                     //
// module for writing VorbisComment tags                       //
// dependencies: /helperapps/vorbiscomment.exe                 //
//                                                            ///
/////////////////////////////////////////////////////////////////


class getid3_write_vorbiscomment
{

	var $filename;
	var $tag_data;
	var $warnings = array(); // any non-critical errors will be stored here
	var $errors   = array(); // any critical errors will be stored here

	function getid3_write_vorbiscomment() {
		return true;
	}

	function WriteVorbisComment() {

		if (!ini_get('safe_mode')) {

			// Create file with new comments
			$tempcommentsfilename = tempnam('*', 'getID3');
			if ($fpcomments = @fopen($tempcommentsfilename, 'wb')) {

				foreach ($this->tag_data as $key => $value) {
					foreach ($value as $commentdata) {
						fwrite($fpcomments, $this->CleanVorbisCommentName($key).'='.$commentdata."\n");
					}
				}
				fclose($fpcomments);

			} else {

				$this->errors[] = 'failed to open temporary tags file "'.$tempcommentsfilename.'", tags not written';
				return false;

			}

			$oldignoreuserabort = ignore_user_abort(true);
			if (GETID3_OS_ISWINDOWS) {

				if (file_exists(GETID3_HELPERAPPSDIR.'vorbiscomment.exe')) {
					//$commandline = '"'.GETID3_HELPERAPPSDIR.'vorbiscomment.exe" -w --raw -c "'.$tempcommentsfilename.'" "'.str_replace('/', '\\', $this->filename).'"';
					//  vorbiscomment works fine if you copy-paste the above commandline into a command prompt,
					//  but refuses to work with `backtick` if there are "doublequotes" present around BOTH
					//  the metaflac pathname and the target filename. For whatever reason...??
					//  The solution is simply ensure that the metaflac pathname has no spaces,
					//  and therefore does not need to be quoted

					// On top of that, if error messages are not always captured properly under Windows
					// To at least see if there was a problem, compare file modification timestamps before and after writing
					clearstatcache();
					$timestampbeforewriting = filemtime($this->filename);

					$commandline = GETID3_HELPERAPPSDIR.'vorbiscomment.exe -w --raw -c "'.$tempcommentsfilename.'" "'.$this->filename.'" 2>&1';
					$VorbiscommentError = `$commandline`;

					if (empty($VorbiscommentError)) {
						clearstatcache();
						if ($timestampbeforewriting == filemtime($this->filename)) {
							$VorbiscommentError = 'File modification timestamp has not changed - it looks like the tags were not written';
						}
					}
				} else {
					$VorbiscommentError = 'vorbiscomment.exe not found in '.GETID3_HELPERAPPSDIR;
				}

			} else {

				$commandline = 'vorbiscomment -w --raw -c "'.$tempcommentsfilename.'" "'.$this->filename.'" 2>&1';
				$VorbiscommentError = `$commandline`;

			}

			// Remove temporary comments file
			unlink($tempcommentsfilename);
			ignore_user_abort($oldignoreuserabort);

			if (!empty($VorbiscommentError)) {

				$this->errors[] = 'system call to vorbiscomment failed with message: '."\n\n".$VorbiscommentError;
				return false;

			}

			return true;
		}

		$this->errors[] = 'PHP running in Safe Mode (backtick operator not available) - cannot call vorbiscomment, tags not written';
		return false;
	}

	function DeleteVorbisComment() {
		$this->tag_data = array(array());
		return $this->WriteVorbisComment();
	}

	function CleanVorbisCommentName($originalcommentname) {
		// A case-insensitive field name that may consist of ASCII 0x20 through 0x7D, 0x3D ('=') excluded.
		// ASCII 0x41 through 0x5A inclusive (A-Z) is to be considered equivalent to ASCII 0x61 through
		// 0x7A inclusive (a-z).

		// replace invalid chars with a space, return uppercase text
		// Thanks Chris Bolt <chris-getid3bolt*cx> for improving this function
		// note: ereg_replace() replaces nulls with empty string (not space)
		return strtoupper(ereg_replace('[^ -<>-}]', ' ', str_replace("\x00", ' ', $originalcommentname)));

	}

}

?>