text: /* Copyright (C) 1995-2016 Free Software Foundation, Inc.
     This file is part of the GNU C Library.
     Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, 1995.
  
     The GNU C Library is free software; you can redistribute it and/or
     modify it under the terms of the GNU Lesser General Public
     License as published by the Free Software Foundation; either
     version 2.1 of the License, or (at your option) any later version.
  
     The GNU C Library is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
     Lesser General Public License for more details.
  
     You should have received a copy of the GNU Lesser General Public
     License along with the GNU C Library; if not, see
     <http://www.gnu.org/licenses/>.  */
  
  #include <wchar.h>
  
  #ifdef WCSNCPY
  # define __wcsncpy WCSNCPY
  #endif
  
  /* Copy no more than N wide-characters of SRC to DEST.	*/
  wchar_t *
  __wcsncpy (wchar_t *dest, const wchar_t *src, size_t n)
  {
    wint_t c;
    wchar_t *const s = dest;
  
    --dest;
  
    if (n >= 4)
      {
        size_t n4 = n >> 2;
  
        for (;;)
  	{
  	  c = *src++;
  	  *++dest = c;
  	  if (c == L'\0')
  	    break;
  	  c = *src++;
  	  *++dest = c;
  	  if (c == L'\0')
  	    break;
  	  c = *src++;
  	  *++dest = c;
  	  if (c == L'\0')
  	    break;
  	  c = *src++;
  	  *++dest = c;
  	  if (c == L'\0')
  	    break;
  	  if (--n4 == 0)
  	    goto last_chars;
  	}
        n = n - (dest - s) - 1;
        if (n == 0)
  	return s;
        goto zero_fill;
      }
  
   last_chars:
    n &= 3;
    if (n == 0)
      return s;
  
    do
      {
        c = *src++;
        *++dest = c;
        if (--n == 0)
  	return s;
      }
    while (c != L'\0');
  
   zero_fill:
    do
      *++dest = L'\0';
    while (--n > 0);
  
    return s;
  }
  #ifndef WCSNCPY
  weak_alias (__wcsncpy, wcsncpy)
  #endif
  