--- parser3/src/classes/mail.C 2003/07/24 11:31:20 1.89 +++ parser3/src/classes/mail.C 2009/09/27 22:10:12 1.115 @@ -1,11 +1,11 @@ /** @file Parser: @b mail parser class. - Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com) + Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com) Author: Alexandr Petrosian (http://paf.design.ru) */ -static const char* IDENT_MAIL_C="$Date: 2003/07/24 11:31:20 $"; +static const char * const IDENT_MAIL_C="$Date: 2009/09/27 22:10:12 $"; #include "pa_config_includes.h" #include "pa_vmethod_frame.h" @@ -19,14 +19,12 @@ static const char* IDENT_MAIL_C="$Date: #include "pa_uue.h" #include "pa_vmail.h" -#ifdef _MSC_VER -# include "smtp/smtp.h" -#endif +#include "smtp.h" // defines #define MAIL_CLASS_NAME "mail" -#define MAIL_SENDMAIL_NAME "sendmail" +#define SENDMAIL_NAME "sendmail" // consts @@ -54,74 +52,85 @@ DECLARE_CLASS_VAR(mail, 0/*fictive*/, ne // statics static const String mail_name(MAIL_NAME); -static const String mail_sendmail_name(MAIL_SENDMAIL_NAME); +static const String mail_sendmail_name(SENDMAIL_NAME); // helpers -static void sendmail(Request& r, - const String& message, - const String* from, const String* to) { - const char* message_cstr=message.cstr(String::L_UNSPECIFIED); - Value* vmail_conf=static_cast(r.classes_conf.get(mail_base_class->name())); +static void sendmail( + Value* +#ifndef WIN32 + vmail_conf +#endif + , Value* smtp_server_port, + const String& message, + const String* from, + const String* to, + const String* +#ifndef _MSC_VER + options +#endif + ) { + const char* message_cstr=message.untaint_cstr(String::L_AS_IS); const char* exception_type="email.format"; if(!from) // we use in sendmail -f {from} && SMTP MAIL from: {from} throw Exception(exception_type, 0, "parameter does not specify 'from' header field"); + if(smtp_server_port) { + if(!to) // we use only in SMTP RCPT to: {to} + throw Exception(exception_type, + 0, + "parameter does not specify 'to' header field"); -#ifdef _MSC_VER - if(!to) // we use only in SMTP RCPT to: {to} - throw Exception(exception_type, - 0, - "parameter does not specify 'to' header field"); - - SMTP smtp; - Value* server_port; - // $MAIN:MAIL.SMTP[mail.yourdomain.ru[:port]] - if(vmail_conf && - (server_port=vmail_conf->get_hash()->get(StringBody("SMTP")))) { - char* server=server_port->as_string().cstrm(); + SMTP smtp; + char* server=smtp_server_port->as_string().cstrm(); const char* port=rsplit(server, ':'); if(!port) port="25"; smtp.Send(server, port, message_cstr, from->cstrm(), to->cstrm()); - } else - throw Exception("parser.runtime", - 0, - "$"MAIN_CLASS_NAME":"MAIL_NAME".SMTP not defined"); + return; + } + +#if WIN32 + // win32 without SMTP server configured + throw Exception(PARSER_RUNTIME, + 0, + "$"MAIN_CLASS_NAME":"MAIL_NAME".SMTP not defined"); #else // unix // $MAIN:MAIL.sendmail["/usr/sbin/sendmail -t -i -f postmaster"] default // $MAIN:MAIL.sendmail["/usr/lib/sendmail -t -i -f postmaster"] default - const String* sendmail_command; + String* sendmail_command=new String; if(vmail_conf) { #ifdef PA_FORCED_SENDMAIL - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, "Parser was configured with --with-sendmail="PA_FORCED_SENDMAIL " key, to change sendmail you should reconfigure and recompie it"); #else if(Value* sendmail_value=vmail_conf->get_hash()->get(mail_sendmail_name)) - sendmail_command=&sendmail_value->as_string(); + *sendmail_command<as_string(); else - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, - "$"MAIN_CLASS_NAME":"MAIL_NAME"."MAIL_SENDMAIL_NAME" not defined"); + "$"MAIN_CLASS_NAME":"MAIL_NAME"."SENDMAIL_NAME" not defined"); #endif } else { #ifdef PA_FORCED_SENDMAIL - sendmail_command=new String(PA_FORCED_SENDMAIL); + *sendmail_command<pos("postmaster"); @@ -151,12 +160,12 @@ static void sendmail(Request& r, #ifdef PA_FORCED_SENDMAIL " Use configure key \"--with-sendmail=appropriate sendmail command\"" #else - " Set $"MAIN_CLASS_NAME":"MAIL_NAME"."MAIL_SENDMAIL_NAME" to appropriate sendmail command" + " Set $"MAIN_CLASS_NAME":"MAIL_NAME"."SENDMAIL_NAME" to appropriate sendmail command" #endif ); - String in(message_cstr); String out; String err; + String in(message_cstr); PA_exec_result exec=pa_exec( // forced_allow #ifdef PA_FORCED_SENDMAIL @@ -184,23 +193,36 @@ static void _send(Request& r, MethodPara Value& vhash=params.as_no_junction(0, "message must not be code"); HashStringValue* hash=vhash.get_hash(); if(!hash) - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, "message must be hash"); + const String* soptions=0; + if(Value* voptions=hash->get(MAIL_OPTIONS_NAME)) + soptions=&voptions->as_string(); + + bool print_debug=false; + if(Value* vdebug=hash->get(MAIL_DEBUG_NAME)) + print_debug=vdebug->as_bool(); + + Value* vmail_conf=static_cast(r.classes_conf.get(mail_base_class->name())); + Value* smtp_server_port=0; + if(vmail_conf) { + // $MAIN:MAIL.SMTP[mail.yourdomain.ru[:port]] + smtp_server_port=vmail_conf->get_hash()->get(String::Body("SMTP")); + } + + const String* from=0; String* to=0; const String& message= GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from, -#ifdef WIN32 - true -#else - false -#endif - , to); + smtp_server_port?true:false /*send by SMTP=strip to?*/, to); - //r.write_pass_lang(message); - sendmail(r, message, from, to); + if(print_debug) + r.write_pass_lang(message); + else + sendmail(vmail_conf, smtp_server_port, message, from, to, soptions); } // constructor & configurator @@ -213,12 +235,12 @@ MMail::MMail(): Methoded(MAIL_CLASS_NAME void MMail::configure_user(Request& r) { // $MAIN:MAIL[$SMTP[mail.design.ru]] - if(Value* mail_element=r.main_class.get_element(mail_name, r.main_class, false)) + if(Value* mail_element=r.main_class.get_element(mail_name)) if(mail_element->get_hash()) r.classes_conf.put(name(), mail_element); else if( !mail_element->is_string() ) - throw Exception("parser.runtime", + throw Exception(PARSER_RUNTIME, 0, "$" MAIL_CLASS_NAME ":" MAIL_NAME " is not hash"); }