Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
core
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
LibreOffice
core
Commits
90336178
Kaydet (Commit)
90336178
authored
Eki 28, 2013
tarafından
I-Jui (Ray) Sung
Kaydeden (comit)
Kohei Yoshida
Eki 29, 2013
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
Use MD5 in RTL instead of the one from OpenSSL.
Change-Id: I120961da4fd9eb8ddd99e347ed4c266fcb2c7ec6
üst
8243c1f3
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
29 additions
and
26 deletions
+29
-26
formulagroupcl.cxx
sc/source/core/opencl/formulagroupcl.cxx
+29
-26
No files found.
sc/source/core/opencl/formulagroupcl.cxx
Dosyayı görüntüle @
90336178
...
...
@@ -30,8 +30,9 @@
#include <iostream>
#include <sstream>
#include <algorithm>
#define MD5_KERNEL 1
#ifdef MD5_KERNEL
#include <
openssl/md5
.h>
#include <
rtl/digest
.h>
#endif
#include <memory>
using
namespace
formula
;
...
...
@@ -1172,10 +1173,11 @@ public:
if
(
mKernelSignature
.
empty
())
{
std
::
stringstream
md5s
;
// Compute MD5SUM of kernel body to obtain the name
unsigned
char
result
[
MD5_DIGEST_LENGTH
];
MD5
(
reinterpret_cast
<
const
unsigned
char
*>
(
mKernelSrc
.
str
().
c_str
()),
mKernelSrc
.
str
().
length
(),
result
);
for
(
int
i
=
0
;
i
<
MD5_DIGEST_LENGTH
;
i
++
)
{
sal_uInt8
result
[
RTL_DIGEST_LENGTH_MD5
];
rtlDigestError
err
=
rtl_digest_MD5
(
mKernelSrc
.
str
().
c_str
(),
mKernelSrc
.
str
().
length
(),
result
,
RTL_DIGEST_LENGTH_MD5
);
for
(
int
i
=
0
;
i
<
RTL_DIGEST_LENGTH_MD5
;
i
++
)
{
md5s
<<
std
::
hex
<<
(
int
)
result
[
i
];
}
mKernelSignature
=
md5s
.
str
();
...
...
@@ -1188,26 +1190,7 @@ public:
/// Create program, build, and create kerenl
/// TODO cache results based on kernel body hash
/// TODO: abstract OpenCL part out into OpenCL wrapper.
bool
CreateKernel
(
void
)
{
cl_int
err
;
std
::
string
kname
=
"DynamicKernel"
+
mKernelSignature
;
// Compile kernel here!!!
// Obtain cl context
KernelEnv
kEnv
;
OclCalc
::
setKernelEnv
(
&
kEnv
);
const
char
*
src
=
mFullProgramSrc
.
c_str
();
mpProgram
=
clCreateProgramWithSource
(
kEnv
.
mpkContext
,
1
,
&
src
,
NULL
,
&
err
);
if
(
err
!=
CL_SUCCESS
)
return
true
;
err
=
clBuildProgram
(
mpProgram
,
1
,
OpenclDevice
::
gpuEnv
.
mpArryDevsID
,
""
,
NULL
,
NULL
);
if
(
err
!=
CL_SUCCESS
)
return
true
;
mpKernel
=
clCreateKernel
(
mpProgram
,
kname
.
c_str
(),
&
err
);
return
(
err
!=
CL_SUCCESS
);
}
bool
CreateKernel
(
void
);
/// Prepare buffers, marshal them to GPU, and launch the kernel
/// TODO: abstract OpenCL part out into OpenCL wrapper.
void
Launch
(
size_t
nr
)
...
...
@@ -1262,7 +1245,27 @@ DynamicKernel::~DynamicKernel()
clReleaseProgram
(
mpProgram
);
}
}
/// Build code
bool
DynamicKernel
::
CreateKernel
(
void
)
{
cl_int
err
;
std
::
string
kname
=
"DynamicKernel"
+
mKernelSignature
;
// Compile kernel here!!!
// Obtain cl context
KernelEnv
kEnv
;
OclCalc
::
setKernelEnv
(
&
kEnv
);
const
char
*
src
=
mFullProgramSrc
.
c_str
();
mpProgram
=
clCreateProgramWithSource
(
kEnv
.
mpkContext
,
1
,
&
src
,
NULL
,
&
err
);
if
(
err
!=
CL_SUCCESS
)
return
true
;
err
=
clBuildProgram
(
mpProgram
,
1
,
OpenclDevice
::
gpuEnv
.
mpArryDevsID
,
""
,
NULL
,
NULL
);
if
(
err
!=
CL_SUCCESS
)
return
true
;
mpKernel
=
clCreateKernel
(
mpProgram
,
kname
.
c_str
(),
&
err
);
return
(
err
!=
CL_SUCCESS
);
}
// Symbol lookup. If there is no such symbol created, allocate one
// kernel with argument with unique name and return so.
// The template argument T must be a subclass of DynamicKernelArgument
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment