我有一个相对简单的函数来从 sqlite 数据库中提取一些数据:
library(RSQLite)
db.select <- function(table="mydata", vars, rows=c()) {
vars <- paste(unlist(vars), collapse=", ")
q <- paste("SELECT ", vars, " FROM ", table, sep="")
if (length(rows) > 0) {
rows <- paste(as.character(rows), collapse=", ")
q <- paste(q, " WHERE row in (", rows, ")", sep="")
}
con <- DBI::dbConnect(RSQLite::SQLite(), "/abs/path/to.db")
res <- DBI::dbSendQuery(con, q)
data <- DBI::dbFetch(res)
DBI::dbClearResult(res)
DBI::dbDisconnect(con)
data
}
当我在 R(或 RStudio)中运行此代码时,这对我来说非常好:
> db.select(vars = c("gc_content"), rows=c(1:5))
gc_content
1 44.30
2 41.22
3 48.51
4 60.83
5 45.21
但是,我根本没有成功,通过opencpu使用这个函数检索任何数据:
$ curl http://localhost/ocpu/user/bertjan/library/RParcoords/R/db.select/json -H "Content-Type: application/json" -d '{"vars":["gc_content"]}'
RS-DBI driver: (could not connect to dbname:
unable to open database file
)
In call:
sqliteNewConnection(drv, ...)
我已经仔细检查了文件是否存在,检查了它的权限,为所有人设置了读/写权限,但一点运气都没有。任何输入将不胜感激。
编辑 1: 尝试了 @Jeroen 对 apparmor 配置建议的更改,但无济于事。将以下行添加到自定义文件中确实有所帮助:
/full/path/to/db rw,
但是,它只帮助我现在得到错误:
RS-DBI 驱动程序:(语句中的错误:数据库已锁定)
通话中: sqliteExecStatement(conn, statement, ...)
这很奇怪,因为当我在 RStudio 中执行完全相同的代码(使用相同的数据库文件)时,我没有收到此错误。
编辑 2:正如 Hadley Wickham ( https://twitter.com/hadleywickham/status/526739851974955008 ) 提出的,我使用 dbGetQuery 简化了函数:
db.select <- function(table="mydata", vars, rows=c()) {
vars <- paste(unlist(vars), collapse=", ")
q <- paste("SELECT ", vars, " FROM ", table, sep="")
if (length(rows) > 0) {
rows <- paste(as.character(rows), collapse=", ")
q <- paste(q, " WHERE row in (", rows, ")", sep="")
}
con <- DBI::dbConnect(RSQLite::SQLite(), "/home/bertjan/cstr.db")
data <- DBI::dbGetQuery(con, q)
DBI::dbDisconnect(con)
data
}
尽管如此,由于我得到完全相同的行为(在 R studio 中工作,发出 curl 命令时给出数据库锁定消息),但无济于事。
编辑 3:实际上它似乎仍然是 AppArmor 问题。我得到:
Oct 27 15:50:52 Stef kernel: [899068.612784] type=1400 audit(1414421452.965:232): apparmor="DENIED" operation="file_lock" profile="opencpu-exec" name="/path/to/db" pid=9708 comm="apache2" requested_mask="k" denied_mask="k" fsuid=33 ouid=1000
解决方法:终于找到了。最终这似乎是一个纯粹的 AppArmor 问题。我不得不改变:
/full/path/to/db rw,
至
/full/path/to/db rwk,
(注意 k)以允许文件锁定。