chamilo / chamilo-lms

    @gzclose($v_file_compressed);

    // ----- Check the minimum file size

    if (filesize($v_gzip_temp_name) < 18) {

      PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT, 'gzip temporary file \''.$v_gzip_temp_name.'\' has invalid filesize - should be minimum 18 bytes');

      return PclZip::errorCode();

    }

    // ----- Extract the compressed attributes

    if (($v_file_compressed = @fopen($v_gzip_temp_name, "rb")) == 0) {

    $v_binary_data = fread($this->zip_fd, 18);

    // ----- Look for invalid block size

    if (strlen($v_binary_data) != 18)

    {

      // ----- Error log

      PclZip::privErrorLog(PCLZIP_ERR_BAD_FORMAT, "Invalid End of Central Dir Record size : ".strlen($v_binary_data));

      // ----- Return

      return PclZip::errorCode();

    }

    // ----- Extract the values

    $v_data = unpack('vdisk/vdisk_start/vdisk_entries/ventries/Vsize/Voffset/vcomment_size', $v_binary_data);