chamilo / chamilo-lms

        // ----- Look for PCLZIP_OPT_STOP_ON_ERROR

        // For historical reason first PclZip implementation does not stop

        // when this kind of error occurs.

        if (   (isset($p_options[PCLZIP_OPT_STOP_ON_ERROR]))

		    && ($p_options[PCLZIP_OPT_STOP_ON_ERROR]===true)) {

            PclZip::privErrorLog(PCLZIP_ERR_ALREADY_A_DIRECTORY,

			                     "Filename '".$p_entry['filename']."' is "

								 ."already used by an existing directory");

            return PclZip::errorCode();

		    }

      }

      // ----- Look if file is write protected

      else if (!is_writeable($p_entry['filename']))

        // ----- Look for PCLZIP_OPT_STOP_ON_ERROR

        // For historical reason first PclZip implementation does not stop

        // when this kind of error occurs.

        if (   (isset($p_options[PCLZIP_OPT_STOP_ON_ERROR]))

		    && ($p_options[PCLZIP_OPT_STOP_ON_ERROR]===true)) {

            PclZip::privErrorLog(PCLZIP_ERR_WRITE_OPEN_FAIL,

			                     "Filename '".$p_entry['filename']."' exists "

								 ."and is write protected");

            return PclZip::errorCode();

		    }

      }

      // ----- Look if the extracted file is older

        if (   (isset($p_options[PCLZIP_OPT_REPLACE_NEWER]))

		    && ($p_options[PCLZIP_OPT_REPLACE_NEWER]===true)) {

	  	  }

		    else {

            $p_entry['status'] = "newer_exist";

            // ----- Look for PCLZIP_OPT_STOP_ON_ERROR

            // For historical reason first PclZip implementation does not stop

            // when this kind of error occurs.

            if (   (isset($p_options[PCLZIP_OPT_STOP_ON_ERROR]))

		        && ($p_options[PCLZIP_OPT_STOP_ON_ERROR]===true)) {

                PclZip::privErrorLog(PCLZIP_ERR_WRITE_OPEN_FAIL,

			             "Newer version of '".$p_entry['filename']."' exists "

					    ."and option PCLZIP_OPT_REPLACE_NEWER is not selected");

                return PclZip::errorCode();

		      }

		    }

      }

      else {

      }