/*==LICENSE==*

CyanWorlds.com Engine - MMOG client, server and tools
Copyright (C) 2011  Cyan Worlds, Inc.

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.

You can contact Cyan Worlds, Inc. by email legal@cyan.com
 or by snail mail at:
      Cyan Worlds, Inc.
      14617 N Newport Hwy
      Mead, WA   99021

*==LICENSE==*/
#include "max.h"
#include "MaxAllocDll.h"

typedef void* (*MAXMALLOC) (size_t size);
typedef void (*MAXFREE) (void *memblock);

static MAXMALLOC maxMalloc = NULL;
static MAXFREE maxFree = NULL;
static HINSTANCE maxAllocDll = NULL;

void LoadAllocDll()
{
	if (!maxAllocDll)
	{
		// Search through all the Max plugin paths for MaxAlloc.dll
		Interface *ip = GetCOREInterface();
		for (int i = 0; i < ip->GetPlugInEntryCount(); i++)
		{
			const char *dir = ip->GetPlugInDir(i);

			char path[MAX_PATH];
			sprintf(path, "%sMaxAlloc.dll", dir);

			maxAllocDll = LoadLibrary(path);

			if (maxAllocDll)
				return;
		}

		maxAllocDll = LoadLibrary("MaxAlloc.dll");

		if (!maxAllocDll)
		{
         ::MessageBox(NULL, "Couldn't load MaxAlloc.dll", "Error", MB_OK);
			exit(0);
		}
	}
}

void *plMaxMalloc(size_t size)
{
	if (!maxMalloc)
	{
		LoadAllocDll();
		maxMalloc = (MAXMALLOC)GetProcAddress(maxAllocDll, "MaxMalloc");

		if (!maxMalloc)
		{
			::MessageBox(NULL, "Couldn't find MaxMalloc in MaxAlloc.dll", "Error", MB_OK);
			exit(0);
		}
	}

	return maxMalloc(size);
}

void plMaxFree(void *memblock)
{
	if (!maxFree)
	{
		LoadAllocDll();
		maxFree = (MAXFREE)GetProcAddress(maxAllocDll, "MaxFree");

		if (!maxFree)
		{
         ::MessageBox(NULL, "Couldn't find MaxFree in MaxAlloc.dll", "Error", MB_OK);
			exit(0);
		}

	}

	maxFree(memblock);
}