mul_compute.cc 2.7 KB
Newer Older
T
tensor-tang 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14
// Copyright (c) 2019 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.

T
tensor-tang 已提交
15 16
#include "paddle/fluid/lite/kernels/arm/mul_compute.h"
#include "paddle/fluid/lite/arm/math/funcs.h"
T
tensor-tang 已提交
17
#include "paddle/fluid/lite/core/op_registry.h"
T
tensor-tang 已提交
18
#include "paddle/fluid/lite/core/type_system.h"
T
tensor-tang 已提交
19 20 21 22 23 24

namespace paddle {
namespace lite {
namespace kernels {
namespace arm {

T
tensor-tang 已提交
25 26 27
void MulCompute::PrepareForRun() {
  // TODO(TJ): transpose x or y if necessary
}
T
tensor-tang 已提交
28

T
tensor-tang 已提交
29 30
void MulCompute::Run() {
  auto& param = Param<param_t>();
T
tensor-tang 已提交
31

T
tensor-tang 已提交
32 33 34
  const auto* x_data = param.x->data<float>();
  const auto* y_data = param.y->data<float>();
  auto* o_data = param.output->mutable_data<float>();
T
tensor-tang 已提交
35

T
tensor-tang 已提交
36
  int m = static_cast<int>(
T
tensor-tang 已提交
37 38 39 40 41 42 43
      param.x->dims().Slice(0, param.x_num_col_dims).production());
  int x_w =
      static_cast<int>(param.x->dims()
                           .Slice(param.x_num_col_dims, param.x->dims().size())
                           .production());
  int y_h = static_cast<int>(
      param.y->dims().Slice(0, param.y_num_col_dims).production());
T
tensor-tang 已提交
44
  int n =
T
tensor-tang 已提交
45 46 47
      static_cast<int>(param.y->dims()
                           .Slice(param.y_num_col_dims, param.y->dims().size())
                           .production());
T
tensor-tang 已提交
48

T
tensor-tang 已提交
49
  CHECK_EQ(x_w, y_h) << "x_w must be equal with y_h";
T
tensor-tang 已提交
50 51 52 53
  auto k = x_w;
  if (n == 1) {
    lite::arm::math::sgemv(x_data, y_data, o_data, false, m, k, false, nullptr,
                           false);
T
tensor-tang 已提交
54

T
tensor-tang 已提交
55 56 57
  } else {
    constexpr bool is_tranposed_y = false;
    auto& ctx = this->ctx_->template As<ARMContext>();
T
tensor-tang 已提交
58

T
tensor-tang 已提交
59 60 61 62 63
    float* packed_x = static_cast<float*>(ctx.workspace_data<float>()) +
                      ctx.l2_cache_size() / sizeof(float);
    lite::arm::math::prepackA(packed_x, x_data, k, 0, m, 0, k, false, &ctx);
    lite::arm::math::sgemm_prepack(packed_x, y_data, nullptr, o_data, m, n, k,
                                   false, false, is_tranposed_y, &ctx);
T
tensor-tang 已提交
64 65
  }
}
T
tensor-tang 已提交
66 67 68 69 70 71 72 73 74 75 76 77

}  // namespace arm
}  // namespace kernels
}  // namespace lite
}  // namespace paddle

REGISTER_LITE_KERNEL(mul, kARM, kFloat, kNCHW,
                     paddle::lite::kernels::arm::MulCompute, def)
    .BindInput("X", {LiteType::GetTensorTy(TARGET(kARM))})
    .BindInput("Y", {LiteType::GetTensorTy(TARGET(kARM))})
    .BindOutput("Out", {LiteType::GetTensorTy(TARGET(kARM))})
    .Finalize();