#include<python2.6/Python.h>

typedef struct py_call_dict
{
	char * name;
	char * value;
}PY_CALL_DICT;


int py_call_dict_get_len(PY_CALL_DICT dicts[])
{
#define MAX_DICTS 100
	int i = 0;
	for(i=0;i<MAX_DICTS;i++)
	{
        	printf("[%s][%s][%d] name:[%s],value:[%s]\n", __FILE__, __func__, __LINE__,dicts[i].name,dicts[i].name);
		if(dicts[i].name==NULL)
		{
			
			return i;
		}
	}
        printf("[%s][%s][%d] MAX_DICTS:[%d] is too litter then or dicts[%p] is not  has NULL end \n", __FILE__, __func__, __LINE__,MAX_DICTS,dicts);
	return -1;
}


int py_call(char * module,char * func, PY_CALL_DICT args[],PY_CALL_DICT retVals[])
{
    int iRet = -1;
    char *p1 = "hello";
    char *p2 = "world";
    char *p3 = "better";
    PyObject *pName, *pModule, *pDict, *pFunc, *pArgs, *pRetVal;

    // python initialize
    Py_Initialize();
    if ( !Py_IsInitialized()){
        printf("[%s][%s][%d] Py_IsInitialized failed\n", __FILE__, __func__, __LINE__);
	return -1;
    }

    // 将当期目录加入python路径
    PyRun_SimpleString("import sys");
    PyRun_SimpleString("sys.path.append('./')");

    //char * module = "t";
    pName = PyString_FromString(module); // 注意是t 不是 t.py
    pModule = PyImport_Import(pName);
    if (!pModule){
        printf("[%s][%s][%d] can't find %s\n", __FILE__, __func__, __LINE__, module);
        goto error;
    }

    pDict = PyModule_GetDict(pModule);
    if (!pDict){
        printf("[%s][%s][%d] PyModule_GetDict failed\n", __FILE__, __func__, __LINE__);
        goto error;
    }

    // 查找python回调函数
    //char * func ="testFunc";
    pFunc = PyDict_GetItemString(pDict, func);
    if ( !pFunc || !PyCallable_Check(pFunc)){
        printf("[%s][%s][%d] can't find function: %s on %s \n", __FILE__, __func__, __LINE__,func,module);
        goto error;
    }

    // 将参数压入栈       
    int args_nu = py_call_dict_get_len(args);

    PyObject *pArgsDict = PyDict_New(); //创建字典类型变量
    int i = 0;
    for(i = 0; i< args_nu;i++)
    {
        PyDict_SetItemString(pArgsDict, args[i].name, Py_BuildValue("s", args[i].value)); //往字典类型变量中填充数据
    }
    
    //将上述字典赋值给元组
    //PyObject *pArgs = PyTuple_New(1);
    pArgs = PyTuple_New(1);
    PyTuple_SetItem(pArgs, 0, pArgsDict);

    // 将参数压入栈       
    //pArgs = PyTuple_New(args_nu);
    //PyTuple_SetItem(pArgs, 0, Py_BuildValue("s",p1));
    //PyTuple_SetItem(pArgs, 1, Py_BuildValue("s", p2));
    //PyTuple_SetItem(pArgs, 2, Py_BuildValue("s", p3));

    // 调用python函数
    pRetVal = PyObject_CallObject(pFunc, pArgs);

    // clean 
    Py_DECREF(pName);
    Py_DECREF(pArgs);
    Py_DECREF(pModule);
    Py_DECREF(pRetVal);
    //NOTE !!!
    iRet = 0;

error:
    // close Python
    Py_Finalize();
    return iRet;
}

int main(int argc,char * argv[])
{
	char * module = "t";
    	char * func ="testFunc";
	PY_CALL_DICT args[] = 
	{
		{"a","hello"},
		{"b","world"},
		{NULL,NULL},
	};
	PY_CALL_DICT retVals[] = 
	{
		{"reta",NULL},
		{"retb",NULL},
		{NULL,NULL},
	};
	if(argc == 2)
	{
		module=argv[1];
	}
	if(argc == 3)
	{
		func=argv[2];
	}
	py_call(module,func,args,retVals);
	return 0;

}