ec_list returns: Forbidden (HTTP 403)

[mayeulk]

Running ethercalc on docker with (as advised by maintainer):

sudo docker run --name redis -d -v /var/lib/redis:/data redis:latest redis-server --appendonly yes
sudo docker run -d -p 8000:8000 --link redis:redis audreyt/ethercalc

ec_list fails, whatever the parameters, with latest R ethercalc (0.1.0):

> ec_list()
Error in ec_list() : Forbidden (HTTP 403).
> ec_list(all=F)
Error in ec_list(all = F) : Forbidden (HTTP 403).
> ec_list(all=F, "http://localhost:8000")
Error in ec_list(all = F, "http://localhost:8000") : 
  Forbidden (HTTP 403).
> ethercalc_host()
[1] "http://localhost:8000"

But commands like the following work:

ec_edit(iris, "iris")
ec_delete("iris")

Within the container, I can get the list:

>redis-cli
127.0.0.1:6379> KEYS "snapshot-*"
1) "snapshot-iris"
2) "snapshot-iris_formdata"

[mayeulk]

I see the R code is calling _rooms:
https://github.com/hrbrmstr/ethercalc/blob/master/R/ec-list.R#L17

  httr::GET(
    url = glue::glue("{ec_host}/_rooms")
  ) -> res

which is disabled with CORS (default), see https://github.com/audreyt/ethercalc/blob/master/src/main.ls#L211-L230
I'm not sure how to disable CORS, and whether all will continue to work (API, apache2 reverse proxy...°

[mayeulk]

Running ethercalc on docker, while logged in to the docker host, the following gets the list:

sheet_long_list <- system("echo 'KEYS snapshot-*' |  docker exec -i  redis_ethercalc redis-cli",
                          intern = TRUE)

Or:

sheet_long_list <- system2("echo", args =  "'KEYS snapshot-*' |  docker exec -i  redis_ethercalc redis-cli",
                          stdout = TRUE)