Mercurial > code
annotate port/strsep.c @ 159:94847374833b
Fix array.c for _clear
author | David Demelier <markand@malikania.fr> |
---|---|
date | Mon, 23 Jul 2012 15:56:16 +0200 |
parents | b1a084c030c8 |
children |
rev | line source |
---|---|
78
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
1 /* |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
2 * strsep.c -- separate a string by delimiters |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
3 * |
98 | 4 * Copyright (c) 2011, 2012, David Demelier <markand@malikania.fr> |
78
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
5 * |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
6 * Permission to use, copy, modify, and/or distribute this software for any |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
7 * purpose with or without fee is hereby granted, provided that the above |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
8 * copyright notice and this permission notice appear in all copies. |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
9 * |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
17 */ |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
18 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
19 #include <stdlib.h> |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
20 #include <string.h> |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
21 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
22 char * |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
23 strsep(char **stringp, const char *delim) |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
24 { |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
25 char *item, *ptr; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
26 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
27 if (*stringp == NULL || delim[0] == '\0') |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
28 return NULL; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
29 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
30 item = *stringp; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
31 if ((ptr = strpbrk(*stringp, delim)) == NULL) { |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
32 *stringp = NULL; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
33 return item; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
34 } |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
35 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
36 *ptr = '\0'; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
37 *stringp = ptr + 1; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
38 |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
39 return item; |
ad60e5ebd92c
Import strsep portable function
David Demelier <markand@malikania.fr>
parents:
diff
changeset
|
40 } |