// 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.
#include "lite/operators/dropout_op.h"

#include <string>
#include <vector>

#include "lite/core/op_lite.h"
#include "lite/core/op_registry.h"

namespace paddle {
namespace lite {
namespace operators {

bool DropoutOp::CheckShape() const {
  CHECK_OR_FALSE(param_.x);
  return true;
}

bool DropoutOp::InferShapeImpl() const {
  const auto x_dims = param_.x->dims();
  param_.output->Resize(x_dims);
  if (param_.is_test == false) {
    param_.mask->Resize(x_dims);
  }
  // share LoD
  param_.output->set_lod(param_.x->lod());
  return true;
}

// TODO(Superjomn) replace framework::OpDesc with a lite one.
bool DropoutOp::AttachImpl(const cpp::OpDesc& op_desc, lite::Scope* scope) {
  auto input = op_desc.Input("X").front();
  auto out = op_desc.Output("Out").front();

  param_.x = GetVar<lite::Tensor>(scope, input);
  param_.output = GetMutableVar<lite::Tensor>(scope, out);

  param_.dropout_prob = op_desc.GetAttr<float>("dropout_prob");

  auto is_test_type = op_desc.GetAttrType("is_test");
  switch (is_test_type) {
    case OpDescAPI::AttrType::INT:
      param_.is_test = op_desc.GetAttr<int>("is_test");
      break;
    case OpDescAPI::AttrType::BOOLEAN:
      param_.is_test = op_desc.GetAttr<bool>("is_test");
      break;
    default:
      LOG(FATAL) << "Unsupported attribute type: the type of attribute "
                    "`is_test` in BatchNormOP should be int or bool.";
  }
  // optional params
  std::vector<std::string> input_arg_names = op_desc.InputArgumentNames();
  if (std::find(input_arg_names.begin(), input_arg_names.end(), "Seed") !=
      input_arg_names.end()) {
    auto seed_arguments = op_desc.Input("Seed");
    if (seed_arguments.size() > 0) {
      auto seed_var = scope->FindVar(seed_arguments.front());
      if (seed_var != nullptr) {
        param_.seed_tensor =
            const_cast<lite::Tensor*>(&(seed_var->Get<lite::Tensor>()));
      }
    }
  }
  if (!param_.is_test) {
    auto Mask = op_desc.Output("Mask").front();
    param_.mask = GetMutableVar<lite::Tensor>(scope, Mask);
  }

  if (op_desc.HasAttr("fix_seed")) {
    param_.fix_seed = op_desc.GetAttr<bool>("fix_seed");
  }
  if (op_desc.HasAttr("seed")) {
    param_.seed = op_desc.GetAttr<int>("seed");
  }
  if (op_desc.HasAttr("dropout_implementation")) {
    param_.dropout_implementation =
        op_desc.GetAttr<std::string>("dropout_implementation");
  }
  return true;
}

}  // namespace operators
}  // namespace lite
}  // namespace paddle

REGISTER_LITE_OP(dropout, paddle::lite::operators::DropoutOp);
