/*******************************************************
 * Copyright (c) 2014, ArrayFire
 * All rights reserved.
 *
 * This file is distributed under 3-clause BSD license.
 * The complete license agreement can be obtained at:
 * http://arrayfire.com/licenses/BSD-3-Clause
 ********************************************************/

#include <platform.hpp>
#include <common/err_common.hpp>
#include <cublas.hpp>

namespace cuda
{
const char *errorString(cublasStatus_t err)
{
    switch(err)
    {
    case CUBLAS_STATUS_SUCCESS         : return "CUBLAS_STATUS_SUCCESS"         ;
    case CUBLAS_STATUS_NOT_INITIALIZED : return "CUBLAS_STATUS_NOT_INITIALIZED" ;
    case CUBLAS_STATUS_ALLOC_FAILED    : return "CUBLAS_STATUS_ALLOC_FAILED"    ;
    case CUBLAS_STATUS_INVALID_VALUE   : return "CUBLAS_STATUS_INVALID_VALUE"   ;
    case CUBLAS_STATUS_ARCH_MISMATCH   : return "CUBLAS_STATUS_ARCH_MISMATCH"   ;
    case CUBLAS_STATUS_MAPPING_ERROR   : return "CUBLAS_STATUS_MAPPING_ERROR"   ;
    case CUBLAS_STATUS_EXECUTION_FAILED: return "CUBLAS_STATUS_EXECUTION_FAILED";
    case CUBLAS_STATUS_INTERNAL_ERROR  : return "CUBLAS_STATUS_INTERNAL_ERROR"  ;
    case CUBLAS_STATUS_NOT_SUPPORTED   : return "CUBLAS_STATUS_NOT_SUPPORTED"   ;
    default: return "UNKNOWN";
    }
}

void cublasHandle::createHandle(BlasHandle* handle)
{
    CUBLAS_CHECK(cublasCreate(handle));
}
}
