Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
API cleanup: s/dict_insert/dict_set/ and s/dict_retrieve/dict_get/ for consistency...
[simgrid.git] / testsuite / xbt / multidict_crash.c
1 /* $Id$ */
2
3 /* multidict_crash - A crash test for multi-level 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 <stdio.h>
12 #include <assert.h>
13
14 #include <gras.h>
15
16 #define NB_ELM 10/*00*/
17 #define MULTICACHE_DEPTH 5
18 #define KEY_SIZE 12 /*512*/
19 #define NB_TEST 20
20 int verbose=0;
21
22 static gras_error_t test1();
23
24 static gras_error_t test1() {
25   gras_error_t errcode;
26   gras_dict_t *head=NULL;
27   int i,j,k,l;
28   char **key = NULL;
29   char **val = NULL;
30   void *data;
31
32   printf("\nGeneric multicache: CRASH test:\n");
33   printf(" Fill the struct and frees it %d times, using %d elements, depth of multicache=%d\n",NB_TEST,NB_ELM,MULTICACHE_DEPTH);
34   printf(" with %d chars long randomized keys. (a point is a test)\n",KEY_SIZE);
35
36   for (i=0;i<NB_TEST;i++) {
37     if (i%10) printf("."); else printf("%d",i/10); fflush(stdout);
38     if (!(key=malloc(sizeof(char*)*MULTICACHE_DEPTH)))
39       RAISE_MALLOC;
40     if (!(val=malloc(sizeof(char*)*MULTICACHE_DEPTH)))
41       RAISE_MALLOC;
42     for (l=0 ; l<MULTICACHE_DEPTH ; l++)
43       if (!(val[l]=malloc(sizeof(char)*KEY_SIZE)))
44         RAISE_MALLOC;
45
46     for (j=0;j<NB_ELM;j++) {
47       if (verbose) printf ("Add ");
48       for (l=0 ; l<MULTICACHE_DEPTH ; l++){
49         for (k=0;k<KEY_SIZE-1;k++) {
50           val[l][k]=rand() % ('z' - 'a') + 'a';
51         }
52         val[l][k]='\0';
53         if (verbose) printf("%s ; ",val[l]);
54         key[l]=val[l];//  NOWADAYS, no need to strdup the key.
55       }
56       if (verbose) printf("in multitree %p.\n",head);
57       TRYFAIL(gras_multidict_set(&head,MULTICACHE_DEPTH,key,
58                                  strdup(val[0]),&free));
59
60       TRYFAIL(gras_multidict_get(head,
61                                  MULTICACHE_DEPTH,(const char **)val,
62                                  &data));
63       if (!data || strcmp((char*)data,val[0])) {
64         fprintf(stderr,"Retrieved value (%s) does not match the entrered one (%s)\n",
65                 (char*)data,val[0]);
66         abort();
67       }
68     }
69     gras_dict_dump(head,&gras_dict_print);
70     gras_dict_free(&head);
71
72     for (l=0 ; l<MULTICACHE_DEPTH ; l++)
73       if (val[l]) free(val[l]);
74     free(val);
75     free(key);
76
77   }
78
79   printf("\n");
80   return no_error;
81 }
82
83 int main(int argc, char *argv[]) {
84   gras_error_t errcode;
85
86   gras_init(argc,argv,"root.thresh=debug"));
87   TRYFAIL(test1());
88    
89   gras_exit();
90   return 0;
91 }