1#include "config.h"
2
3#if HAVE_STRSEP
4
5int dummy;
6
7#else
8
9/*	$Id: compat_strsep.c,v 1.4 2014/12/11 09:05:01 schwarze Exp $	*/
10/*	$OpenBSD: strsep.c,v 1.7 2014/02/05 20:42:32 stsp Exp $	*/
11
12/*-
13 * Copyright (c) 1990, 1993
14 *	The Regents of the University of California.  All rights reserved.
15 *
16 * Redistribution and use in source and binary forms, with or without
17 * modification, are permitted provided that the following conditions
18 * are met:
19 * 1. Redistributions of source code must retain the above copyright
20 *    notice, this list of conditions and the following disclaimer.
21 * 2. Redistributions in binary form must reproduce the above copyright
22 *    notice, this list of conditions and the following disclaimer in the
23 *    documentation and/or other materials provided with the distribution.
24 * 3. Neither the name of the University nor the names of its contributors
25 *    may be used to endorse or promote products derived from this software
26 *    without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * SUCH DAMAGE.
39 */
40
41/*
42 * Get next token from string *stringp, where tokens are possibly-empty
43 * strings separated by characters from delim.
44 *
45 * Writes NULs into the string at *stringp to end tokens.
46 * delim need not remain constant from call to call.
47 * On return, *stringp points past the last NUL written (if there might
48 * be further tokens), or is NULL (if there are definitely no more tokens).
49 *
50 * If *stringp is NULL, strsep returns NULL.
51 */
52char *
53strsep(char **stringp, const char *delim)
54{
55	char *s;
56	const char *spanp;
57	int c, sc;
58	char *tok;
59
60	if ((s = *stringp) == NULL)
61		return (NULL);
62	for (tok = s;;) {
63		c = *s++;
64		spanp = delim;
65		do {
66			if ((sc = *spanp++) == c) {
67				if (c == 0)
68					s = NULL;
69				else
70					s[-1] = 0;
71				*stringp = s;
72				return (tok);
73			}
74		} while (sc != 0);
75	}
76	/* NOTREACHED */
77}
78
79#endif
80