rendered paste body#include "../../stdafx.h"#include "XBPythonDll.h"template<byte count>struct SVaPassNext{ SVaPassNext<count-1> big; DWORD dw;};template<> struct SVaPassNext<0>{};//SVaPassNext - is generator of structure of any size at compile time.class CVaPassNext{public: SVaPassNext<50> svapassnext; CVaPassNext(va_list & args){ try{//to avoid access violation memcpy(&svapassnext, args, sizeof(svapassnext)); } catch (...) {} }};#define va_pass(valist) CVaPassNext(valist).svapassnext// macro to make life a bit simpler#define DLL_FUNCTION(function) #function, (void**)&p_##function#define DLL_VA_FUNCTION(function) #function, (void**)&p_va_##function// use these if the dll exports pointers#define DLL_POINTER_DATA(data) #data, (void**)&data#define DATA_POINTER(data) unsigned long data;// use these if the dll exports data structs#define DLL_OBJECT_DATA(data) #data, (void**)&pointer_##data#define _Py_NoneStruct (*((PyObject*)pointer__Py_NoneStruct))#define PyString_Type (*((PyTypeObject*)pointer_PyString_Type))#define PyList_Type (*((PyTypeObject*)pointer_PyList_Type))#define PyLong_Type (*((PyTypeObject*)pointer_PyLong_Type))#define PyInt_Type (*((PyTypeObject*)pointer_PyInt_Type))#define PyUnicode_Type (*((PyTypeObject*)pointer_PyUnicode_Type))#define PyTuple_Type (*((PyTypeObject*)pointer_PyTuple_Type))#define DLL_ORD_FUNCTION(ord, function) "hapdbg.dll", ord, (void**)&p_##function#define FUNCTION(function) \ void* (__cdecl* p_##function)(); \ void* ##function() { return p_##function(); }#define FUNCTION4(function) \ void* (__cdecl* p_##function)(void* a); \ void* ##function(void* a) { return p_##function(a); }#define FUNCTION8(function) \ void* (__cdecl* p_##function)(void* a, void* b); \ void* ##function(void* a, void* b) { return p_##function(a, b); }#define VA_FUNC_START(x) \ void* ret; \ va_list va; \ va_start(va, x); \ ret =#define VA_FUNC_END \ va_end(va); \ return ret; #define VA_FUNCTION8(function) \ void* (__cdecl* p_va_##function)(void* a, ...); \ void* ##function(void* a, ...) { VA_FUNC_START(a) p_va_##function(a, va_pass(va)); VA_FUNC_END }#define VA_FUNCTION12(function) \ void* (__cdecl* p_va_##function)(void* a, void* b, ...); \ void* ##function(void* a, void* b, ...) { VA_FUNC_START(b) p_va_##function(a, b, va_pass(va)); VA_FUNC_END }#define VA_FUNCTION16(function) \ void* (__cdecl* p_va_##function)(void* a, void* b, void* c, ...); \ void* ##function(void* a, void* b, void* c, ...) { VA_FUNC_START(c) p_va_##function(a, b, c, va_pass(va)); VA_FUNC_END }#define VA_FUNCTION20(function) \ void* (__cdecl* p_va_##function)(void* a, void* b, void* c, void* d, ...); \ void* ##function(void* a, void* b, void* c, void* d, ...) { VA_FUNC_START(d) p_va_##function(a, b, c, d, va_pass(va)); VA_FUNC_END } #define FUNCTION12(function) \ void* (__cdecl* p_##function)(void* a, void* b, void* c); \ void* ##function(void* a, void* b, void* c) { return p_##function(a, b, c); }#define FUNCTION16(function) \ void* (__cdecl* p_##function)(void* a, void* b, void* c, void* d); \ void* ##function(void* a, void* b, void* c, void* d) { return p_##function(a, b, c, d); }#define FUNCTION20(function) \ void* (__cdecl* p_##function)(void* a, void* b, void* c, void* d, void* e); \ void* ##function(void* a, void* b, void* c, void* d, void* e) { return p_##function(a, b, c, d, e); }extern "C"{ /***************************************** * python24.dll */ FUNCTION(PyEval_ReleaseLock) FUNCTION(PyEval_AcquireLock) FUNCTION(PyThreadState_Get) FUNCTION4(PyRun_SimpleString) FUNCTION(PyEval_InitThreads) FUNCTION(Py_Initialize) FUNCTION(Py_Finalize) FUNCTION4(PyThreadState_Swap) FUNCTION8(PyErr_SetString) FUNCTION4(PyThreadState_New) FUNCTION(PyErr_Print) FUNCTION(PyErr_Occurred) FUNCTION8(PyRun_SimpleFile) FUNCTION4(PySys_SetPath) FUNCTION4(PyThreadState_Delete) FUNCTION4(PyThreadState_Clear) VA_FUNCTION8(Py_BuildValue) /*void* Py_BuildValue(void* a, ...) { void* ret; va_list va; va_start(va, a); ret = Py_VaBuildValue(a, va); va_end(va); return ret; }*/ VA_FUNCTION12(PyArg_Parse) VA_FUNCTION12(PyArg_ParseTuple) /*void* PyArg_ParseTuple(void* a, void* b, ...) { void* ret; va_list va; va_start(va, b); ret = PyArg_VaParse(a, b, va); va_end(va); return ret; }*/ FUNCTION8(PyType_IsSubtype) VA_FUNCTION20(PyArg_ParseTupleAndKeywords) /*void* PyArg_ParseTupleAndKeywords(void* a, void* b, void* c, void* d, ...) { void* ret; va_list va; va_start(va, d); ret = PyArg_VaParseTupleAndKeywords(a, b, c, d, va); va_end(va); return ret; }*/ FUNCTION4(PyString_AsString) FUNCTION8(Py_AddPendingCall) FUNCTION8(PyList_GetItem) FUNCTION4(PyList_Size) FUNCTION4(_PyObject_New) FUNCTION4(PyLong_AsLong) VA_FUNCTION12(PyErr_Format) /*void* PyErr_Format(void* a, void* b, ...) { void* ret; va_list va; va_start(va, b); ret = PyErr_VaFormat(a, b, va); va_end(va); return ret; }*/ FUNCTION4(PyUnicodeUCS2_AsUnicode) FUNCTION(Py_MakePendingCalls) FUNCTION(PyEval_SaveThread) FUNCTION4(PyEval_RestoreThread) FUNCTION4(PyLong_FromLong) FUNCTION12(PyModule_AddStringConstant) FUNCTION12(PyModule_AddObject) FUNCTION20(Py_InitModule4) FUNCTION4(PyInt_AsLong) FUNCTION4(PyString_FromString) FUNCTION12(PyModule_AddIntConstant) //void* (__cdecl* p_va_PyObject_CallFunction)(void* a, void* b, ...); VA_FUNCTION12(PyObject_CallFunction) // va arg /* void* PyObject_CallFunction(void* a, void* b, ...) { void* ret; va_list va; va_start(va, b); ret = p_va_PyObject_CallFunction(a, b, va_pass(va)); va_end(va); return ret; }*/ //void* (__cdecl* p_va_PyObject_CallMethod)(void* a, void* b, void* c, ...); VA_FUNCTION16(PyObject_CallMethod) /*void* PyObject_CallMethod(void* a, void* b, void* c, ...) { void* ret; va_list va; va_start(va, c); ret = p_va_PyObject_CallMethod(a, b, c, va_pass(va)); va_end(va); return ret; }*/ FUNCTION12(PyDict_SetItemString) FUNCTION(PyDict_New) FUNCTION4(PyModule_GetDict) FUNCTION4(PyImport_Import) FUNCTION4(PyInt_FromLong) FUNCTION8(PyDict_GetItemString) FUNCTION4(PyType_Ready); FUNCTION12(PyType_GenericNew); FUNCTION8(PySys_SetArgv); FUNCTION12(PyObject_RichCompare); // PyFloat_FromDouble(double) void* (__cdecl* p_PyFloat_FromDouble)(double a); \ void* PyFloat_FromDouble(double a) { return p_PyFloat_FromDouble(a); } DATA_OBJECT(PyExc_SystemError); DATA_OBJECT(PyExc_ValueError); DATA_OBJECT(PyExc_Exception); DATA_OBJECT(PyExc_TypeError); DATA_OBJECT(PyExc_KeyboardInterrupt); DATA_OBJECT(PyExc_RuntimeError); DATA_OBJECT(PyExc_ReferenceError); DATA_OBJECT(_Py_NoneStruct); DATA_OBJECT(_Py_NotImplementedStruct); DATA_OBJECT(_Py_TrueStruct); DATA_OBJECT(_Py_ZeroStruct); DATA_OBJECT(PyString_Type); DATA_OBJECT(PyList_Type); DATA_OBJECT(PyLong_Type); DATA_OBJECT(PyInt_Type); DATA_OBJECT(PyUnicode_Type); DATA_OBJECT(PyTuple_Type); bool python_load_dll(DllLoader& dll) { bool bResult; bResult = ( dll.ResolveExport(DLL_FUNCTION(PyEval_ReleaseLock)) && dll.ResolveExport(DLL_FUNCTION(PyEval_AcquireLock)) && dll.ResolveExport(DLL_FUNCTION(PyThreadState_Get)) && dll.ResolveExport(DLL_FUNCTION(PyRun_SimpleString)) && dll.ResolveExport(DLL_FUNCTION(PyEval_InitThreads)) && dll.ResolveExport(DLL_FUNCTION(Py_Initialize)) && dll.ResolveExport(DLL_FUNCTION(Py_Finalize)) && dll.ResolveExport(DLL_FUNCTION(PyThreadState_Swap)) && dll.ResolveExport(DLL_FUNCTION(PyErr_SetString)) && dll.ResolveExport(DLL_FUNCTION(PyThreadState_New)) && dll.ResolveExport(DLL_FUNCTION(PyErr_Print)) && dll.ResolveExport(DLL_FUNCTION(PyErr_Occurred)) && dll.ResolveExport(DLL_FUNCTION(PyRun_SimpleFile)) && dll.ResolveExport(DLL_FUNCTION(PySys_SetPath)) && dll.ResolveExport(DLL_FUNCTION(PyThreadState_Delete)) && dll.ResolveExport(DLL_FUNCTION(PyThreadState_Clear)) && dll.ResolveExport(DLL_VA_FUNCTION(Py_BuildValue)) && dll.ResolveExport(DLL_FUNCTION(PyType_IsSubtype)) && dll.ResolveExport(DLL_VA_FUNCTION(PyArg_ParseTupleAndKeywords)) && dll.ResolveExport(DLL_FUNCTION(PyString_AsString)) && dll.ResolveExport(DLL_FUNCTION(Py_AddPendingCall)) && dll.ResolveExport(DLL_VA_FUNCTION(PyObject_CallMethod)) && dll.ResolveExport(DLL_FUNCTION(PyList_GetItem)) && dll.ResolveExport(DLL_FUNCTION(PyList_Size)) && dll.ResolveExport(DLL_FUNCTION(_PyObject_New)) && dll.ResolveExport(DLL_FUNCTION(PyLong_AsLong)) && dll.ResolveExport(DLL_VA_FUNCTION(PyErr_Format)) && dll.ResolveExport(DLL_FUNCTION(PyUnicodeUCS2_AsUnicode)) && dll.ResolveExport(DLL_FUNCTION(Py_MakePendingCalls)) && dll.ResolveExport(DLL_FUNCTION(PyEval_SaveThread)) && dll.ResolveExport(DLL_FUNCTION(PyEval_RestoreThread)) && dll.ResolveExport(DLL_FUNCTION(PyLong_FromLong)) && dll.ResolveExport(DLL_FUNCTION(PyModule_AddStringConstant)) && dll.ResolveExport(DLL_FUNCTION(PyModule_AddObject)) && dll.ResolveExport(DLL_FUNCTION(Py_InitModule4)) && dll.ResolveExport(DLL_FUNCTION(PyInt_AsLong)) && dll.ResolveExport(DLL_FUNCTION(PyString_FromString)) && dll.ResolveExport(DLL_FUNCTION(PyModule_AddIntConstant)) && dll.ResolveExport(DLL_VA_FUNCTION(PyObject_CallFunction)) && dll.ResolveExport(DLL_FUNCTION(PyDict_SetItemString)) && dll.ResolveExport(DLL_FUNCTION(PyDict_New)) && dll.ResolveExport(DLL_FUNCTION(PyModule_GetDict)) && dll.ResolveExport(DLL_FUNCTION(PyImport_Import)) && dll.ResolveExport(DLL_FUNCTION(PyFloat_FromDouble)) && dll.ResolveExport(DLL_FUNCTION(PyInt_FromLong)) && dll.ResolveExport(DLL_FUNCTION(PyDict_GetItemString)) && dll.ResolveExport(DLL_FUNCTION(PyType_Ready)) && dll.ResolveExport(DLL_FUNCTION(PyType_GenericNew)) && dll.ResolveExport(DLL_VA_FUNCTION(PyArg_Parse)) && dll.ResolveExport(DLL_VA_FUNCTION(PyArg_ParseTuple)) && dll.ResolveExport(DLL_FUNCTION(PySys_SetArgv)) && dll.ResolveExport(DLL_FUNCTION(PyObject_RichCompare)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_SystemError)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_ValueError)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_Exception)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_TypeError)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_KeyboardInterrupt)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_RuntimeError)) && dll.ResolveExport(DLL_OBJECT_DATA(PyExc_ReferenceError)) && dll.ResolveExport(DLL_OBJECT_DATA(_Py_NoneStruct)) && dll.ResolveExport(DLL_OBJECT_DATA(_Py_NotImplementedStruct)) && dll.ResolveExport(DLL_OBJECT_DATA(_Py_TrueStruct)) && dll.ResolveExport(DLL_OBJECT_DATA(_Py_ZeroStruct)) && dll.ResolveExport(DLL_OBJECT_DATA(PyString_Type)) && dll.ResolveExport(DLL_OBJECT_DATA(PyList_Type)) && dll.ResolveExport(DLL_OBJECT_DATA(PyLong_Type)) && dll.ResolveExport(DLL_OBJECT_DATA(PyInt_Type)) && dll.ResolveExport(DLL_OBJECT_DATA(PyUnicode_Type)) && dll.ResolveExport(DLL_OBJECT_DATA(PyTuple_Type))); return bResult; }}