knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "README-", fig.retina = 2 )
censys
is an R package interface to the Censys API
Censys is a search engine that enables researchers to ask questions about the hosts and networks that compose the Internet. Censys collects data on hosts and websites through daily ZMap and ZGrab scans of the IPv4 address space, in turn maintaining a database of how hosts and websites are configured. Researchers can interact with this data through a search interface, report builder, and SQL engine.
The following functions are implemented:
censys_export_download
: Download export job files to a specified directorycensys_export_job_status
: Get status of a Censys export jobcensys_get_job_result
: Get results of completed Censys SQL query jobcensys_get_job_status
: Get status of a Censys SQL query jobcensys_query
: Issue SQL Queries against the Censys APIcensys_report
: Create aggregate reports on the breakdown of a field in the result set of a querycensys_search
: Perform queries against Censys datacensys_series
: List all series that can be queried from the SQL interfacecensys_series_details
: Get details about a series, including the list of tables and schema for the seriescensys_start_export
: Export large datasets and structured records from Censys to JSON or CSV filesget_series
: Retrieve data on the types of scans Censys regularly performs ("series").view_document
: Retrieve data that Censys has about a specific host, website, or certificate.view_result
: Retrieve data on a particular scan "result"view_series
: Retrieve data that Censys has about a particular seriesdevtools::install_github("hrbrmstr/censys")
options(width=120)
library(censys) # current verison packageVersion("censys") library(purrr) library(dplyr) res <- censys_query(" SELECT p80.http.get.headers.server, p80.http.get.headers.www_authenticate, location.country, autonomous_system.asn FROM ipv4.20161206 WHERE REGEXP_MATCH(p80.http.get.headers.server, r'gen[56]') ") inf <- censys_get_job_status(res$job_id) Sys.sleep(10) # giving it some time to process for the README map(1:3, ~censys_get_job_result(inf$job_id, .)) %>% map(c("rows", "f")) %>% flatten() %>% map("v") %>% map_df(~setNames(as.list(.), c("server", "auth", "geo", "asn"))) %>% count(geo, sort=TRUE)
library(censys) library(testthat) date() test_dir("tests/")
Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.