/******************************************************************************
 * Spine Runtimes Software License v2.5
 *
 * Copyright (c) 2013-2016, Esoteric Software
 * All rights reserved.
 *
 * You are granted a perpetual, non-exclusive, non-sublicensable, and
 * non-transferable license to use, install, execute, and perform the Spine
 * Runtimes software and derivative works solely for personal or internal
 * use. Without the written permission of Esoteric Software (see Section 2 of
 * the Spine Software License Agreement), you may not (a) modify, translate,
 * adapt, or develop new applications using the Spine Runtimes or otherwise
 * create derivative works or improvements of the Spine Runtimes or (b) remove,
 * delete, alter, or obscure any trademarks or any copyright, trademark, patent,
 * or other intellectual property or proprietary rights notices on or in the
 * Software, including any copy thereof. Redistributions in binary or source
 * form must include this license and terms.
 *
 * THIS SOFTWARE IS PROVIDED BY ESOTERIC SOFTWARE "AS IS" AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
 * EVENT SHALL ESOTERIC SOFTWARE BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, BUSINESS INTERRUPTION, OR LOSS OF
 * USE, DATA, OR PROFITS) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
 * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 *****************************************************************************/


#include "TestHarness.h"

void *Spine::TestSpineExtension::_alloc(size_t size, const char *file, int line) {
	void* result = DefaultSpineExtension::_alloc(size, file, line);
	allocated.push_back(Allocation(result, size, file, line));
	return result;
}

void *Spine::TestSpineExtension::_calloc(size_t size, const char *file, int line) {
	void* result = DefaultSpineExtension::_calloc(size, file, line);
	allocated.push_back(Allocation(result, size, file, line));
	return result;
}

void *Spine::TestSpineExtension::_realloc(void *ptr, size_t size, const char *file, int line) {
	void* result = DefaultSpineExtension::_realloc(ptr, size, file, line);

	for (std::vector<Allocation>::iterator it = allocated.begin(); it != allocated.end(); it++) {
		if (it->address == ptr) {
			it->address = result;
			it->size = size;
			it->fileName = file;
			it->line = line;
			return result;
		}
	}

	allocated.push_back(Allocation(result, size, file, line));
	return result;
}

void Spine::TestSpineExtension::_free(void *mem, const char *file, int line) {
	DefaultSpineExtension::_free(mem, file, line);

	for (std::vector<Allocation>::iterator it = allocated.begin(); it != allocated.end(); it++) {
		if (it->address == mem) {
			allocated.erase(it);
			return;
		}
	}

	printf("%s:%i (address %p): Double free or not allocatedö through SpineExtension", file, line, mem);
}

void Spine::TestSpineExtension::reportLeaks() {
	for (std::vector<Allocation>::iterator it = allocated.begin(); it != allocated.end(); it++) {
		printf("\"%s:%i (%zu bytes at %p)\n", it->fileName, it->line, it->size, it->address);
	}
}

void Spine::TestSpineExtension::clearAllocations() {
	allocated.resize(0);
}