usr/src/lib/libc/port/gen/strsep.c
author Jon Tibble <meths@btinternet.com>
Thu, 09 Dec 2010 22:32:39 +0100
changeset 13255 4afa820d78b9
parent 7478 f2ea9cb5143d
permissions -rw-r--r--
298 SPARC build fails in smt_pause.o 478 Build needs fixing for pkgdepend flag day Reviewed by: [email protected] Reviewed by: [email protected] Reviewed by: [email protected] Approved by: [email protected]
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     1
/*
7478
f2ea9cb5143d PSARC 2008/305 strsep() in libc
Vladimir Kotal <Vladimir.Kotal@Sun.COM>
parents: 0
diff changeset
     2
 * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
f2ea9cb5143d PSARC 2008/305 strsep() in libc
Vladimir Kotal <Vladimir.Kotal@Sun.COM>
parents: 0
diff changeset
     3
 * Use is subject to license terms.
0
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     4
 */
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     5
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     6
/*	$OpenBSD: strsep.c,v 1.3 1997/08/20 04:28:14 millert Exp $	*/
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     7
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     8
/*
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
     9
 * Copyright (c) 1990, 1993
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    10
 *	The Regents of the University of California.  All rights reserved.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    11
 *
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    12
 * Redistribution and use in source and binary forms, with or without
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    13
 * modification, are permitted provided that the following conditions
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    14
 * are met:
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    15
 * 1. Redistributions of source code must retain the above copyright
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    16
 *    notice, this list of conditions and the following disclaimer.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    17
 * 2. Redistributions in binary form must reproduce the above copyright
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    18
 *    notice, this list of conditions and the following disclaimer in the
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    19
 *    documentation and/or other materials provided with the distribution.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    20
 * 3. All advertising materials mentioning features or use of this software
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    21
 *    must display the following acknowledgement:
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    22
 *	This product includes software developed by the University of
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    23
 *	California, Berkeley and its contributors.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    24
 * 4. Neither the name of the University nor the names of its contributors
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    25
 *    may be used to endorse or promote products derived from this software
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    26
 *    without specific prior written permission.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    27
 *
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    28
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    29
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    30
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    31
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    32
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    33
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    34
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    35
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    36
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    37
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    38
 * SUCH DAMAGE.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    39
 */
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    40
7478
f2ea9cb5143d PSARC 2008/305 strsep() in libc
Vladimir Kotal <Vladimir.Kotal@Sun.COM>
parents: 0
diff changeset
    41
#include "lint.h"
0
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    42
#include <string.h>
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    43
#include <stdio.h>
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    44
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    45
#if defined(LIBC_SCCS) && !defined(lint)
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    46
#if 0
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    47
static char sccsid[] = "@(#)strsep.c	8.1 (Berkeley) 6/4/93";
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    48
#else
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    49
static char *rcsid =
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    50
	"$OpenBSD: strsep.c,v 1.3 1997/08/20 04:28:14 millert Exp $";
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    51
#endif
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    52
#endif /* LIBC_SCCS and not lint */
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    53
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    54
/*
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    55
 * Get next token from string *stringp, where tokens are possibly-empty
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    56
 * strings separated by characters from delim.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    57
 *
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    58
 * Writes NULs into the string at *stringp to end tokens.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    59
 * delim need not remain constant from call to call.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    60
 * On return, *stringp points past the last NUL written (if there might
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    61
 * be further tokens), or is NULL (if there are definitely no more tokens).
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    62
 *
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    63
 * If *stringp is NULL, strsep returns NULL.
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    64
 */
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    65
char *
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    66
strsep(char **stringp, const char *delim)
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    67
{
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    68
	register char *s;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    69
	register const char *spanp;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    70
	register int c, sc;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    71
	char *tok;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    72
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    73
	if ((s = *stringp) == NULL)
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    74
		return (NULL);
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    75
	for (tok = s; ; ) {
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    76
		c = *s++;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    77
		spanp = delim;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    78
		do {
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    79
			if ((sc = *spanp++) == c) {
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    80
				if (c == 0)
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    81
					s = NULL;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    82
				else
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    83
					s[-1] = 0;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    84
				*stringp = s;
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    85
				return (tok);
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    86
			}
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    87
		} while (sc != 0);
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    88
	}
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    89
	/* NOTREACHED */
68f95e015346 OpenSolaris Launch
stevel@tonic-gate
parents:
diff changeset
    90
}