Archive_Tar::_writeBlock PHP Method

    function _writeBlock($p_binary_data, $p_len = null)
    {
        if (is_resource($this->_file)) {
            if ($p_len === null) {
                if ($this->_compress_type == 'gz') {
                    @gzputs($this->_file, $p_binary_data);
                } else {
                    if ($this->_compress_type == 'bz2') {
                        @bzwrite($this->_file, $p_binary_data);
                    } else {
                        if ($this->_compress_type == 'none') {
                            @fputs($this->_file, $p_binary_data);
                        } else {
                            $this->_error('Unknown or missing compression type (' . $this->_compress_type . ')');
                        }
                    }
                }
            } else {
                if ($this->_compress_type == 'gz') {
                    @gzputs($this->_file, $p_binary_data, $p_len);
                } else {
                    if ($this->_compress_type == 'bz2') {
                        @bzwrite($this->_file, $p_binary_data, $p_len);
                    } else {
                        if ($this->_compress_type == 'none') {
                            @fputs($this->_file, $p_binary_data, $p_len);
                        } else {
                            $this->_error('Unknown or missing compression type (' . $this->_compress_type . ')');
                        }
                    }
                }
            }
        }
        return true;
    }