<?php
/////////////////////////////////////////////////////////////////
/// getID3() by James Heinrich <info@getid3.org>               //
//  available at http://getid3.sourceforge.net                 //
//            or http://www.getid3.org                         //
//          also https://github.com/JamesHeinrich/getID3       //
/////////////////////////////////////////////////////////////////
// See readme.txt for more details                             //
/////////////////////////////////////////////////////////////////
//                                                             //
// module.audio.shorten.php                                    //
// module for analyzing Shorten Audio files                    //
// dependencies: NONE                                          //
//                                                            ///
/////////////////////////////////////////////////////////////////


class getid3_shorten extends getid3_handler
{

    public function 
Analyze() {
        
$info = &$this->getid3->info;

        
$this->fseek($info['avdataoffset']);

        
$ShortenHeader $this->fread(8);
        
$magic 'ajkg';
        if (
substr($ShortenHeader04) != $magic) {
            
$info['error'][] = 'Expecting "'.getid3_lib::PrintHexBytes($magic).'" at offset '.$info['avdataoffset'].', found "'.getid3_lib::PrintHexBytes(substr($ShortenHeader04)).'"';
            return 
false;
        }
        
$info['fileformat']            = 'shn';
        
$info['audio']['dataformat']   = 'shn';
        
$info['audio']['lossless']     = true;
        
$info['audio']['bitrate_mode'] = 'vbr';

        
$info['shn']['version'] = getid3_lib::LittleEndian2Int(substr($ShortenHeader41));

        
$this->fseek($info['avdataend'] - 12);
        
$SeekTableSignatureTest $this->fread(12);
        
$info['shn']['seektable']['present'] = (bool) (substr($SeekTableSignatureTest48) == 'SHNAMPSK');
        if (
$info['shn']['seektable']['present']) {
            
$info['shn']['seektable']['length'] = getid3_lib::LittleEndian2Int(substr($SeekTableSignatureTest04));
            
$info['shn']['seektable']['offset'] = $info['avdataend'] - $info['shn']['seektable']['length'];
            
$this->fseek($info['shn']['seektable']['offset']);
            
$SeekTableMagic $this->fread(4);
            
$magic 'SEEK';
            if (
$SeekTableMagic != $magic) {

                
$info['error'][] = 'Expecting "'.getid3_lib::PrintHexBytes($magic).'" at offset '.$info['shn']['seektable']['offset'].', found "'.getid3_lib::PrintHexBytes($SeekTableMagic).'"';
                return 
false;

            } else {

                
// typedef struct tag_TSeekEntry
                // {
                //   unsigned long SampleNumber;
                //   unsigned long SHNFileByteOffset;
                //   unsigned long SHNLastBufferReadPosition;
                //   unsigned short SHNByteGet;
                //   unsigned short SHNBufferOffset;
                //   unsigned short SHNFileBitOffset;
                //   unsigned long SHNGBuffer;
                //   unsigned short SHNBitShift;
                //   long CBuf0[3];
                //   long CBuf1[3];
                //   long Offset0[4];
                //   long Offset1[4];
                // }TSeekEntry;

                
$SeekTableData $this->fread($info['shn']['seektable']['length'] - 16);
                
$info['shn']['seektable']['entry_count'] = floor(strlen($SeekTableData) / 80);
                
//$info['shn']['seektable']['entries'] = array();
                //$SeekTableOffset = 0;
                //for ($i = 0; $i < $info['shn']['seektable']['entry_count']; $i++) {
                //    $SeekTableEntry['sample_number'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //    $SeekTableOffset += 4;
                //    $SeekTableEntry['shn_file_byte_offset'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //    $SeekTableOffset += 4;
                //    $SeekTableEntry['shn_last_buffer_read_position'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //    $SeekTableOffset += 4;
                //    $SeekTableEntry['shn_byte_get'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
                //    $SeekTableOffset += 2;
                //    $SeekTableEntry['shn_buffer_offset'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
                //    $SeekTableOffset += 2;
                //    $SeekTableEntry['shn_file_bit_offset'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
                //    $SeekTableOffset += 2;
                //    $SeekTableEntry['shn_gbuffer'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //    $SeekTableOffset += 4;
                //    $SeekTableEntry['shn_bit_shift'] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 2));
                //    $SeekTableOffset += 2;
                //    for ($j = 0; $j < 3; $j++) {
                //        $SeekTableEntry['cbuf0'][$j] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //        $SeekTableOffset += 4;
                //    }
                //    for ($j = 0; $j < 3; $j++) {
                //        $SeekTableEntry['cbuf1'][$j] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //        $SeekTableOffset += 4;
                //    }
                //    for ($j = 0; $j < 4; $j++) {
                //        $SeekTableEntry['offset0'][$j] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //        $SeekTableOffset += 4;
                //    }
                //    for ($j = 0; $j < 4; $j++) {
                //        $SeekTableEntry['offset1'][$j] = getid3_lib::LittleEndian2Int(substr($SeekTableData, $SeekTableOffset, 4));
                //        $SeekTableOffset += 4;
                //    }
                //
                //    $info['shn']['seektable']['entries'][] = $SeekTableEntry;
                //}

            
}

        }

        if (
preg_match('#(1|ON)#i'ini_get('safe_mode'))) {
            
$info['error'][] = 'PHP running in Safe Mode - backtick operator not available, cannot run shntool to analyze Shorten files';
            return 
false;
        }

        if (
GETID3_OS_ISWINDOWS) {

            
$RequiredFiles = array('shorten.exe''cygwin1.dll''head.exe');
            foreach (
$RequiredFiles as $required_file) {
                if (!
is_readable(GETID3_HELPERAPPSDIR.$required_file)) {
                    
$info['error'][] = GETID3_HELPERAPPSDIR.$required_file.' does not exist';
                    return 
false;
                }
            }
            
$commandline GETID3_HELPERAPPSDIR.'shorten.exe -x "'.$info['filenamepath'].'" - | '.GETID3_HELPERAPPSDIR.'head.exe -c 64';
            
$commandline str_replace('/''\\'$commandline);

        } else {

            static 
$shorten_present;
            if (!isset(
$shorten_present)) {
                
$shorten_present file_exists('/usr/local/bin/shorten') || `which shorten`;
            }
            if (!
$shorten_present) {
                
$info['error'][] = 'shorten binary was not found in path or /usr/local/bin';
                return 
false;
            }
            
$commandline = (file_exists('/usr/local/bin/shorten') ? '/usr/local/bin/' '' ) . 'shorten -x '.escapeshellarg($info['filenamepath']).' - | head -c 64';

        }

        
$output = `$commandline`;

        if (!empty(
$output) && (substr($output124) == 'fmt ')) {

            
getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio-video.riff.php'__FILE__true);

            
$fmt_size getid3_lib::LittleEndian2Int(substr($output164));
            
$DecodedWAVFORMATEX getid3_riff::parseWAVEFORMATex(substr($output20$fmt_size));
            
$info['audio']['channels']        = $DecodedWAVFORMATEX['channels'];
            
$info['audio']['bits_per_sample'] = $DecodedWAVFORMATEX['bits_per_sample'];
            
$info['audio']['sample_rate']     = $DecodedWAVFORMATEX['sample_rate'];

            if (
substr($output20 $fmt_size4) == 'data') {

                
$info['playtime_seconds'] = getid3_lib::LittleEndian2Int(substr($output20 $fmt_size4)) / $DecodedWAVFORMATEX['raw']['nAvgBytesPerSec'];

            } else {

                
$info['error'][] = 'shorten failed to decode DATA chunk to expected location, cannot determine playtime';
                return 
false;

            }

            
$info['audio']['bitrate'] = (($info['avdataend'] - $info['avdataoffset']) / $info['playtime_seconds']) * 8;

        } else {

            
$info['error'][] = 'shorten failed to decode file to WAV for parsing';
            return 
false;

        }

        return 
true;
    }

}