取得p12证书

时间:2018-08-03 07:27:32

标签: r openssl httr pkcs#12

我在读取带有pkcs12证书的API时遇到问题。我可以使用rng = pd.date_range('2017-08-01', periods=365) df = pd.DataFrame({'date': rng, 'a': range(365)}) print (df.head()) date a 0 2017-08-01 0 1 2017-08-02 1 2 2017-08-03 2 3 2017-08-04 3 4 2017-08-05 4 w = ((df['date'] - df['date'].iloc[0]).dt.days // 7 + 1).unique() print (w) [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53] 读取证书,但无法弄清楚如何将证书传递给GET命令。

openssl

这可以正常工作,但是以下library(openssl) library(httr) pkcs12_name <- "path_to_certificate.p12" pkcs12_pwd <- "password" url <- "theAPIURL" cert <- read_p12(pkcs12_name,pkcs12_pwd) 无效:

GET

GET(url1,config(cainfo=cert$ca,sslcert=cert$cert,sslkey=cert$key)) Error in curl::handle_setopt(handle, .list = req$options) : Value for option cainfo (10065) must be a string or raw vector. 是一个包含两个元素的列表。如果我只接受cert$cacert$ca[[1]],我会得到

cert$ca[[2]]

有什么建议吗?

0 个答案:

没有答案