diff --git a/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml b/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml index af06091d..a094f1ac 100644 --- a/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml +++ b/src/client-cohttp-eio/opentelemetry_client_cohttp_eio.ml @@ -178,10 +178,14 @@ let create_backend = create_exporter let setup_ ~sw ~config env : unit = Opentelemetry_ambient_context.set_current_storage Ambient_context_eio.storage; let exp = create_exporter ~config ~sw ~env () in - Sdk.set ?batch_traces:config.batch_traces ?batch_metrics:config.batch_metrics - ?batch_logs:config.batch_logs - ~batch_timeout:Mtime.Span.(config.batch_timeout_ms * ms) - exp + Sdk.set ~traces:config.traces ~metrics:config.metrics ~logs:config.logs exp; + + Option.iter + (fun min_level -> Opentelemetry.Self_debug.to_stderr ~min_level ()) + config.log_level; + + Opentelemetry.Self_debug.log Opentelemetry.Self_debug.Info (fun () -> + "opentelemetry: cohttp-eio exporter installed") let setup ?(config = Config.make ()) ?(enable = true) ~sw env = if enable && not config.sdk_disabled then setup_ ~sw ~config env diff --git a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml index db7703af..a295782f 100644 --- a/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml +++ b/src/client-cohttp-lwt/opentelemetry_client_cohttp_lwt.ml @@ -111,10 +111,15 @@ let create_backend = create_exporter let setup_ ~config () : unit = Opentelemetry_client_lwt.Util_ambient_context.setup_ambient_context (); let exp = create_exporter ~config () in - Sdk.set ?batch_traces:config.batch_traces ?batch_metrics:config.batch_metrics - ?batch_logs:config.batch_logs - ~batch_timeout:Mtime.Span.(config.batch_timeout_ms * ms) - exp; + Sdk.set ~traces:config.traces ~metrics:config.metrics ~logs:config.logs exp; + + Option.iter + (fun min_level -> Opentelemetry.Self_debug.to_stderr ~min_level ()) + config.log_level; + + Opentelemetry.Self_debug.log Opentelemetry.Self_debug.Info (fun () -> + "opentelemetry: cohttp-lwt exporter installed"); + () let setup ?(config = Config.make ()) ?(enable = true) () = diff --git a/src/client-ocurl-lwt/opentelemetry_client_ocurl_lwt.ml b/src/client-ocurl-lwt/opentelemetry_client_ocurl_lwt.ml index b7a59e8a..2bd08c18 100644 --- a/src/client-ocurl-lwt/opentelemetry_client_ocurl_lwt.ml +++ b/src/client-ocurl-lwt/opentelemetry_client_ocurl_lwt.ml @@ -86,10 +86,15 @@ let create_backend = create_exporter let setup_ ~config () : Exporter.t = Opentelemetry_client_lwt.Util_ambient_context.setup_ambient_context (); let exp = create_exporter ~config () in - Sdk.set ?batch_traces:config.batch_traces ?batch_metrics:config.batch_metrics - ?batch_logs:config.batch_logs - ~batch_timeout:Mtime.Span.(config.batch_timeout_ms * ms) - exp; + Sdk.set ~traces:config.traces ~metrics:config.metrics ~logs:config.logs exp; + + Option.iter + (fun min_level -> Opentelemetry.Self_debug.to_stderr ~min_level ()) + config.log_level; + + Opentelemetry.Self_debug.log Opentelemetry.Self_debug.Info (fun () -> + "opentelemetry: ocurl-lwt exporter installed"); + exp let setup ?(config = Config.make ()) ?(enable = true) () = diff --git a/src/client-ocurl/opentelemetry_client_ocurl.ml b/src/client-ocurl/opentelemetry_client_ocurl.ml index fd262e0b..bc75df06 100644 --- a/src/client-ocurl/opentelemetry_client_ocurl.ml +++ b/src/client-ocurl/opentelemetry_client_ocurl.ml @@ -89,11 +89,15 @@ let create_backend = create_exporter let setup_ ~config () : OTEL.Exporter.t = let exporter = create_exporter ~config () in - OTEL.Sdk.set ?batch_traces:config.common.batch_traces - ?batch_metrics:config.common.batch_metrics - ?batch_logs:config.common.batch_logs - ~batch_timeout:Mtime.Span.(config.common.batch_timeout_ms * ms) - exporter; + OTEL.Sdk.set ~traces:config.common.traces ~metrics:config.common.metrics + ~logs:config.common.logs exporter; + + Option.iter + (fun min_level -> OTEL.Self_debug.to_stderr ~min_level ()) + config.common.log_level; + + OTEL.Self_debug.log OTEL.Self_debug.Info (fun () -> + "opentelemetry: ocurl exporter installed"); OTELC.Self_trace.set_enabled config.common.self_trace; exporter