OpenTelemetry settings (#1831)

Co-authored-by: Chet Husk <baronfel@users.noreply.github.com>
ionide · Feb 26, 2023 · 07133a8 · 07133a8
1 parent 1bb6acd
commit 07133a8
Show file tree

Hide file tree

Showing 2 changed files with 24 additions and 0 deletions.
diff --git a/release/package.json b/release/package.json
@@ -672,6 +672,25 @@
           "description": "Automatically shows the MSBuild output panel when MSBuild functionality is invoked",
           "type": "boolean"
         },
+        "FSharp.notifications.trace": {
+          "default": false,
+          "description": "Enables more verbose notifications using System.Diagnostics.Activity to view traces from FSharp.Compiler.Service.",
+          "type" : "boolean"
+        },
+        "FSharp.notifications.traceNamespaces": {
+          "default": [
+            "BoundModel.TypeCheck",
+            "BackgroundCompiler."
+          ],
+          "description": "The set of System.Diagnostics.Activity names to watch.",
+          "type" : "array",
+          "required": ["FSharp.notifications.trace"]
+        },
+        "FSharp.openTelemetry.enabled": {
+          "default": false,
+          "description": "Enables OpenTelemetry exporter. See https://opentelemetry.io/docs/reference/specification/protocol/exporter/ for environment variables to configure for the exporter. Requires Restart.",
+          "type": "boolean"
+        },
         "FSharp.pipelineHints.enabled": {
           "default": true,
           "description": "Enables PipeLine hints, which are like LineLenses that appear along each step of a chain of piped expressions",

diff --git a/src/Core/LanguageService.fs b/src/Core/LanguageService.fs
@@ -677,6 +677,9 @@ Consider:
             let enableAdaptiveLspServer =
                 "FSharp.enableAdaptiveLspServer" |> Configuration.get false
 
+            let openTelemetryEnabled =
+                "FSharp.openTelemetry.enabled" |> Configuration.get false
+
             let enableProjectGraph =
                 "FSharp.enableMSBuildProjectGraph" |> Configuration.get false
 
@@ -809,6 +812,8 @@ Consider:
                               yield "--project-graph-enabled"
                           if enableAdaptiveLspServer then
                               yield "--adaptive-lsp-server-enabled"
+                          if openTelemetryEnabled then
+                              yield "--otel-exporter-enabled"
                           if verbose then
                               yield "--verbose"
                           if fsacSilencedLogs <> null && fsacSilencedLogs.Length > 0 then