29#include <gnu/libc-version.h>
42#define TEXTBUFLEN 1024
46extern size_t strlower_libc(
char *dst,
size_t dstsize,
const char *src,
48extern size_t strtitle_libc(
char *dst,
size_t dstsize,
const char *src,
50extern size_t strupper_libc(
char *dst,
size_t dstsize,
const char *src,
54 const char *arg2, ssize_t len2,
57 const char *src, ssize_t srclen,
64static int strncoll_libc_win32_utf8(
const char *arg1, ssize_t len1,
65 const char *arg2, ssize_t len2,
70 const char *src, ssize_t srclen,
73 const char *src, ssize_t srclen,
76 const char *src, ssize_t srclen,
79 const char *src, ssize_t srclen,
82 const char *src, ssize_t srclen,
85 const char *src, ssize_t srclen,
91 .strnxfrm_prefix = NULL,
103 .strxfrm_is_safe =
true,
105 .strxfrm_is_safe =
false,
111 .
strncoll = strncoll_libc_win32_utf8,
113 .strnxfrm_prefix = NULL,
115 .strxfrm_is_safe =
true,
117 .strxfrm_is_safe =
false,
157 srclen = strlen(src);
159 if (srclen + 1 <= destsize)
164 if (srclen + 1 > destsize)
167 memcpy(
dest, src, srclen);
177 for (p =
dest; *p; p++)
201 srclen = strlen(src);
204 if ((srclen + 1) > (INT_MAX /
sizeof(
wchar_t)))
206 (
errcode(ERRCODE_OUT_OF_MEMORY),
207 errmsg(
"out of memory")));
210 workspace = (
wchar_t *)
palloc((srclen + 1) *
sizeof(wchar_t));
214 for (curr_char = 0; workspace[curr_char] != 0; curr_char++)
215 workspace[curr_char] =
towlower_l(workspace[curr_char], loc);
221 result =
palloc(max_size + 1);
225 if (result_size + 1 > destsize)
228 memcpy(
dest, result, result_size);
229 dest[result_size] =
'\0';
242 srclen = strlen(src);
244 if (srclen + 1 <= destsize)
247 int wasalnum =
false;
250 memcpy(
dest, src, srclen);
260 for (p =
dest; *p; p++)
276 wasalnum =
isalnum_l((
unsigned char) *p, loc);
288 int wasalnum =
false;
296 srclen = strlen(src);
299 if ((srclen + 1) > (INT_MAX /
sizeof(
wchar_t)))
301 (
errcode(ERRCODE_OUT_OF_MEMORY),
302 errmsg(
"out of memory")));
305 workspace = (
wchar_t *)
palloc((srclen + 1) *
sizeof(wchar_t));
309 for (curr_char = 0; workspace[curr_char] != 0; curr_char++)
312 workspace[curr_char] =
towlower_l(workspace[curr_char], loc);
314 workspace[curr_char] =
towupper_l(workspace[curr_char], loc);
315 wasalnum =
iswalnum_l(workspace[curr_char], loc);
322 result =
palloc(max_size + 1);
326 if (result_size + 1 > destsize)
329 memcpy(
dest, result, result_size);
330 dest[result_size] =
'\0';
343 srclen = strlen(src);
345 if (srclen + 1 <= destsize)
350 memcpy(
dest, src, srclen);
360 for (p =
dest; *p; p++)
384 srclen = strlen(src);
387 if ((srclen + 1) > (INT_MAX /
sizeof(
wchar_t)))
389 (
errcode(ERRCODE_OUT_OF_MEMORY),
390 errmsg(
"out of memory")));
393 workspace = (
wchar_t *)
palloc((srclen + 1) *
sizeof(wchar_t));
397 for (curr_char = 0; workspace[curr_char] != 0; curr_char++)
398 workspace[curr_char] =
towupper_l(workspace[curr_char], loc);
404 result =
palloc(max_size + 1);
408 if (result_size + 1 > destsize)
411 memcpy(
dest, result, result_size);
412 dest[result_size] =
'\0';
428 if (
collid == DEFAULT_COLLATION_OID)
437 Anum_pg_database_datcollate);
440 Anum_pg_database_datctype);
455 Anum_pg_collation_collcollate);
458 Anum_pg_collation_collctype);
468 result->
provider = COLLPROVIDER_LIBC;
471 (strcmp(collate,
"POSIX") == 0);
472 result->
ctype_is_c = (strcmp(ctype,
"C") == 0) ||
473 (strcmp(ctype,
"POSIX") == 0);
479 result->
collate = &collate_methods_libc_win32_utf8;
501 if (strcmp(collate, ctype) == 0)
503 if (strcmp(ctype,
"C") != 0 && strcmp(ctype,
"POSIX") != 0)
508 loc = newlocale(LC_COLLATE_MASK | LC_CTYPE_MASK, collate,
511 loc = _create_locale(LC_ALL, collate);
523 if (strcmp(collate,
"C") != 0 && strcmp(collate,
"POSIX") != 0)
526 loc1 = newlocale(LC_COLLATE_MASK, collate, NULL);
531 if (strcmp(ctype,
"C") != 0 && strcmp(ctype,
"POSIX") != 0)
534 loc = newlocale(LC_CTYPE_MASK, ctype, loc1);
552 (
errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
553 errmsg(
"collations with different collate and ctype values are not supported on this platform")));
568strncoll_libc(
const char *arg1, ssize_t len1,
const char *arg2, ssize_t len2,
573 size_t bufsize1 = (len1 == -1) ? 0 : len1 + 1;
574 size_t bufsize2 = (len2 == -1) ? 0 : len2 + 1;
593 memcpy(buf1, arg1, len1);
604 char *buf2 =
buf + bufsize1;
606 memcpy(buf2, arg2, len2);
644 memcpy(
buf, src, srclen);
653 Assert(result >= destsize ||
dest[result] ==
'\0');
661 char *collversion = NULL;
667#if defined(__GLIBC__)
669 collversion =
pstrdup(gnu_get_libc_version());
670#elif defined(LC_VERSION_MASK)
674 loc = newlocale(LC_COLLATE_MASK, collcollate, NULL);
678 pstrdup(querylocale(LC_COLLATE_MASK | LC_VERSION_MASK, loc));
683 (
errmsg(
"could not load locale \"%s\"", collcollate)));
690 NLSVERSIONINFOEX version = {
sizeof(NLSVERSIONINFOEX)};
691 WCHAR wide_collcollate[LOCALE_NAME_MAX_LENGTH];
693 MultiByteToWideChar(CP_ACP, 0, collcollate, -1, wide_collcollate,
694 LOCALE_NAME_MAX_LENGTH);
695 if (!GetNLSVersionEx(COMPARE_STRING, wide_collcollate, &version))
704 if (GetLastError() == ERROR_INVALID_PARAMETER)
708 (
errmsg(
"could not get collation version for locale \"%s\": error code %lu",
712 collversion =
psprintf(
"%lu.%lu,%lu.%lu",
713 (version.dwNLSVersion >> 8) & 0xFFFF,
714 version.dwNLSVersion & 0xFF,
715 (version.dwDefinedVersion >> 8) & 0xFFFF,
716 version.dwDefinedVersion & 0xFF);
733strncoll_libc_win32_utf8(
const char *arg1, ssize_t len1,
const char *arg2,
753 a1len = len1 * 2 + 2;
754 a2len = len2 * 2 + 2;
767 r = MultiByteToWideChar(CP_UTF8, 0, arg1, len1,
768 (LPWSTR) a1p, a1len / 2);
771 (
errmsg(
"could not convert string to UTF-16: error code %lu",
774 ((LPWSTR) a1p)[r] = 0;
780 r = MultiByteToWideChar(CP_UTF8, 0, arg2, len2,
781 (LPWSTR) a2p, a2len / 2);
784 (
errmsg(
"could not convert string to UTF-16: error code %lu",
787 ((LPWSTR) a2p)[r] = 0;
791 if (result == 2147483647)
793 (
errmsg(
"could not compare Unicode strings: %m")));
824 (
errcode(ERRCODE_INVALID_PARAMETER_VALUE),
825 errmsg(
"could not create locale \"%s\": %m",
827 (save_errno == ENOENT ?
828 errdetail(
"The operating system could not find any locale data for the locale name \"%s\".",
836#ifndef HAVE_MBSTOWCS_L
841 return _mbstowcs_l(
dest, src, n, loc);
844 locale_t save_locale = uselocale(loc);
846 result = mbstowcs(
dest, src, n);
847 uselocale(save_locale);
852#ifndef HAVE_WCSTOMBS_L
857 return _wcstombs_l(
dest, src, n, loc);
860 locale_t save_locale = uselocale(loc);
862 result = wcstombs(
dest, src, n);
863 uselocale(save_locale);
898 result = WideCharToMultiByte(CP_UTF8, 0, from, -1, to, tolen,
915 result = wcstombs(to, from, tolen);
936char2wchar(
wchar_t *to,
size_t tolen,
const char *from,
size_t fromlen,
953 result = MultiByteToWideChar(CP_UTF8, 0, from, fromlen, to, tolen - 1);
975 result = mbstowcs(to,
str, tolen);
999 (
errcode(ERRCODE_CHARACTER_NOT_IN_REPERTOIRE),
1000 errmsg(
"invalid multibyte character for locale"),
1001 errhint(
"The server's LC_CTYPE locale is probably incompatible with the database encoding.")));
#define TextDatumGetCString(d)
int errdetail(const char *fmt,...)
int errhint(const char *fmt,...)
int errcode(int sqlerrcode)
int errmsg(const char *fmt,...)
#define ereport(elevel,...)
Assert(PointerIsAligned(start, uint64))
#define HeapTupleIsValid(tuple)
int GetDatabaseEncoding(void)
bool pg_verifymbstr(const char *mbstr, int len, bool noError)
int pg_database_encoding_max_length(void)
void * MemoryContextAllocZero(MemoryContext context, Size size)
char * pstrdup(const char *in)
void pfree(void *pointer)
char * pnstrdup(const char *in, Size len)
static size_t strtitle_libc_mb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
size_t wchar2char(char *to, const wchar_t *from, size_t tolen, pg_locale_t locale)
static size_t strupper_libc_sb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
pg_locale_t create_pg_locale_libc(Oid collid, MemoryContext context)
size_t strtitle_libc(char *dst, size_t dstsize, const char *src, ssize_t srclen, pg_locale_t locale)
size_t strupper_libc(char *dst, size_t dstsize, const char *src, ssize_t srclen, pg_locale_t locale)
char * get_collation_actual_version_libc(const char *collcollate)
static locale_t make_libc_collator(const char *collate, const char *ctype)
static size_t wcstombs_l(char *dest, const wchar_t *src, size_t n, locale_t loc)
static const struct collate_methods collate_methods_libc
size_t strlower_libc(char *dst, size_t dstsize, const char *src, ssize_t srclen, pg_locale_t locale)
static size_t strupper_libc_mb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
static int strncoll_libc(const char *arg1, ssize_t len1, const char *arg2, ssize_t len2, pg_locale_t locale)
static size_t strlower_libc_sb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
static size_t strnxfrm_libc(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
void report_newlocale_failure(const char *localename)
static size_t strtitle_libc_sb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
size_t char2wchar(wchar_t *to, size_t tolen, const char *from, size_t fromlen, pg_locale_t locale)
static size_t mbstowcs_l(wchar_t *dest, const char *src, size_t n, locale_t loc)
static size_t strlower_libc_mb(char *dest, size_t destsize, const char *src, ssize_t srclen, pg_locale_t locale)
int pg_strcasecmp(const char *s1, const char *s2)
unsigned char pg_toupper(unsigned char ch)
unsigned char pg_tolower(unsigned char ch)
int pg_strncasecmp(const char *s1, const char *s2, size_t n)
static Datum ObjectIdGetDatum(Oid X)
char * psprintf(const char *fmt,...)
int(* strncoll)(const char *arg1, ssize_t len1, const char *arg2, ssize_t len2, pg_locale_t locale)
const struct collate_methods * collate
union pg_locale_struct::@161 info
void ReleaseSysCache(HeapTuple tuple)
HeapTuple SearchSysCache1(int cacheId, Datum key1)
Datum SysCacheGetAttrNotNull(int cacheId, HeapTuple tup, AttrNumber attributeNumber)