feed_kernel.cpp 2.1 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"
L
liuruilong 已提交
16
#include "common/log.h"
Y
yangfei 已提交
17 18

namespace paddle_mobile {
L
liuruilong 已提交
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;
L
liuruilong 已提交
32
  DLOG << " feed 0";
L
liuruilong 已提交
33
  auto output = param.Out();
L
liuruilong 已提交
34
  DLOG << " feed 1";
Y
yangfei 已提交
35
  const Tensor *input = param.InputX();
L
liuruilong 已提交
36
  DLOG << " feed 2";
Y
yangfei 已提交
37
  const float *input_data = nullptr;
L
liuruilong 已提交
38
  DLOG << " feed 3";
Y
yangfei 已提交
39
  input_data = input->data<float>();
L
liuruilong 已提交
40
  DLOG << " feed 4";
L
liuruilong 已提交
41 42

  cl_mem cl_image = output->GetCLImage();
L
liuruilong 已提交
43 44
  DLOG << " feed 5";

L
liuruilong 已提交
45 46
  int height = output->dims()[2];
  int width = output->dims()[3];
L
liuruilong 已提交
47

Y
yangfei 已提交
48
  DLOG << output->dims();
L
liuruilong 已提交
49
  status = clSetKernelArg(kernel, 0, sizeof(cl_mem), &input_data);
L
liuruilong 已提交
50 51
  CL_CHECK_ERRORS(status);

L
liuruilong 已提交
52
  status = clSetKernelArg(kernel, 0, sizeof(cl_mem), &cl_image);
L
liuruilong 已提交
53 54
  CL_CHECK_ERRORS(status);

L
liuruilong 已提交
55
  status = clSetKernelArg(kernel, 0, sizeof(cl_mem), &width);
L
liuruilong 已提交
56 57
  CL_CHECK_ERRORS(status);

L
liuruilong 已提交
58
  status = clSetKernelArg(kernel, 0, sizeof(cl_mem), &height);
L
liuruilong 已提交
59
  CL_CHECK_ERRORS(status);
L
liuruilong 已提交
60 61

  size_t global_work_size[2] = {height, width};
L
liuruilong 已提交
62 63
  status = clEnqueueNDRangeKernel(this->cl_helper_.CLCommandQueue(), kernel, 2,
                                  NULL, global_work_size, NULL, 0, NULL, NULL);
L
liuruilong 已提交
64
  CL_CHECK_ERRORS(status);
L
liuruilong 已提交
65 66 67 68 69
}

template class FeedKernel<GPU_CL, float>;

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