cuda_allocator.cc 1.8 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
// Copyright (c) 2018 PaddlePaddle Authors. All Rights Reserved.
//
// 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.

#include "paddle/fluid/memory/allocation/cuda_allocator.h"
#include <cuda.h>
#include <cuda_runtime.h>
#include <string>
Y
Yu Yang 已提交
19
#include "paddle/fluid/platform/cuda_device_guard.h"
20
#include "paddle/fluid/platform/enforce.h"
21 22 23 24 25
#include "paddle/fluid/platform/gpu_info.h"

namespace paddle {
namespace memory {
namespace allocation {
Y
Yu Yang 已提交
26
bool CUDAAllocator::IsAllocThreadSafe() const { return true; }
Z
Zeng Jinle 已提交
27
void CUDAAllocator::FreeImpl(Allocation* allocation) {
Y
Yu Yang 已提交
28
  platform::CUDADeviceGuard guard(place_.device);
Z
Zeng Jinle 已提交
29
  PADDLE_ENFORCE_EQ(boost::get<platform::CUDAPlace>(allocation->place()),
Y
Yu Yang 已提交
30 31 32 33
                    place_);
  PADDLE_ENFORCE(cudaFree(allocation->ptr()));
  delete allocation;
}
Z
Zeng Jinle 已提交
34

35
Allocation* CUDAAllocator::AllocateImpl(size_t size) {
Y
Yu Yang 已提交
36
  platform::CUDADeviceGuard guard(place_.device);
37 38 39
  void* ptr;
  auto status = cudaMalloc(&ptr, size);
  if (UNLIKELY(status != cudaSuccess)) {
40
    PADDLE_ENFORCE_NE(cudaGetLastError(), cudaSuccess);
41 42 43
    PADDLE_THROW_BAD_ALLOC("Cannot allocate %d on GPU %d, cuda status %d, %s",
                           size, place_.device, status,
                           cudaGetErrorString(status));
44
  }
Z
Zeng Jinle 已提交
45
  return new Allocation(ptr, size, platform::Place(place_));
46
}
Z
Zeng Jinle 已提交
47

48 49 50
}  // namespace allocation
}  // namespace memory
}  // namespace paddle