17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*7257d1b4Sraf * Common Development and Distribution License (the "License").
6*7257d1b4Sraf * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate *
87c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate * and limitations under the License.
127c478bd9Sstevel@tonic-gate *
137c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate *
197c478bd9Sstevel@tonic-gate * CDDL HEADER END
207c478bd9Sstevel@tonic-gate */
21e8031f0aSraf
227c478bd9Sstevel@tonic-gate /*
23*7257d1b4Sraf * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
247c478bd9Sstevel@tonic-gate * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate */
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate /* Copyright (c) 1986 AT&T */
287c478bd9Sstevel@tonic-gate /* All Rights Reserved */
297c478bd9Sstevel@tonic-gate
307c478bd9Sstevel@tonic-gate /*
317c478bd9Sstevel@tonic-gate * uses wcspbrk and wcsspn to break string into tokens on
327c478bd9Sstevel@tonic-gate * sequentially subsequent calls. returns WNULL when no
337c478bd9Sstevel@tonic-gate * non-separator characters remain.
347c478bd9Sstevel@tonic-gate * 'subsequent' calls are calls with first argument WNULL.
357c478bd9Sstevel@tonic-gate */
367c478bd9Sstevel@tonic-gate
37*7257d1b4Sraf #pragma weak _wstok = wstok
387c478bd9Sstevel@tonic-gate
39*7257d1b4Sraf #include "lint.h"
407c478bd9Sstevel@tonic-gate #include "mtlib.h"
417c478bd9Sstevel@tonic-gate #include "mse_int.h"
427c478bd9Sstevel@tonic-gate #include <stdlib.h>
437c478bd9Sstevel@tonic-gate #include <wchar.h>
447c478bd9Sstevel@tonic-gate #include <thread.h>
457c478bd9Sstevel@tonic-gate #include "libc.h"
467c478bd9Sstevel@tonic-gate #include "tsd.h"
477c478bd9Sstevel@tonic-gate
487c478bd9Sstevel@tonic-gate #ifndef WNULL
497c478bd9Sstevel@tonic-gate #define WNULL (wchar_t *)0
507c478bd9Sstevel@tonic-gate #endif
517c478bd9Sstevel@tonic-gate
527c478bd9Sstevel@tonic-gate wchar_t *
__wcstok_xpg5(wchar_t * string,const wchar_t * sepset,wchar_t ** ptr)537c478bd9Sstevel@tonic-gate __wcstok_xpg5(wchar_t *string, const wchar_t *sepset, wchar_t **ptr)
547c478bd9Sstevel@tonic-gate {
557c478bd9Sstevel@tonic-gate wchar_t *q, *r;
567c478bd9Sstevel@tonic-gate
577c478bd9Sstevel@tonic-gate /* first or subsequent call */
587c478bd9Sstevel@tonic-gate if ((string == WNULL && (string = *ptr) == 0) ||
597c478bd9Sstevel@tonic-gate (((q = string + wcsspn(string, sepset)) != WNULL) && *q == L'\0'))
607c478bd9Sstevel@tonic-gate return (WNULL);
617c478bd9Sstevel@tonic-gate
627c478bd9Sstevel@tonic-gate /* sepset becomes next string after separator */
637c478bd9Sstevel@tonic-gate if ((r = wcspbrk(q, sepset)) == WNULL) /* move past token */
647c478bd9Sstevel@tonic-gate *ptr = 0; /* indicate this is last token */
657c478bd9Sstevel@tonic-gate else {
667c478bd9Sstevel@tonic-gate *r = L'\0';
677c478bd9Sstevel@tonic-gate *ptr = r + 1;
687c478bd9Sstevel@tonic-gate }
697c478bd9Sstevel@tonic-gate return (q);
707c478bd9Sstevel@tonic-gate }
717c478bd9Sstevel@tonic-gate
727c478bd9Sstevel@tonic-gate
737c478bd9Sstevel@tonic-gate wchar_t *
wcstok(wchar_t * string,const wchar_t * sepset)747c478bd9Sstevel@tonic-gate wcstok(wchar_t *string, const wchar_t *sepset)
757c478bd9Sstevel@tonic-gate {
767c478bd9Sstevel@tonic-gate wchar_t **lasts = tsdalloc(_T_WCSTOK, sizeof (wchar_t *), NULL);
777c478bd9Sstevel@tonic-gate
787c478bd9Sstevel@tonic-gate if (lasts == NULL)
797c478bd9Sstevel@tonic-gate return (NULL);
807c478bd9Sstevel@tonic-gate return (__wcstok_xpg5(string, sepset, lasts));
817c478bd9Sstevel@tonic-gate }
827c478bd9Sstevel@tonic-gate
837c478bd9Sstevel@tonic-gate wchar_t *
wstok(wchar_t * string,const wchar_t * sepset)84*7257d1b4Sraf wstok(wchar_t *string, const wchar_t *sepset)
857c478bd9Sstevel@tonic-gate {
867c478bd9Sstevel@tonic-gate return (wcstok(string, sepset));
877c478bd9Sstevel@tonic-gate }
88