diff options
Diffstat (limited to 'modules/ssh/channel.scm')
| -rw-r--r-- | modules/ssh/channel.scm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/modules/ssh/channel.scm b/modules/ssh/channel.scm index 0dfd6a5..0fe4cb3 100644 --- a/modules/ssh/channel.scm +++ b/modules/ssh/channel.scm @@ -1,6 +1,6 @@ ;;; channel.scm -- API for SSH channel manipulation. -;; Copyright (C) 2013, 2014, 2015 Artyom V. Poptsov <poptsov.artyom@gmail.com> +;; Copyright (C) 2013, 2014, 2015, 2016 Artyom V. Poptsov <poptsov.artyom@gmail.com> ;; ;; This file is a part of Guile-SSH. ;; @@ -39,6 +39,7 @@ ;; channel-set-stream! ;; channel-get-stream ;; channel-open? +;; channel-send-eof! ;; channel-eof? @@ -66,6 +67,7 @@ channel-get-session channel-get-exit-status channel-open? + channel-send-eof! channel-eof?)) (define* (make-channel session #:optional (mode OPEN_BOTH)) @@ -114,6 +116,12 @@ channel, and the second value is a port number on which the connection was issued." (%channel-accept-forward session timeout)) +(define (channel-send-eof! channel) + "Send an end of file (EOF) on the CHANNEL. This action doesn't close the +channel; you may still read from it but not write. Throw 'guile-ssh-error' on +an error. Return value is undefined." + (%channel-send-eof! channel)) + ;;; |