Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
add the first percent of a wannabe module mecanism allowing me to track memleaks...
[simgrid.git] / testsuite / xbt / dict_usage.c
1 /* $Id$ */
2
3 /* dict_usage - A test of normal usage of a dictionnary                     */
4
5 /* Authors: Martin Quinson                                                  */
6 /* Copyright (C) 2003 the OURAGAN project.                                  */
7
8 /* This program is free software; you can redistribute it and/or modify it
9    under the terms of the license (GNU LGPL) which comes with this package. */
10
11 #include <stdio.h>
12 #include <assert.h>
13
14 #include <gras.h>
15
16 GRAS_LOG_EXTERNAL_CATEGORY(dict);
17
18 static gras_error_t fill(gras_dict_t **head);
19 static gras_error_t debuged_add(gras_dict_t *head,const char*key);
20 static gras_error_t search(gras_dict_t *head,const char*key);
21 static gras_error_t debuged_remove(gras_dict_t *head,const char*key);
22 static gras_error_t traverse(gras_dict_t *head);
23
24 static void print_str(void *str);
25 static void print_str(void *str) {
26   printf("%s",(char*)str);
27 }
28
29 static gras_error_t fill(gras_dict_t **head) {
30   gras_error_t errcode;
31   printf("\n Fill in the dictionnary\n");
32
33   TRY(gras_dict_new(head));
34   TRY(debuged_add(*head,"12"));
35   TRY(debuged_add(*head,"12a"));
36   TRY(debuged_add(*head,"12b"));
37   TRY(debuged_add(*head,"123"));
38   TRY(debuged_add(*head,"123456"));
39   // Child becomes child of what to add
40   TRY(debuged_add(*head,"1234"));
41   // Need of common ancestor
42   TRY(debuged_add(*head,"123457"));
43
44   return no_error;
45 }
46
47 static gras_error_t debuged_add(gras_dict_t *head,const char*key)
48 {
49   gras_error_t errcode;
50   char *data=strdup(key);
51
52   printf("   - Add %s\n",key);
53   errcode=gras_dict_insert(head,key,data,&free);
54   if (GRAS_LOG_ISENABLED(dict,gras_log_priority_debug)) {
55     gras_dict_dump(head,(void (*)(void*))&printf);
56     fflush(stdout);
57   }
58   return errcode;
59 }
60
61 static gras_error_t search(gras_dict_t *head,const char*key) {
62   void *data;
63   gras_error_t errcode;
64
65   
66   errcode=gras_dict_retrieve(head,key,&data);
67   printf("   - Search %s. Found %s\n",key,data?(char*)data:"(null)");fflush(stdout);
68   if (strcmp((char*)data,key)) 
69     return mismatch_error;
70   return errcode;
71 }
72
73 static gras_error_t debuged_remove(gras_dict_t *head,const char*key)
74 {
75   gras_error_t errcode;
76
77   printf("   Remove '%s'\n",key);fflush(stdout);
78   errcode=gras_dict_remove(head,key);
79   //  gras_dict_dump(head,(void (*)(void*))&printf);
80   return errcode;
81 }
82
83
84 static gras_error_t traverse(gras_dict_t *head) {
85   gras_dict_cursor_t *cursor=NULL;
86   char *key;
87   char *data;
88
89   gras_dict_foreach(head,cursor,key,data) {
90     printf("   - Seen:  %s->%s\n",key,data);
91     if (strcmp(key,data)) {
92       printf("Key(%s) != value(%s). Abording\n",key,data);
93       abort();
94     }
95   }
96   return no_error;
97 }
98
99 void parse_log_opt(int argc, char **argv,const char *deft);
100
101 int main(int argc,char **argv) {
102   gras_error_t errcode;
103   gras_dict_t *head=NULL;
104   char *data;
105
106   parse_log_opt(argc,argv,"dict.thresh=verbose");
107    
108   printf("\nGeneric dictionnary: USAGE test:\n");
109
110   printf(" Traverse the empty dictionnary\n");
111   TRYFAIL(traverse(head));
112
113   TRYFAIL(fill(&head));
114   printf(" Free the dictionnary\n");
115   gras_dict_free(&head);
116   printf(" Free the dictionnary again\n");
117   gras_dict_free(&head);
118   
119   TRYFAIL(fill(&head));
120
121   printf(" - Change some values\n");
122   printf("   - Change 123 to 'Changed 123'\n");
123   TRYFAIL(gras_dict_insert(head,"123",strdup("Changed 123"),&free));
124   printf("   - Change 123 back to '123'\n");
125   TRYFAIL(gras_dict_insert(head,"123",strdup("123"),&free));
126   printf("   - Change 12a to 'Dummy 12a'\n");
127   TRYFAIL(gras_dict_insert(head,"12a",strdup("Dummy 12a"),&free));
128   printf("   - Change 12a to '12a'\n");
129   TRYFAIL(gras_dict_insert(head,"12a",strdup("12a"),&free));
130
131   //  gras_dict_dump(head,(void (*)(void*))&printf);
132   printf(" - Traverse the resulting dictionnary\n");
133   TRYFAIL(traverse(head));
134
135   printf(" - Retrive values\n");
136   TRYFAIL(gras_dict_retrieve(head,"123",(void**)&data));
137   assert(data);
138   TRYFAIL(strcmp("123",data));
139
140   TRYEXPECT(gras_dict_retrieve(head,"Can't be found",(void**)&data),mismatch_error);
141   TRYEXPECT(gras_dict_retrieve(head,"123 Can't be found",(void**)&data),mismatch_error);
142   TRYEXPECT(gras_dict_retrieve(head,"12345678 NOT",(void**)&data),mismatch_error);
143
144   TRYFAIL(search(head,"12a"));
145   TRYFAIL(search(head,"12b"));
146   TRYFAIL(search(head,"12"));
147   TRYFAIL(search(head,"123456"));
148   TRYFAIL(search(head,"1234"));
149   TRYFAIL(search(head,"123457"));
150
151   printf(" - Traverse the resulting dictionnary\n");
152   TRYFAIL(traverse(head));
153
154   //  gras_dict_dump(head,(void (*)(void*))&printf);
155
156   printf(" Free the dictionnary (twice)\n");
157   gras_dict_free(&head);
158   gras_dict_free(&head);
159
160   printf(" - Traverse the resulting dictionnary\n");
161   TRYFAIL(traverse(head));
162
163   printf("\n");
164   TRYFAIL(fill(&head));
165   printf(" - Remove the data (traversing the resulting dictionnary each time)\n");
166   TRYEXPECT(debuged_remove(head,"Does not exist"),mismatch_error);
167   TRYFAIL(traverse(head));
168
169   gras_dict_free(&head);
170   gras_finalize();
171   return 0;
172
173   TRYCATCH(debuged_remove(head,"12345"),mismatch_error);
174   TRYFAIL(traverse(head));
175
176   TRYFAIL(debuged_remove(head,"12a"));    TRYFAIL(traverse(head));
177   TRYFAIL(debuged_remove(head,"12b"));    TRYFAIL(traverse(head));
178   TRYFAIL(debuged_remove(head,"12"));     TRYFAIL(traverse(head));
179   TRYFAIL(debuged_remove(head,"123456")); TRYFAIL(traverse(head));
180   TRYEXPECT(debuged_remove(head,"12346"),mismatch_error);  TRYFAIL(traverse(head));
181   TRYFAIL(debuged_remove(head,"1234"));   TRYFAIL(traverse(head));
182   TRYFAIL(debuged_remove(head,"123457")); TRYFAIL(traverse(head));
183   TRYFAIL(debuged_remove(head,"123"));    TRYFAIL(traverse(head));
184   TRYEXPECT(debuged_remove(head,"12346"),mismatch_error);  TRYFAIL(traverse(head));
185   
186   printf(" - Free the dictionnary twice\n");
187   gras_dict_free(&head);
188   gras_dict_free(&head);
189   return 0;
190 }