|
|
| version 1.112, 2009/07/06 12:13:30 | version 1.118, 2012/03/16 09:24:07 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b mail parser class. | Parser: @b mail parser class. |
| Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001-2012 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 * const 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 21 static const char * const IDENT_MAIL_C=" | Line 19 static const char * const IDENT_MAIL_C=" |
| #include "smtp.h" | #include "smtp.h" |
| // debug switches | volatile const char * IDENT_MAIL_C="$Id$"; |
| //#define DEBUG_JUST_SEE_MESSAGE | |
| // defines | // defines |
| Line 66 static void sendmail( | Line 62 static void sendmail( |
| vmail_conf | vmail_conf |
| #endif | #endif |
| , Value* smtp_server_port, | , Value* smtp_server_port, |
| const String& message, | const String& message, |
| const String* from, const String* to, | const String* from, |
| const String* | const String* to, |
| const String* | |
| #ifndef _MSC_VER | #ifndef _MSC_VER |
| options | options |
| #endif | #endif |
| ) { | ) { |
| const char* message_cstr=message.untaint_cstr(String::L_AS_IS); | |
| 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"); |
| const char* message_cstr=message.untaint_cstr(String::L_AS_IS); | |
| if(smtp_server_port) { | if(smtp_server_port) { |
| if(!to) // we use only in SMTP RCPT to: {to} | if(!to) // we use only in SMTP RCPT to: {to} |
| throw Exception(exception_type, | throw Exception(exception_type, |
| Line 193 static void sendmail( | Line 191 static void sendmail( |
| // 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_no_junction(0, "message must not be code").get_hash(); |
| HashStringValue* hash=vhash.get_hash(); | |
| if(!hash) | if(!hash) |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| Line 204 static void _send(Request& r, MethodPara | Line 201 static void _send(Request& r, MethodPara |
| 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_base_class->name())); | Value* vmail_conf=static_cast<Value*>(r.classes_conf.get(mail_base_class->name())); |
| Value* smtp_server_port=0; | Value* smtp_server_port=0; |
| if(vmail_conf) { | if(vmail_conf) { |
| Line 218 static void _send(Request& r, MethodPara | Line 219 static void _send(Request& r, MethodPara |
| GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from, | GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from, |
| smtp_server_port?true:false /*send by SMTP=strip to?*/, to); | smtp_server_port?true:false /*send by SMTP=strip to?*/, to); |
| #ifdef DEBUG_JUST_SEE_MESSAGE | if(print_debug) |
| r.write_pass_lang(message); | r.write_pass_lang(message); |
| #else | else |
| sendmail(vmail_conf, smtp_server_port, | sendmail(vmail_conf, smtp_server_port, message, from, to, soptions); |
| message, from, to, soptions); | |
| #endif | |
| } | } |
| // constructor & configurator | // constructor & configurator |
| Line 236 MMail::MMail(): Methoded(MAIL_CLASS_NAME | Line 235 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(name(), mail_element); |
| else | else |