writer.hpp

Go to the documentation of this file.

// SPDX-FileCopyrightText: 2022-2023 Dennis Gläser <dennis.glaeser@iws.uni-stuttgart.de>
// SPDX-License-Identifier: MIT
#ifndef GRIDFORMAT_GRID_WRITER_HPP_
#define GRIDFORMAT_GRID_WRITER_HPP_
 
#include <string>
#include <utility>
#include <ranges>
#include <fstream>
#include <ostream>
#include <concepts>
#include <type_traits>
 
#include <gridformat/parallel/communication.hpp>
#include <gridformat/common/type_traits.hpp>
#include <gridformat/common/precision.hpp>
#include <gridformat/common/concepts.hpp>
#include <gridformat/common/field_storage.hpp>
#include <gridformat/common/range_field.hpp>
#include <gridformat/common/scalar_field.hpp>
#include <gridformat/common/logging.hpp>
 
#include <gridformat/grid/grid.hpp>
#include <gridformat/grid/_detail.hpp>
#include <gridformat/grid/entity_fields.hpp>
 
namespace GridFormat {
namespace Traits {
 
template<typename Writer> struct WritesConnectivity : public std::true_type {};
 
template<typename Writer>
struct CommunicatorAccess {
    static constexpr auto get(const Writer&) { return NullCommunicator{}; }
};
 
template<typename Writer>
    requires( requires(const Writer& w) { { w.communicator() }; } )
struct CommunicatorAccess<Writer> {
    static constexpr Concepts::Communicator decltype(auto) get(const Writer& w) {
        return w.communicator();
    }
};
 
}  // namespace Traits
 
 
struct WriterOptions {
    bool use_structured_grid_ordering;  
    bool append_null_terminator_to_strings;  
 
    bool operator==(const WriterOptions& other) const {
        return use_structured_grid_ordering == other.use_structured_grid_ordering
            && append_null_terminator_to_strings == other.append_null_terminator_to_strings;
    }
};
 
template<typename G>
class GridWriterBase {
 public:
    using Grid = G;
    using Field = typename FieldStorage::Field;
    using FieldPtr = typename FieldStorage::FieldPtr;
 
    explicit GridWriterBase(const Grid& grid, std::optional<WriterOptions> opts)
    : _grid(grid)
    , _opts{std::move(opts)}
    {}
 
    template<std::ranges::range R>
    void set_meta_data(const std::string& name, R&& range) {
        _meta_data.set(name, RangeField{std::forward<R>(range)});
    }
 
    void set_meta_data(const std::string& name, std::string text) {
        if (_opts && _opts.value().append_null_terminator_to_strings)
            text.push_back('\0');
        _meta_data.set(name, RangeField{std::move(text)});
    }
 
    template<Concepts::Scalar T>
    void set_meta_data(const std::string& name, T value) {
        _meta_data.set(name, ScalarField{value});
    }
 
    template<std::derived_from<Field> F>
    void set_meta_data(const std::string& name, F&& field) {
        static_assert(!std::is_lvalue_reference_v<F>, "Cannot take metadata fields by reference, please move");
        set_meta_data(name, make_field_ptr(std::move(field)));
    }
 
    void set_meta_data(const std::string& name, FieldPtr ptr) {
        _meta_data.set(name, ptr);
    }
 
    FieldPtr remove_meta_data(const std::string& name) {
        return _meta_data.pop(name);
    }
 
    template<Concepts::PointFunction<Grid> F, Concepts::Scalar T = GridDetail::PointFunctionScalarType<Grid, F>>
    void set_point_field(const std::string& name, F&& point_function, const Precision<T>& prec = {}) {
        static_assert(!std::is_lvalue_reference_v<F>, "Cannot take functions by reference, please move");
        set_point_field(name, _make_point_field(std::move(point_function), prec));
    }
 
    template<std::derived_from<Field> F>
    void set_point_field(const std::string& name, F&& field) {
        static_assert(!std::is_lvalue_reference_v<F>, "Cannot take fields by reference, please move");
        set_point_field(name, make_field_ptr(std::forward<F>(field)));
    }
 
    void set_point_field(const std::string& name, FieldPtr field_ptr) {
        _point_fields.set(name, std::move(field_ptr));
    }
 
    FieldPtr remove_point_field(const std::string& name) {
        return _point_fields.pop(name);
    }
 
    template<Concepts::CellFunction<Grid> F, Concepts::Scalar T = GridDetail::CellFunctionScalarType<Grid, F>>
    void set_cell_field(const std::string& name, F&& cell_function, const Precision<T>& prec = {}) {
        static_assert(!std::is_lvalue_reference_v<F>, "Cannot take functions by reference, please move");
        set_cell_field(name, _make_cell_field(std::move(cell_function), prec));
    }
 
    template<std::derived_from<Field> F>
    void set_cell_field(const std::string& name, F&& field) {
        static_assert(!std::is_lvalue_reference_v<F>, "Cannot take fields by reference, please move");
        set_cell_field(name, make_field_ptr(std::forward<F>(field)));
    }
 
    void set_cell_field(const std::string& name, FieldPtr field_ptr) {
        _cell_fields.set(name, field_ptr);
    }
 
    FieldPtr remove_cell_field(const std::string& name) {
        return _cell_fields.pop(name);
    }
 
    void clear() {
        _meta_data.clear();
        _point_fields.clear();
        _cell_fields.clear();
    }
 
    void set_ignore_warnings(bool value) {
        _ignore_warnings = value;
    }
 
    const Grid& grid() const {
        return _grid;
    }
 
    const std::optional<WriterOptions>& writer_options() const {
        return _opts;
    }
 
    template<typename Writer>
    void copy_fields(Writer& w) const {
        if (_opts.has_value() != w.writer_options().has_value())
            throw TypeError("Cannot copy fields into writers with different options");
        if (_opts.has_value() && writer_options().value() != w.writer_options().value())
            throw TypeError("Cannot copy fields into writers with different options");
 
        for (const auto& [name, field_ptr] : meta_data_fields(*this))
            w.set_meta_data(name, field_ptr);
        for (const auto& [name, field_ptr] : point_fields(*this))
            w.set_point_field(name, field_ptr);
        for (const auto& [name, field_ptr] : cell_fields(*this))
            w.set_cell_field(name, field_ptr);
    }
 
    friend Concepts::RangeOf<std::pair<std::string, FieldPtr>> auto
    point_fields_of_rank(unsigned int rank, const GridWriterBase& writer) {
        return writer._point_field_names()
            | std::views::filter([&, r=rank] (const std::string& n) {
                return writer._get_point_field(n).layout().dimension() - 1 == r;
            })
            | std::views::transform([&] (std::string n) {
                auto field_ptr = writer._get_point_field_ptr(n);
                return std::make_pair(std::move(n), std::move(field_ptr));
            });
    }
 
    friend Concepts::RangeOf<std::pair<std::string, FieldPtr>> auto
    cell_fields_of_rank(unsigned int rank, const GridWriterBase& writer) {
        return writer._cell_field_names()
            | std::views::filter([&, r=rank] (const std::string& n) {
                return writer._get_cell_field(n).layout().dimension() - 1 == r;
            })
            | std::views::transform([&] (std::string n) {
                auto field_ptr = writer._get_cell_field_ptr(n);
                return std::make_pair(std::move(n), std::move(field_ptr));
            });
    }
 
    friend Concepts::RangeOf<std::pair<std::string, FieldPtr>> auto point_fields(const GridWriterBase& writer) {
        return writer._point_field_names() | std::views::transform([&] (std::string n) {
            auto field_ptr = writer._get_point_field_ptr(n);
            return std::make_pair(std::move(n), std::move(field_ptr));
        });
    }
 
    friend Concepts::RangeOf<std::pair<std::string, FieldPtr>> auto cell_fields(const GridWriterBase& writer) {
        return writer._cell_field_names() | std::views::transform([&] (std::string n) {
            auto field_ptr = writer._get_cell_field_ptr(n);
            return std::make_pair(std::move(n), std::move(field_ptr));
        });
    }
 
    friend Concepts::RangeOf<std::pair<std::string, FieldPtr>> auto meta_data_fields(const GridWriterBase& writer) {
        return writer._meta_data_field_names() | std::views::transform([&] (std::string n) {
            auto field_ptr = writer._get_meta_data_field_ptr(n);
            return std::make_pair(std::move(n), std::move(field_ptr));
        });
    }
 
 protected:
    void _log_warning(std::string_view warning) const {
        if (!_ignore_warnings)
            log_warning(
                std::string{warning}
                + (warning.ends_with("\n") ? "" : "\n")
                + "To deactivate this warning, call set_ignore_warnings(true);"
            );
    }
 
    template<typename EntityFunction, Concepts::Scalar T>
    auto _make_point_field(EntityFunction&& f, const Precision<T>& prec) const {
        if (_opts.has_value())
            return PointField{_grid, std::move(f), _opts.value().use_structured_grid_ordering, prec};
        return PointField{_grid, std::move(f), false, prec};
    }
 
    template<typename EntityFunction, Concepts::Scalar T>
    auto _make_cell_field(EntityFunction&& f, const Precision<T>& prec) const {
        if (_opts.has_value())
            return CellField{_grid, std::move(f), _opts.value().use_structured_grid_ordering, prec};
        return CellField{_grid, std::move(f), false, prec};
    }
 
    std::ranges::range auto _point_field_names() const {
        return _point_fields.field_names();
    }
 
    std::ranges::range auto _cell_field_names() const {
        return _cell_fields.field_names();
    }
 
    const Field& _get_point_field(const std::string& name) const {
        return _point_fields.get(name);
    }
 
    FieldPtr _get_point_field_ptr(const std::string& name) const {
        return _point_fields.get_ptr(name);
    }
 
    const Field& _get_cell_field(const std::string& name) const {
        return _cell_fields.get(name);
    }
 
    FieldPtr _get_cell_field_ptr(const std::string& name) const {
        return _cell_fields.get_ptr(name);
    }
 
    std::ranges::range auto _meta_data_field_names() const {
        return _meta_data.field_names();
    }
 
    const Field& _get_meta_data_field(const std::string& name) const {
        return _meta_data.get(name);
    }
 
    FieldPtr _get_meta_data_field_ptr(const std::string& name) const {
        return _meta_data.get_ptr(name);
    }
 
 private:
    const Grid& _grid;
    FieldStorage _point_fields;
    FieldStorage _cell_fields;
    FieldStorage _meta_data;
    std::optional<WriterOptions> _opts;
    bool _ignore_warnings = false;
};
 
template<typename Grid>
class GridWriter : public GridWriterBase<Grid> {
 public:
    virtual ~GridWriter() = default;
 
    GridWriter(GridWriter&&) = default;
    GridWriter(const GridWriter&) = delete;
    GridWriter& operator=(GridWriter&&) = default;
    GridWriter& operator=(const GridWriter&) = delete;
 
    explicit GridWriter(const Grid& grid, std::string extension, std::optional<WriterOptions> opts)
    : GridWriterBase<Grid>(grid, std::move(opts))
    , _extension(std::move(extension))
    {}
 
    std::string write(const std::string& filename) const {
        std::string filename_with_ext = filename + _extension;
        _write(filename_with_ext);
        return filename_with_ext;
    }
 
    void write(std::ostream& s) const {
        _write(s);
    }
 
    const std::string& extension() const {
        return _extension;
    }
 
 private:
    std::string _extension;
 
    virtual void _write(const std::string& filename_with_ext) const {
        std::ofstream result_file(filename_with_ext, std::ios::out);
        _write(result_file);
    }
 
    virtual void _write(std::ostream&) const = 0;
};
 
template<typename Grid>
class TimeSeriesGridWriter : public GridWriterBase<Grid> {
 public:
    virtual ~TimeSeriesGridWriter() = default;
 
    TimeSeriesGridWriter(TimeSeriesGridWriter&&) = default;
    TimeSeriesGridWriter(const TimeSeriesGridWriter&) = delete;
    TimeSeriesGridWriter& operator=(TimeSeriesGridWriter&&) = default;
    TimeSeriesGridWriter& operator=(const TimeSeriesGridWriter&) = delete;
 
    explicit TimeSeriesGridWriter(const Grid& grid, std::optional<WriterOptions> opts)
    : GridWriterBase<Grid>(grid, std::move(opts))
    {}
 
    std::string write(double t) {
        std::string filename = _write(t);
        _step_count++;
        return filename;
    }
 
 protected:
    unsigned _step_count = 0;
 
 private:
    virtual std::string _write(double) = 0;
};
 
#ifndef DOXYGEN
namespace GridDetail {
 
    template<bool is_transient, typename G>
    struct WriterBase;
    template<typename G>
    struct WriterBase<true, G> : std::type_identity<TimeSeriesGridWriter<G>> {};
    template<typename G>
    struct WriterBase<false, G> : std::type_identity<GridWriter<G>> {};
 
}  // namespace GridDetail
#endif  // DOXYGEN
 
 
}  // namespace GridFormat
 
#endif  // GRIDFORMAT_GRID_WRITER_HPP_