X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/1bbfe6dff09cff639aaab8fd2898678a5a630c2b..cb699a49faa9fa426f301dc1d21b6d5617b9c1a0:/testsuite/xbt/dynar_string.c diff --git a/testsuite/xbt/dynar_string.c b/testsuite/xbt/dynar_string.c index 48522cbb7b..c36f84a321 100644 --- a/testsuite/xbt/dynar_string.c +++ b/testsuite/xbt/dynar_string.c @@ -2,17 +2,17 @@ /* dynar_string: A test case for the dynar using strings as content */ -/* Authors: Martin Quinson */ -/* Copyright (C) 2003 the OURAGAN project. */ +/* Copyright (c) 2003, 2004 Martin Quinson. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it - under the terms of the license (GNU LGPL) which comes with this package. */ + * under the terms of the license (GNU LGPL) which comes with this package. */ -#include -#include +#include /* sprintf */ +#include "gras.h" /* NB_ELEM HAS to be a multiple of 5 */ #define NB_ELEM 5000 +XBT_LOG_NEW_DEFAULT_CATEGORY(test,"Logging specific to this test"); void free_string(void *d); @@ -21,158 +21,141 @@ void free_string(void *d){ } int main(int argc,char *argv[]) { - gras_dynar_t *d; - gras_error_t errcode; + xbt_dynar_t d; + xbt_error_t errcode; int cpt; char buf[1024]; char *s1,*s2; - gras_init_defaultlog(argc,argv,"dynar.thresh=debug"); + xbt_init_defaultlog(&argc,argv,"dynar.thresh=debug"); - fprintf(stderr,"==== Traverse the empty dynar\n"); - TRYFAIL(gras_dynar_new(&d,sizeof(char *),&free_string)); - gras_dynar_foreach(d,cpt,s1){ - fprintf(stderr, - "Damnit, there is something in the empty dynar\n"); - abort(); + INFO0("==== Traverse the empty dynar"); + d=xbt_dynar_new(sizeof(char *),&free_string); + xbt_dynar_foreach(d,cpt,s1){ + xbt_assert0(FALSE, + "Damnit, there is something in the empty dynar"); } - gras_dynar_free(d); + xbt_dynar_free(&d); + xbt_dynar_free(&d); - fprintf(stderr,"==== Push %d strings, set them again 3 times, shift them\n",NB_ELEM); - TRYFAIL(gras_dynar_new(&d,sizeof(char*),&free_string)); + INFO1("==== Push %d strings, set them again 3 times, shift them",NB_ELEM); + d=xbt_dynar_new(sizeof(char*),&free_string); for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_push(d,&s1)); + xbt_dynar_push(d,&s1); } for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_remplace(d,cpt,&s1)); + xbt_dynar_replace(d,cpt,&s1); } for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_remplace(d,cpt,&s1)); + xbt_dynar_replace(d,cpt,&s1); } for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_remplace(d,cpt,&s1)); + xbt_dynar_replace(d,cpt,&s1); } for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); - gras_dynar_shift(d,&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one (%s!=%s)\n", - buf,s2); - abort(); - } + xbt_dynar_shift(d,&s2); + xbt_assert2 (!strcmp(buf,s2), + "The retrieved value is not the same than the injected one (%s!=%s)", + buf,s2); free(s2); } - gras_dynar_free(d); + xbt_dynar_free(&d); + xbt_dynar_free(&d); - fprintf(stderr,"==== Unshift, traverse and pop %d strings\n",NB_ELEM); - TRYFAIL(gras_dynar_new(&d,sizeof(char**),&free_string)); + INFO1("==== Unshift, traverse and pop %d strings",NB_ELEM); + d=xbt_dynar_new(sizeof(char**),&free_string); for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_unshift(d,&s1)); + xbt_dynar_unshift(d,&s1); } - gras_dynar_foreach(d,cpt,s1) { + xbt_dynar_foreach(d,cpt,s1) { sprintf(buf,"%d",NB_ELEM - cpt -1); - if (strcmp(buf,s1)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one (%s!=%s)\n", + xbt_assert2 (!strcmp(buf,s1), + "The retrieved value is not the same than the injected one (%s!=%s)", buf,s1); - abort(); - } } for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); - gras_dynar_pop(d,&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one (%s!=%s)\n", + xbt_dynar_pop(d,&s2); + xbt_assert2 (!strcmp(buf,s2), + "The retrieved value is not the same than the injected one (%s!=%s)", buf,s2); - abort(); - } free(s2); } - gras_dynar_free(d); - + xbt_dynar_free(&d); + xbt_dynar_free(&d); - fprintf(stderr,"==== Push %d strings, insert %d strings in the middle, shift everything\n",NB_ELEM,NB_ELEM/5); - TRYFAIL(gras_dynar_new(&d,sizeof(char*),&free_string)); + INFO2("==== Push %d strings, insert %d strings in the middle, shift everything",NB_ELEM,NB_ELEM/5); + d=xbt_dynar_new(sizeof(char*),&free_string); for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_push(d,&s1)); + xbt_dynar_push(d,&s1); } for (cpt=0; cpt< NB_ELEM/5; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_insert_at(d,NB_ELEM/2,&s1)); + xbt_dynar_insert_at(d,NB_ELEM/2,&s1); } for (cpt=0; cpt< NB_ELEM/2; cpt++) { sprintf(buf,"%d",cpt); - gras_dynar_shift(d,&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one at the begining (%s!=%s)\n", + xbt_dynar_shift(d,&s2); + xbt_assert2(!strcmp(buf,s2), + "The retrieved value is not the same than the injected one at the begining (%s!=%s)", buf,s2); - abort(); - } - free(s2); + free(s2); } for (cpt=(NB_ELEM/5)-1; cpt>=0; cpt--) { sprintf(buf,"%d",cpt); - gras_dynar_shift(d,&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one in the middle (%s!=%s)\n", + xbt_dynar_shift(d,&s2); + xbt_assert2 (!strcmp(buf,s2), + "The retrieved value is not the same than the injected one in the middle (%s!=%s)", buf,s2); - abort(); - } free(s2); } for (cpt=NB_ELEM/2; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); - gras_dynar_shift(d,&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "The retrieved value is not the same than the injected one at the end (%s!=%s)\n", + xbt_dynar_shift(d,&s2); + xbt_assert2 (!strcmp(buf,s2), + "The retrieved value is not the same than the injected one at the end (%s!=%s)", buf,s2); - abort(); - } free(s2); } - gras_dynar_free(d); + xbt_dynar_free(&d); + xbt_dynar_free(&d); - fprintf(stderr,"==== Push %d strings, remove %d-%d. free the rest\n",NB_ELEM,2*(NB_ELEM/5),4*(NB_ELEM/5)); - TRYFAIL(gras_dynar_new(&d,sizeof(char*),&free_string)); + INFO3("==== Push %d strings, remove %d-%d. free the rest",NB_ELEM,2*(NB_ELEM/5),4*(NB_ELEM/5)); + d=xbt_dynar_new(sizeof(char*),&free_string); for (cpt=0; cpt< NB_ELEM; cpt++) { sprintf(buf,"%d",cpt); s1=strdup(buf); - TRYFAIL(gras_dynar_push(d,&s1)); + xbt_dynar_push(d,&s1); } for (cpt=2*(NB_ELEM/5); cpt< 4*(NB_ELEM/5); cpt++) { sprintf(buf,"%d",cpt); - gras_dynar_remove_at(d,2*(NB_ELEM/5),&s2); - if (strcmp(buf,s2)) { - fprintf(stderr, - "Remove a bad value. Got %s, expected %s\n", - s2,buf); - abort(); - } - free(s2); + xbt_dynar_remove_at(d,2*(NB_ELEM/5),&s2); + xbt_assert2(!strcmp(buf,s2), + "Remove a bad value. Got %s, expected %s", + s2,buf); + free(s2); } - gras_dynar_free(d); + xbt_dynar_free(&d); + xbt_dynar_free(&d); + xbt_exit(); return 0; }