|
4 years ago | |
---|---|---|
.vscode | 5 years ago | |
R | 4 years ago | |
inst | 4 years ago | |
man | 4 years ago | |
tests | 4 years ago | |
tools | 4 years ago | |
.Rbuildignore | 4 years ago | |
.build.yml | 4 years ago | |
.gitignore | 7 years ago | |
.travis.yml | 4 years ago | |
CRAN-RELEASE | 4 years ago | |
DESCRIPTION | 4 years ago | |
LICENSE | 4 years ago | |
NAMESPACE | 4 years ago | |
NEWS.md | 4 years ago | |
README.Rmd | 4 years ago | |
README.md | 4 years ago | |
appveyor.yml | 4 years ago | |
cran-comments.md | 4 years ago | |
wand.Rproj | 7 years ago |
README.md
wand
Retrieve Magic Attributes from Files and Directories
Description
MIME types are shorthand descriptors for file contents and can be determined from “magic” bytes in file headers, file contents or intuited from file extensions. Tools are provided to perform curated “magic” tests as well as mapping MIME types from a database of over 1,800 extension mappings.
SOME IMPORTANT DETAILS
The header checking is minimal (i.e. nowhere near as comprehensive as
libmagic
) but covers quite a bit of ground. If there are content-check
types from magic sources
that you would like coded into the package, please file an issue and
include the full line(s) from that linked magic.tab
that you would
like mapped.
What’s Inside The Tin
The following functions are implemented:
get_content_type
: Discover MIME type of a file based on contentsguess_content_type
: Guess MIME type from filename (extension)simplemagic_mime_db
: File extension-to-MIME mapping data frame
Installation
install.packages("wand", repos = "https://cinc.rud.is")
# or
remotes::install_git("https://git.rud.is/hrbrmstr/wand.git")
# or
remotes::install_git("https://git.sr.ht/~hrbrmstr/wand")
# or
remotes::install_gitlab("hrbrmstr/wand")
# or
remotes::install_bitbucket("hrbrmstr/wand")
# or
remotes::install_github("hrbrmstr/wand")
NOTE: To use the ‘remotes’ install options you will need to have the {remotes} package installed.
Usage
library(wand)
library(tidyverse)
# current verison
packageVersion("wand")
## [1] '0.6.0'
list.files(system.file("extdat", "pass-through", package="wand"), full.names=TRUE) %>%
map_df(~{
tibble(
fil = basename(.x),
mime = list(get_content_type(.x))
)
}) %>%
unnest()
## # A tibble: 85 x 2
## fil mime
## <chr> <chr>
## 1 actions.csv application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
## 2 actions.txt application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
## 3 actions.xlsx application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
## 4 test_128_44_jstereo.mp3 audio/mp3
## 5 test_excel_2000.xls application/msword
## 6 test_excel_spreadsheet.xml application/xml
## 7 test_excel_web_archive.mht message/rfc822
## 8 test_excel.xlsm application/zip
## 9 test_excel.xlsx application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
## 10 test_nocompress.tif image/tiff
## # … with 75 more rows
wand Metrics
Lang | # Files | (%) | LoC | (%) | Blank lines | (%) | # Lines | (%) |
---|---|---|---|---|---|---|---|---|
R | 7 | 0.78 | 159 | 0.62 | 62 | 0.78 | 72 | 0.71 |
JSON | 1 | 0.11 | 80 | 0.31 | 0 | 0.00 | 0 | 0.00 |
Rmd | 1 | 0.11 | 17 | 0.07 | 17 | 0.22 | 29 | 0.29 |
Code of Conduct
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.