Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
new tracing mask TRACE_VOLUME to trace the msg tasks communication size and group...
[simgrid.git] / src / xbt_strbuff_unit.c
1 /*******************************/
2 /* GENERATED FILE, DO NOT EDIT */
3 /*******************************/
4
5 #include <stdio.h>
6 #include "xbt.h"
7 /*******************************/
8 /* GENERATED FILE, DO NOT EDIT */
9 /*******************************/
10
11 # 293 "/home/navarrop/Developments/simgrid/src/xbt/xbt_strbuff.c" 
12 #include "xbt/strbuff.h"
13
14 /* buffstr have 512 chars by default. Adding 1000 chars like this will force a resize, allowing us to test that b->used and b->size are consistent */
15 #define force_resize \
16   "1.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
17   "2.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
18   "3.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
19   "4.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
20   "5.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
21   "6.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
22   "7.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
23   "8.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
24   "9.........1.........2.........3.........4.........5.........6.........7.........8.........9........." \
25   "0.........1.........2.........3.........4.........5.........6.........7.........8.........9........."
26
27 static void mytest(const char *input, const char *patterns,
28                    const char *expected)
29 {
30   xbt_dynar_t dyn_patterns;     /* splited string */
31   xbt_dict_t p;                 /* patterns */
32   unsigned int cpt;
33   char *str;                    /*foreach */
34   xbt_strbuff_t sb;             /* what we test */
35
36   p = xbt_dict_new();
37   dyn_patterns = xbt_str_split(patterns, " ");
38   xbt_dynar_foreach(dyn_patterns, cpt, str) {
39     xbt_dynar_t keyvals = xbt_str_split(str, "=");
40     char *key = xbt_dynar_get_as(keyvals, 0, char *);
41     char *val = xbt_dynar_get_as(keyvals, 1, char *);
42     xbt_str_subst(key, '_', ' ', 0);    // to put space in names without breaking the enclosing dynar_foreach
43     xbt_dict_set(p, key, xbt_strdup(val), free);
44     xbt_dynar_free(&keyvals);
45   }
46   xbt_dynar_free(&dyn_patterns);
47   sb = xbt_strbuff_new();
48   xbt_strbuff_append(sb, input);
49   xbt_strbuff_varsubst(sb, p);
50   xbt_dict_free(&p);
51   xbt_test_assert4(!strcmp(sb->data, expected),
52                    "Input (%s) with patterns (%s) leads to (%s) instead of (%s)",
53                    input, patterns, sb->data, expected);
54   xbt_strbuff_free(sb);
55 }
56
57 XBT_TEST_UNIT("xbt_strbuff_substitute", test_strbuff_substitute,"test the function xbt_strbuff_substitute")
58 {
59   xbt_test_add0("Empty");
60   mytest("", "", "");
61
62   xbt_test_add0("Value shorter, no braces, only variable");
63   mytest("$tutu", "tutu=t", "t");
64   xbt_test_add0("Value shorter, braces, only variable");
65   mytest("${tutu}", "tutu=t", "t");
66   xbt_test_add0("Value shorter, no braces, data after");
67   mytest("$tutu toto", "tutu=t", "t toto");
68   xbt_test_add0("Value shorter, braces, data after");
69   mytest("${tutu} toto", "tutu=t", "t toto");
70   xbt_test_add0("Value shorter, no braces, data before");
71   mytest("toto $tutu", "tutu=t", "toto t");
72   xbt_test_add0("Value shorter, braces, data before");
73   mytest("toto ${tutu}", "tutu=t", "toto t");
74   xbt_test_add0("Value shorter, no braces, data before and after");
75   mytest("toto $tutu tata", "tutu=t", "toto t tata");
76   xbt_test_add0("Value shorter, braces, data before and after");
77   mytest("toto ${tutu} tata", "tutu=t", "toto t tata");
78
79   xbt_test_add0("Value as long, no braces, only variable");
80   mytest("$tutu", "tutu=12345", "12345");
81   xbt_test_add0("Value as long, braces, only variable");
82   mytest("${tutu}", "tutu=1234567", "1234567");
83   xbt_test_add0("Value as long, no braces, data after");
84   mytest("$tutu toto", "tutu=12345", "12345 toto");
85   xbt_test_add0("Value as long, braces, data after");
86   mytest("${tutu} toto", "tutu=1234567", "1234567 toto");
87   xbt_test_add0("Value as long, no braces, data before");
88   mytest("toto $tutu", "tutu=12345", "toto 12345");
89   xbt_test_add0("Value as long, braces, data before");
90   mytest("toto ${tutu}", "tutu=1234567", "toto 1234567");
91   xbt_test_add0("Value as long, no braces, data before and after");
92   mytest("toto $tutu tata", "tutu=12345", "toto 12345 tata");
93   xbt_test_add0("Value as long, braces, data before and after");
94   mytest("toto ${tutu} tata", "tutu=1234567", "toto 1234567 tata");
95
96   xbt_test_add0("Value longer, no braces, only variable");
97   mytest("$t", "t=tututu", "tututu");
98   xbt_test_add0("Value longer, braces, only variable");
99   mytest("${t}", "t=tututu", "tututu");
100   xbt_test_add0("Value longer, no braces, data after");
101   mytest("$t toto", "t=tututu", "tututu toto");
102   xbt_test_add0("Value longer, braces, data after");
103   mytest("${t} toto", "t=tututu", "tututu toto");
104   xbt_test_add0("Value longer, no braces, data before");
105   mytest("toto $t", "t=tututu", "toto tututu");
106   xbt_test_add0("Value longer, braces, data before");
107   mytest("toto ${t}", "t=tututu", "toto tututu");
108   xbt_test_add0("Value longer, no braces, data before and after");
109   mytest("toto $t tata", "t=tututu", "toto tututu tata");
110   xbt_test_add0("Value longer, braces, data before and after");
111   mytest("toto ${t} tata", "t=tututu", "toto tututu tata");
112
113   xbt_test_add0("Value much longer, no braces, only variable");
114   mytest("$t", "t=" force_resize, force_resize);
115   xbt_test_add0("Value much longer, no braces, data after");
116   mytest("$t toto", "t=" force_resize, force_resize " toto");
117   xbt_test_add0("Value much longer, braces, data after");
118   mytest("${t} toto", "t=" force_resize, force_resize " toto");
119   xbt_test_add0("Value much longer, no braces, data before");
120   mytest("toto $t", "t=" force_resize, "toto " force_resize);
121   xbt_test_add0("Value much longer, braces, data before");
122   mytest("toto ${t}", "t=" force_resize, "toto " force_resize);
123   xbt_test_add0("Value much longer, no braces, data before and after");
124   mytest("toto $t tata", "t=" force_resize, "toto " force_resize " tata");
125   xbt_test_add0("Value much longer, braces, data before and after");
126   mytest("toto ${t} tata", "t=" force_resize, "toto " force_resize " tata");
127
128   xbt_test_add0("Escaped $");
129   mytest("\\$tutu", "tutu=t", "\\$tutu");
130   xbt_test_add0("Space in var name (with braces)");
131   mytest("${tu ti}", "tu_ti=t", "t");
132
133   xbt_test_add0("Two variables");
134   mytest("$toto $tutu", "toto=1 tutu=2", "1 2");
135
136   // Commented: I'm too lazy to do a memmove in var name to remove the backslash after use.
137   // Users should use braces.
138   //  xbt_test_add0("Escaped space in var name", "$tu\\ ti", "tu_ti=t", "t");
139
140   xbt_test_add0("Default value");
141   mytest("${t:-toto}", "", "toto");
142   xbt_test_add0("Useless default value (variable already defined)");
143   mytest("${t:-toto}", "t=TRUC", "TRUC");
144
145 }
146
147 /*******************************/
148 /* GENERATED FILE, DO NOT EDIT */
149 /*******************************/
150