tkproperty_list.cpp

/********************************************************************************
 *   Copyright (c) : Université de Lyon 1, CNRS/IN2P3, UMR5822,                 *
 *                   IP2I, F-69622 Villeurbanne Cedex, France                   *
 *                   Normandie Université, ENSICAEN, UNICAEN, CNRS/IN2P3,       *
 *                   LPC Caen, F-14000 Caen, France                             *
 *   Contibutor(s) :                                                            *
 *      Jérémie Dudouet jeremie.dudouet@cnrs.fr [2020]                          *
 *      Diego Gruyer    diego.gruyer@cnrs.fr    [2020]                          *
 *                                                                              *
 *   Licensed under the MIT License <http://opensource.org/licenses/MIT>.       *   
 *   SPDX-License-Identifier: MIT                                               *
 ********************************************************************************/
 
#include "tkproperty_list.h"
 
#include <array>
#include <charconv>
 
namespace tkn {
}
 
using namespace tkn;
 
bool tkproperty_list::has_property(const tkstring &_property) const
{
    return fProperties.find(_property) != fProperties.end();
}
 
tkstring tkproperty_list::get_property(const tkstring &_property) const
{
    const auto property = fProperties.find(_property);
    return property == fProperties.end() ? tkstring("") : property->second.value;
}
 
tkstring tkproperty_list::get_property_unit(const tkstring &_property)  const
{
    const auto property = fProperties.find(_property);
    return property == fProperties.end() ? tkstring("") : property->second.unit;
}
 
tkstring tkproperty_list::get_property_type(const tkstring &_property) const
{
    const auto property = fProperties.find(_property);
    return property == fProperties.end() ? tkstring("") : property->second.type;
}
 
void tkproperty_list::list_properties(const tkstring &_opt) const
{
    glog << info << fname << " properties:" << do_endl;
    for(const auto &prop : fProperties)
        if (prop.first.match(_opt))
            glog << info << left << setw(35) << prop.first << setw(35) << prop.second.value + " " + prop.second.unit << "[" << prop.second.type<< "]" << do_endl;
}
 
void tkproperty_list::list_data_properties(const tkstring &_opt) const
{
    glog << info << fname << " data properties:" << do_endl;
    for(const auto &prop : fDataProperties)
        if (prop.first.match(_opt))
            glog << info << left << setw(35) << prop.first << prop.second << do_endl;
}
 
vector<shared_ptr<tkmeasure>> tkproperty_list::get_data_properties(const tkstring &_opt)
{
    vector<shared_ptr<tkmeasure>> list;
    for (auto &data : fDataProperties) {
        if (data.first.match(_opt))  list.push_back(data.second);
    }
    return list;
}
 
shared_ptr<tkmeasure> tkproperty_list::get(const tkstring &_property) const
{
    const auto property = fDataProperties.find(_property);
    return property == fDataProperties.end() ? nullptr : property->second;
}
 
void tkproperty_list::add_property_str(const tkstring &_name, const tkstring &_val, const tkstring &_unit, const tkstring &_type)
{
    const auto property = fProperties.try_emplace(_name).first;
    property->second.value = _val;
    property->second.unit = _unit;
    property->second.type = _type;
}
 
void tkproperty_list::add_property(const tkstring &_name, const shared_ptr<tkmeasure> &_property, const tkstring &_value_str, const tkstring &_unit_str)
{
    std::array<char, 64> buffer{};
    const auto conversion = std::to_chars(
        buffer.data(), buffer.data() + buffer.size(), _property->get_value(),
        std::chars_format::fixed, 6);
    tkstring val;
    if (conversion.ec == std::errc())
        val.assign(buffer.data(), conversion.ptr);
    else
        val = tkstring::form("%f", _property->get_value());
    tkstring unit = _property->get_unit();
    if(!_value_str.is_empty()) val = _value_str;
    if(_unit_str!="!") unit = _unit_str;
    add_property_str(_name,val,unit,"FLOAT");
    fDataProperties.insert_or_assign(_name, _property);
}
 
#ifdef HAS_ROOT
ClassImp(tkproperty_list);
#endif