Re: pop access thru a firewall?

[Bill White <billw@wolfram.com>]

On Fri Oct 06 2000 at 09:20, ShengHuo ZHU <zsh@cs.rochester.edu> said:

  > I have a primitive package to workaround the firewall by advising
  > open-network-steam.  I haven't tested many features, but to access
  > POP3/NNTP via HTTP tunnel works. It is at

  >  http://www.cs.rochester.edu/u/zsh/hacks/firewall.el

dl'd and installed...

Here's my firewall and mail-sources setup:

,----[ ~/.gnus ]
| (add-to-list 'load-path "/billw/emacs/emacs-lisp/shenghuo-zhu")
| (require 'firewall)
| 
| ; First, you need setup 
| (setq firewall-gateway-host "proxy.wolfram.com")
| (setq firewall-gateway-port 8080)
| (ad-activate 'open-network-stream)
| ;;; 4. http 
| (setq firewall-gateway-function-list 
|  '(firewall-gateway-send-connect
|    firewall-gateway-wait-http))
|
| [...]
|
| (setq mail-sources
|       '((file :path "/var/spool/mail/billw")
|         (pop :server "pop.mail.yahoo.com" 
|              :user "myusername" 
|              :password "mypassword" 
|              :dontexpunge nil)))
| [...]
`----

It looks like a connection is successfully established, but I get a
"Timeout!", probably from from firewall-gateway-wait-http. 

Here's the POP trace buffer:

,----[ buffer " trace of POP session to pop.mail.yahoo.com" ]
| HTTP/1.0 200 Connection established
| 
| +OK hello from popgate
`----

The reply from yahoo seems to be different from what's expected in
firewall-gateway-wait-http:

,----[ firewall.el ]
| (defun firewall-gateway-wait-http (proc host service)
|   (firewall-wait-for-string "HTTP.* 200 OK\r*\n\r*\n" proc)
|   (delete-region (point-min) (point))
|   nil)
`----

Am I on the right path? Any thoughts?

Thanks for all your help!

bw
-- 
Bill White . billw@wolfram.com . http://members.wri.com/billw