File: strtok.c

package info (click to toggle)
skiboot 7.0%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid
  • size: 35,624 kB
  • sloc: ansic: 221,198; sh: 11,580; cpp: 5,767; python: 3,421; makefile: 1,773; asm: 1,503; perl: 1,479; tcl: 1,188; pascal: 107
file content (48 lines) | stat: -rw-r--r-- 1,001 bytes parent folder | download | duplicates (9)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
/******************************************************************************
 * Copyright (c) 2004, 2008 IBM Corporation
 * All rights reserved.
 * This program and the accompanying materials
 * are made available under the terms of the BSD License
 * which accompanies this distribution, and is available at
 * http://www.opensource.org/licenses/bsd-license.php
 *
 * Contributors:
 *     IBM Corporation - initial implementation
 *****************************************************************************/

#include <stddef.h>

char *strtok(char *src, const char *pattern);
char *strtok(char *src, const char *pattern)
{
	static char *nxtTok;
	char *retVal = NULL;

	if (!src) {
		src = nxtTok;
		if (!src)
			return retVal;
	}

	while (*src) {
		const char *pp = pattern;
		while (*pp) {
			if (*pp == *src) {
				break;
			}
			pp++;
		}
		if (!*pp) {
			if (!retVal)
				retVal = src;
			else if (!src[-1])
				break;
		} else
			*src = '\0';
		src++;
	}

	nxtTok = src;

	return retVal;
}