C/C++模块化编译Lu脚本函数

C/C++模块化编译Lu脚本函数

1 说明

要演示本文的例子，你必须下载Lu64脚本系统。本文的例子需要lu64.dll、lu64.lib、C格式的头文件lu64.h，相信你会找到并正确使用这几个文件。

用C/C++编译器创建一个控制台应用程序，复制本文的例子代码直接编译运行即可。

2 Lu脚本的模块化编译功能

Lu支持表达式（函数）的模块化编译。参考Lu编程指南中的函数LuCom，该函数有一个参数nModule，要求给该表达式指定一个模块号，模块号用整数进行标识。如果用模块加锁函数LockModule对一个模块号进行了加锁，则编译表达式时必须提供加锁函数，本文暂不考虑加锁函数LockModule。

在Lu中，一个模块由一个或多个表达式组成。模块用一个整数标识，整数可正可负，只要绝对值相等，就属于同一个模块。一般用正整数表示该模块名。模块共有两类，即主模块（0#模块）和普通模块（其他标号的模块）。

同一模块中，模块号为负的表达式称私有表达式，只能被本模块的表达式所访问（即调用），在其他模块中是不可见的；模块号为正的表达式称公有表达式或全局表达式，能被任何一个表达式所访问。主模块（0#模块）中的表达式都是私有表达式。任何一个表达式，既可以访问本模块中的表达式，也可以访问其他模块中的全局表达式，如果本模块中的一个私有表达式与其他模块的一个全局表达式重名，将优先调用本模块中的私有表达式。

由以上规定可以看出，主模块可以访问本模块中的表达式，也可以访问其他模块中的全局表达式。因此，主模块常常用在主程序中。

3 代码

#include <stdio.h>
#include "lu64.h"

#pragma comment( lib, "lu64.lib" )

void main(void)
{
	void *hFor;			//存放表达式（脚本函数）句柄
	luINT nPara;			//存放表达式的自变量个数
	LuData *pPara;			//存放输入自变量的数组指针
	LuData Val;			//存放表达式的值
	luINT ErrBegin,ErrEnd;		//表达式编译出错的初始位置和结束位置
	int ErrCode;			//错误代码
	wchar_t M1For1[]=L"aa(x,y) = x+y";		//将编译为模块1的私有函数，注意模块2中有同名私有函数
	wchar_t M1For2[]=L"m1(x,y) = x+y+aa(x,y)";	//将编译为模块1的全局函数，函数名全局唯一
	wchar_t M2For1[]=L"aa(x,y) = x-y";		//将编译为模块2的私有函数，注意模块1中有同名私有函数
	wchar_t M2For2[]=L"m2(x,y) = x-y+aa(x,y)";	//将编译为模块2的全局函数，函数名全局唯一
	wchar_t M0For1[]=L"aa(x,y : a,b) = a=x,b=y, x=m1(a,b), y=m2(a,b), x+y";	//将编译为模块0的私有函数，只能是私有函数，仍特意命名为aa

	if(!InitLu()) return;		//初始化Lu

	//编译表达式M1For1、M1For2、M2For1、M2For2，我们不会直接调用它们，故所有返回参数均忽略。由于表达式是正确的，为了简单，ErrCode也被忽略。
	ErrCode=LuCom(M1For1,-1,0,0,&hFor,&nPara,&pPara,&ErrBegin,&ErrEnd);  //编译为模块1的私有函数
	ErrCode=LuCom(M1For2, 1,0,0,&hFor,&nPara,&pPara,&ErrBegin,&ErrEnd);  //编译为模块1的全局函数
	ErrCode=LuCom(M2For1,-2,0,0,&hFor,&nPara,&pPara,&ErrBegin,&ErrEnd);  //编译为模块2的私有函数
	ErrCode=LuCom(M2For2, 2,0,0,&hFor,&nPara,&pPara,&ErrBegin,&ErrEnd);  //编译为模块2的全局函数
	//编译表达式M0For1，我们仅调用该函数。虽然表达式是正确的，但这里检查对ErrCode进行了检查。
	ErrCode=LuCom(M0For1, 0,0,0,&hFor,&nPara,&pPara,&ErrBegin,&ErrEnd);  //编译为模块0的私有函数
	if(ErrCode)
	{
		printf("表达式有错误！错误代码： %d \n",ErrCode);
	}
	else
	{
		pPara[0].BType=luStaData_int64; pPara[0].VType=luStaData_int64; pPara[0].x=1;  //对M0For1的第1个参数赋值
		pPara[1].BType=luStaData_int64; pPara[1].VType=luStaData_int64; pPara[1].x=2;  //对M0For1的第2个参数赋值
		Val=LuCal(hFor,pPara);	//计算表达式的值，hFor即编译得到的表达式句柄
		printf("表达式的值： %I64d，第1个返回参数的值： %I64d，第2个返回参数的值： %I64d \n",Val.x,pPara[0].x,pPara[1].x);
	}
	FreeLu();				//释放Lu
}

运行结果：

表达式的值： 4，第1个返回参数的值： 6，第2个返回参数的值： -2

4 函数说明

本例用到了Lu的四个输出函数：初始化Lu的函数InitLu，释放Lu的函数FreeLu，编译表达式的函数LuCom和计算表达式的函数LuCal。从这里查看这些函数的说明：Lu编程指南。

5 难点分析

很少有脚本会提供模块化编译功能，但模块化编译的确很有用途，因为一个模块的私有函数和模块变量，除非该模块提供了接口（全局函数），在该模块之外是无法访问的。

实际上，C/C++程序只要获得了表达式的句柄，就可以使用函数LuCal来执行它，无论该表达式是模块私有的，还是全局的。故从C/C++程序来看，对自己编译的Lu表达式，讨论私有或者全局并没有意义。但一个C/C++程序有时并不自己编译Lu脚本（或者只编译部分脚本），例如实用程序OpenLu使用扩展库Mlu编译Lu脚本，这时它只能获得Lu脚本系统中的部分函数（全局函数，或者显示输出的私有函数）句柄，从而使私有数据得到了有效地保护。关于一个C/C++程序如何获取非自己编译的Lu脚本函数，以后会有专门的例子进行讨论。

6 其他

你可能注意到了，我的联系方式就在下面，如有不明之处或有什么建议，可随时与我进行联系。