1  /* Copyright (C) 1995-2023 Free Software Foundation, Inc.
       2     This file is part of the GNU C Library.
       3  
       4     The GNU C Library is free software; you can redistribute it and/or
       5     modify it under the terms of the GNU Lesser General Public
       6     License as published by the Free Software Foundation; either
       7     version 2.1 of the License, or (at your option) any later version.
       8  
       9     The GNU C Library is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      12     Lesser General Public License for more details.
      13  
      14     You should have received a copy of the GNU Lesser General Public
      15     License along with the GNU C Library; if not, see
      16     <https://www.gnu.org/licenses/>.  */
      17  
      18  #include <wchar.h>
      19  
      20  /* Return length of string S.  */
      21  #ifdef WCSLEN
      22  # define __wcslen WCSLEN
      23  #endif
      24  
      25  size_t
      26  __wcslen (const wchar_t *s)
      27  {
      28    size_t len = 0;
      29  
      30    while (s[len] != L'\0')
      31      {
      32        if (s[++len] == L'\0')
      33  	return len;
      34        if (s[++len] == L'\0')
      35  	return len;
      36        if (s[++len] == L'\0')
      37  	return len;
      38        ++len;
      39      }
      40  
      41    return len;
      42  }
      43  #ifndef WCSLEN
      44  weak_alias (__wcslen, wcslen)
      45  #endif