[问题求助] DB2自定义TRIM函数

nees

最近因项目的需要,须在DB2中自建一个自定义的TRIM函数,功能是去掉字符串前后的空字符,如空格,TAB之类的东西.

版上有许多这方面的讨论以及代码,我COPY了Jamesqiao所写的用来测试:

1. #include <stdio.h>
   
2. #include <string.h>
   
3. #include <stdlib.h>
   
4. #include <sys/stat.h>
   
5. #include <sys/types.h>
   
6. #include <sqludf.h>
   
7. 
   
8. 
   
9. //Macro for iendity the blanks
   
10. #define isSpaces(ch) (ch == ' ' || ch == '\t' || ch == '\r' || ch == '\b' || ch == '\f' || ch == '\n')
    
11. 
    
12. char *TrimChr(char *pszSource)
    
13. {
    
14.         //pointer of the first char of string
    
15.         char *pszHead = pszSource;
    
16.         //pointer of the last non-blank char
    
17.         char *pszLast = &pszSource[strlen(pszSource)-1];
    
18.         //search the location of the last non-blank char
    
19.         while (isSpaces(*pszLast))
    
20.                 --pszLast;
    
21.         *(++pszLast) = '\0';
    
22.         //search the first non-blank char for left shift the string
    
23.         for ( ; (*pszHead != '\0') && (pszHead != pszLast); ++pszHead)
    
24.         {
    
25.                 if (! isSpaces(*pszHead))
    
26.                 {
    
27.                         strcpy(pszSource, pszHead);
    
28.                         break;
    
29.                 }
    
30.         }
    
31. 
    
32.         return pszSource;
    
33. }
    
34. 
    
35. int main(int argc,char *argv[])
    
36. {
    
37.         printf("\"");
    
38.         printf(argv[1]);
    
39.         printf("\"\n");
    
40.         printf("\"");
    
41.         printf(TrimChr(argv[1]));
    
42.         printf("\"\n");
    
43. }

复制代码

代码可以编译成功并在LINUX环境下运行的.


但是我想用它变成DB2的一个自定义函数时,老是出问题:

1. values TrimChr('   aaaa    ');
   
2. 
   
3. [IBM][CLI Driver][DB2/LINUX] SQL0444N  Routine "TRIMCHR" (specific name "SQL080529112348600") is implemented with code in library or path ".../sqllib/function/TrimChr", function "TrimChr" which cannot be accessed.  Reason code: "5".  SQLSTATE=42724
   

复制代码

自定义函数是如此写的:

1. CREATE FUNCTION TrimChr (VARCHAR(400))
   
2.                            RETURNS VARCHAR(400)   
   
3.                            EXTERNAL NAME '/home/db2inst1/sqllib/function/TrimChr!TrimChr'
   
4.                            LANGUAGE C  
   
5.                            NULL CALL  
   
6.                            PARAMETER STYLE DB2SQL  
   
7.                            NO SQL  
   
8.                            DETERMINISTIC  
   
9.                            NO EXTERNAL ACTION
   
10.                            NOT FENCED;
    
11. 
    
12. GRANT EXECUTE ON FUNCTION TRIMCHR(VARCHAR(400)) TO PUBLIC;

复制代码

请问是什么原因?是编译的问题?还是C函数的问题(与指针有关?)?

nees

Reason code 5 :
There was insufficient memory to load the library containing
The function or one or more symbols could not be resolved.
Contact the routine creator or your database administrator to
Make sure that the library was correctly linked. All required
Libraries to resolve referenced symbols such as external
Functions must be available. If a lack of memory is determined
Then the system configuration may need to be changed to make more
Memory available to DB2.

flw

专业人士面对陌生领域一般都是先从 hello world 开始吧。
这个唤作“单元测试”

nees

我查了一下网上的资料,发现人家是这样写的:

1. #include <pcre.h>
   
2. #include <sqludf.h>
   
3. 
   
4. void regexpSimple(
   
5.     // input parameters
   
6.     SQLUDF_VARCHAR *pattern,      SQLUDF_CLOB *str,
   
7.     // output
   
8.     SQLUDF_INTEGER *match,
   
9.     // null indicators
   
10.     SQLUDF_NULLIND *pattern_ind,  SQLUDF_NULLIND *str_ind,
    
11.     SQLUDF_NULLIND *match_ind,
    
12.     SQLUDF_TRAIL_ARGS)
    
13. {
    
14.     pcre *re = NULL;
    
15.     const char *error = NULL;
    
16.     int errOffset = 0;
    
17.     int rc = 0;
    
18. 
    
19.     // we assume successful return
    
20.     *match_ind = 0;
    
21. 
    
22.     // compile the pattern to its internal representation
    
23.     re = pcre_compile(pattern, 0 /* default options */, &error,
    
24.         &errOffset, NULL);
    
25.     if (re == NULL) {
    
26.         snprintf(SQLUDF_MSGTX, 70, "Regexp compilation failed at "
    
27.             "offset %d: %s\n", errOffset, error);
    
28.         strcpy(SQLUDF_STATE, "38900");
    
29.         (*pcre_free)(re);
    
30.         return;
    
31.     }
    
32. 
    
33.     // match the string againts the pattern
    
34.     rc = pcre_exec(re, NULL, str->data, str->length, 0,
    
35.             0 /* default options */, NULL, 0);
    
36.     switch (rc) {
    
37.       case PCRE_ERROR_NOMATCH:
    
38.         *match = 0;
    
39.         break;
    
40.       case PCRE_ERROR_BADOPTION:
    
41.         snprintf(SQLUDF_MSGTX, 70, "An unrecognized bit was set in the "
    
42.             "options argument");
    
43.         strcpy(SQLUDF_STATE, "38901");
    
44.         break;
    
45.       case PCRE_ERROR_NOMEMORY:
    
46.         snprintf(SQLUDF_MSGTX, 70, "Not enough memory available.");
    
47.         strcpy(SQLUDF_STATE, "38902");
    
48.         break;
    
49.       default:
    
50.         if (rc < 0) {
    
51.             snprintf(SQLUDF_MSGTX, 70, "A regexp match error "
    
52.                 "occured: %d", rc);
    
53.             strcpy(SQLUDF_STATE, "38903");
    
54.         }
    
55.         else {
    
56.             *match = 1;
    
57.         }
    
58.         break;
    
59.     }
    
60. 
    
61.     // cleanup
    
62.     (*pcre_free)(re);
    
63.     return;
    
64. }

复制代码

输入与输出都是放在参数里,返回用VOID.调用如下:

1. SELECT str
   
2. FROM   strTable
   
3. WHERE regex1('\w* = (\d|0x00);', str) = 1

复制代码

创建DB2函数的DDL如下:

1. CREATE FUNCTION regex1(pattern VARCHAR(2048), string CLOB(10M))
   
2.     RETURNS INTEGER
   
3.     SPECIFIC regexSimple
   
4.     EXTERNAL NAME 'regexUdf!regexpSimple'
   
5.     LANGUAGE C
   
6.     PARAMETER STYLE DB2SQL
   
7.     DETERMINISTIC
   
8.     NOT FENCED
   
9.     RETURNS NULL ON NULL INPUT
   
10.     NO SQL
    
11.     NO EXTERNAL ACTION
    
12.     ALLOW PARALLEL;

复制代码

nees

所以, 原来的TrimChr函数需要改成两个参数,一个是输入,一个是输出.

不过我改了一下,编译时一直有问题,请问有无高人帮改一下.

nees

问题解决了.

C代码如下:

1. #include        <string.h>
   
2. #include        <memory.h>
   
3. #include        <sqludf.h>
   
4. 
   
5. #define        ISSPACE(x) ((x)==' '||(x)=='\r'||(x)=='\n'||(x)=='\f'||(x)=='\b'||(x)=='\t')
   
6. 
   
7. void TrimChr( char *String, char *TrimedString )
   
8. {
   
9.         char        *Tail, *Head;
   
10. 
    
11.         for ( Tail = String + strlen( String ) - 1; Tail >= String; Tail -- )
    
12.                 if ( !ISSPACE( *Tail ) )
    
13.                         break;
    
14.         Tail[1] = 0;
    
15.         for ( Head = String; Head <= Tail; Head ++ )
    
16.                 if ( !ISSPACE( *Head ) )
    
17.                         break;
    
18.         if ( Head != String )
    
19.                 memcpy( String, Head, ( Tail - Head + 2 ) * sizeof( char ) );
    
20.         
    
21.         strcpy(TrimedString, String);
    
22.         return;
    
23. }
    

复制代码

这段代码是借鉴FH的这个贴子的:
http://bbs.chinaunix.net/viewthread.php?tid=277036

编译命令如下:

1. cc -c -o TrimChr.o -I ~/sqllib/include TrimChr.c -D_REENTRANT
   
2. cc -o TrimChr -shared -fpic TrimChr.o

复制代码

请用db2inst1用户编译,编译成功后,将可执行文件COPY到 ~/sqllib/function/下,即/home/db2inst1/sqllib/function/下.

1. cp TrimChr ~/sqllib/function/

复制代码

最后到数据库中创建自定义函数:

1. --DROP FUNCTION TrimChr;
   
2. 
   
3. CREATE FUNCTION TrimChr (VARCHAR(400))
   
4.                            RETURNS VARCHAR(400)  
   
5.                            EXTERNAL NAME '/home/db2inst1/sqllib/function/TrimChr!TrimChr'
   
6.                            LANGUAGE C  
   
7.                            NULL CALL  
   
8.                            PARAMETER STYLE DB2SQL  
   
9.                            NO SQL  
   
10.                            DETERMINISTIC  
    
11.                            NO EXTERNAL ACTION
    
12.                            NOT FENCED;
    
13. 
    
14. GRANT EXECUTE ON FUNCTION TRIMCHR(VARCHAR(400)) TO PUBLIC;

复制代码

然后就可以直接使用此函数了:

1. values TrimChr('                 aaa          bbb                          ');
   

复制代码

本人不懂C,主要是不断的查资料,不断的做实验而成功的.

在此还要请假一个问题:
定义宏使用了如下语句:

1. #define        ISSPACE(x) ((x)==' '||(x)=='\r'||(x)=='\n'||(x)=='\f'||(x)=='\b'||(x)=='\t')

复制代码

能否用ASCII码代替"\t","\f"这些?因为我想将宏改成所有ASCII码在0~32之间的值.

nees

笨办法:

1. #define        ISSPACE(x) ((x)==0x00 ||(x)==0x01 ||(x)==0x02 ||(x)==0x03 ||(x)==0x04 ||(x)==0x05 ||(x)==0x06 ||(x)==0x07 ||(x)==0x08 ||(x)==0x09 ||(x)==0x0A ||(x)==0x0B ||(x)==0x0C ||(x)==0x0D ||(x)==0x0E ||(x)==0x0F ||(x)==0x10 ||(x)==0x11 ||(x)==0x12 ||(x)==0x13 ||(x)==0x14 ||(x)==0x15 ||(x)==0x16 ||(x)==0x17 ||(x)==0x18 ||(x)==0x19 ||(x)==0x1A ||(x)==0x1B ||(x)==0x1C ||(x)==0x1D ||(x)==0x1E ||(x)==0x1F ||(x)==0x20 )

复制代码