Added tftp-new.lisp: my attempt to rewrite tftp.lisp