एसएसएल पेज से ज़िप्ड फ़ाइल डाउनलोड करने के लिए आर का उपयोग कैसे करें, जिसके लिए कुकीज़

Question

की आवश्यकता है। मैं एक https पृष्ठ से एक फ़ाइल डाउनलोड करने का प्रयास कर रहा हूं जिसके लिए "I सहमत" बटन को धक्का दिया जाना चाहिए और फिर कुकी को स्टोर करना होगा। माफ़ी माफ़ी अगर यह उत्तर कहीं स्पष्ट है ..

जब मैं सीधे क्रोम में वेब पेज खोलता हूं और "मैं सहमत हूं" पर क्लिक करता हूं - फ़ाइल स्वचालित रूप से डाउनलोड हो जाती है।

http://www.icpsr.umich.edu/cgi-bin/bob/zipcart2?path=SAMHDA&study=32722&bundle=delimited&ds=1&dups=yes

मैं this example दोहराने की कोशिश की, लेकिन मुझे नहीं लगता कि hangseng वेबसाइट वास्तव में कुकी/प्रमाणीकरण संग्रहीत करता है, इसलिए मैं अगर है कि उदाहरण के सब मैं की जरूरत होनी चाहिए पता नहीं है।

इसके अलावा, मेरा मानना ​​है कि एसएसएल प्रमाणीकरण को जटिल करता है, क्योंकि मुझे लगता है कि getURL() कॉल को प्रमाण पत्र विनिर्देश की आवश्यकता होगी जैसे cainfo = system.file ("curlSSL", "cacert.pem", package = "RCurl"))

मैं आरसीआरएल के साथ शुरुआत करने वाला बहुत अधिक हूं, यह जानना कि यह वेबसाइट बहुत मुश्किल है या अगर मुझे कुछ स्पष्ट याद आ रही है।

धन्यवाद!

Answer 1

httr के साथ यह करना थोड़ा आसान है क्योंकि यह सबकुछ सेट करता है ताकि कुकीज और https सीमलेस रूप से काम कर सकें।

कुकीज़ उत्पन्न करने का सबसे आसान तरीका यह है कि साइट "मैन्युअल" फ़ॉर्म उत्पन्न करने वाली जानकारी को मैन्युअल रूप से पोस्ट करके साइट को आपके लिए करे। फिर आप वास्तविक फ़ाइल डाउनलोड करने के लिए दूसरा अनुरोध करते हैं।

library(httr) 
terms <- "http://www.icpsr.umich.edu/cgi-bin/terms" 
download <- "http://www.icpsr.umich.edu/cgi-bin/bob/zipcart2" 

values <- list(agree = "yes", path = "SAMHDA", study = "32722", ds = "", 
    bundle = "all", dups = "yes") 

# Accept the terms on the form, 
# generating the appropriate cookies 
POST(terms, body = values) 
GET(download, query = values) 

# Actually download the file (this will take a while) 
resp <- GET(download, query = values) 

# write the content of the download to a binary file 
writeBin(content(resp, "raw"), "c:/temp/thefile.zip")