/*
 * Copyright 2009-2011, Ingo Weinhold, ingo_weinhold@gmx.de.
 * Copyright 2002-2010, Axel Dörfler, axeld@pinc-software.de.
 * Copyright 2012-2016, Rene Gollent, rene@gollent.com.
 * Distributed under the terms of the MIT License.
 *
 * Copyright 2001-2002, Travis Geiselbrecht. All rights reserved.
 * Distributed under the terms of the NewOS License.
 */


#include "CliDumpStringCommand.h"

#include <ctype.h>
#include <stdio.h>

#include <AutoLocker.h>

#include "CliContext.h"
#include "CppLanguage.h"
#include "Team.h"
#include "TeamMemoryBlock.h"
#include "UiUtils.h"
#include "UserInterface.h"
#include "Value.h"
#include "Variable.h"


CliDumpStringCommand::CliDumpStringCommand()
        :
        CliCommand("dump contents of a string in the debugged team's memory",
                        "%s [\"]address|expression[\"]\n"
                        "Reads and displays the contents of a null-terminated string at the target address.")
{
        // TODO: this should be retrieved via some indirect helper rather
        // than instantiating the specific language directly.
        fLanguage = new(std::nothrow) CppLanguage();
}


CliDumpStringCommand::~CliDumpStringCommand()
{
        if (fLanguage != NULL)
                fLanguage->ReleaseReference();
}


void
CliDumpStringCommand::Execute(int argc, const char* const* argv,
        CliContext& context)
{
        if (argc < 2) {
                PrintUsage(argv[0]);
                return;
        }

        if (fLanguage == NULL) {
                printf("Unable to evaluate expression: %s\n", strerror(B_NO_MEMORY));
                return;
        }

        target_addr_t address;
        if (context.EvaluateExpression(argv[1], fLanguage, address) != B_OK)
                return;

        TeamMemoryBlock* block = NULL;
        if (context.GetMemoryBlock(address, block) != B_OK)
                return;

        printf("%p \"", (char*)address);

        target_addr_t offset = address;
        char c;
        while (block->Contains(offset)) {
                c = *(block->Data() + offset - block->BaseAddress());

                if (c == '\0')
                        break;
                if (c == '\n')
                        printf("\\n");
                else if (c == '\t')
                        printf("\\t");
                else {
                        if (!isprint(c))
                                c = '.';

                        printf("%c", c);
                }
                ++offset;
        }

        printf("\"\n");
}