diff --git a/syndicate-ssh/ssh-message-types.rkt b/syndicate-ssh/ssh-message-types.rkt
index 40241ed..4657d27 100644
--- a/syndicate-ssh/ssh-message-types.rkt
+++ b/syndicate-ssh/ssh-message-types.rkt
@@ -27,6 +27,7 @@
 	 (struct-out ssh-msg-userauth-request)
 	 (struct-out ssh-msg-userauth-failure)
 	 (struct-out ssh-msg-userauth-success)
+	 (struct-out ssh-msg-userauth-banner)
 	 (struct-out ssh-msg-global-request)
 	 (struct-out ssh-msg-request-success)
 	 (struct-out ssh-msg-request-failure)
@@ -318,6 +319,10 @@
 
 (define-ssh-message-type ssh-msg-userauth-success SSH_MSG_USERAUTH_SUCCESS)
 
+(define-ssh-message-type ssh-msg-userauth-banner SSH_MSG_USERAUTH_BANNER
+  (string    message)
+  (string    language))
+
 (define-ssh-message-type ssh-msg-global-request SSH_MSG_GLOBAL_REQUEST
   (string    request-name)
   (boolean   want-reply?)
diff --git a/syndicate-ssh/ssh-session.rkt b/syndicate-ssh/ssh-session.rkt
index c0bc3a0..3570cca 100644
--- a/syndicate-ssh/ssh-session.rkt
+++ b/syndicate-ssh/ssh-session.rkt
@@ -333,7 +333,17 @@
             (at conn-ds
               (send! (outbound-packet (ssh-msg-service-accept service)))
               (with-incoming-task/react
-                (SSH_MSG_USERAUTH_REQUEST _ (ssh-msg-userauth-request $user-name $service-name _ _))
+                (SSH_MSG_USERAUTH_REQUEST _ (ssh-msg-userauth-request $user-name
+                                                                      $service-name
+                                                                      $method-name
+                                                                      $extension))
+                (log-info "SSH-MSG-USERAUTH-REQUEST ~s ~s ~s ~s"
+                          user-name
+                          service-name
+                          method-name
+                          extension)
+                (send! (outbound-packet
+                        (ssh-msg-userauth-banner #"Welcome to Racket SSH!\r\n" #"")))
                 (cond
                   [(and (positive? (bytes-length user-name))
                         (equal? service-name #"ssh-connection"))