lib/libcr/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  */
  29
  30 #include <sys/cdefs.h>
  31 #if defined(LIBC_SCCS) && !defined(lint)
  32 __RCSID("$NetBSD: wcslcpy.c,v 1.1 2000/12/23 23:14:36 itojun Exp $");
  33 #endif /* LIBC_SCCS and not lint */
  34 #ifndef lint
  35 static const char rcsid[] =
  36   "$FreeBSD: src/lib/libc/string/wcslcpy.c,v 1.3.2.1 2001/07/11 23:48:38 obrien Exp $";
  37 #endif
  38
  39 #include <sys/types.h>
  40 #include <assert.h>
  41 #include <wchar.h>
  42
  43 /*
  44  * Copy src to string dst of size siz.  At most siz-1 characters
  45  * will be copied.  Always NUL terminates (unless siz == 0).
  46  * Returns wcslen(src); if retval >= siz, truncation occurred.
  47  */
  48 size_t
  49 wcslcpy(dst, src, siz)
  50         wchar_t *dst;
  51         const wchar_t *src;
  52         size_t siz;
  53 {
  54         wchar_t *d = dst;
  55         const wchar_t *s = src;
  56         size_t n = siz;
  57
  58         /* Copy as many bytes as will fit */
  59         if (n != 0 && --n != 0) {
  60                 do {
  61                         if ((*d++ = *s++) == 0)
  62                                 break;
  63                 } while (--n != 0);
  64         }
  65
  66         /* Not enough room in dst, add NUL and traverse rest of src */
  67         if (n == 0) {
  68                 if (siz != 0)
  69                         *d = '\0';              /* NUL-terminate dst */
  70                 while (*s++)
  71                         ;
  72         }
  73
  74         return(s - src - 1);    /* count does not include NUL */
  75 }