Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
PaddlePaddle
Paddle
提交
2680dca9
P
Paddle
项目概览
PaddlePaddle
/
Paddle
11 个月 前同步成功
通知
2292
Star
20931
Fork
5422
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
1423
列表
看板
标记
里程碑
合并请求
543
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
P
Paddle
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
1,423
Issue
1,423
列表
看板
标记
里程碑
合并请求
543
合并请求
543
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
2680dca9
编写于
7月 15, 2017
作者:
L
liaogang
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
ENH: add cuda enforce to PADDLE_ENFORCE
上级
f812de2c
变更
2
显示空白变更内容
内联
并排
Showing
2 changed file
with
195 addition
and
0 deletion
+195
-0
paddle/platform/enforce.h
paddle/platform/enforce.h
+160
-0
paddle/platform/enforce_test.cc
paddle/platform/enforce_test.cc
+35
-0
未找到文件。
paddle/platform/enforce.h
0 → 100644
浏览文件 @
2680dca9
/* 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/string/printf.h>
#include <sstream>
#include <stdexcept>
#include <string>
#ifndef PADDLE_ONLY_CPU
#include "paddle/platform/dynload/cublas.h"
#include "paddle/platform/dynload/cudnn.h"
#include "paddle/platform/dynload/curand.h"
#include <cublas_v2.h>
#include <cudnn.h>
#include <curand.h>
#include <thrust/system/cuda/error.h>
#include <thrust/system_error.h>
#endif // PADDLE_ONLY_CPU
namespace
paddle
{
namespace
platform
{
/**
* @brief Enforce exception. Inherits std::exception
*
* All enforce condition not met, will throw an EnforceNotMet exception.
*/
class
EnforceNotMet
:
public
std
::
exception
{
public:
EnforceNotMet
(
const
std
::
string
&
msg
,
const
char
*
file
,
int
fileline
)
{
std
::
ostringstream
sout
;
sout
<<
msg
<<
" at ["
<<
file
<<
":"
<<
fileline
<<
"];"
;
all_msg_
=
sout
.
str
();
}
const
char
*
what
()
const
noexcept
override
{
return
all_msg_
.
c_str
();
}
private:
std
::
string
all_msg_
;
};
// From https://stackoverflow.com/questions/30130930/
// __buildin_expect is in C++ 11 standard. Since the condition which enforced
// should be true in most situation, it will make the compiler generate faster
// code by adding `UNLIKELY` macro.
#define UNLIKELY(condition) __builtin_expect(static_cast<bool>(condition), 0)
/**
* @brief Throw a EnforceNotMet exception, automatically filled __FILE__ &
* __LINE__
*
* This macro take __VA_ARGS__, user can pass any type if that type can
* serialize to std::ostream
*/
#define PADDLE_THROW(...) \
do { \
throw ::paddle::platform::EnforceNotMet( \
::paddle::string::Sprintf(__VA_ARGS__), __FILE__, __LINE__); \
} while (0)
#ifndef PADDLE_ONLY_CPU
template
<
typename
...
Args
>
inline
void
throw_on_error
(
cudaError_t
e
,
const
Args
&
...
args
)
{
if
(
UNLIKELY
(
!
(
e
)))
{
std
::
stringstream
ss
;
ss
<<
::
paddle
::
string
::
Sprintf
(
args
...);
ss
<<
::
paddle
::
string
::
Sprintf
(
" at [%s:%s];"
,
__FILE__
,
__LINE__
);
throw
thrust
::
system_error
(
e
,
thrust
::
cuda_category
(),
ss
.
str
());
}
}
template
<
typename
...
Args
>
inline
void
throw_on_error
(
curandStatus_t
stat
,
const
Args
&
...
args
)
{
if
(
stat
!=
CURAND_STATUS_SUCCESS
)
{
std
::
stringstream
ss
;
ss
<<
::
paddle
::
string
::
Sprintf
(
args
...);
ss
<<
::
paddle
::
string
::
Sprintf
(
" at [%s:%s];"
,
__FILE__
,
__LINE__
);
throw
thrust
::
system_error
(
cudaErrorLaunchFailure
,
thrust
::
cuda_category
(),
ss
.
str
());
}
}
template
<
typename
...
Args
>
inline
void
throw_on_error
(
cudnnStatus_t
stat
,
const
Args
&
...
args
)
{
if
(
stat
==
CUDNN_STATUS_SUCCESS
)
{
return
;
}
else
{
std
::
stringstream
ss
;
ss
<<
::
paddle
::
platform
::
dynload
::
cudnnGetErrorString
(
stat
);
ss
<<
", "
<<
::
paddle
::
string
::
Sprintf
(
args
...);
ss
<<
::
paddle
::
string
::
Sprintf
(
" at [%s:%s];"
,
__FILE__
,
__LINE__
);
throw
std
::
runtime_error
(
ss
.
str
());
}
}
template
<
typename
...
Args
>
inline
void
throw_on_error
(
cublasStatus_t
stat
,
const
Args
&
...
args
)
{
std
::
stringstream
ss
;
if
(
stat
==
CUBLAS_STATUS_SUCCESS
)
{
return
;
}
else
if
(
stat
==
CUBLAS_STATUS_NOT_INITIALIZED
)
{
ss
<<
"CUBLAS: not initialized"
;
}
else
if
(
stat
==
CUBLAS_STATUS_ALLOC_FAILED
)
{
ss
<<
"CUBLAS: alloc failed"
;
}
else
if
(
stat
==
CUBLAS_STATUS_INVALID_VALUE
)
{
ss
<<
"CUBLAS: invalid value"
;
}
else
if
(
stat
==
CUBLAS_STATUS_ARCH_MISMATCH
)
{
ss
<<
"CUBLAS: arch mismatch"
;
}
else
if
(
stat
==
CUBLAS_STATUS_MAPPING_ERROR
)
{
ss
<<
"CUBLAS: mapping error"
;
}
else
if
(
stat
==
CUBLAS_STATUS_EXECUTION_FAILED
)
{
ss
<<
"CUBLAS: execution failed"
;
}
else
if
(
stat
==
CUBLAS_STATUS_INTERNAL_ERROR
)
{
ss
<<
"CUBLAS: internal error"
;
}
else
if
(
stat
==
CUBLAS_STATUS_NOT_SUPPORTED
)
{
ss
<<
"CUBLAS: not supported"
;
}
else
if
(
stat
==
CUBLAS_STATUS_LICENSE_ERROR
)
{
ss
<<
"CUBLAS: license error"
;
}
ss
<<
", "
<<
::
paddle
::
string
::
Sprintf
(
args
...);
ss
<<
::
paddle
::
string
::
Sprintf
(
" at [%s:%s];"
,
__FILE__
,
__LINE__
);
throw
std
::
runtime_error
(
ss
.
str
());
}
#endif // PADDLE_ONLY_CPU
template
<
typename
...
Args
>
inline
void
throw_on_error
(
int
stat
,
const
Args
&
...
args
)
{
if
(
UNLIKELY
(
!
(
stat
)))
{
PADDLE_THROW
(
args
...);
}
}
/**
* @brief Enforce a condition, otherwise throw an EnforceNotMet
*/
#define PADDLE_ENFORCE(condition, ...) \
do { \
::paddle::platform::throw_on_error(condition, __VA_ARGS__); \
} while (0)
}
// namespace platform
}
// namespace paddle
paddle/platform/enforce_test.cc
0 → 100644
浏览文件 @
2680dca9
/* 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 <gtest/gtest.h>
#include <paddle/platform/enforce.h>
TEST
(
ENFORCE
,
OK
)
{
PADDLE_ENFORCE
(
true
,
"Enforce is ok %d now %f"
,
123
,
0.345
);
size_t
val
=
1
;
const
size_t
limit
=
10
;
PADDLE_ENFORCE
(
val
<
limit
,
"Enforce is OK too"
);
}
TEST
(
ENFORCE
,
FAILED
)
{
bool
in_catch
=
false
;
try
{
PADDLE_ENFORCE
(
false
,
"Enforce is not ok %d at all"
,
123
);
}
catch
(
paddle
::
platform
::
EnforceNotMet
err
)
{
in_catch
=
true
;
std
::
string
msg
=
"Enforce is not ok 123 at all"
;
const
char
*
what
=
err
.
what
();
for
(
size_t
i
=
0
;
i
<
msg
.
length
();
++
i
)
{
ASSERT_EQ
(
what
[
i
],
msg
[
i
]);
}
}
ASSERT_TRUE
(
in_catch
);
}
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录