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