mock writing to disk

[sckott]

Info

for each of curl, crul, httr

via curl::curl_fetch_disk() for curl, disk = TRUE for crul and httr::write_disk() for httr

the latter two build on top of the first.

for each of these, if the user writes to disk, the $content slot is:

• character class
• the path to the file

rather than what $content normally is: class raw

---

Approach

• if to_return() not specified, then all is good, nothing different from normal, $content is length 0
• if body in to_return() IS specified, user must give a connection object with a file path that alraedy exists (avoid allowing a file path as a string so we don't have to worry about strings. vs. files)

e.g.

(f <- tempfile())
#> "/var/folders/fc/n7g_vrvn0sx_st0p8lxb3ts40000gn/T//Rtmp1f2UTM/filec69b5e600215"
stub_request("get", "https://httpbin.org/get") %>% 
  to_return(body = file(f))
out <- curl_fetch_disk("https://httpbin.org/get", tempfile())
out$content
#> "/var/folders/fc/n7g_vrvn0sx_st0p8lxb3ts40000gn/T//Rtmp1f2UTM/filec69b5e600215"

Need to change internals of StubbedRequest body parsing to allow this

---

relates to ropensci/vcr#81