xml_to_nexus.hpp

Go to the documentation of this file.

//
// (c) Copyright 2013 DESY, Eugen Wintersberger <eugen.wintersberger@desy.de>
//
// This file is part of libpniio.
//
// libpniio is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 2 of the License, or
// (at your option) any later version.
//
// libpniio is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with libpniio.  If not, see <http://www.gnu.org/licenses/>.
//************************************************************************
// Created on: Jul 8, 2013
//     Author: Eugen Wintersberger <eugen.wintersberger@desy.de>
//
#pragma once

#include <sstream>
#include <pni/core/types.hpp>
#include <pni/core/error.hpp>
#include "../algorithms/write.hpp"
#include "../algorithms/get_type.hpp"
#include "../nxobject.hpp"
#include "../nxobject_traits.hpp"
#include "../../exceptions.hpp"
#include "../../parsers.hpp"

#include "node.hpp"
#include "data_node.hpp"
#include "group.hpp"
#include "attribute.hpp"
#include "field.hpp"
#include "default.hpp"
#include "link.hpp"


namespace pni{
namespace io{
namespace nx{
namespace xml{
    
    //-------------------------------------------------------------------------
    template<
             typename T,
             typename OTYPE
            >
    void write_node_data(const OTYPE &object,const node &n)
    {
        typedef std::vector<T> buffer_type;
        
        auto buffer = io_node::data_from_xml<buffer_type>(n);
                
        write(object,buffer);
        
    }
    
    //-------------------------------------------------------------------------
    template<typename OTYPE>
    void write_node_data(const OTYPE &object,const node &n)
    { 
        using namespace pni::core;

        switch(get_type(object))
        {   
            case type_id_t::UINT8:
                write_node_data<uint8>(object,n); break;
            case type_id_t::INT8:
                write_node_data<int8>(object,n); break;
            case type_id_t::UINT16:
                write_node_data<uint16>(object,n); break;
            case type_id_t::INT16:
                write_node_data<int16>(object,n); break;
            case type_id_t::UINT32:
                write_node_data<uint32>(object,n); break;
            case type_id_t::INT32:
                write_node_data<int32>(object,n); break;
            case type_id_t::UINT64:
                write_node_data<uint64>(object,n); break;
            case type_id_t::INT64:
                write_node_data<int64>(object,n); break;
            case type_id_t::FLOAT32:
                write_node_data<float32>(object,n); break;
            case type_id_t::FLOAT64:
                write_node_data<float64>(object,n); break;
            case type_id_t::FLOAT128:
                write_node_data<float128>(object,n); break;
            case type_id_t::COMPLEX32:
                write_node_data<complex32>(object,n); break;
            case type_id_t::COMPLEX64:
                write_node_data<complex64>(object,n); break;
            case type_id_t::COMPLEX128:
                write_node_data<complex128>(object,n); break;
            case type_id_t::BOOL:
                write_node_data<bool_t>(object,n); break;
            case type_id_t::STRING:
                //need some special handling for string data - only support
                //scalar strings
                write(object,io_node::data_from_xml<string>(n));                                
                //write_node_data<string>(object,n);
                break;            
            default:
                throw type_error(EXCEPTION_RECORD,
                    "Unrecognized data type!");
        }        
    }


    //--------------------------------------------------------------------------
    template<
             typename GTYPE,
             typename FTYPE,
             typename ATYPE,
             typename LTYPE,
             typename PTYPE
            >
    void xml_to_nexus(const node &t,const nxobject<GTYPE,FTYPE,ATYPE,LTYPE> &parent,
                      PTYPE write_data)
    {
        //typedef nxobject<GTYPE,FTYPE,ATYPE> object_type;
        for(auto child: t)
        {            
            if(child.first == "group")
            {
                auto g = group::object_from_xml(parent,child.second);
                //recursive call of create_objects
                xml_to_nexus(child.second,g,write_data);
                                
            }
            else if(child.first == "field")
            {
                auto f = field::object_from_xml(parent,child.second);
                
                if(write_data(f) && !data_node::read(child.second).empty()) 
                    write_node_data(f,child.second);
                
                //need to call here xml_to_nexus recursively to add
                //custom attributes
                xml_to_nexus(child.second,f,write_data);                
            }
            else if(child.first == "link")
            {                
                link::object_from_xml(parent,child.second);
            }
            else if(child.first == "attribute")
            {
                //attach attributes to the parent object
                auto a = attribute::object_from_xml(parent,child.second);
                
                if(write_data(a) && !data_node::read(child.second).empty())
                    write_node_data(a,child.second);
            }                                        
        }
    }
    
    //-------------------------------------------------------------------------
    template<
             typename GTYPE,
             typename FTYPE,
             typename ATYPE,
             typename LTYPE
            >
    void xml_to_nexus(const node &t,const nxobject<GTYPE,FTYPE,ATYPE,LTYPE> &parent)
    {
       xml_to_nexus(t,parent,write_no_data());
    }
        
    //-------------------------------------------------------------------------
    template<
             template<pni::io::nx::nximp_code> class OTYPE,
             pni::io::nx::nximp_code IMPID,
             typename PTYPE
            >
    void xml_to_nexus(const node &t,const OTYPE<IMPID> &group,PTYPE write_data)
    {
        typedef typename nxobject_trait<IMPID>::object_type object_type;
        object_type o = group;
        xml_to_nexus(t,o,write_data);
    }
    
    //-------------------------------------------------------------------------
    template<
             template<pni::io::nx::nximp_code> class OTYPE,
             pni::io::nx::nximp_code IMPID
            >
    void xml_to_nexus(const node &t,const OTYPE<IMPID> &group)
    {
        typedef typename nxobject_trait<IMPID>::object_type object_type;
        object_type o=group;
        xml_to_nexus(t,o,write_no_data());
    }

//end of namespace 
}
}
}
}