QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 2956|回复: 3
打印 上一主题 下一主题

Windows下DLL编程技术及应用

[复制链接]
字体大小: 正常 放大
韩冰        

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 12:52 |只看该作者 |倒序浏览
|招呼Ta 关注Ta

Windows下DLL编程技术及应用9 j5 n+ Q8 n$ E8 N& f. H7 o- m2 [7 o Windows下DLL编程技术及应用* {: j6 e4 c+ I+ k6 S2 S2 A

6 U$ F% q: R! V

摘 要: / X& q1 _$ Y3 w1 G8 p2 W3 k: F/ L8 O本文介绍了DLL技术在Windows编程中的基本运用方法及应用,给出了直接内存访问及端口I/O的两个实用DLL的全部源代码。 , f) a0 n& E+ A) Y$ |) Z, N) R7 g关键词: DLL Windows编程 内存访问 I/O

0 j }4 F9 D$ W( U

一 、引 言 9 ~, G- a, e, w2 a9 k由于Windows为微机提供了前所未有的标准用户界面、图形处理能力和简单灵便的操作,绝大多数程序编制人员都已转向或正在转向Windows编程。在许多用户设计的实际应用系统的编程任务中,常常要实现软件对硬件资源和内存资源的访问,例如端口I/O、DMA、中断、直接内存访问等等。若是编制DOS程序,这是轻而易举的事情,但要是编制Windows程序,尤其是WindowsNT环境下的程序,就会显得较困难。4 y! x+ }) |4 Q% ~# X- [$ V7 z 因为Windows具有"与设备无关"的特性,不提倡与机器底层的东西打交道,如果直接用Windows的API函数或I/O读写指令进行访问和操作,程序运行时往往就会产生保护模式错误甚至死机,更严重的情况会导致系统崩溃。那么在Windows下怎样方便地解决上述问题呢?用DLL(Dynamic Link Libraries)技术就是良好途径之一。. }2 P, `7 j5 _6 B+ b DLL是Windows最重要的组成要素,Windows中的许多新功能、新特性都是通过DLL来实现的,因此掌握它、应用它是非常重要的。其实Windows本身就是由许多的DLL组成的,它最基本的三大组成模块Kernel、GDI和User都是DLL,它所有的库模块也都设计成DLL。凡是以.DLL、.DRV、.FON、.SYS和许多以.EXE为扩展名的系统文件都是DLL,要是打开Windows\System目录,就可以看到许多的DLL模块。尽管DLL在Ring3优先级下运行,仍是实现硬件接口的简便途径。DLL可以有自己的数据段,但没有自己的堆栈,使用与调用它的应用程序相同的堆栈模式,减少了编程设计上的不便;同时,一个DLL在内存中只有一个实例,使之能高效经济地使用内存;DLL实现的代码封装性,使得程序简洁明晰;此外还有一个最大的特点,即DLL的编制与具体的编程语言及编译器无关,只要遵守DLL的开发规范和编程策略,并安排正确的调用接口,不管用何种编程语言编制的DLL都具有通用性。例如在BC31中编制的DLL程序,可用于BC、VC、VB、Delphi等多种语言环境中。笔者在BC31环境下编译了Windows下直接内存访问和端口I/O两个DLL,用在多个自制系统的应用软件中,运行良好。

9 r# i( i& o' [8 G- `6 e

二、DLL的建立和调用$ ?& f% B7 n) Q3 u DLL的建立及调用方法在许多资料上有详细的介绍,为了节省篇幅,在这里仅作一些主要的概括。 . ?! S) I" {3 z# n4 Q1.DLL的建立" w$ W. ?- f0 O$ G6 D5 ` 关于DLL的建立,有如下几个方面的要素是不可缺少和必须掌握的: % E$ W5 Z3 V, N# r* w/ j2 X4 h入口函数LibMain( )3 `9 S" l6 Q+ m% I$ R! B 就象C程序中的WinMain( )一样,Windows每次加载DLL时都要执行LibMain( )函数,主要用来进行一些初始化工作。通常的形式是:

0 @% S$ U; ^3 O1 {6 |

int FAR PASCAL LibMain(HINSTANCE hInstance,WORD wDataSeg,WORD wHeapSize,LPSTR lpszCmdLine)4 K+ c/ I2 ]7 r. I' s {, ~. H0 b2 `5 c( @ if(wHeapSize!=0) //使局部堆、数据段可移动9 O m: e" D1 R UnlockData(0); 2 S0 o6 X. W. W& [//解锁数据段 $ m* P' G0 T8 u: J o/*此处可进行一些用户必要的初始化工作*/ ' O# b4 O% E5 W% W, i3 _$ nreturn 1; //初始化成功/ v: O: M% d+ |/ H& \# M! U }

' z8 \5 g" L) X) t

出口函数WEP( ) 3 G4 _' d! f+ e( rWindows从内存中卸载DLL时,调用相应的出口函数WEP( ),主要做一些清理工作,如释放占用的内存资源;丢弃某些字串、位图等资源;关闭打开的文件等等。

i0 A& y( r' s+ e# P3 W6 j

自定义的输出函数 - d( v2 ~, z! D$ k. Z: f+ f为了让位于不同内存段的应用程序进行远程调用,自定义的输出函数必须定义为远程函数(使用FAR关键字),以防使用近程指针而得到意外的结果;同时,加上PASCAL关键字可加快程序的运行速度,使代码简单高效,提高程序的运行速度。 + p% {' ?) j1 o输出函数的引出方法 7 w/ F# ]5 p) n5 n: j$ G8 T0 d. s / y7 H Z6 E* ^ a) T$ r在DLL的模块定义文件中(.DEF)由EXPORTS语句对输出函数逐一列出。例如:8 U" a( x! E# _: ]: J EXPORTS WEP @1 residentname / E( l1 b6 I: {5 D& Q& Z1 ]' I//residentname可提高DLL效率和处理速度- v. a1 f/ e3 q( Y PortIn @2 0 c6 V+ m8 \6 a3 ~& p; R; B PortOut @3 //通常对所有输出函数附加系列号1 S, |$ H( @8 \! E3 F3 u8 }; U/ { " j5 Z1 x4 ?3 I& X* [4 R在每个输出函数定义的说明中使用_export关键字来对其引出。& Y0 @( e7 ?( u! {+ K 以上两种方法任选其中的一种即可,不可重复。后面的两个实例分别使用了上述两种不同的引出方式,请留意。

+ B" R2 G/ J3 X/ l$ Y

2.DLL的调用 0 C+ R9 z" P$ v6 Q% \/ \8 f6 b加载DLL时,Windows寻找相应DLL的次序如下: ) F8 [" N: S& t' U7 ]+ K' s' \.当前工作盘。 5 {) Z! N+ A; V. F, h h$ ^Windows目录;GetWindowsDirectory( )函数可提供该目录的路径名。 5 S" t) d! B6 `# u& t" `- ?+ vWindows系统目录,即System子目录;调用GetSystemDiretory( )函数可获得这个目录的路径名。 " W f' Z9 U* I6 }6 a$ oDOS的PATH命令中罗列的所有目录。+ f# b; L& P7 D0 m 网络中映象的目录列表中的全部目录。

. r# R9 n4 l& _5 Z" q; D3 w

DLL模块中输出函数的调用方法:( a _9 R/ Q! ]$ ] 不论使用何种语言对编译好的DLL进行调用时,基本上都有两种调用方式,即静态调用方式和动态调用方式。静态调用方式由编译系统完成对DLL的加载和应用程序结束时DLL卸载的编码(如还有其它程序使用该DLL,则Windows对DLL的应用记录减1,直到所有相关程序都结束对该DLL的使用时才释放它),简单实用,但不够灵活,只能满足一般要求。动态调用方式是由编程者用API函数加载和卸载DLL来达到调用DLL的目的,使用上较复杂,但能更加有效地使用内存,是编制大型应用程序时的重要方式。具体来说,可用如下的方法调用.在应用程序模块定义文件中,用IMPORTS语句列出所要调用DLL的函数名。如:" g; m) X7 I' I IMPORTS / X2 z1 U3 N4 Z, d* B1 y" @8 ZMEMORYDLL.MemoryRead % F. k: E( R3 JMEMORYDLL.MemoryWrite ) G7 f# a L) K% C- t3 U; A' i让应用程序运行时与DLL模块动态链接 / o6 _5 o# K0 W; ]. w5 \ i8 [先用LoadLibrary加载DLL,再用GetProcAddress函数检取其输出函数的地址,获得其指针来调用。如: % X0 ~# ^% H" R% tHANDLE hLibrary; * B8 z* s4 P, C/ H8 IFARPROC lpFunc; ; u: u& I5 H, }! `5 kint PortValue;, j) Z: Z h: R# d- l( Q; i: Z6 s8 G hLibrary=LoadLibrary("PORTDLL.DLL"); , R2 C; G, C j7 a3 j9 B& ` //加载DLL4 H1 \& u; z# S E: ~/ A6 Z if(hLibrary>31) //加载成功 0 Q0 }& ?' a9 W- f { " X+ u) i0 d! q4 TlpFunc=GetProcAddress(hLibrary,"PortIn"); : \3 k* g% W* F8 V; W) ? //检取PortIn函数地址 . r$ l6 X8 |( Iif(lpFunc!=(FARPROC)NULL) 2 J* H' [( F4 b) U+ s1 V) H//检取成功则调用 " V% M$ R$ s( u) ?1 _PortValue=(*lpFunc)(port); //读port端口的值 $ q; L; U4 o+ _" _# ]FreeLibrary(hLibrary); 4 g* ]& Q$ Y7 s/ V; X4 h//释放占用的内存/ z2 Y2 [" j7 }" u/ x }

7 h! T* k* o: D% ?2 O$ O. b

三、DLL应用实例源程序 : o7 Q* d. f9 f1.直接内存访问的DLL源代码; B; M+ S( k4 c" Y //.DEF文件 $ K) C( k+ b, c6 O9 v+ ULIBRARY ) [6 D N/ R" Y% i1 G0 |MEMORYDLL5 w% u$ }& C; n4 L) { DESCRIPTION 'DLL FOR MEMORY_READ_WRITE '4 s+ v% k h0 ? EXETYPE WINDOWS ' d/ \, o' N* y/ \7 m+ |CODE 0 ]) N# j8 C# x" Q) TPRELOAD MOVEABLE DISCARDABLE% m6 S' ?8 h. ~: q: c; |7 Q2 n DATA PRELOAD MOVEABLE SINGLE" _3 e6 ]( t) L& D3 h" V HEAPSIZE 1024 4 {- C3 l! {. P8 k- R% x //DLL无自己的堆栈,故没有STACKSIZE语句 , O$ h& K- W' @: \' [) uEXPORTS WEP @1 residentname " g/ z( ^; @; ^' x8 qReadMemory - P- }' p+ \4 B @2 - Y3 \' `/ U7 y0 g) ]WriteMemory @3

) q7 Q1 U& H% V

//.CPP文件( m( h: u5 m% g% ~! ] #include <windows.h>, H1 g* c: n' _& s int FAR PASCAL LibMain(HINSTANCE hInstance,WORD wDataSeg,WORD wHeapSize,LPSTR lpszCmdLine): ~* J. ]' F3 y; {7 b7 s- Z0 D4 ~ {; s Q# k- U. n$ a if(wHeapSize!=0) 0 [5 r3 Q1 {; \ u7 i2 ~* DUnlockData(0);0 D3 k& P0 k* ]+ W" t4 f1 B' m$ j% i return 3 I/ [. ]% Z X3 c3 q 1; ; q; G* z8 L' x0 Z}

( B* W. o5 U- R

int FAR PASCAL MemoryRead(unsigned int DosSeg,unsigned int DosOffset)$ Z( Z: B; j" w; J/ Y1 N8 P { ( o; k9 }9 \: g8 y1 u8 Q9 pWORD wDataSelector,wSelector;) ~+ Q: Q, O: o) |( Z1 k5 [% S char far *pData;' a+ i7 P/ g/ V% E8 v- l2 x/ ^ char value; & a) y+ U+ P/ @6 ]6 y* } CwDataSelector=HIWORD((DWORD)(WORD FAR *)&wDataSelector);0 T% X( K* _+ r* i6 w/ F wSelector=AllocSelector(wDataSelector); ' y) l( h; @% n* Y6 I //分配选择器% N0 h+ S. j: I9 x SetSelectorLimit(wSelector,0x2000); ' \: z, W4 i. p7 a8 _5 _: w//置存取界限 / w+ r% B" K$ U1 }# F2 {: X7 FSetSelectorBase(wSelector,(((DWORD)DosSeg)<<4)+(DWORD)DosOffset); 1 v3 |; M6 m% U M //置基地址2 [+ f+ O; b" ^1 e pData=(char far *)((DWORD)wSelector<<16); 9 g, r" l4 l' g$ f0 x( {: zvalue=*pData; ' r [6 n0 Q+ u/ a& OFreeSelector(wSelector); 8 X: w3 W2 `( A3 x) k( }//释放选择器 + ]- C/ h7 j7 o* lreturn (value); / ^; b. R0 \3 Y}

8 I+ @8 t. {3 f s' z$ q5 i

void FAR PASCAL MemoryWrite(unsigned int DosSeg,unsigned int DosOffset,char Data)! x0 L) P! |( c( F1 p* s C {. ~+ j* C. ]# U; Q$ `' m! F WORD wDataSelector,wSelector; ' P/ [8 i6 G/ v, O4 Q2 \char far *pData;' F0 E O0 ^! b* E& Q* s/ E' V5 o wDataSelector=HIWORD((DWORD)(WORD FAR *)&wDataSelector); 3 r, S [, K% O1 SwSelector=AllocSelector(wDataSelector);! d/ U! `# l3 c. N, T9 a, l SetSelectorLimit(wSelector,0x2000);7 h8 B. v/ a2 b' K SetSelectorBase(wSelector,(((DWORD)DosSeg)<<4)+(DWORD)DosOffset);5 s# _; H2 }! r pData=(char far *)((DWORD)wSelector<<16);' f6 S) w2 m4 |- [2 t2 A *pData=Data;0 M ?' w i5 H1 |3 q/ v FreeSelector(wSelector);( ~' ~/ r% R) m) a( X/ v& H }

4 l4 N/ a- }1 H9 O2 S( a c- K3 g$ [

int FAR PASCAL WEP(int nParam)% }$ z$ E# r2 I- U2 d {* i! u( ^8 a5 a, | return 1; 9 J5 D4 q6 x& N- m4 O5 n2 S+ Q}

7 [2 J9 }( W1 M

. j3 b$ I$ H8 j& N3 g* E, C" H2 O 2.端口读写I/O的DLL源代码 1 l7 _* C: b# V0 ]8 X: g( L//.DEF文件 & l+ n8 R4 X" CLIBRARY PORTDLL% X9 w* t5 }" n DESCRIPTION 'DLL FOR ! Z7 F. C* g! W5 Q, ]. V8 H( V* G PORT_IN_OUT '1 P9 D p( w4 _0 w EXETYPE WINDOWS ! \) _9 H% N$ f1 h6 CCODE PRELOAD MOVEABLE DISCARDABLE# m; R+ W: i: g4 b" G DATA - j' n6 {, _6 Z0 j0 ~ PRELOAD MOVEABLE SINGLE ( J0 L4 L1 R4 |& `, HHEAPSIZE 1024

; L+ F x3 Y/ W2 \: S7 Z

//.CPP文件+ C0 z) W, N3 R y+ s* M #include * q# Q X* |2 G<windows.h> 6 K. ?; E+ }8 _: i# X5 D; V i6 `. F: D2 ~#include <dos.h>

- e# x4 [" J' @+ t/ N$ X$ M m* R. M

int FAR PASCAL 0 z# h# v) n5 iLibMain(HINSTANCE hInstance,WORD wDataSeg,WORD wHeapSize,LPSTR lpszCmdLine) " L; l7 Q' b `1 k O h{6 u$ X0 S) e2 d7 Q3 t- r' u' r if(wHeapSize!=0). H$ M9 s- O$ A: u/ f0 z& O _ UnlockData(0);1 p0 B) u/ r4 V: o# T return - Y8 C S) O. u9 h1; & R. l/ A" Y Y8 y}

8 t, P# m) x; f9 }% _' |! t

int FAR PASCAL _export PortOut(int port,unsigned char value) ) Z3 A1 A, t# ?0 B{1 ?/ a. U, b5 y: V' e. ^ outp(port,value); 4 d2 M' s. |0 g# x) [* treturn 1; + H$ f- w f) R7 L8 v7 f* E}

& T0 _: {0 X! t2 s! R8 M% J

int FAR PASCAL _export PortIn(int port) % m: G9 ~% ^1 O4 B0 o! @% g' I4 z{) V4 s( U6 Y+ |5 G- K2 y( N int result; T' e* T: t+ R# Y. } result=inp(port); 0 D0 W3 M& I r& ^ qreturn (result);/ y6 `6 U \! ~1 t5 S+ `- a Q }

/ P; d, n, O/ M' \/ g! j3 h

int FAR PASCAL _export WEP(int nParam)4 W8 K/ W! Y1 f, D- B) @: ?5 I {, h. ^1 R' ^6 Z! t return 1; 3 h# G" t* M; [; e. o# t- l0 f' Y}

+ _# P; C/ [$ }8 n1 ?+ \2 ?: c E1 I6 m$ k

" F0 C3 d" a3 t% y9 ]9 p0 q- m 分别将上面两个实例的.DEF文件和.CPP文件各自组成一个.PRJ文件,并进行编译链接成.EXE或.DLL文件就可以在应用程序中对其进行调用。

7 V2 y/ m* i4 d3 h% B

四、结束语& }4 g' J( Z# ~; b) H; J 在上面,我们利用DLL技术方便地实现了Windows环境下对内存的直接访问和端口I/O的访问,仿效这两个例子,还可以编制出更多的适合自己应用系统所需的DLL,如用于数据采集卡的端口操作及扩展内存区访问、视频区缓冲区及BIOS数据区操作等许多实际应用的编程任务中。必要时只需直接更新DLL,而用不着对应用程序本身作任何改动就可以对应用程序的功能和用户接口作较大的改善,实现版本升级。因此,掌握好DLL技术对Windows程序开发者很有裨益。

zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
413009449        

0

主题

4

听众

43

积分

升级  40%

该用户从未签到

回复

使用道具 举报

iytaq        

0

主题

0

听众

4

积分

升级  80%

该用户从未签到

不错不错!!9 y  X; m6 ]4 o4 b5 U

6 y$ O1 j9 o) v) D4 g% y7 w# M  L0 N/ P; g7 G% v
. s2 y, {0 n" L

( r% {  n& a; D/ L& {9 d4 n( Q* w- J" H: M) C2 H
& c% G8 D; A5 k
! b% J/ v3 c* H/ h' D
6 {7 u* b1 m6 G) @6 @# e: W/ Z1 {

" I$ `0 F  \/ `0 R) z9 ]  O
. o; p* M( N* K# [5 N( a8 Q" i
. B: z; v8 v6 F; [) m; g6 ]! s) A) @6 L( `! w) `
* c; O, p: s$ |( y
回复

使用道具 举报

ehi28        

0

主题

4

听众

140

积分

升级  20%

该用户从未签到

看贴回贴是个好孩子,围观中............LOGIN..........................
7 H: W- W) j# P4 C3 d* \
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-6-10 23:11 , Processed in 0.497787 second(s), 75 queries .

回顶部