library(DBI)

dbConn <- function(dbname){
    switch(dbname,
           ET = dbConnect(RPostgres::Postgres(),
                         dbname="ET",
                         user="et_user",
                         host="debian"),
           serenitasdb = dbConnect(RPostgres::Postgres(),
                                  dbname="serenitasdb",
                                  user = "serenitas_user",
                                  host="debian"),
           dawndb = dbConnect(RPostgres::Postgres(),
                             dbname="dawndb",
                             user = "dawn_user",
                             host="debian"))
}