引言

　　為了更有效地抑制垃圾郵件的泛濫，目前多數網站的郵件收發系統都使用了ESMTP服務的身份認證功能。即用戶發送郵件時，需要對用戶的身份進行驗證，如果帳號或密碼錯誤，郵件服務器會拒絕發送郵件。Borland C++ Builder 6中有豐富的控件供開發者使用，其中當然也包括郵件發送控件NMSMTP，這個控件使用方便，但是惟一的缺點是不支持郵件發送時的身份認證功能。筆者通過對郵件發送協議的分析，在使用控件的基礎上設計了具有身份認證功能的郵件發送程序。

　　ESMTP協議分析

　　為了實現身份認證功能，目前ESMTP協議中增加了一部分內容，這就是身份認證。下面我們看看這段認證過程，以筆者在網易的郵箱為例（其中C表示客戶端，S表示郵件服務器）：

　　(1)C: AUTH LOGIN

　　(2)S: 334 dXNlcm5hbWU6

　　(3)C: d3lxX2puX3NkX2Nu

　　(4)S: 334 UGFzc3dvcmQ6

　　(5)C: 密碼略去

　　(6)S: 235 Authentication successful

　　詳細說明：

　　(1)客戶端向服務器發送認證指令。

　　(2)服務器返回Base64編碼串，334意味成功。編碼字符串解碼后為"username:"，說明要求客戶端發送用戶名。

　　(3)客戶端發送Base64編碼的用戶名串，此處為"wyq_jn_sd_cn"。

　　(4)服務器返回Base64編碼串，334意味成功。編碼字符串解碼后為"password:"，說明要求客戶端發送用戶口令。

　　(5)客戶端發送Base64編碼的口令串，此處略去。

　　(6)服務器返回普通字符串，235意味成功，表示認證成功可以發送郵件了。

　　MIME Base64編碼解釋

　　一般的計算機編碼的一個字節是8bit，0——FF就是256種不同的8bit組合。我們現在要介紹的這種Base64編碼則是每個字節6bit，共有26=64種組合。其中每種組合對應一個字符，這些字符是“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567 89+/�！边@就意味著每3個普通編碼可以轉換成4個Base64編碼，那么如果需要轉換的普通編碼不是3的整數倍怎么辦？Base64規定，位數不足的字節后面補0，然后差幾個字符補幾個‘=’號。

　　設計思路

　　我們可以使用NMSMTP控件與郵件服務器連接。通過調用Connect方法，然后監聽OnConnect事件；在OnConnect事件里我們可以增加身份認證功能。這里是主要利用了NMSMTP從Powersock中繼承的一些基本網絡通訊函數，包括Read,DataAvailable,SendBuffer等來實現身份認證過程。如果身份認證成功，就可以繼續進行郵件發送；否則，提示錯誤信息，斷開網絡連接。

　　程序實現

　　使用BCB設計如圖1所示的窗體。


圖1 程序主界面

　　1、在登錄按鈕的OnClick事件中調用連接函數

void __fastcall TForm1::Logon1Click(TObject *Sender)

{

　　 AddLog("正在登錄"+Edit1->Text+"......");

　　 NMSMTP1->Host = Edit1->Text; 　　　　 //主機地址

　　 NMSMTP1->Port = 25; 　　　　 //主機端口，缺省為25

　　 NMSMTP1->UserID = Edit4->Text;　　　　 //用戶名

　　 NMSMTP1->Connect(); 　　　　 //連接主機

}



　　 2、處理OnConnect事件

void __fastcall TForm1::NMSMTP1Connect(TObject *Sender)

{

　AddLog("連接服務器成功。");

　AnsiString Data="",rData="";

　bool b_ok;

　if(CheckBox1->Checked){

　　Data="AUTH LOGIN\r\n";　　　　 //登錄請求命令　　　　　　　　

　　NMSMTP1->SendBuffer(Data.c_str(),Data.Length()); //命令發出

　　rData = WaitForReply(5);　　　　 //等待接收返回數據，5秒內必須返回

　　b_ok = false;

　　if(rData.Length()>=3){

　　　//334意味著服務器要求輸入用戶名

　　　if(rData.TrimLeft().SubString(0,3)=="334"){

　　　　AddLog("正在驗證身份......");

　　　　b_ok =true;

　　　}

　}

　if(!b_ok){

　　AddLog("登錄失敗，正在退出......");

　　NMSMTP1->Disconnect();

　　return;

　}

　rData="";

　Data=encode(Edit4->Text)+"\r\n";　　 //用戶名轉換為Base64編碼。

　NMSMTP1->SendBuffer(Data.c_str(),Data.Length()); //發送用戶名

　rData = WaitForReply(5);

　b_ok=false;

　if(rData.Length()>=3){

　　// 334意味著服務器要求輸入口令

　　if(rData.TrimLeft().SubString(0,3)=="334"){

　　　AddLog("正在驗證口令......");

　　　b_ok =true;

　　}

　}

　if(!b_ok){

　　AddLog("登錄失敗，正在退出......");

　　NMSMTP1->Disconnect();

　　return;

　}

　rData="";

　Data=encode(Edit5->Text)+"\r\n";//口令轉換成Base64編碼。

　NMSMTP1->SendBuffer(Data.c_str(),Data.Length()); //發送口令

　rData=WaitForReply(5);

　b_ok = false;

　if(rData.Length()>=3){

　　if(rData.TrimLeft().SubString(0,3)=="235"){

　　　AddLog("登錄成功......");

　　　b_ok =true;

　　}

　}

　if(!b_ok){

　　AddLog("登錄失敗，正在退出......");

　　NMSMTP1->Disconnect();

　　return;

　}

}

SendMail->Enabled=true; 　　　　 //允許發送郵件

disconnect->Enabled=true;　　 //允許斷開連接

Logon1->Enabled=false; 　　　　 //不允許再次登錄

}

　　3、MIME Base64編碼轉換

AnsiString TForm1::encode(AnsiString s)

{

　int m_len; //字符串長度

　int i; //循環變量

　int m_tmp; //臨時變量

　AnsiString m_64code; //儲存Base64編碼的字符串

　char* m_s; //臨時存儲參數字符串
　
　//Base64字符表

　char m_64[]= "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";

　m_len = s.Length();　　　　 //取得字符串長度

　m_s = s.c_str();　　　　　　

　m_64code="";　　　　　　　　 //返回串置空

　//處理3的倍數以內的字符

　for(i=0;i<m_len-m_len%3;i+=3){

　　m_tmp=m_s[i]/4;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[i]%4*16 + m_s[i+1]/16;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[i+1]%16*4 + m_s[i+2]/64;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[i+2]%64;

　　m_64code+=m_64[m_tmp];

　}

　//如果字符串的長度被3除余2 ,不足的位數補0，尾部補“=”

　if(m_len%3==2){
　
　　m_tmp=m_s[m_len-2]/4;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[m_len-2]%4*16+m_s[m_len-1]/16;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[m_len-1]%16*4;

　　m_64code+=m_64[m_tmp];

　　m_64code+='=';

　}

　//如果字符串的長度被3除余1 ，不足的位數補0，尾部補兩個“=”

　if(m_len%3==1){

　　m_tmp=m_s[m_len-1]/4;

　　m_64code+=m_64[m_tmp];

　　m_tmp=m_s[m_len-1]%4*16;

　　m_64code+=m_64[m_tmp];

　　m_64code+="==";

　}

　return m_64code;

}


　　結束語

　　本程序在Windows 2000環境下使用Borland C++ Builder 6.0編寫及調試的，分別使用網易和新浪郵箱做實驗，都可以順利完成身份認證以及郵件發送功能。