Annotation of parser3/src/classes/mail.C, revision 1.89
1.1 paf 1: /** @file
2: Parser: @b mail parser class.
3:
1.89 ! paf 4: Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.54 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.73 paf 6: */
1.1 paf 7:
1.89 ! paf 8: static const char* IDENT_MAIL_C="$Date: 2003/04/03 10:48:24 $";
1.1 paf 9:
10: #include "pa_config_includes.h"
1.89 ! paf 11: #include "pa_vmethod_frame.h"
1.1 paf 12:
13: #include "pa_common.h"
14: #include "pa_request.h"
1.6 paf 15: #include "pa_vfile.h"
1.12 paf 16: #include "pa_exec.h"
1.45 paf 17: #include "pa_charsets.h"
18: #include "pa_charset.h"
1.67 paf 19: #include "pa_uue.h"
1.89 ! paf 20: #include "pa_vmail.h"
1.50 paf 21:
22: #ifdef _MSC_VER
23: # include "smtp/smtp.h"
24: #endif
1.4 paf 25:
1.23 paf 26: // defines
1.1 paf 27:
1.23 paf 28: #define MAIL_CLASS_NAME "mail"
1.89 ! paf 29: #define MAIL_SENDMAIL_NAME "sendmail"
1.25 paf 30:
1.67 paf 31: // consts
1.25 paf 32:
1.67 paf 33: const int ATTACHMENT_WEIGHT=100;
1.25 paf 34:
1.23 paf 35: // class
36:
1.89 ! paf 37: class MMail: public Methoded {
1.24 paf 38: public: // Methoded
1.67 paf 39: bool used_directly() { return false; }
1.68 paf 40: void configure_user(Request& r);
1.89 ! paf 41:
! 42: public:
! 43: MMail();
1.23 paf 44: };
1.1 paf 45:
1.89 ! paf 46: // global variable
1.7 paf 47:
1.89 ! paf 48: DECLARE_CLASS_VAR(mail, 0/*fictive*/, new MMail);
1.7 paf 49:
1.89 ! paf 50: // defines for statics
1.1 paf 51:
1.89 ! paf 52: #define MAIL_NAME "MAIL"
1.70 paf 53:
1.89 ! paf 54: // statics
! 55:
! 56: static const String mail_name(MAIL_NAME);
! 57: static const String mail_sendmail_name(MAIL_SENDMAIL_NAME);
1.22 paf 58:
1.89 ! paf 59: // helpers
1.47 paf 60:
1.89 ! paf 61: static void sendmail(Request& r,
! 62: const String& message,
! 63: const String* from, const String* to) {
! 64: const char* message_cstr=message.cstr(String::L_UNSPECIFIED);
! 65: Value* vmail_conf=static_cast<Value*>(r.classes_conf.get(mail_base_class->name()));
1.2 paf 66:
1.89 ! paf 67: const char* exception_type="email.format";
1.85 paf 68: if(!from) // we use in sendmail -f {from} && SMTP MAIL from: {from}
1.75 paf 69: throw Exception(exception_type,
1.89 ! paf 70: 0,
1.70 paf 71: "parameter does not specify 'from' header field");
1.85 paf 72:
73: #ifdef _MSC_VER
74: if(!to) // we use only in SMTP RCPT to: {to}
1.75 paf 75: throw Exception(exception_type,
1.89 ! paf 76: 0,
1.70 paf 77: "parameter does not specify 'to' header field");
1.4 paf 78:
1.89 ! paf 79: SMTP smtp;
! 80: Value* server_port;
1.29 parser 81: // $MAIN:MAIL.SMTP[mail.yourdomain.ru[:port]]
1.89 ! paf 82: if(vmail_conf &&
! 83: (server_port=vmail_conf->get_hash()->get(StringBody("SMTP")))) {
! 84: char* server=server_port->as_string().cstrm();
! 85: const char* port=rsplit(server, ':');
1.4 paf 86: if(!port)
1.11 paf 87: port="25";
1.4 paf 88:
1.89 ! paf 89: smtp.Send(server, port, message_cstr, from->cstrm(), to->cstrm());
1.4 paf 90: } else
1.60 paf 91: throw Exception("parser.runtime",
1.89 ! paf 92: 0,
1.13 paf 93: "$"MAIN_CLASS_NAME":"MAIL_NAME".SMTP not defined");
1.4 paf 94: #else
1.12 paf 95: // unix
1.70 paf 96: // $MAIN:MAIL.sendmail["/usr/sbin/sendmail -t -i -f postmaster"] default
97: // $MAIN:MAIL.sendmail["/usr/lib/sendmail -t -i -f postmaster"] default
1.12 paf 98:
1.89 ! paf 99: const String* sendmail_command;
! 100: if(vmail_conf) {
1.55 paf 101: #ifdef PA_FORCED_SENDMAIL
1.86 paf 102: throw Exception("parser.runtime",
1.89 ! paf 103: 0,
1.86 paf 104: "Parser was configured with --with-sendmail="PA_FORCED_SENDMAIL
1.87 paf 105: " key, to change sendmail you should reconfigure and recompie it");
1.55 paf 106: #else
1.89 ! paf 107: if(Value* sendmail_value=vmail_conf->get_hash()->get(mail_sendmail_name))
1.52 paf 108: sendmail_command=&sendmail_value->as_string();
1.51 paf 109: else
1.60 paf 110: throw Exception("parser.runtime",
1.89 ! paf 111: 0,
! 112: "$"MAIN_CLASS_NAME":"MAIL_NAME"."MAIL_SENDMAIL_NAME" not defined");
1.86 paf 113: #endif
1.51 paf 114: } else {
1.86 paf 115: #ifdef PA_FORCED_SENDMAIL
1.89 ! paf 116: sendmail_command=new String(PA_FORCED_SENDMAIL);
1.86 paf 117: #else
1.89 ! paf 118: String* test=new String("/usr/sbin/sendmail");
1.52 paf 119: if(!file_executable(*test))
1.89 ! paf 120: test=new String("/usr/lib/sendmail");
! 121: *test<<" -t -i -f postmaster";
1.52 paf 122: sendmail_command=test;
1.86 paf 123: #endif
1.51 paf 124: }
125:
1.70 paf 126: // we know sendmail_command here, should replace "postmaster" with "$from" from message
1.89 ! paf 127: size_t at_postmaster=sendmail_command->pos("postmaster");
! 128: if(at_postmaster!=STRING_NOT_FOUND) {
1.70 paf 129: String& reconstructed=sendmail_command->mid(0, at_postmaster);
1.71 paf 130: reconstructed << *from;
1.89 ! paf 131: reconstructed << sendmail_command->mid(at_postmaster+10/*postmaster*/, sendmail_command->length());
1.70 paf 132: sendmail_command=&reconstructed;
133: }
134:
135: // execute it
1.89 ! paf 136: ArrayString argv;
! 137: const String* file_spec;
! 138: size_t after_file_spec=sendmail_command->pos(' ');
! 139: if(after_file_spec==STRING_NOT_FOUND || after_file_spec==0)
1.52 paf 140: file_spec=sendmail_command;
1.51 paf 141: else {
1.52 paf 142: size_t pos_after=after_file_spec;
143: file_spec=&sendmail_command->mid(0, pos_after++);
1.89 ! paf 144: sendmail_command->split(argv, pos_after, " ", String::L_AS_IS);
1.36 parser 145: }
1.51 paf 146:
1.52 paf 147: if(!file_executable(*file_spec))
1.75 paf 148: throw Exception("email.send",
1.55 paf 149: file_spec,
150: "is not executable."
151: #ifdef PA_FORCED_SENDMAIL
1.59 paf 152: " Use configure key \"--with-sendmail=appropriate sendmail command\""
1.58 paf 153: #else
1.89 ! paf 154: " Set $"MAIN_CLASS_NAME":"MAIL_NAME"."MAIL_SENDMAIL_NAME" to appropriate sendmail command"
1.55 paf 155: #endif
156: );
157:
1.51 paf 158:
1.89 ! paf 159: String in(message_cstr); String out; String err;
! 160: PA_exec_result exec=pa_exec(
1.56 paf 161: // forced_allow
162: #ifdef PA_FORCED_SENDMAIL
163: true
164: #else
165: false
166: #endif
1.57 paf 167: , *file_spec,
1.89 ! paf 168: 0 /* pass env */,
! 169: argv,
! 170: in);
! 171: if(exec.status || exec.err.length())
1.75 paf 172: throw Exception("email.send",
1.89 ! paf 173: 0,
1.51 paf 174: "'%s' reported problem: %s (%d)",
175: file_spec->cstr(),
1.89 ! paf 176: exec.err.length()?exec.err.cstr():"UNKNOWN",
! 177: exec.status);
1.4 paf 178: #endif
179: }
180:
1.7 paf 181: // methods
182:
1.89 ! paf 183: static void _send(Request& r, MethodParams& params) {
! 184: Value& vhash=params.as_no_junction(0, "message must not be code");
! 185: HashStringValue* hash=vhash.get_hash();
1.1 paf 186: if(!hash)
1.60 paf 187: throw Exception("parser.runtime",
1.89 ! paf 188: 0,
1.1 paf 189: "message must be hash");
190:
1.89 ! paf 191: const String* from=0;
! 192: String* to=0;
! 193: const String& message=
! 194: GET_SELF(r, VMail).message_hash_to_string(r, hash, 0, from,
! 195: #ifdef WIN32
! 196: true
1.84 paf 197: #else
1.89 ! paf 198: false
1.84 paf 199: #endif
1.89 ! paf 200: , to);
1.1 paf 201:
1.67 paf 202: //r.write_pass_lang(message);
1.89 ! paf 203: sendmail(r, message, from, to);
1.6 paf 204: }
205:
1.24 paf 206: // constructor & configurator
1.23 paf 207:
1.89 ! paf 208: MMail::MMail(): Methoded(MAIL_CLASS_NAME) {
1.27 paf 209: // ^mail:send{hash}
1.23 paf 210: add_native_method("send", Method::CT_STATIC, _send, 1, 1);
1.68 paf 211: }
212:
213: void MMail::configure_user(Request& r) {
214:
215: // $MAIN:MAIL[$SMTP[mail.design.ru]]
1.89 ! paf 216: if(Value* mail_element=r.main_class.get_element(mail_name, r.main_class, false))
! 217: if(mail_element->get_hash())
! 218: r.classes_conf.put(name(), mail_element);
1.68 paf 219: else
1.69 paf 220: if( !mail_element->is_string() )
221: throw Exception("parser.runtime",
222: 0,
223: "$" MAIL_CLASS_NAME ":" MAIL_NAME " is not hash");
1.1 paf 224: }
E-mail:
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to mail.C CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [parser3project] / parser3 / src / classes