summaryrefslogtreecommitdiff
path: root/legacy/embryo/src/lib/embryo_str.c
diff options
context:
space:
mode:
authordoursse <doursse>2008-04-11 19:06:18 +0000
committerdoursse <doursse@7cbeb6ba-43b4-40fd-8cce-4c39aea84d33>2008-04-11 19:06:18 +0000
commita86946850d08ae3271ee64ffcb35cfbbe40faf3b (patch)
tree524005b8f2adfff14d0807fa96f7b0a3f37a808f /legacy/embryo/src/lib/embryo_str.c
parent9817e365b151b73a2b960252580b1890ddd07358 (diff)
remove trailing spaces and add indent doc for vi
SVN revision: 34246
Diffstat (limited to '')
-rw-r--r--legacy/embryo/src/lib/embryo_str.c48
1 files changed, 26 insertions, 22 deletions
diff --git a/legacy/embryo/src/lib/embryo_str.c b/legacy/embryo/src/lib/embryo_str.c
index d98adefe12..fb31271284 100644
--- a/legacy/embryo/src/lib/embryo_str.c
+++ b/legacy/embryo/src/lib/embryo_str.c
@@ -1,3 +1,7 @@
1/*
2 * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
3 */
4
1#include "embryo_private.h" 5#include "embryo_private.h"
2#include <fnmatch.h> 6#include <fnmatch.h>
3 7
@@ -22,7 +26,7 @@ static Embryo_Cell
22_embryo_str_atoi(Embryo_Program *ep, Embryo_Cell *params) 26_embryo_str_atoi(Embryo_Program *ep, Embryo_Cell *params)
23{ 27{
24 char *s1; 28 char *s1;
25 29
26 /* params[1] = str */ 30 /* params[1] = str */
27 if (params[0] != (1 * sizeof(Embryo_Cell))) return 0; 31 if (params[0] != (1 * sizeof(Embryo_Cell))) return 0;
28 STRGET(ep, s1, params[1]); 32 STRGET(ep, s1, params[1]);
@@ -34,7 +38,7 @@ static Embryo_Cell
34_embryo_str_fnmatch(Embryo_Program *ep, Embryo_Cell *params) 38_embryo_str_fnmatch(Embryo_Program *ep, Embryo_Cell *params)
35{ 39{
36 char *s1, *s2; 40 char *s1, *s2;
37 41
38 /* params[1] = glob */ 42 /* params[1] = glob */
39 /* params[2] = str */ 43 /* params[2] = str */
40 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 44 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -48,7 +52,7 @@ static Embryo_Cell
48_embryo_str_strcmp(Embryo_Program *ep, Embryo_Cell *params) 52_embryo_str_strcmp(Embryo_Program *ep, Embryo_Cell *params)
49{ 53{
50 char *s1, *s2; 54 char *s1, *s2;
51 55
52 /* params[1] = str1 */ 56 /* params[1] = str1 */
53 /* params[2] = str2 */ 57 /* params[2] = str2 */
54 if (params[0] != (2 * sizeof(Embryo_Cell))) return -1; 58 if (params[0] != (2 * sizeof(Embryo_Cell))) return -1;
@@ -62,7 +66,7 @@ static Embryo_Cell
62_embryo_str_strncmp(Embryo_Program *ep, Embryo_Cell *params) 66_embryo_str_strncmp(Embryo_Program *ep, Embryo_Cell *params)
63{ 67{
64 char *s1, *s2; 68 char *s1, *s2;
65 69
66 /* params[1] = str1 */ 70 /* params[1] = str1 */
67 /* params[2] = str2 */ 71 /* params[2] = str2 */
68 /* params[3] = n */ 72 /* params[3] = n */
@@ -78,7 +82,7 @@ static Embryo_Cell
78_embryo_str_strcpy(Embryo_Program *ep, Embryo_Cell *params) 82_embryo_str_strcpy(Embryo_Program *ep, Embryo_Cell *params)
79{ 83{
80 char *s1; 84 char *s1;
81 85
82 /* params[1] = dst */ 86 /* params[1] = dst */
83 /* params[2] = str */ 87 /* params[2] = str */
84 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 88 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -93,7 +97,7 @@ _embryo_str_strncpy(Embryo_Program *ep, Embryo_Cell *params)
93{ 97{
94 char *s1; 98 char *s1;
95 int l; 99 int l;
96 100
97 /* params[1] = dst */ 101 /* params[1] = dst */
98 /* params[2] = str */ 102 /* params[2] = str */
99 /* params[3] = n */ 103 /* params[3] = n */
@@ -111,7 +115,7 @@ static Embryo_Cell
111_embryo_str_strlen(Embryo_Program *ep, Embryo_Cell *params) 115_embryo_str_strlen(Embryo_Program *ep, Embryo_Cell *params)
112{ 116{
113 char *s1; 117 char *s1;
114 118
115 /* params[1] = str */ 119 /* params[1] = str */
116 if (params[0] != (1 * sizeof(Embryo_Cell))) return 0; 120 if (params[0] != (1 * sizeof(Embryo_Cell))) return 0;
117 STRGET(ep, s1, params[1]); 121 STRGET(ep, s1, params[1]);
@@ -123,7 +127,7 @@ static Embryo_Cell
123_embryo_str_strcat(Embryo_Program *ep, Embryo_Cell *params) 127_embryo_str_strcat(Embryo_Program *ep, Embryo_Cell *params)
124{ 128{
125 char *s1, *s2, *s3; 129 char *s1, *s2, *s3;
126 130
127 /* params[1] = dsr */ 131 /* params[1] = dsr */
128 /* params[2] = str */ 132 /* params[2] = str */
129 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 133 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -143,7 +147,7 @@ _embryo_str_strncat(Embryo_Program *ep, Embryo_Cell *params)
143{ 147{
144 char *s1, *s2, *s3; 148 char *s1, *s2, *s3;
145 int l1, l2; 149 int l1, l2;
146 150
147 /* params[1] = dst */ 151 /* params[1] = dst */
148 /* params[2] = str */ 152 /* params[2] = str */
149 /* params[3] = n */ 153 /* params[3] = n */
@@ -167,7 +171,7 @@ static Embryo_Cell
167_embryo_str_strprep(Embryo_Program *ep, Embryo_Cell *params) 171_embryo_str_strprep(Embryo_Program *ep, Embryo_Cell *params)
168{ 172{
169 char *s1, *s2, *s3; 173 char *s1, *s2, *s3;
170 174
171 /* params[1] = dst */ 175 /* params[1] = dst */
172 /* params[2] = str */ 176 /* params[2] = str */
173 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 177 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -187,7 +191,7 @@ _embryo_str_strnprep(Embryo_Program *ep, Embryo_Cell *params)
187{ 191{
188 char *s1, *s2, *s3; 192 char *s1, *s2, *s3;
189 int l1, l2; 193 int l1, l2;
190 194
191 /* params[1] = dst */ 195 /* params[1] = dst */
192 /* params[2] = str */ 196 /* params[2] = str */
193 /* params[3] = n */ 197 /* params[3] = n */
@@ -212,7 +216,7 @@ _embryo_str_strcut(Embryo_Program *ep, Embryo_Cell *params)
212{ 216{
213 char *s1, *s2; 217 char *s1, *s2;
214 int l1; 218 int l1;
215 219
216 /* params[1] = dst */ 220 /* params[1] = dst */
217 /* params[2] = str */ 221 /* params[2] = str */
218 /* params[3] = n */ 222 /* params[3] = n */
@@ -227,7 +231,7 @@ _embryo_str_strcut(Embryo_Program *ep, Embryo_Cell *params)
227 if (params[4] >= l1) params[4] = l1; 231 if (params[4] >= l1) params[4] = l1;
228 if (params[4] == params[3]) 232 if (params[4] == params[3])
229 { 233 {
230 STRSET(ep, params[1], ""); 234 STRSET(ep, params[1], "");
231 return 0; 235 return 0;
232 } 236 }
233 s2 = alloca(params[4] - params[3] + 1); 237 s2 = alloca(params[4] - params[3] + 1);
@@ -245,7 +249,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
245 int inesc = 0; 249 int inesc = 0;
246 int insub = 0; 250 int insub = 0;
247 int p, pnum; 251 int p, pnum;
248 252
249 /* params[1] = buf */ 253 /* params[1] = buf */
250 /* params[2] = bufsize */ 254 /* params[2] = bufsize */
251 /* params[3] = format_string */ 255 /* params[3] = format_string */
@@ -273,7 +277,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
273 else 277 else
274 { 278 {
275 Embryo_Cell *cptr; 279 Embryo_Cell *cptr;
276 280
277 if (inesc) 281 if (inesc)
278 { 282 {
279 switch (s1[i]) 283 switch (s1[i])
@@ -315,7 +319,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
315 char fmt[10] = ""; 319 char fmt[10] = "";
316 char tmp[256] = ""; 320 char tmp[256] = "";
317 int l; 321 int l;
318 322
319 if (s1[i] == 'i') strcpy(fmt, "%i"); 323 if (s1[i] == 'i') strcpy(fmt, "%i");
320 else if (s1[i] == 'd') strcpy(fmt, "%d"); 324 else if (s1[i] == 'd') strcpy(fmt, "%d");
321 else if (s1[i] == 'x') strcpy(fmt, "%x"); 325 else if (s1[i] == 'x') strcpy(fmt, "%x");
@@ -338,7 +342,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
338 { 342 {
339 char tmp[256] = ""; 343 char tmp[256] = "";
340 int l; 344 int l;
341 345
342 cptr = embryo_data_address_get(ep, params[4 + p]); 346 cptr = embryo_data_address_get(ep, params[4 + p]);
343 if (cptr) snprintf(tmp, sizeof(tmp), "%f", (double)EMBRYO_CELL_TO_FLOAT(*cptr)); 347 if (cptr) snprintf(tmp, sizeof(tmp), "%f", (double)EMBRYO_CELL_TO_FLOAT(*cptr));
344 l = strlen(tmp); 348 l = strlen(tmp);
@@ -357,7 +361,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
357 { 361 {
358 char *tmp; 362 char *tmp;
359 int l; 363 int l;
360 364
361 STRGET(ep, tmp, params[4 + p]); 365 STRGET(ep, tmp, params[4 + p]);
362 l = strlen(tmp); 366 l = strlen(tmp);
363 if ((o + l) > (params[2] - 1)) 367 if ((o + l) > (params[2] - 1))
@@ -381,7 +385,7 @@ _embryo_str_snprintf(Embryo_Program *ep, Embryo_Cell *params)
381 } 385 }
382 } 386 }
383 s2[o] = 0; 387 s2[o] = 0;
384 388
385 STRSET(ep, params[1], s2); 389 STRSET(ep, params[1], s2);
386 return o; 390 return o;
387} 391}
@@ -390,7 +394,7 @@ static Embryo_Cell
390_embryo_str_strstr(Embryo_Program *ep, Embryo_Cell *params) 394_embryo_str_strstr(Embryo_Program *ep, Embryo_Cell *params)
391{ 395{
392 char *s1, *s2, *p; 396 char *s1, *s2, *p;
393 397
394 /* params[1] = str */ 398 /* params[1] = str */
395 /* params[2] = ndl */ 399 /* params[2] = ndl */
396 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 400 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -406,7 +410,7 @@ static Embryo_Cell
406_embryo_str_strchr(Embryo_Program *ep, Embryo_Cell *params) 410_embryo_str_strchr(Embryo_Program *ep, Embryo_Cell *params)
407{ 411{
408 char *s1, *s2, *p; 412 char *s1, *s2, *p;
409 413
410 /* params[1] = str */ 414 /* params[1] = str */
411 /* params[2] = ch */ 415 /* params[2] = ch */
412 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 416 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;
@@ -421,7 +425,7 @@ static Embryo_Cell
421_embryo_str_strrchr(Embryo_Program *ep, Embryo_Cell *params) 425_embryo_str_strrchr(Embryo_Program *ep, Embryo_Cell *params)
422{ 426{
423 char *s1, *s2, *p; 427 char *s1, *s2, *p;
424 428
425 /* params[1] = str */ 429 /* params[1] = str */
426 /* params[2] = ch */ 430 /* params[2] = ch */
427 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0; 431 if (params[0] != (2 * sizeof(Embryo_Cell))) return 0;