cl_helper.cc 3.2 KB
Newer Older
Z
Zhen Wang 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
/* 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 "paddle/fluid/lite/opencl/cl_helper.h"
#include <glog/logging.h>
#include <string>
#include <utility>
#include <vector>

namespace paddle {
namespace lite {

Z
ZhenWang 已提交
24 25
void CLHelper::set_context(CLContext *context) { context_ = context; }

Z
Zhen Wang 已提交
26 27 28
void CLHelper::AddKernel(const std::string &kernel_name,
                         const std::string &file_name,
                         const std::string &options) {
Z
ZhenWang 已提交
29
  CHECK(context_ != nullptr) << "Please use set_context first!";
Z
Zhen Wang 已提交
30 31 32 33 34 35 36 37
  VLOG(3) << " --- begin to add kernel ---";
  auto kernel = context_->GetKernel(kernel_name, file_name, options);
  kernels.emplace_back(std::move(kernel));
  VLOG(3) << " --- end to add kernel --- ";
}

cl::Kernel &CLHelper::KernelAt(const int index) {
  VLOG(3) << " --- kernel count: " << kernels.size() << " --- ";
Z
ZhenWang 已提交
38 39 40 41
  CHECK(static_cast<size_t>(index) < kernels.size())
      << "The index must be less than the size of kernels.";
  CHECK(kernels[index] != nullptr)
      << "The target kernel pointer cannot be null.";
Z
Zhen Wang 已提交
42 43 44 45
  return *(kernels[index]);
}

cl::CommandQueue &CLHelper::OpenCLCommandQueue() {
Z
ZhenWang 已提交
46
  CHECK(context_ != nullptr) << "Please use set_context first!";
Z
Zhen Wang 已提交
47 48 49
  return context_->GetCommandQueue();
}

Z
ZhenWang 已提交
50 51 52 53
cl::Context &CLHelper::OpenCLContext() {
  CHECK(context_ != nullptr) << "Please use set_context first!";
  return context_->GetContext();
}
Z
Zhen Wang 已提交
54

Z
ZhenWang 已提交
55
cl::NDRange CLHelper::DefaultWorkSize(const CLImage &image) {
Z
Zhen Wang 已提交
56 57 58 59 60 61 62 63 64 65
  // n c h w
  auto image_dim = image.tensor_dims();
  if (image_dim.size() == 4) {
    auto n = image_dim[0];
    auto h = image_dim[2];
    auto w = image_dim[3];
    auto image_width = image.ImageWidth();
    auto work_size_0 = image_width / w;
    auto work_size_1 = w;
    auto work_size_2 = n * h;
Z
ZhenWang 已提交
66 67 68
    return cl::NDRange{static_cast<size_t>(work_size_0),
                       static_cast<size_t>(work_size_1),
                       static_cast<size_t>(work_size_2)};
Z
Zhen Wang 已提交
69
  } else if (image_dim.size() == 2) {
Z
ZhenWang 已提交
70 71 72
    return cl::NDRange{static_cast<size_t>(1),
                       static_cast<size_t>(image.ImageWidth()),
                       static_cast<size_t>(image.ImageHeight())};
Z
Zhen Wang 已提交
73
  } else if (image_dim.size() == 1) {
Z
ZhenWang 已提交
74 75 76
    return cl::NDRange{static_cast<size_t>(1),
                       static_cast<size_t>(image.ImageWidth()),
                       static_cast<size_t>(1)};
Z
Zhen Wang 已提交
77 78 79 80
  } else if (image_dim.size() == 3) {
    auto c = image_dim[0];
    auto h = image_dim[1];
    auto w = image_dim[2];
Z
ZhenWang 已提交
81 82
    return cl::NDRange{static_cast<size_t>((c + 3) / 4), static_cast<size_t>(w),
                       static_cast<size_t>(h)};
Z
Zhen Wang 已提交
83 84
  } else {
    LOG(FATAL) << "Not support this dimension, need to be implemented!";
Z
ZhenWang 已提交
85
    return cl::NDRange{};
Z
Zhen Wang 已提交
86 87 88 89 90
  }
}

}  // namespace lite
}  // namespace paddle