sysdeps/powerpc/power6/wcscpy.c

   1 /* wcscpy.c - Wide Character Copy for POWER6+.
   2    Copyright (C) 2012-2014 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; see the file COPYING.LIB.  If
  17    not, see <http://www.gnu.org/licenses/>.  */
  18
  19 #include <stddef.h>
  20 #include <wchar.h>
  21
  22 #ifndef WCSCPY
  23 # define WCSCPY wcscpy
  24 #endif
  25
  26 /* Copy SRC to DEST.  */
  27 wchar_t *
  28 WCSCPY (wchar_t *dest, const wchar_t *src)
  29 {
  30   wint_t c,d;
  31   wchar_t *wcp, *wcp2;
  32
  33   if (__alignof__ (wchar_t) >= sizeof (wchar_t))
  34     {
  35       const ptrdiff_t off = dest - src;
  36
  37       wcp = (wchar_t *) src;
  38       wcp2 = wcp + 1 ;
  39
  40       do
  41         {
  42           d = *wcp;
  43           wcp[off] = d;
  44           if (d == L'\0')
  45             return dest;
  46           wcp += 2;
  47
  48           c = *wcp2;
  49           wcp2[off] = c;
  50           if (c == L'\0')
  51             return dest;
  52           wcp2 += 2;
  53
  54           d = *wcp;
  55           wcp[off] = d;
  56           if (d == L'\0')
  57             return dest;
  58           wcp += 2;
  59
  60           c = *wcp2;
  61           wcp2[off] = c;
  62           if (c == L'\0')
  63             return dest;
  64           wcp2 += 2;
  65
  66           d = *wcp;
  67           wcp[off] = d;
  68           if (d == L'\0')
  69             return dest;
  70           wcp += 2;
  71
  72           c = *wcp2;
  73           wcp2[off] = c;
  74           if (c == L'\0')
  75             return dest;
  76           wcp2 += 2;
  77
  78           d = *wcp;
  79           wcp[off] = d;
  80           if (d == L'\0')
  81             return dest;
  82           wcp += 2;
  83
  84           c = *wcp2;
  85           wcp2[off] = c;
  86           if (c == L'\0')
  87             return dest;
  88           wcp2 += 2;
  89         }
  90       while (c != L'\0');
  91
  92     }
  93   else
  94     {
  95       wcp = dest;
  96
  97       do
  98         {
  99           c = *src++;
 100           *wcp++ = c;
 101         }
 102       while (c != L'\0');
 103     }
 104   return dest;
 105 }