Logger server port is now really configurable

Cédric RICARD
1 parent 257d59c2
Showing 1 changed file with 12 additions and 9 deletions Show diff stats
calexium_lib/net_services_protocols/logger_service.anubis
@@ -20,9 +20,13 @@ read calexium_lib/CXM_message_constants.anubis
 read calexium_lib/net_services/CXM_net_services.anubis
 read calexium_lib/net_services/CXM_generic_protocol.anubis
-//read NetBox_types.anubis
-//read mailfountain_types.anubis
-//read tools/mf_loggers.anubis
+// Special non-existing file. This is a work arround for a impossibility to define global configuration in anubis.
+// So this file allows you to specify on which UDP port the logger server is listening.
+// You have to provide this file in your base source directory (or any other folder which is scanned by the compilater,
+// and you define a function named 'logger_port' which simply return the port number as an Int32.
+// Example: 
+//     public define Int32 logger_port = 33610.
+read logger_config.anubis
 public define Int32 logger_srv_version = 1.
@@ -212,20 +216,19 @@ define One
 public define Maybe(UDP_Server)
    start_logger_server
      (
-       Int32        port,
        List(Logger) logs,
        Logger       debug_logger
      ) =
   if start_udp_server(0,
-                      port, 
+                      logger_port, 
                       make_udp_handler(logs, debug_logger),
                       8*1024,
                       my_notify) is
   {
     cannot_create_the_socket then logError(debug_logger, "Cannot create the listening socket."); failure, 
-    cannot_bind_address_port then logError(debug_logger, "Cannot bind to port 33610.");failure,
-    access_denied            then logError(debug_logger, "Cannot listen on port 33610.");failure,
-    ok(server)               then logInfo(debug_logger, "LocalLog Server started on port 33610."); success(server)
+    cannot_bind_address_port then logError(debug_logger, "Cannot bind to port " + logger_port + ".");failure,
+    access_denied            then logError(debug_logger, "Cannot listen on port " + logger_port + ".");failure,
+    ok(server)               then logInfo(debug_logger, "LocalLog Server started on port " + logger_port + "."); success(server)
   }.
@@ -266,7 +269,7 @@ define One
     String  logger_server,
     Message log_message
   )=
-  forget(send_message_by_udp(log_message, ip_address((127,0,0,1)), 33610)).
+  forget(send_message_by_udp(log_message, ip_address((127,0,0,1)), logger_port)).
 /*  if find_string(log_message, "LogString") is
   {