/*
 * Copyright 2010, Rene Gollent, rene@gollent.com
 * Distributed under the terms of the MIT License.
 */


#include "CStringValueNode.h"

#include <new>

#include "Architecture.h"
#include "StringValue.h"
#include "Tracing.h"
#include "Type.h"
#include "ValueLoader.h"
#include "ValueLocation.h"
#include "ValueNodeContainer.h"


// #pragma mark - CStringValueNode


CStringValueNode::CStringValueNode(ValueNodeChild* nodeChild,
        Type* type)
        :
        ChildlessValueNode(nodeChild),
        fType(type)
{
        fType->AcquireReference();
}


CStringValueNode::~CStringValueNode()
{
        fType->ReleaseReference();
}


Type*
CStringValueNode::GetType() const
{
        return fType;
}


status_t
CStringValueNode::ResolvedLocationAndValue(ValueLoader* valueLoader,
        ValueLocation*& _location, Value*& _value)
{
        // get the location
        ValueLocation* location = NodeChild()->Location();
        if (location == NULL)
                return B_BAD_VALUE;

        TRACE_LOCALS("  TYPE_ADDRESS (C string)\n");

        // get the value type
        type_code valueType;
        if (valueLoader->GetArchitecture()->AddressSize() == 4) {
                valueType = B_UINT32_TYPE;
                TRACE_LOCALS("    -> 32 bit\n");
        } else {
                valueType = B_UINT64_TYPE;
                TRACE_LOCALS("    -> 64 bit\n");
        }

        // load the value data

        BVariant addressData;
        BString valueData;
        status_t error = B_OK;
        size_t maxSize = 255;
        if (dynamic_cast<AddressType*>(fType) != NULL) {
                error = valueLoader->LoadValue(location, valueType, false,
                        addressData);
                if (error != B_OK)
                        return error;
        } else {
                addressData.SetTo(location->PieceAt(0).address);
                maxSize = dynamic_cast<ArrayType*>(fType)
                        ->DimensionAt(0)->CountElements();
        }

        ValuePieceLocation piece;
        piece.SetToMemory(addressData.ToUInt64());

        TRACE_LOCALS("    Address found: %#" B_PRIx64 "\n",
                addressData.ToUInt64());

        error = valueLoader->LoadStringValue(addressData, maxSize, valueData);
        if (error != B_OK)
                return error;

        piece.size = valueData.Length();

        TRACE_LOCALS("    String value found, length: %" B_PRIu64 "bytes\n",
                piece.size);

        ValueLocation* stringLocation = new(std::nothrow) ValueLocation(
                valueLoader->GetArchitecture()->IsBigEndian(), piece);

        if (stringLocation == NULL)
                return B_NO_MEMORY;

        BReference<ValueLocation> locationReference(stringLocation, true);

        error = valueLoader->LoadStringValue(addressData, maxSize, valueData);
        if (error != B_OK)
                return error;

        // create the type object
        Value* value = new(std::nothrow) StringValue(valueData);
        if (value == NULL)
                return B_NO_MEMORY;

        NodeChild()->SetLocation(stringLocation, B_OK);
        _location = locationReference.Detach();
        _value = value;
        return B_OK;
}