Authentication

auth(user, pwd, auth = "basic")

Arguments

user

(character) username, required. see Details.

pwd

(character) password, required. see Details.

auth

(character) authentication type, one of basic (default), digest, digest_ie, gssnegotiate, ntlm, or any. required

Details

Only supporting simple auth for now, OAuth later maybe.

For user and pwd you are required to pass in some value. The value can be NULL to - which is equivalent to passing in an empty string like "" in httr::authenticate. You may want to pass in NULL for both user and pwd for example if you are using gssnegotiate auth type. See example below.

Examples

auth(user = "foo", pwd = "bar", auth = "basic")
#> $userpwd #> [1] "foo:bar" #> #> $httpauth #> [1] 1 #> #> attr(,"class") #> [1] "auth" #> attr(,"type") #> [1] "basic"
auth(user = "foo", pwd = "bar", auth = "digest")
#> $userpwd #> [1] "foo:bar" #> #> $httpauth #> [1] 2 #> #> attr(,"class") #> [1] "auth" #> attr(,"type") #> [1] "digest"
auth(user = "foo", pwd = "bar", auth = "ntlm")
#> $userpwd #> [1] "foo:bar" #> #> $httpauth #> [1] 8 #> #> attr(,"class") #> [1] "auth" #> attr(,"type") #> [1] "ntlm"
auth(user = "foo", pwd = "bar", auth = "any")
#> $userpwd #> [1] "foo:bar" #> #> $httpauth #> [1] -17 #> #> attr(,"class") #> [1] "auth" #> attr(,"type") #> [1] "any"
# gssnegotiate auth auth(NULL, NULL, "gssnegotiate")
#> $httpauth #> [1] 4 #> #> attr(,"class") #> [1] "auth" #> attr(,"type") #> [1] "gssnegotiate"
if (FALSE) { # with HttpClient (res <- HttpClient$new( url = "https://httpbin.org/basic-auth/user/passwd", auth = auth(user = "user", pwd = "passwd") )) res$auth x <- res$get() jsonlite::fromJSON(x$parse("UTF-8")) # with HttpRequest (res <- HttpRequest$new( url = "https://httpbin.org/basic-auth/user/passwd", auth = auth(user = "user", pwd = "passwd") )) res$auth }