wp/wp-includes/ID3/module.tag.id3v2.php
author ymh <ymh.work@gmail.com>
Tue, 22 Oct 2019 16:11:46 +0200
changeset 15 3d4e9c994f10
parent 7 cf61fcea0001
child 16 a86126ab1dd4
permissions -rw-r--r--
Upgrade jquery-ui in in-motion theme version from 1.8.14 to 1.8.22 to avoid 'a.curCSS is not a function' errors in console that caused problems with circles and navigation.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
/// getID3() by James Heinrich <info@getid3.org>               //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
//  available at http://getid3.sourceforge.net                 //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
//            or http://www.getid3.org                         //
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
     6
//          also https://github.com/JamesHeinrich/getID3       //
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
// See readme.txt for more details                             //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
///                                                            //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    11
// module.tag.id3v2.php                                        //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
// module for analyzing ID3v2 tags                             //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
// dependencies: module.tag.id3v1.php                          //
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
//                                                            ///
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
/////////////////////////////////////////////////////////////////
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.tag.id3v1.php', __FILE__, true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
class getid3_id3v2 extends getid3_handler
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
{
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
	public $StartingOffset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
	public function Analyze() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    25
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    26
		//    Overall tag structure:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    28
		//        |      Header (10 bytes)      |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
		//        |       Extended Header       |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
		//        | (variable length, OPTIONAL) |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
		//        |   Frames (variable length)  |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
		//        |           Padding           |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
		//        | (variable length, OPTIONAL) |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
		//        | Footer (10 bytes, OPTIONAL) |
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
		//        +-----------------------------+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
		//    Header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
		//        ID3v2/file identifier      "ID3"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
		//        ID3v2 version              $04 00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
		//        ID3v2 flags                (%ab000000 in v2.2, %abc00000 in v2.3, %abcd0000 in v2.4.x)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
		//        ID3v2 size             4 * %0xxxxxxx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
		// shortcuts
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
		$info['id3v2']['header'] = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
		$thisfile_id3v2                  = &$info['id3v2'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
		$thisfile_id3v2['flags']         =  array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
		$thisfile_id3v2_flags            = &$thisfile_id3v2['flags'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    55
		$this->fseek($this->StartingOffset);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    56
		$header = $this->fread(10);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
		if (substr($header, 0, 3) == 'ID3'  &&  strlen($header) == 10) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
			$thisfile_id3v2['majorversion'] = ord($header{3});
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
			$thisfile_id3v2['minorversion'] = ord($header{4});
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
			// shortcut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
			$id3v2_majorversion = &$thisfile_id3v2['majorversion'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
			unset($info['id3v2']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
		if ($id3v2_majorversion > 4) { // this script probably won't correctly parse ID3v2.5.x and above (if it ever exists)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
    74
			$this->error('this script only parses up to ID3v2.4.x - this tag is ID3v2.'.$id3v2_majorversion.'.'.$thisfile_id3v2['minorversion']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
		$id3_flags = ord($header{5});
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
		switch ($id3v2_majorversion) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
			case 2:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
				// %ab000000 in v2.2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
				$thisfile_id3v2_flags['unsynch']     = (bool) ($id3_flags & 0x80); // a - Unsynchronisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
				$thisfile_id3v2_flags['compression'] = (bool) ($id3_flags & 0x40); // b - Compression
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
			case 3:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
				// %abc00000 in v2.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
				$thisfile_id3v2_flags['unsynch']     = (bool) ($id3_flags & 0x80); // a - Unsynchronisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
				$thisfile_id3v2_flags['exthead']     = (bool) ($id3_flags & 0x40); // b - Extended header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
				$thisfile_id3v2_flags['experim']     = (bool) ($id3_flags & 0x20); // c - Experimental indicator
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
			case 4:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
				// %abcd0000 in v2.4
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
				$thisfile_id3v2_flags['unsynch']     = (bool) ($id3_flags & 0x80); // a - Unsynchronisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
				$thisfile_id3v2_flags['exthead']     = (bool) ($id3_flags & 0x40); // b - Extended header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
				$thisfile_id3v2_flags['experim']     = (bool) ($id3_flags & 0x20); // c - Experimental indicator
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
				$thisfile_id3v2_flags['isfooter']    = (bool) ($id3_flags & 0x10); // d - Footer present
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
		$thisfile_id3v2['headerlength'] = getid3_lib::BigEndian2Int(substr($header, 6, 4), 1) + 10; // length of ID3v2 tag in 10-byte header doesn't include 10-byte header length
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
		$thisfile_id3v2['tag_offset_start'] = $this->StartingOffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
		$thisfile_id3v2['tag_offset_end']   = $thisfile_id3v2['tag_offset_start'] + $thisfile_id3v2['headerlength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
		// create 'encoding' key - used by getid3::HandleAllTags()
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
		// in ID3v2 every field can have it's own encoding type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
		// so force everything to UTF-8 so it can be handled consistantly
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
		$thisfile_id3v2['encoding'] = 'UTF-8';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
	//    Frames
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
	//        All ID3v2 frames consists of one frame header followed by one or more
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
	//        fields containing the actual information. The header is always 10
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
	//        bytes and laid out as follows:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
	//
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
	//        Frame ID      $xx xx xx xx  (four characters)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
	//        Size      4 * %0xxxxxxx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
	//        Flags         $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
		$sizeofframes = $thisfile_id3v2['headerlength'] - 10; // not including 10-byte initial header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
		if (!empty($thisfile_id3v2['exthead']['length'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
			$sizeofframes -= ($thisfile_id3v2['exthead']['length'] + 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
		if (!empty($thisfile_id3v2_flags['isfooter'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
			$sizeofframes -= 10; // footer takes last 10 bytes of ID3v2 header, after frame data, before audio
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
		if ($sizeofframes > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   135
			$framedata = $this->fread($sizeofframes); // read all frames from file into $framedata variable
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
			//    if entire frame data is unsynched, de-unsynch it now (ID3v2.3.x)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
			if (!empty($thisfile_id3v2_flags['unsynch']) && ($id3v2_majorversion <= 3)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
				$framedata = $this->DeUnsynchronise($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
			//        [in ID3v2.4.0] Unsynchronisation [S:6.1] is done on frame level, instead
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
			//        of on tag level, making it easier to skip frames, increasing the streamability
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
			//        of the tag. The unsynchronisation flag in the header [S:3.1] indicates that
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
			//        there exists an unsynchronised frame, while the new unsynchronisation flag in
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
			//        the frame header [S:4.1.2] indicates unsynchronisation.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
			//$framedataoffset = 10 + ($thisfile_id3v2['exthead']['length'] ? $thisfile_id3v2['exthead']['length'] + 4 : 0); // how many bytes into the stream - start from after the 10-byte header (and extended header length+4, if present)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
			$framedataoffset = 10; // how many bytes into the stream - start from after the 10-byte header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   152
			//    Extended Header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
			if (!empty($thisfile_id3v2_flags['exthead'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
				$extended_header_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
				if ($id3v2_majorversion == 3) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
					// v2.3 definition:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
					//Extended header size  $xx xx xx xx   // 32-bit integer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
					//Extended Flags        $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
					//     %x0000000 %00000000 // v2.3
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
					//     x - CRC data present
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
					//Size of padding       $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
					$thisfile_id3v2['exthead']['length'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 4), 0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
					$extended_header_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
					$thisfile_id3v2['exthead']['flag_bytes'] = 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
					$thisfile_id3v2['exthead']['flag_raw'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, $thisfile_id3v2['exthead']['flag_bytes']));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
					$extended_header_offset += $thisfile_id3v2['exthead']['flag_bytes'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
					$thisfile_id3v2['exthead']['flags']['crc'] = (bool) ($thisfile_id3v2['exthead']['flag_raw'] & 0x8000);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
					$thisfile_id3v2['exthead']['padding_size'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
					$extended_header_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
					if ($thisfile_id3v2['exthead']['flags']['crc']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
						$thisfile_id3v2['exthead']['flag_data']['crc'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
						$extended_header_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
					$extended_header_offset += $thisfile_id3v2['exthead']['padding_size'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
				} elseif ($id3v2_majorversion == 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
					// v2.4 definition:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
					//Extended header size   4 * %0xxxxxxx // 28-bit synchsafe integer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
					//Number of flag bytes       $01
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
					//Extended Flags             $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
					//     %0bcd0000 // v2.4
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
					//     b - Tag is an update
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
					//         Flag data length       $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
					//     c - CRC data present
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
					//         Flag data length       $05
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
					//         Total frame CRC    5 * %0xxxxxxx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
					//     d - Tag restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
					//         Flag data length       $01
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
					$thisfile_id3v2['exthead']['length'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 4), true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
					$extended_header_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
					$thisfile_id3v2['exthead']['flag_bytes'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 1)); // should always be 1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
					$extended_header_offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
					$thisfile_id3v2['exthead']['flag_raw'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, $thisfile_id3v2['exthead']['flag_bytes']));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
					$extended_header_offset += $thisfile_id3v2['exthead']['flag_bytes'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
					$thisfile_id3v2['exthead']['flags']['update']       = (bool) ($thisfile_id3v2['exthead']['flag_raw'] & 0x40);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
					$thisfile_id3v2['exthead']['flags']['crc']          = (bool) ($thisfile_id3v2['exthead']['flag_raw'] & 0x20);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
					$thisfile_id3v2['exthead']['flags']['restrictions'] = (bool) ($thisfile_id3v2['exthead']['flag_raw'] & 0x10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
					if ($thisfile_id3v2['exthead']['flags']['update']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
						$ext_header_chunk_length = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 1)); // should be 0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
						$extended_header_offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
					if ($thisfile_id3v2['exthead']['flags']['crc']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
						$ext_header_chunk_length = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 1)); // should be 5
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
						$extended_header_offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
						$thisfile_id3v2['exthead']['flag_data']['crc'] = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, $ext_header_chunk_length), true, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
						$extended_header_offset += $ext_header_chunk_length;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
					if ($thisfile_id3v2['exthead']['flags']['restrictions']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
						$ext_header_chunk_length = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 1)); // should be 1
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
						$extended_header_offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
						// %ppqrrstt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
						$restrictions_raw = getid3_lib::BigEndian2Int(substr($framedata, $extended_header_offset, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
						$extended_header_offset += 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
						$thisfile_id3v2['exthead']['flags']['restrictions']['tagsize']  = ($restrictions_raw & 0xC0) >> 6; // p - Tag size restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
						$thisfile_id3v2['exthead']['flags']['restrictions']['textenc']  = ($restrictions_raw & 0x20) >> 5; // q - Text encoding restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
						$thisfile_id3v2['exthead']['flags']['restrictions']['textsize'] = ($restrictions_raw & 0x18) >> 3; // r - Text fields size restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
						$thisfile_id3v2['exthead']['flags']['restrictions']['imgenc']   = ($restrictions_raw & 0x04) >> 2; // s - Image encoding restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
						$thisfile_id3v2['exthead']['flags']['restrictions']['imgsize']  = ($restrictions_raw & 0x03) >> 0; // t - Image size restrictions
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
						$thisfile_id3v2['exthead']['flags']['restrictions_text']['tagsize']  = $this->LookupExtendedHeaderRestrictionsTagSizeLimits($thisfile_id3v2['exthead']['flags']['restrictions']['tagsize']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
						$thisfile_id3v2['exthead']['flags']['restrictions_text']['textenc']  = $this->LookupExtendedHeaderRestrictionsTextEncodings($thisfile_id3v2['exthead']['flags']['restrictions']['textenc']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
						$thisfile_id3v2['exthead']['flags']['restrictions_text']['textsize'] = $this->LookupExtendedHeaderRestrictionsTextFieldSize($thisfile_id3v2['exthead']['flags']['restrictions']['textsize']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
						$thisfile_id3v2['exthead']['flags']['restrictions_text']['imgenc']   = $this->LookupExtendedHeaderRestrictionsImageEncoding($thisfile_id3v2['exthead']['flags']['restrictions']['imgenc']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
						$thisfile_id3v2['exthead']['flags']['restrictions_text']['imgsize']  = $this->LookupExtendedHeaderRestrictionsImageSizeSize($thisfile_id3v2['exthead']['flags']['restrictions']['imgsize']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
					if ($thisfile_id3v2['exthead']['length'] != $extended_header_offset) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   244
						$this->warning('ID3v2.4 extended header length mismatch (expecting '.intval($thisfile_id3v2['exthead']['length']).', found '.intval($extended_header_offset).')');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
				$framedataoffset += $extended_header_offset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
				$framedata = substr($framedata, $extended_header_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
			} // end extended header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
			while (isset($framedata) && (strlen($framedata) > 0)) { // cycle through until no more frame data is left to parse
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
				if (strlen($framedata) <= $this->ID3v2HeaderLength($id3v2_majorversion)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
					// insufficient room left in ID3v2 header for actual data - must be padding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
					$thisfile_id3v2['padding']['start']  = $framedataoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
					$thisfile_id3v2['padding']['length'] = strlen($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
					$thisfile_id3v2['padding']['valid']  = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
					for ($i = 0; $i < $thisfile_id3v2['padding']['length']; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
						if ($framedata{$i} != "\x00") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
							$thisfile_id3v2['padding']['valid'] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
							$thisfile_id3v2['padding']['errorpos'] = $thisfile_id3v2['padding']['start'] + $i;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   263
							$this->warning('Invalid ID3v2 padding found at offset '.$thisfile_id3v2['padding']['errorpos'].' (the remaining '.($thisfile_id3v2['padding']['length'] - $i).' bytes are considered invalid)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
					break; // skip rest of ID3v2 header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
				if ($id3v2_majorversion == 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
					// Frame ID  $xx xx xx (three characters)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
					// Size      $xx xx xx (24-bit integer)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
					// Flags     $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
					$frame_header = substr($framedata, 0, 6); // take next 6 bytes for header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
					$framedata    = substr($framedata, 6);    // and leave the rest in $framedata
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
					$frame_name   = substr($frame_header, 0, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
					$frame_size   = getid3_lib::BigEndian2Int(substr($frame_header, 3, 3), 0);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
					$frame_flags  = 0; // not used for anything in ID3v2.2, just set to avoid E_NOTICEs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
				} elseif ($id3v2_majorversion > 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
					// Frame ID  $xx xx xx xx (four characters)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
					// Size      $xx xx xx xx (32-bit integer in v2.3, 28-bit synchsafe in v2.4+)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
					// Flags     $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
					$frame_header = substr($framedata, 0, 10); // take next 10 bytes for header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
					$framedata    = substr($framedata, 10);    // and leave the rest in $framedata
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
					$frame_name = substr($frame_header, 0, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
					if ($id3v2_majorversion == 3) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
						$frame_size = getid3_lib::BigEndian2Int(substr($frame_header, 4, 4), 0); // 32-bit integer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
					} else { // ID3v2.4+
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
						$frame_size = getid3_lib::BigEndian2Int(substr($frame_header, 4, 4), 1); // 32-bit synchsafe integer (28-bit value)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
					if ($frame_size < (strlen($framedata) + 4)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
						$nextFrameID = substr($framedata, $frame_size, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
						if ($this->IsValidID3v2FrameName($nextFrameID, $id3v2_majorversion)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
							// next frame is OK
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
						} elseif (($frame_name == "\x00".'MP3') || ($frame_name == "\x00\x00".'MP') || ($frame_name == ' MP3') || ($frame_name == 'MP3e')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
							// MP3ext known broken frames - "ok" for the purposes of this test
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
						} elseif (($id3v2_majorversion == 4) && ($this->IsValidID3v2FrameName(substr($framedata, getid3_lib::BigEndian2Int(substr($frame_header, 4, 4), 0), 4), 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   303
							$this->warning('ID3v2 tag written as ID3v2.4, but with non-synchsafe integers (ID3v2.3 style). Older versions of (Helium2; iTunes) are known culprits of this. Tag has been parsed as ID3v2.3');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
							$id3v2_majorversion = 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
							$frame_size = getid3_lib::BigEndian2Int(substr($frame_header, 4, 4), 0); // 32-bit integer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   308
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
					$frame_flags = getid3_lib::BigEndian2Int(substr($frame_header, 8, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
				if ((($id3v2_majorversion == 2) && ($frame_name == "\x00\x00\x00")) || ($frame_name == "\x00\x00\x00\x00")) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
					// padding encountered
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
					$thisfile_id3v2['padding']['start']  = $framedataoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
					$thisfile_id3v2['padding']['length'] = strlen($frame_header) + strlen($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   318
					$thisfile_id3v2['padding']['valid']  = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   319
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   320
					$len = strlen($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   321
					for ($i = 0; $i < $len; $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
						if ($framedata{$i} != "\x00") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   323
							$thisfile_id3v2['padding']['valid'] = false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   324
							$thisfile_id3v2['padding']['errorpos'] = $thisfile_id3v2['padding']['start'] + $i;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   325
							$this->warning('Invalid ID3v2 padding found at offset '.$thisfile_id3v2['padding']['errorpos'].' (the remaining '.($thisfile_id3v2['padding']['length'] - $i).' bytes are considered invalid)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
					break; // skip rest of ID3v2 header
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   331
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   332
				if ($iTunesBrokenFrameNameFixed = self::ID3v22iTunesBrokenFrameName($frame_name)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   333
					$this->warning('error parsing "'.$frame_name.'" ('.$framedataoffset.' bytes into the ID3v2.'.$id3v2_majorversion.' tag). (ERROR: IsValidID3v2FrameName("'.str_replace("\x00", ' ', $frame_name).'", '.$id3v2_majorversion.'))). [Note: this particular error has been known to happen with tags edited by iTunes (versions "X v2.0.3", "v3.0.1", "v7.0.0.70" are known-guilty, probably others too)]. Translated frame name from "'.str_replace("\x00", ' ', $frame_name).'" to "'.$iTunesBrokenFrameNameFixed.'" for parsing.');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   334
					$frame_name = $iTunesBrokenFrameNameFixed;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   335
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   336
				if (($frame_size <= strlen($framedata)) && ($this->IsValidID3v2FrameName($frame_name, $id3v2_majorversion))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   337
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   338
					unset($parsedFrame);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   339
					$parsedFrame['frame_name']      = $frame_name;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   340
					$parsedFrame['frame_flags_raw'] = $frame_flags;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   341
					$parsedFrame['data']            = substr($framedata, 0, $frame_size);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   342
					$parsedFrame['datalength']      = getid3_lib::CastAsInt($frame_size);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   343
					$parsedFrame['dataoffset']      = $framedataoffset;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   344
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   345
					$this->ParseID3v2Frame($parsedFrame);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   346
					$thisfile_id3v2[$frame_name][] = $parsedFrame;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   347
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   348
					$framedata = substr($framedata, $frame_size);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   349
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   350
				} else { // invalid frame length or FrameID
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   351
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   352
					if ($frame_size <= strlen($framedata)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   353
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   354
						if ($this->IsValidID3v2FrameName(substr($framedata, $frame_size, 4), $id3v2_majorversion)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   355
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   356
							// next frame is valid, just skip the current frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   357
							$framedata = substr($framedata, $frame_size);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   358
							$this->warning('Next ID3v2 frame is valid, skipping current frame.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   359
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   360
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   361
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   362
							// next frame is invalid too, abort processing
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   363
							//unset($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   364
							$framedata = null;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   365
							$this->error('Next ID3v2 frame is also invalid, aborting processing.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   366
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   367
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   368
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   369
					} elseif ($frame_size == strlen($framedata)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   370
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   371
						// this is the last frame, just skip
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   372
						$this->warning('This was the last ID3v2 frame.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   373
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   374
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   375
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   376
						// next frame is invalid too, abort processing
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   377
						//unset($framedata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   378
						$framedata = null;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   379
						$this->warning('Invalid ID3v2 frame size, aborting.');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   380
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   381
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   382
					if (!$this->IsValidID3v2FrameName($frame_name, $id3v2_majorversion)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   383
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   384
						switch ($frame_name) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   385
							case "\x00\x00".'MP':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   386
							case "\x00".'MP3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   387
							case ' MP3':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   388
							case 'MP3e':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   389
							case "\x00".'MP':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   390
							case ' MP':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   391
							case 'MP3':
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   392
								$this->warning('error parsing "'.$frame_name.'" ('.$framedataoffset.' bytes into the ID3v2.'.$id3v2_majorversion.' tag). (ERROR: !IsValidID3v2FrameName("'.str_replace("\x00", ' ', $frame_name).'", '.$id3v2_majorversion.'))). [Note: this particular error has been known to happen with tags edited by "MP3ext (www.mutschler.de/mp3ext/)"]');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   393
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   394
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   395
							default:
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   396
								$this->warning('error parsing "'.$frame_name.'" ('.$framedataoffset.' bytes into the ID3v2.'.$id3v2_majorversion.' tag). (ERROR: !IsValidID3v2FrameName("'.str_replace("\x00", ' ', $frame_name).'", '.$id3v2_majorversion.'))).');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   397
								break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   398
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   399
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   400
					} elseif (!isset($framedata) || ($frame_size > strlen($framedata))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   401
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   402
						$this->error('error parsing "'.$frame_name.'" ('.$framedataoffset.' bytes into the ID3v2.'.$id3v2_majorversion.' tag). (ERROR: $frame_size ('.$frame_size.') > strlen($framedata) ('.(isset($framedata) ? strlen($framedata) : 'null').')).');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   403
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   404
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   405
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   406
						$this->error('error parsing "'.$frame_name.'" ('.$framedataoffset.' bytes into the ID3v2.'.$id3v2_majorversion.' tag).');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   407
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   408
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   409
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   410
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   411
				$framedataoffset += ($frame_size + $this->ID3v2HeaderLength($id3v2_majorversion));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   412
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   413
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   414
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   415
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   416
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   417
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   418
	//    Footer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   419
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   420
	//    The footer is a copy of the header, but with a different identifier.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   421
	//        ID3v2 identifier           "3DI"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   422
	//        ID3v2 version              $04 00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   423
	//        ID3v2 flags                %abcd0000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   424
	//        ID3v2 size             4 * %0xxxxxxx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   425
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   426
		if (isset($thisfile_id3v2_flags['isfooter']) && $thisfile_id3v2_flags['isfooter']) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   427
			$footer = $this->fread(10);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   428
			if (substr($footer, 0, 3) == '3DI') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   429
				$thisfile_id3v2['footer'] = true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   430
				$thisfile_id3v2['majorversion_footer'] = ord($footer{3});
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   431
				$thisfile_id3v2['minorversion_footer'] = ord($footer{4});
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   432
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   433
			if ($thisfile_id3v2['majorversion_footer'] <= 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   434
				$id3_flags = ord(substr($footer{5}));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   435
				$thisfile_id3v2_flags['unsynch_footer']  = (bool) ($id3_flags & 0x80);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   436
				$thisfile_id3v2_flags['extfoot_footer']  = (bool) ($id3_flags & 0x40);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   437
				$thisfile_id3v2_flags['experim_footer']  = (bool) ($id3_flags & 0x20);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   438
				$thisfile_id3v2_flags['isfooter_footer'] = (bool) ($id3_flags & 0x10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   439
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   440
				$thisfile_id3v2['footerlength'] = getid3_lib::BigEndian2Int(substr($footer, 6, 4), 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   441
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   442
		} // end footer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   443
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   444
		if (isset($thisfile_id3v2['comments']['genre'])) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   445
			$genres = array();
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   446
			foreach ($thisfile_id3v2['comments']['genre'] as $key => $value) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   447
				foreach ($this->ParseID3v2GenreString($value) as $genre) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   448
					$genres[] = $genre;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   449
				}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   450
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   451
			$thisfile_id3v2['comments']['genre'] = array_unique($genres);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   452
			unset($key, $value, $genres, $genre);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   453
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   454
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   455
		if (isset($thisfile_id3v2['comments']['track'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   456
			foreach ($thisfile_id3v2['comments']['track'] as $key => $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   457
				if (strstr($value, '/')) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   458
					list($thisfile_id3v2['comments']['tracknum'][$key], $thisfile_id3v2['comments']['totaltracks'][$key]) = explode('/', $thisfile_id3v2['comments']['track'][$key]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   459
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   460
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   461
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   462
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   463
		if (!isset($thisfile_id3v2['comments']['year']) && !empty($thisfile_id3v2['comments']['recording_time'][0]) && preg_match('#^([0-9]{4})#', trim($thisfile_id3v2['comments']['recording_time'][0]), $matches)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   464
			$thisfile_id3v2['comments']['year'] = array($matches[1]);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   465
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   466
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   467
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   468
		if (!empty($thisfile_id3v2['TXXX'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   469
			// MediaMonkey does this, maybe others: write a blank RGAD frame, but put replay-gain adjustment values in TXXX frames
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   470
			foreach ($thisfile_id3v2['TXXX'] as $txxx_array) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   471
				switch ($txxx_array['description']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   472
					case 'replaygain_track_gain':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   473
						if (empty($info['replay_gain']['track']['adjustment']) && !empty($txxx_array['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   474
							$info['replay_gain']['track']['adjustment'] = floatval(trim(str_replace('dB', '', $txxx_array['data'])));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   475
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   476
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   477
					case 'replaygain_track_peak':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   478
						if (empty($info['replay_gain']['track']['peak']) && !empty($txxx_array['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   479
							$info['replay_gain']['track']['peak'] = floatval($txxx_array['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   480
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   481
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   482
					case 'replaygain_album_gain':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   483
						if (empty($info['replay_gain']['album']['adjustment']) && !empty($txxx_array['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   484
							$info['replay_gain']['album']['adjustment'] = floatval(trim(str_replace('dB', '', $txxx_array['data'])));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   485
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   486
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   487
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   488
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   489
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   490
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   491
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   492
		// Set avdataoffset
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   493
		$info['avdataoffset'] = $thisfile_id3v2['headerlength'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   494
		if (isset($thisfile_id3v2['footer'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   495
			$info['avdataoffset'] += 10;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   496
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   497
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   498
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   499
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   500
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   501
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   502
	public function ParseID3v2GenreString($genrestring) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   503
		// Parse genres into arrays of genreName and genreID
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   504
		// ID3v2.2.x, ID3v2.3.x: '(21)' or '(4)Eurodisco' or '(51)(39)' or '(55)((I think...)'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   505
		// ID3v2.4.x: '21' $00 'Eurodisco' $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   506
		$clean_genres = array();
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   507
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   508
		// hack-fixes for some badly-written ID3v2.3 taggers, while trying not to break correctly-written tags
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   509
		if (($this->getid3->info['id3v2']['majorversion'] == 3) && !preg_match('#[\x00]#', $genrestring)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   510
			// note: MusicBrainz Picard incorrectly stores plaintext genres separated by "/" when writing in ID3v2.3 mode, hack-fix here:
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   511
			// replace / with NULL, then replace back the two ID3v1 genres that legitimately have "/" as part of the single genre name
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   512
			if (preg_match('#/#', $genrestring)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   513
				$genrestring = str_replace('/', "\x00", $genrestring);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   514
				$genrestring = str_replace('Pop'."\x00".'Funk', 'Pop/Funk', $genrestring);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   515
				$genrestring = str_replace('Rock'."\x00".'Rock', 'Folk/Rock', $genrestring);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   516
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   517
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   518
			// some other taggers separate multiple genres with semicolon, e.g. "Heavy Metal;Thrash Metal;Metal"
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   519
			if (preg_match('#;#', $genrestring)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   520
				$genrestring = str_replace(';', "\x00", $genrestring);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   521
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   522
		}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   523
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   524
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   525
		if (strpos($genrestring, "\x00") === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   526
			$genrestring = preg_replace('#\(([0-9]{1,3})\)#', '$1'."\x00", $genrestring);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   527
		}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   528
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   529
		$genre_elements = explode("\x00", $genrestring);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   530
		foreach ($genre_elements as $element) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   531
			$element = trim($element);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   532
			if ($element) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   533
				if (preg_match('#^[0-9]{1,3}#', $element)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   534
					$clean_genres[] = getid3_id3v1::LookupGenreName($element);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   535
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   536
					$clean_genres[] = str_replace('((', '(', $element);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   537
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   538
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   539
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   540
		return $clean_genres;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   541
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   542
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   543
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   544
	public function ParseID3v2Frame(&$parsedFrame) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   545
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   546
		// shortcuts
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   547
		$info = &$this->getid3->info;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   548
		$id3v2_majorversion = $info['id3v2']['majorversion'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   549
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   550
		$parsedFrame['framenamelong']  = $this->FrameNameLongLookup($parsedFrame['frame_name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   551
		if (empty($parsedFrame['framenamelong'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   552
			unset($parsedFrame['framenamelong']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   553
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   554
		$parsedFrame['framenameshort'] = $this->FrameNameShortLookup($parsedFrame['frame_name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   555
		if (empty($parsedFrame['framenameshort'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   556
			unset($parsedFrame['framenameshort']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   557
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   558
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   559
		if ($id3v2_majorversion >= 3) { // frame flags are not part of the ID3v2.2 standard
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   560
			if ($id3v2_majorversion == 3) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   561
				//    Frame Header Flags
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   562
				//    %abc00000 %ijk00000
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   563
				$parsedFrame['flags']['TagAlterPreservation']  = (bool) ($parsedFrame['frame_flags_raw'] & 0x8000); // a - Tag alter preservation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   564
				$parsedFrame['flags']['FileAlterPreservation'] = (bool) ($parsedFrame['frame_flags_raw'] & 0x4000); // b - File alter preservation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   565
				$parsedFrame['flags']['ReadOnly']              = (bool) ($parsedFrame['frame_flags_raw'] & 0x2000); // c - Read only
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   566
				$parsedFrame['flags']['compression']           = (bool) ($parsedFrame['frame_flags_raw'] & 0x0080); // i - Compression
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   567
				$parsedFrame['flags']['Encryption']            = (bool) ($parsedFrame['frame_flags_raw'] & 0x0040); // j - Encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   568
				$parsedFrame['flags']['GroupingIdentity']      = (bool) ($parsedFrame['frame_flags_raw'] & 0x0020); // k - Grouping identity
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   569
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   570
			} elseif ($id3v2_majorversion == 4) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   571
				//    Frame Header Flags
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   572
				//    %0abc0000 %0h00kmnp
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   573
				$parsedFrame['flags']['TagAlterPreservation']  = (bool) ($parsedFrame['frame_flags_raw'] & 0x4000); // a - Tag alter preservation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   574
				$parsedFrame['flags']['FileAlterPreservation'] = (bool) ($parsedFrame['frame_flags_raw'] & 0x2000); // b - File alter preservation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   575
				$parsedFrame['flags']['ReadOnly']              = (bool) ($parsedFrame['frame_flags_raw'] & 0x1000); // c - Read only
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   576
				$parsedFrame['flags']['GroupingIdentity']      = (bool) ($parsedFrame['frame_flags_raw'] & 0x0040); // h - Grouping identity
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   577
				$parsedFrame['flags']['compression']           = (bool) ($parsedFrame['frame_flags_raw'] & 0x0008); // k - Compression
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   578
				$parsedFrame['flags']['Encryption']            = (bool) ($parsedFrame['frame_flags_raw'] & 0x0004); // m - Encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   579
				$parsedFrame['flags']['Unsynchronisation']     = (bool) ($parsedFrame['frame_flags_raw'] & 0x0002); // n - Unsynchronisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   580
				$parsedFrame['flags']['DataLengthIndicator']   = (bool) ($parsedFrame['frame_flags_raw'] & 0x0001); // p - Data length indicator
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   581
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   582
				// Frame-level de-unsynchronisation - ID3v2.4
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   583
				if ($parsedFrame['flags']['Unsynchronisation']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   584
					$parsedFrame['data'] = $this->DeUnsynchronise($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   585
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   586
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   587
				if ($parsedFrame['flags']['DataLengthIndicator']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   588
					$parsedFrame['data_length_indicator'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 0, 4), 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   589
					$parsedFrame['data']                  =                           substr($parsedFrame['data'], 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   590
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   591
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   592
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   593
			//    Frame-level de-compression
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   594
			if ($parsedFrame['flags']['compression']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   595
				$parsedFrame['decompressed_size'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   596
				if (!function_exists('gzuncompress')) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   597
					$this->warning('gzuncompress() support required to decompress ID3v2 frame "'.$parsedFrame['frame_name'].'"');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   598
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   599
					if ($decompresseddata = @gzuncompress(substr($parsedFrame['data'], 4))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   600
					//if ($decompresseddata = @gzuncompress($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   601
						$parsedFrame['data'] = $decompresseddata;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   602
						unset($decompresseddata);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   603
					} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   604
						$this->warning('gzuncompress() failed on compressed contents of ID3v2 frame "'.$parsedFrame['frame_name'].'"');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   605
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   606
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   607
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   608
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   609
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   610
		if (!empty($parsedFrame['flags']['DataLengthIndicator'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   611
			if ($parsedFrame['data_length_indicator'] != strlen($parsedFrame['data'])) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   612
				$this->warning('ID3v2 frame "'.$parsedFrame['frame_name'].'" should be '.$parsedFrame['data_length_indicator'].' bytes long according to DataLengthIndicator, but found '.strlen($parsedFrame['data']).' bytes of data');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   613
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   614
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   615
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   616
		if (isset($parsedFrame['datalength']) && ($parsedFrame['datalength'] == 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   617
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   618
			$warning = 'Frame "'.$parsedFrame['frame_name'].'" at offset '.$parsedFrame['dataoffset'].' has no data portion';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   619
			switch ($parsedFrame['frame_name']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   620
				case 'WCOM':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   621
					$warning .= ' (this is known to happen with files tagged by RioPort)';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   622
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   623
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   624
				default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   625
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   626
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   627
			$this->warning($warning);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   628
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   629
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'UFID')) || // 4.1   UFID Unique file identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   630
			(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'UFI'))) {  // 4.1   UFI  Unique file identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   631
			//   There may be more than one 'UFID' frame in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   632
			//   but only one with the same 'Owner identifier'.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   633
			// <Header for 'Unique file identifier', ID: 'UFID'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   634
			// Owner identifier        <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   635
			// Identifier              <up to 64 bytes binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   636
			$exploded = explode("\x00", $parsedFrame['data'], 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   637
			$parsedFrame['ownerid'] = (isset($exploded[0]) ? $exploded[0] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   638
			$parsedFrame['data']    = (isset($exploded[1]) ? $exploded[1] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   639
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   640
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'TXXX')) || // 4.2.2 TXXX User defined text information frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   641
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'TXX'))) {    // 4.2.2 TXX  User defined text information frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   642
			//   There may be more than one 'TXXX' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   643
			//   but only one with the same description.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   644
			// <Header for 'User defined text information frame', ID: 'TXXX'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   645
			// Text encoding     $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   646
			// Description       <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   647
			// Value             <text string according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   648
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   649
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   650
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   651
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   652
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   653
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   654
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   655
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   656
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   657
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   658
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   659
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   660
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   661
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   662
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   663
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   664
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   665
			$parsedFrame['encodingid']  = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   666
			$parsedFrame['encoding']    = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   667
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   668
			$parsedFrame['description'] = trim(getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $frame_description));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   669
			$parsedFrame['data'] = substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   670
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   671
				$commentkey = ($parsedFrame['description'] ? $parsedFrame['description'] : (isset($info['id3v2']['comments'][$parsedFrame['framenameshort']]) ? count($info['id3v2']['comments'][$parsedFrame['framenameshort']]) : 0));
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   672
				if (!isset($info['id3v2']['comments'][$parsedFrame['framenameshort']]) || !array_key_exists($commentkey, $info['id3v2']['comments'][$parsedFrame['framenameshort']])) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   673
					$info['id3v2']['comments'][$parsedFrame['framenameshort']][$commentkey] = trim(getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']));
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   674
				} else {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   675
					$info['id3v2']['comments'][$parsedFrame['framenameshort']][]            = trim(getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']));
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   676
				}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   677
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   678
			//unset($parsedFrame['data']); do not unset, may be needed elsewhere, e.g. for replaygain
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   679
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   680
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   681
		} elseif ($parsedFrame['frame_name']{0} == 'T') { // 4.2. T??[?] Text information frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   682
			//   There may only be one text information frame of its kind in an tag.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   683
			// <Header for 'Text information frame', ID: 'T000' - 'TZZZ',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   684
			// excluding 'TXXX' described in 4.2.6.>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   685
			// Text encoding                $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   686
			// Information                  <text string(s) according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   687
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   688
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   689
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   690
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   691
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   692
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   693
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   694
			$parsedFrame['data'] = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   695
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   696
			$parsedFrame['encodingid'] = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   697
			$parsedFrame['encoding']   = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   698
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   699
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   700
				// ID3v2.3 specs say that TPE1 (and others) can contain multiple artist values separated with /
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   701
				// This of course breaks when an artist name contains slash character, e.g. "AC/DC"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   702
				// MP3tag (maybe others) implement alternative system where multiple artists are null-separated, which makes more sense
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   703
				// getID3 will split null-separated artists into multiple artists and leave slash-separated ones to the user
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   704
				switch ($parsedFrame['encoding']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   705
					case 'UTF-16':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   706
					case 'UTF-16BE':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   707
					case 'UTF-16LE':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   708
						$wordsize = 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   709
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   710
					case 'ISO-8859-1':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   711
					case 'UTF-8':
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   712
					default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   713
						$wordsize = 1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   714
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   715
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   716
				$Txxx_elements = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   717
				$Txxx_elements_start_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   718
				for ($i = 0; $i < strlen($parsedFrame['data']); $i += $wordsize) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   719
					if (substr($parsedFrame['data'], $i, $wordsize) == str_repeat("\x00", $wordsize)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   720
						$Txxx_elements[] = substr($parsedFrame['data'], $Txxx_elements_start_offset, $i - $Txxx_elements_start_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   721
						$Txxx_elements_start_offset = $i + $wordsize;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   722
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   723
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   724
				$Txxx_elements[] = substr($parsedFrame['data'], $Txxx_elements_start_offset, $i - $Txxx_elements_start_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   725
				foreach ($Txxx_elements as $Txxx_element) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   726
					$string = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $Txxx_element);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   727
					if (!empty($string)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   728
						$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = $string;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   729
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   730
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   731
				unset($string, $wordsize, $i, $Txxx_elements, $Txxx_element, $Txxx_elements_start_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   732
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   733
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   734
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'WXXX')) || // 4.3.2 WXXX User defined URL link frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   735
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'WXX'))) {    // 4.3.2 WXX  User defined URL link frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   736
			//   There may be more than one 'WXXX' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   737
			//   but only one with the same description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   738
			// <Header for 'User defined URL link frame', ID: 'WXXX'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   739
			// Text encoding     $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   740
			// Description       <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   741
			// URL               <text string>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   742
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   743
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   744
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   745
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   746
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   747
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   748
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   749
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   750
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   751
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   752
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   753
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   754
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   755
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   756
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   757
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   758
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   759
			$parsedFrame['data'] = substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   760
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   761
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   762
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   763
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   764
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   765
			if ($frame_terminatorpos) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   766
				// there are null bytes after the data - this is not according to spec
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   767
				// only use data up to first null byte
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   768
				$frame_urldata = (string) substr($parsedFrame['data'], 0, $frame_terminatorpos);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   769
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   770
				// no null bytes following data, just use all data
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   771
				$frame_urldata = (string) $parsedFrame['data'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   772
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   773
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   774
			$parsedFrame['encodingid']  = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   775
			$parsedFrame['encoding']    = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   776
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   777
			$parsedFrame['url']         = $frame_urldata;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   778
			$parsedFrame['description'] = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   779
			if (!empty($parsedFrame['framenameshort']) && $parsedFrame['url']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   780
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['url']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   781
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   782
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   783
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   784
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   785
		} elseif ($parsedFrame['frame_name']{0} == 'W') { // 4.3. W??? URL link frames
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   786
			//   There may only be one URL link frame of its kind in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   787
			//   except when stated otherwise in the frame description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   788
			// <Header for 'URL link frame', ID: 'W000' - 'WZZZ', excluding 'WXXX'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   789
			// described in 4.3.2.>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   790
			// URL              <text string>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   791
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   792
			$parsedFrame['url'] = trim($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   793
			if (!empty($parsedFrame['framenameshort']) && $parsedFrame['url']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   794
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = $parsedFrame['url'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   795
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   796
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   797
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   798
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   799
		} elseif ((($id3v2_majorversion == 3) && ($parsedFrame['frame_name'] == 'IPLS')) || // 4.4  IPLS Involved people list (ID3v2.3 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   800
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'IPL'))) {     // 4.4  IPL  Involved people list (ID3v2.2 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   801
			// http://id3.org/id3v2.3.0#sec4.4
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   802
			//   There may only be one 'IPL' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   803
			// <Header for 'User defined URL link frame', ID: 'IPL'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   804
			// Text encoding     $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   805
			// People list strings    <textstrings>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   806
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   807
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   808
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   809
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   810
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   811
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   812
			$parsedFrame['encodingid'] = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   813
			$parsedFrame['encoding']   = $this->TextEncodingNameLookup($parsedFrame['encodingid']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   814
			$parsedFrame['data_raw']   = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   815
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   816
			// http://www.getid3.org/phpBB3/viewtopic.php?t=1369
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   817
			// "this tag typically contains null terminated strings, which are associated in pairs"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   818
			// "there are users that use the tag incorrectly"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   819
			$IPLS_parts = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   820
			if (strpos($parsedFrame['data_raw'], "\x00") !== false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   821
				$IPLS_parts_unsorted = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   822
				if (((strlen($parsedFrame['data_raw']) % 2) == 0) && ((substr($parsedFrame['data_raw'], 0, 2) == "\xFF\xFE") || (substr($parsedFrame['data_raw'], 0, 2) == "\xFE\xFF"))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   823
					// UTF-16, be careful looking for null bytes since most 2-byte characters may contain one; you need to find twin null bytes, and on even padding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   824
					$thisILPS  = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   825
					for ($i = 0; $i < strlen($parsedFrame['data_raw']); $i += 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   826
						$twobytes = substr($parsedFrame['data_raw'], $i, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   827
						if ($twobytes === "\x00\x00") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   828
							$IPLS_parts_unsorted[] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $thisILPS);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   829
							$thisILPS  = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   830
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   831
							$thisILPS .= $twobytes;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   832
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   833
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   834
					if (strlen($thisILPS) > 2) { // 2-byte BOM
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   835
						$IPLS_parts_unsorted[] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $thisILPS);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   836
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   837
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   838
					// ISO-8859-1 or UTF-8 or other single-byte-null character set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   839
					$IPLS_parts_unsorted = explode("\x00", $parsedFrame['data_raw']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   840
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   841
				if (count($IPLS_parts_unsorted) == 1) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   842
					// just a list of names, e.g. "Dino Baptiste, Jimmy Copley, John Gordon, Bernie Marsden, Sharon Watson"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   843
					foreach ($IPLS_parts_unsorted as $key => $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   844
						$IPLS_parts_sorted = preg_split('#[;,\\r\\n\\t]#', $value);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   845
						$position = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   846
						foreach ($IPLS_parts_sorted as $person) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   847
							$IPLS_parts[] = array('position'=>$position, 'person'=>$person);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   848
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   849
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   850
				} elseif ((count($IPLS_parts_unsorted) % 2) == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   851
					$position = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   852
					$person   = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   853
					foreach ($IPLS_parts_unsorted as $key => $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   854
						if (($key % 2) == 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   855
							$position = $value;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   856
						} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   857
							$person   = $value;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   858
							$IPLS_parts[] = array('position'=>$position, 'person'=>$person);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   859
							$position = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   860
							$person   = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   861
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   862
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   863
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   864
					foreach ($IPLS_parts_unsorted as $key => $value) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   865
						$IPLS_parts[] = array($value);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   866
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   867
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   868
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   869
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   870
				$IPLS_parts = preg_split('#[;,\\r\\n\\t]#', $parsedFrame['data_raw']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   871
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   872
			$parsedFrame['data'] = $IPLS_parts;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   873
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   874
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   875
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = $parsedFrame['data'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   876
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   877
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   878
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   879
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'MCDI')) || // 4.4   MCDI Music CD identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   880
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'MCI'))) {     // 4.5   MCI  Music CD identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   881
			//   There may only be one 'MCDI' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   882
			// <Header for 'Music CD identifier', ID: 'MCDI'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   883
			// CD TOC                <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   884
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   885
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   886
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = $parsedFrame['data'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   887
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   888
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   889
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   890
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'ETCO')) || // 4.5   ETCO Event timing codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   891
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'ETC'))) {     // 4.6   ETC  Event timing codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   892
			//   There may only be one 'ETCO' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   893
			// <Header for 'Event timing codes', ID: 'ETCO'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   894
			// Time stamp format    $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   895
			//   Where time stamp format is:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   896
			// $01  (32-bit value) MPEG frames from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   897
			// $02  (32-bit value) milliseconds from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   898
			//   Followed by a list of key events in the following format:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   899
			// Type of event   $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   900
			// Time stamp      $xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   901
			//   The 'Time stamp' is set to zero if directly at the beginning of the sound
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   902
			//   or after the previous event. All events MUST be sorted in chronological order.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   903
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   904
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   905
			$parsedFrame['timestampformat'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   906
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   907
			while ($frame_offset < strlen($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   908
				$parsedFrame['typeid']    = substr($parsedFrame['data'], $frame_offset++, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   909
				$parsedFrame['type']      = $this->ETCOEventLookup($parsedFrame['typeid']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   910
				$parsedFrame['timestamp'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   911
				$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   912
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   913
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   914
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   915
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   916
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'MLLT')) || // 4.6   MLLT MPEG location lookup table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   917
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'MLL'))) {     // 4.7   MLL MPEG location lookup table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   918
			//   There may only be one 'MLLT' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   919
			// <Header for 'Location lookup table', ID: 'MLLT'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   920
			// MPEG frames between reference  $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   921
			// Bytes between reference        $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   922
			// Milliseconds between reference $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   923
			// Bits for bytes deviation       $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   924
			// Bits for milliseconds dev.     $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   925
			//   Then for every reference the following data is included;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   926
			// Deviation in bytes         %xxx....
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   927
			// Deviation in milliseconds  %xxx....
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   928
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   929
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   930
			$parsedFrame['framesbetweenreferences'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   931
			$parsedFrame['bytesbetweenreferences']  = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 2, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   932
			$parsedFrame['msbetweenreferences']     = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 5, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   933
			$parsedFrame['bitsforbytesdeviation']   = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 8, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   934
			$parsedFrame['bitsformsdeviation']      = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], 9, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   935
			$parsedFrame['data'] = substr($parsedFrame['data'], 10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   936
			while ($frame_offset < strlen($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   937
				$deviationbitstream .= getid3_lib::BigEndian2Bin(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   938
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   939
			$reference_counter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   940
			while (strlen($deviationbitstream) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   941
				$parsedFrame[$reference_counter]['bytedeviation'] = bindec(substr($deviationbitstream, 0, $parsedFrame['bitsforbytesdeviation']));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   942
				$parsedFrame[$reference_counter]['msdeviation']   = bindec(substr($deviationbitstream, $parsedFrame['bitsforbytesdeviation'], $parsedFrame['bitsformsdeviation']));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   943
				$deviationbitstream = substr($deviationbitstream, $parsedFrame['bitsforbytesdeviation'] + $parsedFrame['bitsformsdeviation']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   944
				$reference_counter++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   945
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   946
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   947
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   948
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   949
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'SYTC')) || // 4.7   SYTC Synchronised tempo codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   950
				  (($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'STC'))) {  // 4.8   STC  Synchronised tempo codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   951
			//   There may only be one 'SYTC' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   952
			// <Header for 'Synchronised tempo codes', ID: 'SYTC'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   953
			// Time stamp format   $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   954
			// Tempo data          <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   955
			//   Where time stamp format is:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   956
			// $01  (32-bit value) MPEG frames from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   957
			// $02  (32-bit value) milliseconds from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   958
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   959
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   960
			$parsedFrame['timestampformat'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   961
			$timestamp_counter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   962
			while ($frame_offset < strlen($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   963
				$parsedFrame[$timestamp_counter]['tempo'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   964
				if ($parsedFrame[$timestamp_counter]['tempo'] == 255) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   965
					$parsedFrame[$timestamp_counter]['tempo'] += ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   966
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   967
				$parsedFrame[$timestamp_counter]['timestamp'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   968
				$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   969
				$timestamp_counter++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   970
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   971
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   972
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   973
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   974
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'USLT')) || // 4.8   USLT Unsynchronised lyric/text transcription
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   975
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'ULT'))) {     // 4.9   ULT  Unsynchronised lyric/text transcription
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   976
			//   There may be more than one 'Unsynchronised lyrics/text transcription' frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   977
			//   in each tag, but only one with the same language and content descriptor.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   978
			// <Header for 'Unsynchronised lyrics/text transcription', ID: 'USLT'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   979
			// Text encoding        $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   980
			// Language             $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   981
			// Content descriptor   <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   982
			// Lyrics/text          <full text string according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   983
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   984
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   985
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   986
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   987
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   988
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   989
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   990
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   991
			$frame_language = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   992
			$frame_offset += 3;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   993
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   994
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   995
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   996
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   997
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   998
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   999
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1000
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1001
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1002
			$parsedFrame['data'] = substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1003
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1004
			$parsedFrame['encodingid']   = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1005
			$parsedFrame['encoding']     = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1006
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1007
			$parsedFrame['language']     = $frame_language;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1008
			$parsedFrame['languagename'] = $this->LanguageLookup($frame_language, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1009
			$parsedFrame['description']  = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1010
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1011
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1012
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1013
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1014
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1015
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1016
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'SYLT')) || // 4.9   SYLT Synchronised lyric/text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1017
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'SLT'))) {     // 4.10  SLT  Synchronised lyric/text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1018
			//   There may be more than one 'SYLT' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1019
			//   but only one with the same language and content descriptor.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1020
			// <Header for 'Synchronised lyrics/text', ID: 'SYLT'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1021
			// Text encoding        $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1022
			// Language             $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1023
			// Time stamp format    $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1024
			//   $01  (32-bit value) MPEG frames from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1025
			//   $02  (32-bit value) milliseconds from beginning of file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1026
			// Content type         $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1027
			// Content descriptor   <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1028
			//   Terminated text to be synced (typically a syllable)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1029
			//   Sync identifier (terminator to above string)   $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1030
			//   Time stamp                                     $xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1031
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1032
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1033
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1034
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1035
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1036
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1037
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1038
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1039
			$frame_language = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1040
			$frame_offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1041
			$parsedFrame['timestampformat'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1042
			$parsedFrame['contenttypeid']   = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1043
			$parsedFrame['contenttype']     = $this->SYTLContentTypeLookup($parsedFrame['contenttypeid']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1044
			$parsedFrame['encodingid']      = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1045
			$parsedFrame['encoding']        = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1046
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1047
			$parsedFrame['language']        = $frame_language;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1048
			$parsedFrame['languagename']    = $this->LanguageLookup($frame_language, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1049
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1050
			$timestampindex = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1051
			$frame_remainingdata = substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1052
			while (strlen($frame_remainingdata)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1053
				$frame_offset = 0;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1054
				$frame_terminatorpos = strpos($frame_remainingdata, $frame_textencoding_terminator);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1055
				if ($frame_terminatorpos === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1056
					$frame_remainingdata = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1057
				} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1058
					if (ord(substr($frame_remainingdata, $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1059
						$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1060
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1061
					$parsedFrame['lyrics'][$timestampindex]['data'] = substr($frame_remainingdata, $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1062
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1063
					$frame_remainingdata = substr($frame_remainingdata, $frame_terminatorpos + strlen($frame_textencoding_terminator));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1064
					if (($timestampindex == 0) && (ord($frame_remainingdata{0}) != 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1065
						// timestamp probably omitted for first data item
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1066
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1067
						$parsedFrame['lyrics'][$timestampindex]['timestamp'] = getid3_lib::BigEndian2Int(substr($frame_remainingdata, 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1068
						$frame_remainingdata = substr($frame_remainingdata, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1069
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1070
					$timestampindex++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1071
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1072
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1073
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1074
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1075
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1076
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'COMM')) || // 4.10  COMM Comments
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1077
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'COM'))) {     // 4.11  COM  Comments
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1078
			//   There may be more than one comment frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1079
			//   but only one with the same language and content descriptor.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1080
			// <Header for 'Comment', ID: 'COMM'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1081
			// Text encoding          $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1082
			// Language               $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1083
			// Short content descrip. <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1084
			// The actual text        <full text string according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1085
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1086
			if (strlen($parsedFrame['data']) < 5) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1087
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1088
				$this->warning('Invalid data (too short) for "'.$parsedFrame['frame_name'].'" frame at offset '.$parsedFrame['dataoffset']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1089
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1090
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1091
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1092
				$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1093
				$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1094
				$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1095
				if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1096
					$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1097
					$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1098
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1099
				$frame_language = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1100
				$frame_offset += 3;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1101
				$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1102
				if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1103
					$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1104
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1105
				$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1106
				if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1107
					// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1108
					$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1109
				}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1110
				$frame_text = (string) substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1111
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1112
				$parsedFrame['encodingid']   = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1113
				$parsedFrame['encoding']     = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1114
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1115
				$parsedFrame['language']     = $frame_language;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1116
				$parsedFrame['languagename'] = $this->LanguageLookup($frame_language, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1117
				$parsedFrame['description']  = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1118
				$parsedFrame['data']         = $frame_text;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1119
				if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1120
					$commentkey = ($parsedFrame['description'] ? $parsedFrame['description'] : (!empty($info['id3v2']['comments'][$parsedFrame['framenameshort']]) ? count($info['id3v2']['comments'][$parsedFrame['framenameshort']]) : 0));
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1121
					if (!isset($info['id3v2']['comments'][$parsedFrame['framenameshort']]) || !array_key_exists($commentkey, $info['id3v2']['comments'][$parsedFrame['framenameshort']])) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1122
						$info['id3v2']['comments'][$parsedFrame['framenameshort']][$commentkey] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1123
					} else {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1124
						$info['id3v2']['comments'][$parsedFrame['framenameshort']][]            = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1125
					}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1126
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1127
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1128
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1129
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1130
		} elseif (($id3v2_majorversion >= 4) && ($parsedFrame['frame_name'] == 'RVA2')) { // 4.11  RVA2 Relative volume adjustment (2) (ID3v2.4+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1131
			//   There may be more than one 'RVA2' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1132
			//   but only one with the same identification string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1133
			// <Header for 'Relative volume adjustment (2)', ID: 'RVA2'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1134
			// Identification          <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1135
			//   The 'identification' string is used to identify the situation and/or
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1136
			//   device where this adjustment should apply. The following is then
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1137
			//   repeated for every channel:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1138
			// Type of channel         $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1139
			// Volume adjustment       $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1140
			// Bits representing peak  $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1141
			// Peak volume             $xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1142
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1143
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1144
			$frame_idstring = substr($parsedFrame['data'], 0, $frame_terminatorpos);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1145
			if (ord($frame_idstring) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1146
				$frame_idstring = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1147
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1148
			$frame_remainingdata = substr($parsedFrame['data'], $frame_terminatorpos + strlen("\x00"));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1149
			$parsedFrame['description'] = $frame_idstring;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1150
			$RVA2channelcounter = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1151
			while (strlen($frame_remainingdata) >= 5) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1152
				$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1153
				$frame_channeltypeid = ord(substr($frame_remainingdata, $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1154
				$parsedFrame[$RVA2channelcounter]['channeltypeid']  = $frame_channeltypeid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1155
				$parsedFrame[$RVA2channelcounter]['channeltype']    = $this->RVA2ChannelTypeLookup($frame_channeltypeid);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1156
				$parsedFrame[$RVA2channelcounter]['volumeadjust']   = getid3_lib::BigEndian2Int(substr($frame_remainingdata, $frame_offset, 2), false, true); // 16-bit signed
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1157
				$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1158
				$parsedFrame[$RVA2channelcounter]['bitspeakvolume'] = ord(substr($frame_remainingdata, $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1159
				if (($parsedFrame[$RVA2channelcounter]['bitspeakvolume'] < 1) || ($parsedFrame[$RVA2channelcounter]['bitspeakvolume'] > 4)) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1160
					$this->warning('ID3v2::RVA2 frame['.$RVA2channelcounter.'] contains invalid '.$parsedFrame[$RVA2channelcounter]['bitspeakvolume'].'-byte bits-representing-peak value');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1161
					break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1162
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1163
				$frame_bytespeakvolume = ceil($parsedFrame[$RVA2channelcounter]['bitspeakvolume'] / 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1164
				$parsedFrame[$RVA2channelcounter]['peakvolume']     = getid3_lib::BigEndian2Int(substr($frame_remainingdata, $frame_offset, $frame_bytespeakvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1165
				$frame_remainingdata = substr($frame_remainingdata, $frame_offset + $frame_bytespeakvolume);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1166
				$RVA2channelcounter++;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1167
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1168
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1169
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1170
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1171
		} elseif ((($id3v2_majorversion == 3) && ($parsedFrame['frame_name'] == 'RVAD')) || // 4.12  RVAD Relative volume adjustment (ID3v2.3 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1172
				  (($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'RVA'))) {  // 4.12  RVA  Relative volume adjustment (ID3v2.2 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1173
			//   There may only be one 'RVA' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1174
			// <Header for 'Relative volume adjustment', ID: 'RVA'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1175
			// ID3v2.2 => Increment/decrement     %000000ba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1176
			// ID3v2.3 => Increment/decrement     %00fedcba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1177
			// Bits used for volume descr.        $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1178
			// Relative volume change, right      $xx xx (xx ...) // a
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1179
			// Relative volume change, left       $xx xx (xx ...) // b
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1180
			// Peak volume right                  $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1181
			// Peak volume left                   $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1182
			//   ID3v2.3 only, optional (not present in ID3v2.2):
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1183
			// Relative volume change, right back $xx xx (xx ...) // c
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1184
			// Relative volume change, left back  $xx xx (xx ...) // d
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1185
			// Peak volume right back             $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1186
			// Peak volume left back              $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1187
			//   ID3v2.3 only, optional (not present in ID3v2.2):
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1188
			// Relative volume change, center     $xx xx (xx ...) // e
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1189
			// Peak volume center                 $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1190
			//   ID3v2.3 only, optional (not present in ID3v2.2):
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1191
			// Relative volume change, bass       $xx xx (xx ...) // f
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1192
			// Peak volume bass                   $xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1193
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1194
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1195
			$frame_incrdecrflags = getid3_lib::BigEndian2Bin(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1196
			$parsedFrame['incdec']['right'] = (bool) substr($frame_incrdecrflags, 6, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1197
			$parsedFrame['incdec']['left']  = (bool) substr($frame_incrdecrflags, 7, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1198
			$parsedFrame['bitsvolume'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1199
			$frame_bytesvolume = ceil($parsedFrame['bitsvolume'] / 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1200
			$parsedFrame['volumechange']['right'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1201
			if ($parsedFrame['incdec']['right'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1202
				$parsedFrame['volumechange']['right'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1203
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1204
			$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1205
			$parsedFrame['volumechange']['left'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1206
			if ($parsedFrame['incdec']['left'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1207
				$parsedFrame['volumechange']['left'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1208
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1209
			$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1210
			$parsedFrame['peakvolume']['right'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1211
			$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1212
			$parsedFrame['peakvolume']['left']  = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1213
			$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1214
			if ($id3v2_majorversion == 3) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1215
				$parsedFrame['data'] = substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1216
				if (strlen($parsedFrame['data']) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1217
					$parsedFrame['incdec']['rightrear'] = (bool) substr($frame_incrdecrflags, 4, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1218
					$parsedFrame['incdec']['leftrear']  = (bool) substr($frame_incrdecrflags, 5, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1219
					$parsedFrame['volumechange']['rightrear'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1220
					if ($parsedFrame['incdec']['rightrear'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1221
						$parsedFrame['volumechange']['rightrear'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1222
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1223
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1224
					$parsedFrame['volumechange']['leftrear'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1225
					if ($parsedFrame['incdec']['leftrear'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1226
						$parsedFrame['volumechange']['leftrear'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1227
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1228
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1229
					$parsedFrame['peakvolume']['rightrear'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1230
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1231
					$parsedFrame['peakvolume']['leftrear']  = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1232
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1233
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1234
				$parsedFrame['data'] = substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1235
				if (strlen($parsedFrame['data']) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1236
					$parsedFrame['incdec']['center'] = (bool) substr($frame_incrdecrflags, 3, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1237
					$parsedFrame['volumechange']['center'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1238
					if ($parsedFrame['incdec']['center'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1239
						$parsedFrame['volumechange']['center'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1240
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1241
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1242
					$parsedFrame['peakvolume']['center'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1243
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1244
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1245
				$parsedFrame['data'] = substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1246
				if (strlen($parsedFrame['data']) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1247
					$parsedFrame['incdec']['bass'] = (bool) substr($frame_incrdecrflags, 2, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1248
					$parsedFrame['volumechange']['bass'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1249
					if ($parsedFrame['incdec']['bass'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1250
						$parsedFrame['volumechange']['bass'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1251
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1252
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1253
					$parsedFrame['peakvolume']['bass'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesvolume));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1254
					$frame_offset += $frame_bytesvolume;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1255
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1256
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1257
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1258
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1259
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1260
		} elseif (($id3v2_majorversion >= 4) && ($parsedFrame['frame_name'] == 'EQU2')) { // 4.12  EQU2 Equalisation (2) (ID3v2.4+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1261
			//   There may be more than one 'EQU2' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1262
			//   but only one with the same identification string
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1263
			// <Header of 'Equalisation (2)', ID: 'EQU2'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1264
			// Interpolation method  $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1265
			//   $00  Band
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1266
			//   $01  Linear
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1267
			// Identification        <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1268
			//   The following is then repeated for every adjustment point
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1269
			// Frequency          $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1270
			// Volume adjustment  $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1271
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1272
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1273
			$frame_interpolationmethod = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1274
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1275
			$frame_idstring = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1276
			if (ord($frame_idstring) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1277
				$frame_idstring = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1278
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1279
			$parsedFrame['description'] = $frame_idstring;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1280
			$frame_remainingdata = substr($parsedFrame['data'], $frame_terminatorpos + strlen("\x00"));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1281
			while (strlen($frame_remainingdata)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1282
				$frame_frequency = getid3_lib::BigEndian2Int(substr($frame_remainingdata, 0, 2)) / 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1283
				$parsedFrame['data'][$frame_frequency] = getid3_lib::BigEndian2Int(substr($frame_remainingdata, 2, 2), false, true);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1284
				$frame_remainingdata = substr($frame_remainingdata, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1285
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1286
			$parsedFrame['interpolationmethod'] = $frame_interpolationmethod;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1287
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1288
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1289
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1290
		} elseif ((($id3v2_majorversion == 3) && ($parsedFrame['frame_name'] == 'EQUA')) || // 4.12  EQUA Equalisation (ID3v2.3 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1291
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'EQU'))) {     // 4.13  EQU  Equalisation (ID3v2.2 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1292
			//   There may only be one 'EQUA' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1293
			// <Header for 'Relative volume adjustment', ID: 'EQU'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1294
			// Adjustment bits    $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1295
			//   This is followed by 2 bytes + ('adjustment bits' rounded up to the
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1296
			//   nearest byte) for every equalisation band in the following format,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1297
			//   giving a frequency range of 0 - 32767Hz:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1298
			// Increment/decrement   %x (MSB of the Frequency)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1299
			// Frequency             (lower 15 bits)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1300
			// Adjustment            $xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1301
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1302
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1303
			$parsedFrame['adjustmentbits'] = substr($parsedFrame['data'], $frame_offset++, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1304
			$frame_adjustmentbytes = ceil($parsedFrame['adjustmentbits'] / 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1305
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1306
			$frame_remainingdata = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1307
			while (strlen($frame_remainingdata) > 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1308
				$frame_frequencystr = getid3_lib::BigEndian2Bin(substr($frame_remainingdata, 0, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1309
				$frame_incdec    = (bool) substr($frame_frequencystr, 0, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1310
				$frame_frequency = bindec(substr($frame_frequencystr, 1, 15));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1311
				$parsedFrame[$frame_frequency]['incdec'] = $frame_incdec;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1312
				$parsedFrame[$frame_frequency]['adjustment'] = getid3_lib::BigEndian2Int(substr($frame_remainingdata, 2, $frame_adjustmentbytes));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1313
				if ($parsedFrame[$frame_frequency]['incdec'] === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1314
					$parsedFrame[$frame_frequency]['adjustment'] *= -1;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1315
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1316
				$frame_remainingdata = substr($frame_remainingdata, 2 + $frame_adjustmentbytes);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1317
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1318
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1319
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1320
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1321
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'RVRB')) || // 4.13  RVRB Reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1322
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'REV'))) {     // 4.14  REV  Reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1323
			//   There may only be one 'RVRB' frame in each tag.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1324
			// <Header for 'Reverb', ID: 'RVRB'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1325
			// Reverb left (ms)                 $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1326
			// Reverb right (ms)                $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1327
			// Reverb bounces, left             $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1328
			// Reverb bounces, right            $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1329
			// Reverb feedback, left to left    $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1330
			// Reverb feedback, left to right   $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1331
			// Reverb feedback, right to right  $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1332
			// Reverb feedback, right to left   $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1333
			// Premix left to right             $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1334
			// Premix right to left             $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1335
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1336
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1337
			$parsedFrame['left']  = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1338
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1339
			$parsedFrame['right'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1340
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1341
			$parsedFrame['bouncesL']      = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1342
			$parsedFrame['bouncesR']      = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1343
			$parsedFrame['feedbackLL']    = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1344
			$parsedFrame['feedbackLR']    = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1345
			$parsedFrame['feedbackRR']    = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1346
			$parsedFrame['feedbackRL']    = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1347
			$parsedFrame['premixLR']      = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1348
			$parsedFrame['premixRL']      = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1349
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1350
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1351
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1352
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'APIC')) || // 4.14  APIC Attached picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1353
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'PIC'))) {     // 4.15  PIC  Attached picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1354
			//   There may be several pictures attached to one file,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1355
			//   each in their individual 'APIC' frame, but only one
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1356
			//   with the same content descriptor
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1357
			// <Header for 'Attached picture', ID: 'APIC'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1358
			// Text encoding      $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1359
			// ID3v2.3+ => MIME type          <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1360
			// ID3v2.2  => Image format       $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1361
			// Picture type       $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1362
			// Description        <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1363
			// Picture data       <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1364
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1365
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1366
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1367
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1368
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1369
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1370
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1371
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1372
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1373
			if ($id3v2_majorversion == 2 && strlen($parsedFrame['data']) > $frame_offset) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1374
				$frame_imagetype = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1375
				if (strtolower($frame_imagetype) == 'ima') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1376
					// complete hack for mp3Rage (www.chaoticsoftware.com) that puts ID3v2.3-formatted
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1377
					// MIME type instead of 3-char ID3v2.2-format image type  (thanks xbhoffØpacbell*net)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1378
					$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1379
					$frame_mimetype = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1380
					if (ord($frame_mimetype) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1381
						$frame_mimetype = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1382
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1383
					$frame_imagetype = strtoupper(str_replace('image/', '', strtolower($frame_mimetype)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1384
					if ($frame_imagetype == 'JPEG') {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1385
						$frame_imagetype = 'JPG';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1386
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1387
					$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1388
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1389
					$frame_offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1390
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1391
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1392
			if ($id3v2_majorversion > 2 && strlen($parsedFrame['data']) > $frame_offset) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1393
				$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1394
				$frame_mimetype = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1395
				if (ord($frame_mimetype) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1396
					$frame_mimetype = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1397
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1398
				$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1399
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1400
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1401
			$frame_picturetype = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1402
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1403
			if ($frame_offset >= $parsedFrame['datalength']) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1404
				$this->warning('data portion of APIC frame is missing at offset '.($parsedFrame['dataoffset'] + 8 + $frame_offset));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1405
			} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1406
				$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1407
				if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1408
					$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1409
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1410
				$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1411
				if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1412
					// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1413
					$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1414
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1415
				$parsedFrame['encodingid']       = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1416
				$parsedFrame['encoding']         = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1417
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1418
				if ($id3v2_majorversion == 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1419
					$parsedFrame['imagetype']    = $frame_imagetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1420
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1421
					$parsedFrame['mime']         = $frame_mimetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1422
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1423
				$parsedFrame['picturetypeid']    = $frame_picturetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1424
				$parsedFrame['picturetype']      = $this->APICPictureTypeLookup($frame_picturetype);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1425
				$parsedFrame['description']      = $frame_description;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1426
				$parsedFrame['data']             = substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1427
				$parsedFrame['datalength']       = strlen($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1428
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1429
				$parsedFrame['image_mime'] = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1430
				$imageinfo = array();
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1431
				if ($imagechunkcheck = getid3_lib::GetDataImageSize($parsedFrame['data'], $imageinfo)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1432
					if (($imagechunkcheck[2] >= 1) && ($imagechunkcheck[2] <= 3)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1433
						$parsedFrame['image_mime']       = 'image/'.getid3_lib::ImageTypesLookup($imagechunkcheck[2]);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1434
						if ($imagechunkcheck[0]) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1435
							$parsedFrame['image_width']  = $imagechunkcheck[0];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1436
						}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1437
						if ($imagechunkcheck[1]) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1438
							$parsedFrame['image_height'] = $imagechunkcheck[1];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1439
						}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1440
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1441
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1442
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1443
				do {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1444
					if ($this->getid3->option_save_attachments === false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1445
						// skip entirely
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1446
						unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1447
						break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1448
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1449
					if ($this->getid3->option_save_attachments === true) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1450
						// great
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1451
/*
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1452
					} elseif (is_int($this->getid3->option_save_attachments)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1453
						if ($this->getid3->option_save_attachments < $parsedFrame['data_length']) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1454
							// too big, skip
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1455
							$this->warning('attachment at '.$frame_offset.' is too large to process inline ('.number_format($parsedFrame['data_length']).' bytes)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1456
							unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1457
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1458
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1459
*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1460
					} elseif (is_string($this->getid3->option_save_attachments)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1461
						$dir = rtrim(str_replace(array('/', '\\'), DIRECTORY_SEPARATOR, $this->getid3->option_save_attachments), DIRECTORY_SEPARATOR);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1462
						if (!is_dir($dir) || !getID3::is_writable($dir)) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1463
							// cannot write, skip
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1464
							$this->warning('attachment at '.$frame_offset.' cannot be saved to "'.$dir.'" (not writable)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1465
							unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1466
							break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1467
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1468
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1469
					// if we get this far, must be OK
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1470
					if (is_string($this->getid3->option_save_attachments)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1471
						$destination_filename = $dir.DIRECTORY_SEPARATOR.md5($info['filenamepath']).'_'.$frame_offset;
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1472
						if (!file_exists($destination_filename) || getID3::is_writable($destination_filename)) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1473
							file_put_contents($destination_filename, $parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1474
						} else {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1475
							$this->warning('attachment at '.$frame_offset.' cannot be saved to "'.$destination_filename.'" (not writable)');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1476
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1477
						$parsedFrame['data_filename'] = $destination_filename;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1478
						unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1479
					} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1480
						if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1481
							if (!isset($info['id3v2']['comments']['picture'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1482
								$info['id3v2']['comments']['picture'] = array();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1483
							}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1484
							$comments_picture_data = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1485
							foreach (array('data', 'image_mime', 'image_width', 'image_height', 'imagetype', 'picturetype', 'description', 'datalength') as $picture_key) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1486
								if (isset($parsedFrame[$picture_key])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1487
									$comments_picture_data[$picture_key] = $parsedFrame[$picture_key];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1488
								}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1489
							}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1490
							$info['id3v2']['comments']['picture'][] = $comments_picture_data;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1491
							unset($comments_picture_data);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1492
						}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1493
					}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1494
				} while (false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1495
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1496
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1497
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'GEOB')) || // 4.15  GEOB General encapsulated object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1498
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'GEO'))) {     // 4.16  GEO  General encapsulated object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1499
			//   There may be more than one 'GEOB' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1500
			//   but only one with the same content descriptor
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1501
			// <Header for 'General encapsulated object', ID: 'GEOB'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1502
			// Text encoding          $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1503
			// MIME type              <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1504
			// Filename               <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1505
			// Content description    <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1506
			// Encapsulated object    <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1507
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1508
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1509
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1510
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1511
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1512
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1513
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1514
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1515
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1516
			$frame_mimetype = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1517
			if (ord($frame_mimetype) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1518
				$frame_mimetype = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1519
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1520
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1521
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1522
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1523
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1524
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1525
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1526
			$frame_filename = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1527
			if (ord($frame_filename) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1528
				$frame_filename = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1529
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1530
			$frame_offset = $frame_terminatorpos + strlen($frame_textencoding_terminator);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1531
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1532
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1533
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1534
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1535
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1536
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1537
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1538
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1539
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1540
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1541
			$frame_offset = $frame_terminatorpos + strlen($frame_textencoding_terminator);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1542
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1543
			$parsedFrame['objectdata']  = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1544
			$parsedFrame['encodingid']  = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1545
			$parsedFrame['encoding']    = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1546
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1547
			$parsedFrame['mime']        = $frame_mimetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1548
			$parsedFrame['filename']    = $frame_filename;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1549
			$parsedFrame['description'] = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1550
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1551
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1552
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1553
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'PCNT')) || // 4.16  PCNT Play counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1554
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'CNT'))) {     // 4.17  CNT  Play counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1555
			//   There may only be one 'PCNT' frame in each tag.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1556
			//   When the counter reaches all one's, one byte is inserted in
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1557
			//   front of the counter thus making the counter eight bits bigger
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1558
			// <Header for 'Play counter', ID: 'PCNT'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1559
			// Counter        $xx xx xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1560
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1561
			$parsedFrame['data']          = getid3_lib::BigEndian2Int($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1562
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1563
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1564
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'POPM')) || // 4.17  POPM Popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1565
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'POP'))) {    // 4.18  POP  Popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1566
			//   There may be more than one 'POPM' frame in each tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1567
			//   but only one with the same email address
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1568
			// <Header for 'Popularimeter', ID: 'POPM'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1569
			// Email to user   <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1570
			// Rating          $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1571
			// Counter         $xx xx xx xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1572
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1573
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1574
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1575
			$frame_emailaddress = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1576
			if (ord($frame_emailaddress) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1577
				$frame_emailaddress = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1578
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1579
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1580
			$frame_rating = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1581
			$parsedFrame['counter'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1582
			$parsedFrame['email']   = $frame_emailaddress;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1583
			$parsedFrame['rating']  = $frame_rating;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1584
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1585
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1586
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1587
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'RBUF')) || // 4.18  RBUF Recommended buffer size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1588
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'BUF'))) {     // 4.19  BUF  Recommended buffer size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1589
			//   There may only be one 'RBUF' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1590
			// <Header for 'Recommended buffer size', ID: 'RBUF'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1591
			// Buffer size               $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1592
			// Embedded info flag        %0000000x
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1593
			// Offset to next tag        $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1594
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1595
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1596
			$parsedFrame['buffersize'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1597
			$frame_offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1598
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1599
			$frame_embeddedinfoflags = getid3_lib::BigEndian2Bin(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1600
			$parsedFrame['flags']['embededinfo'] = (bool) substr($frame_embeddedinfoflags, 7, 1);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1601
			$parsedFrame['nexttagoffset'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1602
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1603
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1604
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1605
		} elseif (($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'CRM')) { // 4.20  Encrypted meta frame (ID3v2.2 only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1606
			//   There may be more than one 'CRM' frame in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1607
			//   but only one with the same 'owner identifier'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1608
			// <Header for 'Encrypted meta frame', ID: 'CRM'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1609
			// Owner identifier      <textstring> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1610
			// Content/explanation   <textstring> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1611
			// Encrypted datablock   <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1612
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1613
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1614
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1615
			$frame_ownerid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1616
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1617
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1618
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1619
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1620
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1621
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1622
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1623
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1624
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1625
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1626
			$parsedFrame['ownerid']     = $frame_ownerid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1627
			$parsedFrame['data']        = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1628
			$parsedFrame['description'] = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1629
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1630
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1631
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1632
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'AENC')) || // 4.19  AENC Audio encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1633
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'CRA'))) {     // 4.21  CRA  Audio encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1634
			//   There may be more than one 'AENC' frames in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1635
			//   but only one with the same 'Owner identifier'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1636
			// <Header for 'Audio encryption', ID: 'AENC'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1637
			// Owner identifier   <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1638
			// Preview start      $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1639
			// Preview length     $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1640
			// Encryption info    <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1641
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1642
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1643
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1644
			$frame_ownerid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1645
			if (ord($frame_ownerid) === 0) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1646
				$frame_ownerid = '';
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1647
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1648
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1649
			$parsedFrame['ownerid'] = $frame_ownerid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1650
			$parsedFrame['previewstart'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1651
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1652
			$parsedFrame['previewlength'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1653
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1654
			$parsedFrame['encryptioninfo'] = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1655
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1656
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1657
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1658
		} elseif ((($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'LINK')) || // 4.20  LINK Linked information
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1659
				(($id3v2_majorversion == 2) && ($parsedFrame['frame_name'] == 'LNK'))) {    // 4.22  LNK  Linked information
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1660
			//   There may be more than one 'LINK' frame in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1661
			//   but only one with the same contents
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1662
			// <Header for 'Linked information', ID: 'LINK'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1663
			// ID3v2.3+ => Frame identifier   $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1664
			// ID3v2.2  => Frame identifier   $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1665
			// URL                            <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1666
			// ID and additional data         <text string(s)>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1667
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1668
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1669
			if ($id3v2_majorversion == 2) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1670
				$parsedFrame['frameid'] = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1671
				$frame_offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1672
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1673
				$parsedFrame['frameid'] = substr($parsedFrame['data'], $frame_offset, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1674
				$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1675
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1676
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1677
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1678
			$frame_url = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1679
			if (ord($frame_url) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1680
				$frame_url = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1681
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1682
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1683
			$parsedFrame['url'] = $frame_url;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1684
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1685
			$parsedFrame['additionaldata'] = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1686
			if (!empty($parsedFrame['framenameshort']) && $parsedFrame['url']) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1687
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = getid3_lib::iconv_fallback_iso88591_utf8($parsedFrame['url']);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1688
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1689
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1690
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1691
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1692
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'POSS')) { // 4.21  POSS Position synchronisation frame (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1693
			//   There may only be one 'POSS' frame in each tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1694
			// <Head for 'Position synchronisation', ID: 'POSS'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1695
			// Time stamp format         $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1696
			// Position                  $xx (xx ...)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1697
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1698
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1699
			$parsedFrame['timestampformat'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1700
			$parsedFrame['position']        = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1701
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1702
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1703
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1704
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'USER')) { // 4.22  USER Terms of use (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1705
			//   There may be more than one 'Terms of use' frame in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1706
			//   but only one with the same 'Language'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1707
			// <Header for 'Terms of use frame', ID: 'USER'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1708
			// Text encoding        $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1709
			// Language             $xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1710
			// The actual text      <text string according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1711
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1712
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1713
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1714
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1715
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1716
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1717
			$frame_language = substr($parsedFrame['data'], $frame_offset, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1718
			$frame_offset += 3;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1719
			$parsedFrame['language']     = $frame_language;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1720
			$parsedFrame['languagename'] = $this->LanguageLookup($frame_language, false);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1721
			$parsedFrame['encodingid']   = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1722
			$parsedFrame['encoding']     = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1723
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1724
			$parsedFrame['data']         = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1725
			if (!empty($parsedFrame['framenameshort']) && !empty($parsedFrame['data'])) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1726
				$info['id3v2']['comments'][$parsedFrame['framenameshort']][] = getid3_lib::iconv_fallback($parsedFrame['encoding'], $info['id3v2']['encoding'], $parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1727
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1728
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1729
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1730
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1731
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'OWNE')) { // 4.23  OWNE Ownership frame (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1732
			//   There may only be one 'OWNE' frame in a tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1733
			// <Header for 'Ownership frame', ID: 'OWNE'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1734
			// Text encoding     $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1735
			// Price paid        <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1736
			// Date of purch.    <text string>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1737
			// Seller            <text string according to encoding>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1738
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1739
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1740
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1741
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1742
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1743
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1744
			$parsedFrame['encodingid'] = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1745
			$parsedFrame['encoding']   = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1746
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1747
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1748
			$frame_pricepaid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1749
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1750
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1751
			$parsedFrame['pricepaid']['currencyid'] = substr($frame_pricepaid, 0, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1752
			$parsedFrame['pricepaid']['currency']   = $this->LookupCurrencyUnits($parsedFrame['pricepaid']['currencyid']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1753
			$parsedFrame['pricepaid']['value']      = substr($frame_pricepaid, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1754
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1755
			$parsedFrame['purchasedate'] = substr($parsedFrame['data'], $frame_offset, 8);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1756
			if ($this->IsValidDateStampString($parsedFrame['purchasedate'])) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1757
				$parsedFrame['purchasedateunix'] = mktime (0, 0, 0, substr($parsedFrame['purchasedate'], 4, 2), substr($parsedFrame['purchasedate'], 6, 2), substr($parsedFrame['purchasedate'], 0, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1758
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1759
			$frame_offset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1760
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1761
			$parsedFrame['seller'] = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1762
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1763
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1764
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1765
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'COMR')) { // 4.24  COMR Commercial frame (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1766
			//   There may be more than one 'commercial frame' in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1767
			//   but no two may be identical
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1768
			// <Header for 'Commercial frame', ID: 'COMR'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1769
			// Text encoding      $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1770
			// Price string       <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1771
			// Valid until        <text string>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1772
			// Contact URL        <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1773
			// Received as        $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1774
			// Name of seller     <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1775
			// Description        <text string according to encoding> $00 (00)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1776
			// Picture MIME type  <string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1777
			// Seller logo        <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1778
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1779
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1780
			$frame_textencoding = ord(substr($parsedFrame['data'], $frame_offset++, 1));
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1781
			$frame_textencoding_terminator = $this->TextEncodingTerminatorLookup($frame_textencoding);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1782
			if ((($id3v2_majorversion <= 3) && ($frame_textencoding > 1)) || (($id3v2_majorversion == 4) && ($frame_textencoding > 3))) {
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1783
				$this->warning('Invalid text encoding byte ('.$frame_textencoding.') in frame "'.$parsedFrame['frame_name'].'" - defaulting to ISO-8859-1 encoding');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1784
				$frame_textencoding_terminator = "\x00";
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1785
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1786
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1787
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1788
			$frame_pricestring = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1789
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1790
			$frame_rawpricearray = explode('/', $frame_pricestring);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1791
			foreach ($frame_rawpricearray as $key => $val) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1792
				$frame_currencyid = substr($val, 0, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1793
				$parsedFrame['price'][$frame_currencyid]['currency'] = $this->LookupCurrencyUnits($frame_currencyid);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1794
				$parsedFrame['price'][$frame_currencyid]['value']    = substr($val, 3);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1795
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1796
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1797
			$frame_datestring = substr($parsedFrame['data'], $frame_offset, 8);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1798
			$frame_offset += 8;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1799
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1800
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1801
			$frame_contacturl = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1802
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1803
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1804
			$frame_receivedasid = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1805
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1806
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1807
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1808
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1809
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1810
			$frame_sellername = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1811
			if (ord($frame_sellername) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1812
				$frame_sellername = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1813
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1814
			$frame_offset = $frame_terminatorpos + strlen($frame_textencoding_terminator);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1815
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1816
			$frame_terminatorpos = strpos($parsedFrame['data'], $frame_textencoding_terminator, $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1817
			if (ord(substr($parsedFrame['data'], $frame_terminatorpos + strlen($frame_textencoding_terminator), 1)) === 0) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1818
				$frame_terminatorpos++; // strpos() fooled because 2nd byte of Unicode chars are often 0x00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1819
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1820
			$frame_description = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1821
			if (in_array($frame_description, array("\x00", "\x00\x00", "\xFF\xFE", "\xFE\xFF"))) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1822
				// if description only contains a BOM or terminator then make it blank
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1823
				$frame_description = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1824
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1825
			$frame_offset = $frame_terminatorpos + strlen($frame_textencoding_terminator);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1826
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1827
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1828
			$frame_mimetype = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1829
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1830
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1831
			$frame_sellerlogo = substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1832
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1833
			$parsedFrame['encodingid']        = $frame_textencoding;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1834
			$parsedFrame['encoding']          = $this->TextEncodingNameLookup($frame_textencoding);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1835
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1836
			$parsedFrame['pricevaliduntil']   = $frame_datestring;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1837
			$parsedFrame['contacturl']        = $frame_contacturl;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1838
			$parsedFrame['receivedasid']      = $frame_receivedasid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1839
			$parsedFrame['receivedas']        = $this->COMRReceivedAsLookup($frame_receivedasid);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1840
			$parsedFrame['sellername']        = $frame_sellername;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1841
			$parsedFrame['description']       = $frame_description;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1842
			$parsedFrame['mime']              = $frame_mimetype;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1843
			$parsedFrame['logo']              = $frame_sellerlogo;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1844
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1845
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1846
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1847
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'ENCR')) { // 4.25  ENCR Encryption method registration (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1848
			//   There may be several 'ENCR' frames in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1849
			//   but only one containing the same symbol
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1850
			//   and only one containing the same owner identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1851
			// <Header for 'Encryption method registration', ID: 'ENCR'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1852
			// Owner identifier    <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1853
			// Method symbol       $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1854
			// Encryption data     <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1855
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1856
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1857
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1858
			$frame_ownerid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1859
			if (ord($frame_ownerid) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1860
				$frame_ownerid = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1861
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1862
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1863
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1864
			$parsedFrame['ownerid']      = $frame_ownerid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1865
			$parsedFrame['methodsymbol'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1866
			$parsedFrame['data']         = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1867
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1868
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1869
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'GRID')) { // 4.26  GRID Group identification registration (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1870
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1871
			//   There may be several 'GRID' frames in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1872
			//   but only one containing the same symbol
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1873
			//   and only one containing the same owner identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1874
			// <Header for 'Group ID registration', ID: 'GRID'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1875
			// Owner identifier      <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1876
			// Group symbol          $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1877
			// Group dependent data  <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1878
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1879
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1880
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1881
			$frame_ownerid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1882
			if (ord($frame_ownerid) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1883
				$frame_ownerid = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1884
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1885
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1886
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1887
			$parsedFrame['ownerid']       = $frame_ownerid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1888
			$parsedFrame['groupsymbol']   = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1889
			$parsedFrame['data']          = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1890
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1891
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1892
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'PRIV')) { // 4.27  PRIV Private frame (ID3v2.3+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1893
			//   The tag may contain more than one 'PRIV' frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1894
			//   but only with different contents
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1895
			// <Header for 'Private frame', ID: 'PRIV'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1896
			// Owner identifier      <text string> $00
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1897
			// The private data      <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1898
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1899
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1900
			$frame_terminatorpos = strpos($parsedFrame['data'], "\x00", $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1901
			$frame_ownerid = substr($parsedFrame['data'], $frame_offset, $frame_terminatorpos - $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1902
			if (ord($frame_ownerid) === 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1903
				$frame_ownerid = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1904
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1905
			$frame_offset = $frame_terminatorpos + strlen("\x00");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1906
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1907
			$parsedFrame['ownerid'] = $frame_ownerid;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1908
			$parsedFrame['data']    = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1909
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1910
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1911
		} elseif (($id3v2_majorversion >= 4) && ($parsedFrame['frame_name'] == 'SIGN')) { // 4.28  SIGN Signature frame (ID3v2.4+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1912
			//   There may be more than one 'signature frame' in a tag,
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1913
			//   but no two may be identical
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1914
			// <Header for 'Signature frame', ID: 'SIGN'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1915
			// Group symbol      $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1916
			// Signature         <binary data>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1917
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1918
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1919
			$parsedFrame['groupsymbol'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1920
			$parsedFrame['data']        = (string) substr($parsedFrame['data'], $frame_offset);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1921
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1922
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1923
		} elseif (($id3v2_majorversion >= 4) && ($parsedFrame['frame_name'] == 'SEEK')) { // 4.29  SEEK Seek frame (ID3v2.4+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1924
			//   There may only be one 'seek frame' in a tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1925
			// <Header for 'Seek frame', ID: 'SEEK'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1926
			// Minimum offset to next tag       $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1927
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1928
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1929
			$parsedFrame['data']          = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1930
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1931
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1932
		} elseif (($id3v2_majorversion >= 4) && ($parsedFrame['frame_name'] == 'ASPI')) { // 4.30  ASPI Audio seek point index (ID3v2.4+ only)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1933
			//   There may only be one 'audio seek point index' frame in a tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1934
			// <Header for 'Seek Point Index', ID: 'ASPI'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1935
			// Indexed data start (S)         $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1936
			// Indexed data length (L)        $xx xx xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1937
			// Number of index points (N)     $xx xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1938
			// Bits per index point (b)       $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1939
			//   Then for every index point the following data is included:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1940
			// Fraction at index (Fi)          $xx (xx)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1941
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1942
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1943
			$parsedFrame['datastart'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1944
			$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1945
			$parsedFrame['indexeddatalength'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1946
			$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1947
			$parsedFrame['indexpoints'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1948
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1949
			$parsedFrame['bitsperpoint'] = ord(substr($parsedFrame['data'], $frame_offset++, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1950
			$frame_bytesperpoint = ceil($parsedFrame['bitsperpoint'] / 8);
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
  1951
			for ($i = 0; $i < $parsedFrame['indexpoints']; $i++) {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1952
				$parsedFrame['indexes'][$i] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, $frame_bytesperpoint));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1953
				$frame_offset += $frame_bytesperpoint;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1954
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1955
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1956
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1957
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'RGAD')) { // Replay Gain Adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1958
			// http://privatewww.essex.ac.uk/~djmrob/replaygain/file_format_id3v2.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1959
			//   There may only be one 'RGAD' frame in a tag
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1960
			// <Header for 'Replay Gain Adjustment', ID: 'RGAD'>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1961
			// Peak Amplitude                      $xx $xx $xx $xx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1962
			// Radio Replay Gain Adjustment        %aaabbbcd %dddddddd
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1963
			// Audiophile Replay Gain Adjustment   %aaabbbcd %dddddddd
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1964
			//   a - name code
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1965
			//   b - originator code
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1966
			//   c - sign bit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1967
			//   d - replay gain adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1968
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1969
			$frame_offset = 0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1970
			$parsedFrame['peakamplitude'] = getid3_lib::BigEndian2Float(substr($parsedFrame['data'], $frame_offset, 4));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1971
			$frame_offset += 4;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1972
			$rg_track_adjustment = getid3_lib::Dec2Bin(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1973
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1974
			$rg_album_adjustment = getid3_lib::Dec2Bin(substr($parsedFrame['data'], $frame_offset, 2));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1975
			$frame_offset += 2;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1976
			$parsedFrame['raw']['track']['name']       = getid3_lib::Bin2Dec(substr($rg_track_adjustment, 0, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1977
			$parsedFrame['raw']['track']['originator'] = getid3_lib::Bin2Dec(substr($rg_track_adjustment, 3, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1978
			$parsedFrame['raw']['track']['signbit']    = getid3_lib::Bin2Dec(substr($rg_track_adjustment, 6, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1979
			$parsedFrame['raw']['track']['adjustment'] = getid3_lib::Bin2Dec(substr($rg_track_adjustment, 7, 9));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1980
			$parsedFrame['raw']['album']['name']       = getid3_lib::Bin2Dec(substr($rg_album_adjustment, 0, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1981
			$parsedFrame['raw']['album']['originator'] = getid3_lib::Bin2Dec(substr($rg_album_adjustment, 3, 3));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1982
			$parsedFrame['raw']['album']['signbit']    = getid3_lib::Bin2Dec(substr($rg_album_adjustment, 6, 1));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1983
			$parsedFrame['raw']['album']['adjustment'] = getid3_lib::Bin2Dec(substr($rg_album_adjustment, 7, 9));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1984
			$parsedFrame['track']['name']       = getid3_lib::RGADnameLookup($parsedFrame['raw']['track']['name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1985
			$parsedFrame['track']['originator'] = getid3_lib::RGADoriginatorLookup($parsedFrame['raw']['track']['originator']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1986
			$parsedFrame['track']['adjustment'] = getid3_lib::RGADadjustmentLookup($parsedFrame['raw']['track']['adjustment'], $parsedFrame['raw']['track']['signbit']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1987
			$parsedFrame['album']['name']       = getid3_lib::RGADnameLookup($parsedFrame['raw']['album']['name']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1988
			$parsedFrame['album']['originator'] = getid3_lib::RGADoriginatorLookup($parsedFrame['raw']['album']['originator']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1989
			$parsedFrame['album']['adjustment'] = getid3_lib::RGADadjustmentLookup($parsedFrame['raw']['album']['adjustment'], $parsedFrame['raw']['album']['signbit']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1990
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1991
			$info['replay_gain']['track']['peak']       = $parsedFrame['peakamplitude'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1992
			$info['replay_gain']['track']['originator'] = $parsedFrame['track']['originator'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1993
			$info['replay_gain']['track']['adjustment'] = $parsedFrame['track']['adjustment'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1994
			$info['replay_gain']['album']['originator'] = $parsedFrame['album']['originator'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1995
			$info['replay_gain']['album']['adjustment'] = $parsedFrame['album']['adjustment'];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1996
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1997
			unset($parsedFrame['data']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  1998
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  1999
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'CHAP')) { // CHAP Chapters frame (ID3v2.3+ only)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2000
			// http://id3.org/id3v2-chapters-1.0
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2001
			// <ID3v2.3 or ID3v2.4 frame header, ID: "CHAP">           (10 bytes)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2002
			// Element ID      <text string> $00
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2003
			// Start time      $xx xx xx xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2004
			// End time        $xx xx xx xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2005
            // Start offset    $xx xx xx xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2006
            // End offset      $xx xx xx xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2007
            // <Optional embedded sub-frames>
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2008
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2009
			$frame_offset = 0;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2010
			@list($parsedFrame['element_id']) = explode("\x00", $parsedFrame['data'], 2);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2011
			$frame_offset += strlen($parsedFrame['element_id']."\x00");
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2012
			$parsedFrame['time_begin'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2013
			$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2014
			$parsedFrame['time_end']   = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2015
			$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2016
			if (substr($parsedFrame['data'], $frame_offset, 4) != "\xFF\xFF\xFF\xFF") {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2017
				// "If these bytes are all set to 0xFF then the value should be ignored and the start time value should be utilized."
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2018
				$parsedFrame['offset_begin'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2019
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2020
			$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2021
			if (substr($parsedFrame['data'], $frame_offset, 4) != "\xFF\xFF\xFF\xFF") {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2022
				// "If these bytes are all set to 0xFF then the value should be ignored and the start time value should be utilized."
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2023
				$parsedFrame['offset_end']   = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2024
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2025
			$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2026
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2027
			if ($frame_offset < strlen($parsedFrame['data'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2028
				$parsedFrame['subframes'] = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2029
				while ($frame_offset < strlen($parsedFrame['data'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2030
					// <Optional embedded sub-frames>
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2031
					$subframe = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2032
					$subframe['name']      =                           substr($parsedFrame['data'], $frame_offset, 4);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2033
					$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2034
					$subframe['size']      = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2035
					$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2036
					$subframe['flags_raw'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2037
					$frame_offset += 2;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2038
					if ($subframe['size'] > (strlen($parsedFrame['data']) - $frame_offset)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2039
						$this->warning('CHAP subframe "'.$subframe['name'].'" at frame offset '.$frame_offset.' claims to be "'.$subframe['size'].'" bytes, which is more than the available data ('.(strlen($parsedFrame['data']) - $frame_offset).' bytes)');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2040
						break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2041
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2042
					$subframe_rawdata = substr($parsedFrame['data'], $frame_offset, $subframe['size']);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2043
					$frame_offset += $subframe['size'];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2044
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2045
					$subframe['encodingid'] = ord(substr($subframe_rawdata, 0, 1));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2046
					$subframe['text']       =     substr($subframe_rawdata, 1);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2047
					$subframe['encoding']   = $this->TextEncodingNameLookup($subframe['encodingid']);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2048
					$encoding_converted_text = trim(getid3_lib::iconv_fallback($subframe['encoding'], $info['encoding'], $subframe['text']));;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2049
					switch (substr($encoding_converted_text, 0, 2)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2050
						case "\xFF\xFE":
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2051
						case "\xFE\xFF":
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2052
							switch (strtoupper($info['id3v2']['encoding'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2053
								case 'ISO-8859-1':
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2054
								case 'UTF-8':
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2055
									$encoding_converted_text = substr($encoding_converted_text, 2);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2056
									// remove unwanted byte-order-marks
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2057
									break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2058
								default:
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2059
									// ignore
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2060
									break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2061
							}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2062
							break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2063
						default:
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2064
							// do not remove BOM
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2065
							break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2066
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2067
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2068
					if (($subframe['name'] == 'TIT2') || ($subframe['name'] == 'TIT3')) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2069
						if ($subframe['name'] == 'TIT2') {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2070
							$parsedFrame['chapter_name']        = $encoding_converted_text;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2071
						} elseif ($subframe['name'] == 'TIT3') {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2072
							$parsedFrame['chapter_description'] = $encoding_converted_text;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2073
						}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2074
						$parsedFrame['subframes'][] = $subframe;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2075
					} else {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2076
						$this->warning('ID3v2.CHAP subframe "'.$subframe['name'].'" not handled (only TIT2 and TIT3)');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2077
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2078
				}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2079
				unset($subframe_rawdata, $subframe, $encoding_converted_text);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2080
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2081
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2082
			$id3v2_chapter_entry = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2083
			foreach (array('id', 'time_begin', 'time_end', 'offset_begin', 'offset_end', 'chapter_name', 'chapter_description') as $id3v2_chapter_key) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2084
				if (isset($parsedFrame[$id3v2_chapter_key])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2085
					$id3v2_chapter_entry[$id3v2_chapter_key] = $parsedFrame[$id3v2_chapter_key];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2086
				}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2087
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2088
			if (!isset($info['id3v2']['chapters'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2089
				$info['id3v2']['chapters'] = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2090
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2091
			$info['id3v2']['chapters'][] = $id3v2_chapter_entry;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2092
			unset($id3v2_chapter_entry, $id3v2_chapter_key);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2093
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2094
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2095
		} elseif (($id3v2_majorversion >= 3) && ($parsedFrame['frame_name'] == 'CTOC')) { // CTOC Chapters Table Of Contents frame (ID3v2.3+ only)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2096
			// http://id3.org/id3v2-chapters-1.0
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2097
			// <ID3v2.3 or ID3v2.4 frame header, ID: "CTOC">           (10 bytes)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2098
			// Element ID      <text string> $00
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2099
			// CTOC flags        %xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2100
			// Entry count       $xx
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2101
			// Child Element ID  <string>$00   /* zero or more child CHAP or CTOC entries */
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2102
            // <Optional embedded sub-frames>
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2103
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2104
			$frame_offset = 0;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2105
			@list($parsedFrame['element_id']) = explode("\x00", $parsedFrame['data'], 2);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2106
			$frame_offset += strlen($parsedFrame['element_id']."\x00");
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2107
			$ctoc_flags_raw = ord(substr($parsedFrame['data'], $frame_offset, 1));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2108
			$frame_offset += 1;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2109
			$parsedFrame['entry_count'] = ord(substr($parsedFrame['data'], $frame_offset, 1));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2110
			$frame_offset += 1;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2111
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2112
			$terminator_position = null;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2113
			for ($i = 0; $i < $parsedFrame['entry_count']; $i++) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2114
				$terminator_position = strpos($parsedFrame['data'], "\x00", $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2115
				$parsedFrame['child_element_ids'][$i] = substr($parsedFrame['data'], $frame_offset, $terminator_position - $frame_offset);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2116
				$frame_offset = $terminator_position + 1;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2117
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2118
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2119
			$parsedFrame['ctoc_flags']['ordered']   = (bool) ($ctoc_flags_raw & 0x01);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2120
			$parsedFrame['ctoc_flags']['top_level'] = (bool) ($ctoc_flags_raw & 0x03);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2121
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2122
			unset($ctoc_flags_raw, $terminator_position);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2123
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2124
			if ($frame_offset < strlen($parsedFrame['data'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2125
				$parsedFrame['subframes'] = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2126
				while ($frame_offset < strlen($parsedFrame['data'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2127
					// <Optional embedded sub-frames>
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2128
					$subframe = array();
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2129
					$subframe['name']      =                           substr($parsedFrame['data'], $frame_offset, 4);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2130
					$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2131
					$subframe['size']      = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 4));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2132
					$frame_offset += 4;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2133
					$subframe['flags_raw'] = getid3_lib::BigEndian2Int(substr($parsedFrame['data'], $frame_offset, 2));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2134
					$frame_offset += 2;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2135
					if ($subframe['size'] > (strlen($parsedFrame['data']) - $frame_offset)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2136
						$this->warning('CTOS subframe "'.$subframe['name'].'" at frame offset '.$frame_offset.' claims to be "'.$subframe['size'].'" bytes, which is more than the available data ('.(strlen($parsedFrame['data']) - $frame_offset).' bytes)');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2137
						break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2138
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2139
					$subframe_rawdata = substr($parsedFrame['data'], $frame_offset, $subframe['size']);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2140
					$frame_offset += $subframe['size'];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2141
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2142
					$subframe['encodingid'] = ord(substr($subframe_rawdata, 0, 1));
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2143
					$subframe['text']       =     substr($subframe_rawdata, 1);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2144
					$subframe['encoding']   = $this->TextEncodingNameLookup($subframe['encodingid']);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2145
					$encoding_converted_text = trim(getid3_lib::iconv_fallback($subframe['encoding'], $info['encoding'], $subframe['text']));;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2146
					switch (substr($encoding_converted_text, 0, 2)) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2147
						case "\xFF\xFE":
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2148
						case "\xFE\xFF":
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2149
							switch (strtoupper($info['id3v2']['encoding'])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2150
								case 'ISO-8859-1':
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2151
								case 'UTF-8':
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2152
									$encoding_converted_text = substr($encoding_converted_text, 2);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2153
									// remove unwanted byte-order-marks
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2154
									break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2155
								default:
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2156
									// ignore
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2157
									break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2158
							}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2159
							break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2160
						default:
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2161
							// do not remove BOM
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2162
							break;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2163
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2164
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2165
					if (($subframe['name'] == 'TIT2') || ($subframe['name'] == 'TIT3')) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2166
						if ($subframe['name'] == 'TIT2') {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2167
							$parsedFrame['toc_name']        = $encoding_converted_text;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2168
						} elseif ($subframe['name'] == 'TIT3') {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2169
							$parsedFrame['toc_description'] = $encoding_converted_text;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2170
						}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2171
						$parsedFrame['subframes'][] = $subframe;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2172
					} else {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2173
						$this->warning('ID3v2.CTOC subframe "'.$subframe['name'].'" not handled (only TIT2 and TIT3)');
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2174
					}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2175
				}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2176
				unset($subframe_rawdata, $subframe, $encoding_converted_text);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2177
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  2178
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2179
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2180
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2181
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2182
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2183
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2184
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2185
	public function DeUnsynchronise($data) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2186
		return str_replace("\xFF\x00", "\xFF", $data);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2187
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2188
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2189
	public function LookupExtendedHeaderRestrictionsTagSizeLimits($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2190
		static $LookupExtendedHeaderRestrictionsTagSizeLimits = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2191
			0x00 => 'No more than 128 frames and 1 MB total tag size',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2192
			0x01 => 'No more than 64 frames and 128 KB total tag size',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2193
			0x02 => 'No more than 32 frames and 40 KB total tag size',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2194
			0x03 => 'No more than 32 frames and 4 KB total tag size',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2195
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2196
		return (isset($LookupExtendedHeaderRestrictionsTagSizeLimits[$index]) ? $LookupExtendedHeaderRestrictionsTagSizeLimits[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2197
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2198
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2199
	public function LookupExtendedHeaderRestrictionsTextEncodings($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2200
		static $LookupExtendedHeaderRestrictionsTextEncodings = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2201
			0x00 => 'No restrictions',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2202
			0x01 => 'Strings are only encoded with ISO-8859-1 or UTF-8',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2203
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2204
		return (isset($LookupExtendedHeaderRestrictionsTextEncodings[$index]) ? $LookupExtendedHeaderRestrictionsTextEncodings[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2205
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2206
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2207
	public function LookupExtendedHeaderRestrictionsTextFieldSize($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2208
		static $LookupExtendedHeaderRestrictionsTextFieldSize = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2209
			0x00 => 'No restrictions',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2210
			0x01 => 'No string is longer than 1024 characters',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2211
			0x02 => 'No string is longer than 128 characters',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2212
			0x03 => 'No string is longer than 30 characters',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2213
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2214
		return (isset($LookupExtendedHeaderRestrictionsTextFieldSize[$index]) ? $LookupExtendedHeaderRestrictionsTextFieldSize[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2215
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2216
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2217
	public function LookupExtendedHeaderRestrictionsImageEncoding($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2218
		static $LookupExtendedHeaderRestrictionsImageEncoding = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2219
			0x00 => 'No restrictions',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2220
			0x01 => 'Images are encoded only with PNG or JPEG',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2221
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2222
		return (isset($LookupExtendedHeaderRestrictionsImageEncoding[$index]) ? $LookupExtendedHeaderRestrictionsImageEncoding[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2223
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2224
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2225
	public function LookupExtendedHeaderRestrictionsImageSizeSize($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2226
		static $LookupExtendedHeaderRestrictionsImageSizeSize = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2227
			0x00 => 'No restrictions',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2228
			0x01 => 'All images are 256x256 pixels or smaller',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2229
			0x02 => 'All images are 64x64 pixels or smaller',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2230
			0x03 => 'All images are exactly 64x64 pixels, unless required otherwise',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2231
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2232
		return (isset($LookupExtendedHeaderRestrictionsImageSizeSize[$index]) ? $LookupExtendedHeaderRestrictionsImageSizeSize[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2233
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2234
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2235
	public function LookupCurrencyUnits($currencyid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2236
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2237
		$begin = __LINE__;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2238
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2239
		/** This is not a comment!
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2240
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2241
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2242
			AED	Dirhams
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2243
			AFA	Afghanis
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2244
			ALL	Leke
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2245
			AMD	Drams
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2246
			ANG	Guilders
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2247
			AOA	Kwanza
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2248
			ARS	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2249
			ATS	Schillings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2250
			AUD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2251
			AWG	Guilders
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2252
			AZM	Manats
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2253
			BAM	Convertible Marka
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2254
			BBD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2255
			BDT	Taka
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2256
			BEF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2257
			BGL	Leva
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2258
			BHD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2259
			BIF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2260
			BMD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2261
			BND	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2262
			BOB	Bolivianos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2263
			BRL	Brazil Real
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2264
			BSD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2265
			BTN	Ngultrum
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2266
			BWP	Pulas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2267
			BYR	Rubles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2268
			BZD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2269
			CAD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2270
			CDF	Congolese Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2271
			CHF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2272
			CLP	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2273
			CNY	Yuan Renminbi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2274
			COP	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2275
			CRC	Colones
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2276
			CUP	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2277
			CVE	Escudos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2278
			CYP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2279
			CZK	Koruny
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2280
			DEM	Deutsche Marks
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2281
			DJF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2282
			DKK	Kroner
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2283
			DOP	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2284
			DZD	Algeria Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2285
			EEK	Krooni
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2286
			EGP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2287
			ERN	Nakfa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2288
			ESP	Pesetas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2289
			ETB	Birr
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2290
			EUR	Euro
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2291
			FIM	Markkaa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2292
			FJD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2293
			FKP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2294
			FRF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2295
			GBP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2296
			GEL	Lari
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2297
			GGP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2298
			GHC	Cedis
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2299
			GIP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2300
			GMD	Dalasi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2301
			GNF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2302
			GRD	Drachmae
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2303
			GTQ	Quetzales
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2304
			GYD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2305
			HKD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2306
			HNL	Lempiras
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2307
			HRK	Kuna
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2308
			HTG	Gourdes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2309
			HUF	Forints
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2310
			IDR	Rupiahs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2311
			IEP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2312
			ILS	New Shekels
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2313
			IMP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2314
			INR	Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2315
			IQD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2316
			IRR	Rials
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2317
			ISK	Kronur
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2318
			ITL	Lire
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2319
			JEP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2320
			JMD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2321
			JOD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2322
			JPY	Yen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2323
			KES	Shillings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2324
			KGS	Soms
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2325
			KHR	Riels
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2326
			KMF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2327
			KPW	Won
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2328
			KWD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2329
			KYD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2330
			KZT	Tenge
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2331
			LAK	Kips
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2332
			LBP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2333
			LKR	Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2334
			LRD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2335
			LSL	Maloti
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2336
			LTL	Litai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2337
			LUF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2338
			LVL	Lati
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2339
			LYD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2340
			MAD	Dirhams
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2341
			MDL	Lei
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2342
			MGF	Malagasy Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2343
			MKD	Denars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2344
			MMK	Kyats
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2345
			MNT	Tugriks
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2346
			MOP	Patacas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2347
			MRO	Ouguiyas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2348
			MTL	Liri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2349
			MUR	Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2350
			MVR	Rufiyaa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2351
			MWK	Kwachas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2352
			MXN	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2353
			MYR	Ringgits
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2354
			MZM	Meticais
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2355
			NAD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2356
			NGN	Nairas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2357
			NIO	Gold Cordobas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2358
			NLG	Guilders
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2359
			NOK	Krone
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2360
			NPR	Nepal Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2361
			NZD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2362
			OMR	Rials
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2363
			PAB	Balboa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2364
			PEN	Nuevos Soles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2365
			PGK	Kina
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2366
			PHP	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2367
			PKR	Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2368
			PLN	Zlotych
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2369
			PTE	Escudos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2370
			PYG	Guarani
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2371
			QAR	Rials
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2372
			ROL	Lei
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2373
			RUR	Rubles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2374
			RWF	Rwanda Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2375
			SAR	Riyals
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2376
			SBD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2377
			SCR	Rupees
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2378
			SDD	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2379
			SEK	Kronor
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2380
			SGD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2381
			SHP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2382
			SIT	Tolars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2383
			SKK	Koruny
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2384
			SLL	Leones
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2385
			SOS	Shillings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2386
			SPL	Luigini
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2387
			SRG	Guilders
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2388
			STD	Dobras
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2389
			SVC	Colones
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2390
			SYP	Pounds
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2391
			SZL	Emalangeni
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2392
			THB	Baht
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2393
			TJR	Rubles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2394
			TMM	Manats
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2395
			TND	Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2396
			TOP	Pa'anga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2397
			TRL	Liras
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2398
			TTD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2399
			TVD	Tuvalu Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2400
			TWD	New Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2401
			TZS	Shillings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2402
			UAH	Hryvnia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2403
			UGX	Shillings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2404
			USD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2405
			UYU	Pesos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2406
			UZS	Sums
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2407
			VAL	Lire
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2408
			VEB	Bolivares
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2409
			VND	Dong
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2410
			VUV	Vatu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2411
			WST	Tala
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2412
			XAF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2413
			XAG	Ounces
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2414
			XAU	Ounces
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2415
			XCD	Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2416
			XDR	Special Drawing Rights
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2417
			XPD	Ounces
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2418
			XPF	Francs
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2419
			XPT	Ounces
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2420
			YER	Rials
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2421
			YUM	New Dinars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2422
			ZAR	Rand
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2423
			ZMK	Kwacha
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2424
			ZWD	Zimbabwe Dollars
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2425
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2426
		*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2427
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2428
		return getid3_lib::EmbeddedLookup($currencyid, $begin, __LINE__, __FILE__, 'id3v2-currency-units');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2429
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2430
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2431
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2432
	public function LookupCurrencyCountry($currencyid) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2433
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2434
		$begin = __LINE__;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2435
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2436
		/** This is not a comment!
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2437
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2438
			AED	United Arab Emirates
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2439
			AFA	Afghanistan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2440
			ALL	Albania
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2441
			AMD	Armenia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2442
			ANG	Netherlands Antilles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2443
			AOA	Angola
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2444
			ARS	Argentina
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2445
			ATS	Austria
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2446
			AUD	Australia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2447
			AWG	Aruba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2448
			AZM	Azerbaijan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2449
			BAM	Bosnia and Herzegovina
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2450
			BBD	Barbados
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2451
			BDT	Bangladesh
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2452
			BEF	Belgium
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2453
			BGL	Bulgaria
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2454
			BHD	Bahrain
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2455
			BIF	Burundi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2456
			BMD	Bermuda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2457
			BND	Brunei Darussalam
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2458
			BOB	Bolivia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2459
			BRL	Brazil
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2460
			BSD	Bahamas
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2461
			BTN	Bhutan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2462
			BWP	Botswana
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2463
			BYR	Belarus
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2464
			BZD	Belize
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2465
			CAD	Canada
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2466
			CDF	Congo/Kinshasa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2467
			CHF	Switzerland
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2468
			CLP	Chile
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2469
			CNY	China
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2470
			COP	Colombia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2471
			CRC	Costa Rica
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2472
			CUP	Cuba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2473
			CVE	Cape Verde
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2474
			CYP	Cyprus
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2475
			CZK	Czech Republic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2476
			DEM	Germany
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2477
			DJF	Djibouti
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2478
			DKK	Denmark
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2479
			DOP	Dominican Republic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2480
			DZD	Algeria
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2481
			EEK	Estonia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2482
			EGP	Egypt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2483
			ERN	Eritrea
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2484
			ESP	Spain
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2485
			ETB	Ethiopia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2486
			EUR	Euro Member Countries
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2487
			FIM	Finland
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2488
			FJD	Fiji
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2489
			FKP	Falkland Islands (Malvinas)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2490
			FRF	France
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2491
			GBP	United Kingdom
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2492
			GEL	Georgia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2493
			GGP	Guernsey
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2494
			GHC	Ghana
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2495
			GIP	Gibraltar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2496
			GMD	Gambia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2497
			GNF	Guinea
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2498
			GRD	Greece
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2499
			GTQ	Guatemala
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2500
			GYD	Guyana
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2501
			HKD	Hong Kong
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2502
			HNL	Honduras
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2503
			HRK	Croatia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2504
			HTG	Haiti
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2505
			HUF	Hungary
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2506
			IDR	Indonesia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2507
			IEP	Ireland (Eire)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2508
			ILS	Israel
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2509
			IMP	Isle of Man
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2510
			INR	India
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2511
			IQD	Iraq
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2512
			IRR	Iran
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2513
			ISK	Iceland
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2514
			ITL	Italy
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2515
			JEP	Jersey
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2516
			JMD	Jamaica
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2517
			JOD	Jordan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2518
			JPY	Japan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2519
			KES	Kenya
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2520
			KGS	Kyrgyzstan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2521
			KHR	Cambodia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2522
			KMF	Comoros
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2523
			KPW	Korea
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2524
			KWD	Kuwait
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2525
			KYD	Cayman Islands
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2526
			KZT	Kazakstan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2527
			LAK	Laos
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2528
			LBP	Lebanon
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2529
			LKR	Sri Lanka
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2530
			LRD	Liberia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2531
			LSL	Lesotho
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2532
			LTL	Lithuania
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2533
			LUF	Luxembourg
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2534
			LVL	Latvia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2535
			LYD	Libya
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2536
			MAD	Morocco
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2537
			MDL	Moldova
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2538
			MGF	Madagascar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2539
			MKD	Macedonia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2540
			MMK	Myanmar (Burma)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2541
			MNT	Mongolia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2542
			MOP	Macau
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2543
			MRO	Mauritania
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2544
			MTL	Malta
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2545
			MUR	Mauritius
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2546
			MVR	Maldives (Maldive Islands)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2547
			MWK	Malawi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2548
			MXN	Mexico
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2549
			MYR	Malaysia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2550
			MZM	Mozambique
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2551
			NAD	Namibia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2552
			NGN	Nigeria
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2553
			NIO	Nicaragua
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2554
			NLG	Netherlands (Holland)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2555
			NOK	Norway
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2556
			NPR	Nepal
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2557
			NZD	New Zealand
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2558
			OMR	Oman
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2559
			PAB	Panama
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2560
			PEN	Peru
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2561
			PGK	Papua New Guinea
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2562
			PHP	Philippines
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2563
			PKR	Pakistan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2564
			PLN	Poland
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2565
			PTE	Portugal
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2566
			PYG	Paraguay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2567
			QAR	Qatar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2568
			ROL	Romania
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2569
			RUR	Russia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2570
			RWF	Rwanda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2571
			SAR	Saudi Arabia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2572
			SBD	Solomon Islands
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2573
			SCR	Seychelles
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2574
			SDD	Sudan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2575
			SEK	Sweden
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2576
			SGD	Singapore
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2577
			SHP	Saint Helena
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2578
			SIT	Slovenia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2579
			SKK	Slovakia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2580
			SLL	Sierra Leone
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2581
			SOS	Somalia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2582
			SPL	Seborga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2583
			SRG	Suriname
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2584
			STD	São Tome and Principe
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2585
			SVC	El Salvador
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2586
			SYP	Syria
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2587
			SZL	Swaziland
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2588
			THB	Thailand
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2589
			TJR	Tajikistan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2590
			TMM	Turkmenistan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2591
			TND	Tunisia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2592
			TOP	Tonga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2593
			TRL	Turkey
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2594
			TTD	Trinidad and Tobago
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2595
			TVD	Tuvalu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2596
			TWD	Taiwan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2597
			TZS	Tanzania
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2598
			UAH	Ukraine
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2599
			UGX	Uganda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2600
			USD	United States of America
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2601
			UYU	Uruguay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2602
			UZS	Uzbekistan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2603
			VAL	Vatican City
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2604
			VEB	Venezuela
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2605
			VND	Viet Nam
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2606
			VUV	Vanuatu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2607
			WST	Samoa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2608
			XAF	Communauté Financière Africaine
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2609
			XAG	Silver
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2610
			XAU	Gold
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2611
			XCD	East Caribbean
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2612
			XDR	International Monetary Fund
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2613
			XPD	Palladium
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2614
			XPF	Comptoirs Français du Pacifique
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2615
			XPT	Platinum
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2616
			YER	Yemen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2617
			YUM	Yugoslavia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2618
			ZAR	South Africa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2619
			ZMK	Zambia
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2620
			ZWD	Zimbabwe
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2621
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2622
		*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2623
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2624
		return getid3_lib::EmbeddedLookup($currencyid, $begin, __LINE__, __FILE__, 'id3v2-currency-country');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2625
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2626
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2627
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2628
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2629
	public static function LanguageLookup($languagecode, $casesensitive=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2630
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2631
		if (!$casesensitive) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2632
			$languagecode = strtolower($languagecode);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2633
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2634
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2635
		// http://www.id3.org/id3v2.4.0-structure.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2636
		// [4.   ID3v2 frame overview]
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2637
		// The three byte language field, present in several frames, is used to
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2638
		// describe the language of the frame's content, according to ISO-639-2
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2639
		// [ISO-639-2]. The language should be represented in lower case. If the
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2640
		// language is not known the string "XXX" should be used.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2641
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2642
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2643
		// ISO 639-2 - http://www.id3.org/iso639-2.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2644
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2645
		$begin = __LINE__;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2646
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2647
		/** This is not a comment!
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2648
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2649
			XXX	unknown
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2650
			xxx	unknown
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2651
			aar	Afar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2652
			abk	Abkhazian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2653
			ace	Achinese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2654
			ach	Acoli
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2655
			ada	Adangme
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2656
			afa	Afro-Asiatic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2657
			afh	Afrihili
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2658
			afr	Afrikaans
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2659
			aka	Akan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2660
			akk	Akkadian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2661
			alb	Albanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2662
			ale	Aleut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2663
			alg	Algonquian Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2664
			amh	Amharic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2665
			ang	English, Old (ca. 450-1100)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2666
			apa	Apache Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2667
			ara	Arabic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2668
			arc	Aramaic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2669
			arm	Armenian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2670
			arn	Araucanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2671
			arp	Arapaho
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2672
			art	Artificial (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2673
			arw	Arawak
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2674
			asm	Assamese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2675
			ath	Athapascan Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2676
			ava	Avaric
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2677
			ave	Avestan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2678
			awa	Awadhi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2679
			aym	Aymara
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2680
			aze	Azerbaijani
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2681
			bad	Banda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2682
			bai	Bamileke Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2683
			bak	Bashkir
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2684
			bal	Baluchi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2685
			bam	Bambara
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2686
			ban	Balinese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2687
			baq	Basque
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2688
			bas	Basa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2689
			bat	Baltic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2690
			bej	Beja
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2691
			bel	Byelorussian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2692
			bem	Bemba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2693
			ben	Bengali
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2694
			ber	Berber (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2695
			bho	Bhojpuri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2696
			bih	Bihari
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2697
			bik	Bikol
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2698
			bin	Bini
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2699
			bis	Bislama
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2700
			bla	Siksika
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2701
			bnt	Bantu (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2702
			bod	Tibetan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2703
			bra	Braj
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2704
			bre	Breton
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2705
			bua	Buriat
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2706
			bug	Buginese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2707
			bul	Bulgarian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2708
			bur	Burmese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2709
			cad	Caddo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2710
			cai	Central American Indian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2711
			car	Carib
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2712
			cat	Catalan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2713
			cau	Caucasian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2714
			ceb	Cebuano
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2715
			cel	Celtic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2716
			ces	Czech
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2717
			cha	Chamorro
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2718
			chb	Chibcha
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2719
			che	Chechen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2720
			chg	Chagatai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2721
			chi	Chinese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2722
			chm	Mari
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2723
			chn	Chinook jargon
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2724
			cho	Choctaw
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2725
			chr	Cherokee
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2726
			chu	Church Slavic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2727
			chv	Chuvash
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2728
			chy	Cheyenne
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2729
			cop	Coptic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2730
			cor	Cornish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2731
			cos	Corsican
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2732
			cpe	Creoles and Pidgins, English-based (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2733
			cpf	Creoles and Pidgins, French-based (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2734
			cpp	Creoles and Pidgins, Portuguese-based (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2735
			cre	Cree
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2736
			crp	Creoles and Pidgins (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2737
			cus	Cushitic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2738
			cym	Welsh
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2739
			cze	Czech
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2740
			dak	Dakota
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2741
			dan	Danish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2742
			del	Delaware
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2743
			deu	German
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2744
			din	Dinka
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2745
			div	Divehi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2746
			doi	Dogri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2747
			dra	Dravidian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2748
			dua	Duala
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2749
			dum	Dutch, Middle (ca. 1050-1350)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2750
			dut	Dutch
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2751
			dyu	Dyula
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2752
			dzo	Dzongkha
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2753
			efi	Efik
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2754
			egy	Egyptian (Ancient)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2755
			eka	Ekajuk
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2756
			ell	Greek, Modern (1453-)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2757
			elx	Elamite
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2758
			eng	English
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2759
			enm	English, Middle (ca. 1100-1500)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2760
			epo	Esperanto
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2761
			esk	Eskimo (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2762
			esl	Spanish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2763
			est	Estonian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2764
			eus	Basque
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2765
			ewe	Ewe
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2766
			ewo	Ewondo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2767
			fan	Fang
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2768
			fao	Faroese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2769
			fas	Persian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2770
			fat	Fanti
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2771
			fij	Fijian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2772
			fin	Finnish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2773
			fiu	Finno-Ugrian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2774
			fon	Fon
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2775
			fra	French
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2776
			fre	French
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2777
			frm	French, Middle (ca. 1400-1600)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2778
			fro	French, Old (842- ca. 1400)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2779
			fry	Frisian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2780
			ful	Fulah
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2781
			gaa	Ga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2782
			gae	Gaelic (Scots)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2783
			gai	Irish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2784
			gay	Gayo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2785
			gdh	Gaelic (Scots)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2786
			gem	Germanic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2787
			geo	Georgian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2788
			ger	German
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2789
			gez	Geez
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2790
			gil	Gilbertese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2791
			glg	Gallegan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2792
			gmh	German, Middle High (ca. 1050-1500)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2793
			goh	German, Old High (ca. 750-1050)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2794
			gon	Gondi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2795
			got	Gothic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2796
			grb	Grebo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2797
			grc	Greek, Ancient (to 1453)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2798
			gre	Greek, Modern (1453-)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2799
			grn	Guarani
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2800
			guj	Gujarati
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2801
			hai	Haida
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2802
			hau	Hausa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2803
			haw	Hawaiian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2804
			heb	Hebrew
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2805
			her	Herero
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2806
			hil	Hiligaynon
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2807
			him	Himachali
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2808
			hin	Hindi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2809
			hmo	Hiri Motu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2810
			hun	Hungarian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2811
			hup	Hupa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2812
			hye	Armenian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2813
			iba	Iban
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2814
			ibo	Igbo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2815
			ice	Icelandic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2816
			ijo	Ijo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2817
			iku	Inuktitut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2818
			ilo	Iloko
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2819
			ina	Interlingua (International Auxiliary language Association)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2820
			inc	Indic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2821
			ind	Indonesian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2822
			ine	Indo-European (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2823
			ine	Interlingue
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2824
			ipk	Inupiak
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2825
			ira	Iranian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2826
			iri	Irish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2827
			iro	Iroquoian uages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2828
			isl	Icelandic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2829
			ita	Italian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2830
			jav	Javanese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2831
			jaw	Javanese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2832
			jpn	Japanese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2833
			jpr	Judeo-Persian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2834
			jrb	Judeo-Arabic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2835
			kaa	Kara-Kalpak
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2836
			kab	Kabyle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2837
			kac	Kachin
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2838
			kal	Greenlandic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2839
			kam	Kamba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2840
			kan	Kannada
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2841
			kar	Karen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2842
			kas	Kashmiri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2843
			kat	Georgian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2844
			kau	Kanuri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2845
			kaw	Kawi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2846
			kaz	Kazakh
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2847
			kha	Khasi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2848
			khi	Khoisan (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2849
			khm	Khmer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2850
			kho	Khotanese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2851
			kik	Kikuyu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2852
			kin	Kinyarwanda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2853
			kir	Kirghiz
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2854
			kok	Konkani
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2855
			kom	Komi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2856
			kon	Kongo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2857
			kor	Korean
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2858
			kpe	Kpelle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2859
			kro	Kru
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2860
			kru	Kurukh
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2861
			kua	Kuanyama
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2862
			kum	Kumyk
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2863
			kur	Kurdish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2864
			kus	Kusaie
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2865
			kut	Kutenai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2866
			lad	Ladino
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2867
			lah	Lahnda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2868
			lam	Lamba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2869
			lao	Lao
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2870
			lat	Latin
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2871
			lav	Latvian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2872
			lez	Lezghian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2873
			lin	Lingala
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2874
			lit	Lithuanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2875
			lol	Mongo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2876
			loz	Lozi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2877
			ltz	Letzeburgesch
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2878
			lub	Luba-Katanga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2879
			lug	Ganda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2880
			lui	Luiseno
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2881
			lun	Lunda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2882
			luo	Luo (Kenya and Tanzania)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2883
			mac	Macedonian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2884
			mad	Madurese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2885
			mag	Magahi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2886
			mah	Marshall
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2887
			mai	Maithili
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2888
			mak	Macedonian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2889
			mak	Makasar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2890
			mal	Malayalam
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2891
			man	Mandingo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2892
			mao	Maori
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2893
			map	Austronesian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2894
			mar	Marathi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2895
			mas	Masai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2896
			max	Manx
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2897
			may	Malay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2898
			men	Mende
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2899
			mga	Irish, Middle (900 - 1200)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2900
			mic	Micmac
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2901
			min	Minangkabau
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2902
			mis	Miscellaneous (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2903
			mkh	Mon-Kmer (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2904
			mlg	Malagasy
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2905
			mlt	Maltese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2906
			mni	Manipuri
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2907
			mno	Manobo Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2908
			moh	Mohawk
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2909
			mol	Moldavian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2910
			mon	Mongolian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2911
			mos	Mossi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2912
			mri	Maori
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2913
			msa	Malay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2914
			mul	Multiple Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2915
			mun	Munda Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2916
			mus	Creek
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2917
			mwr	Marwari
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2918
			mya	Burmese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2919
			myn	Mayan Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2920
			nah	Aztec
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2921
			nai	North American Indian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2922
			nau	Nauru
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2923
			nav	Navajo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2924
			nbl	Ndebele, South
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2925
			nde	Ndebele, North
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2926
			ndo	Ndongo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2927
			nep	Nepali
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2928
			new	Newari
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2929
			nic	Niger-Kordofanian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2930
			niu	Niuean
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2931
			nla	Dutch
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2932
			nno	Norwegian (Nynorsk)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2933
			non	Norse, Old
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2934
			nor	Norwegian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2935
			nso	Sotho, Northern
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2936
			nub	Nubian Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2937
			nya	Nyanja
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2938
			nym	Nyamwezi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2939
			nyn	Nyankole
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2940
			nyo	Nyoro
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2941
			nzi	Nzima
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2942
			oci	Langue d'Oc (post 1500)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2943
			oji	Ojibwa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2944
			ori	Oriya
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2945
			orm	Oromo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2946
			osa	Osage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2947
			oss	Ossetic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2948
			ota	Turkish, Ottoman (1500 - 1928)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2949
			oto	Otomian Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2950
			paa	Papuan-Australian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2951
			pag	Pangasinan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2952
			pal	Pahlavi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2953
			pam	Pampanga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2954
			pan	Panjabi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2955
			pap	Papiamento
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2956
			pau	Palauan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2957
			peo	Persian, Old (ca 600 - 400 B.C.)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2958
			per	Persian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2959
			phn	Phoenician
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2960
			pli	Pali
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2961
			pol	Polish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2962
			pon	Ponape
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2963
			por	Portuguese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2964
			pra	Prakrit uages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2965
			pro	Provencal, Old (to 1500)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2966
			pus	Pushto
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2967
			que	Quechua
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2968
			raj	Rajasthani
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2969
			rar	Rarotongan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2970
			roa	Romance (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2971
			roh	Rhaeto-Romance
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2972
			rom	Romany
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2973
			ron	Romanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2974
			rum	Romanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2975
			run	Rundi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2976
			rus	Russian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2977
			sad	Sandawe
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2978
			sag	Sango
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2979
			sah	Yakut
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2980
			sai	South American Indian (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2981
			sal	Salishan Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2982
			sam	Samaritan Aramaic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2983
			san	Sanskrit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2984
			sco	Scots
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2985
			scr	Serbo-Croatian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2986
			sel	Selkup
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2987
			sem	Semitic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2988
			sga	Irish, Old (to 900)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2989
			shn	Shan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2990
			sid	Sidamo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2991
			sin	Singhalese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2992
			sio	Siouan Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2993
			sit	Sino-Tibetan (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2994
			sla	Slavic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2995
			slk	Slovak
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2996
			slo	Slovak
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2997
			slv	Slovenian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2998
			smi	Sami Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  2999
			smo	Samoan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3000
			sna	Shona
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3001
			snd	Sindhi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3002
			sog	Sogdian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3003
			som	Somali
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3004
			son	Songhai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3005
			sot	Sotho, Southern
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3006
			spa	Spanish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3007
			sqi	Albanian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3008
			srd	Sardinian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3009
			srr	Serer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3010
			ssa	Nilo-Saharan (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3011
			ssw	Siswant
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3012
			ssw	Swazi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3013
			suk	Sukuma
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3014
			sun	Sudanese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3015
			sus	Susu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3016
			sux	Sumerian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3017
			sve	Swedish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3018
			swa	Swahili
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3019
			swe	Swedish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3020
			syr	Syriac
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3021
			tah	Tahitian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3022
			tam	Tamil
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3023
			tat	Tatar
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3024
			tel	Telugu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3025
			tem	Timne
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3026
			ter	Tereno
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3027
			tgk	Tajik
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3028
			tgl	Tagalog
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3029
			tha	Thai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3030
			tib	Tibetan
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3031
			tig	Tigre
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3032
			tir	Tigrinya
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3033
			tiv	Tivi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3034
			tli	Tlingit
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3035
			tmh	Tamashek
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3036
			tog	Tonga (Nyasa)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3037
			ton	Tonga (Tonga Islands)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3038
			tru	Truk
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3039
			tsi	Tsimshian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3040
			tsn	Tswana
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3041
			tso	Tsonga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3042
			tuk	Turkmen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3043
			tum	Tumbuka
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3044
			tur	Turkish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3045
			tut	Altaic (Other)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3046
			twi	Twi
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3047
			tyv	Tuvinian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3048
			uga	Ugaritic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3049
			uig	Uighur
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3050
			ukr	Ukrainian
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3051
			umb	Umbundu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3052
			und	Undetermined
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3053
			urd	Urdu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3054
			uzb	Uzbek
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3055
			vai	Vai
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3056
			ven	Venda
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3057
			vie	Vietnamese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3058
			vol	Volapük
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3059
			vot	Votic
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3060
			wak	Wakashan Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3061
			wal	Walamo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3062
			war	Waray
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3063
			was	Washo
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3064
			wel	Welsh
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3065
			wen	Sorbian Languages
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3066
			wol	Wolof
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3067
			xho	Xhosa
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3068
			yao	Yao
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3069
			yap	Yap
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3070
			yid	Yiddish
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3071
			yor	Yoruba
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3072
			zap	Zapotec
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3073
			zen	Zenaga
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3074
			zha	Zhuang
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3075
			zho	Chinese
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3076
			zul	Zulu
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3077
			zun	Zuni
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3078
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3079
		*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3080
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3081
		return getid3_lib::EmbeddedLookup($languagecode, $begin, __LINE__, __FILE__, 'id3v2-languagecode');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3082
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3083
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3084
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3085
	public static function ETCOEventLookup($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3086
		if (($index >= 0x17) && ($index <= 0xDF)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3087
			return 'reserved for future use';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3088
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3089
		if (($index >= 0xE0) && ($index <= 0xEF)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3090
			return 'not predefined synch 0-F';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3091
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3092
		if (($index >= 0xF0) && ($index <= 0xFC)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3093
			return 'reserved for future use';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3094
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3095
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3096
		static $EventLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3097
			0x00 => 'padding (has no meaning)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3098
			0x01 => 'end of initial silence',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3099
			0x02 => 'intro start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3100
			0x03 => 'main part start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3101
			0x04 => 'outro start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3102
			0x05 => 'outro end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3103
			0x06 => 'verse start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3104
			0x07 => 'refrain start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3105
			0x08 => 'interlude start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3106
			0x09 => 'theme start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3107
			0x0A => 'variation start',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3108
			0x0B => 'key change',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3109
			0x0C => 'time change',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3110
			0x0D => 'momentary unwanted noise (Snap, Crackle & Pop)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3111
			0x0E => 'sustained noise',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3112
			0x0F => 'sustained noise end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3113
			0x10 => 'intro end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3114
			0x11 => 'main part end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3115
			0x12 => 'verse end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3116
			0x13 => 'refrain end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3117
			0x14 => 'theme end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3118
			0x15 => 'profanity',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3119
			0x16 => 'profanity end',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3120
			0xFD => 'audio end (start of silence)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3121
			0xFE => 'audio file ends',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3122
			0xFF => 'one more byte of events follows'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3123
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3124
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3125
		return (isset($EventLookup[$index]) ? $EventLookup[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3126
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3127
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3128
	public static function SYTLContentTypeLookup($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3129
		static $SYTLContentTypeLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3130
			0x00 => 'other',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3131
			0x01 => 'lyrics',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3132
			0x02 => 'text transcription',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3133
			0x03 => 'movement/part name', // (e.g. 'Adagio')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3134
			0x04 => 'events',             // (e.g. 'Don Quijote enters the stage')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3135
			0x05 => 'chord',              // (e.g. 'Bb F Fsus')
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3136
			0x06 => 'trivia/\'pop up\' information',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3137
			0x07 => 'URLs to webpages',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3138
			0x08 => 'URLs to images'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3139
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3140
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3141
		return (isset($SYTLContentTypeLookup[$index]) ? $SYTLContentTypeLookup[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3142
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3143
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3144
	public static function APICPictureTypeLookup($index, $returnarray=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3145
		static $APICPictureTypeLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3146
			0x00 => 'Other',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3147
			0x01 => '32x32 pixels \'file icon\' (PNG only)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3148
			0x02 => 'Other file icon',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3149
			0x03 => 'Cover (front)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3150
			0x04 => 'Cover (back)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3151
			0x05 => 'Leaflet page',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3152
			0x06 => 'Media (e.g. label side of CD)',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3153
			0x07 => 'Lead artist/lead performer/soloist',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3154
			0x08 => 'Artist/performer',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3155
			0x09 => 'Conductor',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3156
			0x0A => 'Band/Orchestra',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3157
			0x0B => 'Composer',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3158
			0x0C => 'Lyricist/text writer',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3159
			0x0D => 'Recording Location',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3160
			0x0E => 'During recording',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3161
			0x0F => 'During performance',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3162
			0x10 => 'Movie/video screen capture',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3163
			0x11 => 'A bright coloured fish',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3164
			0x12 => 'Illustration',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3165
			0x13 => 'Band/artist logotype',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3166
			0x14 => 'Publisher/Studio logotype'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3167
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3168
		if ($returnarray) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3169
			return $APICPictureTypeLookup;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3170
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3171
		return (isset($APICPictureTypeLookup[$index]) ? $APICPictureTypeLookup[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3172
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3173
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3174
	public static function COMRReceivedAsLookup($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3175
		static $COMRReceivedAsLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3176
			0x00 => 'Other',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3177
			0x01 => 'Standard CD album with other songs',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3178
			0x02 => 'Compressed audio on CD',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3179
			0x03 => 'File over the Internet',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3180
			0x04 => 'Stream over the Internet',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3181
			0x05 => 'As note sheets',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3182
			0x06 => 'As note sheets in a book with other sheets',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3183
			0x07 => 'Music on other media',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3184
			0x08 => 'Non-musical merchandise'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3185
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3186
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3187
		return (isset($COMRReceivedAsLookup[$index]) ? $COMRReceivedAsLookup[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3188
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3189
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3190
	public static function RVA2ChannelTypeLookup($index) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3191
		static $RVA2ChannelTypeLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3192
			0x00 => 'Other',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3193
			0x01 => 'Master volume',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3194
			0x02 => 'Front right',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3195
			0x03 => 'Front left',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3196
			0x04 => 'Back right',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3197
			0x05 => 'Back left',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3198
			0x06 => 'Front centre',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3199
			0x07 => 'Back centre',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3200
			0x08 => 'Subwoofer'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3201
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3202
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3203
		return (isset($RVA2ChannelTypeLookup[$index]) ? $RVA2ChannelTypeLookup[$index] : '');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3204
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3205
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3206
	public static function FrameNameLongLookup($framename) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3207
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3208
		$begin = __LINE__;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3209
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3210
		/** This is not a comment!
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3211
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3212
			AENC	Audio encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3213
			APIC	Attached picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3214
			ASPI	Audio seek point index
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3215
			BUF	Recommended buffer size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3216
			CNT	Play counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3217
			COM	Comments
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3218
			COMM	Comments
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3219
			COMR	Commercial frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3220
			CRA	Audio encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3221
			CRM	Encrypted meta frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3222
			ENCR	Encryption method registration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3223
			EQU	Equalisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3224
			EQU2	Equalisation (2)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3225
			EQUA	Equalisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3226
			ETC	Event timing codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3227
			ETCO	Event timing codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3228
			GEO	General encapsulated object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3229
			GEOB	General encapsulated object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3230
			GRID	Group identification registration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3231
			IPL	Involved people list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3232
			IPLS	Involved people list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3233
			LINK	Linked information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3234
			LNK	Linked information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3235
			MCDI	Music CD identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3236
			MCI	Music CD Identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3237
			MLL	MPEG location lookup table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3238
			MLLT	MPEG location lookup table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3239
			OWNE	Ownership frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3240
			PCNT	Play counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3241
			PIC	Attached picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3242
			POP	Popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3243
			POPM	Popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3244
			POSS	Position synchronisation frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3245
			PRIV	Private frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3246
			RBUF	Recommended buffer size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3247
			REV	Reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3248
			RVA	Relative volume adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3249
			RVA2	Relative volume adjustment (2)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3250
			RVAD	Relative volume adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3251
			RVRB	Reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3252
			SEEK	Seek frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3253
			SIGN	Signature frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3254
			SLT	Synchronised lyric/text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3255
			STC	Synced tempo codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3256
			SYLT	Synchronised lyric/text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3257
			SYTC	Synchronised tempo codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3258
			TAL	Album/Movie/Show title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3259
			TALB	Album/Movie/Show title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3260
			TBP	BPM (Beats Per Minute)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3261
			TBPM	BPM (beats per minute)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3262
			TCM	Composer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3263
			TCMP	Part of a compilation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3264
			TCO	Content type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3265
			TCOM	Composer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3266
			TCON	Content type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3267
			TCOP	Copyright message
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3268
			TCP	Part of a compilation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3269
			TCR	Copyright message
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3270
			TDA	Date
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3271
			TDAT	Date
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3272
			TDEN	Encoding time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3273
			TDLY	Playlist delay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3274
			TDOR	Original release time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3275
			TDRC	Recording time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3276
			TDRL	Release time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3277
			TDTG	Tagging time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3278
			TDY	Playlist delay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3279
			TEN	Encoded by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3280
			TENC	Encoded by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3281
			TEXT	Lyricist/Text writer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3282
			TFLT	File type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3283
			TFT	File type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3284
			TIM	Time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3285
			TIME	Time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3286
			TIPL	Involved people list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3287
			TIT1	Content group description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3288
			TIT2	Title/songname/content description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3289
			TIT3	Subtitle/Description refinement
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3290
			TKE	Initial key
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3291
			TKEY	Initial key
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3292
			TLA	Language(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3293
			TLAN	Language(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3294
			TLE	Length
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3295
			TLEN	Length
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3296
			TMCL	Musician credits list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3297
			TMED	Media type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3298
			TMOO	Mood
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3299
			TMT	Media type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3300
			TOA	Original artist(s)/performer(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3301
			TOAL	Original album/movie/show title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3302
			TOF	Original filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3303
			TOFN	Original filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3304
			TOL	Original Lyricist(s)/text writer(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3305
			TOLY	Original lyricist(s)/text writer(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3306
			TOPE	Original artist(s)/performer(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3307
			TOR	Original release year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3308
			TORY	Original release year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3309
			TOT	Original album/Movie/Show title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3310
			TOWN	File owner/licensee
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3311
			TP1	Lead artist(s)/Lead performer(s)/Soloist(s)/Performing group
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3312
			TP2	Band/Orchestra/Accompaniment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3313
			TP3	Conductor/Performer refinement
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3314
			TP4	Interpreted, remixed, or otherwise modified by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3315
			TPA	Part of a set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3316
			TPB	Publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3317
			TPE1	Lead performer(s)/Soloist(s)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3318
			TPE2	Band/orchestra/accompaniment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3319
			TPE3	Conductor/performer refinement
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3320
			TPE4	Interpreted, remixed, or otherwise modified by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3321
			TPOS	Part of a set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3322
			TPRO	Produced notice
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3323
			TPUB	Publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3324
			TRC	ISRC (International Standard Recording Code)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3325
			TRCK	Track number/Position in set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3326
			TRD	Recording dates
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3327
			TRDA	Recording dates
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3328
			TRK	Track number/Position in set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3329
			TRSN	Internet radio station name
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3330
			TRSO	Internet radio station owner
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3331
			TS2	Album-Artist sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3332
			TSA	Album sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3333
			TSC	Composer sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3334
			TSI	Size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3335
			TSIZ	Size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3336
			TSO2	Album-Artist sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3337
			TSOA	Album sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3338
			TSOC	Composer sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3339
			TSOP	Performer sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3340
			TSOT	Title sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3341
			TSP	Performer sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3342
			TSRC	ISRC (international standard recording code)
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3343
			TSS	Software/hardware and settings used for encoding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3344
			TSSE	Software/Hardware and settings used for encoding
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3345
			TSST	Set subtitle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3346
			TST	Title sort order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3347
			TT1	Content group description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3348
			TT2	Title/Songname/Content description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3349
			TT3	Subtitle/Description refinement
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3350
			TXT	Lyricist/text writer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3351
			TXX	User defined text information frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3352
			TXXX	User defined text information frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3353
			TYE	Year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3354
			TYER	Year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3355
			UFI	Unique file identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3356
			UFID	Unique file identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3357
			ULT	Unsychronised lyric/text transcription
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3358
			USER	Terms of use
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3359
			USLT	Unsynchronised lyric/text transcription
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3360
			WAF	Official audio file webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3361
			WAR	Official artist/performer webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3362
			WAS	Official audio source webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3363
			WCM	Commercial information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3364
			WCOM	Commercial information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3365
			WCOP	Copyright/Legal information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3366
			WCP	Copyright/Legal information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3367
			WOAF	Official audio file webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3368
			WOAR	Official artist/performer webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3369
			WOAS	Official audio source webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3370
			WORS	Official Internet radio station homepage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3371
			WPAY	Payment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3372
			WPB	Publishers official webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3373
			WPUB	Publishers official webpage
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3374
			WXX	User defined URL link frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3375
			WXXX	User defined URL link frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3376
			TFEA	Featured Artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3377
			TSTU	Recording Studio
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3378
			rgad	Replay Gain Adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3379
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3380
		*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3381
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3382
		return getid3_lib::EmbeddedLookup($framename, $begin, __LINE__, __FILE__, 'id3v2-framename_long');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3383
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3384
		// Last three:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3385
		// from Helium2 [www.helium2.com]
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3386
		// from http://privatewww.essex.ac.uk/~djmrob/replaygain/file_format_id3v2.html
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3387
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3388
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3389
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3390
	public static function FrameNameShortLookup($framename) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3391
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3392
		$begin = __LINE__;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3393
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3394
		/** This is not a comment!
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3395
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3396
			AENC	audio_encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3397
			APIC	attached_picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3398
			ASPI	audio_seek_point_index
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3399
			BUF	recommended_buffer_size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3400
			CNT	play_counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3401
			COM	comment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3402
			COMM	comment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3403
			COMR	commercial_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3404
			CRA	audio_encryption
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3405
			CRM	encrypted_meta_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3406
			ENCR	encryption_method_registration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3407
			EQU	equalisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3408
			EQU2	equalisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3409
			EQUA	equalisation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3410
			ETC	event_timing_codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3411
			ETCO	event_timing_codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3412
			GEO	general_encapsulated_object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3413
			GEOB	general_encapsulated_object
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3414
			GRID	group_identification_registration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3415
			IPL	involved_people_list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3416
			IPLS	involved_people_list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3417
			LINK	linked_information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3418
			LNK	linked_information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3419
			MCDI	music_cd_identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3420
			MCI	music_cd_identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3421
			MLL	mpeg_location_lookup_table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3422
			MLLT	mpeg_location_lookup_table
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3423
			OWNE	ownership_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3424
			PCNT	play_counter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3425
			PIC	attached_picture
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3426
			POP	popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3427
			POPM	popularimeter
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3428
			POSS	position_synchronisation_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3429
			PRIV	private_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3430
			RBUF	recommended_buffer_size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3431
			REV	reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3432
			RVA	relative_volume_adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3433
			RVA2	relative_volume_adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3434
			RVAD	relative_volume_adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3435
			RVRB	reverb
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3436
			SEEK	seek_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3437
			SIGN	signature_frame
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3438
			SLT	synchronised_lyric
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3439
			STC	synced_tempo_codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3440
			SYLT	synchronised_lyric
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3441
			SYTC	synchronised_tempo_codes
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3442
			TAL	album
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3443
			TALB	album
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3444
			TBP	bpm
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3445
			TBPM	bpm
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3446
			TCM	composer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3447
			TCMP	part_of_a_compilation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3448
			TCO	genre
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3449
			TCOM	composer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3450
			TCON	genre
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3451
			TCOP	copyright_message
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3452
			TCP	part_of_a_compilation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3453
			TCR	copyright_message
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3454
			TDA	date
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3455
			TDAT	date
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3456
			TDEN	encoding_time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3457
			TDLY	playlist_delay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3458
			TDOR	original_release_time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3459
			TDRC	recording_time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3460
			TDRL	release_time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3461
			TDTG	tagging_time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3462
			TDY	playlist_delay
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3463
			TEN	encoded_by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3464
			TENC	encoded_by
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3465
			TEXT	lyricist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3466
			TFLT	file_type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3467
			TFT	file_type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3468
			TIM	time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3469
			TIME	time
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3470
			TIPL	involved_people_list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3471
			TIT1	content_group_description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3472
			TIT2	title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3473
			TIT3	subtitle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3474
			TKE	initial_key
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3475
			TKEY	initial_key
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3476
			TLA	language
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3477
			TLAN	language
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3478
			TLE	length
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3479
			TLEN	length
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3480
			TMCL	musician_credits_list
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3481
			TMED	media_type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3482
			TMOO	mood
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3483
			TMT	media_type
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3484
			TOA	original_artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3485
			TOAL	original_album
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3486
			TOF	original_filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3487
			TOFN	original_filename
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3488
			TOL	original_lyricist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3489
			TOLY	original_lyricist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3490
			TOPE	original_artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3491
			TOR	original_year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3492
			TORY	original_year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3493
			TOT	original_album
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3494
			TOWN	file_owner
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3495
			TP1	artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3496
			TP2	band
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3497
			TP3	conductor
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3498
			TP4	remixer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3499
			TPA	part_of_a_set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3500
			TPB	publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3501
			TPE1	artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3502
			TPE2	band
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3503
			TPE3	conductor
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3504
			TPE4	remixer
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3505
			TPOS	part_of_a_set
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3506
			TPRO	produced_notice
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3507
			TPUB	publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3508
			TRC	isrc
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3509
			TRCK	track_number
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3510
			TRD	recording_dates
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3511
			TRDA	recording_dates
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3512
			TRK	track_number
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3513
			TRSN	internet_radio_station_name
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3514
			TRSO	internet_radio_station_owner
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3515
			TS2	album_artist_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3516
			TSA	album_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3517
			TSC	composer_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3518
			TSI	size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3519
			TSIZ	size
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3520
			TSO2	album_artist_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3521
			TSOA	album_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3522
			TSOC	composer_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3523
			TSOP	performer_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3524
			TSOT	title_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3525
			TSP	performer_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3526
			TSRC	isrc
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3527
			TSS	encoder_settings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3528
			TSSE	encoder_settings
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3529
			TSST	set_subtitle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3530
			TST	title_sort_order
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3531
			TT1	content_group_description
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3532
			TT2	title
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3533
			TT3	subtitle
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3534
			TXT	lyricist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3535
			TXX	text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3536
			TXXX	text
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3537
			TYE	year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3538
			TYER	year
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3539
			UFI	unique_file_identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3540
			UFID	unique_file_identifier
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3541
			ULT	unsychronised_lyric
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3542
			USER	terms_of_use
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3543
			USLT	unsynchronised_lyric
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3544
			WAF	url_file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3545
			WAR	url_artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3546
			WAS	url_source
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3547
			WCM	commercial_information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3548
			WCOM	commercial_information
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3549
			WCOP	copyright
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3550
			WCP	copyright
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3551
			WOAF	url_file
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3552
			WOAR	url_artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3553
			WOAS	url_source
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3554
			WORS	url_station
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3555
			WPAY	url_payment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3556
			WPB	url_publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3557
			WPUB	url_publisher
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3558
			WXX	url_user
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3559
			WXXX	url_user
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3560
			TFEA	featured_artist
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3561
			TSTU	recording_studio
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3562
			rgad	replay_gain_adjustment
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3563
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3564
		*/
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3565
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3566
		return getid3_lib::EmbeddedLookup($framename, $begin, __LINE__, __FILE__, 'id3v2-framename_short');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3567
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3568
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3569
	public static function TextEncodingTerminatorLookup($encoding) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3570
		// http://www.id3.org/id3v2.4.0-structure.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3571
		// Frames that allow different types of text encoding contains a text encoding description byte. Possible encodings:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3572
		static $TextEncodingTerminatorLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3573
			0   => "\x00",     // $00  ISO-8859-1. Terminated with $00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3574
			1   => "\x00\x00", // $01  UTF-16 encoded Unicode with BOM. All strings in the same frame SHALL have the same byteorder. Terminated with $00 00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3575
			2   => "\x00\x00", // $02  UTF-16BE encoded Unicode without BOM. Terminated with $00 00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3576
			3   => "\x00",     // $03  UTF-8 encoded Unicode. Terminated with $00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3577
			255 => "\x00\x00"
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3578
		);
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3579
		return (isset($TextEncodingTerminatorLookup[$encoding]) ? $TextEncodingTerminatorLookup[$encoding] : "\x00");
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3580
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3581
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3582
	public static function TextEncodingNameLookup($encoding) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3583
		// http://www.id3.org/id3v2.4.0-structure.txt
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3584
		// Frames that allow different types of text encoding contains a text encoding description byte. Possible encodings:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3585
		static $TextEncodingNameLookup = array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3586
			0   => 'ISO-8859-1', // $00  ISO-8859-1. Terminated with $00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3587
			1   => 'UTF-16',     // $01  UTF-16 encoded Unicode with BOM. All strings in the same frame SHALL have the same byteorder. Terminated with $00 00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3588
			2   => 'UTF-16BE',   // $02  UTF-16BE encoded Unicode without BOM. Terminated with $00 00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3589
			3   => 'UTF-8',      // $03  UTF-8 encoded Unicode. Terminated with $00.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3590
			255 => 'UTF-16BE'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3591
		);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3592
		return (isset($TextEncodingNameLookup[$encoding]) ? $TextEncodingNameLookup[$encoding] : 'ISO-8859-1');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3593
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3594
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3595
	public static function IsValidID3v2FrameName($framename, $id3v2majorversion) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3596
		switch ($id3v2majorversion) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3597
			case 2:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3598
				return preg_match('#[A-Z][A-Z0-9]{2}#', $framename);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3599
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3600
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3601
			case 3:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3602
			case 4:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3603
				return preg_match('#[A-Z][A-Z0-9]{3}#', $framename);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3604
				break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3605
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3606
		return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3607
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3608
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3609
	public static function IsANumber($numberstring, $allowdecimal=false, $allownegative=false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3610
		for ($i = 0; $i < strlen($numberstring); $i++) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3611
			if ((chr($numberstring{$i}) < chr('0')) || (chr($numberstring{$i}) > chr('9'))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3612
				if (($numberstring{$i} == '.') && $allowdecimal) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3613
					// allowed
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3614
				} elseif (($numberstring{$i} == '-') && $allownegative && ($i == 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3615
					// allowed
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3616
				} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3617
					return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3618
				}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3619
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3620
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3621
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3622
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3623
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3624
	public static function IsValidDateStampString($datestamp) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3625
		if (strlen($datestamp) != 8) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3626
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3627
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3628
		if (!self::IsANumber($datestamp, false)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3629
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3630
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3631
		$year  = substr($datestamp, 0, 4);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3632
		$month = substr($datestamp, 4, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3633
		$day   = substr($datestamp, 6, 2);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3634
		if (($year == 0) || ($month == 0) || ($day == 0)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3635
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3636
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3637
		if ($month > 12) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3638
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3639
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3640
		if ($day > 31) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3641
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3642
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3643
		if (($day > 30) && (($month == 4) || ($month == 6) || ($month == 9) || ($month == 11))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3644
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3645
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3646
		if (($day > 29) && ($month == 2)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3647
			return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3648
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3649
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3650
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3651
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3652
	public static function ID3v2HeaderLength($majorversion) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3653
		return (($majorversion == 2) ? 6 : 10);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3654
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3655
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3656
	public static function ID3v22iTunesBrokenFrameName($frame_name) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3657
		// iTunes (multiple versions) has been known to write ID3v2.3 style frames
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3658
		// but use ID3v2.2 frame names, right-padded using either [space] or [null]
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3659
		// to make them fit in the 4-byte frame name space of the ID3v2.3 frame.
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3660
		// This function will detect and translate the corrupt frame name into ID3v2.3 standard.
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3661
		static $ID3v22_iTunes_BrokenFrames = array(
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3662
			'BUF' => 'RBUF', // Recommended buffer size
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3663
			'CNT' => 'PCNT', // Play counter
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3664
			'COM' => 'COMM', // Comments
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3665
			'CRA' => 'AENC', // Audio encryption
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3666
			'EQU' => 'EQUA', // Equalisation
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3667
			'ETC' => 'ETCO', // Event timing codes
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3668
			'GEO' => 'GEOB', // General encapsulated object
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3669
			'IPL' => 'IPLS', // Involved people list
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3670
			'LNK' => 'LINK', // Linked information
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3671
			'MCI' => 'MCDI', // Music CD identifier
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3672
			'MLL' => 'MLLT', // MPEG location lookup table
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3673
			'PIC' => 'APIC', // Attached picture
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3674
			'POP' => 'POPM', // Popularimeter
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3675
			'REV' => 'RVRB', // Reverb
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3676
			'RVA' => 'RVAD', // Relative volume adjustment
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3677
			'SLT' => 'SYLT', // Synchronised lyric/text
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3678
			'STC' => 'SYTC', // Synchronised tempo codes
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3679
			'TAL' => 'TALB', // Album/Movie/Show title
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3680
			'TBP' => 'TBPM', // BPM (beats per minute)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3681
			'TCM' => 'TCOM', // Composer
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3682
			'TCO' => 'TCON', // Content type
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3683
			'TCP' => 'TCMP', // Part of a compilation
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3684
			'TCR' => 'TCOP', // Copyright message
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3685
			'TDA' => 'TDAT', // Date
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3686
			'TDY' => 'TDLY', // Playlist delay
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3687
			'TEN' => 'TENC', // Encoded by
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3688
			'TFT' => 'TFLT', // File type
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3689
			'TIM' => 'TIME', // Time
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3690
			'TKE' => 'TKEY', // Initial key
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3691
			'TLA' => 'TLAN', // Language(s)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3692
			'TLE' => 'TLEN', // Length
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3693
			'TMT' => 'TMED', // Media type
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3694
			'TOA' => 'TOPE', // Original artist(s)/performer(s)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3695
			'TOF' => 'TOFN', // Original filename
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3696
			'TOL' => 'TOLY', // Original lyricist(s)/text writer(s)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3697
			'TOR' => 'TORY', // Original release year
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3698
			'TOT' => 'TOAL', // Original album/movie/show title
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3699
			'TP1' => 'TPE1', // Lead performer(s)/Soloist(s)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3700
			'TP2' => 'TPE2', // Band/orchestra/accompaniment
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3701
			'TP3' => 'TPE3', // Conductor/performer refinement
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3702
			'TP4' => 'TPE4', // Interpreted, remixed, or otherwise modified by
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3703
			'TPA' => 'TPOS', // Part of a set
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3704
			'TPB' => 'TPUB', // Publisher
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3705
			'TRC' => 'TSRC', // ISRC (international standard recording code)
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3706
			'TRD' => 'TRDA', // Recording dates
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3707
			'TRK' => 'TRCK', // Track number/Position in set
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3708
			'TS2' => 'TSO2', // Album-Artist sort order
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3709
			'TSA' => 'TSOA', // Album sort order
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3710
			'TSC' => 'TSOC', // Composer sort order
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3711
			'TSI' => 'TSIZ', // Size
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3712
			'TSP' => 'TSOP', // Performer sort order
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3713
			'TSS' => 'TSSE', // Software/Hardware and settings used for encoding
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3714
			'TST' => 'TSOT', // Title sort order
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3715
			'TT1' => 'TIT1', // Content group description
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3716
			'TT2' => 'TIT2', // Title/songname/content description
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3717
			'TT3' => 'TIT3', // Subtitle/Description refinement
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3718
			'TXT' => 'TEXT', // Lyricist/Text writer
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3719
			'TXX' => 'TXXX', // User defined text information frame
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3720
			'TYE' => 'TYER', // Year
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3721
			'UFI' => 'UFID', // Unique file identifier
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3722
			'ULT' => 'USLT', // Unsynchronised lyric/text transcription
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3723
			'WAF' => 'WOAF', // Official audio file webpage
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3724
			'WAR' => 'WOAR', // Official artist/performer webpage
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3725
			'WAS' => 'WOAS', // Official audio source webpage
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3726
			'WCM' => 'WCOM', // Commercial information
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3727
			'WCP' => 'WCOP', // Copyright/Legal information
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3728
			'WPB' => 'WPUB', // Publishers official webpage
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3729
			'WXX' => 'WXXX', // User defined URL link frame
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3730
		);
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3731
		if (strlen($frame_name) == 4) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3732
			if ((substr($frame_name, 3, 1) == ' ') || (substr($frame_name, 3, 1) == "\x00")) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3733
				if (isset($ID3v22_iTunes_BrokenFrames[substr($frame_name, 0, 3)])) {
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3734
					return $ID3v22_iTunes_BrokenFrames[substr($frame_name, 0, 3)];
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3735
				}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3736
			}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3737
		}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3738
		return false;
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3739
	}
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
  3740
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
  3741
}