[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Mail address as password for anonymous FTP



Many anonymous FTP sites like, and some require, the
user to send an e-mail address as the password.
Currently, the Symbolics software sends "FOO".
I've hacked the following to send a mail address:
if you edit SYS:IO;FILE-ACCESS-PATHS.LISP.194 and
search for "ANONYMOUS" (function is prompt-for-user-and-password), 
replace the next line with
 (let ((ma (send si:*user* :mail-address)))
     (format nil "~a@~a" (first ma) (send (second ma) :internet-domain-name))))

(I don't know how to handle a non-machine mail address,
maybe someone else has an idea.)

The acid test is :show directory ftp.uu.net:/*
They require a real e-mail address as password, so FOO doesn't work.

A late Xmas gift for SLUG; enjoy.


Liam M. Healy