is_legit_token: Check that token appears to be legitimate
Description
This unexported function exists to catch tokens that are technically valid,
i.e. `inherits(token, "Token2.0")` is TRUE, but that have dysfunctional
credentials.Usage
is_legit_token(x, verbose = FALSE)