File tree 6 files changed +14
-7
lines changed
6 files changed +14
-7
lines changed Original file line number Diff line number Diff line change 150
150
(log/info " Opening a new channel to receive a file using SCP." )
151
151
(let [fileinfo (Stat/newInstance )]
152
152
{:channel (block-return session
153
- (libssh2-scp/recv (:session session) remote-path fileinfo))
153
+ (libssh2-scp/recv2 (:session session) remote-path fileinfo))
154
154
:fileinfo fileinfo}))
155
155
156
156
(defn open-scp-send
Original file line number Diff line number Diff line change 5
5
; prefix since we have real namespaces in Clojure. Other constants defined in
6
6
; libssh2.h are replicated here without alteration.
7
7
8
- (def VERSION " 1.6 .0" )
8
+ (def VERSION " 1.7 .0" )
9
9
(def VERSION_MAJOR 1 )
10
- (def VERSION_MINOR 6 )
10
+ (def VERSION_MINOR 7 )
11
11
(def VERSION_PATCH 0 )
12
- (def VERSION_NUM 0x010600 )
13
- (def SSH_BANNER " SSH-1.0-libssh2_1.6 .0" )
12
+ (def VERSION_NUM 0x010700 )
13
+ (def SSH_BANNER " SSH-1.0-libssh2_1.7 .0" )
14
14
(def SSH_DEFAULT_BANNER SSH_BANNER )
15
15
(def SSH_DEFAULT_BANNER_WITH_CRLF (str SSH_DEFAULT_BANNER " \r\n " ))
16
16
Original file line number Diff line number Diff line change 4
4
(:require [net.n01se.clojure-jna :as jna])
5
5
(:import [com.sun.jna Pointer]))
6
6
7
- (def ^{:arglists '([session path sb])} recv
7
+ (def ^{:arglists '([session path sb]) :deprecated " libssh2 " } recv
8
8
"
9
9
LIBSSH2_CHANNEL *libssh2_scp_recv(LIBSSH2_SESSION *session,
10
10
const char *path,
11
11
struct stat *sb);"
12
12
(jna/to-fn Pointer ssh2/libssh2_scp_recv))
13
13
14
+ (def ^{:arglists '([session path sb])} recv2
15
+ "
16
+ LIBSSH2_CHANNEL *libssh2_scp_recv(LIBSSH2_SESSION *session,
17
+ const char *path,
18
+ libssh2_struct_stat *sb);"
19
+ (jna/to-fn Pointer ssh2/libssh2_scp_recv2))
20
+
14
21
(def ^{:arglists '([session path mode size mtime atime]) :deprecated " libssh2" } send-ex
15
22
"
16
23
LIBSSH2_CHANNEL *libssh2_scp_send_ex(LIBSSH2_SESSION *session,
Original file line number Diff line number Diff line change 7
7
8
8
(deftest check-libssh2-version-is-ok
9
9
" This shoudln't change by surprise!"
10
- (is (= " 1.6 .0" (libssh2/version 0 ))))
10
+ (is (= " 1.7 .0" (libssh2/version 0 ))))
You can’t perform that action at this time.
0 commit comments