mirror of
https://github.com/php/php-src.git
synced 2024-10-05 00:36:17 +00:00
258 lines
7.3 KiB
C
258 lines
7.3 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 4 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2002 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 2.02 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available at through the world-wide-web at |
|
|
| http://www.php.net/license/2_02.txt. |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Frank M. Kromann <frank@kromann.info> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
/* $Id$ */
|
|
|
|
#include "php.h" /*php specific */
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <winsock.h>
|
|
#include "time.h"
|
|
#include <string.h>
|
|
#include <malloc.h>
|
|
#include <memory.h>
|
|
#include <winbase.h>
|
|
#include "ext/imap/php_imap.h"
|
|
#include "sendmail.h"
|
|
#include "imap_sendmail.h"
|
|
#include "php_ini.h"
|
|
|
|
char Buffer[MAIL_BUFFER_SIZE];
|
|
|
|
extern int WinsockStarted;
|
|
extern char MailHost[HOST_NAME_LEN];
|
|
extern char LocalHost[HOST_NAME_LEN];
|
|
|
|
|
|
/********************************************************************
|
|
Name: imap_TSendMail
|
|
Input: 1) host: Name of the mail host where the SMTP server resides
|
|
max accepted length of name = 256
|
|
2) appname: Name of the application to use in the X-mailer
|
|
field of the message. if NULL is given the application
|
|
name is used as given by the GetCommandLine() function
|
|
max accespted length of name = 100
|
|
Output: 1) error: Returns the error code if something went wrong or
|
|
SUCCESS otherwise.
|
|
|
|
See SendText() for additional args!
|
|
********************************************************************/
|
|
int imap_TSendMail(char *host, int *error,
|
|
char *headers, char *Subject, char *mailTo, char *data, char *mailCc, char *mailBcc, char *mailRPath)
|
|
{
|
|
int ret;
|
|
char *RPath = NULL;
|
|
|
|
WinsockStarted = FALSE;
|
|
|
|
if (host == NULL) {
|
|
*error = BAD_MAIL_HOST;
|
|
return BAD_MAIL_HOST;
|
|
} else if (strlen(host) >= HOST_NAME_LEN) {
|
|
*error = BAD_MAIL_HOST;
|
|
return BAD_MAIL_HOST;
|
|
} else {
|
|
strcpy(MailHost, host);
|
|
}
|
|
|
|
if (mailRPath)
|
|
RPath = estrdup(mailRPath);
|
|
else if (INI_STR("sendmail_from")){
|
|
RPath = estrdup(INI_STR("sendmail_from"));
|
|
} else {
|
|
return 19;
|
|
}
|
|
|
|
// attempt to connect with mail host
|
|
*error = MailConnect();
|
|
if (*error != 0) {
|
|
if(RPath)efree(RPath);
|
|
return *error;
|
|
} else {
|
|
ret = imap_SendText(RPath, Subject, mailTo, data, headers, mailCc, mailBcc);
|
|
TSMClose();
|
|
if (ret != SUCCESS) {
|
|
*error = ret;
|
|
}
|
|
if(RPath)efree(RPath);
|
|
return ret;
|
|
}
|
|
}
|
|
|
|
/********************************************************************
|
|
Name: imap_TSendText
|
|
Input: 1) RPath: return path of the message
|
|
Is used to fill the "Return-Path" and the
|
|
"X-Sender" fields of the message.
|
|
2) Subject: Subject field of the message. If NULL is given
|
|
the subject is set to "No Subject"
|
|
3) mailTo: Destination address
|
|
4) data: Null terminated string containing the data to be send.
|
|
5) headers: Null terminated string containing extra headers
|
|
6) mailCc: Additional destination addresses
|
|
7) mailBcc: Send the mail to these addresses as well, but do not
|
|
list these in the headers
|
|
Output: Error code or SUCCESS
|
|
Description:
|
|
Author/Date: fmk/12-13-2001
|
|
History:
|
|
********************************************************************/
|
|
int imap_SendText(char *RPath, char *Subject, char *mailTo, char *data, char *headers, char *mailCc, char *mailBcc)
|
|
{
|
|
int res, i;
|
|
char *p;
|
|
char *tempMailTo;
|
|
ADDRESS *addr;
|
|
char *server_response = NULL;
|
|
|
|
/* check for NULL parameters */
|
|
if (data == NULL)
|
|
return (BAD_MSG_CONTENTS);
|
|
if (mailTo == NULL)
|
|
return (BAD_MSG_DESTINATION);
|
|
if (RPath == NULL)
|
|
return (BAD_MSG_RPATH);
|
|
|
|
/* simple checks for the mailto address */
|
|
/* have ampersand ? */
|
|
if (strchr(mailTo, '@') == NULL)
|
|
return (BAD_MSG_DESTINATION);
|
|
|
|
sprintf(Buffer, "HELO %s\r\n", LocalHost);
|
|
|
|
/* in the beggining of the dialog */
|
|
/* attempt reconnect if the first Post fail */
|
|
if ((res = Post(Buffer)) != SUCCESS) {
|
|
MailConnect();
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
}
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
|
|
sprintf(Buffer, "MAIL FROM:<%s>\r\n", RPath);
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
|
|
// Send mail to all rcpt's
|
|
tempMailTo = estrdup(mailTo); // rfc822_parse_adrlist will change the string
|
|
addr = NULL;
|
|
rfc822_parse_adrlist(&addr, tempMailTo, NULL);
|
|
while (addr) {
|
|
if (strcmp(addr->host, ERRHOST) == 0)
|
|
return (BAD_MSG_DESTINATION);
|
|
else {
|
|
sprintf(Buffer, "RCPT TO:<%s@%s>\r\n", addr->mailbox, addr->host);
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
}
|
|
addr = addr->next;
|
|
}
|
|
efree(tempMailTo);
|
|
|
|
/* Send mail to all Cc rcpt's */
|
|
if (mailCc && *mailCc) {
|
|
tempMailTo = estrdup(mailCc);
|
|
addr = NULL;
|
|
rfc822_parse_adrlist(&addr, tempMailTo, NULL);
|
|
while (addr) {
|
|
if (strcmp(addr->host, ERRHOST) == 0)
|
|
return (BAD_MSG_DESTINATION);
|
|
else {
|
|
sprintf(Buffer, "RCPT TO:<%s@%s>\r\n", addr->mailbox, addr->host);
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
}
|
|
addr = addr->next;
|
|
}
|
|
efree(tempMailTo);
|
|
}
|
|
|
|
if (mailBcc && *mailBcc) {
|
|
tempMailTo = estrdup(mailBcc);
|
|
addr = NULL;
|
|
rfc822_parse_adrlist(&addr, tempMailTo, NULL);
|
|
while (addr) {
|
|
if (strcmp(addr->host, ERRHOST) == 0)
|
|
return (BAD_MSG_DESTINATION);
|
|
else {
|
|
sprintf(Buffer, "RCPT TO:<%s@%s>\r\n", addr->mailbox, addr->host);
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
}
|
|
addr = addr->next;
|
|
}
|
|
efree(tempMailTo);
|
|
}
|
|
|
|
if ((res = Post("DATA\r\n")) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
|
|
|
|
// send message header
|
|
if (Subject == NULL)
|
|
res = PostHeader(RPath, "No Subject", mailTo, headers, mailCc);
|
|
else
|
|
res = PostHeader(RPath, Subject, mailTo, headers, mailCc);
|
|
if (res != SUCCESS)
|
|
return (res);
|
|
|
|
|
|
/* send message contents in 1024 chunks */
|
|
if (strlen(data) <= 1024) {
|
|
if ((res = Post(data)) != SUCCESS)
|
|
return (res);
|
|
} else {
|
|
p = data;
|
|
while (1) {
|
|
if (*p == '\0')
|
|
break;
|
|
if (strlen(p) >= 1024)
|
|
i = 1024;
|
|
else
|
|
i = strlen(p);
|
|
|
|
/* put next chunk in buffer */
|
|
strncpy(Buffer, p, i);
|
|
Buffer[i] = '\0';
|
|
p += i;
|
|
|
|
/* send chunk */
|
|
if ((res = Post(Buffer)) != SUCCESS)
|
|
return (res);
|
|
}
|
|
}
|
|
|
|
/*send termination dot */
|
|
if ((res = Post("\r\n.\r\n")) != SUCCESS)
|
|
return (res);
|
|
if ((res = Ack(NULL)) != SUCCESS)
|
|
return (res);
|
|
|
|
return (SUCCESS);
|
|
}
|