public function Archive_Tar::__construct

Archive_Tar Class constructor. This flavour of the constructor only declare a new Archive_Tar object, identifying it by the name of the tar file. If the compress argument is set the tar will be read or created as a gzip or bz2 compressed TAR file.

Parameters

string $p_tarname The name of the tar archive to create:

string $p_compress can be null, 'gz', 'bz2' or 'lzma2'. This: parameter indicates if gzip, bz2 or lzma2 compression is required. For compatibility reason the boolean value 'true' means 'gz'.

Return value

bool

File

drupal/modules/system/system.tar.inc, line 171

Class

Archive_Tar

Code

public function __construct($p_tarname, $p_compress = null) {

  // Drupal removal parent::__construct().
  $this->_compress = false;
  $this->_compress_type = 'none';
  if ($p_compress === null || $p_compress == '') {
    if (@file_exists($p_tarname)) {
      if ($fp = @fopen($p_tarname, "rb")) {

        // look for gzip magic cookie
        $data = fread($fp, 2);
        fclose($fp);
        if ($data == "") {
          $this->_compress = true;
          $this->_compress_type = 'gz';

          // No sure it's enought for a magic code ....
        }
        elseif ($data == "BZ") {
          $this->_compress = true;
          $this->_compress_type = 'bz2';
        }
        elseif (file_get_contents($p_tarname, false, null, 1, 4) == '7zXZ') {
          $this->_compress = true;
          $this->_compress_type = 'lzma2';
        }
      }
    }
    else {

      // probably a remote file or some file accessible
      // through a stream interface
      if (substr($p_tarname, -2) == 'gz') {
        $this->_compress = true;
        $this->_compress_type = 'gz';
      }
      elseif (substr($p_tarname, -3) == 'bz2' || substr($p_tarname, -2) == 'bz') {
        $this->_compress = true;
        $this->_compress_type = 'bz2';
      }
      else {
        if (substr($p_tarname, -2) == 'xz') {
          $this->_compress = true;
          $this->_compress_type = 'lzma2';
        }
      }
    }
  }
  else {
    if ($p_compress === true || $p_compress == 'gz') {
      $this->_compress = true;
      $this->_compress_type = 'gz';
    }
    else {
      if ($p_compress == 'bz2') {
        $this->_compress = true;
        $this->_compress_type = 'bz2';
      }
      else {
        if ($p_compress == 'lzma2') {
          $this->_compress = true;
          $this->_compress_type = 'lzma2';
        }
        else {
          $this
            ->_error("Unsupported compression type '{$p_compress}'\n" . "Supported types are 'gz', 'bz2' and 'lzma2'.\n");
          return false;
        }
      }
    }
  }
  $this->_tarname = $p_tarname;
  if ($this->_compress) {

    // assert zlib or bz2 or xz extension support
    if ($this->_compress_type == 'gz') {
      $extname = 'zlib';
    }
    else {
      if ($this->_compress_type == 'bz2') {
        $extname = 'bz2';
      }
      else {
        if ($this->_compress_type == 'lzma2') {
          $extname = 'xz';
        }
      }
    }
    if (!extension_loaded($extname)) {

      // Drupal change PEAR::loadExtension($extname).
      $this
        ->loadExtension($extname);
    }
    if (!extension_loaded($extname)) {
      $this
        ->_error("The extension '{$extname}' couldn't be found.\n" . "Please make sure your version of PHP was built " . "with '{$extname}' support.\n");
      return false;
    }
  }
}