10Sstevel@tonic-gate /*
20Sstevel@tonic-gate * CDDL HEADER START
30Sstevel@tonic-gate *
40Sstevel@tonic-gate * The contents of this file are subject to the terms of the
50Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
60Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
70Sstevel@tonic-gate * with the License.
80Sstevel@tonic-gate *
90Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
100Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
110Sstevel@tonic-gate * See the License for the specific language governing permissions
120Sstevel@tonic-gate * and limitations under the License.
130Sstevel@tonic-gate *
140Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
150Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
160Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
170Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
180Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
190Sstevel@tonic-gate *
200Sstevel@tonic-gate * CDDL HEADER END
210Sstevel@tonic-gate */
22*372Smike_s
23*372Smike_s /*
24*372Smike_s * Copyright 2005 Sun Microsystems, Inc. All rights reserved.
25*372Smike_s * Use is subject to license terms.
26*372Smike_s */
27*372Smike_s
280Sstevel@tonic-gate /* Copyright (c) 1988 AT&T */
290Sstevel@tonic-gate /* All Rights Reserved */
300Sstevel@tonic-gate
310Sstevel@tonic-gate
320Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI"
330Sstevel@tonic-gate
340Sstevel@tonic-gate /*
350Sstevel@tonic-gate * This is exactly strtok(3C).
360Sstevel@tonic-gate * It is here, with a different name, because using strtok() within
370Sstevel@tonic-gate * the scope of errverb() can cause the loss of a currently remembered
380Sstevel@tonic-gate * string(savept).
390Sstevel@tonic-gate */
400Sstevel@tonic-gate
410Sstevel@tonic-gate /*
420Sstevel@tonic-gate * uses strpbrk and strspn to break string into tokens on
430Sstevel@tonic-gate * sequentially subsequent calls. returns NULL when no
440Sstevel@tonic-gate * non-separator characters remain.
450Sstevel@tonic-gate * `subsequent' calls are calls with first argument NULL.
460Sstevel@tonic-gate */
470Sstevel@tonic-gate
48*372Smike_s #include <string.h>
490Sstevel@tonic-gate
500Sstevel@tonic-gate char *
errstrtok(char * string,char * sepset)51*372Smike_s errstrtok(char *string, char *sepset)
520Sstevel@tonic-gate {
53*372Smike_s char *p, *q, *r;
540Sstevel@tonic-gate static char *savept;
550Sstevel@tonic-gate
560Sstevel@tonic-gate /* first or subsequent call */
570Sstevel@tonic-gate p = (string == NULL)? savept: string;
580Sstevel@tonic-gate
590Sstevel@tonic-gate if (p == 0) /* return if no tokens remaining */
600Sstevel@tonic-gate return (NULL);
610Sstevel@tonic-gate
620Sstevel@tonic-gate q = p + strspn(p, sepset); /* skip leading separators */
630Sstevel@tonic-gate
640Sstevel@tonic-gate if (*q == '\0') /* return if no tokens remaining */
650Sstevel@tonic-gate return (NULL);
660Sstevel@tonic-gate
670Sstevel@tonic-gate if ((r = strpbrk(q, sepset)) == NULL) /* move past token */
680Sstevel@tonic-gate savept = 0; /* indicate this is last token */
690Sstevel@tonic-gate else {
700Sstevel@tonic-gate *r = '\0';
710Sstevel@tonic-gate savept = ++r;
720Sstevel@tonic-gate }
730Sstevel@tonic-gate return (q);
740Sstevel@tonic-gate }
75