improve error message when file in local or git lib cant be read

Author: puredanger

CHANGELOG.md

@@ -3,6 +3,7 @@ Changelog
 
 * next
   * uber - exclude Emacs backup files from uberjar inclusion (useful with local/git deps)
+  * uber - improve error message when file in local or git lib can't be read
 * v0.9.3 e537cd1 on Feb 1, 2023
   * NO CHANGES - just moved Maven artifact to io.github.clojure groupId to match git dep
 * v0.9.2 fe6b140 on Jan 17, 2023

src/main/clojure/clojure/tools/build/tasks/uber.clj

@@ -16,7 +16,7 @@
     [clojure.tools.build.util.file :as file]
     [clojure.tools.build.util.zip :as zip])
   (:import
-    [java.io File InputStream FileInputStream BufferedInputStream
+    [java.io File InputStream FileInputStream BufferedInputStream IOException
              OutputStream FileOutputStream BufferedOutputStream ByteArrayOutputStream]
     [java.nio.file Files]
     [java.nio.file.attribute FileAttribute FileTime]
@@ -191,7 +191,12 @@
           fs (file/collect-files source-dir :dirs true)]
       (loop [[^File f & restf] fs, the-state state]
         (if f
-          (let [is (when (.isFile f) (jio/input-stream f))
+          (let [is (when (.isFile f)
+                     (try
+                       (jio/input-stream f)
+                       (catch IOException e
+                         (throw (ex-info (str "Uber task found file but can't read its content in " lib " at path " (.getPath f))
+                                         {:path (.getPath f)} e)))))
                 new-state (try
                             (let [path (.toString (.relativize source-path (.toPath f)))
                                   source-time (FileTime/fromMillis (.lastModified f))