Add flag to ignore specific unknown procedural languages

.gitignore

@@ -4,3 +4,4 @@ __pycache__
 .pytest_cache
 .tox
 dist
+.idea

README.md

@@ -61,6 +61,7 @@ options:
                         Analyze PLpgSQL code (default: True)
   --explain EXPLAIN     Describe an error/warning code
   --ignore IGNORE       Ignore error or warning code
+  --ignore-lang LANG    Ignore unknown procedural language
   --sql-accepting SQL_FN
                         Specify one or more sql-accepting functions
 ```

src/pgspot/cli.py

@@ -54,6 +54,14 @@ def run():
         type=str,
         help="Ignore error or warning code",
     )
+    parser.add_argument(
+        "--ignore-lang",
+        dest="ignore_lang",
+        action="append",
+        default=[],
+        type=str,
+        help="Ignore one or more unknown procedural languages",
+    )
     parser.add_argument(
         "--sql-accepting",
         dest="sql_fn",
@@ -70,6 +78,7 @@ def run():
     )
 
     args = parser.parse_args()
+    args.ignore_lang = [lang.lower() for lang in args.ignore_lang]
 
     counter = Counter(args)
     state = State(counter)

src/pgspot/visitors.py

@@ -267,6 +267,8 @@ def visit_CreateFunctionStmt(self, ancestors, node):
                 visit_plpgsql(state, node)
             case "c" | "internal":
                 pass
+            case language if language in self.state.args.ignore_lang:
+                pass
             case _:
                 self.state.unknown(f"Unknown function language: {language}")
 

tests/ignore_lang_test.py

@@ -0,0 +1,51 @@
+from util import run
+
+
+sql = """
+CREATE FUNCTION python_max(a integer, b integer) RETURNS integer AS $$
+    return max(a, b)
+$$ LANGUAGE plpython3u SET search_path TO 'pg_catalog', 'pg_temp'
+;
+
+CREATE FUNCTION tcl_max(integer, integer) RETURNS integer AS $$
+    if {$1 > $2} {return $1}
+    return $2
+$$ LANGUAGE pltcl STRICT SET search_path TO 'pg_catalog', 'pg_temp'
+;
+"""
+
+
+def test_unknown_lang_plpython3u():
+    output = run(sql)
+    assert "Unknown function language: plpython3u" in output
+
+
+def test_unknown_lang_pltcl():
+    output = run(sql)
+    assert "Unknown function language: pltcl" in output
+
+
+def test_ignore_lang_plpython3u():
+    output = run(sql, list("--ignore-lang=plpython3u"))
+    assert "Unknown function language: plpython3u" not in output
+
+
+def test_ignore_lang_pltcl():
+    output = run(sql, list("--ignore-lang=pltcl"))
+    assert "Unknown function language: pltcl" not in output
+
+
+def test_ignore_lang_plpython3u_pltcl():
+    output = run(sql, ["--ignore-lang=plpython3u", "--ignore-lang=pltcl"])
+    assert (
+        "Unknown function language: pltcl" not in output
+        and "Unknown function language: plpython3u" not in output
+    )
+
+
+def test_ignore_lang_upper():
+    output = run(sql, ["--ignore-lang=PLPYTHON3U", "--ignore-lang=PLTCL"])
+    assert (
+        "Unknown function language: pltcl" not in output
+        and "Unknown function language: plpython3u" not in output
+    )