OneTapeDTM.h

Go to the documentation of this file.

 
/*
 * This file is part of Algorithms library toolkit.
 * Copyright (C) 2017 Jan Travnicek (jan.travnicek@fit.cvut.cz)
 
 * Algorithms library toolkit 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 3 of the License, or
 * (at your option) any later version.
 
 * Algorithms library toolkit 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 Algorithms library toolkit.  If not, see <http://www.gnu.org/licenses/>.
 */
 
#pragma once
 
 
#include <alib/map>
#include <alib/set>
#include <alib/tuple>
 
#include <core/components.hpp>
 
#include <common/DefaultStateType.h>
#include <common/DefaultSymbolType.h>
 
#include <automaton/AutomatonException.h>
#include <automaton/common/Shift.h>
 
#include <core/normalize.hpp>
#include <alphabet/common/SymbolNormalize.h>
#include <automaton/common/AutomatonNormalize.h>
 
namespace automaton {
 
class TapeAlphabet;
class InputAlphabet;
class BlankSymbol;
class States;
class FinalStates;
class InitialState;
 
template < class SymbolTypeT = DefaultSymbolType, class StateTypeT = DefaultStateType >
class OneTapeDTM final : public core::Components < OneTapeDTM < SymbolTypeT, StateTypeT >, ext::set < SymbolTypeT >, component::Set, std::tuple < TapeAlphabet, InputAlphabet >, SymbolTypeT, component::Value, BlankSymbol, ext::set < StateTypeT >, component::Set, std::tuple < States, FinalStates >, StateTypeT, component::Value, InitialState > {
public:
    typedef SymbolTypeT SymbolType;
    typedef StateTypeT StateType;
 
private:
    ext::map < ext::pair < StateType, SymbolType >, ext::tuple < StateType, SymbolType, Shift > > transitions;
 
public:
    explicit OneTapeDTM ( ext::set < StateType > states, ext::set < SymbolType > tapeAlphabet, SymbolType blankSymbol, ext::set< SymbolType > inputAlphabet, StateType initialState, ext::set < StateType > finalStates );
 
    explicit OneTapeDTM ( StateType initial, SymbolType blank );
 
    const StateType & getInitialState ( ) const & {
        return this-> template accessComponent < InitialState > ( ).get ( );
    }
 
    StateType && getInitialState ( ) && {
        return std::move ( this-> template accessComponent < InitialState > ( ).get ( ) );
    }
 
    bool setInitialState ( StateType state ) {
        return this-> template accessComponent < InitialState > ( ).set ( std::move ( state ) );
    }
 
    const ext::set < StateType > & getStates ( ) const & {
        return this-> template accessComponent < States > ( ).get ( );
    }
 
    ext::set < StateType > && getStates ( ) && {
        return std::move ( this-> template accessComponent < States > ( ).get ( ) );
    }
 
    bool addState ( StateType state ) {
        return this-> template accessComponent < States > ( ).add ( std::move ( state ) );
    }
 
    void setStates ( ext::set < StateType > states ) {
        this-> template accessComponent < States > ( ).set ( std::move ( states ) );
    }
 
    void removeState ( const StateType & state ) {
        this-> template accessComponent < States > ( ).remove ( state );
    }
 
    const ext::set < StateType > & getFinalStates ( ) const & {
        return this-> template accessComponent < FinalStates > ( ).get ( );
    }
 
    ext::set < StateType > && getFinalStates ( ) && {
        return std::move ( this-> template accessComponent < FinalStates > ( ).get ( ) );
    }
 
    bool addFinalState ( StateType state ) {
        return this-> template accessComponent < FinalStates > ( ).add ( std::move ( state ) );
    }
 
    void setFinalStates ( ext::set < StateType > states ) {
        this-> template accessComponent < FinalStates > ( ).set ( std::move ( states ) );
    }
 
    void removeFinalState ( const StateType & state ) {
        this-> template accessComponent < FinalStates > ( ).remove ( state );
    }
 
    const ext::set < SymbolType > & getInputAlphabet ( ) const & {
        return this-> template accessComponent < InputAlphabet > ( ).get ( );
    }
 
    ext::set < SymbolType > && getInputAlphabet ( ) && {
        return std::move ( this-> template accessComponent < InputAlphabet > ( ).get ( ) );
    }
 
    bool addInputSymbol ( SymbolType symbol ) {
        return this-> template accessComponent < InputAlphabet > ( ).add ( std::move ( symbol ) );
    }
 
    void addInputSymbols ( ext::set < SymbolType > symbols ) {
        this-> template accessComponent < InputAlphabet > ( ).add ( std::move ( symbols ) );
    }
 
    void setInputAlphabet ( ext::set < SymbolType > symbols ) {
        this-> template accessComponent < InputAlphabet > ( ).set ( std::move ( symbols ) );
    }
 
    void removeInputSymbol ( const SymbolType & symbol ) {
        this-> template accessComponent < InputAlphabet > ( ).remove ( symbol );
    }
 
    const ext::set < SymbolType > & getTapeAlphabet ( ) const & {
        return this-> template accessComponent < TapeAlphabet > ( ).get ( );
    }
 
    ext::set < SymbolType > && getTapeAlphabet ( ) && {
        return std::move ( this-> template accessComponent < TapeAlphabet > ( ).get ( ) );
    }
 
    bool addTapeSymbol ( SymbolType symbol ) {
        return this-> template accessComponent < TapeAlphabet > ( ).add ( std::move ( symbol ) );
    }
 
    void addTapeSymbols ( ext::set < SymbolType > symbols ) {
        this-> template accessComponent < TapeAlphabet > ( ).add ( std::move ( symbols ) );
    }
 
    void setTapeAlphabet ( ext::set < SymbolType > symbols ) {
        this-> template accessComponent < TapeAlphabet > ( ).set ( std::move ( symbols ) );
    }
 
    void removeTapeSymbol ( const SymbolType & symbol ) {
        this-> template accessComponent < TapeAlphabet > ( ).remove ( symbol );
    }
 
    const SymbolType & getBlankSymbol ( ) const & {
        return this-> template accessComponent < BlankSymbol > ( ).get ( );
    }
 
    SymbolType && getBlankSymbol ( ) && {
        return std::move ( this-> template accessComponent < BlankSymbol > ( ).get ( ) );
    }
 
    bool setBlankSymbol ( SymbolType state ) {
        return this-> template accessComponent < BlankSymbol > ( ).set ( std::move ( state ) );
    }
 
    bool addTransition ( StateType from, SymbolType input, StateType to, SymbolType output, Shift shift );
 
    bool removeTransition ( const StateType & from, const SymbolType & input, const StateType & to, const SymbolType & output, const Shift & shift );
 
    const ext::map < ext::pair < StateType, SymbolType >, ext::tuple < StateType, SymbolType, Shift > > & getTransitions ( ) const &;
 
    ext::map < ext::pair < StateType, SymbolType >, ext::tuple < StateType, SymbolType, Shift > > && getTransitions ( ) &&;
 
    auto operator <=> ( const OneTapeDTM & other ) const {
        return std::tie(getStates(), getInputAlphabet(), getInitialState(), getFinalStates(), getTapeAlphabet(), getBlankSymbol(), transitions) <=> std::tie(other.getStates(), other.getInputAlphabet(), other.getInitialState(), other.getFinalStates(), other.getTapeAlphabet(), other.getBlankSymbol(), other.transitions);
    }
 
    bool operator == ( const OneTapeDTM & other ) const {
        return std::tie(getStates(), getInputAlphabet(), getInitialState(), getFinalStates(), getTapeAlphabet(), getBlankSymbol(), transitions) == std::tie(other.getStates(), other.getInputAlphabet(), other.getInitialState(), other.getFinalStates(), other.getTapeAlphabet(), other.getBlankSymbol(), other.transitions);
    }
 
    friend ext::ostream & operator << ( ext::ostream & out, const OneTapeDTM & instance ) {
        return out << "(OneTapeDTM"
               << " states = " << instance.getStates ( )
               << " inputAlphabet = " << instance.getInputAlphabet ( )
               << " initialState = " << instance.getInitialState ( )
               << " finalStates = " << instance.getFinalStates ( )
               << " tapeAlphabet = " << instance.getTapeAlphabet ( )
               << " blankSymbol = " << instance.getBlankSymbol ( )
               << " transitions = " << instance.getTransitions ( )
               << ")";
    }
};
 
template<class SymbolType, class StateType >
OneTapeDTM<SymbolType, StateType>::OneTapeDTM ( ext::set < StateType > states, ext::set < SymbolType > tapeAlphabet, SymbolType blankSymbol, ext::set< SymbolType > inputAlphabet, StateType initialState, ext::set < StateType > finalStates ) : core::Components < OneTapeDTM, ext::set < SymbolType >, component::Set, std::tuple < TapeAlphabet, InputAlphabet >, SymbolType, component::Value, BlankSymbol, ext::set < StateType>, component::Set, std::tuple < States, FinalStates >, StateType, component::Value, InitialState > ( std::move ( tapeAlphabet ), std::move ( inputAlphabet ), std::move ( blankSymbol ), std::move ( states ), std::move ( finalStates ), std::move ( initialState ) ) {
 
}
 
template<class SymbolType, class StateType >
OneTapeDTM<SymbolType, StateType>::OneTapeDTM(StateType initial, SymbolType blank) : OneTapeDTM(ext::set<StateType>{initial}, ext::set<SymbolType> {blank}, blank, ext::set<SymbolType>{}, initial, ext::set<StateType>{}) {
 
}
 
template<class SymbolType, class StateType >
bool OneTapeDTM<SymbolType, StateType>::addTransition(StateType from, SymbolType input, StateType to, SymbolType output, Shift shift) {
    if (!getStates().count(from)) {
        throw AutomatonException("State \"" + ext::to_string ( from ) + "\" doesn't exist.");
    }
 
    if ( getFinalStates().count ( from ) )
        throw AutomatonException("From state \"" + ext::to_string ( from ) + "\" is final..");
 
    if (!getTapeAlphabet().count(input)) {
        throw AutomatonException("Tape symbol \"" + ext::to_string ( input ) + "\" doesn't exist.");
    }
 
    if (!getStates().count(to)) {
        throw AutomatonException("State \"" + ext::to_string ( to ) + "\" doesn't exist.");
    }
 
    if (!getTapeAlphabet().count(output)) {
        throw AutomatonException("Tape symbol  \"" + ext::to_string ( output ) + "\" doesn't exist.");
    }
 
    ext::pair<StateType, SymbolType> key = ext::make_pair(std::move(from), std::move(input));
 
    ext::tuple<StateType, SymbolType, Shift > value(std::move(to), std::move(output), shift);
 
    if (transitions.find(key) != transitions.end()) {
        if(transitions.find(key)->second == value)
            return false;
        else
            throw AutomatonException("Transition (\"" + ext::to_string ( key.first ) + "\", \"" + ext::to_string ( key.second ) + "\") -> ? already exists.");
    }
 
    transitions.insert ( std::move(key), std::move(value) );
    return true;
}
 
template<class SymbolType, class StateType >
bool OneTapeDTM<SymbolType, StateType>::removeTransition(const StateType& from, const SymbolType& input, const StateType& to, const SymbolType& output, const Shift& shift) {
    ext::pair<StateType, SymbolType> key = ext::make_pair(from, input);
 
    if (transitions.find(key) == transitions.end())
        return false;
 
    ext::tuple<StateType, SymbolType, Shift > value(to, output, shift);
    if(transitions.find(key)->second != value)
        throw AutomatonException("Transition (\"" + ext::to_string ( from ) + "\", \"" + ext::to_string ( input ) + "\") -> ? doesn't exists.");
 
    transitions.erase(key);
    return true;
}
 
template<class SymbolType, class StateType >
const ext::map < ext::pair < StateType, SymbolType >, ext::tuple < StateType, SymbolType, Shift > > & OneTapeDTM < SymbolType, StateType >::getTransitions ( ) const & {
    return transitions;
}
 
template<class SymbolType, class StateType >
ext::map < ext::pair < StateType, SymbolType >, ext::tuple < StateType, SymbolType, Shift > > && OneTapeDTM < SymbolType, StateType >::getTransitions ( ) && {
    return std::move ( transitions );
}
 
} /* namespace automaton */
 
namespace core {
 
template<class SymbolType, class StateType >
class SetConstraint< automaton::OneTapeDTM<SymbolType, StateType>, SymbolType, automaton::TapeAlphabet > {
public:
    static bool used ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const SymbolType & symbol ) {
        if ( automaton.getBlankSymbol ( ) == symbol )
            return true;
 
        if ( automaton.getInputAlphabet().count(symbol))
            return true;
 
        for ( const std::pair<const ext::pair<StateType, SymbolType>, ext::tuple<StateType, SymbolType, automaton::Shift> >& transition : automaton.getTransitions())
            if (symbol == transition.first.second || symbol == std::get<1>(transition.second))
                return true;
 
        return false;
 
    }
 
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> &, const SymbolType &) {
        return true;
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> &, const SymbolType & ) {
    }
};
 
template<class SymbolType, class StateType >
class SetConstraint< automaton::OneTapeDTM<SymbolType, StateType>, SymbolType, automaton::InputAlphabet > {
public:
    static bool used ( const automaton::OneTapeDTM<SymbolType, StateType> &, const SymbolType & ) {
        return false;
    }
 
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const SymbolType & symbol ) {
        return automaton.getTapeAlphabet ( ).count ( symbol );
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const SymbolType & symbol ) {
        if (symbol == automaton.getBlankSymbol())
            throw automaton::AutomatonException("Input symbol \"" + ext::to_string ( symbol ) + "\" cannot be blank symbol.");
    }
};
 
template<class SymbolType, class StateType >
class ElementConstraint< automaton::OneTapeDTM<SymbolType, StateType>, SymbolType, automaton::BlankSymbol > {
public:
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const SymbolType & symbol ) {
        return automaton.getTapeAlphabet ( ).count ( symbol );
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const SymbolType & symbol ) {
        if (automaton.getInputAlphabet().count( symbol ))
            throw automaton::AutomatonException("Blank symbol \"" + ext::to_string ( symbol ) + "\" cannot be in input alphabet.");
    }
};
 
template<class SymbolType, class StateType >
class SetConstraint< automaton::OneTapeDTM<SymbolType, StateType>, StateType, automaton::States > {
public:
    static bool used ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const StateType & state ) {
        if ( automaton.getInitialState ( ) == state )
            return true;
 
        if ( automaton.getFinalStates ( ).count ( state ) )
            return true;
 
        for ( const std::pair<const ext::pair<StateType, SymbolType>, ext::tuple<StateType, SymbolType, automaton::Shift> >& transition : automaton.getTransitions ( ) )
            if ( state == transition.first.first || state == std::get < 0 > ( transition.second ) )
                return true;
 
        return false;
    }
 
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> &, const StateType & ) {
        return true;
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> &, const StateType & ) {
    }
};
 
template<class SymbolType, class StateType >
class SetConstraint< automaton::OneTapeDTM<SymbolType, StateType>, StateType, automaton::FinalStates > {
public:
    static bool used ( const automaton::OneTapeDTM<SymbolType, StateType> &, const StateType & ) {
        return false;
    }
 
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const StateType & state ) {
        return automaton.getStates ( ).count ( state );
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const StateType & state ) {
        for ( const std::pair<const ext::pair<StateType, SymbolType>, ext::tuple<StateType, SymbolType, automaton::Shift> >& transition : automaton.getTransitions ( ) )
            if ( state == transition.first.first )
                throw automaton::AutomatonException("State \"" + ext::to_string ( state ) + "\" cannot be marked as final as it is source of a transition.");
    }
};
 
template<class SymbolType, class StateType >
class ElementConstraint< automaton::OneTapeDTM<SymbolType, StateType>, StateType, automaton::InitialState > {
public:
    static bool available ( const automaton::OneTapeDTM<SymbolType, StateType> & automaton, const StateType & state ) {
        return automaton.getStates ( ).count ( state );
    }
 
    static void valid ( const automaton::OneTapeDTM<SymbolType, StateType> &, const StateType & ) {
    }
};
 
template<class SymbolType, class StateType >
struct normalize < automaton::OneTapeDTM < SymbolType, StateType > > {
    static automaton::OneTapeDTM < > eval ( automaton::OneTapeDTM < SymbolType, StateType > && value ) {
        ext::set < DefaultSymbolType > tapeAlphabet = alphabet::SymbolNormalize::normalizeAlphabet ( std::move ( value ).getTapeAlphabet ( ) );
        ext::set < DefaultSymbolType > alphabet = alphabet::SymbolNormalize::normalizeAlphabet ( std::move ( value ).getInputAlphabet ( ) );
        DefaultSymbolType blankSymbol = alphabet::SymbolNormalize::normalizeSymbol ( std::move ( value ).getBlankSymbol ( ) );
        ext::set < DefaultStateType > states = automaton::AutomatonNormalize::normalizeStates ( std::move ( value ).getStates ( ) );
        DefaultStateType initialState = automaton::AutomatonNormalize::normalizeState ( std::move ( value ).getInitialState ( ) );
        ext::set < DefaultStateType > finalStates = automaton::AutomatonNormalize::normalizeStates ( std::move ( value ).getFinalStates ( ) );
 
        automaton::OneTapeDTM < > res ( std::move ( states ), std::move ( tapeAlphabet ), std::move ( blankSymbol ), std::move ( alphabet ), std::move ( initialState ), std::move ( finalStates ) );
 
        for ( std::pair < ext::pair < DefaultStateType, DefaultSymbolType >, ext::tuple < DefaultStateType, DefaultSymbolType, automaton::Shift > > && transition : ext::make_mover ( std::move ( value ).getTransitions ( ) ) ) {
            DefaultStateType from = automaton::AutomatonNormalize::normalizeState ( std::move ( transition.first.first ) );
            DefaultSymbolType input = alphabet::SymbolNormalize::normalizeSymbol ( std::move ( transition.first.second ) );
            DefaultStateType to = automaton::AutomatonNormalize::normalizeState ( std::move ( std::get < 0 > ( transition.second ) ) );
            DefaultSymbolType output = alphabet::SymbolNormalize::normalizeSymbol ( std::move ( std::get < 1 > ( transition.second ) ) );
 
            res.addTransition ( std::move ( from ), std::move ( input ), std::move ( to ), std::move ( output ), std::get < 2 > ( transition.second ) );
        }
 
        return res;
    }
};
 
} /* namespace core */
 
extern template class automaton::OneTapeDTM < >;