姚茂群

[摘要]主要介紹利用delphi開發(fā)工具軟件進(jìn)行的一種軟件設(shè)計(jì)過程,并對(duì)設(shè)計(jì)中關(guān)鍵技術(shù)WIN32 API、管道、進(jìn)程操作api、indy網(wǎng)絡(luò)開發(fā)套件以及網(wǎng)絡(luò)多線程的使用進(jìn)行闡述。

[關(guān)鍵詞]DelphiWIN32 APIindy網(wǎng)絡(luò)開發(fā)套件多線程

中圖分類號(hào):TP3文獻(xiàn)標(biāo)識(shí)碼:A文章編號(hào):1671-7597(2009)0710028-01

一、引言

隨互聯(lián)網(wǎng)的日益普及,各學(xué)校加大計(jì)算機(jī)硬件設(shè)備投入,給機(jī)房管理人員對(duì)服務(wù)器的維護(hù)和管理較大的壓力和負(fù)擔(dān)。為此,本文介紹的這種軟件就是針對(duì)這種情況而進(jìn)行設(shè)計(jì)的,它使得機(jī)房管理人員無論在任何時(shí)候以及任何位置,只要有一臺(tái)連接互聯(lián)網(wǎng)的計(jì)算機(jī)就可以隨時(shí)登錄需要維護(hù)的服務(wù)器進(jìn)行維護(hù),極大地方便和減輕了管理人員的工作壓力。

二、系統(tǒng)開發(fā)環(huán)境

系統(tǒng)是在美國(guó)BORLAND公司的計(jì)算機(jī)語言開發(fā)系統(tǒng)Delphi7.0上進(jìn)行開發(fā)的。能夠在Windows 98、Windows NT、Windows XP、Windows 2003環(huán)境下運(yùn)行。

三、系統(tǒng)功能設(shè)計(jì)(總體設(shè)計(jì))

系統(tǒng)的功能分為兩大部分:服務(wù)器端和客戶端。

1.服務(wù)器端主要功能。服務(wù)器端主要用來接收客戶端發(fā)來的請(qǐng)求,并對(duì)接收的請(qǐng)求進(jìn)行分析,對(duì)符合條件的請(qǐng)求給予響應(yīng)。主要功能如下:

(1)自啟動(dòng)模塊:控制軟件隨Windows啟動(dòng)。(2)服務(wù)器端管理模塊:設(shè)置連接密碼,啟動(dòng)和停止服務(wù)功能。(3)日志顯示模塊:顯示客戶端的操作日志。(4)請(qǐng)求分析模塊:響應(yīng)客戶端的請(qǐng)求,調(diào)用正確的響應(yīng)程序。(5)響應(yīng)密碼驗(yàn)證模塊:判斷是否允許對(duì)客戶端控制。(6)響應(yīng)遠(yuǎn)程文件操作模塊:通過請(qǐng)求分析程序調(diào)用正確的具體文件操作程序。(7)響應(yīng)遠(yuǎn)程命令行模塊:獲得指定dos命令的執(zhí)行結(jié)果,并把結(jié)果發(fā)送到客戶端。(8)響應(yīng)遠(yuǎn)程進(jìn)程管理模塊:獲得進(jìn)程列表,停止指定的進(jìn)程,并把結(jié)果發(fā)送到客戶端。(9)響應(yīng)遠(yuǎn)程服務(wù)管理模塊:獲得服務(wù)列表,啟動(dòng)和停止服務(wù),并把結(jié)果發(fā)送到客戶端。(10)文字通訊模塊:接收客戶端信息,發(fā)送用戶輸入的信息。

2.客戶端主要功能。客戶端主要是用戶向服務(wù)器端發(fā)出需要服務(wù)的請(qǐng)求,等待服務(wù)器端的回應(yīng)。主要功能有:

(1)網(wǎng)絡(luò)連接模塊:連接和斷開服務(wù)器端。(2)本地文件管理模塊:顯示文件列表、刪除文件或者目錄、重命名、新建目錄。(3)遠(yuǎn)程文件管理模塊:與服務(wù)器端進(jìn)行交互,管理服務(wù)器端的文件。(4)本地命令行模塊:執(zhí)行指定的dos命令,并顯示結(jié)果。(5)遠(yuǎn)程命令行:與服務(wù)器端進(jìn)行交互,在客戶端顯示指定dos命令,在服務(wù)器端顯示執(zhí)行結(jié)果。(6)遠(yuǎn)程進(jìn)程管理模塊:與服務(wù)器端進(jìn)行交互,對(duì)服務(wù)器端進(jìn)程進(jìn)行管理。(7)遠(yuǎn)程服務(wù)管理模塊:與服務(wù)器端進(jìn)行交互,對(duì)服務(wù)器端的服務(wù)進(jìn)行管理。(8)文字通訊:接收服務(wù)器端信息,發(fā)送客戶用戶輸入的信息。

四、軟件的詳細(xì)設(shè)計(jì)

(一)通信的數(shù)據(jù)包結(jié)構(gòu)?？蛻舳艘獙?duì)服務(wù)器端進(jìn)行操作,就要通過網(wǎng)絡(luò),發(fā)送數(shù)據(jù)包給服務(wù)器端。服務(wù)器端分析數(shù)據(jù)包,調(diào)用相應(yīng)的功能模塊,做出正確的響應(yīng),返回結(jié)果到客戶端。而這個(gè)數(shù)據(jù)要有一定的格式才能被雙方所識(shí)別。

(二)客戶端詳細(xì)設(shè)計(jì)。是對(duì)客戶端的各模塊的功能和子功能規(guī)劃處理流程,由于各模塊的流程較多,下面僅舉遠(yuǎn)程文件管理模塊中的上傳文件模塊進(jìn)行簡(jiǎn)單說明:

procedure TForm_client.FileTool_upfileClick(Sender:TObject);

處理流程:上傳文件。從本地文件選擇要上傳的文件,然后上傳文件。文件按split劃分段數(shù),分段傳輸。續(xù)傳文件時(shí),按以存在文件的大小算出開始分段數(shù),從開始分段數(shù)傳輸文件。

(三)服務(wù)器端詳細(xì)設(shè)計(jì)。下面僅舉請(qǐng)求分析模塊進(jìn)行簡(jiǎn)單說明,請(qǐng)求分析模塊的主要功能:響應(yīng)客戶端的請(qǐng)求,調(diào)用正確的響應(yīng)程序。

主要函數(shù)和過程:procedure Tform_server.IdTCPServer1Execute(A

Thread:TIdPeerThread);

處理流程:接收客戶端數(shù)據(jù)時(shí)調(diào)用此事件過程。對(duì)數(shù)據(jù)包進(jìn)行分析,把數(shù)據(jù)分成四段,存入數(shù)組,第一段為功能號(hào),第二段為子功能號(hào),第三段第四段為參數(shù)。從而對(duì)相應(yīng)客戶端請(qǐng)求調(diào)用相應(yīng)的處理程序。

五、關(guān)鍵技術(shù)的實(shí)現(xiàn)

(一)WIN32 API的使用。DELPHI中將C或C++中引用的WINDOWS.H頭文件改寫為WINDOWS.PAS單元,使WINDOWS API函數(shù)的定義符合PASCAL語法。而其他的頭文件在DELPHI中也都有相應(yīng)的.PAS單元一一對(duì)應(yīng),所以在DELPHI中調(diào)用API函數(shù)時(shí),只須將相應(yīng)的API函數(shù)單元加入到USES語句的單元之中,便可直接調(diào)用相應(yīng)的函數(shù)了。

(二)管道的使用。使用管道的好處在于:讀寫它使用的是對(duì)文件操作的api,結(jié)果操作管道就和操作文件一樣。即使你在不同的計(jì)算機(jī)之間用命名管道來通信,你也不必了解和自己去實(shí)現(xiàn)網(wǎng)絡(luò)間通信的具體細(xì)節(jié)。該軟件的設(shè)計(jì)在客戶端和服務(wù)器端中都用到了匿名管道,它允許你和完全不相干的進(jìn)程通信,條件是這個(gè)進(jìn)程通過控制臺(tái)“console”來輸入輸出。

(三)進(jìn)程操作api的使用。用以下兩組API調(diào)用實(shí)現(xiàn):

1.創(chuàng)建系統(tǒng)的所有進(jìn)程列表:

ProcessList:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);

2.提取進(jìn)程列表項(xiàng)信息存儲(chǔ)在TPROCESSENTRY32 pe中:

Process32First(ProcessList,pe),

Process32Next(ProcessList,pe)。

(四)indy網(wǎng)絡(luò)開發(fā)套件的使用。INDY提供INTERNET流行協(xié)議的客戶端和服務(wù)器控件。INDY控件集的客戶端和服務(wù)器控件都有完整、詳細(xì)的源代碼例程和幫助文件,根據(jù)一些例程就可簡(jiǎn)單方便快速的建造各種服務(wù)器程序,在開發(fā)該軟件中服務(wù)器端使用了TIDTCPServer控件,客戶端采用了TIDTCPClient控件。它們各自的屬性和方法,編程時(shí),參照相關(guān)參數(shù)進(jìn)行設(shè)置就可以了。

(五)在delphi中使用多線程技術(shù)。Windows為線程控制提供了一系列的API函數(shù)調(diào)用。在Delphi中利用線程,可以直接調(diào)用Windows API的CreateThread函數(shù)來創(chuàng)建一個(gè)線程,也可以利用Delphi的VCL庫(kù)中的TThread對(duì)象,取代直接調(diào)用Windows API函數(shù),這樣就可以直接對(duì)系統(tǒng)的底層進(jìn)行操作。

參考文獻(xiàn):

[1]何國(guó)民,實(shí)驗(yàn)選課系統(tǒng)的設(shè)計(jì)及實(shí)現(xiàn),實(shí)驗(yàn)科學(xué)與技術(shù),成都:電子科技大學(xué)出版社,2004.

[2]陳省,Delphi深度探索(第二版)[M].北京:電子工業(yè)出版社,2004.

[3]飛思科技產(chǎn)品研發(fā)中心,Delphi 7基礎(chǔ)編程[M].北京:電子工業(yè)出版社,2003.