在 DB2 中實作正則表達式：以 Perl 相容引擎 (PCRE) 建立 UDF 完整教學

為何需要正則表達式？

DB2 內建字串比較功能有限：=/<> 僅精確比對，LIKE 僅支援 % _ 萬用字元，LOCATE 僅找子字串。複雜模式（如 \\w* = (\\d|0x00);）用 SQL 組合極其冗長且難維護。

解決方案：UDF 封裝 PCRE 引擎

利用 DB2 可擴充架構，以 C 語言封裝 PCRE (Perl Compatible Regular Expressions) 函式庫，建立標量 UDF regex1(pattern, string) 回傳 1/0 表示比對成功與否。

SQL 端註冊函數

CREATE FUNCTION regex1(pattern VARCHAR(2048), string CLOB(10M))
RETURNS INTEGER
SPECIFIC regexSimple
EXTERNAL NAME 'regexUdf!regexpSimple'
LANGUAGE C
PARAMETER STYLE DB2SQL
DETERMINISTIC
NOT FENCED
RETURNS NULL ON NULL INPUT
NO SQL
NO EXTERNAL ACTION
ALLOW PARALLEL;

• NOT FENCED：進程內執行，效能最佳；需確保 C 代碼健壯，避免導致 DB2 引擎崩潰。
• DETERMINISTIC：相同輸入必得相同輸出，利於優化器重寫。
• 參數長度可依業務調整。

使用範例

-- 範例表
CREATE TABLE strTable (c1 INT, str VARCHAR(500));
INSERT INTO strTable VALUES
(1, 'some text;'),
(2, 'variable = 1234;'),
(3, 'var2 = ''string variable'';'),
(4, 'xyz = '),
(5, 'myVar = 0x00;'),
(6, '# comment'),
(7, 'abc = def');

-- 使用 regex1 簡潔比對
SELECT str FROM strTable
WHERE regex1('\\w* = (\\d|0x00);', str) = 1;

結果將精確命中第 2、5 筆，避開 LIKE 需列舉 0~9 十個條件的笨拙寫法。

C 端實作要點

1. 包含 pcre.h，連結 libpcre。
2. 入口函數簽名符合 PARAMETER STYLE DB2SQL：
   void regexpSimple(SQLUDF_VARCHAR *pattern, SQLUDF_CLOB *str, SQLUDF_INTEGER *result, SQLUDF_NULLIND *patInd, SQLUDF_NULLIND *strInd, SQLUDF_NULLIND *resInd, SQLUDF_TRAIL_ARGS)
3. 處理 NULL 指標：任一輸入 NULL 即設 *resInd = -1 返回。
4. 編譯模式：pcre_compile(pattern, 0, &errptr, &erroffset, NULL)。
5. 執行比對：pcre_exec(re, NULL, str->data, str->length, 0, 0, ovector, OVECCOUNT)。
6. 釋放資源：pcre_free(re)。
7. 編譯部署：編譯為共享庫 (.dll/.so)，置於 sqllib/function 目錄。

效能與安全考量

• NOT FENCED 最高效，但 C 代碼 Bug 會拖垮 DB2 引擎；開發測試階段建議先用 FENCED，上線前經嚴測再改 NOT FENCED。
• 大型 CLOB 輸入可能消耗記憶體，考慮限制最大長度或分塊處理。
• PCRE 支援 Perl 擴展語法 (\\d \\w \\s 等)，功能強大但複雜模式可能回溯導致效能劣化，建議加上執行逾時機制 (PCRE 8.30+ 支援 pcre_jit_stack 與匹配限制)。