BoolValue.cpp

Go to the documentation of this file.

// BoolValue.cpp: implementation of the CBoolValue class.
/*
 * Copyright (c) 1996-2000 Erwin Coumans <coockie@acm.org>
 *
 * Permission to use, copy, modify, distribute and sell this software
 * and its documentation for any purpose is hereby granted without fee,
 * provided that the above copyright notice appear in all copies and
 * that both that copyright notice and this permission notice appear
 * in supporting documentation.  Erwin Coumans makes no
 * representations about the suitability of this software for any
 * purpose.  It is provided "as is" without express or implied warranty.
 *
 */

#include "BoolValue.h"
#include "StringValue.h"
#include "ErrorValue.h"
#include "VoidValue.h"

// Construction/Destruction

const STR_String CBoolValue::sTrueString  = "TRUE";
const STR_String CBoolValue::sFalseString = "FALSE";

CBoolValue::CBoolValue()
/*
pre: false
effect: constructs a new CBoolValue
*/
{
        trace("Bool constructor error");
}



CBoolValue::CBoolValue(bool inBool)
: m_bool(inBool)
{
} // Constructs a new CBoolValue containing <inBool>



CBoolValue::CBoolValue(bool innie,const char *name,AllocationTYPE alloctype)
{
        m_bool = innie;
        SetName(name);

        if (alloctype == CValue::STACKVALUE)
                CValue::DisableRefCount();
}



void CBoolValue::SetValue(CValue* newval)
{
        m_bool = (newval->GetNumber() != 0);
        SetModified(true);
}



CValue* CBoolValue::Calc(VALUE_OPERATOR op, CValue *val)
/*
pre:
ret: a new object containing the result of applying operator op to this
object and val
*/
{
        switch (op)
        {
        case VALUE_POS_OPERATOR:
        case VALUE_NEG_OPERATOR:
                {
                        return new CErrorValue (op2str(op) + GetText());
                        break;
                }
        case VALUE_NOT_OPERATOR:
                {
                        return new CBoolValue (!m_bool);
                        break;
                }
        default:
                {
                        return val->CalcFinal(VALUE_BOOL_TYPE, op, this);
                        break;
                }
        }
}



CValue* CBoolValue::CalcFinal(VALUE_DATA_TYPE dtype, VALUE_OPERATOR op, CValue *val)
/*
pre: the type of val is dtype
ret: a new object containing the result of applying operator op to val and
this object
*/
{
        CValue *ret;
        
        switch(dtype)
        {
        case VALUE_EMPTY_TYPE:
        case VALUE_BOOL_TYPE:
                {
                        switch(op)
                        {
                        case VALUE_AND_OPERATOR:
                                {
                                        ret = new CBoolValue (((CBoolValue *) val)->GetBool() && m_bool);
                                        break;
                                }
                        case VALUE_OR_OPERATOR:
                                {
                                        ret = new CBoolValue (((CBoolValue *) val)->GetBool() || m_bool);
                                        break;
                                }
                        case VALUE_EQL_OPERATOR:
                                {
                                        ret = new CBoolValue (((CBoolValue *) val)->GetBool() == m_bool);
                                        break;
                                }
                        case VALUE_NEQ_OPERATOR:
                                {
                                        ret = new CBoolValue (((CBoolValue *) val)->GetBool() != m_bool);
                                        break;
                                }
                        case VALUE_NOT_OPERATOR:
                                {
                                        return new CBoolValue (!m_bool);
                                        break;
                                }
                        default:
                                {
                                        ret =  new CErrorValue(val->GetText() + op2str(op) +
                                                "[operator not allowed on booleans]");
                                        break;
                                }
                        }
                        break;
                }
        case VALUE_STRING_TYPE:
                {
                        switch(op)
                        {
                        case VALUE_ADD_OPERATOR:
                                {
                                        ret = new CStringValue(val->GetText() + GetText(),"");
                                        break;
                                }
                        default:
                                {
                                        ret =  new CErrorValue(val->GetText() + op2str(op) + "[Only + allowed on boolean and string]");
                                        break;
                                }
                        }
                        break;
                }
        default:
                ret =  new CErrorValue("[type mismatch]" + op2str(op) + GetText());
        }

        return ret;
}



bool CBoolValue::GetBool()
/*
pre:
ret: the bool stored in the object
*/
{
        return m_bool;
}



double CBoolValue::GetNumber()
{
        return (double)m_bool;
}



const STR_String& CBoolValue::GetText()
{
        return m_bool ? sTrueString : sFalseString;
}



CValue* CBoolValue::GetReplica()
{
        CBoolValue* replica = new CBoolValue(*this);
        replica->ProcessReplica();
        
        return replica;
}

#ifdef WITH_PYTHON
PyObject* CBoolValue::ConvertValueToPython()
{
        return PyBool_FromLong(m_bool != 0);
}
#endif // WITH_PYTHON