Add retries on CLUSTERDOWN in tests and fix sanitizer error

Signed-off-by: Viktor Söderqvist <[email protected]>

Author: vitarb

src/functions.c

@@ -159,6 +159,11 @@ static void engineLibraryDispose(dict *d, void *obj) {
     engineLibraryFree(obj);
 }
 
+/* Wrapper to free a library when used as a list free callback */
+static void engineLibraryListFree(void *obj) {
+    engineLibraryFree(obj);
+}
+
 /* Clear all the functions from the given library ctx */
 void functionsLibCtxClear(functionsLibCtx *lib_ctx) {
     dictEmpty(lib_ctx->functions, NULL);
@@ -338,7 +343,7 @@ libraryJoin(functionsLibCtx *functions_lib_ctx_dst, functionsLibCtx *functions_l
             } else {
                 if (!old_libraries_list) {
                     old_libraries_list = listCreate();
-                    listSetFreeMethod(old_libraries_list, (void (*)(void *))engineLibraryFree);
+                    listSetFreeMethod(old_libraries_list, engineLibraryListFree);
                 }
                 libraryUnlink(functions_lib_ctx_dst, old_li);
                 listAddNodeTail(old_libraries_list, old_li);

tests/support/cluster.tcl

@@ -230,7 +230,8 @@ proc ::valkey_cluster::__dispatch__ {id method args} {
             if {[catch {$link $method {*}$args} e]} {
                 if {$link eq {} || \
                     [string range $e 0 4] eq {MOVED} || \
-                    [string range $e 0 2] eq {I/O} \
+                    [string range $e 0 2] eq {I/O} || \
+		    [string range $e 0 10] eq {CLUSTERDOWN} \
                 } {
                     # MOVED redirection.
                     ::valkey_cluster::__method__refresh_nodes_map $id