Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
remplace -> replace
[simgrid.git] / testsuite / xbt / dict_crash.c
1 /* $Id$ */
2
3 /* dict_crash - A crash test for dictionnaries                              */
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 <gras.h>
12 #include <time.h>
13 #include <stdio.h>
14 #include <stdlib.h>
15
16 #define NB_ELM 200000
17 #define SIZEOFKEY 1024
18
19 static void print_str(void *str);
20 static void print_str(void *str) {
21   printf("%s",(char*)str);
22 }
23
24 GRAS_LOG_NEW_DEFAULT_CATEGORY(test,"Logging specific to this test");
25
26 static gras_error_t traverse(gras_dict_t *head) {
27   gras_dict_cursor_t *cursor=NULL;
28   char *key;
29   char *data;
30
31   gras_dict_foreach(head,cursor,key,data) {
32     /*    printf("   Seen:  %s=%s\n",key,data); */
33     gras_assert2 (!strcmp(key,data),
34       "Key(%s) != value(%s). Abording\n",key,data);
35   }
36   return no_error;
37 }
38
39 static gras_error_t countelems(gras_dict_t *head,int*count) {
40   gras_dict_cursor_t *cursor;
41   char *key;
42   void *data;
43   *count=0;
44
45   gras_dict_foreach(head,cursor,key,data) {
46     (*count)++;
47   }
48   return no_error;
49 }
50
51 int main(int argc,char **argv) {
52   gras_error_t errcode;
53   gras_dict_t *head=NULL;
54   int i,j,k, nb;
55   char *key;
56   void *data;
57
58   gras_init_defaultlog(&argc,argv,"dict.thresh=verbose");
59   srand((unsigned int)time(NULL));
60
61   printf("Dictionnary: CRASH test:\n");
62   printf(" Fill the struct, count its elems and frees the structure (x20)\n");
63   printf(" using 1000 elements with %d chars long randomized keys.\n",SIZEOFKEY);
64   printf(" (a point is a test)\n");
65
66   for (i=0;i<20;i++) {
67     head=gras_dict_new();
68     if (i%10) printf("."); else printf("%d",i/10); fflush(stdout);
69     nb=0;
70     for (j=0;j<1000;j++) {
71       if (!(key=malloc(SIZEOFKEY))) {
72         fprintf(stderr,"Out of memory\n");
73         return 1;
74       }
75
76       for (k=0;k<SIZEOFKEY-1;k++)
77         key[k]=rand() % ('z' - 'a') + 'a';
78       key[k]='\0';
79       /*      printf("[%d %s]\n",j,key); */
80       gras_dict_set(head,key,key,&free);
81     }
82     nb=0;
83     /*    gras_dict_dump(head,(void (*)(void*))&printf); */
84     TRYFAIL(countelems(head,&nb));
85     if (nb != 1000) {
86        printf ("\nI found %d elements, and not 1000\n",nb);
87        abort();
88     }     
89     TRYFAIL(traverse(head));
90     gras_dict_free(&head);
91   }
92
93
94   head=gras_dict_new();
95   printf("\n Fill 20 000 elements, with keys being the number of element\n");
96   printf("  (a point is 1 000 elements)\n");
97   for (j=0;j<NB_ELM;j++) {
98     if (!(j%1000)) {
99       printf("."); 
100       fflush(stdout);
101     }
102     if (!(key=malloc(10))) {
103       fprintf(stderr,"Out of memory\n");
104       abort();
105     }
106     
107     sprintf(key,"%d",j);
108     gras_dict_set(head,key,key,&free);
109   }
110
111   printf("\n Count the elements (retrieving the key and data for each): \n");
112   TRYFAIL(countelems(head,&i));
113
114   printf(" There is %d elements\n",i);
115   printf("\n Search my 20 000 elements 20 times. (a point is a test)\n");
116   if (!(key=malloc(10))) {
117     fprintf(stderr,"Out of memory\n");
118     abort();
119   } 
120   for (i=0;i<20;i++) {
121     if (i%10) printf("."); else printf("%d",i/10); fflush(stdout);
122     for (j=0;j<NB_ELM;j++) {
123       
124       sprintf(key,"%d",j);
125       TRYFAIL(gras_dict_get(head,key,&data));
126       if (strcmp(key,(char*)data)) {
127         printf("key=%s != data=%s\n",key,(char*)data);
128         abort();
129       }
130     }
131   }
132   free(key);
133
134   printf("\n Remove my 20 000 elements. (a point is 10 000 elements)\n");
135   if (!(key=malloc(10))) {
136     fprintf(stderr,"Out of memory\n");
137     abort();
138   }
139   for (j=0;j<NB_ELM;j++) {
140     if (!(j%10000)) printf("."); fflush(stdout);
141     
142     sprintf(key,"%d",j);
143     TRYFAIL(gras_dict_remove(head,key));
144   }
145   printf("\n");
146   free(key);
147
148   
149   printf("\n Free the structure (twice)\n");
150   gras_dict_free(&head);
151   gras_dict_free(&head);
152   
153   gras_exit();
154   return 0;
155 }