[BACK]Return to mail.C CVS log [TXT] [DIR] Up to [parser3project] / parser3 / src / classes

Diff for /parser3/src/classes/mail.C between versions 1.89 and 1.113

version 1.89, 2003/07/24 11:31:20 version 1.113, 2009/08/08 13:30:20
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-2009 ArtLebedev Group (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$";  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 19  static const char* IDENT_MAIL_C="$Date$" Line 19  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  // debug switches
   
   //#define DEBUG_JUST_SEE_MESSAGE
   
 // defines  // defines
   
 #define MAIL_CLASS_NAME "mail"  #define MAIL_CLASS_NAME "mail"
 #define MAIL_SENDMAIL_NAME "sendmail"  #define SENDMAIL_NAME "sendmail"
   
 // consts  // consts
   
Line 54  DECLARE_CLASS_VAR(mail, 0/*fictive*/, ne Line 56  DECLARE_CLASS_VAR(mail, 0/*fictive*/, ne
 // statics  // statics
                   
 static const String mail_name(MAIL_NAME);  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  // helpers
   
 static void sendmail(Request& r,   static void sendmail(
                           Value* 
   #ifndef WIN32
                           vmail_conf
   #endif
                           , Value* smtp_server_port,
                      const String& message,                        const String& message, 
                      const String* from, const String* to) {                       const String* from, const String* to,
         const char* message_cstr=message.cstr(String::L_UNSPECIFIED);                           const String* 
         Value* vmail_conf=static_cast<Value*>(r.classes_conf.get(mail_base_class->name()));  #ifndef _MSC_VER
                            options
   #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");
           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                  SMTP smtp;
         if(!to) // we use only in SMTP RCPT to: {to}                  char* server=smtp_server_port->as_string().cstrm();
                 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();  
                 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");  #if 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"."MAIL_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)
                   *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 151  static void sendmail(Request& r, Line 163  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"."MAIL_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;          String in(message_cstr);
         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 184  static void _send(Request& r, MethodPara Line 196  static void _send(Request& r, MethodPara
         Value& vhash=params.as_no_junction(0, "message must not be code");          Value& vhash=params.as_no_junction(0, "message must not be code");
         HashStringValue* hash=vhash.get_hash();          HashStringValue* hash=vhash.get_hash();
         if(!hash)          if(!hash)
                 throw Exception("parser.runtime",                  throw Exception(PARSER_RUNTIME,
                         0,                          0,
                         "message must be hash");                          "message must be hash");
   
           const String* soptions=0;
           if(Value* voptions=hash->get(MAIL_OPTIONS_NAME))
                   soptions=&voptions->as_string();
   
           Value* vmail_conf=static_cast<Value*>(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;          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  
   #ifdef DEBUG_JUST_SEE_MESSAGE
           r.write_pass_lang(message);
 #else  #else
                         false          sendmail(vmail_conf, smtp_server_port, 
                   message, from, to, soptions);
 #endif  #endif
                         , to);  
   
         //r.write_pass_lang(message);  
         sendmail(r, message, from, to);  
 }  }
   
 // constructor & configurator  // constructor & configurator
Line 213  MMail::MMail(): Methoded(MAIL_CLASS_NAME Line 236  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
                         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");
 }  }
Removed from v.1.89  
changed lines
  Added in v.1.113

E-mail: