]> pd.if.org Git - pdclib/blob - functions/string/strxfrm.c
Initial checkin.
[pdclib] / functions / string / strxfrm.c
1 /* $Id$ */
2
3 /* Release $Name$ */
4
5 /* strxfrm( char *, const char *, size_t )
6
7    This file is part of the Public Domain C Library (PDCLib).
8    Permission is granted to use, modify, and / or redistribute at will.
9 */
10
11 #include <string.h>
12
13 #ifndef REGTEST
14
15 /* TODO: Dummy function, no locale support yet. */
16 size_t strxfrm( char * _PDCLIB_restrict s1, const char * _PDCLIB_restrict s2, size_t n )
17 {
18     size_t len = strlen( s2 );
19     if ( len < n )
20     {
21         /* Cannot use strncpy() here as the filling of s1 with '\0' is not part
22            of the spec.
23         */
24         while ( n-- && ( *s1++ = *s2++ ) );
25     }
26     return len;
27 }
28
29 #endif
30
31 #ifdef TEST
32 #include <_PDCLIB_test.h>
33
34 int main()
35 {
36     char s[] = "xxxxxxxxxxx";
37     BEGIN_TESTS;
38     TESTCASE( strxfrm( NULL, "123456789012", 0 ) == 12 );
39     TESTCASE( strxfrm( s, "123456789012", 12 ) == 12 );
40     /*
41     The following test case is true in *this* implementation, but doesn't have to.
42     TESTCASE( s[0] == 'x' );
43     */
44     TESTCASE( strxfrm( s, "1234567890", 11 ) == 10 );
45     TESTCASE( s[0] == '1' );
46     TESTCASE( s[9] == '0' );
47     TESTCASE( s[10] == '\0' );
48     return TEST_RESULTS;
49 }
50 #endif
51