source: MondoRescue/branches/3.3/mondo/src/lib/mr_str.c@ 3723

Last change on this file since 3723 was 3723, checked in by Bruno Cornec, 5 years ago

Fix #850 when string analyzed is empty

  • Property svn:eol-style set to native
File size: 5.4 KB
Line 
1/*
2 * $Id$
3 *
4 * New generation of string handling functions safe from a memory management point of view
5 * Developped by Andree Leidenfrost
6 */
7
8#include <stdlib.h>
9#include <stdio.h>
10#include <string.h>
11#include <time.h>
12
13#include "mr_mem.h"
14
15// to get bool type
16#define _MY_STUFF_H_
17#include "my-stuff.h"
18
19/**
20 * Safe alternative to standard function strtok()
21 * @param instr
22 * @param delims
23 * @param lastpos
24 * @return @p
25 * @note this function allocates memory that needs to be freed by caller
26 **/
27char *mr_strtok(char *instr, const char *delims, int *lastpos) {
28
29char *token = NULL;
30char *strptr = NULL;
31size_t pos1 = 0;
32size_t pos2 = 0;
33
34if (instr == NULL) {
35 *lastpos = 0;
36 return token;
37}
38
39if (delims == NULL) {
40 *lastpos = 0;
41 return token;
42}
43
44if (strlen(instr) <= *lastpos) {
45 *lastpos = 0;
46 return token;
47}
48
49strptr = instr + *lastpos;
50pos2 = strspn(strptr, delims);
51strptr += pos2;
52pos1 = strcspn(strptr, delims);
53token = (char *)mr_malloc(sizeof(*token) * (pos1 + 1));
54strncpy(token, strptr, pos1);
55token[pos1] = '\0';
56*lastpos = *lastpos + pos1 + pos2 + 1;
57
58return token;
59}
60
61
62/**
63 * Returns the string fed to it 'inptr' with all characters to escape given
64 * in 'toesc' prepended by escaping character 'escchr'.
65 * (Prepare strings for use in system() or popen() with this function.)
66 * @param instr
67 * @param toesc
68 * @param escchr
69 * @note this function allocates memory that needs to be freed by caller
70 **/
71char *mr_stresc(char *instr, char *toesc, const char escchr, const char specialchr) {
72
73char *inptr = NULL;
74char *retstr = NULL;
75char *retptr = NULL;
76char *escptr = NULL;
77int cnt = 0;
78bool found = FALSE;
79
80inptr = instr;
81// Count how many characters need escaping.
82while (*inptr != '\0') {
83 escptr = toesc;
84 while (*escptr != '\0') {
85 if (*inptr == *escptr) {
86 // Found it, skip the rest.
87 cnt++;
88 // if specialchar (' or ") then replace it with '\'' or "\"" so adds 2 chars
89 if (*inptr == specialchr) {
90 cnt += 2;
91 }
92 break;
93 }
94 escptr++;
95 }
96 inptr++;
97}
98
99inptr = instr;
100retstr = (char *) mr_malloc(strlen(inptr) + cnt + 1);
101retptr = retstr;
102
103// Prepend specified characters with escape character.
104while (*inptr != '\0') {
105 escptr = toesc;
106 while (*escptr != '\0') {
107 if (*inptr == *escptr) {
108 // Found it, skip the rest.
109 // if specialchar (' or ") then replace it with '\'' or "\"" so adds 2 chars
110 if (*inptr == specialchr) {
111 *retptr = specialchr;
112 retptr++;
113 *retptr = escchr;
114 retptr++;
115 found = TRUE;
116 } else {
117 *retptr = escchr;
118 retptr++;
119 }
120 break;
121 }
122 escptr++;
123 }
124 *retptr = *inptr;
125 retptr++;
126 inptr++;
127 if (found) {
128 // finish to put the remaining specialchr
129 *retptr = specialchr;
130 retptr++;
131 found = FALSE;
132 }
133}
134*retptr = '\0';
135
136return(retstr);
137}
138
139/* Return a string containing the date */
140char *mr_date(void) {
141
142time_t tcurr;
143
144tcurr = time(NULL);
145return(ctime(&tcurr));
146}
147
148/* Return an allocated string containing the date
149char *mr_date(void) {
150
151 time_t tcurr;
152 char *tmp = NULL;
153
154 tcurr = time(NULL);
155 mr_asprintf(tmp, "%s", ctime(&tcurr));
156 mr_chomp(tmp);
157 return(tmp);
158}
159 */
160
161/**
162 * Remove all characters whose ASCII value is less than or equal to 32
163 * (spaces and control characters) from both sides of @p instr.
164 * @param instr The string to strip spaces/control characters from
165 * returns a newly allocated string without the spaces that needs to be freed
166 * by the caller
167 */
168char *mr_strip_spaces(const char *instr) {
169
170char *q = NULL;
171char *outstr = NULL;
172
173if (instr == NULL) {
174 return(NULL);
175}
176
177/* Skip initial spaces and special chars */
178while (*instr <= ' ' && *instr != '\0') {
179 instr++;
180}
181
182if (*instr != '\0') {
183 mr_asprintf(outstr, "");
184 return(outstr);
185}
186
187mr_asprintf(outstr, "%s", instr);
188q = outstr + strlen(outstr) - 1;
189
190/* Skip final spaces and special chars */
191while (*q <= ' ' && q != outstr) {
192 q--;
193}
194
195/* The string now ends after that char */
196q++;
197*q = '\0';
198return(outstr);
199}
200
201/* Subsitute the string token in the string in by the string subst */
202char *mr_str_substitute(const char *in, const char *token, const char *subst) {
203
204char *output = NULL;
205char *tmp = NULL;
206int i = 0;
207
208mr_asprintf(output, "%s", in);
209tmp = strstr(output, token);
210if (tmp == NULL) {
211 // token not found returning initial string unmodified
212 return(output);
213}
214// token found: end string here for now
215*tmp = '\0';
216
217// Add subst content to the string
218mr_strcat(output,subst);
219
220// now add the rest of in
221tmp = strstr(in, token);
222for (; i < strlen(token) ; i++) {
223 tmp++;
224}
225mr_strcat(output,tmp);
226return(output);
227}
228
229
230/*
231 * Remove '\n' char from both sides of @p in_out.
232 * @param in_out The string to strip characters from (modified).
233
234void mr_chomp(char *in_out) {
235
236 mr_strip_char(in_out, "\n");
237}
238*/
239
240/**
241 * Remove all characters in caracs from begining and end of string @p in_out
242 * @param in_out The string to strip char characters from (modified).
243
244void mr_strip_char(char *in_out, char *caracs) {
245 int i = 0;
246 int j = 0;
247 size_t length = 0;
248
249 if (caracs == NULL) {
250 return;
251 }
252 if (in_out == NULL) {
253 return;
254 }
255 length = strlen(in_out);
256
257 // Skip initial caracs
258 for (i = 0; index(caracs, in_out[i]) != NULL && i < (int)length ; i++);
259
260 // Shift the string to the begining if needed
261 if (i != 0) {
262 for (j = 0; i < (int)length ; i++, j++) {
263 in_out[j] = in_out[i];
264 }
265 // Erase the end of the string if needed
266 j++;
267 in_out[j] = '\0';
268 }
269
270 // Skip final caracs
271 for (i = (int)strlen(in_out) - 1; i >= 0 && index(caracs, in_out[i]) != NULL; i--);
272
273 // The string now ends after that char
274 i++;
275 in_out[i] = '\0';
276}
277*/
278
Note: See TracBrowser for help on using the repository browser.