X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstring%2Fstrxfrm.c;h=3ea8d0fab6259c0f8c983eb4548a7d005fe037c9;hb=cd6cfe0f578c4f744ddc9a342243aff6b42f8027;hp=a971e38d572ada95e9a5a7168ccb4365a0465566;hpb=c8f799d852e3698468a78954d82588e841cc0b70;p=pdclib.old diff --git a/functions/string/strxfrm.c b/functions/string/strxfrm.c index a971e38..3ea8d0f 100644 --- a/functions/string/strxfrm.c +++ b/functions/string/strxfrm.c @@ -1,23 +1,50 @@ -/* ---------------------------------------------------------------------------- - * $Id$ - * ---------------------------------------------------------------------------- - * Public Domain C Library - http://pdclib.sourceforge.net - * This code is Public Domain. Use, modify, and redistribute at will. - * --------------------------------------------------------------------------*/ +/* $Id$ */ -#include <__size_t.h> +/* strxfrm( char *, const char *, size_t ) -/* TODO: Dummy function, no locale support yet. */ + This file is part of the Public Domain C Library (PDCLib). + Permission is granted to use, modify, and / or redistribute at will. +*/ -size_t strlen( const char * src ); -char * strncpy( char * restrict dest, const char * restrict src, size_t n ); +#include -size_t strxfrm( char * restrict dest, const char * restrict src, size_t n ) +#ifndef REGTEST + +#include <_PDCLIB_locale.h> + +size_t strxfrm( char * _PDCLIB_restrict s1, const char * _PDCLIB_restrict s2, size_t n ) { - size_t len = strlen( src ); + _PDCLIB_ctype_t *ctype = _PDCLIB_threadlocale()->_CType; + size_t len = strlen( s2 ); if ( len < n ) { - strncpy( dest, src, len ); + /* Cannot use strncpy() here as the filling of s1 with '\0' is not part + of the spec. + */ + while ( n-- && ( *s1++ = ctype[(unsigned char)*s2++].collation ) ); } return len; } + +#endif + +#ifdef TEST +#include <_PDCLIB_test.h> + +int main( void ) +{ + char s[] = "xxxxxxxxxxx"; + TESTCASE( strxfrm( NULL, "123456789012", 0 ) == 12 ); + TESTCASE( strxfrm( s, "123456789012", 12 ) == 12 ); + /* + The following test case is true in *this* implementation, but doesn't have to. + TESTCASE( s[0] == 'x' ); + */ + TESTCASE( strxfrm( s, "1234567890", 11 ) == 10 ); + TESTCASE( s[0] == '1' ); + TESTCASE( s[9] == '0' ); + TESTCASE( s[10] == '\0' ); + return TEST_RESULTS; +} +#endif +