Flags.h

/*
 
MIT License
 
Copyright (c) 2017 FMI Open Development / Markus Peura, first.last@fmi.fi
 
Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:
 
The above copyright notice and this permission notice shall be included in all
copies or substantial portions of the Software.
 
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
SOFTWARE.
 
*/
/*
Part of Rack development has been done in the BALTRAD projects part-financed
by the European Union (European Regional Development Fund and European
Neighbourhood Partnership Instrument, Baltic Sea Region Programme 2007-2013)
*/
 
#ifndef DRAIN_FLAGS
#define DRAIN_FLAGS
 
#include <iostream>
#include <list>
#include <iterator>
#include <iostream>
#include <list>
#include <sstream>
#include <stdexcept>
//#include <typeinfo>
#include <stdlib.h>
 
#include <drain/Log.h>
#include <drain/String.h>
#include <drain/Type.h>
 
#include "Dictionary.h"
 
#include "FlagBase.h"
 
namespace drain {
 
 
/*
template <typename E>
const SprinterLayout drain::FlaggerBase<E>::dictLayout = {",", "?", "=", ""};
*/
 
 
 
 
 
 
template <typename E>
class SingleFlagger : public FlaggerBase<E,E> {
 
public:
 
    //typedef typename FlaggerBase<E>::dict_value_t dict_value_t;
    typedef E value_t;
    typedef E storage_t;
 
    typedef FlaggerBase<E,E> flagger_t;
    // typedef typename EnumDict<E>::dict_t dict_t;
    typedef typename flagger_t::dict_t dict_t;
    typedef typename dict_t::key_t key_t; // ~string
 
protected:
 
    const dict_t & dict;
    // dict_t ownDict;
 
public:
 
    virtual
    const dict_t & getDict() const override {
        return dict;
    };
 
 
    inline
    SingleFlagger(const dict_t & dict) : dict(dict) {
    };
 
    /***
     *
     *  storage_t == value_t
     */
    inline
    SingleFlagger(const dict_t & dict, const storage_t &v) : dict(dict) {
        this->value = v;
    };
 
 
    /***
     *
     *  storage_t == value_t
     */
    inline
    SingleFlagger(const dict_t & dict, storage_t & v, char sep=',') : flagger_t(v, sep), dict(dict){
    };
 
 
    virtual inline
    ~SingleFlagger(){};
 
 
    virtual
    bool isSet(const storage_t & x) const override {
        return (this->value == x);
    };
 
    template <class T>
    inline
    SingleFlagger<E> & operator=(const T & v){
        this->set(v);
        return *this;
    }
 
    virtual inline
    const key_t & str() const  override {
        return this->getDict().getKey(this->value);
    }
 
protected:
 
 
    virtual
    void assign(const std::string & key) override {
 
        // NO this->set(s);
 
        if ((key.find(',')!= std::string::npos)||(key.find('|')!= std::string::npos)){
            Logger mout(__FILE__, __FUNCTION__);
            mout.unimplemented<LOG_ERR>(__FILE__, ':', TypeName<E>::str(), ": multi-key arg: '"+ key, "', for single-flagger: ", sprinter(this->getDict().getKeys()));
        }
 
        if (this->getDict().hasKey(key)){
            this->value = static_cast<storage_t>(this->getDict().getValue(key)); // Cast needed (only) if MultiFlagger converts enum value_t -> storage_t
        }
        else {
            Logger mout(__FILE__, __FUNCTION__);
            value_t v = static_cast<value_t>(atoi(key.c_str()));
            if (!this->getDict().hasValue(v)){
                mout.suspicious("value: ", v, " corresponds to no value in dict:",  this->getDict());
                //mout.error(__FILE__, ':', TypeName<E>::str(), ": no such key: '"+ key, "', keys=", sprinter(this->getDict().getKeys()));
                mout.error("Flagger@", TypeName<E>::str(), ": no such key: '"+ key, "', dict=", sprinter(this->getDict()));
            }
            // this->value = FlagResolver::getIntValue(this->getDict(), key);  // SingleFlagger does not like this.
            // throw std::runtime_error(std::string("Dictionary[") + typeid(dict_value_t).name()+ "]: no such key: "+ key);
            this->value = v;
        }
 
    };
 
 
 
};
 
template <typename E>
inline
std::ostream & operator<<(std::ostream & ostr, const drain::SingleFlagger<E> & flagger) {
    ostr << flagger.str();
    return ostr;
}
 
 
 
template <typename E, typename T=size_t>
class MultiFlagger : public FlaggerBase<E,T> {
 
public:
 
    typedef E value_t;
    //typedef typename FlaggerBase<E,size_t>::storage_t storage_t;
    typedef T storage_t;
    typedef FlaggerBase<E,T> flagger_t;
    typedef typename flagger_t::dict_t dict_t;
    typedef typename dict_t::key_t key_t; // ~string
 
    /*
    inline
    MultiFlagger(){
    };
 
    inline
    MultiFlagger(storage_t & v, char sep=',') : flagger_t(v,sep){
    };
 
    template <typename ... V>
    inline
    MultiFlagger(const V &... args){
        set(args...);
        // this->value = v;
    };
    */
 
    inline
    MultiFlagger(const dict_t & dict) : dict(dict) {
    };
 
    template <typename ... V>
    inline
    MultiFlagger(const dict_t & dict, const V &... args) : dict(dict) {
        set(args...);
    };
 
    inline
    MultiFlagger(const dict_t & dict, storage_t & target, char sep=',') : flagger_t(target, sep), dict(dict){
    };
 
    virtual inline
    ~MultiFlagger(){};
 
 
 
public:
 
    virtual
    const dict_t & getDict() const override {
        return dict;
    };
 
    virtual
    bool isSet(const storage_t & x) const override {
        return ((this->value & x) == x);
    };
 
    void unset(const storage_t & x){
        this->value = (this->value & ~x);
        //return ((this->value & x) == x);
    }
 
 
    template <typename ... V>
    inline
    void set(const V &... args) {
        this->reset();
        add(args...);
    }
 
 
    template <typename V, typename ...VV>
    inline
    void add(const V & arg, const VV &... args) {
        //std::cerr << __FUNCTION__ << ':' << arg << std::endl;
        addOne(arg);
        add(args...);
    }
 
    virtual
    const key_t & str() const  override  {
        const dict_t & dict = this->getDict();
        currentStr = FlagResolver::getKeys(dict, this->value, this->separator);
        return currentStr;
    }
 
 
    virtual
    std::string & str(){
        return currentStr;  // CHECK USAGE
    }
 
    /*
    virtual
    std::string str(const dict_value_t & value){
        return FlagResolver::getKeys(this->getDict(), value, this->separator);
    }
    */
    /*
    inline
    void update(){
        assign(currentStr);
    }
    */
 
 
protected:
 
    const dict_t & dict;
    // dict_t ownDict;
 
    virtual
    void assign(const std::string & s) override {
        const dict_t & dict = this->getDict();
        this->value = FlagResolver::getIntValue(dict, s, this->separator); // uses dict.separator if needed
    }
 
 
    inline
    void add(){};
 
    /*
    virtual inline
    void addOne(const value_t & value){
        // why OR op in dvalue
        // this->value = static_cast<dict_value_t>((dvalue_t)this->value | (dvalue_t)value);
        this->value |= static_cast<value_t>(value);
    }
    */
 
 
    inline
    void addOne(const key_t & key){
 
        // Resolves also "" and numeric keys.
        this->value |= FlagResolver::getIntValue(this->getDict(), key, this->separator);
 
        /*
        if (key.empty())
            return;
 
        //dict_value_t v = ::atoi(key);
 
        const dict_t & dict = this->getDict();
        if (dict.hasKey(key)){
            //this->value |= (dict_value_t)dict.getValue(key); // why cast? dvalue_t -> value_t
            addOne((dict_value_t)dict.getValue(key));
        }
        else {
            Logger mout(__FILE__, __FUNCTION__);
            mout.error(TypeName<E>::get(), ": no such key: '"+ key, "', keys=", sprinter(this->getDict().getKeys()));
            // throw std::runtime_error(std::string("Dictionary/") + typeid(dict_value_t).name()+ ": no such key: "+ key);
        }
        */
    }
 
    template <typename T2>
    inline
    void addOne(const T2 & value){
        // why OR op in dvalue
        // this->value = static_cast<dict_value_t>((dvalue_t)this->value | (dvalue_t)value);
        this->value |= static_cast<value_t>(value);
    }
 
 
    mutable
    std::string currentStr;
    // key_t currentStr;
 
 
};
 
 
 
template <typename E,typename T>
inline
std::ostream & operator<<(std::ostream & ostr, const drain::MultiFlagger<E,T> & flagger) {
    return FlagResolver::keysToStream(flagger.getDict(), flagger.getValue(), ostr);
}
 
 
 
 
 
 
 
 
 
/*
template <class F>
class Flagger2 : public F {  // Consider renaming to IntFlagger !
 
public:
 
    typedef F fbase_t;
    typedef typename fbase_t::value_t value_t;
    typedef typename fbase_t::dict_t   dict_t;
 
 
    inline
    Flagger2(const dict_t & dict, value_t & value, char sep=',') : fbase_t(dict, value, sep) { // , dict(dict){
    }
 
    inline
    Flagger2(const Flagger2<F> & flagger) : fbase_t(flagger.dict) { // DANGEROUS if tmp ref?  : dict(flagger.dict){
    }
 
    template <class T>
    inline
    Flagger2<F> & operator=(const T & v){
        this->set(v);
        return *this;
    }
 
};
*/
 
 
template <class F>
class Flags2 : public F {
 
public:
 
    typedef F fbase_t;
    typedef typename F::value_t value_t;
    typedef typename F::dict_t   dict_t;
 
 
    virtual
    const dict_t & getDict() const {
        return dict;
    };
 
    virtual
    dict_t & getDict(){
        return dict;
    };
 
 
 
    inline
    Flags2(){
    };
 
 
    inline
    Flags2(const std::initializer_list<typename dict_t::entry_t> & list) : dict(list){
    };
 
    inline
    Flags2(const Flags2<F> & flags) : dict(flags.dict){
    }
 
    template <class T>
    inline
    Flags2<F> & operator=(const T & v){
        this->set(v);
        return *this;
    }
 
protected:
 
    // Consider inherited dictionary, through a wrapper (first inherit, to guarantee init ref validity?).
    dict_t dict;
 
 
};
 
 
 
} // drain::
 
 
#endif