feat(query): add basic regular expression operator support - refs #2236

CHANGELOG.md

@@ -25,6 +25,7 @@ This project adheres to [Semantic Versioning](http://semver.org/).
  - #1917, Add error codes with the `"PGRST"` prefix to the error response body to differentiate PostgREST errors from PostgreSQL errors - @laurenceisla
  - #1917, Normalize the error response body by always having the `detail` and `hint` error fields with a `null` value if they are empty - @laurenceisla
  - #2176, Errors raised with `SQLSTATE` now include the message and the code in the response body - @laurenceisla
+ - #2236, Support POSIX regular expression operators for row filtering - @enote-kane
 
 ### Fixed
 

src/PostgREST/Query/SqlFragment.hs

@@ -93,6 +93,8 @@ singleValOperator = \case
   OpNotExtendsRight  -> "&<"
   OpNotExtendsLeft   -> "&>"
   OpAdjacent         -> "-|-"
+  OpMatch            -> "~"
+  OpIMatch           -> "~*"
 
 ftsOperator :: FtsOperator -> SqlFragment
 ftsOperator = \case

src/PostgREST/Request/QueryParams.hs

@@ -224,6 +224,8 @@ operator = \case
   "nxr"    -> Just OpNotExtendsRight
   "nxl"    -> Just OpNotExtendsLeft
   "adj"    -> Just OpAdjacent
+  "match"  -> Just OpMatch
+  "imatch" -> Just OpIMatch
   _        -> Nothing
 
 ftsOperator :: Text -> Maybe FtsOperator

src/PostgREST/Request/Types.hs

@@ -273,6 +273,8 @@ data SimpleOperator
   | OpNotExtendsRight
   | OpNotExtendsLeft
   | OpAdjacent
+  | OpMatch
+  | OpIMatch
   deriving Eq
 
 -- | Operators for full text search operators

test/spec/Feature/Query/QuerySpec.hs

@@ -129,6 +129,29 @@ spec actualPgVersion = do
     it "matches with ilike using not operator" $
       get "/simple_pk?k=not.ilike.xy*&order=extra.asc" `shouldRespondWith` "[]"
 
+    it "matches with ~" $ do
+      get "/simple_pk?k=match.yx$" `shouldRespondWith`
+        [json|[{"k":"xyyx","extra":"u"}]|]
+      get "/simple_pk?k=match.^xy" `shouldRespondWith`
+        [json|[{"k":"xyyx","extra":"u"}]|]
+      get "/simple_pk?k=match.YY" `shouldRespondWith`
+        [json|[{"k":"xYYx","extra":"v"}]|]
+
+    it "matches with ~ using not operator" $
+      get "/simple_pk?k=not.match.yx$" `shouldRespondWith`
+        [json|[{"k":"xYYx","extra":"v"}]|]
+
+    it "matches with ~*" $ do
+      get "/simple_pk?k=imatch.^xy&order=extra.asc" `shouldRespondWith`
+        [json|[{"k":"xyyx","extra":"u"},{"k":"xYYx","extra":"v"}]|]
+        { matchHeaders = [matchContentTypeJson] }
+      get "/simple_pk?k=imatch..*YY.*&order=extra.asc" `shouldRespondWith`
+        [json|[{"k":"xyyx","extra":"u"},{"k":"xYYx","extra":"v"}]|]
+        { matchHeaders = [matchContentTypeJson] }
+
+    it "matches with ~* using not operator" $
+      get "/simple_pk?k=not.imatch.^xy&order=extra.asc" `shouldRespondWith` "[]"
+
     describe "Full text search operator" $ do
       it "finds matches with to_tsquery" $
         get "/tsearch?text_search_vector=fts.impossible" `shouldRespondWith`