Explorar el Código

pre-travis check

master
boB Rudis hace 5 años
padre
commit
47fe699d3e
No se encontró ninguna clave conocida en la base de datos para esta firma ID de clave GPG: 1D7529BE14E2BBA9
  1. 1
      .codecov.yml
  2. 22
      .travis.yml
  3. 2
      DESCRIPTION
  4. 4
      README.Rmd
  5. 4
      README.md
  6. 26
      tests/testthat/test-metis.R

1
.codecov.yml

@ -0,0 +1 @@
comment: false

22
.travis.yml

@ -0,0 +1,22 @@
language: r
warnings_are_errors: true
cache: packages
sudo: required
jdk:
- oraclejdk8
addons:
apt:
packages:
- oracle-java8-set-default
after_success:
- Rscript -e 'covr::codecov()'
r:
- oldrel
- release

2
DESCRIPTION

@ -6,7 +6,7 @@ Date: 2019-02-14
Authors@R: c(
person("Bob", "Rudis", email = "bob@rud.is", role = c("aut", "cre"),
comment = c(ORCID = "0000-0001-5670-2640")),
person("Derek", "Abdine", comment = "Authentication driver update"),
person("Derek", "Abdine", role = "ctb", comment = "Authentication driver update"),
person("Zachary", "Kurtz", email = "zdkurtz@gmail.com", role = "ctb")
)
Maintainer: Bob Rudis <bob@rud.is>

4
README.Rmd

@ -18,6 +18,10 @@ Sys.setenv(
options(width=120)
```
[![Travis-CI Build Status](https://travis-ci.org/hrbrmstr/metis.svg?branch=master)](https://travis-ci.org/hrbrmstr/metis)
[![Coverage Status](https://codecov.io/gh/hrbrmstr/metis/branch/master/graph/badge.svg)](https://codecov.io/gh/hrbrmstr/metis
[![CRAN_Status_Badge](http://www.r-pkg.org/badges/version/metis)](https://cran.r-project.org/package=metis)
# metis
Access and Query Amazon Athena via DBI/JDBC

4
README.md

@ -1,4 +1,8 @@
[![Travis-CI Build Status](https://travis-ci.org/hrbrmstr/metis.svg?branch=master)](https://travis-ci.org/hrbrmstr/metis)
[![Coverage Status](https://codecov.io/gh/hrbrmstr/metis/branch/master/graph/badge.svg)](https://codecov.io/gh/hrbrmstr/metis
[![CRAN_Status_Badge](http://www.r-pkg.org/badges/version/metis)](https://cran.r-project.org/package=metis)
# metis
Access and Query Amazon Athena via DBI/JDBC

26
tests/testthat/test-metis.R

@ -6,13 +6,25 @@ drv <- metis::Athena()
expect_is(drv, "AthenaDriver")
metis::dbConnect(
drv = drv,
Schema = "sampledb",
AwsCredentialsProviderClass = "com.simba.athena.amazonaws.auth.PropertiesFileCredentialsProvider",
AwsCredentialsProviderArguments = path.expand("~/.aws/athenaCredentials.props"),
S3OutputLocation = "s3://aws-athena-query-results-569593279821-us-east-1",
) -> con
if (identical(Sys.getenv("TRAVIS"), "true")) {
metis::dbConnect(
drv = drv,
Schema = "sampledb",
S3OutputLocation = "s3://aws-athena-query-results-569593279821-us-east-1",
) -> con
} else {
metis::dbConnect(
drv = drv,
Schema = "sampledb",
AwsCredentialsProviderClass = "com.simba.athena.amazonaws.auth.PropertiesFileCredentialsProvider",
AwsCredentialsProviderArguments = path.expand("~/.aws/athenaCredentials.props"),
S3OutputLocation = "s3://aws-athena-query-results-569593279821-us-east-1",
) -> con
}
expect_is(con, "AthenaConnection")

Cargando…
Cancelar
Guardar