mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-23 22:03:03 +01:00
143 lines
4.1 KiB
C++
143 lines
4.1 KiB
C++
/*
|
|
* PROGRAM: InterBase International support
|
|
* MODULE: lc_iso8859_2.cpp
|
|
* DESCRIPTION: Language Drivers in the iso8859_2 family.
|
|
* (full International collation)
|
|
*
|
|
* The contents of this file are subject to the Interbase Public
|
|
* License Version 1.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy
|
|
* of the License at http://www.Inprise.com/IPL.html
|
|
*
|
|
* Software distributed under the License is distributed on an
|
|
* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
|
|
* or implied. See the License for the specific language governing
|
|
* rights and limitations under the License.
|
|
*
|
|
* All Rights Reserved.
|
|
* Contributor(s): Michal Bukovjan_________________.
|
|
*/
|
|
|
|
#include "firebird.h"
|
|
#include "../intl/ldcommon.h"
|
|
|
|
static USHORT fam2_to_upper (TEXTTYPE obj, BYTE ch);
|
|
static SSHORT fam2_str_to_upper (TEXTTYPE obj, USHORT iLen, const BYTE* pStr, USHORT iOutLen, BYTE *pOutStr);
|
|
static USHORT fam2_to_lower (TEXTTYPE obj, BYTE ch);
|
|
|
|
#include "lc_narrow.h"
|
|
#include "lc_dos.h"
|
|
#include "ld_proto.h"
|
|
|
|
static inline void FAMILY2(TEXTTYPE cache,
|
|
TTYPE_ID id_number,
|
|
pfn_INTL_init name,
|
|
CHARSET_ID charset,
|
|
SSHORT country,
|
|
USHORT flags,
|
|
const SortOrderTblEntry* NoCaseOrderTbl,
|
|
const BYTE* ToUpperConversionTbl,
|
|
const BYTE* ToLowerConversionTbl,
|
|
const CompressPair* CompressTbl,
|
|
const ExpandChar* ExpansionTbl,
|
|
const ASCII* POSIX)
|
|
//#define FAMILY2(id_number, name, charset, country)
|
|
{
|
|
cache->texttype_version = IB_LANGDRV_VERSION;
|
|
cache->texttype_type = id_number;
|
|
cache->texttype_character_set = charset;
|
|
cache->texttype_country = country;
|
|
cache->texttype_bytes_per_char = 1;
|
|
cache->texttype_fn_init = name;
|
|
cache->texttype_fn_key_length = LC_NARROW_key_length;
|
|
cache->texttype_fn_string_to_key= LC_NARROW_string_to_key;
|
|
cache->texttype_fn_compare = LC_NARROW_compare;
|
|
cache->texttype_fn_to_upper = fam2_to_upper;
|
|
cache->texttype_fn_to_lower = fam2_to_lower;
|
|
cache->texttype_fn_str_to_upper = fam2_str_to_upper;
|
|
cache->texttype_fn_mbtowc = LC_DOS_nc_mbtowc;
|
|
cache->texttype_collation_table = (const BYTE*) NoCaseOrderTbl;
|
|
cache->texttype_toupper_table = ToUpperConversionTbl;
|
|
cache->texttype_tolower_table = ToLowerConversionTbl;
|
|
cache->texttype_compress_table = (const BYTE*) CompressTbl;
|
|
cache->texttype_expand_table = (const BYTE*) ExpansionTbl;
|
|
cache->texttype_name = POSIX;
|
|
cache->texttype_flags |= ((flags) & REVERSE) ?
|
|
TEXTTYPE_reverse_secondary : 0;
|
|
}
|
|
|
|
|
|
TEXTTYPE_ENTRY (ISO88592_c1_init)
|
|
{
|
|
static const ASCII POSIX[] = "cs_CZ.ISO8859_2";
|
|
|
|
#include "../intl/collations/xx88592czech.h"
|
|
|
|
FAMILY2(cache, parm1, ISO88592_c1_init, CS_ISO8859_2, CC_CZECH, LDRV_TIEBREAK,
|
|
NoCaseOrderTbl, ToUpperConversionTbl, ToLowerConversionTbl,
|
|
CompressTbl, ExpansionTbl, POSIX);
|
|
|
|
TEXTTYPE_RETURN;
|
|
}
|
|
|
|
TEXTTYPE_ENTRY (ISO88592_c2_init)
|
|
{
|
|
static const ASCII POSIX[] = "ISO_HUN.ISO8859_2";
|
|
|
|
#include "../intl/collations/xx88592hun.h"
|
|
|
|
FAMILY2(cache, parm1, ISO88592_c2_init, CS_ISO8859_2, CC_HUNGARY, LDRV_TIEBREAK,
|
|
NoCaseOrderTbl, ToUpperConversionTbl, ToLowerConversionTbl,
|
|
CompressTbl, ExpansionTbl, POSIX);
|
|
|
|
TEXTTYPE_RETURN;
|
|
}
|
|
|
|
/*
|
|
* Generic base for InterBase 4.0 Language Driver
|
|
*/
|
|
|
|
#define LOCALE_UPPER(ch) (obj->texttype_toupper_table[ (unsigned) (ch) ])
|
|
#define LOCALE_LOWER(ch) (obj->texttype_tolower_table[ (unsigned) (ch) ])
|
|
|
|
|
|
static USHORT fam2_to_upper (TEXTTYPE obj, BYTE ch)
|
|
{
|
|
return (LOCALE_UPPER (ch));
|
|
}
|
|
|
|
|
|
/*
|
|
* Returns -1 if output buffer was too small
|
|
*/
|
|
static SSHORT fam2_str_to_upper (TEXTTYPE obj, USHORT iLen, const BYTE* pStr, USHORT iOutLen, BYTE *pOutStr)
|
|
{
|
|
fb_assert (pStr != NULL);
|
|
fb_assert (pOutStr != NULL);
|
|
fb_assert (iLen <= 32000); /* almost certainly an error */
|
|
fb_assert (iOutLen <= 32000); /* almost certainly an error */
|
|
fb_assert (iOutLen >= iLen);
|
|
const BYTE* const p = pOutStr;
|
|
while (iLen && iOutLen) {
|
|
*pOutStr++ = LOCALE_UPPER (*pStr);
|
|
pStr++;
|
|
iLen--;
|
|
iOutLen--;
|
|
}
|
|
if (iLen != 0)
|
|
return (-1);
|
|
return (pOutStr - p);
|
|
}
|
|
|
|
|
|
static USHORT fam2_to_lower (TEXTTYPE obj, BYTE ch)
|
|
{
|
|
return (LOCALE_LOWER (ch));
|
|
}
|
|
|
|
|
|
|
|
#undef LOCALE_UPPER
|
|
#undef LOCALE_LOWER
|
|
|