mirror of
https://github.com/php/php-src.git
synced 2024-10-06 09:16:11 +00:00
257de2bade
sub-directories and started to move extension code into ext/<name>. For now, I have moved the "standard" extension (which is quite a mix of everything right now) and the GD extension into their own subdirs in ext/. The configure script now also runs configure in the libzend directory automatically and makes sure php4 and libzend use the same config.cache file. To avoid running configure in libzend, use the --no-recursion option. "make" in php4 also builds libzend now. The Apache module doesn't compile right now, but a fix for that is coming up.
189 lines
5.0 KiB
C
189 lines
5.0 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP HTML Embedded Scripting Language Version 3.0 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997,1998 PHP Development Team (See Credits file) |
|
|
+----------------------------------------------------------------------+
|
|
| This program is free software; you can redistribute it and/or modify |
|
|
| it under the terms of one of the following licenses: |
|
|
| |
|
|
| A) the GNU General Public License as published by the Free Software |
|
|
| Foundation; either version 2 of the License, or (at your option) |
|
|
| any later version. |
|
|
| |
|
|
| B) the PHP License as published by the PHP Development Team and |
|
|
| included in the distribution in the file: LICENSE |
|
|
| |
|
|
| This program is distributed in the hope that it will be useful, |
|
|
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
|
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
|
| GNU General Public License for more details. |
|
|
| |
|
|
| You should have received a copy of both licenses referred to here. |
|
|
| If you did not, or have any questions about PHP licensing, please |
|
|
| contact core@php.net. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: |
|
|
| |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#include <stdlib.h>
|
|
#include <ctype.h>
|
|
#include <stdio.h>
|
|
#ifdef THREAD_SAFE
|
|
#include "tls.h"
|
|
#endif
|
|
#include "php.h"
|
|
#ifndef MSVC5
|
|
#include "build-defs.h"
|
|
#endif
|
|
#include "php3_mail.h"
|
|
#include "php_ini.h"
|
|
|
|
#if APACHE
|
|
# ifndef DEBUG
|
|
# undef palloc
|
|
# endif
|
|
#endif
|
|
|
|
#if HAVE_SENDMAIL
|
|
#if MSVC5
|
|
#include "win32/sendmail.h"
|
|
#endif
|
|
|
|
function_entry mail_functions[] = {
|
|
{"mail", php3_mail, NULL},
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
php3_module_entry mail_module_entry = {
|
|
"Sendmail", mail_functions, NULL, NULL, NULL, NULL, php3_info_mail, STANDARD_MODULE_PROPERTIES
|
|
};
|
|
|
|
|
|
#if COMPILE_DL
|
|
DLEXPORT php3_module_entry *get_module(void) { return &odbc_module_entry; }
|
|
#endif
|
|
|
|
/* {{{ proto int mail(string to, string subject, string message [, string additional_headers])
|
|
Send an email message */
|
|
void php3_mail(INTERNAL_FUNCTION_PARAMETERS)
|
|
{
|
|
pval *argv[4];
|
|
char *to=NULL, *message=NULL, *headers=NULL, *subject=NULL;
|
|
int argc;
|
|
TLS_VARS;
|
|
|
|
argc = ARG_COUNT(ht);
|
|
if (argc < 3 || argc > 4 || getParametersArray(ht, argc, argv) == FAILURE) {
|
|
WRONG_PARAM_COUNT;
|
|
}
|
|
/* To: */
|
|
convert_to_string(argv[0]);
|
|
if (argv[0]->value.str.val) {
|
|
to = argv[0]->value.str.val;
|
|
} else {
|
|
php3_error(E_WARNING, "No to field in mail command");
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
/* Subject: */
|
|
convert_to_string(argv[1]);
|
|
if (argv[1]->value.str.val) {
|
|
subject = argv[1]->value.str.val;
|
|
} else {
|
|
php3_error(E_WARNING, "No subject field in mail command");
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
/* message body */
|
|
convert_to_string(argv[2]);
|
|
if (argv[2]->value.str.val) {
|
|
message = argv[2]->value.str.val;
|
|
} else {
|
|
/* this is not really an error, so it is allowed. */
|
|
php3_error(E_WARNING, "No message string in mail command");
|
|
message = NULL;
|
|
}
|
|
|
|
if (argc == 4) { /* other headers */
|
|
convert_to_string(argv[3]);
|
|
headers = argv[3]->value.str.val;
|
|
}
|
|
|
|
if (_php3_mail(to, subject, message, headers)){
|
|
RETURN_TRUE;
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
int _php3_mail(char *to, char *subject, char *message, char *headers)
|
|
{
|
|
#if MSVC5
|
|
int tsm_err;
|
|
#else
|
|
FILE *sendmail;
|
|
int ret;
|
|
char *sendmail_path = INI_STR("sendmail_path");
|
|
#endif
|
|
|
|
#if MSVC5
|
|
if (TSendMail(INI_STR("SMTP"), &tsm_err, headers, subject, to, message) != SUCCESS){
|
|
php3_error(E_WARNING, GetSMErrorText(tsm_err));
|
|
return 0;
|
|
}
|
|
#else
|
|
if (!sendmail_path) {
|
|
return 0;
|
|
}
|
|
sendmail = popen(sendmail_path, "w");
|
|
|
|
if (sendmail) {
|
|
fprintf(sendmail, "To: %s\n", to);
|
|
fprintf(sendmail, "Subject: %s\n", subject);
|
|
if (headers != NULL) {
|
|
fprintf(sendmail, "%s\n", headers);
|
|
}
|
|
fprintf(sendmail, "\n%s\n", message);
|
|
ret = pclose(sendmail);
|
|
if (ret == -1) {
|
|
return 0;
|
|
} else {
|
|
return 1;
|
|
}
|
|
} else {
|
|
php3_error(E_WARNING, "Could not execute mail delivery program");
|
|
return 0;
|
|
}
|
|
#endif
|
|
return 1;
|
|
}
|
|
|
|
void php3_info_mail(void)
|
|
{
|
|
#if MSVC5
|
|
PUTS("Internal Sendmail support for Windows 4");
|
|
#else
|
|
php3_printf("Path to sendmail: <tt>%s</tt>", INI_STR("sendmail_path"));
|
|
#endif
|
|
}
|
|
|
|
#else
|
|
|
|
void php3_mail(INTERNAL_FUNCTION_PARAMETERS) {}
|
|
void php3_info_mail() {}
|
|
|
|
#endif
|
|
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* End:
|
|
*/
|