Add support for filename-pattern on ns-group

CHANGELOG.md

@@ -10,6 +10,7 @@ For a list of breaking changes, check [here](#breaking-changes).
 - [#1771](https://github.com/clj-kondo/clj-kondo/issues/1771): don't crash on empty ns clauses: `(require '[])` and `(import '())` 
 - [#1774](https://github.com/clj-kondo/clj-kondo/issues/1774): Add support for sourcehut inferred git dep urls for the Clojure CLI
 - [#1768](https://github.com/clj-kondo/clj-kondo/issues/1768): Expose a `tag` function in `clj-kondo.hooks-api`
+- [#1790](https://github.com/clj-kondo/clj-kondo/issues/1790): Add support for `:filename-pattern` in `:ns-group` 
 
 ## 2022.08.03
 

corpus/config_in_ns/my_custom_ns.clj

@@ -0,0 +1,3 @@
+(ns config-in-ns.my-custom-ns)
+
+(defn ^:private foo [])

src/clj_kondo/impl/analyzer/namespace.clj

@@ -416,7 +416,7 @@
                                     :syntax
                                     "namespace name expected"))))
                  'user)
-        ns-group (config/ns-group global-config ns-name)
+        ns-group (config/ns-group global-config ns-name filename)
         config-in-ns (let [config-in-ns (:config-in-ns global-config)]
                        (config/merge-config!
                         (get config-in-ns ns-group)

src/clj_kondo/impl/config.clj

@@ -404,11 +404,14 @@
     (fn [config sym]
       (contains? (delayed-cfg config) sym))))
 
-(defn ns-group* [config ns-name]
+(defn ns-group* [config ns-name filename]
   (or (some (fn [{:keys [pattern
+                         filename-pattern
                          name]}]
-              (when (and (string? pattern) (symbol? name)
-                         (re-matches (re-pattern pattern) (str ns-name)))
+              (when (or (and (string? pattern) (symbol? name)
+                             (re-matches (re-pattern pattern) (str ns-name)))
+                        (and (string? filename-pattern) (symbol? name)
+                             (re-matches (re-pattern filename-pattern) filename)))
                 name))
             (:ns-groups config))
       ns-name))

src/clj_kondo/impl/linters.clj

@@ -326,7 +326,7 @@
                   (let [discouraged-var-config
                         (get-in (:config call) [:linters :discouraged-var])]
                     (when-not (empty? (dissoc discouraged-var-config :level))
-                      (let [fn-lookup-sym (symbol (str (config/ns-group call-config resolved-ns))
+                      (let [fn-lookup-sym (symbol (str (config/ns-group call-config resolved-ns filename))
                                                   (str fn-name))
                             ]
                         (when-let [cfg (get discouraged-var-config fn-lookup-sym)]
@@ -518,14 +518,14 @@
     (doseq [ns (namespace/list-namespaces ctx)
             ns-sym (:required ns)
             :let [ns-config (:config ns)
+                  m (meta ns-sym)
+                  filename (:filename m)
                   config (or ns-config config)
-                  config-ns-sym (config/ns-group config ns-sym)
+                  config-ns-sym (config/ns-group config ns-sym filename)
                   linter-config (get-in config [:linters :discouraged-namespace config-ns-sym])]
             :when (some? linter-config)
             :let [{:keys [message]
-                   :or {message (str "Discouraged namespace: " ns-sym)}} linter-config
-                  m (meta ns-sym)
-                  filename (:filename m)]]
+                   :or {message (str "Discouraged namespace: " ns-sym)}} linter-config]]
       (findings/reg-finding!
        ctx
        (-> (node->line filename ns-sym :discouraged-namespace message)

test/clj_kondo/config_in_ns_test.clj

@@ -1,6 +1,7 @@
 (ns clj-kondo.config-in-ns-test
   (:require
-   [clj-kondo.test-utils :refer [lint! assert-submaps]]
+   [clj-kondo.test-utils :refer [assert-submaps lint!]]
+   [clojure.java.io :as io]
    [clojure.test :as t :refer [deftest is testing]]))
 
 (deftest config-in-ns-test
@@ -19,3 +20,9 @@
           '{:ns-groups [{:pattern "my.*" :name mine}]
             :config-in-ns {mine {:linters {:discouraged-var {clojure.core/assoc {:message "No"}}}}
                            my.namespace {:linters {:unresolved-symbol {:level :off}}}}})))
+
+(deftest config-in-ns-file-pattern-test
+  (is (empty?
+       (lint! (io/file "corpus" "config_in_ns" "my_custom_ns.clj")
+              '{:ns-groups [{:filename-pattern ".*config_in_ns.*" :name mine}]
+                :config-in-ns {mine {:linters {:unused-private-var {:level :off}}}}}))))