intial commit

Author: hrbrmstr

.Rbuildignore

@@ -0,0 +1,7 @@
+^.*\.Rproj$
+^\.Rproj\.user$
+^\.travis\.yml$
+^README\.*md$
+^README\.*html$
+^NOTES\.*Rmd$
+^NOTES\.*html$

.gitignore

@@ -0,0 +1,7 @@
+.Rproj.user
+.Rhistory
+.RData
+.Rproj
+src/*.o
+src/*.so
+src/*.dll

.travis.yml

@@ -0,0 +1,17 @@
+language: r
+warnings_are_errors: true
+sudo: required
+
+apt_packages:
+ - binutils
+ - libproj-dev
+ - gdal-bin
+
+env:
+ global:
+   - CRAN: http://cran.rstudio.com
+
+notifications:
+  email:
+    on_success: change
+    on_failure: change

DESCRIPTION

@@ -0,0 +1,23 @@
+Package: bgpdump
+Type: Package
+Title: Tools to Retrieve and Process 'BGP' Files
+Version: 0.1.0
+Date: 2016-07-18
+Author: Bob Rudis (@hrbrmstr)
+Maintainer: Bob Rudis <bob@rudis.net>
+Description: A compendium of utilities to retrieve and process BGP files. Presently supports
+    download and converting MRT v2 files from RouteViews.
+URL: http://github.com/hrbrmstr/bgpdump
+BugReports: https://github.com/hrbrmstr/bgpdump/issues
+License: AGPL
+Suggests:
+    testthat
+Depends:
+    R (>= 3.0.0)
+Imports:
+    purrr,
+    Rcpp,
+    tibble,
+    curl
+LinkingTo: Rcpp
+RoxygenNote: 5.0.1

NAMESPACE

@@ -0,0 +1,8 @@
+# Generated by roxygen2: do not edit by hand
+
+export(get_latest_rib)
+export(rib_to_asn_table)
+import(tibble)
+importFrom(Rcpp,sourceCpp)
+importFrom(curl,curl_download)
+useDynLib(bgpdump)

NEWS.md

@@ -0,0 +1,2 @@
+0.1.0 
+* Initial release

R/RcppExports.R

@@ -0,0 +1,15 @@
+# This file was generated by Rcpp::compileAttributes
+# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
+
+#' Convert RouteViews RIB (bgpdump table dump v2) to subnet/asn map
+#'
+#' It presently ONLY works with the modern RouteViews v2 format.
+#'
+#' @param path path to RouteViews RIB (can be compressed)
+#' @param progress if \code{TRUE} output a message every 50,000 records.
+#' @return \code{tbl_df} (tibble) or \code{NULL}
+#' @export
+rib_to_asn_table <- function(path, progress = FALSE) {
+    .Call('bgpdump_rib_to_asn_table', PACKAGE = 'bgpdump', path, progress)
+}
+

R/bgpdump-package.R

@@ -0,0 +1,13 @@
+#' Tools to work with 'BGP' 'dump' files
+#'
+#' A compendium of utilities to retrieve and process BGP files. Presently supports
+#' download and converting MRT v2 files from RouteViews.
+#'
+#' @name bgpdump
+#' @docType package
+#' @author Bob Rudis (@@hrbrmstr)
+#' @useDynLib bgpdump
+#' @import tibble
+#' @importFrom curl curl_download
+#' @importFrom Rcpp sourceCpp
+NULL

R/routeviews.r

@@ -0,0 +1,47 @@
+#' Retrieve the latest RouteViews RIB file
+#'
+#' @param output_dir where the downloaded RIB should be stored
+#' @param .progress show download progress (default: \code{FALSE})
+#' @note this function handles the UTC time zone adjustment properly
+#' @return the filename (invisibly)
+#' @export
+get_latest_rib <- function(output_dir=".", .progress=FALSE) {
+
+  tdy <- Sys.time()
+
+  hr <- as.numeric(format(tdy, "%H", tz="UTC"))
+  hr <- ifelse(((hr %% 2) == 0), hr, hr-1)
+
+  day <- format(tdy, "%Y-%m-%d", tz="UTC")
+
+  get_rib(day, hr, output_dir, .progress)
+
+}
+
+#' Retrieve a specific, historical RouteViews RIB file
+#'
+#' @param date the date (`YYYY-mm-dd` string or \code{Date}) of the file (remembering
+#'        that the filenames are in UTC time zone)
+#' @param hour the hour of the file (remembering that RouteViews dumps a RIB every 2 hours)
+#' @param .progress show download progress (default: \code{FALSE})
+#' @return the filename (invisibly)
+get_rib <- function(date, hour, output_dir=".", .progress=FALSE) {
+
+  output_dir <- path.expand(output_dir)
+  if (!file.exists(output_dir)) stop("Output directory not found", call.=FALSE)
+
+  date_dir <- format(as.Date(date), "%Y.%m")
+  day_fil <- format(as.Date(date), "%Y%m%d")
+
+  URL <- sprintf("ftp://archive.routeviews.org/bgpdata/%s/RIBS/rib.%s.%s.bz2",
+                 date_dir, day_fil, sprintf("%02d00", as.numeric(hour)))
+
+  fil <- file.path(output_dir, basename(URL))
+
+  message(URL)
+
+  curl::curl_download(URL, fil, quiet=!(.progress))
+
+  return(invisible(fil))
+
+}

README.Rmd

@@ -0,0 +1,43 @@
+---
+output: rmarkdown::github_document
+---
+
+`bgpdump` : Tools to Retrieve and Process 'BGP' Files
+
+The following functions are implemented:
+
+- `get_latest_rib`:	Retrieve the latest RouteViews RIB file
+- `get_rib`:	Retrieve a specific, historical RouteViews RIB file
+- `rib_to_asn_table`:	Convert RouteViews RIB (bgpdump table dump v2) to subnet/asn map
+
+### Installation
+
+```{r eval=FALSE}
+devtools::install_github("hrbrmstr/bgpdump")
+```
+
+```{r echo=FALSE, message=FALSE, warning=FALSE, error=FALSE}
+options(width=120)
+```
+
+### Usage
+
+```{r}
+library(bgpdump)
+
+# current verison
+packageVersion("bgpdump")
+
+```
+
+### Test Results
+
+```{r}
+library(bgpdump)
+library(testthat)
+
+date()
+
+test_dir("tests/")
+```
+