]> pd.if.org Git - pdclib/blob - functions/string/strncpy.c
Corrected _PDCLIB_CHAR_SIGNED handling.
[pdclib] / functions / string / strncpy.c
1 /* strncpy( char *, const char *, size_t )
2
3    This file is part of the Public Domain C Library (PDCLib).
4    Permission is granted to use, modify, and / or redistribute at will.
5 */
6
7 #include <string.h>
8
9 #ifndef REGTEST
10
11 char * strncpy( char * _PDCLIB_restrict s1, const char * _PDCLIB_restrict s2, size_t n )
12 {
13     char * rc = s1;
14     while ( ( n > 0 ) && ( *s1++ = *s2++ ) )
15     {
16         /* Cannot do "n--" in the conditional as size_t is unsigned and we have
17            to check it again for >0 in the next loop below, so we must not risk
18            underflow.
19         */
20         --n;
21     }
22     /* Checking against 1 as we missed the last --n in the loop above. */
23     while ( n-- > 1 )
24     {
25         *s1++ = '\0';
26     }
27     return rc;
28 }
29
30 #endif
31
32 #ifdef TEST
33
34 #include "_PDCLIB_test.h"
35
36 int main( void )
37 {
38     char s[] = "xxxxxxx";
39     TESTCASE( strncpy( s, "", 1 ) == s );
40     TESTCASE( s[0] == '\0' );
41     TESTCASE( s[1] == 'x' );
42     TESTCASE( strncpy( s, abcde, 6 ) == s );
43     TESTCASE( s[0] == 'a' );
44     TESTCASE( s[4] == 'e' );
45     TESTCASE( s[5] == '\0' );
46     TESTCASE( s[6] == 'x' );
47     TESTCASE( strncpy( s, abcde, 7 ) == s );
48     TESTCASE( s[6] == '\0' );
49     TESTCASE( strncpy( s, "xxxx", 3 ) == s );
50     TESTCASE( s[0] == 'x' );
51     TESTCASE( s[2] == 'x' );
52     TESTCASE( s[3] == 'd' );
53     return TEST_RESULTS;
54 }
55
56 #endif