* file error bug in smtpmail / starttls (smtpmail maintainer indicates it's an emacs bug)
@ 2003-11-20 16:54 John Owens
0 siblings, 0 replies; only message in thread
From: John Owens @ 2003-11-20 16:54 UTC (permalink / raw)
Cc: John Owens
I am trying to get smtpmail with queueing working with starttls. This
is on OS X 10.3.1 with the latest (yesterday) CVS version of emacs. I
have had an email discussion with the smtpmail maintainer Simon
Josefsson and he has indicated it's an emacs internal error (listed at
the very end of the message), and suggested I send it to the emacs dev
list. I am including as much information below as I can including an
edebug run. Please let me know if there's anything more I can provide.
The server is saying STARTTLS but it doesn't seem to be doing anything
on my client. I have credentials (no certs) set for starttls but
nothing for auth (since I want starttls).
Any suggestions anyone may have would be appreciated.
JDO
==========
220 strat.ece.ucdavis.edu ESMTP Sendmail 8.12.8/8.12.8; Fri, 31 Oct
2003 18:19:46 -0800
EHLO fanta.ece.ucdavis.edu
250-strat.ece.ucdavis.edu Hello fanta.ece.ucdavis.edu [169.237.74.29],
pleased to meet you
250-ENHANCEDSTATUSCODES
250-PIPELINING
250-EXPN
250-VERB
250-8BITMIME
250-SIZE
250-DSN
250-ETRN
250-AUTH LOGIN PLAIN
250-STARTTLS
250-DELIVERBY
250 HELP
VERB
250 2.0.0 Verbose mode
MAIL FROM:<jowens <at> ece.ucdavis.edu> SIZE=323
250 2.1.0 <jowens <at> ece.ucdavis.edu>... Sender ok
RCPT TO:<jowens <at> graphics.stanford.edu>
550 5.7.1 <jowens <at> graphics.stanford.edu>... Relaying denied.
Proper
authentication required.
QUIT
221 2.0.0 strat.ece.ucdavis.edu closing connection
==========
(setq user-full-name "John Owens"
user-mail-address "jowens <at> ece.ucdavis.edu"
smtpmail-default-smtp-server "strat.ece.ucdavis.edu"
smtpmail-smtp-server "strat.ece.ucdavis.edu"
smtpmail-smtp-service 587
smtpmail-starttls-credentials
'(("strat.ece.ucdavis.edu" 587 nil nil)) ;; have also tried with
;; "" "" instead of nil nil
starttls-program "/usr/local/bin/starttls"
mail-host-address "ece.ucdavis.edu"
smtpmail-local-domain nil
smtpmail-sendto-domain nil
smtpmail-smtp-service "smtp"
smtpmail-code-conv-from nil
smtpmail-queue-mail t
send-mail-function 'smtpmail-send-it
message-send-mail-function 'smtpmail-send-it
smtpmail-debug-info t ; only to debug problems
smtpmail-debug-verb t ; only to debug problems
vm-frame-per-composition nil
)
==========
[fanta:~] jowens% which starttls
/usr/local/bin/starttls
[fanta:~] jowens% starttls
starttls (starttls) 0.9
Copyright (C) 1999 Free Software Foundation, Inc.
This program comes with ABSOLUTELY NO WARRANTY.
This is free software, and you are welcome to redistribute it
under certain conditions. See the file COPYING for details.
Usage: starttls [options] host port
Options:
--cert-file [file] specify certificate file
--key-file [file] specify private key file
--verify [level] set verification level
[fanta:~] jowens% find /usr/local -name starttls\* -print
/usr/local/bin/starttls
/usr/local/share/emacs/21.3.50/lisp/gnus/starttls.el
/usr/local/share/emacs/21.3.50/lisp/gnus/starttls.elc
/usr/local/share/emacs/site-lisp/starttls.el
/usr/local/share/emacs/site-lisp/starttls.elc
(I'm marking all the places edebug stops with a [#] and the values
emitted there below the elisp function.)
(defun smtpmail-open-stream (process-buffer host port)
(let ((cred (smtpmail-find-credentials
smtpmail-starttls-credentials [1] host [2] port [3])[4]))
(if (null (and cred [5] (condition-case ()
(progn
(require 'starttls)
(call-process
starttls-program))
(error nil)))[6])[7]
;; The normal case.
(open-network-stream "SMTP" process-buffer [8] host [9] port [10])
(let* ((cred-key (smtpmail-cred-key cred))
(cred-cert (smtpmail-cred-cert cred))
(starttls-extra-args
(when (and (stringp cred-key) (stringp
cred-cert)
(file-regular-p
(setq cred-key
(expand-file-name cred-key)))
(file-regular-p
(setq cred-cert
(expand-file-name cred-cert))))
(list "--key-file" cred-key "--cert-file"
cred-cert))))
(starttls-open-stream "SMTP" process-buffer host port)))))
[1]: (("strat.ece.ucdavis.edu" 587 "" ""))
[2]: "strat.ece.ucdavis.edu"
[3]: "smtp"
[4]: nil
[5]: nil
[6]: nil
[7]: t
[8]: #<buffer *trace of SMTP session to strat.ece.ucdavis.edu*>
[9]: "strat.ece.ucdavis.edu"
[10]: "smtp"
Then the following:
File error: "make client process failed", "connection refused", :name,
"SMTP", :buffer, #<buffer *trace of SMTP session to
strat.ece.ucdavis.edu*>, :host,
"strat.ece.ucdavis.edu", :service, "smtp"
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2003-11-20 16:54 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-11-20 16:54 file error bug in smtpmail / starttls (smtpmail maintainer indicates it's an emacs bug) John Owens
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).