#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <netdb.h>
#include <sys/socket.h>
#include <sys/types.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#define SOCKET_ERROR -1
#define PRINT(x) printf("%s\n",(x))
int sockfd;
int ret;
char *send_data;
char *recv_data;
char From[128];
char To[128];
char Cc[128];
char Date[128];
char Subject[512];
char Context[6000]={0};
char buffer[1024];
int connectHost(const char *smtpaddr)
{
struct sockaddr_in servaddr;
struct hostent *pHostent;
struct in_addr ** pptr;
sockfd=socket(AF_INET,SOCK_STREAM,0);
if (sockfd <0)
{
fprintf(stderr,"Create socket error!\n");
return -1;
}
memset(&servaddr, 0, sizeof(servaddr));
servaddr.sin_family = AF_INET;
servaddr.sin_port = htons(25);
printf("%s\n",smtpaddr);
pHostent = gethostbyname(smtpaddr); //Get the Mail Server
if(pHostent == NULL)
{
fprintf(stderr,"The Host Name is Invalid... \n");
return -1;
}
pptr =(struct in_addr **)pHostent->h_addr_list;
memcpy(&servaddr.sin_addr,*pptr,sizeof(struct in_addr));
if (connect(sockfd,(struct sockaddr *)& servaddr,sizeof(servaddr)) < 0)
{
fprintf(stderr,"Connect failed... \n");
return -1;
}
printf("Connect to %s.... \n", inet_ntoa(servaddr.sin_addr));
memset(buffer, 0,sizeof(buffer));
if(recv(sockfd, buffer, sizeof(buffer), 0) < 0)
{
fprintf(stderr,"Failed to connect. \n");
return -1;
}else{
printf("%s\nConnect success!", buffer);
}
//DoDo 2010.03.10
//if(getResponse() < 0)
// return -1;
return sockfd;
}
int getResponse()
{
memset(buffer,0,sizeof(buffer));
ret = recv(sockfd,buffer,1024,0);
if(ret == SOCKET_ERROR)
{
printf("receive nothing\n");
return -1;
}
buffer[ret]='\0';
if(*buffer == '5')
{
printf("the order is not support smtp host\n ");
return -1;
}
printf("%s\n",buffer);
return 0;
}
int login(char *username,char *password)
{
printf("sockfd in login() %d\n",sockfd);
char ch[100];
if(username == "" || password == "")
return -1;
send_data = "EHLO server\r\n";
printf("%s\n",send_data);
ret = send(sockfd,send_data,strlen(send_data),0);
if(ret == SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
send_data = "AUTH LOGIN\r\n";
printf("%s\n",send_data);
ret = send(sockfd,send_data,strlen(send_data),0);
if(ret == SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
sprintf(ch,"%s\r\n",username);
printf("%s\n",ch);
ret = send(sockfd,(char *)ch,strlen(ch),0);
if(ret == SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
sprintf(ch,"%s\r\n",password);
printf("%s\n",ch);
ret = send(sockfd,(char *)ch,strlen(ch),0);
if(ret == SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
return 0;
}
int sendmail(char* from,char * to,char * cc,char * subject,char * context)
{
if(from =="" ||to == ""||cc == ""||subject == ""||context == "")
{
fprintf(stderr,"arguments error!\n");
return -1;
}
sprintf(From,"MAIL FROM: <%s>\r\n",from);
printf("%s\n",From);
if((ret= send(sockfd,From,strlen(From),0))== SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
sprintf(To,"RCPT TO: <%s>\r\n",to);
if((ret= send(sockfd,To,strlen(To),0))== SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
send_data = "DATA\r\n";
if((ret= send(sockfd,send_data,strlen(send_data),0))== SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
memset(From,0,sizeof(From));
sprintf(From,"From: %s\r\n",from);
strcat(Context,From);
memset(To,0,sizeof(To));
sprintf(To,"To: %s\r\n",to);
strcat(Context,To);
memset(Cc,0,sizeof(Cc));
sprintf(Cc,"Cc: %s\r\n",cc);
strcat(Context,Cc);
memset(Subject,0,sizeof(Subject));
sprintf(Subject,"Subject: %s\r\n",subject);
strcat(Context,Subject);
strcat(Context,"\r\n\r\n");
strcat(Context,context);
strcat(Context,"\r\n.\r\n");
if((ret= send(sockfd,Context,strlen(Context),0))== SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
printf("QUIT!!!!!!!!!!!!!!!!\n");
if((ret= send(sockfd,"QUIT\r\n",strlen("QUIT\r\n"),0))== SOCKET_ERROR)
{
close(sockfd);
return -1;
}
if(getResponse() < 0)
return -1;
printf("Send Mail Successful!\n");
return 0;
}
int main()
{
int sockfd;
struct sockaddr_in servaddr;
struct hostent *pHostent;
struct in_addr ** pptr;
char *buffer[1024]={0};
char from[128]="";
char to[128]="";
char cc[128]="";
char subject[512]="你好渡渡";
char context[6000]="邮件内容";
char server[56]="smtp.126.com";
char *date =ctime(gmtime());
char *name="******";/*Base64encoding*/ //用户名,填写Base64加密后的字符
char *passwd= "******";/*Base64encoding*/ //密码,填写Base64加密后的字符
if (connectHost(server) <0)
{
fprintf(stderr,"Can Not LOGIN !\n");
return -1;
}
printf("%d\n",sockfd);
if(login(name,passwd) < 0)
{
fprintf(stderr,"Can Not LOGIN !\n");
return -1;
}
sendmail(from,to,cc,subject,context);
return 0;
}