DIOCP开源项目-DIOCP3 大文件的传输DEMO<断点续传>
首先该DEMO在StreamCoder上面做的改动,期间导致StreamCoderDEMO经常出现问题,导致大家运行的时候,频频出现问题,表示道歉。
以下是测试的结果,从服务器下载传输了一个3G左右的文件(Win7.iso)。传输后用Hash工具做了个测试,是一样的。后面贴出了两个文件的贴图。
下面是客户端接受到文件的hash截图
下面是服务端源文件的hash截图
协议和功能
该DEMO由客户端请求服务端位与Files下面的文件,第一次请求文件信息(文件大小),请求到文件后,请求下载文件数据,收到后重复继续请求下载下一块文件数据,直到所有数据完成。
该DEMO的Stream文件头写入了该结构体信息。
TFileHead = record
Flag: Word; //固定$A1标记
cmd: Word; // 1, 请求文件数据, 2: 文件数据, 10: 请求文件信息, 11: 文件信息数据
FileName: string[255]; //文件名
Position: Int64; //文件位置<请求文件数据时指定读取文件数据的位置>
Size: Int64; //数据大小<请求文件数据时表示请求的数据大小;返回文件数据(2)时,表示数据的大小。
crc: Cardinal; //暂时没有试用
cmd_result:Integer; // 0:成功, 1:文件找不到, 2:出现了异常, 3:错误的请求参数
end;
由于下载数据的位置和大小可以由请求中进行指定,所以可以进行断点续传,这是我平常用到的协议。
部分代码讲解
客户端由一个IocpFileTrans类完成主要的功能。
改按钮代表请求下载服务端Files\demoFile.jpg文件。
procedure TfrmMain.btnGetFileClick(Sender: TObject); begin if not FiocpCoderTcpClient.isActive then begin uiLogger.logMessage('please do connect'); exit; end; FFileAsyncTrans.requestFileINfo(edtFileID.Text); end;
请求有回应后(onRecvObject),进行文件数据的请求
接收到数据后(onRecvObject),写入数据后,继续请求下一块数据,所有数据(Postion = size)完成,关闭文件,完成下载。
服务端有MyClientContext类处理客户端的请求和返回数据的工作
请求文件信息命令, 返回文件信息,(文件大小:lvResult.size)
请求文件数据,返回读取的文件大小(lvResult.Size), 和文件数据lvFileData
最后将文件头信息和文件数据合并到Stream中,用writeObject方法返回给客户端。
上面讲述了客户端和服务端文件处理的流程部分的代码。该DEMO只是一个演示,希望能加深大家对diocp的理解。
DEMO路径存放 samples\iocp-coder\streamCoder
注意:请求的文件必须存在输出路径的Files目录下面,
客户端请求的文件,只需要Files目录下面对应的文件名