parse_rds.hpp

Go to the documentation of this file.

#ifndef RDS2CPP_PARSE_HPP
#define RDS2CPP_PARSE_HPP
 
#include <memory>
#include <algorithm>
#include <cstdint>
 
#include "RdsFile.hpp"
#include "utils_parse.hpp"
#include "SharedParseInfo.hpp"
#include "parse_object.hpp"
 
#include "byteme/byteme.hpp"
 
namespace rds2cpp {
 
struct ParseRdsOptions {
    bool parallel = false;
 
    byteme::SomeFileReaderOptions file_options;
};
 
template<class Reader_>
RdsFile parse_rds(Reader_& reader, const ParseRdsOptions& options) {
    std::unique_ptr<byteme::PerByteInterface<unsigned char> > srcptr;
    if (options.parallel) {
        srcptr.reset(new byteme::PerByteParallel<unsigned char, Reader_*>(&reader));
    } else {
        srcptr.reset(new byteme::PerByteSerial<unsigned char, Reader_*>(&reader));
    }
    auto& src = *srcptr; 
    RdsFile output(false);
 
    // Reading the header first. This is the first and only time that 
    // we need to do a src.valid() check, as we're using the current 
    // position of the source; in all other cases, it can be assumed
    // that the source needs to be advance()'d before get().
    {
        try {
            if (!src.valid()) {
                throw empty_error();
            }
            if (src.get() != 'X') {
                throw std::runtime_error("only RDS files in XDR format are currently supported");
            }
 
            if (!src.advance()) {
                throw empty_error();
            }
            if (src.get() != '\n') {
                throw std::runtime_error("only RDS files in XDR format are currently supported");
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the header from the RDS preamble", e);
        }
 
        output.format_version = 0;
        try {
            for (int i = 0; i < 4; ++i) {
                if (!src.advance()) {
                    throw empty_error();
                }
                output.format_version <<= 8;
                output.format_version += src.get();
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the format version number from the RDS preamble", e);
        } 
 
        // Just skipping the first byte for the R reader/writer versions...
        // unless we get up to a major version > 255, then we're in trouble.
        try {
            if (!src.advance()) {
                throw empty_error();
            }
            for (int pos = 0; pos < 3; ++pos) {
                if (!src.advance()) {
                    throw empty_error();
                }
               output.writer_version[pos] = src.get();
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the writer version number from the RDS preamble", e);
        }
 
        try {
            if (!src.advance()) {
                throw empty_error();
            }
            for (int pos = 0; pos < 3; ++pos) {
                if (!src.advance()) {
                    throw empty_error();
                }
                output.reader_version[pos] = src.get();
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the reader version number from the RDS preamble", e);
        }
    }
 
    // Reading this undocumented section about the string encoding.
    {
        size_t encoding_length = 0;
        try {
            for (int b = 0; b < 4; ++b) {
                if (!src.advance()) {
                    throw empty_error();
                }
                encoding_length <<= 8;
                encoding_length += src.get();
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the encoding length from the RDS preamble", e);
        }
 
        try {
            output.encoding.reserve(encoding_length);
            for (size_t b = 0; b < encoding_length; ++b) {
                if (!src.advance()) {
                    throw empty_error();
                }
                output.encoding.push_back(src.get());
            }
        } catch (std::exception& e) {
            throw traceback("failed to read the encoding string from the RDS preamble", e);
        }
    }
 
    // Now we can finally read the damn object.
    SharedParseInfo shared;
    output.object = parse_object(src, shared);
    output.environments = std::move(shared.environments);
    output.symbols = std::move(shared.symbols);
    output.external_pointers = std::move(shared.external_pointers);
 
    return output;
}
 
inline RdsFile parse_rds(std::string file, const ParseRdsOptions& options) {
    byteme::SomeFileReader reader(file.c_str(), options.file_options);
    return parse_rds(reader, options);
}
 
typedef RdsFile Parsed;
 
}
 
#endif