//
#include "Csmtp.h"
#pragma comment(lib, "Kernel32.lib") 

int main()
{ 

 Csmtp mail(
  25,
  "smtp.126.com",
  "username@126.com",// 來源郵箱
  "pwd",
  "username@126.com" //目標郵箱
  );

 if (!mail.CReateSocket())
 {
  cout << "ReateSocket failed!" << endl;
  return -1;//
 }
 mail.setTitle("test mail");
 mail.setContent("this is content.");

 mail.addfile("test1.png"); //添加附件
 mail.addfile("test2.png"); //添加附件

 mail.SendMail(); //類主函數(shù)

 return 0; 
} 

#include <iostream> 
#include <string> 
#include <vector>
#include <fstream> 

#include <WinSock2.h> //適用平臺 Windows

#pragma comment(lib, "ws2_32.lib") /*鏈接ws2_32.lib動態(tài)鏈接庫*/ 
 // POP3服務(wù)器（端口：110） Csmtp服務(wù)器（端口：25） 
using namespace std;
class Csmtp 
{ 

 int port; 
 string domain; 
 string user; 
 string pass; 
 string target; 
 string title; //郵件標題
 string content; //郵件內(nèi)容


 HOSTENT* pHostent;
 SOCKET sockClient; //客戶端的套接字
 vector <string> filename; //存儲附件名的向量

public: 

 Csmtp( 
  int _port, //端口25
  string _domain,  //域名
  string _user,  //發(fā)送者的郵箱
  string _pass,  //密碼
  string _target)  //目標郵箱
 :port(_port),domain(_domain),user(_user),pass(_pass), target(_target){};//內(nèi)容 
 bool CReateSocket();
 void setTitle(string tem){title = tem;}
 void setContent(string tem){content = tem;}

 int SendAttachment(SOCKET &sockClient);
 int SendMail();
 void addfile(string str){filename.push_back(str);}

}; 

#include "Csmtp.h"
//#include <afx.h>//異常類
static const char base64Char[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; 
char* base64Encode(char const* origSigned, unsigned origLength) 
{ 
 unsigned char const* orig = (unsigned char const*)origSigned; // in case any input bytes have the MSB set 
 if (orig == NULL) return NULL; 

 unsigned const numOrig24BitValues = origLength / 3; 
 bool havePadding = origLength > numOrig24BitValues * 3; 
 bool havePadding2 = origLength == numOrig24BitValues * 3 + 2; 
 unsigned const numResultBytes = 4 * (numOrig24BitValues + havePadding); 
 char* result = new char[numResultBytes + 3]; // allow for trailing '/0' 

 // Map each full group of 3 input bytes into 4 output base-64 characters: 
 unsigned i; 
 for (i = 0; i < numOrig24BitValues; ++i) 
 { 
  result[4 * i + 0] = base64Char[(orig[3 * i] >> 2) & 0x3F]; 
  result[4 * i + 1] = base64Char[(((orig[3 * i] & 0x3) << 4) | (orig[3 * i + 1] >> 4)) & 0x3F]; 
  result[4 * i + 2] = base64Char[((orig[3 * i + 1] << 2) | (orig[3 * i + 2] >> 6)) & 0x3F]; 
  result[4 * i + 3] = base64Char[orig[3 * i + 2] & 0x3F]; 
 } 

 // Now, take padding into account. (Note: i == numOrig24BitValues) 
 if (havePadding) 
 { 
  result[4 * i + 0] = base64Char[(orig[3 * i] >> 2) & 0x3F]; 
  if (havePadding2) 
  { 
   result[4 * i + 1] = base64Char[(((orig[3 * i] & 0x3) << 4) | (orig[3 * i + 1] >> 4)) & 0x3F]; 
   result[4 * i + 2] = base64Char[(orig[3 * i + 1] << 2) & 0x3F]; 
  } 
  else 
  { 
   result[4 * i + 1] = base64Char[((orig[3 * i] & 0x3) << 4) & 0x3F]; 
   result[4 * i + 2] = '='; 
  } 
  result[4 * i + 3] = '='; 
 } 

 result[numResultBytes] = '\0'; 
 return result; 
} 


int Csmtp::SendAttachment(SOCKET &sockClient) /*發(fā)送附件*/ 
{ 
 for (std::vector<string>::iterator iter = filename.begin();iter != filename.end(); iter++) 
 { 
  cout << "Attachment is sending··· " << endl; 

  string path=*iter;
  ifstream ifs(path, ios::in | ios::binary); //'或鏈接2個屬性，以輸入、二進制打開'
  if (false == ifs.is_open()) 
  { 
   cout<<"無法打開文件！"<<endl;
   return 1; 
  } 

  string sendstring; 
  sendstring = "--@boundary@\r\nContent-Type: application/octet-stream; name=\"1.jpg\"\r\n"; 
  sendstring += "Content-Disposition: attachment; filename=\"1.jpg\"\r\n"; 
  sendstring += "Content-Transfer-Encoding: base64\r\n\r\n"; 
  send(sockClient, sendstring.c_str(), sendstring.length(), 0); 

  //infile.read((char*)buffer,sizeof(數(shù)據(jù)類型));

  // get length of file:
  ifs.seekg (0, ifs.end);
  int length = ifs.tellg();
  ifs.seekg (0, ifs.beg);
  cout<<"length:"<<length<<endl;
  // allocate memory:
  char * buffer = new char [length];
  // read data as a block:
  ifs.read (buffer,length);
  ifs.close();
  char *pbase; 
  pbase = base64Encode(buffer, length); 
  delete[]buffer; 
  string str(pbase);
  delete[]pbase; 
  str+="\r\n";
  int err =send(sockClient, str.c_str(), strlen(str.c_str()), 0); 

  if (err != strlen(str.c_str())) 
  { 
   cout << "文件傳送出錯!" << endl; 
   return 1; 
  } 
 }
 return 0;
} 


bool Csmtp::CReateSocket() 
{ 
 WSADATA wsaData; 
 WORD wVersionRequested = MAKEWORD(2, 1); 
 //WSAStarup，即WSA(Windows SocKNDs Asynchronous，Windows套接字異步)的啟動命令
 int err = WSAStartup(wVersionRequested, &wsaData); 
 cout<<"WSAStartup(0:successful):"<<err<<endl;

 char namebuf[128]; //獲得本地計算機名
 string ip_list;
 if(0==gethostname(namebuf,128)) 
 { 
  struct hostent* pHost; //獲得本地IP地址
  pHost=gethostbyname(namebuf); //pHost返回的是指向主機的列表
  for (int i=0;pHost!=NULL&&pHost->h_addr_list[i]!=NULL;i++) 
  {
   string tem = inet_ntoa(*(struct in_addr *)pHost->h_addr_list[i]);
   ip_list += tem;
   ip_list += "\n";
  } 
 } 
 else 
 { 
  cout<<"獲取主機信息失敗..."<<endl ; 
 }
 //////////////////////////////////////////////////////////////////////////
 title=namebuf;// 郵件標題
 content=ip_list; //主機ip

 sockClient = socket(AF_INET, SOCK_STREAM, 0); //建立socket對象 

 pHostent = gethostbyname(domain.c_str()); //得到有關(guān)于域名的信息

 if (pHostent == NULL)
 {
  printf( "創(chuàng)建連接失敗，也許沒聯(lián)網(wǎng)！\n" );
  return false;
 }

 return true;
}


int Csmtp::SendMail()
{
 char *ecode;

 char buff[500]; //recv函數(shù)返回的結(jié)果
 int err = 0; 
 string message; //

 SOCKADDR_IN addrServer; //服務(wù)端地址
 addrServer.sin_addr.S_un.S_addr = *((DWORD *)pHostent->h_addr_list[0]); //得到smtp服務(wù)器的網(wǎng)絡(luò)字節(jié)序的ip地址  



 addrServer.sin_family = AF_INET; 
 addrServer.sin_port = htons(port); //連接端口25 
 //int connect (SOCKET s , const struct sockaddr FAR *name , int namelen );
 err = connect(sockClient, (SOCKADDR*)&addrServer, sizeof(SOCKADDR)); //向服務(wù)器發(fā)送請求 
 cout<<"connect:"<<err<<endl;
 //telnet smtp.126.com 25 連接服務(wù)器結(jié)束
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"connect:"<<buff<<endl;

 message="ehlo 126.com\r\n";
 send(sockClient, message.c_str(), message.length(), 0); 

 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"helo:"<<buff<<endl;

 message="auth login \r\n";
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"auth login:"<<buff<<endl;
 //上傳郵箱名
 message=user; 
 ecode = base64Encode(message.c_str(), strlen(message.c_str())); 
 message = ecode; 
 message += "\r\n"; 
 delete[]ecode; 
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"usrname:"<<buff<<endl;
 //上傳郵箱密碼
 message=pass; 
 ecode = base64Encode(message.c_str(), strlen(message.c_str())); 
 message = ecode; 
 delete[]ecode; 
 message += "\r\n"; 
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"password:"<<buff<<endl;

 message="mail from:<"+user+">\r\nrcpt to:<"+target+">\r\n";
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"mail from: "<<buff<<endl;
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"rcpt to: "<<buff<<endl;

 message="data\r\n";//data要單獨發(fā)送一次
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"data: "<<buff<<endl;
 ///-----------------------------------------DATA-------------------------------------
 //要使用Csmtp 發(fā)送附件, 需要對Csmtp 頭信息進行說明, 改變Content-type 及為每一段正文添加BOUNDARY 名,
 cout<<"-------------------DATA------------------------"<<endl;
 // 頭
 message="from:"+user+"\r\nto:"+target+"\r\nsubject:"+title+"\r\n";
 message += "MIME-Version: 1.0\r\n"; 
 message += "Content-Type: multipart/mixed;boundary=@boundary@\r\n\r\n"; 
 send(sockClient, message.c_str(), message.length(), 0); 

 // 正文
 message = "--@boundary@\r\nContent-Type: text/plain;charset=\"gb2312\"\r\n\r\n"+content+"\r\n\r\n"; 
 send(sockClient, message.c_str(), message.length(), 0); 

 //------------------------------------------------------------------------------------------------
 // 發(fā)送附件

 SendAttachment(sockClient);

 /*發(fā)送結(jié)尾信息*/ 
  message = "--@boundary@--\r\n.\r\n"; 
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 //cout<<"end_qwertyuiop:"<<buff<<endl;

 message="QUIT\r\n"; 
 send(sockClient, message.c_str(), message.length(), 0); 
 buff[recv(sockClient, buff, 500, 0)]='\0';
 cout<<"Send mail is finish:"<<buff<<endl;
 return 0;
}