Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
Postgres FD Implementation
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Abuhujair Javed
Postgres FD Implementation
Commits
88d7b4a2
Commit
88d7b4a2
authored
Aug 22, 2000
by
Tatsuo Ishii
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Add multibyte support for both LIKE and ILIKE
Eliminate up-to-4-times memory allocation problem
parent
0147b193
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
100 additions
and
239 deletions
+100
-239
src/backend/utils/adt/like.c
src/backend/utils/adt/like.c
+100
-239
No files found.
src/backend/utils/adt/like.c
View file @
88d7b4a2
...
...
@@ -11,13 +11,15 @@
* Portions Copyright (c) 1994, Regents of the University of California
*
* IDENTIFICATION
* $Header: /cvsroot/pgsql/src/backend/utils/adt/like.c,v 1.4
0 2000/08/09 14:13:03 thomas
Exp $
* $Header: /cvsroot/pgsql/src/backend/utils/adt/like.c,v 1.4
1 2000/08/22 06:33:57 ishii
Exp $
*
*-------------------------------------------------------------------------
*/
#include "postgres.h"
#include <ctype.h>
#ifdef MULTIBYTE
#include "mb/pg_wchar.h"
#endif
#include "utils/builtins.h"
...
...
@@ -26,8 +28,8 @@
#define LIKE_ABORT (-1)
static
int
MatchText
(
pg_wchar
*
t
,
int
tlen
,
pg_w
char
*
p
,
int
plen
,
char
*
e
);
static
int
MatchTextLower
(
pg_wchar
*
t
,
int
tlen
,
pg_w
char
*
p
,
int
plen
,
char
*
e
);
static
int
MatchText
(
unsigned
char
*
t
,
int
tlen
,
unsigned
char
*
p
,
int
plen
,
char
*
e
);
static
int
MatchTextLower
(
unsigned
char
*
t
,
int
tlen
,
unsigned
char
*
p
,
int
plen
,
char
*
e
);
/*
...
...
@@ -40,35 +42,16 @@ namelike(PG_FUNCTION_ARGS)
bool
result
;
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
strlen
(
NameStr
(
*
str
));
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
NameStr
(
*
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
==
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -78,35 +61,16 @@ namenlike(PG_FUNCTION_ARGS)
bool
result
;
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
strlen
(
NameStr
(
*
str
));
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
NameStr
(
*
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
!=
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -117,38 +81,18 @@ namelike_escape(PG_FUNCTION_ARGS)
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
strlen
(
NameStr
(
*
str
));
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
NameStr
(
*
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
e
)
==
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -159,38 +103,18 @@ namenlike_escape(PG_FUNCTION_ARGS)
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
strlen
(
NameStr
(
*
str
));
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
NameStr
(
*
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
e
)
!=
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -200,35 +124,16 @@ textlike(PG_FUNCTION_ARGS)
bool
result
;
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
NULL
)
==
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -238,35 +143,16 @@ textnlike(PG_FUNCTION_ARGS)
bool
result
;
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
!=
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -277,38 +163,18 @@ textlike_escape(PG_FUNCTION_ARGS)
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
e
)
==
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -319,38 +185,18 @@ textnlike_escape(PG_FUNCTION_ARGS)
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
pg_wchar
*
ss
,
*
pp
;
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
s
=
(
pg_wchar
*
)
palloc
((
slen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
str
),
s
,
slen
);
for
(
ss
=
s
,
slen
=
0
;
*
ss
!=
0
;
ss
++
)
slen
++
;
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
p
=
(
pg_wchar
*
)
palloc
((
plen
+
1
)
*
sizeof
(
pg_wchar
));
(
void
)
pg_mb2wchar_with_len
((
unsigned
char
*
)
VARDATA
(
pat
),
p
,
plen
);
for
(
pp
=
p
,
plen
=
0
;
*
pp
!=
0
;
pp
++
)
plen
++
;
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchText
(
s
,
slen
,
p
,
plen
,
e
)
!=
LIKE_TRUE
);
#ifdef MULTIBYTE
pfree
(
s
);
pfree
(
p
);
#endif
PG_RETURN_BOOL
(
result
);
}
...
...
@@ -362,21 +208,15 @@ Datum
inamelike
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
pg_wchar
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
==
LIKE_TRUE
);
...
...
@@ -387,21 +227,15 @@ Datum
inamenlike
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
pg_wchar
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
!=
LIKE_TRUE
);
...
...
@@ -412,24 +246,17 @@ Datum
inamelike_escape
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
e
)
==
LIKE_TRUE
);
...
...
@@ -441,24 +268,17 @@ Datum
inamenlike_escape
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
Name
str
=
PG_GETARG_NAME
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
NameStr
(
*
str
);
slen
=
strlen
(
s
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
e
)
!=
LIKE_TRUE
);
...
...
@@ -470,21 +290,15 @@ Datum
itextlike
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
pg_wchar
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
==
LIKE_TRUE
);
...
...
@@ -495,21 +309,15 @@ Datum
itextnlike
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
pg_wchar
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
"
\\
"
)
!=
LIKE_TRUE
);
...
...
@@ -520,24 +328,17 @@ Datum
itextlike_escape
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
e
)
==
LIKE_TRUE
);
...
...
@@ -549,24 +350,17 @@ Datum
itextnlike_escape
(
PG_FUNCTION_ARGS
)
{
bool
result
;
#ifndef MULTIBYTE
text
*
str
=
PG_GETARG_TEXT_P
(
0
);
text
*
pat
=
PG_GETARG_TEXT_P
(
1
);
#endif
text
*
esc
=
PG_GETARG_TEXT_P
(
2
);
pg_w
char
*
s
,
*
p
;
unsigned
char
*
s
,
*
p
;
int
slen
,
plen
;
char
*
e
;
#ifdef MULTIBYTE
elog
(
ERROR
,
"Case-insensitive multi-byte comparisons are not yet supported"
);
#else
s
=
VARDATA
(
str
);
slen
=
(
VARSIZE
(
str
)
-
VARHDRSZ
);
p
=
VARDATA
(
pat
);
plen
=
(
VARSIZE
(
pat
)
-
VARHDRSZ
);
#endif
e
=
((
VARSIZE
(
esc
)
-
VARHDRSZ
)
>
0
?
VARDATA
(
esc
)
:
NULL
);
result
=
(
MatchTextLower
(
s
,
slen
,
p
,
plen
,
e
)
!=
LIKE_TRUE
);
...
...
@@ -619,10 +413,77 @@ itextnlike_escape(PG_FUNCTION_ARGS)
*--------------------
*/
#ifdef MULTIBYTE
/*--------------------
* Support routine for MatchText. Compares given multibyte streams
* as wide characters. If they match, returns 1 otherwise returns 0.
*--------------------
*/
static
int
wchareq
(
unsigned
char
*
p1
,
unsigned
char
*
p2
)
{
int
l
;
l
=
pg_mblen
(
p1
);
if
(
pg_mblen
(
p2
)
!=
l
)
{
return
(
0
);
}
while
(
l
--
)
{
if
(
*
p1
++
!=
*
p2
++
)
return
(
0
);
}
return
(
1
);
}
/*--------------------
* Support routine for MatchTextLower. Compares given multibyte streams
* as wide characters ignoring case.
* If they match, returns 1 otherwise returns 0.
*--------------------
*/
#define UCHARMAX 0xff
static
int
iwchareq
(
unsigned
char
*
p1
,
unsigned
char
*
p2
)
{
int
c1
,
c2
;
int
l
;
/* short cut. if *p1 and *p2 is lower than UCHARMAX, then
we assume they are ASCII */
if
(
*
p1
<
UCHARMAX
&&
*
p2
<
UCHARMAX
)
return
(
tolower
(
*
p1
)
==
tolower
(
*
p2
));
if
(
*
p1
<
UCHARMAX
)
c1
=
tolower
(
*
p1
);
else
{
l
=
pg_mblen
(
p1
);
(
void
)
pg_mb2wchar_with_len
(
p1
,
(
pg_wchar
*
)
&
c1
,
l
);
c1
=
tolower
(
c1
);
}
if
(
*
p2
<
UCHARMAX
)
c2
=
tolower
(
*
p2
);
else
{
l
=
pg_mblen
(
p2
);
(
void
)
pg_mb2wchar_with_len
(
p2
,
(
pg_wchar
*
)
&
c2
,
l
);
c2
=
tolower
(
c2
);
}
return
(
c1
==
c2
);
}
#endif
#ifdef MULTIBYTE
#define CHAREQ(p1, p2) wchareq(p1, p2)
#define ICHAREQ(p1, p2) iwchareq(p1, p2)
#define NextChar(p, plen) {int __l = pg_mblen(p); (p) +=__l; (plen) -=__l;}
#else
#define CHAREQ(p1, p2) (*(p1) == *(p2))
#define ICHAREQ(p1, p2) (tolower(*(p1)) == tolower(*(p2)))
#define NextChar(p, plen) (p)++, (plen)--
#endif
static
int
MatchText
(
pg_wchar
*
t
,
int
tlen
,
pg_w
char
*
p
,
int
plen
,
char
*
e
)
MatchText
(
unsigned
char
*
t
,
int
tlen
,
unsigned
char
*
p
,
int
plen
,
char
*
e
)
{
/* Fast path for match-everything pattern
* Include weird case of escape character as a percent sign or underscore,
...
...
@@ -637,10 +498,10 @@ MatchText(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
/* If an escape character was specified and we find it here in the pattern,
* then we'd better have an exact match for the next character.
*/
if
((
e
!=
NULL
)
&&
(
*
p
==
*
e
))
if
((
e
!=
NULL
)
&&
CHAREQ
(
p
,
e
))
{
NextChar
(
p
,
plen
);
if
((
plen
<=
0
)
||
(
*
t
!=
*
p
))
if
((
plen
<=
0
)
||
!
CHAREQ
(
t
,
p
))
return
LIKE_FALSE
;
}
else
if
(
*
p
==
'%'
)
...
...
@@ -664,8 +525,8 @@ MatchText(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
* recurse unless first pattern char might match this
* text char.
*/
if
(
(
*
t
==
*
p
)
||
(
*
p
==
'_'
)
||
((
e
!=
NULL
)
&&
(
*
p
==
*
e
)))
if
(
CHAREQ
(
t
,
p
)
||
(
*
p
==
'_'
)
||
((
e
!=
NULL
)
&&
CHAREQ
(
p
,
e
)))
{
int
matched
=
MatchText
(
t
,
tlen
,
p
,
plen
,
e
);
...
...
@@ -682,7 +543,7 @@ MatchText(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
*/
return
LIKE_ABORT
;
}
else
if
((
*
p
!=
'_'
)
&&
(
*
t
!=
*
p
))
else
if
((
*
p
!=
'_'
)
&&
!
CHAREQ
(
t
,
p
))
{
/* Not the single-character wildcard and no explicit match?
* Then time to quit...
...
...
@@ -711,7 +572,7 @@ MatchText(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
}
/* MatchText() */
static
int
MatchTextLower
(
pg_wchar
*
t
,
int
tlen
,
pg_w
char
*
p
,
int
plen
,
char
*
e
)
MatchTextLower
(
unsigned
char
*
t
,
int
tlen
,
unsigned
char
*
p
,
int
plen
,
char
*
e
)
{
/* Fast path for match-everything pattern
* Include weird case of escape character as a percent sign or underscore,
...
...
@@ -726,10 +587,10 @@ MatchTextLower(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
/* If an escape character was specified and we find it here in the pattern,
* then we'd better have an exact match for the next character.
*/
if
((
e
!=
NULL
)
&&
(
tolower
(
*
p
)
==
tolower
(
*
e
)
))
if
((
e
!=
NULL
)
&&
ICHAREQ
(
p
,
e
))
{
NextChar
(
p
,
plen
);
if
((
plen
<=
0
)
||
(
tolower
(
*
t
)
!=
tolower
(
*
p
)
))
if
((
plen
<=
0
)
||
!
ICHAREQ
(
t
,
p
))
return
LIKE_FALSE
;
}
else
if
(
*
p
==
'%'
)
...
...
@@ -753,8 +614,8 @@ MatchTextLower(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
* recurse unless first pattern char might match this
* text char.
*/
if
(
(
tolower
(
*
t
)
==
tolower
(
*
p
)
)
||
(
*
p
==
'_'
)
||
((
e
!=
NULL
)
&&
(
tolower
(
*
p
)
==
tolower
(
*
e
)
)))
if
(
ICHAREQ
(
t
,
p
)
||
(
*
p
==
'_'
)
||
((
e
!=
NULL
)
&&
ICHAREQ
(
p
,
e
)))
{
int
matched
=
MatchText
(
t
,
tlen
,
p
,
plen
,
e
);
...
...
@@ -771,7 +632,7 @@ MatchTextLower(pg_wchar * t, int tlen, pg_wchar * p, int plen, char *e)
*/
return
LIKE_ABORT
;
}
else
if
((
*
p
!=
'_'
)
&&
(
tolower
(
*
t
)
!=
tolower
(
*
p
)
))
else
if
((
*
p
!=
'_'
)
&&
!
ICHAREQ
(
t
,
p
))
{
return
LIKE_FALSE
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment