//
//  NSManagedObjectContext+HardcoreData.swift
//  HardcoreData
//
//  Copyright (c) 2014 John Rommel Estropia
//
//  Permission is hereby granted, free of charge, to any person obtaining a copy
//  of this software and associated documentation files (the "Software"), to deal
//  in the Software without restriction, including without limitation the rights
//  to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
//  copies of the Software, and to permit persons to whom the Software is
//  furnished to do so, subject to the following conditions:
//
//  The above copyright notice and this permission notice shall be included in all
//  copies or substantial portions of the Software.
//
//  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
//  IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
//  FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
//  AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
//  LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
//  OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
//  SOFTWARE.
//

import Foundation
import CoreData
import GCDKit

public extension NSManagedObjectContext {
    
    // MARK: - Public
    
    // MARK: Transactions
    
    public func temporaryContext() -> NSManagedObjectContext {
        
        let context = NSManagedObjectContext(concurrencyType: .PrivateQueueConcurrencyType)
        context.parentContext = self
        context.setupForHardcoreDataWithContextName("com.hardcoredata.temporarycontext")
        context.shouldCascadeSavesToParent = true
        
        return context
    }
    
    
    // MARK: - Internal
    
    internal func saveSynchronously() -> SaveResult {
        
        var result: SaveResult = SaveResult(hasChanges: false)
        if !self.hasChanges {
            
            self.reset()
            return result
        }
        
        self.performBlockAndWait {
            [unowned self] () -> () in
            
            var saveError: NSError?
            if self.save(&saveError) {
                
                if self.shouldCascadeSavesToParent {
                    
                    if let parentContext = self.parentContext {
                        
                        switch parentContext.saveSynchronously() {
                            
                        case .Success(let hasChanges):
                            result = SaveResult(hasChanges: true)
                        case .Failure(let error):
                            result = SaveResult(error)
                        }
                        return
                    }
                }
                
                result = SaveResult(hasChanges: true)
            }
            else if let error = saveError {
                
                HardcoreData.handleError(
                    error,
                    "Failed to save NSManagedObjectContext.")
                result = SaveResult(error)
            }
            else {
                
                result = SaveResult(hasChanges: false)
            }
        }
        
        return result
    }
    
    internal func saveAsynchronouslyWithCompletion(completion: ((result: SaveResult) -> ())?) {
        
        if !self.hasChanges {
            
            self.reset()
            if let completion = completion {
                
                GCDQueue.Main.async {
                    
                    completion(result: SaveResult(hasChanges: false))
                }
            }
            return
        }
        
        self.performBlock {
            [unowned self] () -> () in
            
            var saveError: NSError?
            if self.save(&saveError) {
                
                if self.shouldCascadeSavesToParent {
                    
                    if let parentContext = self.parentContext {
                        
                        parentContext.saveAsynchronouslyWithCompletion(completion)
                        return
                    }
                }
                
                if let completion = completion {
                    
                    GCDQueue.Main.async {
                        
                        completion(result: SaveResult(hasChanges: true))
                    }
                }
            }
            else if let error = saveError {
                
                HardcoreData.handleError(
                    error,
                    "Failed to save NSManagedObjectContext.")
                if let completion = completion {
                    
                    GCDQueue.Main.async {
                        
                        completion(result: SaveResult(error))
                    }
                }
            }
            else if let completion = completion {
                
                GCDQueue.Main.async {
                    
                    completion(result: SaveResult(hasChanges: false))
                }
            }
        }
    }
    
    internal class func rootSavingContextForCoordinator(coordinator: NSPersistentStoreCoordinator) -> NSManagedObjectContext {
        
        let context = NSManagedObjectContext(concurrencyType: .PrivateQueueConcurrencyType)
        context.persistentStoreCoordinator = coordinator
        context.mergePolicy = NSMergeByPropertyObjectTrumpMergePolicy
        context.setupForHardcoreDataWithContextName("com.hardcoredata.rootcontext")
        
        return context
    }
    
    internal class func mainContextForRootContext(rootContext: NSManagedObjectContext) -> NSManagedObjectContext {
        
        let context = NSManagedObjectContext(concurrencyType: .MainQueueConcurrencyType)
        context.parentContext = rootContext
        context.setupForHardcoreDataWithContextName("com.hardcoredata.maincontext")
        context.shouldCascadeSavesToParent = true
        context.observerForDidSaveNotification = NotificationObserver(
            notificationName: NSManagedObjectContextDidSaveNotification,
            object: rootContext,
            closure: { [weak context] (note) -> () in
                
                context?.mergeChangesFromContextDidSaveNotification(note)
                return
        })
        
        return context
    }
    
    
    // MARK: - Private
    
    private struct PropertyKeys {
        
        static var observerForWillSaveNotification: Void?
        static var observerForDidSaveNotification: Void?
        static var shouldCascadeSavesToParent: Void?
    }
    
    private var observerForWillSaveNotification: NotificationObserver? {
        
        get {
            
            return self.getAssociatedObjectForKey(&PropertyKeys.observerForWillSaveNotification)
        }
        set {
            
            self.setAssociatedRetainedObject(
                newValue,
                forKey: &PropertyKeys.observerForWillSaveNotification)
        }
    }
    
    private var observerForDidSaveNotification: NotificationObserver? {
        
        get {
            
            return self.getAssociatedObjectForKey(&PropertyKeys.observerForDidSaveNotification)
        }
        set {
        
            self.setAssociatedRetainedObject(
                newValue,
                forKey: &PropertyKeys.observerForDidSaveNotification)
        }
    }
    
    private var shouldCascadeSavesToParent: Bool {
        
        get {
            
            let number: NSNumber? = self.getAssociatedObjectForKey(&PropertyKeys.observerForDidSaveNotification)
            return number?.boolValue ?? false
        }
        set {
            
            self.setAssociatedCopiedObject(
                NSNumber(bool: newValue),
                forKey: &PropertyKeys.shouldCascadeSavesToParent)
        }
    }
    
    private func setupForHardcoreDataWithContextName(contextName: String) {
        
        if self.respondsToSelector("setName:") {
            
            self.name = contextName
        }
        
        self.observerForWillSaveNotification = NotificationObserver(
            notificationName: NSManagedObjectContextWillSaveNotification,
            object: self,
            closure: { (note) -> () in
                
                let context = note.object as NSManagedObjectContext
                let insertedObjects = context.insertedObjects
                if insertedObjects.count <= 0 {
                    
                    return
                }
                
                var permanentIDError: NSError?
                if context.obtainPermanentIDsForObjects(insertedObjects.allObjects, error: &permanentIDError) {
                    
                    return
                }
                
                if let error = permanentIDError {
                    
                    HardcoreData.handleError(
                        error,
                        "Failed to obtain permanent IDs for inserted objects.")
                }
        })
    }
}


// MARK: - DataContextProvider

extension NSManagedObjectContext: ObjectQueryable {
    
    public func findFirst<T: NSManagedObject>(entity: T.Type) -> T? {
        
        return self.findFirst(entity, customizeFetch: nil)
    }
    
    public func findFirst<T: NSManagedObject>(entity: T.Type, customizeFetch: FetchRequestCustomization?) -> T? {
        
        return self.findFirst(ObjectQuery(entity: entity), customizeFetch: customizeFetch)
    }
    
    public func findFirst<T: NSManagedObject>(query: ObjectQuery<T>) -> T? {
        
        return self.findFirst(query, customizeFetch: nil)
    }
    
    public func findFirst<T: NSManagedObject>(query: ObjectQuery<T>, customizeFetch: FetchRequestCustomization?) -> T? {
        
        let fetchRequest = query.createFetchRequestForContext(self)
        customizeFetch?(fetchRequest: fetchRequest)
        fetchRequest.fetchLimit = 1
        fetchRequest.resultType = .ManagedObjectResultType
        
        var fetchResults: [T]?
        var error: NSError?
        self.performBlockAndWait {
            
            fetchResults = self.executeFetchRequest(fetchRequest, error: &error) as? [T]
        }
        if fetchResults == nil {
            
            HardcoreData.handleError(error!, "Failed executing fetch request.")
            return nil
        }
        
        return fetchResults?.first
    }
    
    public func findAll<T: NSManagedObject>(entity: T.Type) -> [T]? {
        
        return self.findAll(entity, customizeFetch: nil)
    }
    
    public func findAll<T: NSManagedObject>(entity: T.Type, customizeFetch: FetchRequestCustomization?) -> [T]? {
        
        return self.findAll(ObjectQuery(entity: entity), customizeFetch: customizeFetch)
    }
    
    public func findAll<T: NSManagedObject>(query: ObjectQuery<T>) -> [T]? {
        
        return self.findAll(query, customizeFetch: nil)
    }
    
    public func findAll<T: NSManagedObject>(query: ObjectQuery<T>, customizeFetch: FetchRequestCustomization?) -> [T]? {
        
        let fetchRequest = query.createFetchRequestForContext(self)
        fetchRequest.fetchLimit = 0
        
        var fetchResults: [T]?
        var error: NSError?
        self.performBlockAndWait {
            
            fetchResults = self.executeFetchRequest(fetchRequest, error: &error) as? [T]
        }
        if fetchResults == nil {
            
            HardcoreData.handleError(error!, "Failed executing fetch request.")
            return nil
        }
        
        return fetchResults
    }
    
    public func count<T: NSManagedObject>(entity: T.Type) -> Int {
        
        return self.count(ObjectQuery(entity: entity))
    }
    
    public func count<T: NSManagedObject>(query: ObjectQuery<T>) -> Int {
        
        let fetchRequest = query.createFetchRequestForContext(self)
        
        var count = 0
        var error: NSError?
        self.performBlockAndWait {
            
            count = self.countForFetchRequest(fetchRequest, error: &error)
        }
        if count == NSNotFound {
            
            HardcoreData.handleError( error!, "Failed executing fetch request.")
            return 0
        }
        
        return count
    }
}