Removes the MORIE data key that bricklayer_llm_login
stored, so this machine can no longer load the curated tables at
data.rmorie.com until you sign in again. Use it on a shared machine, or
to switch to another key. Nothing is contacted.
Details
The shared credentials file
($XDG_CONFIG_HOME/morie/credentials.json, else
~/.config/morie/credentials.json) is edited as text: the members
hosted_key, hosted_user and hosted_base_url are
removed and every other entry (written by morie, rmorie or
rmoriedata) is kept byte for byte. When nothing else is left the
file is deleted. A key set in the environment variable
MORIE_HOSTED_KEY is not touched. A message says whether a key was
removed.
Errors when the file is not a JSON object (or not valid JSON, or names a member twice), and when the key cannot be removed without damaging the file; in both cases the file is left as it was.
Examples
old <- Sys.getenv("XDG_CONFIG_HOME", unset = NA)
Sys.setenv(XDG_CONFIG_HOME = tempfile()) # a scratch credentials folder
# nothing stored yet
bricklayer_llm_logout()
#> No MORIE data key was stored.
# a file holding a key and another tool's entry: only the key goes
d <- file.path(Sys.getenv("XDG_CONFIG_HOME"), "morie")
dir.create(d, recursive = TRUE)
writeLines('{"hosted_key": "k-123", "other_tool": 1}', file.path(d, "credentials.json"))
bricklayer_llm_logout()
#> Logged out: the MORIE data key was removed.
readLines(file.path(d, "credentials.json"))
#> [1] "{\"other_tool\": 1}"
# a damaged file is refused, not overwritten
writeLines("not json", file.path(d, "credentials.json"))
try(bricklayer_llm_logout())
#> Error : /tmp/Rtmp1nz8V4/file1da86bae5032/morie/credentials.json is not a JSON object (or not valid JSON, or lists a key twice); fix or remove it (it is shared with morie and rmorie)
if (is.na(old)) Sys.unsetenv("XDG_CONFIG_HOME") else Sys.setenv(XDG_CONFIG_HOME = old)