/* -*- Mode: C++; tab-width: 4; c-basic-offset: 4; indent-tabs-mode: nil -*- */
/*
 *   Copyright 2020-2021 Couchbase, Inc.
 *
 *   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 "user_upsert.hxx"

#include "core/management/rbac_fmt.hxx"
#include "core/utils/join_strings.hxx"
#include "core/utils/json.hxx"
#include "core/utils/url_codec.hxx"
#include "error_utils.hxx"

#include <tao/json/value.hpp>

namespace couchbase::core::operations::management
{
auto
user_upsert_request::encode_to(encoded_request_type& encoded,
                               http_context& /* context */) const -> std::error_code
{
  encoded.method = "PUT";
  encoded.path = fmt::format("/settings/rbac/users/{}/{}", domain, user.username);
  std::vector<std::string> params{};
  if (user.display_name) {
    params.push_back(
      fmt::format("name={}", utils::string_codec::url_encode(user.display_name.value())));
  }
  if (user.password) {
    params.push_back(
      fmt::format("password={}", utils::string_codec::url_encode(user.password.value())));
  }
  if (!user.groups.empty()) {
    const std::string encoded_groups = utils::join_strings(user.groups, ",");
    params.push_back(fmt::format("groups={}", utils::string_codec::url_encode(encoded_groups)));
  }
  std::vector<std::string> encoded_roles{};
  encoded_roles.reserve(user.roles.size());
  for (const auto& role : user.roles) {
    std::string spec = role.name;
    if (role.bucket) {
      spec += fmt::format("[{}", utils::string_codec::v2::path_escape(role.bucket.value()));
      if (role.scope) {
        spec += fmt::format(":{}", utils::string_codec::v2::path_escape(role.scope.value()));
        if (role.collection) {
          spec += fmt::format(":{}", utils::string_codec::v2::path_escape(role.collection.value()));
        }
      }
      spec += "]";
    }
    encoded_roles.push_back(spec);
  }
  if (!encoded_roles.empty()) {
    const std::string concatenated = utils::join_strings(encoded_roles, ",");
    params.push_back(fmt::format("roles={}", utils::string_codec::url_encode(concatenated)));
  }
  encoded.body = utils::join_strings(params, "&");
  encoded.headers["content-type"] = "application/x-www-form-urlencoded";
  return {};
}

auto
user_upsert_request::make_response(error_context::http&& ctx, const encoded_response_type& encoded)
  const -> user_upsert_response
{
  user_upsert_response response{ std::move(ctx) };
  if (!response.ctx.ec) {
    switch (encoded.status_code) {
      case 200:
        break;
      case 400: {
        tao::json::value payload{};
        try {
          payload = utils::json::parse(encoded.body.data());
        } catch (const tao::pegtl::parse_error&) {
          response.ctx.ec = errc::common::parsing_failure;
          return response;
        }
        response.ctx.ec = errc::common::invalid_argument;
        const auto* errors = payload.find("errors");
        if (errors != nullptr && errors->is_object()) {
          for (const auto& [code, message] : errors->get_object()) {
            response.errors.emplace_back(fmt::format("{}: {}", code, message.get_string()));
          }
        }
      } break;
      default:
        response.ctx.ec = extract_common_error_code(encoded.status_code, encoded.body.data());
        break;
    }
  }
  return response;
}
} // namespace couchbase::core::operations::management