//===-- OptionValueSInt64.cpp -----------------------------------*- C++ -*-===//
//
//                     The LLVM Compiler Infrastructure
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//

#include "lldb/Interpreter/OptionValueSInt64.h"

// C Includes
// C++ Includes
// Other libraries and framework includes
// Project includes
#include "lldb/Core/Stream.h"
#include "lldb/Interpreter/Args.h"

using namespace lldb;
using namespace lldb_private;

void
OptionValueSInt64::DumpValue (const ExecutionContext *exe_ctx, Stream &strm, uint32_t dump_mask)
{
    //printf ("%p: DumpValue (exe_ctx=%p, strm, mask) m_current_value = %lli\n", this, exe_ctx, m_current_value);
    if (dump_mask & eDumpOptionType)
        strm.Printf ("(%s)", GetTypeAsCString ());
//    if (dump_mask & eDumpOptionName)
//        DumpQualifiedName (strm);
    if (dump_mask & eDumpOptionValue)
    {
        if (dump_mask & eDumpOptionType)
            strm.PutCString (" = ");
        strm.Printf ("%lli", m_current_value);
    }
}

Error
OptionValueSInt64::SetValueFromCString (const char *value_cstr, VarSetOperationType op)
{
    //printf ("%p: SetValueFromCString (s=\"%s\", op=%i)\n", this, value_cstr, op);
    Error error;
    switch (op)
    {
        case eVarSetOperationClear:
            Clear();
            break;
            
        case eVarSetOperationReplace:
        case eVarSetOperationAssign:
            {
                bool success = false;
                int64_t value = Args::StringToSInt64 (value_cstr, 0, 0, &success);
                if (success)
                {
                    if (value >= m_min_value && value <= m_max_value)
                    {
                        m_value_was_set = true;
                        m_current_value = value;
                    }
                    else
                        error.SetErrorStringWithFormat ("%lli is out of range, valid values must be between %lli and %lli.",
                                                        value,
                                                        m_min_value,
                                                        m_max_value);
                }
                else
                {
                    error.SetErrorStringWithFormat ("invalid int64_t string value: '%s'", value_cstr);
                }
            }
            break;
            
        case eVarSetOperationInsertBefore:
        case eVarSetOperationInsertAfter:
        case eVarSetOperationRemove:
        case eVarSetOperationAppend:
        case eVarSetOperationInvalid:
            error = OptionValue::SetValueFromCString (value_cstr, op);
            break;
    }
    return error;
}

lldb::OptionValueSP
OptionValueSInt64::DeepCopy () const
{
    return OptionValueSP(new OptionValueSInt64(*this));
}
