Merge branch 'release/0.5.3'

Author: hugoduncan

README.md

@@ -133,7 +133,7 @@ A: Probably a disk full, or permission error.
 Via [clojars](http://clojars.org) and
 [Leiningen](http://github.com/technomancy/leiningen).
 
-    :dependencies [clj-ssh "0.5.2"]
+    :dependencies [clj-ssh "0.5.3"]
 
 or your favourite maven repository aware tool.
 

ReleaseNotes.md

@@ -1,6 +1,12 @@
 # Release Notes
 
-Current release is 0.5.2
+Current release is 0.5.3
+
+## 0.5.3
+
+- Add ssh/exit-status for querying exit code
+
+- Add type hints to session functions
 
 ## 0.5.2
 

project.clj

@@ -1,4 +1,4 @@
-(defproject clj-ssh "0.5.2"
+(defproject clj-ssh "0.5.3"
   :description "Library for using SSH from clojure."
   :url "https://github.com/hugoduncan/clj-ssh"
   :license {:name "Eclipse Public License"

src/clj_ssh/ssh.clj

@@ -233,7 +233,7 @@
         (add-identity agent options)))))
 
 ;;; Sessions
-(defn- session-impl
+(defn- ^Session session-impl
   [^JSch agent hostname username port ^String password options]
   (let [session (.getSession agent username hostname port)]
     (when password
@@ -247,7 +247,7 @@
        (as-string v)))
     session))
 
-(defn session
+(defn ^Session session
   "Start a SSH session.
 Requires hostname.  you can also pass values for :username, :password and :port
 keys.  All other option key pairs will be passed as SSH config options."
@@ -388,6 +388,11 @@ keys.  All other option key pairs will be passed as SSH config options."
   [^Session session]
   (open-channel session :shell))
 
+(defn exit-status
+  "Return the exit status of a channel."
+  [^Channel channel]
+  (.getExitStatus channel))
+
 (def
   ^{:dynamic true
     :doc (str "The buffer size (in bytes) for the piped stream used to implement