SMTP issue
in [TCL]
|
Prev: tcl/tk on Windows: "This application has requested the Runtime to terminate it in an unusual way" on quit
Next: Getting pipe's stderr, but not stdout?
From: Robert Hicks on 21 Apr 2006 12:19 Even better! The SMTP server refused my "message", even though I got 250 status messages from everything. Gives me something to go by... Robert
From: Robert Hicks on 26 Apr 2006 09:51 Here is an oddity. I created a Perl script that does the exact same thing using the Mail::Sender module and it works. Where as the Tcl program does not. Robert
From: Robert Hicks on 26 Apr 2006 10:24 This is the debug output: Trying [IP ADDRESS]... <-- 220 [GATEWAY] Microsoft ESMTP MAIL Service, Version: 6.0.3790.1830 ready at Wed, 26 Apr 2006 1 0:19:27 -0400 --> EHLO lims-dev1 (wait upto 300 seconds) <-- 250-[GATEWAY] Hello [GATEWAY] <-- 250-TURN <-- 250-SIZE 10240000 <-- 250-ETRN <-- 250-PIPELINING <-- 250-DSN <-- 250-ENHANCEDSTATUSCODES <-- 250-8bitmime <-- 250-BINARYMIME <-- 250-CHUNKING <-- 250-VRFY <-- 250-X-EXPS GSSAPI NTLM LOGIN <-- 250-X-EXPS=LOGIN <-- 250-AUTH GSSAPI NTLM LOGIN <-- 250-AUTH=LOGIN <-- 250-X-LINK2STATE <-- 250-XEXCH50 <-- 250 OK --> MAIL FROM:<EMAIL ADDRESS> SIZE=490 (wait upto 600 seconds) <-- 250 2.1.0 <EMAIL ADDRESS>....Sender OK --> RCPT TO:<EMAIL ADDRESS> (wait upto 3600 seconds) <-- 250 2.1.5 <EMAIL ADDRESS> --> DATA (wait upto 300 seconds) <-- 354 Start mail input; end with <CRLF>.<CRLF> --> . (wait upto 120 seconds) <-- 550 5.7.1 Requested action not taken: message refused --> RSET (wait upto 0 seconds) --> QUIT (wait upto 0 seconds) key message-id not in header while executing "error "key $mixed not in header"" ("default" arm line 5) invoked from within "switch -- $key { "" { set result "" foreach lower $state(lowerL) mixed $state(mixedL) { lappend result..." (procedure "::mime::getheader" line 7) invoked from within "::mime::getheader $part ${message-idL} " invoked from within "smtp::sendmessage $token -originator $from -recipients $to -servers $server -debug 1" (procedure "sendMessage" line 12) invoked from within "sendMessage <EMAIL ADDRESS> <EMAIL ADDRESS> <SMTP SERVER> $msgSubj $msgBody" (file "./fstats.tcl" line 25) Maybe a bug in the SMTP module itself??? Robert
From: MH on 26 Apr 2006 13:59
In article <1146061467.687376.208970(a)u72g2000cwu.googlegroups.com>, Robert Hicks <sigzero(a)gmail.com> wrote: >This is the debug output: > >Trying [IP ADDRESS]... ><-- 220 [GATEWAY] Microsoft ESMTP MAIL Service, Version: 6.0.3790.1830 >ready at Wed, 26 Apr 2006 1 >0:19:27 -0400 >--> EHLO lims-dev1 (wait upto 300 seconds) ><-- 250-[GATEWAY] Hello [GATEWAY] ><-- 250-TURN ><-- 250-SIZE 10240000 ><-- 250-ETRN ><-- 250-PIPELINING ><-- 250-DSN ><-- 250-ENHANCEDSTATUSCODES ><-- 250-8bitmime ><-- 250-BINARYMIME ><-- 250-CHUNKING ><-- 250-VRFY ><-- 250-X-EXPS GSSAPI NTLM LOGIN ><-- 250-X-EXPS=LOGIN ><-- 250-AUTH GSSAPI NTLM LOGIN ><-- 250-AUTH=LOGIN ><-- 250-X-LINK2STATE ><-- 250-XEXCH50 ><-- 250 OK >--> MAIL FROM:<EMAIL ADDRESS> SIZE=490 (wait upto 600 seconds) ><-- 250 2.1.0 <EMAIL ADDRESS>....Sender OK >--> RCPT TO:<EMAIL ADDRESS> (wait upto 3600 seconds) ><-- 250 2.1.5 <EMAIL ADDRESS> >--> DATA (wait upto 300 seconds) ><-- 354 Start mail input; end with <CRLF>.<CRLF> >--> . (wait upto 120 seconds) ><-- 550 5.7.1 Requested action not taken: message refused Well, this says to me that there's something wrong with authentication or addressing.. Compare the mail server logs from your perl script with your tcl script (turn debugging level up) and see what's different. Maybe one's authenticating? Maybe one's adding the domain automatically to the sender/recipient? MH |