让C++动态执行某个文件中的部分C++代码,实现动态代码程序

[Seaoh]

我在做一个ISAPI时,遇到了这样的问题.
想把C++程序,先写到每个CPP文件中,然后由一个C++写的ISAPI根据不同的外部参数,调用对应的CPP文件,并把CPP文件的代码执行.
在网上查了一些关于C++的EVAL的文章,都是做简单的数学运算或者正则,但我的CPP中包含了复杂的C++代码,不知道如何解决.

还请各位高人指点.

[baihacker]

CPP中包含了复杂的C++代码

建议用脚本 js,vbs都行...

[xkyx_cn]

lz的问题肯定可以通过其他途径解决，还是说的更具体点吧

[Seaoh]

[Quote=引用 19 楼 baihacker 的回复:]
CPP中包含了复杂的C++代码

建议用脚本 js,vbs都行...
[/Quote]

CPP中也不算是太复杂的代码,主要是一些类和运算,还有像输入输出等操作.

[ryfdizuo]

关注.

[baihacker]

[Quote=引用 21 楼 Seaoh 的回复:]
引用 19 楼 baihacker 的回复:
CPP中包含了复杂的C++代码

建议用脚本 js,vbs都行...


CPP中也不算是太复杂的代码,主要是一些类和运算,还有像输入输出等操作.
[/Quote]

可以简化为没有类的.
再简化数据类型.
再简化其它语法.

自己做个解释器就OK.

[taodm]

[Quote=引用 21 楼 Seaoh 的回复:]
引用 19 楼 baihacker 的回复:
CPP中包含了复杂的C++代码

建议用脚本 js,vbs都行...


CPP中也不算是太复杂的代码,主要是一些类和运算,还有像输入输出等操作.
[/Quote]

用内嵌lua或者python

[Seaoh]

找了The Art of C++,都是卖书的.

[baihacker]

//MSDN上内嵌vbs的例子(部分代码)
//建议使用这种方法
//写解释器难度相对较高,成本也大
// Your IActiveScriptSite implementation...
class MyActiveScriptSite : public IActiveScriptSite {
private:
	ULONG m_dwRef; // Reference count
public:
	IUnknown *m_pUnkScriptObject; // Pointer to your object that is exposed
	// to the script engine in GetItemInfo().

	MyActiveScriptSite::MyActiveScriptSite() {m_dwRef = 1;}
	MyActiveScriptSite::~MyActiveScriptSite() {}

	// IUnknown methods...
	virtual HRESULT _stdcall QueryInterface(REFIID riid, void **ppvObject) {
		*ppvObject = NULL;
		return E_NOTIMPL;
	}
	virtual ULONG _stdcall AddRef(void) {
		return ++m_dwRef;
	}
	virtual ULONG _stdcall Release(void) {
		if(--m_dwRef == 0) return 0;
		return m_dwRef;
	}

	// IActiveScriptSite methods...
	virtual HRESULT _stdcall GetLCID(LCID *plcid) {
		return S_OK;
	}

	virtual HRESULT _stdcall GetItemInfo(LPCOLESTR pstrName,
		DWORD dwReturnMask, IUnknown **ppunkItem, ITypeInfo **ppti) {

			// Is it expecting an ITypeInfo?
			if(ppti) {
				// Default to NULL.
				*ppti = NULL;

				// Return if asking about ITypeInfo... 
				if(dwReturnMask & SCRIPTINFO_ITYPEINFO)
					return TYPE_E_ELEMENTNOTFOUND;
			}

			// Is the engine passing an IUnknown buffer?
			if(ppunkItem) {
				// Default to NULL.
				*ppunkItem = NULL;

				// Is Script Engine looking for an IUnknown for our object?
				if(dwReturnMask & SCRIPTINFO_IUNKNOWN) {
					// Check for our object name...
					if (!_wcsicmp(L"MyObject", pstrName)) {
						// Provide our object.
						*ppunkItem = m_pUnkScriptObject;
						// Addref our object...
						m_pUnkScriptObject->AddRef();
					}
				}
			}

			return S_OK;
	}

	virtual HRESULT __stdcall GetDocVersionString(BSTR *pbstrVersion) {
		return S_OK;
	}

	virtual HRESULT __stdcall OnScriptTerminate(const VARIANT *pvarResult,
		const EXCEPINFO *pexcepInfo) {
			return S_OK;
	}

	virtual HRESULT __stdcall OnStateChange(SCRIPTSTATE ssScriptState) {
		return S_OK;
	}

	virtual HRESULT __stdcall OnScriptError(
		IActiveScriptError *pscriptError) {
			static BSTR pwcErrorText;
			pscriptError->GetSourceLineText(&pwcErrorText);

			AfxMessageBox(
				CString("IActiveScriptSite::OnScriptError()\n") + 
				CString("Line: ") + 
				CString(pwcErrorText),
				MB_SETFOREGROUND);
			::SysFreeString(pwcErrorText);
			return S_OK;
	}

	virtual HRESULT __stdcall OnEnterScript(void) {
		return S_OK;
	}

	virtual HRESULT __stdcall OnLeaveScript(void) {
		return S_OK;
	}
};

// Global instance of our IActiveScriptSite implementation.
MyActiveScriptSite g_iActiveScriptSite;

// Script Engine CLSIDs...
#include <initguid.h>
DEFINE_GUID(CLSID_VBScript, 0xb54f3741, 0x5b07, 0x11cf, 0xa4, 0xb0, 0x0,
			0xaa, 0x0, 0x4a, 0x55, 0xe8);
DEFINE_GUID(CLSID_JScript, 0xf414c260, 0x6ac0, 0x11cf, 0xb6, 0xd1, 0x00,
			0xaa, 0x00, 0xbb, 0xbb, 0x58);

// Ole-initialization class.
class OleInitClass {
public:
	OleInitClass() {
		OleInitialize(NULL);
	}
	~OleInitClass() {
		OleUninitialize();
	}
};
// This global class calls OleInitialize() at
// application startup, and calls OleUninitialize()
// at application exit...
OleInitClass g_OleInitClass;

void HRVERIFY(HRESULT hr, char * msg)
{
	if(FAILED(hr)) {
		CString str;
		str.Format("Error: 0x%08lx (%s)", hr, msg);
		AfxMessageBox(str, 0x10000);
		_exit(0);
	}

}


void CDlgTstDlg::OnBnClickedButton1()
{
	// Initialize our IActiveScriptSite implementation with your
	// script object's IUnknown interface...
	g_iActiveScriptSite.m_pUnkScriptObject = 
		m_myScriptObject.GetInterface(&IID_IUnknown);

	// Start inproc script engine, VBSCRIPT.DLL
	HRVERIFY(CoCreateInstance(CLSID_VBScript, NULL, CLSCTX_INPROC_SERVER, 
		IID_IActiveScript, (void **)&m_iActiveScript), 
		"CoCreateInstance() for CLSID_VBScript");

	// Get engine's IActiveScriptParse interface.
	HRVERIFY(m_iActiveScript->QueryInterface(IID_IActiveScriptParse, 
		(void **)&m_iActiveScriptParse), 
		"QueryInterface() for IID_IActiveScriptParse");

	// Give engine our IActiveScriptSite interface...
	HRVERIFY(m_iActiveScript->SetScriptSite(&g_iActiveScriptSite), 
		"IActiveScript::SetScriptSite()");

	// Give the engine a chance to initialize itself...
	HRVERIFY(m_iActiveScriptParse->InitNew(),
		"IActiveScriptParse::InitNew()");

	// Add a root-level item to the engine's name space...
	HRVERIFY(m_iActiveScript->AddNamedItem(L"MyObject", 
		SCRIPTITEM_ISVISIBLE | SCRIPTITEM_ISSOURCE),
		"IActiveScript::AddNamedItem()");	

	// Get script code...
	CString csScriptText;
	m_edit1.GetWindowText(csScriptText);

	// Parse the code scriptlet...
	EXCEPINFO ei;
	BSTR pParseText = csScriptText.AllocSysString();
	m_iActiveScriptParse->ParseScriptText(pParseText, L"MyObject", NULL,
		NULL, 0, 0, 0L, NULL, &ei);

	// Set the engine state. This line actually triggers the execution
	// of the script.
	m_iActiveScript->SetScriptState(SCRIPTSTATE_CONNECTED);

	// Release engine...
	m_iActiveScriptParse->Release();
	m_iActiveScript->Release();

}

[Seaoh]

我还是再琢磨琢磨吧.

[zhangyq73]

模板和组件为什么不能用呢？

[小笨象]

你要能琢磨出来。MS，GG都抢着要你了。
用DLL不就完事了？
写CPP文件来执行。。。。。受不了这样的想法。
我继续睡我的觉去。

[lauxp]

dll/shell
原理都在哪里呢，你到底想要干么

[橘子香水]

为什么不用DLL,估计微软那帮人开始的想法和你一样,结果发明了dll.

[lkldiy]

关注一下

[hertcloud]

就是 为什么不用dll 或者 com呢...

[ilovechao1314]

这个太有难度了吧，
1，自己做个编译器
2，com+xml这类的方法
3，.net里面好像是有个命名空间可以实现

[UDX协议]

用dll和com，不要浪费你的生命。

否则换语言用脚本驱动的语言。

[xunfeng_2008]

我个人比较赞成使用DLL来实现，
动态加载不就可以了吗？

[珍惜生命远离CPP]

自带一个编译器，随用随编译

[stolen007]

个人觉得 转换成汇编代码即可