//
//  System.swift
//  Wraps `playdate->system` (pd_api_sys.h).
//

internal import CPlaydate

/// The system API: logging, input, time, menu items, and device state.
public enum System {}

extension System {
    private static var api: playdate_sys { Playdate.api.system.pointee }

    // MARK: - Types

    /// The state of the d-pad and face buttons, as an option set.
    public struct Buttons: OptionSet, Sendable {
        public let rawValue: UInt32
        public init(rawValue: UInt32) { self.rawValue = rawValue }
        init(_ buttons: PDButtons) { self.rawValue = buttons.rawValue }
        var cValue: PDButtons { PDButtons(rawValue) }

        public static let left = Buttons(kButtonLeft)
        public static let right = Buttons(kButtonRight)
        public static let up = Buttons(kButtonUp)
        public static let down = Buttons(kButtonDown)
        public static let b = Buttons(kButtonB)
        public static let a = Buttons(kButtonA)
    }

    /// Peripherals that can be enabled with `setPeripheralsEnabled(_:)`.
    public struct Peripherals: OptionSet, Sendable {
        public let rawValue: UInt32
        public init(rawValue: UInt32) { self.rawValue = rawValue }

        public static let none = Peripherals([])
        public static let accelerometer = Peripherals(rawValue: kAccelerometer.rawValue)
        public static let all = Peripherals(rawValue: kAllPeripherals.rawValue)
    }

    /// The system language.
    public enum Language: UInt32, Sendable {
        case english = 0
        case japanese = 1
        /// Only meaningful as an argument to `localizedText(forKey:language:)`.
        case system = 2

        init(_ language: PDLanguage) {
            self = Language(rawValue: language.rawValue) ?? .english
        }
        var cValue: PDLanguage { PDLanguage(rawValue) }
    }

    /// A calendar date and time, mirroring `PDDateTime`.
    public struct DateTime: Sendable {
        public var year: UInt16
        /// 1...12
        public var month: UInt8
        /// 1...31
        public var day: UInt8
        /// 1 = Monday ... 7 = Sunday
        public var weekday: UInt8
        /// 0...23
        public var hour: UInt8
        public var minute: UInt8
        public var second: UInt8

        public init(year: UInt16, month: UInt8, day: UInt8, weekday: UInt8 = 0,
                    hour: UInt8, minute: UInt8, second: UInt8) {
            self.year = year
            self.month = month
            self.day = day
            self.weekday = weekday
            self.hour = hour
            self.minute = minute
            self.second = second
        }

        init(_ dateTime: PDDateTime) {
            year = dateTime.year
            month = dateTime.month
            day = dateTime.day
            weekday = dateTime.weekday
            hour = dateTime.hour
            minute = dateTime.minute
            second = dateTime.second
        }

        var cValue: PDDateTime {
            PDDateTime(year: year, month: month, day: day, weekday: weekday,
                       hour: hour, minute: minute, second: second)
        }
    }

    /// Battery and power supply state.
    public struct PowerStatus: OptionSet, Sendable {
        public let rawValue: UInt32
        public init(rawValue: UInt32) { self.rawValue = rawValue }

        public static let charging = PowerStatus(rawValue: kPDPowerStatusCharging.rawValue)
        public static let usb = PowerStatus(rawValue: kPDPowerStatusUsb.rawValue)
        public static let screws = PowerStatus(rawValue: kPDPowerStatusScrews.rawValue)
    }

    /// OS, language, and pdx version information, mirroring `PDInfo`.
    public struct Info: Sendable {
        public let osVersion: UInt32
        public let language: Language
        public let pdxVersion: UInt32
    }

    // MARK: - Memory

    /// The system allocator. Pass `nil` to allocate, `size` 0 to free.
    @discardableResult
    public static func realloc(_ pointer: UnsafeMutableRawPointer?, size: Int) -> UnsafeMutableRawPointer? {
        api.realloc.unsafelyUnwrapped(pointer, size)
    }

    /// Frees memory that the Playdate OS handed to the caller (e.g. strings
    /// returned by `localizedText(forKey:)`).
    static func systemFree(_ pointer: UnsafeMutableRawPointer?) {
        _ = api.realloc.unsafelyUnwrapped(pointer, 0)
    }

    // MARK: - Logging

    /// Logs a message to the console (device serial or simulator console).
    public static func log(_ message: String) {
        message.withPlaydateCString { cplaydate_log(Playdate.apiPointer, $0) }
    }

    /// Stops execution and displays the message as a fatal error.
    public static func error(_ message: String) {
        message.withPlaydateCString { cplaydate_error(Playdate.apiPointer, $0) }
    }

    // MARK: - Time

    public static var language: Language { Language(api.getLanguage.unsafelyUnwrapped()) }

    /// Milliseconds since the game launched. Wraps around after about 49 days.
    public static var currentTimeMilliseconds: UInt32 {
        UInt32(api.getCurrentTimeMilliseconds.unsafelyUnwrapped())
    }

    /// Seconds (and sub-second milliseconds) since midnight 2000-01-01 UTC.
    public static var secondsSinceEpoch: (seconds: UInt32, milliseconds: UInt32) {
        var milliseconds: UInt32 = 0
        let seconds = withUnsafeMutablePointer(to: &milliseconds) {
            api.getSecondsSinceEpoch.unsafelyUnwrapped($0)
        }
        return (UInt32(seconds), milliseconds)
    }

    /// High-resolution timer value, in seconds.
    public static var elapsedTime: Float { api.getElapsedTime.unsafelyUnwrapped() }

    public static func resetElapsedTime() { api.resetElapsedTime.unsafelyUnwrapped() }

    /// Offset from UTC of the user-set timezone, in seconds.
    public static var timezoneOffset: Int32 { api.getTimezoneOffset.unsafelyUnwrapped() }

    public static var shouldDisplay24HourTime: Bool {
        api.shouldDisplay24HourTime.unsafelyUnwrapped() != 0
    }

    public static func convertEpochToDateTime(_ epoch: UInt32) -> DateTime {
        var dateTime = PDDateTime()
        api.convertEpochToDateTime.unsafelyUnwrapped(epoch, &dateTime)
        return DateTime(dateTime)
    }

    public static func convertDateTimeToEpoch(_ dateTime: DateTime) -> UInt32 {
        var cValue = dateTime.cValue
        return api.convertDateTimeToEpoch.unsafelyUnwrapped(&cValue)
    }

    /// Blocks execution for the given number of milliseconds.
    public static func delay(milliseconds: UInt32) {
        api.delay.unsafelyUnwrapped(milliseconds)
    }

    /// Requests the server time. The completion receives the time string or
    /// an error string. Only one request is tracked at a time; a second call
    /// before the first completes replaces the stored completion.
    public static func getServerTime(_ completion: @escaping (_ time: String?, _ error: String?) -> Void) {
        serverTimeCompletion = completion
        api.getServerTime.unsafelyUnwrapped { time, error in
            let completion = System.serverTimeCompletion
            System.serverTimeCompletion = nil
            completion?(String(playdateCString: time), String(playdateCString: error))
        }
    }

    nonisolated(unsafe) private static var serverTimeCompletion: ((String?, String?) -> Void)?

    // MARK: - Update loop

    /// Sets the per-frame update callback. Return `true` to redraw the display.
    public static func setUpdateCallback(_ callback: @escaping () -> Bool) {
        updateCallback = callback
        api.setUpdateCallback.unsafelyUnwrapped({ _ in
            System.updateCallback?() == true ? 1 : 0
        }, nil)
    }

    nonisolated(unsafe) private static var updateCallback: (() -> Bool)?

    /// Draws the current frames-per-second value at the given point.
    public static func drawFPS(x: Int = 0, y: Int = 0) {
        api.drawFPS.unsafelyUnwrapped(Int32(x), Int32(y))
    }

    // MARK: - Input

    /// The current button state: held, pressed this frame, released this frame.
    public static var buttonState: (current: Buttons, pushed: Buttons, released: Buttons) {
        var current = PDButtons(0), pushed = PDButtons(0), released = PDButtons(0)
        api.getButtonState.unsafelyUnwrapped(&current, &pushed, &released)
        return (Buttons(current), Buttons(pushed), Buttons(released))
    }

    /// Installs a callback invoked for every button press/release. `queueSize`
    /// sets how many events are buffered between frames. The return value of
    /// the callback is reserved by the OS; return 0.
    public static func setButtonCallback(queueSize: Int = 5,
                                         _ callback: ((_ button: Buttons, _ isDown: Bool, _ when: UInt32) -> Int32)?) {
        buttonCallback = callback
        if callback != nil {
            api.setButtonCallback.unsafelyUnwrapped({ button, down, when, _ in
                System.buttonCallback?(Buttons(button), down != 0, when) ?? 0
            }, nil, Int32(queueSize))
        } else {
            api.setButtonCallback.unsafelyUnwrapped(nil, nil, Int32(queueSize))
        }
    }

    nonisolated(unsafe) private static var buttonCallback: ((Buttons, Bool, UInt32) -> Int32)?

    public static func setPeripheralsEnabled(_ peripherals: Peripherals) {
        api.setPeripheralsEnabled.unsafelyUnwrapped(PDPeripherals(peripherals.rawValue))
    }

    /// The most recent accelerometer reading, in g. Enable the accelerometer
    /// with `setPeripheralsEnabled(.accelerometer)` first.
    public static var accelerometer: (x: Float, y: Float, z: Float) {
        var x: Float = 0, y: Float = 0, z: Float = 0
        api.getAccelerometer.unsafelyUnwrapped(&x, &y, &z)
        return (x, y, z)
    }

    /// Degrees the crank moved since the last frame.
    public static var crankChange: Float { api.getCrankChange.unsafelyUnwrapped() }

    /// The crank position in degrees; 0 points along the +Y axis.
    public static var crankAngle: Float { api.getCrankAngle.unsafelyUnwrapped() }

    public static var isCrankDocked: Bool { api.isCrankDocked.unsafelyUnwrapped() != 0 }

    /// Disables or enables the crank dock/undock sounds. Returns the previous setting.
    @discardableResult
    public static func setCrankSoundsDisabled(_ disabled: Bool) -> Bool {
        api.setCrankSoundsDisabled.unsafelyUnwrapped(disabled ? 1 : 0) != 0
    }

    /// Whether the user has the "flipped" system setting enabled.
    public static var isFlipped: Bool { api.getFlipped.unsafelyUnwrapped() != 0 }

    public static func setAutoLockDisabled(_ disabled: Bool) {
        api.setAutoLockDisabled.unsafelyUnwrapped(disabled ? 1 : 0)
    }

    /// Installs a callback invoked when a message is received on the serial port
    /// via `msg <text>`.
    public static func setSerialMessageCallback(_ callback: ((String) -> Void)?) {
        serialMessageCallback = callback
        if callback != nil {
            api.setSerialMessageCallback.unsafelyUnwrapped { data in
                guard let message = String(playdateCString: data) else { return }
                System.serialMessageCallback?(message)
            }
        } else {
            api.setSerialMessageCallback.unsafelyUnwrapped(nil)
        }
    }

    nonisolated(unsafe) private static var serialMessageCallback: ((String) -> Void)?

    // MARK: - System menu

    /// An item added to the system menu. Keep no more than three items at once.
    public final class MenuItem {
        let pointer: OpaquePointer
        var onSelect: (MenuItem) -> Void
        /// Retains C strings passed to the OS for option titles.
        private var retainedOptionTitles: [UnsafeMutablePointer<CChar>] = []

        fileprivate init?(pointer: OpaquePointer?,
                          retainedOptionTitles: [UnsafeMutablePointer<CChar>] = [],
                          onSelect: @escaping (MenuItem) -> Void) {
            guard let pointer else {
                for title in retainedOptionTitles { title.deallocate() }
                return nil
            }
            self.pointer = pointer
            self.retainedOptionTitles = retainedOptionTitles
            self.onSelect = onSelect
        }

        /// The menu item's title.
        public var title: String {
            get {
                String(playdateCString: Playdate.api.system.pointee.getMenuItemTitle.unsafelyUnwrapped(pointer)) ?? ""
            }
            set {
                newValue.withPlaydateCString {
                    Playdate.api.system.pointee.setMenuItemTitle.unsafelyUnwrapped(pointer, $0)
                }
            }
        }

        /// For checkmark items this is 0 or 1; for option items it is the
        /// index of the selected option.
        public var value: Int {
            get { Int(Playdate.api.system.pointee.getMenuItemValue.unsafelyUnwrapped(pointer)) }
            set { Playdate.api.system.pointee.setMenuItemValue.unsafelyUnwrapped(pointer, Int32(newValue)) }
        }

        /// Convenience view of `value` for checkmark items.
        public var isChecked: Bool {
            get { value != 0 }
            set { value = newValue ? 1 : 0 }
        }

        fileprivate func deallocateRetainedTitles() {
            for title in retainedOptionTitles { title.deallocate() }
            retainedOptionTitles = []
        }
    }

    nonisolated(unsafe) private static var liveMenuItems: [MenuItem] = []

    private static let menuItemTrampoline: @convention(c) (UnsafeMutableRawPointer?) -> Void = { userdata in
        guard let userdata else { return }
        let item = Unmanaged<MenuItem>.fromOpaque(userdata).takeUnretainedValue()
        item.onSelect(item)
    }

    /// Adds a plain menu item to the system menu.
    @discardableResult
    public static func addMenuItem(title: String, onSelect: @escaping (MenuItem) -> Void) -> MenuItem? {
        var item: MenuItem?
        title.withPlaydateCString { cTitle in
            let pointer = api.addMenuItem.unsafelyUnwrapped(cTitle, menuItemTrampoline, nil)
            item = MenuItem(pointer: pointer, onSelect: onSelect)
        }
        return registered(item)
    }

    /// Adds a menu item with a checkbox.
    @discardableResult
    public static func addCheckmarkMenuItem(title: String, isChecked: Bool = false,
                                            onSelect: @escaping (MenuItem) -> Void) -> MenuItem? {
        var item: MenuItem?
        title.withPlaydateCString { cTitle in
            let pointer = api.addCheckmarkMenuItem.unsafelyUnwrapped(
                cTitle, isChecked ? 1 : 0, menuItemTrampoline, nil)
            item = MenuItem(pointer: pointer, onSelect: onSelect)
        }
        return registered(item)
    }

    /// Adds a menu item that cycles through the given options.
    @discardableResult
    public static func addOptionsMenuItem(title: String, options: [String],
                                          onSelect: @escaping (MenuItem) -> Void) -> MenuItem? {
        // The OS keeps the option title pointers, so copy and retain them for
        // the lifetime of the menu item.
        let copies = options.map { $0.copiedPlaydateCString() }
        var cOptions: [UnsafePointer<CChar>?] = copies.map { UnsafePointer($0) }
        var item: MenuItem?
        title.withPlaydateCString { cTitle in
            cOptions.withUnsafeMutableBufferPointer { buffer in
                let pointer = api.addOptionsMenuItem.unsafelyUnwrapped(
                    cTitle, buffer.baseAddress, Int32(options.count), menuItemTrampoline, nil)
                item = MenuItem(pointer: pointer, retainedOptionTitles: copies, onSelect: onSelect)
            }
        }
        return registered(item)
    }

    /// Registers the wrapper as the item's userdata and keeps it alive.
    private static func registered(_ item: MenuItem?) -> MenuItem? {
        guard let item else { return nil }
        api.setMenuItemUserdata.unsafelyUnwrapped(
            item.pointer, Unmanaged.passUnretained(item).toOpaque())
        liveMenuItems.append(item)
        return item
    }

    public static func removeMenuItem(_ item: MenuItem) {
        api.removeMenuItem.unsafelyUnwrapped(item.pointer)
        item.deallocateRetainedTitles()
        liveMenuItems.removeAll { $0 === item }
    }

    public static func removeAllMenuItems() {
        api.removeAllMenuItems.unsafelyUnwrapped()
        for item in liveMenuItems { item.deallocateRetainedTitles() }
        liveMenuItems = []
    }

    /// Sets a custom image for the pause menu, optionally shifted left by
    /// `xOffset` (0...200).
    public static func setMenuImage(_ bitmap: Graphics.Bitmap?, xOffset: Int = 0) {
        api.setMenuImage.unsafelyUnwrapped(bitmap?.pointer, Int32(xOffset))
    }

    // MARK: - Device state

    /// Whether the user has enabled the "reduce flashing" accessibility setting.
    public static var reduceFlashing: Bool { api.getReduceFlashing.unsafelyUnwrapped() != 0 }

    /// Battery charge, 0...100.
    public static var batteryPercentage: Float { api.getBatteryPercentage.unsafelyUnwrapped() }

    public static var batteryVoltage: Float { api.getBatteryVoltage.unsafelyUnwrapped() }

    /// Flushes the CPU instruction cache after loading code at runtime.
    public static func clearICache() { api.clearICache.unsafelyUnwrapped() }

    /// Quits the current game and restarts it with the given launch arguments.
    public static func restartGame(launchArguments: String? = nil) {
        if let launchArguments {
            launchArguments.withPlaydateCString { api.restartGame.unsafelyUnwrapped($0) }
        } else {
            api.restartGame.unsafelyUnwrapped(nil)
        }
    }

    /// The arguments the game was launched with, and the path of the pdx.
    public static var launchArguments: (arguments: String?, path: String?) {
        var path: UnsafePointer<CChar>?
        let arguments = api.getLaunchArgs.unsafelyUnwrapped(&path)
        return (String(playdateCString: arguments), String(playdateCString: path))
    }

    /// Sends data over the mirror connection. Returns `false` if mirroring is
    /// not active or the send fails.
    @discardableResult
    public static func sendMirrorData(command: UInt8, data: UnsafeMutableRawBufferPointer) -> Bool {
        api.sendMirrorData.unsafelyUnwrapped(command, data.baseAddress, Int32(data.count))
    }

    /// OS, language, and pdx version information.
    public static var info: Info {
        let info = api.getSystemInfo.unsafelyUnwrapped().unsafelyUnwrapped.pointee
        return Info(osVersion: info.osversion,
                    language: Language(info.language),
                    pdxVersion: info.pdxversion)
    }

    /// Looks up a localized string by key from the game's strings files.
    public static func localizedText(forKey key: String, language: Language = .system) -> String? {
        key.withPlaydateCString { cKey in
            guard let cString = api.getLocalizedText.unsafelyUnwrapped(cKey, language.cValue) else {
                return nil
            }
            let text = String(playdateCString: cString)
            systemFree(cString)
            return text
        }
    }

    /// The system volume, 0...1.
    public static var volume: Float { api.getVolume.unsafelyUnwrapped() }

    public static var powerStatus: PowerStatus {
        PowerStatus(rawValue: api.getPowerStatus.unsafelyUnwrapped().rawValue)
    }

    /// Quits the game and returns to the launcher.
    public static func exitToLauncher() { api.exitToLauncher.unsafelyUnwrapped() }
}