You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
115 lines
3.0 KiB
115 lines
3.0 KiB
/* Copyright (c) 2016 PaddlePaddle Authors. All Rights Reserve.
|
|
Licensed under the Apache License, Version 2.0 (the "License");
|
|
you may not use this file except in compliance with the License.
|
|
You may obtain a copy of the License at
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
Unless required by applicable law or agreed to in writing, software
|
|
distributed under the License is distributed on an "AS IS" BASIS,
|
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
See the License for the specific language governing permissions and
|
|
limitations under the License. */
|
|
|
|
#pragma once
|
|
|
|
#include "paddle/platform/enforce.h"
|
|
#include "paddle/platform/place.h"
|
|
|
|
#ifdef PADDLE_WITH_CUDA
|
|
#include "paddle/platform/dynload/cublas.h"
|
|
#include "paddle/platform/dynload/cudnn.h"
|
|
#include "paddle/platform/gpu_info.h"
|
|
#define EIGEN_USE_GPU
|
|
#endif
|
|
#include <memory>
|
|
#include "paddle/platform/place.h"
|
|
#include "unsupported/Eigen/CXX11/Tensor"
|
|
|
|
namespace paddle {
|
|
namespace platform {
|
|
|
|
template <typename T>
|
|
struct EigenDeviceConverter;
|
|
|
|
template <>
|
|
struct EigenDeviceConverter<platform::CPUPlace> {
|
|
using EigenDeviceType = Eigen::DefaultDevice;
|
|
};
|
|
|
|
class DeviceContext {
|
|
public:
|
|
virtual ~DeviceContext() {}
|
|
virtual Place GetPlace() const = 0;
|
|
|
|
template <typename PlaceType,
|
|
typename DeviceType =
|
|
typename EigenDeviceConverter<PlaceType>::EigenDeviceType>
|
|
DeviceType* GetEigenDevice() const;
|
|
|
|
virtual void Wait() const {}
|
|
|
|
virtual void Finish() const {}
|
|
};
|
|
|
|
class CPUDeviceContext : public DeviceContext {
|
|
public:
|
|
CPUDeviceContext();
|
|
explicit CPUDeviceContext(CPUPlace place);
|
|
|
|
Eigen::DefaultDevice* eigen_device() const;
|
|
|
|
Place GetPlace() const override;
|
|
|
|
private:
|
|
std::unique_ptr<Eigen::DefaultDevice> eigen_device_;
|
|
};
|
|
|
|
#ifdef PADDLE_WITH_CUDA
|
|
template <>
|
|
struct EigenDeviceConverter<platform::GPUPlace> {
|
|
using EigenDeviceType = Eigen::GpuDevice;
|
|
};
|
|
|
|
class EigenCudaStreamDevice;
|
|
|
|
class CUDADeviceContext : public DeviceContext {
|
|
public:
|
|
explicit CUDADeviceContext(GPUPlace place);
|
|
virtual ~CUDADeviceContext();
|
|
|
|
/*! \brief Wait for all operations completion in the stream. */
|
|
void Wait() const override;
|
|
|
|
/*! \brief Check potential errors for the cuda kernel calls. */
|
|
void Finish() const override;
|
|
|
|
/*! \brief Return place in the device context. */
|
|
Place GetPlace() const override;
|
|
|
|
/*! \brief Return eigen device in the device context. */
|
|
Eigen::GpuDevice* eigen_device() const;
|
|
|
|
/*! \brief Return cublas handle in the device context. */
|
|
cublasHandle_t cublas_handle() const;
|
|
|
|
/*! \brief Return cudnn handle in the device context. */
|
|
cudnnHandle_t cudnn_handle() const;
|
|
|
|
/*! \brief Return cuda stream in the device context. */
|
|
cudaStream_t stream() const;
|
|
|
|
private:
|
|
GPUPlace place_;
|
|
|
|
std::unique_ptr<Eigen::GpuDevice> eigen_device_;
|
|
std::unique_ptr<EigenCudaStreamDevice> eigen_stream_;
|
|
|
|
cudaStream_t stream_;
|
|
cudnnHandle_t cudnn_handle_;
|
|
cublasHandle_t cublas_handle_;
|
|
};
|
|
|
|
#endif
|
|
|
|
} // namespace platform
|
|
} // namespace paddle
|