1.新增要傳送的檔案

檔案的傳送是在傳送對話方塊中進行的，首先找到傳送對話方塊的快捷選單。

File Transfer對應的選單id為MENU_FILEADD，相應的command處理事件在Senddlg.cpp中的EvCommand函式中

BOOL TSendDlg::EvCommand(WORD wNotifyCode, WORD wID, LPARAM hWndCtl)
{
    switch (wID)
    {
        case MENU_FILEADD:
        {
            char    buf[MAX_PATH] = "";
            if
 
 (TShareDlg::FileAddDlg(this, shareMng, shareInfo ? shareInfo : (shareInfo = shareMng->CreateShare(packetNo)), cfg))
            {
                SetFileButton(this, FILE_BUTTON, shareInfo);
                EvSize(SIZE_RESTORED, 0, 0);
            }
        }
        break;
    }
}
BOOL TShareDlg::FileAddDlg(TDlg *dlg, ShareMng *shareMng, ShareInfo *shareInfo, Cfg *cfg)
{
    char
 
    buf[MAX_BUF] = "", path[MAX_BUF];
    //開啟檔案對話方塊,OpenFileDlg::MULTI_OPEN設定可以同時開啟多個檔案
    if (OpenFileDlg(dlg, OpenFileDlg::MULTI_OPEN).Exec(buf, ADDFILE_MSGSTR, OPENFILEALL_MSGSTR, cfg->lastOpenDir) != TRUE)
        return  FALSE;
    //獲取開啟檔案的路徑字元長度
    int     dirlen = strlen(cfg->lastOpenDir);

    //如果只選擇一個檔案，直接將檔案加入到待發送檔案的快取區shareInfo中
 

    if (buf[dirlen])
        return  shareMng->AddFileShare(shareInfo, buf);

    //如果選擇了多個檔案，迴圈將每個檔案都加入到待發送檔案快取區中
    for (char *fname=buf+dirlen+1; *fname; fname += strlen(fname) +1)
    {
        if (MakePath(path, buf, fname) >= MAX_PATH)
            continue;
        shareMng->AddFileShare(shareInfo, path);
    }
    return  TRUE;
}

開啟檔案對話方塊的呼叫是在OpenFileDlg類中的Exec中呼叫Win32的API GetOpenFileName()函式實現的。

2. 待發送檔案的儲存結構

從TShareDlg::FileAddDlg函式中可以看到待發送的檔案是儲存到Sh
areInfo類中。ShareInfo的宣告如下

struct ShareInfo : public TListObj {
    int         packetNo;       // 
    Host        **host;         // 要傳送的目的機器列表
    int         hostCnt;        // 要傳送的目的機器個數
    char        *transStat;     // 
    FileInfo    **fileInfo;     // 要傳輸的檔案資訊
    int         fileCnt;        // 要傳輸的檔案個數
    FILETIME    attachTime;
    ...
};
class FileInfo : public TListObj {
    int         id;     // 要傳輸檔案的id
    char        *fname; //檔名
    const char  *fname_ext; // for recv dir thread
    UINT        attr;   //檔案的屬性，如是檔案或資料夾，只讀等
    _int64      size;  //檔案大小
    time_t      mtime; //檔案最後一次修改時間
    time_t      atime; //檔案最後一次訪問時間
    time_t      crtime; //檔案建立時間
    BOOL        isSelected;     // for recvdlg
    ...
}

再回到TShareDlg::FileAddDlg中，看shareMng->AddFileShare(shareInfo, path);

BOOL ShareMng::AddFileShare(ShareInfo *info, char *fname)
{
    //如果要傳送的檔案已經加入到列表中，不再進行處理
    for (int cnt=0; cnt < info->fileCnt; cnt++)
        if (strcmp(fname, info->fileInfo[cnt]->Fname()) == 0)
            return  FALSE;

    FileInfo    *fileInfo = new FileInfo;
    //設定新的待發送檔案資訊，如檔案大小，最後一次修改時間等
    if (SetFileInfo(fname, fileInfo) == FALSE)
        return  FALSE;

    //如果fileInfo分配的記憶體已經使用完，需要分配理多的記憶體，用於存放新的檔案資訊
    if ((info->fileCnt % BIG_ALLOC) == 0)
        info->fileInfo = (FileInfo **)realloc(info->fileInfo, (info->fileCnt + BIG_ALLOC) * sizeof(FileInfo *));
    info->fileInfo[info->fileCnt] = fileInfo;
    info->fileCnt++;

    return  TRUE;
}

3. 在網路中進行檔案傳輸

(1)檔案在網路上進行傳時的格式。
id:檔名:檔案大小:最後一次修改時間：檔案屬性:
如果多個檔案則多個檔案之間的資訊加入一個’\a’字元進行分隔。
(2)在Senddlg.cpp中的SendMsg，即按”Send”按鈕的觸發事件，其程式碼如下

BOOL TSendDlg::SendMsg(void)
{
    ...
    if (shareInfo && shareInfo->fileCnt)
        command |= IPMSG_FILEATTACHOPT;
    ...
    if (shareInfo && shareInfo->fileCnt)    
    {
        char    buf[MAX_UDPBUF / 2];
        //將檔案生成(1)中的格式
        EncodeShareMsg(shareInfo, buf, sizeof(buf));
        shareStr = new char [strlen(buf) + 1];
        strcpy(shareStr, buf);
        shareMng->AddHostShare(shareInfo, sendEntry, sendEntryNum);
    }
    SendMsgSub();
    ...
}
BOOL EncodeShareMsg(ShareInfo *info, char *buf, int bufsize)
{
    int     offset=0;
    char    fname[MAX_PATH];

    *buf = 0;
    for (int cnt=0; cnt < info->fileCnt; cnt++)
    {
        ForcePathToFname(info->fileInfo[cnt]->Fname(), fname);
        info->fileInfo[cnt]->SetId(cnt);
        offset += wsprintf(buf + offset, (info->fileInfo[cnt]->Size() >> 32) ? "%d:%s:%x%08x:%x:%s" : "%d:%s:%x%x:%x:", cnt, fname, (int)(info->fileInfo[cnt]->Size() >> 32), (int)info->fileInfo[cnt]->Size(), info->fileInfo[cnt]->Mtime());
            offset += wsprintf(buf + offset, "%x:", info->fileInfo[cnt]->Attr());
        offset += wsprintf(buf + offset, "%c", FILELIST_SEPARATOR);

        if (offset + MAX_BUF > bufsize)
            break;
    }
    return  TRUE;
}

SendMsgSub()中會對待發送的訊息進行加密(傳輸的檔案資訊不進行加密)。

BOOL TSendDlg::SendMsgSub(void)
{
    for (int cnt=0; cnt < sendEntryNum; cnt++)
    {
        if (sendEntry[cnt].Status() == ST_MAKECRYPTMSG) {
            MakeEncryptPacket(sendEntry + cnt);     
        }
        ...
        if (sendEntry[cnt].Status() == ST_SENDMSG) {
            const char  *str = sendEntry[cnt].Msg() ? sendEntry[cnt].Msg() : msgBuf;
            int     len = sendEntry[cnt].Msg() ? sendEntry[cnt].MsgLen() : packetLen;

            msgMng->UdpSend(sendEntry[cnt].Host()->hostSub.addr, sendEntry[cnt].Host()->hostSub.portNo, str, len);
        }
        ...
    }
}

下面是使用飛鴿傳軟體傳送檔案的一個截圖

圖中紅色框中就是要傳送的檔案資訊，從圖中可以看出傳送的檔名為open_data_structures.pdf，檔案大小是十六進位制的01817d0位元組，最後一次修改時間為十六進位制53f492fe。

4.接收端的處理

現在只是將待發送的檔案資訊傳送出去，但是還沒有將真正的檔案內容傳出去。檔案內容的傳輸是通過TCP進行的。
Mainwin接收到傳送來的udp訊息後會對udp的訊息進行處理。udp的處理在Mainwin.cpp的UdpEvent函式中。

BOOL TMainWin::UdpEvent(LPARAM lParam)
{
    MsgBuf  msg;

    if (WSAGETSELECTERROR(lParam) || msgMng->Recv(&msg) != TRUE)
        return  FALSE;
    ...
    switch (GET_MODE(msg.command))
    {
        ...
        case IPMSG_SENDMSG:
        //處理髮送來的訊息
        MsgSendMsg(&msg);
        break;
        ...
    }
    ...
}
void TMainWin::MsgSendMsg(MsgBuf *msg)
{
    ...
    RecvDlgOpen(msg);
    ...
}

BOOL TMainWin::RecvDlgOpen(MsgBuf *msg)
{
    TRecvDlg *recvDlg;

    ...
    if ((recvDlg = new TRecvDlg(msgMng, msg, &hosts, cfg, logmng)) == NULL)
        return  FALSE;
    ...
    recvDlg->Create();
    recvDlg->Show();
    recvDlg->SetForceForegroundWindow();
    ...
}

當接收端收到了訊息後就會開啟接收對話方塊。下面看下接收對話方塊的建構函式及接收對話方塊的EvCreate對話方塊

TRecvDlg::TRecvDlg(MsgMng *_msgMng, MsgBuf *_msg, THosts *_hosts, Cfg *_cfg, LogMng *_logmng) : TListDlg(RECEIVE_DIALOG), editSub(_cfg, this)
{
    ...
    //可選欄位中有傳輸檔案的選項命令
    if (msg.command & IPMSG_FILEATTACHOPT)
    {
        //從接收到的訊息中解析出檔案的資訊
        if ((shareInfo = DecodeShareMsg(msg.msgBuf + msg.exOffset)) != NULL)
        {
            fileObj = new RecvFileObj;
            memset(fileObj, 0, sizeof(RecvFileObj));
        }
    }
    ...
}
BOOL TRecvDlg::EvCreate(LPARAM lParam)
{
    ...
    if (msg.command & IPMSG_SECRETOPT)
        ::ShowWindow(GetDlgItem(RECV_EDIT), SW_HIDE), ::ShowWindow(GetDlgItem(QUOTE_CHECK), SW_HIDE);
    else {
        ::ShowWindow(GetDlgItem(OPEN_BUTTON), SW_HIDE), openFlg = TRUE;
        //將檔名顯示到按鈕中
        if (shareInfo)
            SetFileButton(this, FILE_BUTTON, shareInfo);
    }
    ...
}

RecvDlg如下

在出現的對話方塊中，點選”open_data_structures.pdf”這個按鈕。會彈出一個儲存檔案的對話方塊。點儲存後文件的傳輸就會開始。關於檔案的具體傳輸程式碼分析，下一篇再詳細解析。