Login   Register  
PHP Classes
elePHPant
Icontem

File: includes/getid3/module.archive.tar.php

Recommend this page to a friend!
Stumble It! Stumble It! Bookmark in del.icio.us Bookmark in del.icio.us
  Classes of Karl Holz  >  WaldScan  >  includes/getid3/module.archive.tar.php  >  Download  
File: includes/getid3/module.archive.tar.php
Role: Auxiliary script
Content type: text/plain
Description: getID3 dependency
Class: WaldScan
Scan directories for files with certain extensions
Author: By
Last change:
Date: 1 year ago
Size: 6,714 bytes
 

Contents

Class file image Download
<?php
/////////////////////////////////////////////////////////////////
/// getID3() by James Heinrich <info@getid3.org>               //
//  available at http://getid3.sourceforge.net                 //
//            or http://www.getid3.org                         //
/////////////////////////////////////////////////////////////////
// See readme.txt for more details                             //
/////////////////////////////////////////////////////////////////
//                                                             //
// module.archive.tar.php                                      //
// module for analyzing TAR files                              //
// dependencies: NONE                                          //
//                                                            ///
/////////////////////////////////////////////////////////////////
//                                                             //
// Module originally written by                                //
//      Mike Mozolin <teddybearØmail*ru>                       //
//                                                             //
/////////////////////////////////////////////////////////////////


class getid3_tar extends getid3_handler
{

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

        
$info['fileformat'] = 'tar';
        
$info['tar']['files'] = array();

        
$unpack_header 'a100fname/a8mode/a8uid/a8gid/a12size/a12mtime/a8chksum/a1typflag/a100lnkname/a6magic/a2ver/a32uname/a32gname/a8devmaj/a8devmin/a155prefix';
        
$null_512k str_repeat("\x00"512); // end-of-file marker

        
fseek($this->getid3->fp0);
        while (!
feof($this->getid3->fp)) {
            
$buffer fread($this->getid3->fp512);
            if (
strlen($buffer) < 512) {
                break;
            }

            
// check the block
            
$checksum 0;
            for (
$i 0$i 148$i++) {
                
$checksum += ord($buffer{$i});
            }
            for (
$i 148$i 156$i++) {
                
$checksum += ord(' ');
            }
            for (
$i 156$i 512$i++) {
                
$checksum += ord($buffer{$i});
            }
            
$attr    unpack($unpack_header$buffer);
            
$name    =       (isset($attr['fname']  ) ? trim($attr['fname']  ) : '');
            
$mode    octdec(isset($attr['mode']   ) ? trim($attr['mode']   ) : '');
            
$uid     octdec(isset($attr['uid']    ) ? trim($attr['uid']    ) : '');
            
$gid     octdec(isset($attr['gid']    ) ? trim($attr['gid']    ) : '');
            
$size    octdec(isset($attr['size']   ) ? trim($attr['size']   ) : '');
            
$mtime   octdec(isset($attr['mtime']  ) ? trim($attr['mtime']  ) : '');
            
$chksum  octdec(isset($attr['chksum'] ) ? trim($attr['chksum'] ) : '');
            
$typflag =       (isset($attr['typflag']) ? trim($attr['typflag']) : '');
            
$lnkname =       (isset($attr['lnkname']) ? trim($attr['lnkname']) : '');
            
$magic   =       (isset($attr['magic']  ) ? trim($attr['magic']  ) : '');
            
$ver     =       (isset($attr['ver']    ) ? trim($attr['ver']    ) : '');
            
$uname   =       (isset($attr['uname']  ) ? trim($attr['uname']  ) : '');
            
$gname   =       (isset($attr['gname']  ) ? trim($attr['gname']  ) : '');
            
$devmaj  octdec(isset($attr['devmaj'] ) ? trim($attr['devmaj'] ) : '');
            
$devmin  octdec(isset($attr['devmin'] ) ? trim($attr['devmin'] ) : '');
            
$prefix  =       (isset($attr['prefix'] ) ? trim($attr['prefix'] ) : '');
            if ((
$checksum == 256) && ($chksum == 0)) {
                
// EOF Found
                
break;
            }
            if (
$prefix) {
                
$name $prefix.'/'.$name;
            }
            if ((
preg_match('#/$#'$name)) && !$name) {
                
$typeflag 5;
            }
            if (
$buffer == $null_512k) {
                
// it's the end of the tar-file...
                
break;
            }

            
// Read to the next chunk
            
fseek($this->getid3->fp$sizeSEEK_CUR);

            
$diff $size 512;
            if (
$diff != 0) {
                
// Padding, throw away
                
fseek($this->getid3->fp, (512 $diff), SEEK_CUR);
            }
            
// Protect against tar-files with garbage at the end
            
if ($name == '') {
                break;
            }
            
$info['tar']['file_details'][$name] = array (
                
'name'     => $name,
                
'mode_raw' => $mode,
                
'mode'     => getid3_tar::display_perms($mode),
                
'uid'      => $uid,
                
'gid'      => $gid,
                
'size'     => $size,
                
'mtime'    => $mtime,
                
'chksum'   => $chksum,
                
'typeflag' => getid3_tar::get_flag_type($typflag),
                
'linkname' => $lnkname,
                
'magic'    => $magic,
                
'version'  => $ver,
                
'uname'    => $uname,
                
'gname'    => $gname,
                
'devmajor' => $devmaj,
                
'devminor' => $devmin
            
);
            
$info['tar']['files'] = getid3_lib::array_merge_clobber($info['tar']['files'], getid3_lib::CreateDeepArray($info['tar']['file_details'][$name]['name'], '/'$size));
        }
        return 
true;
    }

    
// Parses the file mode to file permissions
    
function display_perms($mode) {
        
// Determine Type
        
if     ($mode 0x1000$type='p'// FIFO pipe
        
elseif ($mode 0x2000$type='c'// Character special
        
elseif ($mode 0x4000$type='d'// Directory
        
elseif ($mode 0x6000$type='b'// Block special
        
elseif ($mode 0x8000$type='-'// Regular
        
elseif ($mode 0xA000$type='l'// Symbolic Link
        
elseif ($mode 0xC000$type='s'// Socket
        
else                    $type='u'// UNKNOWN

        // Determine permissions
        
$owner['read']    = (($mode 00400) ? 'r' '-');
        
$owner['write']   = (($mode 00200) ? 'w' '-');
        
$owner['execute'] = (($mode 00100) ? 'x' '-');
        
$group['read']    = (($mode 00040) ? 'r' '-');
        
$group['write']   = (($mode 00020) ? 'w' '-');
        
$group['execute'] = (($mode 00010) ? 'x' '-');
        
$world['read']    = (($mode 00004) ? 'r' '-');
        
$world['write']   = (($mode 00002) ? 'w' '-');
        
$world['execute'] = (($mode 00001) ? 'x' '-');

        
// Adjust for SUID, SGID and sticky bit
        
if ($mode 0x800$owner['execute'] = ($owner['execute'] == 'x') ? 's' 'S';
        if (
$mode 0x400$group['execute'] = ($group['execute'] == 'x') ? 's' 'S';
        if (
$mode 0x200$world['execute'] = ($world['execute'] == 'x') ? 't' 'T';

        
$s  sprintf('%1s'$type);
        
$s .= sprintf('%1s%1s%1s',      $owner['read'], $owner['write'], $owner['execute']);
        
$s .= sprintf('%1s%1s%1s',      $group['read'], $group['write'], $group['execute']);
        
$s .= sprintf('%1s%1s%1s'."\n"$world['read'], $world['write'], $world['execute']);
        return 
$s;
    }

    
// Converts the file type
    
function get_flag_type($typflag) {
        static 
$flag_types = array(
            
'0' => 'LF_NORMAL',
            
'1' => 'LF_LINK',
            
'2' => 'LF_SYNLINK',
            
'3' => 'LF_CHR',
            
'4' => 'LF_BLK',
            
'5' => 'LF_DIR',
            
'6' => 'LF_FIFO',
            
'7' => 'LF_CONFIG',
            
'D' => 'LF_DUMPDIR',
            
'K' => 'LF_LONGLINK',
            
'L' => 'LF_LONGNAME',
            
'M' => 'LF_MULTIVOL',
            
'N' => 'LF_NAMES',
            
'S' => 'LF_SPARSE',
            
'V' => 'LF_VOLHDR'
        
);
        return (isset(
$flag_types[$typflag]) ? $flag_types[$typflag] : '');
    }

}

?>