sql server 的扩展存储过程,其实就是一个普通的 windows dll,只不过按照某种规则实现了某些函数而已。
近日在写一个扩展存储过程时,发现再写这类动态库时,还是有一些需要特别注意的地方。之所以会特别注意,是因为dll运行于sql server的地址空间,而sql server到底是怎么进行线程调度的,却不是我们能了解的,即便了解也无法控制。
我们写动态库一般是自己用,即便给别人用,也很少像sql server这样,一个动态库很有可能加载多次,并且都是加载到一个进程的地址空间中。我们知道,当一个动态库加载到进程的地址空间时,dll所有全局与局部变量初始化且仅初始化一次,以后再次调用 loadlibrary函数时,仅仅增加其引用计数而已,那么很显然,假如有一全局 int ,初始化为0,调用一个函数另其自加,此时其值为1,然后再调用loadlibray,并利用返回的句柄调用输出函数输出该值,虽然调用者觉得自己加载后立即输出,然后该值确实1而不是0。windows是进程独立的,而在线程方面,假如不注意,上面的情况很可能会程序员带来麻烦。
介绍一下我的扩展存储过程,该动态库导出了三个函数: init,work,final,init读文件,存储信息于内存,work简单的只是向该内存检索信息,final回收内存。如上所说,假如不考虑同一进程空间多次加载问题,两次调用init将造成无谓的浪费,因为我第一次已经读进了内存,要是通过堆分配内存,还会造成内存泄露。
我使用的引用计数解决的该问题,代码很短,直接贴上来:
| #include "stdafx.h" #include <string> using namespace std; extern "c" { retcode __declspec(dllexport) xp_part_init(srv_proc *srvproc); retcode __declspec(dllexport) xp_part_process(srv_proc *srvproc); retcode __declspec(dllexport) xp_part_finalize(srv_proc *srvproc); } #define xp_noerror 0 #define xp_error 1 hinstance hinst = null; int nref = 0; void printerror (srv_proc *psrvproc, char* szerrormsg); ulong __getxpversion(){ return ods_version;} srvretcode xp_part_init(srv_proc* psrvproc){ typedef bool (*func)(); if(nref == 0){ hinst = ::loadlibrary("part.dll"); if(hinst == null){ printerror(psrvproc,"不能加载part.dll"); return xp_error; } func thefunc = (func)::getprocaddress(hinst,"init"); if(!thefunc()){ ::freelibrary(hinst); printerror(psrvproc,"不能获得分类号与专辑的对应表"); return xp_error; } } ++ nref; return (xp_noerror); } srvretcode xp_part_process(srv_proc* psrvproc){ typedef bool (*func)(char*); if(nref == 0){ printerror(psrvproc,"函数尚未初始化,请首先调用xp_part_init"); return xp_error; } func thefunc = (func)::getprocaddress(hinst,"get"); byte btype; ulong cbmaxlen,cbactuallen; bool fnull; char szinput[256] = {0}; if (srv_paraminfo(psrvproc, 1, &btype, (ulong*)&cbmaxlen, (ulong*)&cbactuallen, (byte*)szinput, &fnull) == fail){ printerror(psrvproc,"srv_paraminfo 返回 fail"); return xp_error; } szinput[cbactuallen] = 0; string strinput = szinput; string stroutput = ";"; int cur,old = 0; while(string::npos != (cur = strinput.find(’;’,old)) ){ strncpy(szinput,strinput.c_str() + old,cur - old); szinput[cur - old] = 0; old = cur + 1; thefunc(szinput); if(string::npos ==stroutput.find((string)";" + szinput)) stroutput += szinput; } strcpy(szinput,stroutput.c_str()); if (fail == srv_paramsetoutput(psrvproc, 1, (byte*)(szinput + 1), strlen(szinput) - 1,false)){ printerror (psrvproc, "srv_paramsetoutput 调用失败"); return xp_error; } srv_senddone(psrvproc, (srv_done_count srv_done_more), 0, 0); return xp_noerror; } srvretcode xp_part_finalize(srv_proc* psrvproc){ typedef void (*func)(); if(nref == 0) return xp_noerror; func thefunc = (func)::getprocaddress(hinst,"fin"); if((--nref) == 0){ thefunc(); ::freelibrary(hinst); hinst = null; } return (xp_noerror); } |
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器