import AVFoundation
#if os(macOS)
import AppKit

/// 视频源录制器：从 AVPlayerItemVideoOutput 抓帧 + 源 URL 音频轨道，写入 mp4
@MainActor
final class PlayerRecorder: NSObject {
    
    private var writer: AVAssetWriter?
    private var videoInput: AVAssetWriterInput?
    private var audioInput: AVAssetWriterInput?
    private var timer: Timer?
    private var startDate: Date?
    private var weakOutput: AVPlayerItemVideoOutput?
    private var firstFrameTime: CMTime?
    private var audioReader: AVAssetReader?
    private var audioReaderOutput: AVAssetReaderTrackOutput?
    private var audioCaptureQueue: DispatchQueue?
    private var isRunning = false
    
    // 视频：缓存上一帧，确保静态场景也能持续写入
    private var lastPixelBuffer: CVPixelBuffer?
    private var captureFrameCount: Int = 0
    
    @Published var isRecording = false
    @Published var durationText = "00:00"
    
    var onRecordingSaved: ((URL) -> Void)?
    var onError: ((String) -> Void)?
    
    private var tempURL: URL?
    
    private var saveDirectory: URL {
        let movies = FileManager.default.urls(for: .moviesDirectory, in: .userDomainMask).first!
        let dir = movies.appendingPathComponent("MiniPlayer", isDirectory: true)
        try? FileManager.default.createDirectory(at: dir, withIntermediateDirectories: true)
        return dir
    }
    
    /// 开始录制
    func startRecording(from output: AVPlayerItemVideoOutput, sourceURL: URL, startTime: CMTime) {
        guard !isRecording else { return }
        
        weakOutput = output
        firstFrameTime = nil
        lastPixelBuffer = nil
        captureFrameCount = 0
        isRunning = false
        
        // 临时文件
        let formatter = DateFormatter()
        formatter.dateFormat = "yyyy-MM-dd_HH-mm-ss"
        let filename = "Recording_\(formatter.string(from: Date())).mp4"
        let url = saveDirectory.appendingPathComponent(filename)
        tempURL = url
        
        do {
            writer = try AVAssetWriter(outputURL: url, fileType: .mp4)
        } catch {
            onError?("Cannot create writer: \(error.localizedDescription)")
            return
        }
        
        guard let writer = writer else { return }
        
        // 视频输入
        let videoSettings: [String: Any] = [
            AVVideoCodecKey: AVVideoCodecType.h264,
            AVVideoWidthKey: 1920,
            AVVideoHeightKey: 1080
        ]
        let vInput = AVAssetWriterInput(mediaType: .video, outputSettings: videoSettings)
        vInput.expectsMediaDataInRealTime = true
        if writer.canAdd(vInput) {
            writer.add(vInput)
            videoInput = vInput
        }
        
        // 音频输入
        let audioSettings: [String: Any] = [
            AVFormatIDKey: kAudioFormatMPEG4AAC,
            AVSampleRateKey: 44100,
            AVNumberOfChannelsKey: 2,
            AVEncoderBitRateKey: 128000
        ]
        let aInput = AVAssetWriterInput(mediaType: .audio, outputSettings: audioSettings)
        aInput.expectsMediaDataInRealTime = true
        if writer.canAdd(aInput) {
            writer.add(aInput)
            audioInput = aInput
        }
        
        writer.startWriting()
        
        // 启动视频抓帧
        isRecording = true
        isRunning = true
        startTimer()
        startCaptureLoop()
        
        // 启动音频读取（从播放位置开始）
        startAudioCapture(sourceURL: sourceURL, startTime: startTime, audioWriterInput: aInput)
    }
    
    /// 停止录制
    func stopRecording() {
        guard isRecording else { return }
        isRecording = false
        isRunning = false
        captureTimer?.invalidate()
        captureTimer = nil
        stopTimer()
        
        // 停止音频：先 cancel reader，再 markAsFinished
        audioReader?.cancelReading()
        audioReader = nil
        audioReaderOutput = nil
        
        videoInput?.markAsFinished()
        audioInput?.markAsFinished()
        
        writer?.finishWriting { [weak self] in
            Task { @MainActor in
                guard let self = self else { return }
                if let url = self.tempURL {
                    self.showSaveDialog(tempURL: url)
                }
            }
        }
        
        lastPixelBuffer = nil
    }
    
    // MARK: - 视频抓帧
    private var captureTimer: Timer?
    
    private func startCaptureLoop() {
        captureTimer = Timer.scheduledTimer(withTimeInterval: 1.0 / 30.0, repeats: true) { [weak self] _ in
            Task { @MainActor in
                self?.captureVideoFrame()
            }
        }
    }
    
    private func captureVideoFrame() {
        guard isRunning, let output = weakOutput, let input = videoInput,
              input.isReadyForMoreMediaData else { return }
        
        let hostTime = CACurrentMediaTime()
        let itemTime = output.itemTime(forHostTime: hostTime)
        
        // 尝试获取新帧，否则复用上一帧（确保静态场景也持续写入）
        if let pb = output.copyPixelBuffer(forItemTime: itemTime, itemTimeForDisplay: nil) {
            lastPixelBuffer = pb
        }
        
        guard let pb = lastPixelBuffer else { return }
        
        // 第一帧：启动 session
        if firstFrameTime == nil {
            firstFrameTime = itemTime
            writer?.startSession(atSourceTime: itemTime)
        }
        
        guard let firstTime = firstFrameTime else { return }
        let relativeTime = CMTimeSubtract(itemTime, firstTime)
        guard relativeTime.seconds >= 0 else { return }
        
        let sampleBuffer = Self.createSampleBuffer(from: pb, time: relativeTime)
        if let sb = sampleBuffer {
            if input.append(sb) {
                captureFrameCount += 1
            }
        }
    }
    
    private static func createSampleBuffer(from pixelBuffer: CVPixelBuffer, time: CMTime) -> CMSampleBuffer? {
        var info = CMSampleTimingInfo()
        info.presentationTimeStamp = time
        info.duration = CMTime(value: 1, timescale: 30)
        info.decodeTimeStamp = .invalid
        
        var formatDescription: CMFormatDescription?
        CMVideoFormatDescriptionCreateForImageBuffer(allocator: kCFAllocatorDefault, imageBuffer: pixelBuffer, formatDescriptionOut: &formatDescription)
        
        guard let fd = formatDescription else { return nil }
        
        var sampleBuffer: CMSampleBuffer?
        CMSampleBufferCreateReadyWithImageBuffer(allocator: kCFAllocatorDefault, imageBuffer: pixelBuffer, formatDescription: fd, sampleTiming: &info, sampleBufferOut: &sampleBuffer)
        return sampleBuffer
    }
    
    // MARK: - 音频读取（从源 URL，用 requestMediaDataWhenReady 控制节奏）
    private func startAudioCapture(sourceURL: URL, startTime: CMTime, audioWriterInput: AVAssetWriterInput) {
        let asset = AVURLAsset(url: sourceURL)
        
        Task {
            do {
                let audioTracks = try await asset.loadTracks(withMediaType: .audio)
                guard let audioTrack = audioTracks.first else {
                    print("[Recorder] No audio track in source")
                    return
                }
                guard self.isRunning else { return }
                
                let reader = try AVAssetReader(asset: asset)
                let readerOutput = AVAssetReaderTrackOutput(track: audioTrack, outputSettings: [
                    AVFormatIDKey: kAudioFormatLinearPCM,
                    AVSampleRateKey: 44100,
                    AVNumberOfChannelsKey: 2,
                    AVLinearPCMBitDepthKey: 16,
                    AVLinearPCMIsFloatKey: false,
                    AVLinearPCMIsBigEndianKey: false,
                    AVLinearPCMIsNonInterleaved: false
                ])
                readerOutput.alwaysCopiesSampleData = false
                
                // 从播放位置开始读取
                reader.timeRange = CMTimeRange(start: startTime, duration: .positiveInfinity)
                
                if reader.canAdd(readerOutput) {
                    reader.add(readerOutput)
                    reader.startReading()
                    
                    self.audioReader = reader
                    self.audioReaderOutput = readerOutput
                    
                    // 用 requestMediaDataWhenReady 控制读取节奏（writer 需要数据时才读）
                    let queue = DispatchQueue(label: "recorder.audio.capture")
                    self.audioCaptureQueue = queue
                    
                    audioWriterInput.requestMediaDataWhenReady(on: queue) { [weak self] in
                        guard let self = self else { return }
                        self.feedAudioSamples(writerInput: audioWriterInput, readerOutput: readerOutput, reader: reader)
                    }
                }
            } catch {
                print("[Recorder] Audio capture setup failed: \(error)")
            }
        }
    }
    
    /// 由 requestMediaDataWhenReady 回调，writer 需要数据时才读取
    private func feedAudioSamples(writerInput: AVAssetWriterInput,
                                   readerOutput: AVAssetReaderTrackOutput,
                                   reader: AVAssetReader) {
        while writerInput.isReadyForMoreMediaData {
            guard isRunning, reader.status == .reading,
                  let sampleBuffer = readerOutput.copyNextSampleBuffer() else {
                // 录制已停止或读取完毕
                if isRunning {
                    writerInput.markAsFinished()
                }
                return
            }
            
            // 重映射时间戳：源文件时间 → 相对于录制开始的时间
            guard let firstTime = self.firstFrameTime else {
                // 视频第一帧还没到，丢弃这个 buffer
                continue
            }
            
            var count: CMItemCount = 0
            CMSampleBufferGetSampleTimingInfoArray(sampleBuffer, entryCount: 0, arrayToFill: nil, entriesNeededOut: &count)
            var timingInfo = [CMSampleTimingInfo](repeating: CMSampleTimingInfo(), count: count)
            CMSampleBufferGetSampleTimingInfoArray(sampleBuffer, entryCount: count, arrayToFill: &timingInfo, entriesNeededOut: nil)
            
            for i in 0..<count {
                timingInfo[i].decodeTimeStamp = .invalid
                timingInfo[i].presentationTimeStamp = CMTimeSubtract(timingInfo[i].presentationTimeStamp, firstTime)
            }
            
            var newBuffer: CMSampleBuffer?
            CMSampleBufferCreateCopyWithNewTiming(allocator: kCFAllocatorDefault, sampleBuffer: sampleBuffer, sampleTimingEntryCount: count, sampleTimingArray: &timingInfo, sampleBufferOut: &newBuffer)
            
            if let nb = newBuffer {
                if !writerInput.append(nb) {
                    return
                }
            }
        }
    }
    
    // MARK: - Timer
    private func startTimer() {
        startDate = Date()
        durationText = "00:00"
        timer = Timer.scheduledTimer(withTimeInterval: 1.0, repeats: true) { [weak self] _ in
            Task { @MainActor in
                guard let self = self, let start = self.startDate else { return }
                let elapsed = Int(Date().timeIntervalSince(start))
                let m = elapsed / 60
                let s = elapsed % 60
                let h = m / 60
                if h > 0 {
                    self.durationText = String(format: "%d:%02d:%02d", h, m % 60, s)
                } else {
                    self.durationText = String(format: "%02d:%02d", m, s)
                }
            }
        }
    }
    
    private func stopTimer() {
        timer?.invalidate()
        timer = nil
        startDate = nil
        durationText = "00:00"
    }
    
    // MARK: - 保存对话框
    private func showSaveDialog(tempURL: URL) {
        let panel = NSSavePanel()
        panel.nameFieldStringValue = tempURL.lastPathComponent
        panel.allowedContentTypes = [.mpeg4Movie]
        panel.directoryURL = saveDirectory
        panel.title = "Save Recording"
        
        panel.begin { [weak self] response in
            guard let self = self else { return }
            if response == .OK, let destURL = panel.url {
                do {
                    if FileManager.default.fileExists(atPath: destURL.path) {
                        try FileManager.default.removeItem(at: destURL)
                    }
                    try FileManager.default.moveItem(at: tempURL, to: destURL)
                    self.onRecordingSaved?(destURL)
                } catch {
                    self.onError?("Save failed: \(error.localizedDescription)")
                }
            } else {
                try? FileManager.default.removeItem(at: tempURL)
            }
        }
    }
}

#endif