www/plugins-dist/medias/lib/getid3/module.audio.rkau.php

   1 <?php
   2 /////////////////////////////////////////////////////////////////
   3 /// getID3() by James Heinrich <info@getid3.org>               //
   4 //  available at http://getid3.sourceforge.net                 //
   5 //            or http://www.getid3.org                         //
   6 //          also https://github.com/JamesHeinrich/getID3       //
   7 /////////////////////////////////////////////////////////////////
   8 // See readme.txt for more details                             //
   9 /////////////////////////////////////////////////////////////////
  10 //                                                             //
  11 // module.audio.shorten.php                                    //
  12 // module for analyzing Shorten Audio files                    //
  13 // dependencies: NONE                                          //
  14 //                                                            ///
  15 /////////////////////////////////////////////////////////////////
  16
  17
  18 class getid3_rkau extends getid3_handler
  19 {
  20
  21         public function Analyze() {
  22                 $info = &$this->getid3->info;
  23
  24                 $this->fseek($info['avdataoffset']);
  25                 $RKAUHeader = $this->fread(20);
  26                 $magic = 'RKA';
  27                 if (substr($RKAUHeader, 0, 3) != $magic) {
  28                         $this->error('Expecting "'.getid3_lib::PrintHexBytes($magic).'" at offset '.$info['avdataoffset'].', found "'.getid3_lib::PrintHexBytes(substr($RKAUHeader, 0, 3)).'"');
  29                         return false;
  30                 }
  31
  32                 $info['fileformat']            = 'rkau';
  33                 $info['audio']['dataformat']   = 'rkau';
  34                 $info['audio']['bitrate_mode'] = 'vbr';
  35
  36                 $info['rkau']['raw']['version']   = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 3, 1));
  37                 $info['rkau']['version']          = '1.'.str_pad($info['rkau']['raw']['version'] & 0x0F, 2, '0', STR_PAD_LEFT);
  38                 if (($info['rkau']['version'] > 1.07) || ($info['rkau']['version'] < 1.06)) {
  39                         $this->error('This version of getID3() ['.$this->getid3->version().'] can only parse RKAU files v1.06 and 1.07 (this file is v'.$info['rkau']['version'].')');
  40                         unset($info['rkau']);
  41                         return false;
  42                 }
  43
  44                 $info['rkau']['source_bytes']     = getid3_lib::LittleEndian2Int(substr($RKAUHeader,  4, 4));
  45                 $info['rkau']['sample_rate']      = getid3_lib::LittleEndian2Int(substr($RKAUHeader,  8, 4));
  46                 $info['rkau']['channels']         = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 12, 1));
  47                 $info['rkau']['bits_per_sample']  = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 13, 1));
  48
  49                 $info['rkau']['raw']['quality']   = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 14, 1));
  50                 $this->RKAUqualityLookup($info['rkau']);
  51
  52                 $info['rkau']['raw']['flags']            = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 15, 1));
  53                 $info['rkau']['flags']['joint_stereo']   = (bool) (!($info['rkau']['raw']['flags'] & 0x01));
  54                 $info['rkau']['flags']['streaming']      =  (bool)  ($info['rkau']['raw']['flags'] & 0x02);
  55                 $info['rkau']['flags']['vrq_lossy_mode'] =  (bool)  ($info['rkau']['raw']['flags'] & 0x04);
  56
  57                 if ($info['rkau']['flags']['streaming']) {
  58                         $info['avdataoffset'] += 20;
  59                         $info['rkau']['compressed_bytes']  = getid3_lib::LittleEndian2Int(substr($RKAUHeader, 16, 4));
  60                 } else {
  61                         $info['avdataoffset'] += 16;
  62                         $info['rkau']['compressed_bytes'] = $info['avdataend'] - $info['avdataoffset'] - 1;
  63                 }
  64                 // Note: compressed_bytes does not always equal what appears to be the actual number of compressed bytes,
  65                 // sometimes it's more, sometimes less. No idea why(?)
  66
  67                 $info['audio']['lossless']        = $info['rkau']['lossless'];
  68                 $info['audio']['channels']        = $info['rkau']['channels'];
  69                 $info['audio']['bits_per_sample'] = $info['rkau']['bits_per_sample'];
  70                 $info['audio']['sample_rate']     = $info['rkau']['sample_rate'];
  71
  72                 $info['playtime_seconds']         = $info['rkau']['source_bytes'] / ($info['rkau']['sample_rate'] * $info['rkau']['channels'] * ($info['rkau']['bits_per_sample'] / 8));
  73                 $info['audio']['bitrate']         = ($info['rkau']['compressed_bytes'] * 8) / $info['playtime_seconds'];
  74
  75                 return true;
  76
  77         }
  78
  79
  80         public function RKAUqualityLookup(&$RKAUdata) {
  81                 $level   = ($RKAUdata['raw']['quality'] & 0xF0) >> 4;
  82                 $quality =  $RKAUdata['raw']['quality'] & 0x0F;
  83
  84                 $RKAUdata['lossless']          = (($quality == 0) ? true : false);
  85                 $RKAUdata['compression_level'] = $level + 1;
  86                 if (!$RKAUdata['lossless']) {
  87                         $RKAUdata['quality_setting'] = $quality;
  88                 }
  89
  90                 return true;
  91         }
  92
  93 }