@clayroach/effect 3.19.14-source-capture.6 → 3.19.14-source-capture.8

package/src/internal/testing/suspendedWarningData.ts

@@ -1,85 +0,0 @@
-import type * as Fiber from "../../Fiber.js"
-
-/** @internal */
-export type SuspendedWarningData = Start | Pending | Done
-
-/** @internal */
-export const OP_SUSPENDED_WARNING_DATA_START = "Start" as const
-
-/** @internal */
-export type OP_SUSPENDED_WARNING_DATA_START = typeof OP_SUSPENDED_WARNING_DATA_START
-
-/** @internal */
-export const OP_SUSPENDED_WARNING_DATA_PENDING = "Pending" as const
-
-/** @internal */
-export type OP_SUSPENDED_WARNING_DATA_PENDING = typeof OP_SUSPENDED_WARNING_DATA_PENDING
-
-/** @internal */
-export const OP_SUSPENDED_WARNING_DATA_DONE = "Done" as const
-
-/** @internal */
-export type OP_SUSPENDED_WARNING_DATA_DONE = typeof OP_SUSPENDED_WARNING_DATA_DONE
-
-/** @internal */
-export interface Start {
-  readonly _tag: OP_SUSPENDED_WARNING_DATA_START
-}
-
-/** @internal */
-export interface Pending {
-  readonly _tag: OP_SUSPENDED_WARNING_DATA_PENDING
-  readonly fiber: Fiber.Fiber<void, Error>
-}
-
-/** @internal */
-export interface Done {
-  readonly _tag: OP_SUSPENDED_WARNING_DATA_DONE
-}
-
-/**
- * State indicating that a test has not adjusted the clock.
- *
- * @internal
- */
-export const start: SuspendedWarningData = {
-  _tag: OP_SUSPENDED_WARNING_DATA_START
-}
-
-/**
- * State indicating that a test has adjusted the clock but a fiber is still
- * running with a reference to the fiber that will display the warning
- * message.
- *
- * @internal
- */
-export const pending = (fiber: Fiber.Fiber<void, Error>): SuspendedWarningData => {
-  return {
-    _tag: OP_SUSPENDED_WARNING_DATA_PENDING,
-    fiber
-  }
-}
-
-/**
- * State indicating that the warning message has already been displayed.
- *
- * @internal
- */
-export const done: SuspendedWarningData = {
-  _tag: OP_SUSPENDED_WARNING_DATA_DONE
-}
-
-/** @internal */
-export const isStart = (self: SuspendedWarningData): self is Start => {
-  return self._tag === OP_SUSPENDED_WARNING_DATA_START
-}
-
-/** @internal */
-export const isPending = (self: SuspendedWarningData): self is Pending => {
-  return self._tag === OP_SUSPENDED_WARNING_DATA_PENDING
-}
-
-/** @internal */
-export const isDone = (self: SuspendedWarningData): self is Done => {
-  return self._tag === OP_SUSPENDED_WARNING_DATA_DONE
-}

package/src/internal/testing/warningData.ts

@@ -1,94 +0,0 @@
-import type * as Fiber from "../../Fiber.js"
-
-/**
- * `WarningData` describes the state of the warning message that is displayed
- * if a test is using time by is not advancing the `TestClock`. The possible
- * states are `Start` if a test has not used time, `Pending` if a test has
- * used time but has not adjusted the `TestClock`, and `Done` if a test has
- * adjusted the `TestClock` or the warning message has already been displayed.
- *
- * @internal
- */
-export type WarningData = Start | Pending | Done
-
-/** @internal */
-export const OP_WARNING_DATA_START = "Start" as const
-
-/** @internal */
-export type OP_WARNING_DATA_START = typeof OP_WARNING_DATA_START
-
-/** @internal */
-export const OP_WARNING_DATA_PENDING = "Pending" as const
-
-/** @internal */
-export type OP_WARNING_DATA_PENDING = typeof OP_WARNING_DATA_PENDING
-
-/** @internal */
-export const OP_WARNING_DATA_DONE = "Done" as const
-
-/** @internal */
-export type OP_WARNING_DATA_DONE = typeof OP_WARNING_DATA_DONE
-
-/** @internal */
-export interface Start {
-  readonly _tag: OP_WARNING_DATA_START
-}
-
-/** @internal */
-export interface Pending {
-  readonly _tag: OP_WARNING_DATA_PENDING
-  readonly fiber: Fiber.Fiber<void, Error>
-}
-
-/** @internal */
-export interface Done {
-  readonly _tag: OP_WARNING_DATA_DONE
-}
-
-/**
- * State indicating that a test has not used time.
- *
- * @internal
- */
-export const start: WarningData = {
-  _tag: OP_WARNING_DATA_START
-}
-
-/**
- * State indicating that a test has used time but has not adjusted the
- * `TestClock` with a reference to the fiber that will display the warning
- * message.
- *
- * @internal
- */
-export const pending = (fiber: Fiber.Fiber<void, Error>): WarningData => {
-  return {
-    _tag: OP_WARNING_DATA_PENDING,
-    fiber
-  }
-}
-
-/**
- * State indicating that a test has used time or the warning message has
- * already been displayed.
- *
- * @internal
- */
-export const done: WarningData = {
-  _tag: OP_WARNING_DATA_DONE
-}
-
-/** @internal */
-export const isStart = (self: WarningData): self is Start => {
-  return self._tag === OP_WARNING_DATA_START
-}
-
-/** @internal */
-export const isPending = (self: WarningData): self is Pending => {
-  return self._tag === OP_WARNING_DATA_PENDING
-}
-
-/** @internal */
-export const isDone = (self: WarningData): self is Done => {
-  return self._tag === OP_WARNING_DATA_DONE
-}

package/src/internal/tracer.ts

@@ -1,293 +0,0 @@
-/**
- * @since 2.0.0
- */
-import * as Context from "../Context.js"
-import type * as Exit from "../Exit.js"
-import type * as FiberRef from "../FiberRef.js"
-import { constFalse } from "../Function.js"
-import { globalValue } from "../GlobalValue.js"
-import type * as Option from "../Option.js"
-import type * as Tracer from "../Tracer.js"
-import * as core from "./core.js"
-
-/** @internal */
-export const TracerTypeId: Tracer.TracerTypeId = Symbol.for("effect/Tracer") as Tracer.TracerTypeId
-
-/** @internal */
-export const make = (options: Omit<Tracer.Tracer, Tracer.TracerTypeId>): Tracer.Tracer => ({
-  [TracerTypeId]: TracerTypeId,
-  ...options
-})
-
-/** @internal */
-export const tracerTag = Context.GenericTag<Tracer.Tracer>("effect/Tracer")
-
-/** @internal */
-export const spanTag = Context.GenericTag<Tracer.ParentSpan, Tracer.AnySpan>("effect/ParentSpan")
-
-const randomHexString = (function() {
-  const characters = "abcdef0123456789"
-  const charactersLength = characters.length
-  return function(length: number) {
-    let result = ""
-    for (let i = 0; i < length; i++) {
-      result += characters.charAt(Math.floor(Math.random() * charactersLength))
-    }
-    return result
-  }
-})()
-
-/** @internal */
-export class NativeSpan implements Tracer.Span {
-  readonly _tag = "Span"
-  readonly spanId: string
-  readonly traceId: string = "native"
-  readonly sampled = true
-
-  status: Tracer.SpanStatus
-  attributes: Map<string, unknown>
-  events: Array<[name: string, startTime: bigint, attributes: Record<string, unknown>]> = []
-  links: Array<Tracer.SpanLink>
-
-  constructor(
-    readonly name: string,
-    readonly parent: Option.Option<Tracer.AnySpan>,
-    readonly context: Context.Context<never>,
-    links: Iterable<Tracer.SpanLink>,
-    readonly startTime: bigint,
-    readonly kind: Tracer.SpanKind
-  ) {
-    this.status = {
-      _tag: "Started",
-      startTime
-    }
-    this.attributes = new Map()
-    this.traceId = parent._tag === "Some" ? parent.value.traceId : randomHexString(32)
-    this.spanId = randomHexString(16)
-    this.links = Array.from(links)
-  }
-
-  end(endTime: bigint, exit: Exit.Exit<unknown, unknown>): void {
-    this.status = {
-      _tag: "Ended",
-      endTime,
-      exit,
-      startTime: this.status.startTime
-    }
-  }
-
-  attribute(key: string, value: unknown): void {
-    this.attributes.set(key, value)
-  }
-
-  event(name: string, startTime: bigint, attributes?: Record<string, unknown>): void {
-    this.events.push([name, startTime, attributes ?? {}])
-  }
-
-  addLinks(links: ReadonlyArray<Tracer.SpanLink>): void {
-    // eslint-disable-next-line no-restricted-syntax
-    this.links.push(...links)
-  }
-}
-
-/** @internal */
-export const nativeTracer: Tracer.Tracer = make({
-  span: (name, parent, context, links, startTime, kind) =>
-    new NativeSpan(
-      name,
-      parent,
-      context,
-      links,
-      startTime,
-      kind
-    ),
-  context: (f) => f()
-})
-
-/** @internal */
-export const externalSpan = (options: {
-  readonly spanId: string
-  readonly traceId: string
-  readonly sampled?: boolean | undefined
-  readonly context?: Context.Context<never> | undefined
-}): Tracer.ExternalSpan => ({
-  _tag: "ExternalSpan",
-  spanId: options.spanId,
-  traceId: options.traceId,
-  sampled: options.sampled ?? true,
-  context: options.context ?? Context.empty()
-})
-
-/** @internal */
-export const addSpanStackTrace = (options: Tracer.SpanOptions | undefined): Tracer.SpanOptions => {
-  if (options?.captureStackTrace === false) {
-    return options
-  } else if (options?.captureStackTrace !== undefined && typeof options.captureStackTrace !== "boolean") {
-    return options
-  }
-  const limit = Error.stackTraceLimit
-  Error.stackTraceLimit = 3
-  const traceError = new Error()
-  Error.stackTraceLimit = limit
-  let cache: false | string = false
-  return {
-    ...options,
-    captureStackTrace: () => {
-      if (cache !== false) {
-        return cache
-      }
-      if (traceError.stack !== undefined) {
-        const stack = traceError.stack.split("\n")
-        if (stack[3] !== undefined) {
-          cache = stack[3].trim()
-          return cache
-        }
-      }
-    }
-  }
-}
-
-/** @internal */
-export const DisablePropagation = Context.Reference<Tracer.DisablePropagation>()("effect/Tracer/DisablePropagation", {
-  defaultValue: constFalse
-})
-
-// -----------------------------------------------------------------------------
-// Source Location Capture
-// -----------------------------------------------------------------------------
-
-/**
- * Represents a source code location captured from a stack trace.
- * @internal
- */
-export interface SourceLocation {
-  readonly file: string
-  readonly line: number
-  readonly column: number
-  readonly functionName?: string
-}
-
-// Cache for source locations: raw frame string -> SourceLocation
-// Maximum cache size to prevent unbounded memory growth in long-running services
-const MAX_SOURCE_LOCATION_CACHE_SIZE = 1000
-const sourceLocationCache = new Map<string, SourceLocation>()
-
-/**
- * Evicts the oldest cache entry if at capacity (FIFO eviction).
- * Maps maintain insertion order, so the first key is the oldest.
- * @internal
- */
-const evictOldestCacheEntry = (): void => {
-  if (sourceLocationCache.size >= MAX_SOURCE_LOCATION_CACHE_SIZE) {
-    const firstKey = sourceLocationCache.keys().next().value
-    if (firstKey !== undefined) {
-      sourceLocationCache.delete(firstKey)
-    }
-  }
-}
-
-/**
- * Parses source location from a pre-captured stack trace string with caching.
- * This is used when the stack was captured earlier (while user code was on stack)
- * but parsing is delayed until we know capture is enabled.
- *
- * @internal
- */
-export const parseSourceLocationFromStack = (stack: string): SourceLocation | undefined => {
-  const lines = stack.split("\n")
-  // Find first non-internal frame (skip Error, fork, unsafeMakeChildFiber, etc.)
-  const userFrame = findUserFrame(lines)
-  if (!userFrame) return undefined
-
-  const cacheKey = userFrame.raw // Use raw frame string as key
-
-  const cached = sourceLocationCache.get(cacheKey)
-  if (cached) return cached
-
-  const parsed = parseStackFrame(userFrame.raw)
-  if (parsed) {
-    evictOldestCacheEntry() // Ensure cache doesn't grow unbounded
-    sourceLocationCache.set(cacheKey, parsed)
-  }
-  return parsed
-}
-
-/**
- * Captures the source location from the current stack trace with caching.
- * Uses the raw stack frame string as the cache key for fast lookups.
- *
- * Note: Uses the current Error.stackTraceLimit value (typically 10-15).
- * If capturing deeply nested call sites, configure Error.stackTraceLimit
- * globally before importing Effect (e.g., Error.stackTraceLimit = 25).
- *
- * @internal
- */
-export const captureSourceLocationCached = (): SourceLocation | undefined => {
-  const traceError = new Error()
-  if (!traceError.stack) return undefined
-  return parseSourceLocationFromStack(traceError.stack)
-}
-
-const findUserFrame = (stack: Array<string>): { raw: string; index: number } | undefined => {
-  // Skip frames from Effect internals
-  for (let i = 1; i < stack.length; i++) {
-    const frame = stack[i]
-    if (
-      frame &&
-      !isInternalFrame(frame)
-    ) {
-      return { raw: frame.trim(), index: i }
-    }
-  }
-  return undefined
-}
-
-const isInternalFrame = (frame: string): boolean => {
-  // Skip internal directories
-  if (frame.includes("/internal/")) return true
-  // Skip Effect core source files
-  if (frame.includes("/packages/effect/src/")) return true
-  if (frame.includes("/effect/dist/")) return true
-  // Skip node_modules (for published effect packages)
-  if (frame.includes("node_modules/effect/")) return true
-  if (frame.includes("node_modules/@effect/")) return true
-  // Skip specific internal functions
-  if (frame.includes("fiberRuntime")) return true
-  if (frame.includes("captureSourceLocation")) return true
-  if (frame.includes("effect_internal_function")) return true
-  return false
-}
-
-const parseStackFrame = (frame: string): SourceLocation | undefined => {
-  // Parse "at functionName (file:line:col)" or "at file:line:col"
-  const match = frame.match(/at\s+(?:(.+?)\s+\()?(.+?):(\d+):(\d+)\)?/)
-  if (!match) return undefined
-
-  return {
-    functionName: match[1],
-    file: match[2],
-    line: parseInt(match[3], 10),
-    column: parseInt(match[4], 10)
-  }
-}
-
-// -----------------------------------------------------------------------------
-// OTel Context Propagation
-// -----------------------------------------------------------------------------
-
-/**
- * FiberRef for propagating OpenTelemetry span context through Effect's fiber hierarchy.
- *
- * When fibers are forked, they inherit this FiberRef's value from their parent.
- * This allows supervisors to maintain correct parent-child span relationships
- * even when the OTel AsyncLocalStorage context is lost due to Effect's fiber scheduler.
- *
- * The value is typed as `unknown` to avoid a direct dependency on @opentelemetry/api.
- * Consumers should cast to `OtelApi.Context` when using.
- *
- * @internal
- */
-export const currentOtelSpanContext: FiberRef.FiberRef<unknown> = globalValue(
-  "effect/Tracer/currentOtelSpanContext",
-  () => core.fiberRefUnsafeMake<unknown>(undefined)
-)