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.
120 lines
3.8 KiB
120 lines
3.8 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. */
|
|
|
|
#include "paddle/platform/gpu_info.h"
|
|
|
|
#include "gflags/gflags.h"
|
|
|
|
#include "paddle/platform/enforce.h"
|
|
#include "paddle/platform/environment.h"
|
|
|
|
DEFINE_double(fraction_of_gpu_memory_to_use, 0.95,
|
|
"Default use 95% of GPU memory for PaddlePaddle,"
|
|
"reserve the rest for page tables, etc");
|
|
|
|
namespace paddle {
|
|
namespace platform {
|
|
|
|
int GetDeviceCount() {
|
|
int count;
|
|
PADDLE_ENFORCE(
|
|
cudaGetDeviceCount(&count),
|
|
"cudaGetDeviceCount failed in paddle::platform::GetDeviceCount");
|
|
return count;
|
|
}
|
|
|
|
int GetCurrentDeviceId() {
|
|
int device_id;
|
|
PADDLE_ENFORCE(
|
|
cudaGetDevice(&device_id),
|
|
"cudaGetDevice failed in paddle::platform::GetCurrentDeviceId");
|
|
return device_id;
|
|
}
|
|
|
|
void SetDeviceId(int id) {
|
|
PADDLE_ENFORCE(cudaSetDevice(id),
|
|
"cudaSetDevice failed in paddle::platform::SetDeviceId");
|
|
}
|
|
|
|
void GpuMemoryUsage(size_t &available, size_t &total) {
|
|
PADDLE_ENFORCE(cudaMemGetInfo(&available, &total),
|
|
"cudaMemGetInfo failed in paddle::platform::GetMemoryUsage");
|
|
}
|
|
|
|
size_t GpuMaxAllocSize() {
|
|
size_t total = 0;
|
|
size_t available = 0;
|
|
|
|
GpuMemoryUsage(available, total);
|
|
|
|
// Reserve the rest for page tables, etc.
|
|
return static_cast<size_t>(total * FLAGS_fraction_of_gpu_memory_to_use);
|
|
}
|
|
|
|
size_t GpuMinChunkSize() {
|
|
// Allow to allocate the minimum chunk size is 256 bytes.
|
|
return 1 << 8;
|
|
}
|
|
|
|
size_t GpuMaxChunkSize() {
|
|
size_t total = 0;
|
|
size_t available = 0;
|
|
|
|
GpuMemoryUsage(available, total);
|
|
|
|
if (IsEnvVarDefined(kEnvFractionGpuMemoryToUse)) {
|
|
auto val = std::stod(GetEnvValue(kEnvFractionGpuMemoryToUse));
|
|
PADDLE_ENFORCE_GT(val, 0.0);
|
|
PADDLE_ENFORCE_LE(val, 1.0);
|
|
FLAGS_fraction_of_gpu_memory_to_use = val;
|
|
}
|
|
|
|
// Reserving the rest memory for page tables, etc.
|
|
size_t reserving = (1 - FLAGS_fraction_of_gpu_memory_to_use) * total;
|
|
|
|
// If available less than minimum chunk size, no usable memory exists.
|
|
available = std::max(available, GpuMinChunkSize()) - GpuMinChunkSize();
|
|
|
|
// If available less than reserving, no usable memory exists.
|
|
size_t usable = std::max(available, reserving) - reserving;
|
|
|
|
return usable;
|
|
}
|
|
|
|
void GpuMemcpyAsync(void *dst, const void *src, size_t count,
|
|
enum cudaMemcpyKind kind, cudaStream_t stream) {
|
|
PADDLE_ENFORCE(cudaMemcpyAsync(dst, src, count, kind, stream),
|
|
"cudaMemcpyAsync failed in paddle::platform::GpuMemcpyAsync");
|
|
}
|
|
|
|
void GpuMemcpySync(void *dst, const void *src, size_t count,
|
|
enum cudaMemcpyKind kind) {
|
|
PADDLE_ENFORCE(cudaMemcpy(dst, src, count, kind),
|
|
"cudaMemcpy failed in paddle::platform::GpuMemcpySync");
|
|
// note: cudaMemcpy may actually be asynchronous with respect to the caller,
|
|
// block on stream 0 to make sure the copy has completed
|
|
PADDLE_ENFORCE(
|
|
cudaStreamSynchronize(0),
|
|
"cudaStreamSynchronize failed in paddle::platform::GpuMemcpySync");
|
|
}
|
|
|
|
void GpuMemcpyPeer(void *dst, int dst_device, const void *src, int src_device,
|
|
size_t count, cudaStream_t stream) {
|
|
PADDLE_ENFORCE(
|
|
cudaMemcpyPeerAsync(dst, dst_device, src, src_device, count, stream),
|
|
"cudaMemcpyPeerAsync failed in paddle::platform::GpuMemcpyPeer");
|
|
}
|
|
} // namespace platform
|
|
} // namespace paddle
|