write_rds.hpp

Go to the documentation of this file.

#ifndef RDS2CPP_WRITE_RDS_HPP
#define RDS2CPP_WRITE_RDS_HPP
 
#include <vector>
 
#include "RdsFile.hpp"
#include "RObject.hpp"
#include "utils_write.hpp"
#include "write_object.hpp"
#include "SharedWriteInfo.hpp"
 
#include "byteme/GzipFileWriter.hpp"
 
namespace rds2cpp {
 
template<class Writer>
void write_rds(const RdsFile& info, Writer& writer) {
    std::vector<unsigned char> buffer;
    inject_string("X\n", 2, buffer);
    inject_integer(info.format_version, buffer);
 
    buffer.push_back(0);
    for (auto x : info.writer_version) {
        buffer.push_back(x);
    }
 
    buffer.push_back(0);
    for (auto x : info.reader_version) {
        buffer.push_back(x);
    }
 
    size_t encoding_len = info.encoding.size();
    inject_integer(encoding_len, buffer);
    inject_string(info.encoding.c_str(), encoding_len, buffer);
    writer.write(buffer.data(), buffer.size());
 
    SharedWriteInfo shared(info.symbols, info.environments, info.external_pointers);
    write_object(info.object.get(), writer, buffer, shared); 
 
    return;
}
 
inline void write_rds(const RdsFile& info, const char* path) {
    byteme::GzipFileWriter writer(path, {});
    write_rds(info, writer);
    return;
}
 
inline void write_rds(const RdsFile& info, std::string path) {
    write_rds(info, path.c_str());
    return;
}
 
 
}
 
#endif