1  /*
 2   * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
 3   * All rights reserved.
 4   *
 5   * Redistribution and use in source and binary forms, with or without
 6   * modification, are permitted provided that the following conditions
 7   * are met:
 8   * 1. Redistributions of source code must retain the above copyright
 9   *    notice, this list of conditions and the following disclaimer.
10   * 2. Redistributions in binary form must reproduce the above copyright
11   *    notice, this list of conditions and the following disclaimer in the
12   *    documentation and/or other materials provided with the distribution.
13   * 3. The name of the author may not be used to endorse or promote products
14   *    derived from this software without specific prior written permission.
15   *
16   * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
17   * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
18   * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
19   * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20   * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21   * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22   * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23   * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24   * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25   * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26   *
27   *	from OpenBSD: strlcpy.c,v 1.4 1999/05/01 18:56:41 millert Exp
28   */
29  
30  #include <sys/cdefs.h>
31  #if 0
32  #if defined(LIBC_SCCS) && !defined(lint)
33  __RCSID("$NetBSD: wcslcpy.c,v 1.1 2000/12/23 23:14:36 itojun Exp $");
34  #endif /* LIBC_SCCS and not lint */
35  #endif
36  __FBSDID("$FreeBSD: src/lib/libc/string/wcslcpy.c,v 1.7 2009/02/03 17:58:20 danger Exp $");
37  
38  #include <sys/types.h>
39  #include <wchar.h>
40  
41  /*
42   * Copy src to string dst of size siz.  At most siz-1 characters
43   * will be copied.  Always NUL terminates (unless siz == 0).
44   * Returns wcslen(src); if retval >= siz, truncation occurred.
45   */
46  size_t
47  wcslcpy(wchar_t *dst, const wchar_t *src, size_t siz)
48  {
49  	wchar_t *d = dst;
50  	const wchar_t *s = src;
51  	size_t n = siz;
52  
53  	/* Copy as many bytes as will fit */
54  	if (n != 0 && --n != 0) {
55  		do {
56  			if ((*d++ = *s++) == 0)
57  				break;
58  		} while (--n != 0);
59  	}
60  
61  	/* Not enough room in dst, add NUL and traverse rest of src */
62  	if (n == 0) {
63  		if (siz != 0)
64  			*d = '\0';		/* NUL-terminate dst */
65  		while (*s++)
66  			;
67  	}
68  
69  	return(s - src - 1);	/* count does not include NUL */
70  }