aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/tests/test-array-sorted.c
diff options
context:
space:
mode:
Diffstat (limited to 'tests/test-array-sorted.c')
-rw-r--r--tests/test-array-sorted.c60
1 files changed, 30 insertions, 30 deletions
diff --git a/tests/test-array-sorted.c b/tests/test-array-sorted.c
index 8901c8b..4b51eaa 100644
--- a/tests/test-array-sorted.c
+++ b/tests/test-array-sorted.c
@@ -292,7 +292,7 @@ int main( int argc, char * argv[] )
292 { 292 {
293 for(; (pos > 0); pos--) 293 for(; (pos > 0); pos--)
294 free(data[pos-1].name); 294 free(data[pos-1].name);
295 return(our_error(opts, NULL, "out of virtual memory")); 295 return(trutils_error(opts, NULL, "out of virtual memory"));
296 }; 296 };
297 }; 297 };
298 298
@@ -335,7 +335,7 @@ int main( int argc, char * argv[] )
335 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 335 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
336 return(1); 336 return(1);
337 if ((list_len)) 337 if ((list_len))
338 return(our_error(opts, NULL, "list still has elements")); 338 return(trutils_error(opts, NULL, "list still has elements"));
339 free(list); 339 free(list);
340 340
341 341
@@ -350,7 +350,7 @@ int main( int argc, char * argv[] )
350 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 350 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
351 return(1); 351 return(1);
352 if ((list_len)) 352 if ((list_len))
353 return(our_error(opts, NULL, "list still has elements")); 353 return(trutils_error(opts, NULL, "list still has elements"));
354 free(list); 354 free(list);
355 355
356 356
@@ -373,7 +373,7 @@ int main( int argc, char * argv[] )
373 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 373 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
374 return(1); 374 return(1);
375 if ((list_len)) 375 if ((list_len))
376 return(our_error(opts, NULL, "list still has elements")); 376 return(trutils_error(opts, NULL, "list still has elements"));
377 free(list); 377 free(list);
378 378
379 379
@@ -396,7 +396,7 @@ int main( int argc, char * argv[] )
396 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 396 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
397 return(1); 397 return(1);
398 if ((list_len)) 398 if ((list_len))
399 return(our_error(opts, NULL, "list still has elements")); 399 return(trutils_error(opts, NULL, "list still has elements"));
400 free(list); 400 free(list);
401 401
402 402
@@ -419,7 +419,7 @@ int main( int argc, char * argv[] )
419 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 419 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
420 return(1); 420 return(1);
421 if ((list_len)) 421 if ((list_len))
422 return(our_error(opts, NULL, "list still has elements")); 422 return(trutils_error(opts, NULL, "list still has elements"));
423 free(list); 423 free(list);
424 424
425 425
@@ -447,7 +447,7 @@ int main( int argc, char * argv[] )
447 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 447 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
448 return(1); 448 return(1);
449 if ((list_len)) 449 if ((list_len))
450 return(our_error(opts, NULL, "list still has elements")); 450 return(trutils_error(opts, NULL, "list still has elements"));
451 free(list); 451 free(list);
452 452
453 453
@@ -470,7 +470,7 @@ int main( int argc, char * argv[] )
470 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 470 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
471 return(1); 471 return(1);
472 if ((list_len)) 472 if ((list_len))
473 return(our_error(opts, NULL, "list still has elements")); 473 return(trutils_error(opts, NULL, "list still has elements"));
474 free(list); 474 free(list);
475 475
476 476
@@ -493,7 +493,7 @@ int main( int argc, char * argv[] )
493 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge))) 493 if ((my_test_remove(opts, list, &list_len, src, test, MY_LIST_LEN, merge)))
494 return(1); 494 return(1);
495 if ((list_len)) 495 if ((list_len))
496 return(our_error(opts, NULL, "list still has elements")); 496 return(trutils_error(opts, NULL, "list still has elements"));
497 free(list); 497 free(list);
498 498
499 return(0); 499 return(0);
@@ -616,7 +616,7 @@ my_test_insert(
616 case TINYRAD_ARRAY_REPLACE: action_name = "REPLACE"; break; 616 case TINYRAD_ARRAY_REPLACE: action_name = "REPLACE"; break;
617 case 0: action_name = "DEFAULT"; break; 617 case 0: action_name = "DEFAULT"; break;
618 default: 618 default:
619 return(our_error(opts, NULL, "unknown insert action")); 619 return(trutils_error(opts, NULL, "unknown insert action"));
620 }; 620 };
621 switch(mergeopt) 621 switch(mergeopt)
622 { 622 {
@@ -625,19 +625,19 @@ my_test_insert(
625 case TINYRAD_ARRAY_ANYDUP: merge_type = "ANY"; break; 625 case TINYRAD_ARRAY_ANYDUP: merge_type = "ANY"; break;
626 case 0: merge_type = "DEFAULT"; break; 626 case 0: merge_type = "DEFAULT"; break;
627 default: 627 default:
628 return(our_error(opts, NULL, "unknown dup action")); 628 return(trutils_error(opts, NULL, "unknown dup action"));
629 }; 629 };
630 630
631 trutils_verbose(opts, "testing tinyrad_array_add( %7s, %9s, %s ) [%s] ...", action_name, merge_type, compar_name, (((iteration)) ? "duplicate" : "unique")); 631 trutils_verbose(opts, "testing tinyrad_array_add( %7s, %9s, %s ) [%s] ...", action_name, merge_type, compar_name, (((iteration)) ? "duplicate" : "unique"));
632 for(x = 0; (x < dat_len); x++) 632 for(x = 0; (x < dat_len); x++)
633 { 633 {
634 if (tinyrad_array_add((void **)listp, list_lenp, sizeof(MyData *), &src[x], arrayopt, compar, NULL, &realloc) == -1) 634 if (tinyrad_array_add((void **)listp, list_lenp, sizeof(MyData *), &src[x], arrayopt, compar, NULL, &realloc) == -1)
635 return(our_error(opts, NULL, "tinyrad_array_add(%s): returned error", action_name)); 635 return(trutils_error(opts, NULL, "tinyrad_array_add(%s): returned error", action_name));
636 len = (iteration*dat_len) + x + 1; 636 len = (iteration*dat_len) + x + 1;
637 if ( ((iteration)) && (!(arrayopt & TINYRAD_ARRAY_MERGE)) ) 637 if ( ((iteration)) && (!(arrayopt & TINYRAD_ARRAY_MERGE)) )
638 len = dat_len; 638 len = dat_len;
639 if (*list_lenp != len) 639 if (*list_lenp != len)
640 return(our_error(opts, NULL, "tinyrad_array_add(%s): did not increment length", action_name)); 640 return(trutils_error(opts, NULL, "tinyrad_array_add(%s): did not increment length", action_name));
641 }; 641 };
642 642
643 list = *listp; 643 list = *listp;
@@ -651,19 +651,19 @@ my_test_insert(
651 { 651 {
652 pos = x/iteration; 652 pos = x/iteration;
653 if ((strcasecmp(test[pos]->name, list[x]->name))) 653 if ((strcasecmp(test[pos]->name, list[x]->name)))
654 return(our_error(opts, NULL, "tinyrad_array_add(%s): misordered the list", action_name)); 654 return(trutils_error(opts, NULL, "tinyrad_array_add(%s): misordered the list", action_name));
655 switch(mergeopt) 655 switch(mergeopt)
656 { 656 {
657 case TINYRAD_ARRAY_LASTDUP: 657 case TINYRAD_ARRAY_LASTDUP:
658 if ( (x < ((dat_len*iteration)-1)) && ((x % iteration) == (iteration-1)) ) 658 if ( (x < ((dat_len*iteration)-1)) && ((x % iteration) == (iteration-1)) )
659 if (!(strcasecmp(list[x]->name, list[x+1]->name))) 659 if (!(strcasecmp(list[x]->name, list[x+1]->name)))
660 return(our_error(opts, NULL, "tinyrad_array_add(%s): first match not returned", action_name)); 660 return(trutils_error(opts, NULL, "tinyrad_array_add(%s): first match not returned", action_name));
661 break; 661 break;
662 662
663 case TINYRAD_ARRAY_FIRSTDUP: 663 case TINYRAD_ARRAY_FIRSTDUP:
664 if ( (x > 0) && (!(x % iteration)) ) 664 if ( (x > 0) && (!(x % iteration)) )
665 if (!(strcasecmp(list[x]->name, list[x-1]->name))) 665 if (!(strcasecmp(list[x]->name, list[x-1]->name)))
666 return(our_error(opts, NULL, "tinyrad_array_add(%s): first match not returned", action_name)); 666 return(trutils_error(opts, NULL, "tinyrad_array_add(%s): first match not returned", action_name));
667 break; 667 break;
668 668
669 case TINYRAD_ARRAY_ANYDUP: 669 case TINYRAD_ARRAY_ANYDUP:
@@ -712,7 +712,7 @@ my_test_remove(
712 case TINYRAD_ARRAY_REPLACE: action_name = "REPLACE"; break; 712 case TINYRAD_ARRAY_REPLACE: action_name = "REPLACE"; break;
713 case 0: action_name = "DEFAULT"; break; 713 case 0: action_name = "DEFAULT"; break;
714 default: 714 default:
715 return(our_error(opts, NULL, "unknown insert action")); 715 return(trutils_error(opts, NULL, "unknown insert action"));
716 }; 716 };
717 switch(mergeopt) 717 switch(mergeopt)
718 { 718 {
@@ -721,19 +721,19 @@ my_test_remove(
721 case TINYRAD_ARRAY_ANYDUP: merge_type = "ANY"; break; 721 case TINYRAD_ARRAY_ANYDUP: merge_type = "ANY"; break;
722 case 0: merge_type = "DEFAULT"; break; 722 case 0: merge_type = "DEFAULT"; break;
723 default: 723 default:
724 return(our_error(opts, NULL, "unknown dup action")); 724 return(trutils_error(opts, NULL, "unknown dup action"));
725 }; 725 };
726 726
727 trutils_verbose(opts, "testing tinyrad_array_remove( %7s, %9s, %s ) [%s] ...", action_name, merge_type, compar_name, (((iteration)) ? "duplicate" : "unique")); 727 trutils_verbose(opts, "testing tinyrad_array_remove( %7s, %9s, %s ) [%s] ...", action_name, merge_type, compar_name, (((iteration)) ? "duplicate" : "unique"));
728 for(x = 0; (x < dat_len); x++) 728 for(x = 0; (x < dat_len); x++)
729 { 729 {
730 if (tinyrad_array_remove(list, list_lenp, sizeof(MyData *), &src[x], arrayopt, compar, NULL) == -1) 730 if (tinyrad_array_remove(list, list_lenp, sizeof(MyData *), &src[x], arrayopt, compar, NULL) == -1)
731 return(our_error(opts, NULL, "tinyrad_array_remove(%s): returned error", action_name)); 731 return(trutils_error(opts, NULL, "tinyrad_array_remove(%s): returned error", action_name));
732 len = ((iteration+1)*dat_len) - x - 1; 732 len = ((iteration+1)*dat_len) - x - 1;
733 if ( ((iteration)) && (!(arrayopt & TINYRAD_ARRAY_MERGE)) ) 733 if ( ((iteration)) && (!(arrayopt & TINYRAD_ARRAY_MERGE)) )
734 len = dat_len; 734 len = dat_len;
735 if (*list_lenp != len) 735 if (*list_lenp != len)
736 return(our_error(opts, NULL, "tinyrad_array_remove(%s): did not decrement length", action_name)); 736 return(trutils_error(opts, NULL, "tinyrad_array_remove(%s): did not decrement length", action_name));
737 }; 737 };
738 738
739 if (!(arrayopt & TINYRAD_ARRAY_MERGE)) 739 if (!(arrayopt & TINYRAD_ARRAY_MERGE))
@@ -744,19 +744,19 @@ my_test_remove(
744 { 744 {
745 pos = x/iteration; 745 pos = x/iteration;
746 if ((strcasecmp(test[pos]->name, list[x]->name))) 746 if ((strcasecmp(test[pos]->name, list[x]->name)))
747 return(our_error(opts, NULL, "tinyrad_array_remove(%s): misordered the list", action_name)); 747 return(trutils_error(opts, NULL, "tinyrad_array_remove(%s): misordered the list", action_name));
748 switch(mergeopt) 748 switch(mergeopt)
749 { 749 {
750 case TINYRAD_ARRAY_LASTDUP: 750 case TINYRAD_ARRAY_LASTDUP:
751 if ( (x < ((dat_len*iteration)-1)) && ((x % iteration) == (iteration-1)) ) 751 if ( (x < ((dat_len*iteration)-1)) && ((x % iteration) == (iteration-1)) )
752 if (!(strcasecmp(list[x]->name, list[x+1]->name))) 752 if (!(strcasecmp(list[x]->name, list[x+1]->name)))
753 return(our_error(opts, NULL, "tinyrad_array_remove(%s): first match not returned", action_name)); 753 return(trutils_error(opts, NULL, "tinyrad_array_remove(%s): first match not returned", action_name));
754 break; 754 break;
755 755
756 case TINYRAD_ARRAY_FIRSTDUP: 756 case TINYRAD_ARRAY_FIRSTDUP:
757 if ( (x > 0) && (!(x % iteration)) ) 757 if ( (x > 0) && (!(x % iteration)) )
758 if (!(strcasecmp(list[x]->name, list[x-1]->name))) 758 if (!(strcasecmp(list[x]->name, list[x-1]->name)))
759 return(our_error(opts, NULL, "tinyrad_array_remove(%s): first match not returned", action_name)); 759 return(trutils_error(opts, NULL, "tinyrad_array_remove(%s): first match not returned", action_name));
760 break; 760 break;
761 761
762 case TINYRAD_ARRAY_ANYDUP: 762 case TINYRAD_ARRAY_ANYDUP:
@@ -799,12 +799,12 @@ my_test_search(
799 case MY_KEY_NAME: ptr = list[y]->name; break; 799 case MY_KEY_NAME: ptr = list[y]->name; break;
800 case MY_KEY_VALUE: ptr = &list[y]->value; break; 800 case MY_KEY_VALUE: ptr = &list[y]->value; break;
801 default: 801 default:
802 return(our_error(opts, NULL, "unknown key")); 802 return(trutils_error(opts, NULL, "unknown key"));
803 }; 803 };
804 if ((idx = tinyrad_array_search(list, x, sizeof(MyData *), ptr, TINYRAD_ARRAY_FIRSTDUP, NULL, compar)) == -1) 804 if ((idx = tinyrad_array_search(list, x, sizeof(MyData *), ptr, TINYRAD_ARRAY_FIRSTDUP, NULL, compar)) == -1)
805 return(our_error(opts, NULL, "tinyrad_array_search(); size: %zu; func: %s; idx: %zu; search error", x, compar_name, y)); 805 return(trutils_error(opts, NULL, "tinyrad_array_search(); size: %zu; func: %s; idx: %zu; search error", x, compar_name, y));
806 if ((size_t)idx != y) 806 if ((size_t)idx != y)
807 return(our_error(opts, NULL, "tinyrad_array_search(); size: %zu; func: %s; idx: %zu; index mismatch", x, compar_name, y)); 807 return(trutils_error(opts, NULL, "tinyrad_array_search(); size: %zu; func: %s; idx: %zu; index mismatch", x, compar_name, y));
808 }; 808 };
809 }; 809 };
810 810
@@ -820,14 +820,14 @@ my_test_search(
820 case MY_KEY_NAME: ptr = list[y]->name; break; 820 case MY_KEY_NAME: ptr = list[y]->name; break;
821 case MY_KEY_VALUE: ptr = &list[y]->value; break; 821 case MY_KEY_VALUE: ptr = &list[y]->value; break;
822 default: 822 default:
823 return(our_error(opts, NULL, "unknown key")); 823 return(trutils_error(opts, NULL, "unknown key"));
824 }; 824 };
825 if ((res = tinyrad_array_get(list, x, sizeof(MyData *), ptr, TINYRAD_ARRAY_FIRSTDUP, compar)) == NULL) 825 if ((res = tinyrad_array_get(list, x, sizeof(MyData *), ptr, TINYRAD_ARRAY_FIRSTDUP, compar)) == NULL)
826 return(our_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; search error", x, compar_name, y)); 826 return(trutils_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; search error", x, compar_name, y));
827 if ((strcasecmp((*res)->name, list[y]->name))) 827 if ((strcasecmp((*res)->name, list[y]->name)))
828 return(our_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; result name does not match", x, compar_name, y)); 828 return(trutils_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; result name does not match", x, compar_name, y));
829 if ((*res)->value != list[y]->value) 829 if ((*res)->value != list[y]->value)
830 return(our_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; result value does not match", x, compar_name, y)); 830 return(trutils_error(opts, NULL, "tinyrad_array_get(); size: %zu; func: %s; idx: %zu; result value does not match", x, compar_name, y));
831 }; 831 };
832 }; 832 };
833 833