pcre.mal

一个内存数据库的源代码这是服务器端还有客户端

#line 28 "/export/scratch0/monet/monet.GNU.64.64.d.14791/MonetDB5/src/modules/mal/pcre.mx"
atom pcre:ptr;
command tostr()   address pcre_tostr;
command fromstr() address pcre_fromstr;
command nequal()  address pcre_nequal;
command hash()    address pcre_hash;
command null()    address pcre_null;
command put()     address pcre_put;
command del()     address pcre_del;
command length()  address pcre_length;
command heap()    address pcre_heap;

command compile(pat:str ) :pcre 
address PCREcompile_wrap
comment "compile a pattern";

command match(pat:pcre, s:str) :bit 
address PCREexec_wrap
comment "match a pattern";

command select(pat:str, strs:bat[:any_1,:str]) :bat[:any_1,:str] 
address PCREselect
comment "Select tuples based on the pattern";

command uselect(pat:str, strs:bat[:any_1,:str]) :bat[:any_1,:void] 
address PCREuselect
comment "Select tuples based on the pattern, only returning the head";

command match(s:str, pat:str):bit
address PCREmatch
comment "POSIX pattern matching against a string";

command patindex(s:str, pat:str):int
address PCREpatindex
comment "Location of the first POSIX pattern matching against a string"

command replace(origin:str,pat:str,repl:str,flags:str):str
address PCREreplace_wrap
comment "Replace _all_ matches of \"pattern\" in \"origin_str\" with
	   \"replacement\".\n\
	 Parameter \"flags\" accept these flags: 'i', 'm', 's', and 'x'.\n
	   'e': if present, an empty string is considered to be a valid match
	   'i': if present, the match operates in case-insensitive mode. Otherwise, in\n
			case-sensitive mode.\n\
	 'm': if present, the match operates in multi-line mode.\n
	   's': if present, the match operates in \"dot-all\"
	   The specifications of the flags can be found in \"man pcreapi\"\n
	   The flag letters may be repeated.\n
	   No other letters than 'e', 'i', 'm', 's' and 'x' are allowed in \"flags\".\n
	   Returns the replaced string, or if no matches found, the original string.";

command replace(orig:bat[:any_1,:str],pat:str,repl:str,flag:str):bat[:any_1,:str]
address PCREreplace_bat_wrap;

command pcre_quote(s:str):str 
address PCREquote
comment "Return a PCRE pattern string that matches the argument exactly."

command sql2pcre(pat:str,esc:str):str
address PCREsql2pcre
comment "Convert a SQL like pattern with the given escape character into a PCRE pattern.";

command like(s:str, pat:str, esc:str):bit 
address PCRElike3;

command like(s:str, pat:str):bit 
address PCRElike2;

command like(s:bat[:any_1,:str], pat:str, esc:str):bat[:any_1,:void] 
address PCRElike_uselect_pcre;

pattern prelude() :void 
address pcre_init
comment "Initialize pcre";

pcre.prelude();


#line 104 "/export/scratch0/monet/monet.GNU.64.64.d.14791/MonetDB5/src/modules/mal/pcre.mx"