xref: /titanic_50/usr/src/lib/libc/port/i18n/wcswcs.c (revision 9113a79cf228b8f7bd509b1328adf88659dfe218)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma ident	"%Z%%M%	%I%	%E% SMI"
28 
29 /*	Copyright (c) 1986 AT&T	*/
30 /*	  All Rights Reserved  	*/
31 
32 
33 /*	This module is created for NLS on Sep.03.86		*/
34 
35 /*
36  * Returns a pointer to the first occurrnce of ws1 in ws2.
37  */
38 
39 #pragma weak wcswcs = _wcswcs
40 
41 #include "lint.h"
42 #include <stdlib.h>
43 
44 wchar_t *
45 _wcswcs(const wchar_t *ws1, const wchar_t *ws2)
46 {
47 	const wchar_t *s1, *s2;
48 	const wchar_t *tptr;
49 	wchar_t c;
50 
51 	s1 = ws1;
52 	s2 = ws2;
53 
54 	if (s2 == NULL || *s2 == 0)
55 		return ((wchar_t *)s1);
56 	c = *s2;
57 
58 	while (*s1)
59 		if (*s1++ == c) {
60 			tptr = s1;
61 			while ((c = *++s2) == *s1++ && c)
62 				;
63 			if (c == 0)
64 				return ((wchar_t *)tptr - 1);
65 			s1 = tptr;
66 			s2 = ws2;
67 			c = *s2;
68 		}
69 	return (NULL);
70 }
71