38 {
39 $info = &$this->getid3->info;
40
41 $info[
'fileformat'] =
'real';
43 $info[
'playtime_seconds'] = 0;
44
45 fseek($this->getid3->fp,
$info[
'avdataoffset'], SEEK_SET);
46 $ChunkCounter = 0;
47 while (
ftell($this->getid3->fp) <
$info[
'avdataend']) {
48 $ChunkData =
fread($this->getid3->fp, 8);
49 $ChunkName = substr($ChunkData, 0, 4);
51
52 if ($ChunkName == '.ra'."\xFD") {
53 $ChunkData .=
fread($this->getid3->fp, $ChunkSize - 8);
55 $info[
'audio'][
'dataformat'] =
'real';
56 $info[
'audio'][
'lossless'] =
false;
57 $info[
'audio'][
'sample_rate'] =
$info[
'real'][
'old_ra_header'][
'sample_rate'];
58 $info[
'audio'][
'bits_per_sample'] =
$info[
'real'][
'old_ra_header'][
'bits_per_sample'];
59 $info[
'audio'][
'channels'] =
$info[
'real'][
'old_ra_header'][
'channels'];
60
61 $info[
'playtime_seconds'] = 60 * (
$info[
'real'][
'old_ra_header'][
'audio_bytes'] /
$info[
'real'][
'old_ra_header'][
'bytes_per_minute']);
62 $info[
'audio'][
'bitrate'] = 8 * (
$info[
'real'][
'old_ra_header'][
'audio_bytes'] /
$info[
'playtime_seconds']);
64
65 foreach (
$info[
'real'][
'old_ra_header'][
'comments'] as $key => $valuearray) {
66 if (strlen(trim($valuearray[0])) > 0) {
67 $info[
'real'][
'comments'][$key][] = trim($valuearray[0]);
68 }
69 }
70
71 return true;
72 }
73 $info[
'error'][] =
'There was a problem parsing this RealAudio file. Please submit it for analysis to info@getid3.org';
74 unset(
$info[
'bitrate']);
75 unset(
$info[
'playtime_seconds']);
76
77 return false;
78 }
79
80
81 $info[
'real'][
'chunks'][$ChunkCounter] = array();
82 $thisfile_real_chunks_currentchunk = &
$info[
'real'][
'chunks'][$ChunkCounter];
83
84 $thisfile_real_chunks_currentchunk['name'] = $ChunkName;
85 $thisfile_real_chunks_currentchunk[
'offset'] =
ftell($this->getid3->fp) - 8;
86 $thisfile_real_chunks_currentchunk['length'] = $ChunkSize;
87 if (($thisfile_real_chunks_currentchunk[
'offset'] + $thisfile_real_chunks_currentchunk[
'length']) >
$info[
'avdataend']) {
88 $info[
'warning'][] =
'Chunk "'.$thisfile_real_chunks_currentchunk[
'name'].
'" at offset '.$thisfile_real_chunks_currentchunk[
'offset'].
' claims to be '.$thisfile_real_chunks_currentchunk[
'length'].
' bytes long, which is beyond end of file';
89
90 return false;
91 }
92
93 if ($ChunkSize > ($this->getid3->fread_buffer_size() + 8)) {
94
95 $ChunkData .=
fread($this->getid3->fp, $this->getid3->fread_buffer_size() - 8);
96 fseek($this->getid3->fp, $thisfile_real_chunks_currentchunk[
'offset'] + $ChunkSize, SEEK_SET);
97
98 } elseif (($ChunkSize - 8) > 0) {
99
100 $ChunkData .=
fread($this->getid3->fp, $ChunkSize - 8);
101
102 }
103 $offset = 8;
104
105 switch ($ChunkName) {
106
107 case '.RMF':
108 $thisfile_real_chunks_currentchunk[
'object_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
109 $offset += 2;
110 switch ($thisfile_real_chunks_currentchunk['object_version']) {
111
112 case 0:
113 $thisfile_real_chunks_currentchunk[
'file_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
114 $offset += 4;
115 $thisfile_real_chunks_currentchunk[
'headers_count'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
116 $offset += 4;
117 break;
118
119 default:
120
121 break;
122
123 }
124 break;
125
126 case 'PROP':
127 $thisfile_real_chunks_currentchunk[
'object_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
128 $offset += 2;
129 if ($thisfile_real_chunks_currentchunk['object_version'] == 0) {
130 $thisfile_real_chunks_currentchunk[
'max_bit_rate'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
131 $offset += 4;
132 $thisfile_real_chunks_currentchunk[
'avg_bit_rate'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
133 $offset += 4;
134 $thisfile_real_chunks_currentchunk[
'max_packet_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
135 $offset += 4;
136 $thisfile_real_chunks_currentchunk[
'avg_packet_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
137 $offset += 4;
138 $thisfile_real_chunks_currentchunk[
'num_packets'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
139 $offset += 4;
140 $thisfile_real_chunks_currentchunk[
'duration'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
141 $offset += 4;
142 $thisfile_real_chunks_currentchunk[
'preroll'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
143 $offset += 4;
144 $thisfile_real_chunks_currentchunk[
'index_offset'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
145 $offset += 4;
146 $thisfile_real_chunks_currentchunk[
'data_offset'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
147 $offset += 4;
148 $thisfile_real_chunks_currentchunk[
'num_streams'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
149 $offset += 2;
150 $thisfile_real_chunks_currentchunk[
'flags_raw'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
151 $offset += 2;
152 $info[
'playtime_seconds'] = $thisfile_real_chunks_currentchunk[
'duration'] / 1000;
153 if ($thisfile_real_chunks_currentchunk['duration'] > 0) {
154 $info[
'bitrate'] += $thisfile_real_chunks_currentchunk[
'avg_bit_rate'];
155 }
156 $thisfile_real_chunks_currentchunk['flags']['save_enabled'] = (bool) ($thisfile_real_chunks_currentchunk['flags_raw'] & 0x0001);
157 $thisfile_real_chunks_currentchunk['flags']['perfect_play'] = (bool) ($thisfile_real_chunks_currentchunk['flags_raw'] & 0x0002);
158 $thisfile_real_chunks_currentchunk['flags']['live_broadcast'] = (bool) ($thisfile_real_chunks_currentchunk['flags_raw'] & 0x0004);
159 }
160 break;
161
162 case 'MDPR':
163 $thisfile_real_chunks_currentchunk[
'object_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
164 $offset += 2;
165 if ($thisfile_real_chunks_currentchunk['object_version'] == 0) {
166 $thisfile_real_chunks_currentchunk[
'stream_number'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
167 $offset += 2;
168 $thisfile_real_chunks_currentchunk[
'max_bit_rate'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
169 $offset += 4;
170 $thisfile_real_chunks_currentchunk[
'avg_bit_rate'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
171 $offset += 4;
172 $thisfile_real_chunks_currentchunk[
'max_packet_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
173 $offset += 4;
174 $thisfile_real_chunks_currentchunk[
'avg_packet_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
175 $offset += 4;
176 $thisfile_real_chunks_currentchunk[
'start_time'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
177 $offset += 4;
178 $thisfile_real_chunks_currentchunk[
'preroll'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
179 $offset += 4;
180 $thisfile_real_chunks_currentchunk[
'duration'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
181 $offset += 4;
182 $thisfile_real_chunks_currentchunk[
'stream_name_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 1));
183 $offset += 1;
184 $thisfile_real_chunks_currentchunk['stream_name'] = substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['stream_name_size']);
185 $offset += $thisfile_real_chunks_currentchunk['stream_name_size'];
186 $thisfile_real_chunks_currentchunk[
'mime_type_size'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 1));
187 $offset += 1;
188 $thisfile_real_chunks_currentchunk['mime_type'] = substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['mime_type_size']);
189 $offset += $thisfile_real_chunks_currentchunk['mime_type_size'];
190 $thisfile_real_chunks_currentchunk[
'type_specific_len'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
191 $offset += 4;
192 $thisfile_real_chunks_currentchunk['type_specific_data'] = substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['type_specific_len']);
193 $offset += $thisfile_real_chunks_currentchunk['type_specific_len'];
194
195
196 $thisfile_real_chunks_currentchunk_typespecificdata = &$thisfile_real_chunks_currentchunk['type_specific_data'];
197
198 switch ($thisfile_real_chunks_currentchunk['mime_type']) {
199 case 'video/x-pn-realvideo':
200 case 'video/x-pn-multirate-realvideo':
201
202
203
204 $thisfile_real_chunks_currentchunk['video_info'] = array();
205 $thisfile_real_chunks_currentchunk_videoinfo = &$thisfile_real_chunks_currentchunk['video_info'];
206
207 $thisfile_real_chunks_currentchunk_videoinfo[
'dwSize'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, 0, 4));
208 $thisfile_real_chunks_currentchunk_videoinfo['fourcc1'] = substr($thisfile_real_chunks_currentchunk_typespecificdata, 4, 4);
209 $thisfile_real_chunks_currentchunk_videoinfo['fourcc2'] = substr($thisfile_real_chunks_currentchunk_typespecificdata, 8, 4);
210 $thisfile_real_chunks_currentchunk_videoinfo[
'width'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, 12, 2));
211 $thisfile_real_chunks_currentchunk_videoinfo[
'height'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, 14, 2));
212 $thisfile_real_chunks_currentchunk_videoinfo[
'bits_per_sample'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, 16, 2));
213
214
215 $thisfile_real_chunks_currentchunk_videoinfo[
'frames_per_second'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, 22, 2));
216
217
218
219
220
221
222
223
224 $thisfile_real_chunks_currentchunk_videoinfo[
'codec'] =
Riff::RIFFfourccLookup($thisfile_real_chunks_currentchunk_videoinfo[
'fourcc2']);
225
226 $info[
'video'][
'resolution_x'] = $thisfile_real_chunks_currentchunk_videoinfo[
'width'];
227 $info[
'video'][
'resolution_y'] = $thisfile_real_chunks_currentchunk_videoinfo[
'height'];
228 $info[
'video'][
'frame_rate'] = (float) $thisfile_real_chunks_currentchunk_videoinfo[
'frames_per_second'];
229 $info[
'video'][
'codec'] = $thisfile_real_chunks_currentchunk_videoinfo[
'codec'];
230 $info[
'video'][
'bits_per_sample'] = $thisfile_real_chunks_currentchunk_videoinfo[
'bits_per_sample'];
231 break;
232
233 case 'audio/x-pn-realaudio':
234 case 'audio/x-pn-multirate-realaudio':
235 $this->
ParseOldRAheader($thisfile_real_chunks_currentchunk_typespecificdata, $thisfile_real_chunks_currentchunk[
'parsed_audio_data']);
236
237 $info[
'audio'][
'sample_rate'] = $thisfile_real_chunks_currentchunk[
'parsed_audio_data'][
'sample_rate'];
238 $info[
'audio'][
'bits_per_sample'] = $thisfile_real_chunks_currentchunk[
'parsed_audio_data'][
'bits_per_sample'];
239 $info[
'audio'][
'channels'] = $thisfile_real_chunks_currentchunk[
'parsed_audio_data'][
'channels'];
240 if (!empty(
$info[
'audio'][
'dataformat'])) {
241 foreach (
$info[
'audio'] as $key => $value) {
242 if ($key != 'streams') {
243 $info[
'audio'][
'streams'][$thisfile_real_chunks_currentchunk[
'stream_number']][$key] = $value;
244 }
245 }
246 }
247 break;
248
249 case 'logical-fileinfo':
250
251 $thisfile_real_chunks_currentchunk['logical_fileinfo'] = array();
252 $thisfile_real_chunks_currentchunk_logicalfileinfo = &$thisfile_real_chunks_currentchunk['logical_fileinfo'];
253
254 $thisfile_real_chunks_currentchunk_logicalfileinfo_offset = 0;
255 $thisfile_real_chunks_currentchunk_logicalfileinfo[
'logical_fileinfo_length'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, $thisfile_real_chunks_currentchunk_logicalfileinfo_offset, 4));
256 $thisfile_real_chunks_currentchunk_logicalfileinfo_offset += 4;
257
258
259 $thisfile_real_chunks_currentchunk_logicalfileinfo_offset += 4;
260
261 $thisfile_real_chunks_currentchunk_logicalfileinfo[
'num_tags'] =
Helper::BigEndian2Int(substr($thisfile_real_chunks_currentchunk_typespecificdata, $thisfile_real_chunks_currentchunk_logicalfileinfo_offset, 4));
262 $thisfile_real_chunks_currentchunk_logicalfileinfo_offset += 4;
263
264
265 $thisfile_real_chunks_currentchunk_logicalfileinfo_offset += 4;
266
267
268
269
270
271
272
273
274 break;
275
276 }
277
278 if (empty(
$info[
'playtime_seconds'])) {
279 $info[
'playtime_seconds'] = max(
$info[
'playtime_seconds'], ($thisfile_real_chunks_currentchunk[
'duration'] + $thisfile_real_chunks_currentchunk[
'start_time']) / 1000);
280 }
281 if ($thisfile_real_chunks_currentchunk['duration'] > 0) {
282 switch ($thisfile_real_chunks_currentchunk['mime_type']) {
283 case 'audio/x-pn-realaudio':
284 case 'audio/x-pn-multirate-realaudio':
285 $info[
'audio'][
'bitrate'] = (isset(
$info[
'audio'][
'bitrate']) ?
$info[
'audio'][
'bitrate'] : 0) + $thisfile_real_chunks_currentchunk[
'avg_bit_rate'];
287 $info[
'audio'][
'dataformat'] =
'real';
288 $info[
'audio'][
'lossless'] =
false;
289 break;
290
291 case 'video/x-pn-realvideo':
292 case 'video/x-pn-multirate-realvideo':
293 $info[
'video'][
'bitrate'] = (isset(
$info[
'video'][
'bitrate']) ?
$info[
'video'][
'bitrate'] : 0) + $thisfile_real_chunks_currentchunk[
'avg_bit_rate'];
294 $info[
'video'][
'bitrate_mode'] =
'cbr';
295 $info[
'video'][
'dataformat'] =
'real';
296 $info[
'video'][
'lossless'] =
false;
297 $info[
'video'][
'pixel_aspect_ratio'] = (float) 1;
298 break;
299
300 case 'audio/x-ralf-mpeg4-generic':
301 $info[
'audio'][
'bitrate'] = (isset(
$info[
'audio'][
'bitrate']) ?
$info[
'audio'][
'bitrate'] : 0) + $thisfile_real_chunks_currentchunk[
'avg_bit_rate'];
302 $info[
'audio'][
'codec'] =
'RealAudio Lossless';
303 $info[
'audio'][
'dataformat'] =
'real';
304 $info[
'audio'][
'lossless'] =
true;
305 break;
306 }
307 $info[
'bitrate'] = (isset(
$info[
'video'][
'bitrate']) ?
$info[
'video'][
'bitrate'] : 0) + (isset(
$info[
'audio'][
'bitrate']) ?
$info[
'audio'][
'bitrate'] : 0);
308 }
309 }
310 break;
311
312 case 'CONT':
313 $thisfile_real_chunks_currentchunk[
'object_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
314 $offset += 2;
315 if ($thisfile_real_chunks_currentchunk['object_version'] == 0) {
316 $thisfile_real_chunks_currentchunk[
'title_len'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
317 $offset += 2;
318 $thisfile_real_chunks_currentchunk['title'] = (string) substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['title_len']);
319 $offset += $thisfile_real_chunks_currentchunk['title_len'];
320
321 $thisfile_real_chunks_currentchunk[
'artist_len'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
322 $offset += 2;
323 $thisfile_real_chunks_currentchunk['artist'] = (string) substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['artist_len']);
324 $offset += $thisfile_real_chunks_currentchunk['artist_len'];
325
326 $thisfile_real_chunks_currentchunk[
'copyright_len'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
327 $offset += 2;
328 $thisfile_real_chunks_currentchunk['copyright'] = (string) substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['copyright_len']);
329 $offset += $thisfile_real_chunks_currentchunk['copyright_len'];
330
331 $thisfile_real_chunks_currentchunk[
'comment_len'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
332 $offset += 2;
333 $thisfile_real_chunks_currentchunk['comment'] = (string) substr($ChunkData, $offset, $thisfile_real_chunks_currentchunk['comment_len']);
334 $offset += $thisfile_real_chunks_currentchunk['comment_len'];
335
336 $commentkeystocopy = array('title'=>'title', 'artist'=>'artist', 'copyright'=>'copyright', 'comment'=>'comment');
337 foreach ($commentkeystocopy as $key => $val) {
338 if ($thisfile_real_chunks_currentchunk[$key]) {
339 $info[
'real'][
'comments'][$val][] = trim($thisfile_real_chunks_currentchunk[$key]);
340 }
341 }
342
343 }
344 break;
345
346 case 'DATA':
347
348 break;
349
350 case 'INDX':
351 $thisfile_real_chunks_currentchunk[
'object_version'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
352 $offset += 2;
353 if ($thisfile_real_chunks_currentchunk['object_version'] == 0) {
354 $thisfile_real_chunks_currentchunk[
'num_indices'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
355 $offset += 4;
356 $thisfile_real_chunks_currentchunk[
'stream_number'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 2));
357 $offset += 2;
358 $thisfile_real_chunks_currentchunk[
'next_index_header'] =
Helper::BigEndian2Int(substr($ChunkData, $offset, 4));
359 $offset += 4;
360
361 if ($thisfile_real_chunks_currentchunk['next_index_header'] == 0) {
362
363 break 2;
364 } else {
365
366 fseek($this->getid3->fp, $thisfile_real_chunks_currentchunk[
'next_index_header'], SEEK_SET);
367 }
368 }
369 break;
370
371 default:
372 $info[
'warning'][] =
'Unhandled RealMedia chunk "'.$ChunkName.
'" at offset '.$thisfile_real_chunks_currentchunk[
'offset'];
373 break;
374 }
375 $ChunkCounter++;
376 }
377
378 if (!empty(
$info[
'audio'][
'streams'])) {
379 $info[
'audio'][
'bitrate'] = 0;
380 foreach (
$info[
'audio'][
'streams'] as $key => $valuearray) {
381 $info[
'audio'][
'bitrate'] += $valuearray[
'bitrate'];
382 }
383 }
384
385 return true;
386 }
fseek($bytes, $whence=SEEK_SET)
static BigEndian2Int($byteword, $synchsafe=false, $signed=false)
RealAudioCodecFourCClookup($fourcc, $bitrate)
@staticvar array $RealAudioCodecFourCClookup
ParseOldRAheader($OldRAheaderData, &$ParsedArray)
static RIFFfourccLookup($fourcc)