|
|
| version 1.91, 2003/11/04 12:29:16 | version 1.133, 2017/02/07 22:00:28 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b mail parser class. | Parser: @b mail parser class. |
| Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001-2017 Art. Lebedev Studio (http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) |
| */ | */ |
| static const char* IDENT_MAIL_C="$Date$"; | |
| #include "pa_config_includes.h" | #include "pa_config_includes.h" |
| #include "pa_vmethod_frame.h" | #include "pa_vmethod_frame.h" |
| Line 19 static const char* IDENT_MAIL_C="$Date$" | Line 17 static const char* IDENT_MAIL_C="$Date$" |
| #include "pa_uue.h" | #include "pa_uue.h" |
| #include "pa_vmail.h" | #include "pa_vmail.h" |
| #ifdef _MSC_VER | #include "smtp.h" |
| # include "smtp/smtp.h" | |
| #endif | volatile const char * IDENT_MAIL_C="$Id$"; |
| // defines | // defines |
| Line 45 public: | Line 43 public: |
| // global variable | // global variable |
| DECLARE_CLASS_VAR(mail, 0/*fictive*/, new MMail); | DECLARE_CLASS_VAR(mail, new MMail); |
| // defines for statics | // defines for statics |
| Line 58 static const String mail_sendmail_name(S | Line 56 static const String mail_sendmail_name(S |
| // helpers | // helpers |
| static void sendmail(Request& r, | static void sendmail( |
| const String& message, | Value* |
| const String* from, const String* to, | #ifndef WIN32 |
| const String* options) { | vmail_conf |
| const char* message_cstr=message.cstr(String::L_UNSPECIFIED); | #endif |
| Value* vmail_conf=static_cast<Value*>(r.classes_conf.get(mail_base_class->name())); | , Value* smtp_server_port, |
| const String& message, | |
| const String* from, | |
| const String* to, | |
| const String* | |
| #ifndef WIN32 | |
| options | |
| #endif | |
| ) { | |
| const char* exception_type="email.format"; | const char* exception_type="email.format"; |
| if(!from) // we use in sendmail -f {from} && SMTP MAIL from: {from} | if(!from) // we use in sendmail -f {from} && SMTP MAIL from: {from} |
| throw Exception(exception_type, | throw Exception(exception_type, |
| 0, | 0, |
| "parameter does not specify 'from' header field"); | "parameter does not specify 'from' header field"); |
| #ifdef _MSC_VER | const char* message_cstr=message.untaint_cstr(String::L_AS_IS); |
| if(!to) // we use only in SMTP RCPT to: {to} | |
| throw Exception(exception_type, | |
| 0, | |
| "parameter does not specify 'to' header field"); | |
| SMTP smtp; | if(smtp_server_port) { |
| Value* server_port; | if(!to) // we use only in SMTP RCPT to: {to} |
| // $MAIN:MAIL.SMTP[mail.yourdomain.ru[:port]] | throw Exception(exception_type, |
| if(vmail_conf && | 0, |
| (server_port=vmail_conf->get_hash()->get(String::Body("SMTP")))) { | "parameter does not specify 'to' header field"); |
| char* server=server_port->as_string().cstrm(); | |
| SMTP smtp; | |
| char* server=smtp_server_port->as_string().cstrm(); | |
| const char* port=rsplit(server, ':'); | const char* port=rsplit(server, ':'); |
| if(!port) | if(!port) |
| port="25"; | port="25"; |
| smtp.Send(server, port, message_cstr, from->cstrm(), to->cstrm()); | smtp.Send(server, port, message_cstr, from->cstrm(), to->cstrm()); |
| } else | return; |
| throw Exception("parser.runtime", | } |
| 0, | |
| "$"MAIN_CLASS_NAME":"MAIL_NAME".SMTP not defined"); | #ifdef WIN32 |
| // win32 without SMTP server configured | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "$" MAIN_CLASS_NAME ":" MAIL_NAME ".SMTP not defined"); | |
| #else | #else |
| // unix | // unix |
| // $MAIN:MAIL.sendmail["/usr/sbin/sendmail -t -i -f postmaster"] default | // $MAIN:MAIL.sendmail["/usr/sbin/sendmail -t -i -f postmaster"] default |
| // $MAIN:MAIL.sendmail["/usr/lib/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) { | if(vmail_conf) { |
| #ifdef PA_FORCED_SENDMAIL | #ifdef PA_FORCED_SENDMAIL |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "Parser was configured with --with-sendmail="PA_FORCED_SENDMAIL | "Parser was configured with --with-sendmail=" PA_FORCED_SENDMAIL |
| " key, to change sendmail you should reconfigure and recompie it"); | " key, to change sendmail you should reconfigure and recompie it"); |
| #else | #else |
| if(Value* sendmail_value=vmail_conf->get_hash()->get(mail_sendmail_name)) | if(Value* sendmail_value=vmail_conf->get_hash()->get(mail_sendmail_name)) |
| sendmail_command=&sendmail_value->as_string(); | *sendmail_command<<sendmail_value->as_string(); |
| else | else |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "$"MAIN_CLASS_NAME":"MAIL_NAME"."SENDMAIL_NAME" not defined"); | "$" MAIN_CLASS_NAME ":" MAIL_NAME "." SENDMAIL_NAME " not defined"); |
| #endif | #endif |
| } else { | } else { |
| #ifdef PA_FORCED_SENDMAIL | #ifdef PA_FORCED_SENDMAIL |
| sendmail_command=new String(PA_FORCED_SENDMAIL); | *sendmail_command<<PA_FORCED_SENDMAIL; |
| #else | #else |
| String* test=new String("/usr/sbin/sendmail"); | String* test=new String("/usr/sbin/sendmail"); |
| if(!file_executable(*test)) | if(!file_executable(*test)) |
| test=new String("/usr/lib/sendmail"); | test=new String("/usr/lib/sendmail"); |
| *test<<" -t -i -f postmaster"; | *sendmail_command<<*test; |
| sendmail_command=test; | *sendmail_command<<" -t -i -f postmaster"; |
| #endif | #endif |
| } | } |
| if(options) | if(options) |
| sendmail_command<<" "<<*options; | *sendmail_command<<" "<<*options; |
| // we know sendmail_command here, should replace "postmaster" with "$from" from message | // we know sendmail_command here, should replace "postmaster" with "$from" from message |
| size_t at_postmaster=sendmail_command->pos("postmaster"); | size_t at_postmaster=sendmail_command->pos("postmaster"); |
| Line 142 static void sendmail(Request& r, | Line 149 static void sendmail(Request& r, |
| if(after_file_spec==STRING_NOT_FOUND || after_file_spec==0) | if(after_file_spec==STRING_NOT_FOUND || after_file_spec==0) |
| file_spec=sendmail_command; | file_spec=sendmail_command; |
| else { | else { |
| size_t pos_after=after_file_spec; | file_spec=&sendmail_command->mid(0, after_file_spec); |
| file_spec=&sendmail_command->mid(0, pos_after++); | sendmail_command->split(argv, after_file_spec+1, " ", String::L_AS_IS); |
| sendmail_command->split(argv, pos_after, " ", String::L_AS_IS); | |
| } | } |
| if(!file_executable(*file_spec)) | if(!file_executable(*file_spec)) |
| Line 154 static void sendmail(Request& r, | Line 160 static void sendmail(Request& r, |
| #ifdef PA_FORCED_SENDMAIL | #ifdef PA_FORCED_SENDMAIL |
| " Use configure key \"--with-sendmail=appropriate sendmail command\"" | " Use configure key \"--with-sendmail=appropriate sendmail command\"" |
| #else | #else |
| " Set $"MAIN_CLASS_NAME":"MAIL_NAME"."SENDMAIL_NAME" to appropriate sendmail command" | " Set $" MAIN_CLASS_NAME ":" MAIL_NAME "." SENDMAIL_NAME " to appropriate sendmail command" |
| #endif | #endif |
| ); | ); |
| String in(message_cstr); String out; String err; | |
| PA_exec_result exec=pa_exec( | PA_exec_result exec=pa_exec( |
| // forced_allow | // forced_allow |
| #ifdef PA_FORCED_SENDMAIL | #ifdef PA_FORCED_SENDMAIL |
| Line 170 static void sendmail(Request& r, | Line 174 static void sendmail(Request& r, |
| , *file_spec, | , *file_spec, |
| 0 /* pass env */, | 0 /* pass env */, |
| argv, | argv, |
| in); | String::C(message_cstr, strlen(message_cstr))); |
| if(exec.status || exec.err.length()) | if(exec.status || exec.err.length()) |
| throw Exception("email.send", | throw Exception("email.send", 0, "'%s' reported problem: %s (%d)", file_spec->cstr(), exec.err.length() ? exec.err.cstr() : "UNKNOWN", exec.status); |
| 0, | #endif //WIN32 |
| "'%s' reported problem: %s (%d)", | |
| file_spec->cstr(), | |
| exec.err.length()?exec.err.cstr():"UNKNOWN", | |
| exec.status); | |
| #endif | |
| } | } |
| // methods | // methods |
| static void _send(Request& r, MethodParams& params) { | static void _send(Request& r, MethodParams& params) { |
| Value& vhash=params.as_no_junction(0, "message must not be code"); | HashStringValue* hash=params.as_hash(0, "message"); |
| HashStringValue* hash=vhash.get_hash(); | if(!hash || !hash->count()) |
| if(!hash) | return; |
| throw Exception("parser.runtime", | // todo@ check if enough options are specified. |
| 0, | // now ^mail:send[^hash::create[]] and ^mail:send[$.print-debug(1)] "work". |
| "message must be hash"); | |
| const String* soptions=0; | const String* soptions=0; |
| if(Value* voptions=hash->get(MAIL_OPTIONS_NAME)) | if(Value* voptions=hash->get(MAIL_OPTIONS_NAME)) |
| soptions=&voptions->as_string(); | 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<Value*>(r.classes_conf.get(mail_class->type())); | |
| Value* smtp_server_port=0; | |
| if(vmail_conf) { | |
| // $MAIN:MAIL.SMTP[mail.yourdomain.ru[:port]] | |
| smtp_server_port=vmail_conf->get_hash()->get("SMTP"); | |
| } | |
| const String* from=0; | const String* from=0; |
| String* to=0; | String* to=0; |
| const String& message= | const String& message= |
| GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from, | GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from, |
| #ifdef WIN32 | smtp_server_port?true:false /*send by SMTP=strip to?*/, to); |
| true | |
| #else | |
| false | |
| #endif | |
| , to); | |
| //r.write_pass_lang(message); | if(print_debug) |
| sendmail(r, message, from, to, soptions); | r.write(message); |
| else | |
| sendmail(vmail_conf, smtp_server_port, message, from, to, soptions); | |
| } | } |
| // constructor & configurator | // constructor & configurator |
| Line 220 MMail::MMail(): Methoded(MAIL_CLASS_NAME | Line 228 MMail::MMail(): Methoded(MAIL_CLASS_NAME |
| void MMail::configure_user(Request& r) { | void MMail::configure_user(Request& r) { |
| // $MAIN:MAIL[$SMTP[mail.design.ru]] | // $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()) | if(mail_element->get_hash()) |
| r.classes_conf.put(name(), mail_element); | r.classes_conf.put(type(), mail_element); |
| else | else |
| if( !mail_element->is_string() ) | if( !mail_element->is_string() ) |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "$" MAIL_CLASS_NAME ":" MAIL_NAME " is not hash"); | "$" MAIL_CLASS_NAME ":" MAIL_NAME " is not hash"); |
| } | |
| } | } |