1 /* Copyright (C) 1995-2022 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
__wcslen(const wchar_t * s)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
46