Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
Greenplum
Opencv
提交
f50a8299
O
Opencv
项目概览
Greenplum
/
Opencv
11 个月 前同步成功
通知
7
Star
0
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
DevOps
流水线
流水线任务
计划
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
O
Opencv
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
DevOps
DevOps
流水线
流水线任务
计划
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
流水线任务
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
f50a8299
编写于
9月 03, 2013
作者:
R
Roman Donchenko
提交者:
OpenCV Buildbot
9月 03, 2013
浏览文件
操作
浏览文件
下载
差异文件
Merge pull request #1383 from pengx17:2.4_clblas
上级
757e7f84
ea165394
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
51 addition
and
2 deletion
+51
-2
modules/ocl/src/gemm.cpp
modules/ocl/src/gemm.cpp
+48
-2
modules/ocl/src/initialization.cpp
modules/ocl/src/initialization.cpp
+3
-0
未找到文件。
modules/ocl/src/gemm.cpp
浏览文件 @
f50a8299
...
...
@@ -46,16 +46,62 @@
#include <iomanip>
#include "precomp.hpp"
namespace
cv
{
namespace
ocl
{
// used for clAmdBlas library to avoid redundant setup/teardown
void
clBlasSetup
();
void
clBlasTeardown
();
}}
/* namespace cv { namespace ocl */
#if !defined HAVE_CLAMDBLAS
void
cv
::
ocl
::
gemm
(
const
oclMat
&
,
const
oclMat
&
,
double
,
const
oclMat
&
,
double
,
oclMat
&
,
int
)
{
CV_Error
(
CV_StsNotImplemented
,
"OpenCL BLAS is not implemented"
);
}
void
cv
::
ocl
::
clBlasSetup
()
{
CV_Error
(
CV_StsNotImplemented
,
"OpenCL BLAS is not implemented"
);
}
void
cv
::
ocl
::
clBlasTeardown
()
{
//intentionally do nothing
}
#else
#include "clAmdBlas.h"
using
namespace
cv
;
static
bool
clBlasInitialized
=
false
;
static
Mutex
cs
;
void
cv
::
ocl
::
clBlasSetup
()
{
if
(
!
clBlasInitialized
)
{
AutoLock
al
(
cs
);
if
(
!
clBlasInitialized
)
{
openCLSafeCall
(
clAmdBlasSetup
());
clBlasInitialized
=
true
;
}
}
}
void
cv
::
ocl
::
clBlasTeardown
()
{
AutoLock
al
(
cs
);
if
(
clBlasInitialized
)
{
clAmdBlasTeardown
();
clBlasInitialized
=
false
;
}
}
void
cv
::
ocl
::
gemm
(
const
oclMat
&
src1
,
const
oclMat
&
src2
,
double
alpha
,
const
oclMat
&
src3
,
double
beta
,
oclMat
&
dst
,
int
flags
)
{
...
...
@@ -71,7 +117,8 @@ void cv::ocl::gemm(const oclMat &src1, const oclMat &src2, double alpha,
dst
.
create
(
src1
.
rows
,
src2
.
cols
,
src1
.
type
());
dst
.
setTo
(
Scalar
::
all
(
0
));
}
openCLSafeCall
(
clAmdBlasSetup
()
);
clBlasSetup
();
const
clAmdBlasTranspose
transA
=
(
cv
::
GEMM_1_T
&
flags
)
?
clAmdBlasTrans
:
clAmdBlasNoTrans
;
const
clAmdBlasTranspose
transB
=
(
cv
::
GEMM_2_T
&
flags
)
?
clAmdBlasTrans
:
clAmdBlasNoTrans
;
...
...
@@ -156,6 +203,5 @@ void cv::ocl::gemm(const oclMat &src1, const oclMat &src2, double alpha,
}
break
;
}
clAmdBlasTeardown
();
}
#endif
modules/ocl/src/initialization.cpp
浏览文件 @
f50a8299
...
...
@@ -68,6 +68,7 @@ namespace cv
namespace
ocl
{
extern
void
fft_teardown
();
extern
void
clBlasTeardown
();
/*
* The binary caching system to eliminate redundant program source compilation.
* Strictly, this is not a cache because we do not implement evictions right now.
...
...
@@ -1050,6 +1051,7 @@ namespace cv
void
Info
::
release
()
{
fft_teardown
();
clBlasTeardown
();
impl
->
release
();
impl
=
new
Impl
;
DeviceName
.
clear
();
...
...
@@ -1058,6 +1060,7 @@ namespace cv
Info
::~
Info
()
{
fft_teardown
();
clBlasTeardown
();
impl
->
release
();
}
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录