libc: proper FreeBSD version and some Mt macros for mails
[dragonfly.git] / lib / libc / string / wcslcpy.c
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  * $FreeBSD: head/lib/libc/string/wcslcpy.c 188080 2009-02-03 17:58:20Z danger $
29  */
30
31 #include <sys/types.h>
32 #include <wchar.h>
33
34 /*
35  * Copy src to string dst of size siz.  At most siz-1 characters
36  * will be copied.  Always NUL terminates (unless siz == 0).
37  * Returns wcslen(src); if retval >= siz, truncation occurred.
38  */
39 size_t
40 wcslcpy(wchar_t *dst, const wchar_t *src, size_t siz)
41 {
42         wchar_t *d = dst;
43         const wchar_t *s = src;
44         size_t n = siz;
45
46         /* Copy as many bytes as will fit */
47         if (n != 0 && --n != 0) {
48                 do {
49                         if ((*d++ = *s++) == 0)
50                                 break;
51                 } while (--n != 0);
52         }
53
54         /* Not enough room in dst, add NUL and traverse rest of src */
55         if (n == 0) {
56                 if (siz != 0)
57                         *d = '\0';              /* NUL-terminate dst */
58                 while (*s++)
59                         ;
60         }
61
62         return(s - src - 1);    /* count does not include NUL */
63 }