feed_kernel.cpp 2.3 KB
Newer Older
Y
yangfei 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
/* 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 "operators/kernel/feed_kernel.h"
Y
yangfei 已提交
16
#include "framework/cl/cl_tensor.h"
Y
yangfei 已提交
17
namespace paddle_mobile {
L
liuruilong 已提交
18 19 20 21 22 23 24 25 26 27 28 29 30 31
namespace operators {

template <>
bool FeedKernel<GPU_CL, float>::Init(FeedParam<GPU_CL> *param) {
  DLOG << "Init feed";
  this->cl_helper_.AddKernel("feed", "feed_kernel.cl");
  return true;
}

template <>
void FeedKernel<GPU_CL, float>::Compute(const FeedParam<GPU_CL> &param) {
  auto kernel = this->cl_helper_.KernelAt(0);
  cl_int status;
  auto output = param.Out();
Y
yangfei 已提交
32
  const Tensor *input = param.InputX();
L
liuruilong 已提交
33
  DLOG << *input;
Y
yangfei 已提交
34 35
  const float *input_data = input->data<float>();
  int numel = input->numel();
L
liuruilong 已提交
36 37 38
  cl_mem cl_image = output->GetCLImage();
  int height = output->dims()[2];
  int width = output->dims()[3];
L
liuruilong 已提交
39 40
  CLTensor input_cl_tensor(this->cl_helper_.CLContext(),
                           this->cl_helper_.CLCommandQueue());
Y
yangfei 已提交
41
  input_cl_tensor.Resize(input->dims());
L
liuruilong 已提交
42
  cl_mem inputBuffer = input_cl_tensor.mutable_with_data<float>(input_data);
L
liuruilong 已提交
43

Y
yangfei 已提交
44
  status = clSetKernelArg(kernel, 0, sizeof(cl_mem), (void *)&inputBuffer);
L
liuruilong 已提交
45
  CL_CHECK_ERRORS(status);
Y
yangfei 已提交
46
  status = clSetKernelArg(kernel, 1, sizeof(cl_mem), (void *)&cl_image);
L
liuruilong 已提交
47
  CL_CHECK_ERRORS(status);
Y
yangfei 已提交
48 49 50
  status = clSetKernelArg(kernel, 2, sizeof(cl_int), (void *)&width);
  CL_CHECK_ERRORS(status);
  status = clSetKernelArg(kernel, 3, sizeof(cl_int), (void *)&height);
L
liuruilong 已提交
51
  CL_CHECK_ERRORS(status);
L
liuruilong 已提交
52

Y
yangfei 已提交
53
  size_t global_work_size[2] = {width, height};
Y
yangfei 已提交
54 55 56

    cl_event out_event = param.Out()->GetClEvent();

L
liuruilong 已提交
57
  status = clEnqueueNDRangeKernel(this->cl_helper_.CLCommandQueue(), kernel, 2,
Y
yangfei 已提交
58
                                  NULL, global_work_size, NULL, 0, NULL, &out_event);
L
liuruilong 已提交
59
  CL_CHECK_ERRORS(status);
L
liuruilong 已提交
60 61 62 63 64
}

template class FeedKernel<GPU_CL, float>;

}  // namespace operators
Y
yangfei 已提交
65
}  // namespace paddle_mobile