Render docs

R/multi.R

@@ -46,10 +46,12 @@
 #' response data in same structure as \link{curl_fetch_memory}.
 #' @param fail callback function called on failed request. Argument contains
 #' error message.
-#' @param data callback function, file path, or connection object for receiving
-#' data. The signature for the callback function is \code{write(data, final = FALSE)}.
-#' If set to \code{NULL} the entire response content gets buffered internally
-#' and returned by the \code{done} callback.
+#' @param data (advanced) callback function, file path, or connection object for writing
+#' incoming data. This callback should only be used for \emph{streaming} applications,
+#' where small pieces of incoming data get written before the request has completed. The
+#' signature for the callback function is \code{write(data, final = FALSE)}. If set
+#' to \code{NULL} the entire response gets buffered internally and returned by in
+#' the \code{done} callback (which is usually what you want).
 #' @param pool a multi handle created by \link{new_pool}. Default uses a global pool.
 #' @export
 #' @examples

bugs/multi-stress.R

@@ -2,14 +2,11 @@
 
 library(curl)
 pool <- new_pool()
-tlds <- Filter(function(x){nchar(x) < 3}, urltools::tld_dataset)
-
 
 while(TRUE){
-  server <- paste0('https://www.google.', sample(tlds, 1))
-  cat("Adding: ", server, "\n")
-  for(i in 1:100){
-    curl::curl_fetch_multi(server, pool = pool)
+  for(i in 1:500){
+    tmp <- file.path(tempdir(), sprintf("file%d.html", i))
+    curl::curl_fetch_multi('https://cloud.r-project.org', pool = pool, data = tmp)
   }
   cat("Running...\n")
   print(multi_run(pool = pool))