Files
xbmc4xbox-redux/lib/libPython/XBPythonDll.cpp

477 lines
18 KiB
C++
Executable File

/*
* Copyright (C) 2005-2013 Team XBMC
* http://xbmc.org
*
* 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 2, 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 XBMC; see the file COPYING. If not, see
* <http://www.gnu.org/licenses/>.
*
*/
#include "system.h"
#include "XBPythonDll.h"
#include "cores/DllLoader/DllLoader.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 _Py_FalseStruct (*((PyObject*)pointer__Py_FalseStruct))
#define PyList_Type (*((PyTypeObject*)pointer_PyList_Type))
#define PyLong_Type (*((PyTypeObject*)pointer_PyLong_Type))
#define PyFloat_Type (*((PyTypeObject*)pointer_PyFloat_Type))
#define PyUnicode_Type (*((PyTypeObject*)pointer_PyUnicode_Type))
#define PyTuple_Type (*((PyTypeObject*)pointer_PyTuple_Type))
#define PyDict_Type (*((PyTypeObject*)pointer_PyDict_Type))
#define PyByteArray_Type (*((PyTypeObject*)pointer_PyByteArray_Type))
#define PyByteArrayIter_Type (*((PyTypeObject*)pointer_PyByteArrayIter_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); }
#define FUNCTION28(function) \
void* (__cdecl* p_##function)(void* a, void* b, void* c, void* d, void* e, void* f, void* g); \
void* function(void* a, void* b, void* c, void* d, void* e, void* f, void* g) { return p_##function(a, b, c, d, e, f, g); }
extern "C"
{
/*****************************************
* python34.dll
*/
FUNCTION(PyEval_ReleaseLock)
FUNCTION(PyEval_AcquireLock)
FUNCTION(PyThreadState_Get)
FUNCTION4(PyRun_SimpleString)
FUNCTION(PyEval_InitThreads)
FUNCTION(PyEval_ThreadsInitialized)
FUNCTION4(PyEval_AcquireThread)
FUNCTION4(PyEval_ReleaseThread)
FUNCTION(Py_Initialize)
FUNCTION(Py_IsInitialized)
FUNCTION(Py_Finalize)
FUNCTION(Py_NewInterpreter)
FUNCTION4(Py_EndInterpreter)
FUNCTION4(PyThreadState_Swap)
FUNCTION8(PyErr_SetString)
FUNCTION12(PyErr_NormalizeException)
FUNCTION4(PyThreadState_New)
FUNCTION(PyErr_Print)
FUNCTION(PyErr_Occurred)
FUNCTION8(PyRun_SimpleFile)
FUNCTION4(PySys_SetPath)
FUNCTION8(PySys_SetObject)
FUNCTION(Py_GetPath)
FUNCTION4(PyThreadState_Delete)
FUNCTION4(PyThreadState_Clear)
FUNCTION4(PyInterpreterState_ThreadHead)
FUNCTION4(PyThreadState_Next)
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(PyUnicode_AsUTF8)
FUNCTION8(PyUnicode_AsUTF8AndSize)
FUNCTION4(PyUnicode_GetLength)
FUNCTION12(PyUnicode_DecodeUTF8)
FUNCTION8(Py_AddPendingCall)
FUNCTION8(PyList_GetItem)
FUNCTION12(PyList_SetItem)
FUNCTION4(PyList_Size)
FUNCTION4(PyList_New)
FUNCTION8(PyList_Append)
FUNCTION4(_PyObject_New)
FUNCTION4(PyLong_AsLong)
FUNCTION4(PyLong_AsLongLong)
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;
}*/
FUNCTION(Py_MakePendingCalls)
FUNCTION(PyEval_SaveThread)
FUNCTION4(PyEval_RestoreThread)
FUNCTION4(PyLong_FromLong)
FUNCTION12(PyModule_AddStringConstant)
FUNCTION12(PyModule_AddObject)
#ifndef Py_TRACE_REFS
FUNCTION20(PyModule_Create2)
#else
FUNCTION20(PyModule_Create2TraceRefs)
#endif
FUNCTION4(PyFloat_AsDouble)
FUNCTION8(PyUnicode_FromStringAndSize)
FUNCTION4(PyUnicode_FromString)
FUNCTION4(PyBool_FromLong)
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)
FUNCTION8(PyDict_GetItemString)
//FUNCTION8(PyDict_GetItem)
//FUNCTION4(PyDict_Keys)
FUNCTION16(PyDict_Next)
FUNCTION4(PyDict_Size)
FUNCTION8(PyByteArray_FromStringAndSize)
FUNCTION4(PyByteArray_Size)
FUNCTION4(PyByteArray_AsString)
FUNCTION4(PyBytes_AsString)
FUNCTION4(PyType_Ready)
FUNCTION12(PyType_GenericNew)
FUNCTION4(PyTuple_New)
FUNCTION4(PyTuple_Size)
FUNCTION8(PyTuple_GetItem)
FUNCTION12(PyTuple_SetItem)
FUNCTION8(PySys_SetArgv)
FUNCTION12(PySys_SetArgvEx)
FUNCTION12(PyObject_RichCompare)
FUNCTION12(PyErr_Fetch)
FUNCTION4(PyImport_AddModule)
FUNCTION4(PyImport_ImportModule)
FUNCTION8(PyImport_AppendInittab)
FUNCTION4(PyObject_Str)
FUNCTION20(PyRun_File)
FUNCTION16(PyRun_String)
FUNCTION4(PyErr_ExceptionMatches)
FUNCTION(PyErr_Clear)
FUNCTION12(PyObject_SetAttrString)
FUNCTION8(PyException_SetTraceback)
FUNCTION4(PyErr_SetFromErrno)
FUNCTION4(PyObject_AsFileDescriptor)
#ifdef Py_TRACE_REFS
FUNCTION12(_Py_NegativeRefcount)
FUNCTION4(_Py_Dealloc)
#endif
FUNCTION8(PyRun_SimpleStringFlags)
FUNCTION20(PyRun_StringFlags)
FUNCTION28(PyRun_FileExFlags)
FUNCTION8(_Py_fopen_obj)
FUNCTION(PyGILState_Check)
// PyFloat_FromDouble(double)
void* (__cdecl* p_PyFloat_FromDouble)(double a); \
void* PyFloat_FromDouble(double a) { return p_PyFloat_FromDouble(a); }
DATA_OBJECT(PyExc_SystemExit)
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(PyExc_OSError)
DATA_OBJECT(_Py_NoneStruct)
DATA_OBJECT(_Py_NotImplementedStruct)
DATA_OBJECT(_Py_FalseStruct)
DATA_OBJECT(_Py_TrueStruct)
DATA_OBJECT(PyList_Type)
DATA_OBJECT(PyLong_Type)
DATA_OBJECT(PyFloat_Type)
DATA_OBJECT(PyUnicode_Type)
DATA_OBJECT(PyTuple_Type)
DATA_OBJECT(PyDict_Type)
DATA_OBJECT(PyByteArray_Type)
DATA_OBJECT(PyByteArrayIter_Type)
#ifdef Py_TRACE_REFS
DATA_OBJECT(_Py_RefTotal)
#endif
bool python_load_dll(LibraryLoader& 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(PyEval_ThreadsInitialized)) &&
dll.ResolveExport(DLL_FUNCTION(PyEval_AcquireThread)) &&
dll.ResolveExport(DLL_FUNCTION(PyEval_ReleaseThread)) &&
dll.ResolveExport(DLL_FUNCTION(Py_Initialize)) &&
dll.ResolveExport(DLL_FUNCTION(Py_IsInitialized)) &&
dll.ResolveExport(DLL_FUNCTION(Py_Finalize)) &&
dll.ResolveExport(DLL_FUNCTION(Py_NewInterpreter)) &&
dll.ResolveExport(DLL_FUNCTION(Py_EndInterpreter)) &&
dll.ResolveExport(DLL_FUNCTION(PyThreadState_Swap)) &&
dll.ResolveExport(DLL_FUNCTION(PyErr_SetString)) &&
dll.ResolveExport(DLL_FUNCTION(PyErr_NormalizeException)) &&
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(PySys_SetObject)) &&
dll.ResolveExport(DLL_FUNCTION(Py_GetPath)) &&
dll.ResolveExport(DLL_FUNCTION(PyThreadState_Delete)) &&
dll.ResolveExport(DLL_FUNCTION(PyThreadState_Clear)) &&
dll.ResolveExport(DLL_FUNCTION(PyInterpreterState_ThreadHead)) &&
dll.ResolveExport(DLL_FUNCTION(PyThreadState_Next)) &&
dll.ResolveExport(DLL_VA_FUNCTION(Py_BuildValue)) &&
dll.ResolveExport(DLL_FUNCTION(PyType_IsSubtype)) &&
dll.ResolveExport(DLL_VA_FUNCTION(PyArg_ParseTupleAndKeywords)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_AsUTF8)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_AsUTF8AndSize)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_GetLength)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_DecodeUTF8)) &&
dll.ResolveExport(DLL_FUNCTION(Py_AddPendingCall)) &&
dll.ResolveExport(DLL_VA_FUNCTION(PyObject_CallMethod)) &&
dll.ResolveExport(DLL_FUNCTION(PyList_GetItem)) &&
dll.ResolveExport(DLL_FUNCTION(PyList_SetItem)) &&
dll.ResolveExport(DLL_FUNCTION(PyList_Size)) &&
dll.ResolveExport(DLL_FUNCTION(PyList_New)) &&
dll.ResolveExport(DLL_FUNCTION(PyList_Append)) &&
dll.ResolveExport(DLL_FUNCTION(_PyObject_New)) &&
dll.ResolveExport(DLL_FUNCTION(PyLong_AsLong)) &&
dll.ResolveExport(DLL_FUNCTION(PyLong_AsLongLong)) &&
dll.ResolveExport(DLL_VA_FUNCTION(PyErr_Format)) &&
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)) &&
#ifndef Py_TRACE_REFS
dll.ResolveExport(DLL_FUNCTION(PyModule_Create2)) &&
#else
dll.ResolveExport(DLL_FUNCTION(PyModule_Create2TraceRefs)) &&
#endif
dll.ResolveExport(DLL_FUNCTION(PyFloat_AsDouble)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_FromStringAndSize)) &&
dll.ResolveExport(DLL_FUNCTION(PyUnicode_FromString)) &&
dll.ResolveExport(DLL_FUNCTION(PyBool_FromLong)) &&
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(PyDict_GetItemString)) &&
//dll.ResolveExport(DLL_FUNCTION(PyDict_GetItem)) &&
//dll.ResolveExport(DLL_FUNCTION(PyDict_Keys)) &&
dll.ResolveExport(DLL_FUNCTION(PyDict_Next)) &&
dll.ResolveExport(DLL_FUNCTION(PyDict_Size)) &&
dll.ResolveExport(DLL_FUNCTION(PyByteArray_FromStringAndSize)) &&
dll.ResolveExport(DLL_FUNCTION(PyByteArray_Size)) &&
dll.ResolveExport(DLL_FUNCTION(PyByteArray_AsString)) &&
dll.ResolveExport(DLL_FUNCTION(PyBytes_AsString)) &&
dll.ResolveExport(DLL_FUNCTION(PyType_Ready)) &&
dll.ResolveExport(DLL_FUNCTION(PyType_GenericNew)) &&
dll.ResolveExport(DLL_FUNCTION(PyTuple_New)) &&
dll.ResolveExport(DLL_FUNCTION(PyTuple_Size)) &&
dll.ResolveExport(DLL_FUNCTION(PyTuple_GetItem)) &&
dll.ResolveExport(DLL_FUNCTION(PyTuple_SetItem)) &&
dll.ResolveExport(DLL_VA_FUNCTION(PyArg_Parse)) &&
dll.ResolveExport(DLL_VA_FUNCTION(PyArg_ParseTuple)) &&
dll.ResolveExport(DLL_FUNCTION(PySys_SetArgv)) &&
dll.ResolveExport(DLL_FUNCTION(PySys_SetArgvEx)) &&
dll.ResolveExport(DLL_FUNCTION(PyObject_RichCompare)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyExc_SystemExit)) &&
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(PyExc_OSError)) &&
dll.ResolveExport(DLL_OBJECT_DATA(_Py_NoneStruct)) &&
dll.ResolveExport(DLL_OBJECT_DATA(_Py_NotImplementedStruct)) &&
dll.ResolveExport(DLL_OBJECT_DATA(_Py_FalseStruct)) &&
dll.ResolveExport(DLL_OBJECT_DATA(_Py_TrueStruct)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyList_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyLong_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyFloat_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyUnicode_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyTuple_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyDict_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyByteArray_Type)) &&
dll.ResolveExport(DLL_OBJECT_DATA(PyByteArrayIter_Type)) &&
#ifdef Py_TRACE_REFS
dll.ResolveExport(DLL_OBJECT_DATA(_Py_RefTotal)) &&
dll.ResolveExport(DLL_FUNCTION(_Py_NegativeRefcount)) &&
dll.ResolveExport(DLL_FUNCTION(_Py_Dealloc)) &&
#endif
dll.ResolveExport(DLL_FUNCTION(PyErr_Fetch)) &&
dll.ResolveExport(DLL_FUNCTION(PyImport_AddModule)) &&
dll.ResolveExport(DLL_FUNCTION(PyImport_ImportModule)) &&
dll.ResolveExport(DLL_FUNCTION(PyImport_AppendInittab)) &&
dll.ResolveExport(DLL_FUNCTION(PyObject_Str)) &&
dll.ResolveExport(DLL_FUNCTION(PyRun_File)) &&
dll.ResolveExport(DLL_FUNCTION(PyErr_Clear)) &&
dll.ResolveExport(DLL_FUNCTION(PyObject_SetAttrString)) &&
dll.ResolveExport(DLL_FUNCTION(PyException_SetTraceback)) &&
dll.ResolveExport(DLL_FUNCTION(PyErr_SetFromErrno)) &&
dll.ResolveExport(DLL_FUNCTION(PyObject_AsFileDescriptor)) &&
dll.ResolveExport(DLL_FUNCTION(PyErr_ExceptionMatches)) &&
dll.ResolveExport(DLL_FUNCTION(PyRun_SimpleStringFlags)) &&
dll.ResolveExport(DLL_FUNCTION(PyRun_StringFlags)) &&
dll.ResolveExport(DLL_FUNCTION(PyRun_FileExFlags)) &&
dll.ResolveExport(DLL_FUNCTION(_Py_fopen_obj)) &&
dll.ResolveExport(DLL_FUNCTION(PyGILState_Check)) &&
dll.ResolveExport(DLL_FUNCTION(PyRun_String)));
return bResult;
}
}