Mercurial > hg > index.cgi
comparison lwlib/lw_string.c @ 0:2c24602be78f
Initial import from lwtools 3.0.1 version, with new hand built build system and file reorganization
author | lost@l-w.ca |
---|---|
date | Wed, 19 Jan 2011 22:27:17 -0700 |
parents | |
children | 8e25147c2aa8 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:2c24602be78f |
---|---|
1 /* | |
2 lw_string.c | |
3 | |
4 Copyright © 2010 William Astle | |
5 | |
6 This file is part of LWTOOLS. | |
7 | |
8 LWTOOLS is free software: you can redistribute it and/or modify it under the | |
9 terms of the GNU General Public License as published by the Free Software | |
10 Foundation, either version 3 of the License, or (at your option) any later | |
11 version. | |
12 | |
13 This program is distributed in the hope that it will be useful, but WITHOUT | |
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
16 more details. | |
17 | |
18 You should have received a copy of the GNU General Public License along with | |
19 this program. If not, see <http://www.gnu.org/licenses/>. | |
20 */ | |
21 | |
22 #include <string.h> | |
23 #include <stdlib.h> | |
24 | |
25 #define ___lw_string_c_seen___ | |
26 #include "lw_alloc.h" | |
27 #include "lw_string.h" | |
28 | |
29 char *lw_strdup(const char *s) | |
30 { | |
31 char *r; | |
32 | |
33 if (!s) | |
34 s = "(null)"; | |
35 | |
36 r = lw_alloc(strlen(s) + 1); | |
37 strcpy(r, s); | |
38 return r; | |
39 } | |
40 | |
41 char *lw_strndup(const char *s, int len) | |
42 { | |
43 char *r; | |
44 int sl; | |
45 | |
46 sl = strlen(s); | |
47 if (sl > len) | |
48 sl = len; | |
49 | |
50 r = lw_alloc(sl + 1); | |
51 memmove(r, s, sl); | |
52 r[sl] = '\0'; | |
53 return r; | |
54 } | |
55 | |
56 char *lw_token(const char *s, int sep, const char **ap) | |
57 { | |
58 const char *p; | |
59 char *r; | |
60 | |
61 if (!s) | |
62 return NULL; | |
63 | |
64 p = strchr(s, sep); | |
65 if (!p) | |
66 { | |
67 if (ap) | |
68 *ap = NULL; | |
69 return lw_strdup(s); | |
70 } | |
71 | |
72 r = lw_alloc(p - s + 1); | |
73 strncpy(r, (char *)s, p - s); | |
74 r[p - s] = '\0'; | |
75 | |
76 if (ap) | |
77 { | |
78 while (*p && *p == sep) | |
79 p++; | |
80 *ap = p; | |
81 } | |
82 return r; | |
83 } |