PclZip::duplicate( $p_archive )

1166  function duplicate($p_archive)1167  {1168    $v_result = 1;1169 1170    // ----- Reset the error handler1171    $this->privErrorReset();1172 1173    // ----- Look if the $p_archive is an instantiated PclZip object1174    if ($p_archive instanceof pclzip)1175    {1176 1177      // ----- Duplicate the archive1178      $v_result = $this->privDuplicate($p_archive->zipname);1179    }1180 1181    // ----- Look if the $p_archive is a string (so a filename)1182    else if (is_string($p_archive))1183    {1184 1185      // ----- Check that $p_archive is a valid zip file1186      // TBC : Should also check the archive format1187      if (!is_file($p_archive)) {1188        // ----- Error log1189        PclZip::privErrorLog(PCLZIP_ERR_MISSING_FILE, "No file with filename '".$p_archive."'");1190        $v_result = PCLZIP_ERR_MISSING_FILE;1191      }1192      else {1193        // ----- Duplicate the archive1194        $v_result = $this->privDuplicate($p_archive);1195      }1196    }1197 1198    // ----- Invalid variable1199    else1200    {1201      // ----- Error log1202      PclZip::privErrorLog(PCLZIP_ERR_INVALID_PARAMETER, "Invalid variable type p_archive_to_add");1203      $v_result = PCLZIP_ERR_INVALID_PARAMETER;1204    }1205 1206    // ----- Return1207    return $v_result;1208  }