mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
149 lines
4.6 KiB
149 lines
4.6 KiB
/***
|
|
*strxfrm.c - Transform a string using locale information
|
|
*
|
|
* Copyright (c) 1988-1993, Microsoft Corporation. All rights reserved.
|
|
*
|
|
*Purpose:
|
|
* Transform a string using the locale information as set by
|
|
* LC_COLLATE.
|
|
*
|
|
*Revision History:
|
|
* 03-21-89 JCR Module created.
|
|
* 06-20-89 JCR Removed _LOAD_DGROUP code
|
|
* 02-27-90 GJF Fixed calling type, #include <cruntime.h>, fixed
|
|
* copyright.
|
|
* 10-02-90 GJF New-style function declarator.
|
|
* 10-02-91 ETC Non-C locale support under _INTL switch.
|
|
* 12-09-91 ETC Updated api; added multithread.
|
|
* 12-18-91 ETC Don't convert output of LCMapString.
|
|
* 08-18-92 KRS Activate NLS API. Fix behavior.
|
|
* 09-02-92 SRW Get _INTL definition via ..\crt32.def
|
|
* 12-11-92 SKS Need to handle count=0 in non-INTL code
|
|
* 12-15-92 KRS Handle return value according to ANSI.
|
|
* 01-18-93 CFW Removed unreferenced variable "dummy".
|
|
* 09-27-93 CFW Use NLS API calls properly.
|
|
*
|
|
*******************************************************************************/
|
|
|
|
#include <cruntime.h>
|
|
#include <string.h>
|
|
#include <limits.h>
|
|
#include <malloc.h>
|
|
#include <locale.h>
|
|
#include <setlocal.h>
|
|
#include <os2dll.h>
|
|
|
|
/***
|
|
*size_t strxfrm() - Transform a string using locale information
|
|
*
|
|
*Purpose:
|
|
* Transform the string pointer to by _string2 and place the
|
|
* resulting string into the array pointer to by _string1.
|
|
* No more than _count characters are place into the
|
|
* resulting string (including the null).
|
|
*
|
|
* The transformation is such that if strcmp() is applied to
|
|
* the two transformed strings, the return value is equal to
|
|
* the result of strcoll() applied to the two original strings.
|
|
* Thus, the conversion must take the locale LC_COLLATE info
|
|
* into account.
|
|
* [ANSI]
|
|
*
|
|
* The value of the following expression is the size of the array
|
|
* needed to hold the transformation of the source string:
|
|
*
|
|
* 1 + strxfrm(NULL,string,0)
|
|
*
|
|
* NOTE: Currently, the C libraries support the "C" locale only.
|
|
* Thus, strxfrm() simply resolves to strncpy()/strlen().
|
|
*
|
|
*Entry:
|
|
* char *_string1 = result string
|
|
* const char *_string2 = source string
|
|
* size_t _count = max chars to move
|
|
*
|
|
* [If _count is 0, _string1 is permitted to by NULL.]
|
|
*
|
|
*Exit:
|
|
* Length of the transformed string (not including the terminating
|
|
* null). If the value returned is >= _count, the contents of the
|
|
* _string1 array are indeterminate.
|
|
*
|
|
*Exceptions:
|
|
* Non-standard: if OM/API error, return INT_MAX.
|
|
*
|
|
*******************************************************************************/
|
|
|
|
size_t _CRTAPI1 strxfrm (
|
|
char *_string1,
|
|
const char *_string2,
|
|
size_t _count
|
|
)
|
|
{
|
|
#ifndef _INTL
|
|
strncpy(_string1, _string2, _count);
|
|
return strlen(_string2);
|
|
#else
|
|
wchar_t *wsrc = NULL; /* wide version of string in original case */
|
|
wchar_t *wdst = NULL; /* wide version of string in alternate case */
|
|
int srclen; /* general purpose length of source string */
|
|
int dstlen; /* len of wdst string, wide chars, no null */
|
|
int retval = INT_MAX; /* NON-ANSI: default if OM or API error */
|
|
|
|
_mlock (_LC_CTYPE_LOCK);
|
|
_mlock (_LC_COLLATE_LOCK);
|
|
|
|
if ((_lc_handle[LC_COLLATE] == _CLOCALEHANDLE) &&
|
|
(_lc_codepage == _CLOCALECP)) {
|
|
_munlock (_LC_CTYPE_LOCK);
|
|
_munlock (_LC_COLLATE_LOCK);
|
|
strncpy(_string1, _string2, _count);
|
|
return strlen(_string2);
|
|
}
|
|
|
|
/* Algorithm for non-C locale: */
|
|
/* Convert string to wide-character wsrc string */
|
|
/* Map wrc string to wide-character wdst string in alternate case */
|
|
/* Convert wdst string to char string and place in user buffer */
|
|
|
|
/* Allocate maximum required space for wsrc */
|
|
srclen = strlen(_string2) * sizeof(wchar_t);
|
|
if ((wsrc = (wchar_t *) malloc(srclen)) == NULL)
|
|
goto error_cleanup;
|
|
|
|
/* Convert string to wide-character wsrc string */
|
|
if ((srclen=MultiByteToWideChar(_lc_codepage,MB_PRECOMPOSED, _string2,
|
|
-1, wsrc, srclen)) == 0)
|
|
goto error_cleanup;
|
|
|
|
/* Need to transform into a buffer and then copy _count bytes
|
|
from the buffer to user string; API will fail if target string
|
|
not long enough */
|
|
|
|
/* Inquire size of wdst string */
|
|
if ((dstlen = LCMapStringW(_lc_handle[LC_COLLATE],
|
|
LCMAP_SORTKEY, wsrc, srclen, NULL, 0)) == 0)
|
|
goto error_cleanup;
|
|
|
|
/* Allocate space for wdst - dstlen is in bytes */
|
|
if ((wdst = (wchar_t *) malloc(dstlen)) == NULL)
|
|
goto error_cleanup;
|
|
|
|
/* Map wrc string to wide-character wdst string in alternate case */
|
|
if (LCMapStringW(_lc_handle[LC_COLLATE], LCMAP_SORTKEY,
|
|
wsrc, srclen, wdst, dstlen) == 0)
|
|
goto error_cleanup;
|
|
|
|
retval = strlen((char *)wdst);
|
|
/* Copy _count bytes to user buffer, or up to first null */
|
|
strncpy (_string1, (char *) wdst, _count);
|
|
|
|
error_cleanup:
|
|
_munlock (_LC_CTYPE_LOCK);
|
|
_munlock (_LC_COLLATE_LOCK);
|
|
free (wsrc);
|
|
free (wdst);
|
|
return (size_t)retval;
|
|
|
|
#endif /* _INTL */
|
|
}
|