readspss: Importing and Exporting SPSS Files

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#' split character vector at "="
#'
#' @param val_s CharacterVector
#' @import Rcpp
#' @keywords internal
#' @noRd
boost_split <- function(val_s) {
    .Call(`_readspss_boost_split`, val_s)
}

#' creates a factor inspired by an idea of Kevin Ushey in the Rcpp gallery
#' http://gallery.rcpp.org/articles/fast-factor-generation/
#'
#' @param x vector
#' @param y charactervector with labels
#' @import Rcpp
#' @keywords internal
#' @noRd
fast_factor <- function(x, y) {
    .Call(`_readspss_fast_factor`, x, y)
}

#' Read encrypted SPSS file
#'
#' @param filePath The full systempath to the dta file you want to import.
#' @param debug print debug information
#' @param encStr encoding string
#' @param ownEnc encoding provided by localeToCharset
#' @param pass passkey required for encoding
#' @import Rcpp
#' @keywords internal
#' @noRd
readencrypted <- function(filePath, debug, encStr, ownEnc, pass) {
    .Call(`_readspss_readencrypted`, filePath, debug, encStr, ownEnc, pass)
}

#' Reads the binary SPSS file
#'
#' @param filePath The full systempath to the dta file you want to import.
#' @param debug print debug information
#' @param encStr encoding string
#' @param override override bool
#' @import Rcpp
#' @keywords internal
#' @noRd
readpor <- function(filePath, debug, encStr, override) {
    .Call(`_readspss_readpor`, filePath, debug, encStr, override)
}

#' Reads the binary SPSS file
#'
#' @param filePath The full systempath to the dta file you want to import.
#' @param debug print debug information
#' @param encStr encoding string
#' @param ownEnc encoding provided by localeToCharset
#' @import Rcpp
#' @keywords internal
#' @noRd
readsav <- function(filePath, debug, encStr, ownEnc) {
    .Call(`_readspss_readsav`, filePath, debug, encStr, ownEnc)
}

#' writes the binary SPSS file
#'
#' @param filePath The full systempath to the dta file you want to import.
#' @param dat the data frame
#' @import Rcpp
#' @keywords internal
#' @noRd
writepor <- function(filePath, dat) {
    invisible(.Call(`_readspss_writepor`, filePath, dat))
}

#' writes the binary SPSS file
#'
#' @param filePath The full systempath to the dta file you want to import.
#' @param dat the data frame
#' @param compress the file
#' @param debug print debug information
#' @param is_zsav write zsav
#' @import Rcpp
#' @keywords internal
#' @noRd
writesav <- function(filePath, dat, compress, debug, is_zsav) {
    invisible(.Call(`_readspss_writesav`, filePath, dat, compress, debug, is_zsav))
}