From 2209fc49329397db92c0fb92dfbd02bdf6a2aca3 Mon Sep 17 00:00:00 2001 From: David RENE Date: Mon, 14 May 2007 07:25:58 +0000 Subject: [PATCH] fix writing mistake and print some information in failure case in get_file manage the quit_requested on MessageQueue --- calexium_lib/net_services/CXM_net_services.anubis | 2 +- calexium_lib/net_services_protocols/ftp_client.anubis | 16 +++++++--------- 2 files changed, 8 insertions(+), 10 deletions(-) diff --git a/calexium_lib/net_services/CXM_net_services.anubis b/calexium_lib/net_services/CXM_net_services.anubis index 5c7befa..ae8c914 100644 --- a/calexium_lib/net_services/CXM_net_services.anubis +++ b/calexium_lib/net_services/CXM_net_services.anubis @@ -116,7 +116,7 @@ define One MessageQueue queue, List(NetService) net_services ) = - if queue.quit_requested(uniqe) then + if queue.quit_requested(unique) then unique else println("PRE SERVICE message_receiver "+"["+virtual_machine_id + "]"); diff --git a/calexium_lib/net_services_protocols/ftp_client.anubis b/calexium_lib/net_services_protocols/ftp_client.anubis index 49f306c..101cc6f 100644 --- a/calexium_lib/net_services_protocols/ftp_client.anubis +++ b/calexium_lib/net_services_protocols/ftp_client.anubis @@ -85,16 +85,16 @@ define Maybe(One) println("_CXM_FTP_GET_FILE sent"); if wait_for_reply(mQ, _CXM_FTP_GET_FILE, 30) is { - failure then failure, - timeout then failure, - unknow_cmd then failure, - error then failure, - ok then failure, + failure then println("get_file failure");failure, + timeout then println("get_file timeout");failure, + unknow_cmd then println("get_file unknow_cmd");failure, + error then println("get_file remote error msg");failure, + ok then println("get_file ok");failure, ok_msg(msg)then if find_int32(msg, "FileSize") is { failure then println("file size not found"); failure, - success(size) then + success(size) then println("file size "+size); start_get_file_transtert(mQ, local_file, size) } } @@ -142,9 +142,7 @@ public define Maybe(One) with queue = create_MessageQueue, message_transceiver(conn, queue); if request_for_service(queue) then - with result = get_file(queue, remote_file, local_file), - queue.quit(unique); - result + get_file(queue, remote_file, local_file) else println("Service not found");failure } -- libgit2 0.21.4