#include "stdafx.h"
#include "shlcom.h"

/////////////////////////////////////////////////////////////////////////////////////////

TClassFactoryRec::TClassFactoryRec() :
	RefCount(0)
{
	DllFactoryCount++;
}

HRESULT TClassFactoryRec::QueryInterface(REFIID riid, void** ppvObject)
{
	if (riid == IID_IUnknown)
		logA("TClassFactoryRec retrieved as IUnknown: %d\n", RefCount);
	else if (riid == IID_IClassFactory)
		logA("TClassFactoryRec retrieved as IClassFactory: %d\n", RefCount);
	else {
	#ifdef LOG_ENABLED
		RPC_CSTR szGuid;
		UuidToStringA(&riid, &szGuid);
		logA("TClassFactoryRec::QueryInterface {%s} failed\n", szGuid);
		RpcStringFreeA(&szGuid);
	#endif
		*ppvObject = nullptr;
		return E_NOINTERFACE;
	}

	AddRef();
	*ppvObject = this;
	return S_OK;
}

ULONG TClassFactoryRec::AddRef()
{
	return ++RefCount;
}

ULONG TClassFactoryRec::Release()
{
	ULONG result = --RefCount;
	if (result == 0) {
		logA("TClassFactoryRec released\n");
		delete this;
		DllFactoryCount--;
	}
	return result;
}

HRESULT TClassFactoryRec::CreateInstance(IUnknown* pUnkOuter, REFIID riid, void** ppvObject)
{
	if (ppvObject == nullptr)
		return E_POINTER;

	*ppvObject = nullptr;
	if (pUnkOuter)
		return CLASS_E_NOAGGREGATION;

	TShellExt *p = new TShellExt();
	if (p == nullptr)
		return E_OUTOFMEMORY;

	HRESULT hr = p->QueryInterface(riid, ppvObject);
	if (FAILED(hr))
		delete p;
	return hr;
}

HRESULT TClassFactoryRec::LockServer(BOOL)
{
	return E_NOTIMPL;
}