/*
 * Copyright (C) 2013 Google Inc. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met:
 *
 *     * Redistributions of source code must retain the above copyright
 * notice, this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above
 * copyright notice, this list of conditions and the following disclaimer
 * in the documentation and/or other materials provided with the
 * distribution.
 *     * Neither the name of Google Inc. nor the names of its
 * contributors may be used to endorse or promote products derived from
 * this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include "config.h"
#include "modules/crypto/CryptoResultImpl.h"

#include "bindings/core/v8/Dictionary.h"
#include "bindings/core/v8/ScriptPromiseResolver.h"
#include "bindings/core/v8/ScriptState.h"
#include "bindings/core/v8/V8ArrayBuffer.h"
#include "bindings/core/v8/V8Binding.h"
#include "bindings/modules/v8/V8CryptoKey.h"
#include "core/dom/ContextLifecycleObserver.h"
#include "core/dom/DOMArrayBuffer.h"
#include "core/dom/DOMError.h"
#include "core/dom/DOMException.h"
#include "core/dom/ExecutionContext.h"
#include "modules/crypto/CryptoKey.h"
#include "modules/crypto/NormalizeAlgorithm.h"
#include "public/platform/Platform.h"
#include "public/platform/WebCryptoAlgorithm.h"

namespace blink {

static void rejectWithTypeError(const String& errorDetails, ScriptPromiseResolver* resolver)
{
    // Duplicate some of the checks done by ScriptPromiseResolver.
    if (!resolver->executionContext() || resolver->executionContext()->activeDOMObjectsAreStopped())
        return;

    ScriptState::Scope scope(resolver->scriptState());
    v8::Isolate* isolate = resolver->scriptState()->isolate();
    resolver->reject(v8::Exception::TypeError(v8String(isolate, errorDetails)));
}

class CryptoResultImpl::Resolver final : public ScriptPromiseResolver {
public:
    static PassRefPtrWillBeRawPtr<ScriptPromiseResolver> create(ScriptState* scriptState, CryptoResultImpl* result)
    {
        RefPtrWillBeRawPtr<Resolver> resolver = adoptRefWillBeNoop(new Resolver(scriptState, result));
        resolver->suspendIfNeeded();
        resolver->keepAliveWhilePending();
        return resolver.release();
    }

    virtual void stop() override
    {
        m_result->cancel();
        m_result->clearResolver();
        m_result = nullptr;
        ScriptPromiseResolver::stop();
    }

private:
    Resolver(ScriptState* scriptState, CryptoResultImpl* result)
        : ScriptPromiseResolver(scriptState)
        , m_result(result) { }
    RefPtr<CryptoResultImpl> m_result;
};

ExceptionCode webCryptoErrorToExceptionCode(WebCryptoErrorType errorType)
{
    switch (errorType) {
    case WebCryptoErrorTypeNotSupported:
        return NotSupportedError;
    case WebCryptoErrorTypeSyntax:
        return SyntaxError;
    case WebCryptoErrorTypeInvalidAccess:
        return InvalidAccessError;
    case WebCryptoErrorTypeData:
        return DataError;
    case WebCryptoErrorTypeOperation:
        return OperationError;
    case WebCryptoErrorTypeType:
        return V8TypeError;
    }

    ASSERT_NOT_REACHED();
    return 0;
}

CryptoResultImpl::~CryptoResultImpl()
{
    ASSERT(!m_resolver);
}

void CryptoResultImpl::clearResolver()
{
    m_resolver = nullptr;
}

PassRefPtrWillBeRawPtr<CryptoResultImpl> CryptoResultImpl::create(ScriptState* scriptState)
{
    return adoptRefWillBeNoop(new CryptoResultImpl(scriptState));
}

void CryptoResultImpl::completeWithError(WebCryptoErrorType errorType, const WebString& errorDetails)
{
    if (m_resolver) {
        ExceptionCode ec = webCryptoErrorToExceptionCode(errorType);

        // Handle TypeError separately, as it cannot be created using
        // DOMException.
        if (ec == V8TypeError)
            rejectWithTypeError(errorDetails, m_resolver);
        else
            m_resolver->reject(DOMException::create(ec, errorDetails));
    }
    clearResolver();
}

void CryptoResultImpl::completeWithBuffer(const void* bytes, unsigned bytesSize)
{
    if (m_resolver)
        m_resolver->resolve(DOMArrayBuffer::create(bytes, bytesSize));
    clearResolver();
}

void CryptoResultImpl::completeWithJson(const char* utf8Data, unsigned length)
{
    if (m_resolver) {
        ScriptPromiseResolver* resolver = m_resolver;
        ScriptState* scriptState = resolver->scriptState();
        ScriptState::Scope scope(scriptState);

        v8::Handle<v8::String> jsonString = v8::String::NewFromUtf8(scriptState->isolate(), utf8Data, v8::String::kInternalizedString, length);

        v8::TryCatch exceptionCatcher;
        v8::Handle<v8::Value> jsonDictionary = v8::JSON::Parse(jsonString);
        if (exceptionCatcher.HasCaught() || jsonDictionary.IsEmpty()) {
            ASSERT_NOT_REACHED();
            resolver->reject(DOMException::create(OperationError, "Failed inflating JWK JSON to object"));
        } else {
            resolver->resolve(jsonDictionary);
        }
    }
    clearResolver();
}

void CryptoResultImpl::completeWithBoolean(bool b)
{
    if (m_resolver)
        m_resolver->resolve(b);
    clearResolver();
}

void CryptoResultImpl::completeWithKey(const WebCryptoKey& key)
{
    if (m_resolver)
        m_resolver->resolve(CryptoKey::create(key));
    clearResolver();
}

void CryptoResultImpl::completeWithKeyPair(const WebCryptoKey& publicKey, const WebCryptoKey& privateKey)
{
    if (m_resolver) {
        ScriptState* scriptState = m_resolver->scriptState();
        ScriptState::Scope scope(scriptState);

        Dictionary keyPair = Dictionary::createEmpty(scriptState->isolate());

        v8::Handle<v8::Value> publicKeyValue = toV8(CryptoKey::create(publicKey), scriptState->context()->Global(), scriptState->isolate());
        v8::Handle<v8::Value> privateKeyValue = toV8(CryptoKey::create(privateKey), scriptState->context()->Global(), scriptState->isolate());

        keyPair.set("publicKey", publicKeyValue);
        keyPair.set("privateKey", privateKeyValue);

        m_resolver->resolve(keyPair.v8Value());
    }
    clearResolver();
}

bool CryptoResultImpl::cancelled() const
{
    return acquireLoad(&m_cancelled);
}

void CryptoResultImpl::cancel()
{
    releaseStore(&m_cancelled, 1);
}

CryptoResultImpl::CryptoResultImpl(ScriptState* scriptState)
    : m_cancelled(0)
{
    ASSERT(scriptState->contextIsValid());
    if (scriptState->executionContext()->activeDOMObjectsAreStopped()) {
        // If active dom objects have been stopped, avoid creating
        // CryptoResultResolver.
        m_resolver = nullptr;
    } else {
        m_resolver = Resolver::create(scriptState, this).get();
    }
}

ScriptPromise CryptoResultImpl::promise()
{
    return m_resolver ? m_resolver->promise() : ScriptPromise();
}

} // namespace blink