// Row.swift
// This file is part of KeePassKit.
//
// Copyright © 2019 Maxime Epain. All rights reserved.
//
// KeePassKit is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// KeePassKit is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with KeePassKit. If not, see <https://www.gnu.org/licenses/>.

import Foundation
import Binary

public typealias Property<Type> = TLV<Type, UInt32>

public protocol Row: AnyObject {

    associatedtype `Type`: Streamable, Equatable

    static var End: Type { get }

    var properties: [Property<Type>] { get set }

    init()
}

extension Row {

    public subscript(_ type: Type) -> Bytes? {
        get { properties.first(where: { $0.type == type })?.value }
        set {
            properties.removeAll(type)
            guard let value = newValue else { return }
            let tlv = Property(type: type, value: value)
            properties.insert(tlv, at: 0)
        }
    }

    public func set(_ field: Property<Type>) {
        properties.removeAll(field.type)
        properties.insert(field, at: 0)
    }

    public func set(_ date: Date, at type: Type) {
        self[type] = Database.bytes(from: date)
    }

    public func date(at type: Type) -> Date? {
        guard let bytes = self[type] else { return nil }
        return Database.date(from: bytes)
    }

    public subscript<T>(_ type: Type) -> T? where T: BytesRepresentable {
        get {
            guard let bytes = self[type] else { return nil }
            return try? T(bytes)
        }
        set { self[type] = newValue?.bytes }
    }

    public func remove(_ type: Type) {
        properties.removeAll(type)
    }
}

extension Readable where Self: Row {

    public init(from input: Input) throws {
        self.init()
        while true {
            let field = try input.read() as Property<Type>
            guard field.type != Self.End else { break }
            properties.append(field)
        }
    }

}

extension Writable where Self: Row {

    public func write(to output: Output) throws {
        try output.write(properties)
        let end = Property(type: Self.End, value: [])
        try output.write(end)
    }
    
}

extension Sequence where Element: Row {

    public func first<T>(where type: Element.`Type`, _ predicate: (T) throws -> Bool) throws -> Element? where T: BytesRepresentable {
        return try first(where: {
            guard let bytes = $0[type] else { return false }
            return try predicate(try T(bytes))
        })
    }

    public func sorted<T>(field: Element.`Type`, by areInIncreasingOrder: (T, T) throws -> Bool) throws -> [Self.Element] where T: BytesRepresentable {
        return try sorted(by: {
            guard let rhs = $0[field], let lhs = $1[field] else { return false }
            return try areInIncreasingOrder(try T(rhs), try T(lhs))
        })
    }

}