ARK-OS/arkos/arkrt/ark.ui.basic/Sources/ViewGraph/PreferenceValues.swift

import Foundation

public struct PreferenceValues: Sendable {
    /// The default preferences.
    public static let `default` = PreferenceValues(
        onOpenURL: nil,
        presentationDetents: nil,
        presentationCornerRadius: nil,
        presentationDragIndicatorVisibility: nil,
        presentationBackground: nil,
        interactiveDismissDisabled: nil,
        windowDismissBehavior: nil,
        preferredWindowMinimizeBehavior: nil,
        windowResizeBehavior: nil,
        layoutPriority: defaultLayoutPriority
    )

    static let defaultLayoutPriority = 0.0

    public var onOpenURL: (@Sendable @MainActor (URL) -> Void)?

    /// The available detents for a sheet presentation. Applies to enclosing sheets.
    public var presentationDetents: [PresentationDetent]?

    /// The corner radius for a sheet presentation. Applies to enclosing sheets.
    public var presentationCornerRadius: Double?

    /// The drag indicator visibility for a sheet presentation. Applies to enclosing sheets.
    public var presentationDragIndicatorVisibility: Visibility?

    /// The background color for enclosing sheets.
    public var presentationBackground: Color?

    /// Sets the preferred color scheme for the nearest enclosing presentation.
    public var preferredColorScheme: ColorScheme?

    /// Controls whether the user can interactively dismiss enclosing sheets.
    public var interactiveDismissDisabled: Bool?

    /// Controls whether the user can close the enclosing window.
    public var windowDismissBehavior: WindowInteractionBehavior?

    /// Controls whether the user can minimize the enclosing window.
    public var preferredWindowMinimizeBehavior: WindowInteractionBehavior?

    /// Controls whether the user can resize the enclosing window.
    public var windowResizeBehavior: WindowInteractionBehavior?

    /// The layout priority of the view.
    var layoutPriority: Double

    /// Returns a copy of the preferences with the specified property set to the
    /// provided new value.
    ///
    /// - Parameters:
    ///   - keyPath: A key path to the property to set.
    ///   - newValue: The new value of the property.
    /// - Returns: A copy of the preferences with the specified property set to
    ///   `newValue`.
    public func with<T>(_ keyPath: WritableKeyPath<Self, T>, _ newValue: T) -> Self {
        var preferences = self
        preferences[keyPath: keyPath] = newValue
        return preferences
    }
}

extension PreferenceValues {
    init(merging children: [PreferenceValues]) {
        let handlers = children.compactMap(\.onOpenURL)

        if !handlers.isEmpty {
            onOpenURL = { url in
                for handler in handlers {
                    handler(url)
                }
            }
        }

        // For presentation modifiers, take the outer-most value (using child ordering to break ties).
        presentationDetents = children.compactMap(\.presentationDetents).first
        presentationCornerRadius = children.compactMap(\.presentationCornerRadius).first
        presentationDragIndicatorVisibility =
            children.compactMap(\.presentationDragIndicatorVisibility).first
        presentationBackground = children.compactMap(\.presentationBackground).first
        preferredColorScheme = children.compactMap(\.preferredColorScheme).first
        interactiveDismissDisabled = children.compactMap(\.interactiveDismissDisabled).first

        windowDismissBehavior = children.compactMap(\.windowDismissBehavior).first
        preferredWindowMinimizeBehavior =
            children.compactMap(\.preferredWindowMinimizeBehavior).first
        windowResizeBehavior = children.compactMap(\.windowResizeBehavior).first

        if let firstChild = children.first, children.count == 1 {
            layoutPriority = firstChild.layoutPriority
        } else {
            layoutPriority = Self.defaultLayoutPriority
        }
    }
}