Add regexp_not_like() for orafce and fix test

Author: foreyes

gpcontrib/orafce/expected/gp_partition_by.out

@@ -10,6 +10,8 @@ NOTICE:  Table doesn't have 'DISTRIBUTED BY' clause -- Using column named 'str'
 HINT:  The 'DISTRIBUTED BY' clause determines the distribution of data. Make sure column(s) chosen are the optimal data distribution key to minimize skew.
 INSERT INTO t3 VALUES ('a'), ('b'), ('c');
 SELECT * FROM t3 ORDER BY str;
+HINT:  For non-partitioned tables, run analyze <table_name>(<column_list>). For partitioned tables, run analyze rootpartition <table_name>(<column_list>). See log for columns missing statistics.
+NOTICE:  One or more columns in the following table(s) do not have statistics: t3
  str 
 -----
  a
@@ -38,6 +40,8 @@ NOTICE:  Table doesn't have 'DISTRIBUTED BY' clause -- Using column named 'str'
 HINT:  The 'DISTRIBUTED BY' clause determines the distribution of data. Make sure column(s) chosen are the optimal data distribution key to minimize skew.
 INSERT INTO t4 VALUES ('a'), ('b'), ('c');
 SELECT * FROM t4 ORDER BY str;
+HINT:  For non-partitioned tables, run analyze <table_name>(<column_list>). For partitioned tables, run analyze rootpartition <table_name>(<column_list>). See log for columns missing statistics.
+NOTICE:  One or more columns in the following table(s) do not have statistics: t4
  str 
 -----
  a

gpcontrib/orafce/orafce--4.8--4.9.sql

@@ -175,3 +175,37 @@ END;
 $$
 LANGUAGE plpgsql STRICT IMMUTABLE PARALLEL SAFE;
 
+-- Add regexp_not_like based on regexp_like
+
+-- REGEXP_NOT_LIKE( string text, pattern text) -> boolean
+-- If one of the param is NULL returns NULL, declared STRICT
+CREATE OR REPLACE FUNCTION oracle.regexp_not_like(text, text)
+RETURNS boolean
+AS $$
+  -- Oracle default behavior is newline-sensitive,
+  -- PostgreSQL not, so force 'p' modifier to affect
+  -- newline-sensitivity but not ^ and $ search.
+  SELECT CASE WHEN (count(*) > 0) THEN false ELSE true END FROM regexp_matches($1, $2, 'p');
+$$
+LANGUAGE 'sql' STRICT;
+
+-- REGEXP_NOT_LIKE( string text, pattern text, flags text ) -> boolean
+CREATE OR REPLACE FUNCTION oracle.regexp_not_like(text, text, text)
+RETURNS boolean
+AS $$
+DECLARE
+  modifiers text;
+BEGIN
+  -- Only modifier can be NULL
+  IF $1 IS NULL OR $2 IS NULL THEN
+    RETURN NULL;
+  END IF;
+  modifiers := oracle.translate_oracle_modifiers($3, false);
+  IF (regexp_matches($1, $2, modifiers))[1] IS NOT NULL THEN
+    RETURN false;
+  END IF;
+  RETURN true;
+END;
+$$
+LANGUAGE plpgsql;
+

gpcontrib/orafce/orafce--4.9.sql

@@ -4012,6 +4012,40 @@ RETURNS text
 AS 'MODULE_PATHNAME','orafce_textregexreplace'
 LANGUAGE 'c' IMMUTABLE PARALLEL SAFE;
 
+-- Add regexp_not_like based on regexp_like
+
+-- REGEXP_NOT_LIKE( string text, pattern text) -> boolean
+-- If one of the param is NULL returns NULL, declared STRICT
+CREATE OR REPLACE FUNCTION oracle.regexp_not_like(text, text)
+RETURNS boolean
+AS $$
+  -- Oracle default behavior is newline-sensitive,
+  -- PostgreSQL not, so force 'p' modifier to affect
+  -- newline-sensitivity but not ^ and $ search.
+  SELECT CASE WHEN (count(*) > 0) THEN false ELSE true END FROM regexp_matches($1, $2, 'p');
+$$
+LANGUAGE 'sql' STRICT;
+
+-- REGEXP_NOT_LIKE( string text, pattern text, flags text ) -> boolean
+CREATE OR REPLACE FUNCTION oracle.regexp_not_like(text, text, text)
+RETURNS boolean
+AS $$
+DECLARE
+  modifiers text;
+BEGIN
+  -- Only modifier can be NULL
+  IF $1 IS NULL OR $2 IS NULL THEN
+    RETURN NULL;
+  END IF;
+  modifiers := oracle.translate_oracle_modifiers($3, false);
+  IF (regexp_matches($1, $2, modifiers))[1] IS NOT NULL THEN
+    RETURN false;
+  END IF;
+  RETURN true;
+END;
+$$
+LANGUAGE plpgsql;
+
 ----
 -- Add LEAST/GREATEST declaration to return NULL on NULL input.
 -- PostgreSQL only returns NULL when all the parameters are NULL.