PclZip::privAdd( $p_filedescr_list, $p_result_list, $p_options )

2164  function privAdd($p_filedescr_list, &$p_result_list, &$p_options)2165  {2166    $v_result=1;2167    $v_list_detail = array();2168 2169    // ----- Look if the archive exists or is empty2170    if ((!is_file($this->zipname)) || (filesize($this->zipname) == 0))2171    {2172 2173      // ----- Do a create2174      $v_result = $this->privCreate($p_filedescr_list, $p_result_list, $p_options);2175 2176      // ----- Return2177      return $v_result;2178    }2179    // ----- Magic quotes trick2180    $this->privDisableMagicQuotes();2181 2182    // ----- Open the zip file2183    if (($v_result=$this->privOpenFd('rb')) != 1)2184    {2185      // ----- Magic quotes trick2186      $this->privSwapBackMagicQuotes();2187 2188      // ----- Return2189      return $v_result;2190    }2191 2192    // ----- Read the central directory information2193    $v_central_dir = array();2194    if (($v_result = $this->privReadEndCentralDir($v_central_dir)) != 1)2195    {2196      $this->privCloseFd();2197      $this->privSwapBackMagicQuotes();2198      return $v_result;2199    }2200 2201    // ----- Go to beginning of File2202    @rewind($this->zip_fd);2203 2204    // ----- Creates a temporary file2205    $v_zip_temp_name = PCLZIP_TEMPORARY_DIR.uniqid('pclzip-').'.tmp';2206 2207    // ----- Open the temporary file in write mode2208    if (($v_zip_temp_fd = @fopen($v_zip_temp_name, 'wb')) == 0)2209    {2210      $this->privCloseFd();2211      $this->privSwapBackMagicQuotes();2212 2213      PclZip::privErrorLog(PCLZIP_ERR_READ_OPEN_FAIL, 'Unable to open temporary file \''.$v_zip_temp_name.'\' in binary write mode');2214 2215      // ----- Return2216      return PclZip::errorCode();2217    }2218 2219    // ----- Copy the files from the archive to the temporary file2220    // TBC : Here I should better append the file and go back to erase the central dir2221    $v_size = $v_central_dir['offset'];2222    while ($v_size != 0)2223    {2224      $v_read_size = ($v_size < PCLZIP_READ_BLOCK_SIZE ? $v_size : PCLZIP_READ_BLOCK_SIZE);2225      $v_buffer = fread($this->zip_fd, $v_read_size);2226      @fwrite($v_zip_temp_fd, $v_buffer, $v_read_size);2227      $v_size -= $v_read_size;2228    }2229 2230    // ----- Swap the file descriptor2231    // Here is a trick : I swap the temporary fd with the zip fd, in order to use2232    // the following methods on the temporary fil and not the real archive2233    $v_swap = $this->zip_fd;2234    $this->zip_fd = $v_zip_temp_fd;2235    $v_zip_temp_fd = $v_swap;2236 2237    // ----- Add the files2238    $v_header_list = array();2239    if (($v_result = $this->privAddFileList($p_filedescr_list, $v_header_list, $p_options)) != 1)2240    {2241      fclose($v_zip_temp_fd);2242      $this->privCloseFd();2243      @unlink($v_zip_temp_name);