#!/usr/bin/env bash

# Copyright 2024 Versity Software
# This file is 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.

source ./tests/drivers/list_parts/list_parts_rest.sh

complete_multipart_upload() {
  if [[ $# -ne 4 ]]; then
    log 2 "'complete multipart upload' command requires bucket, key, upload ID, parts list"
    return 1
  fi
  log 5 "complete multipart upload id: $3, parts: $4"
  error=$(send_command aws --no-verify-ssl s3api complete-multipart-upload --bucket "$1" --key "$2" --upload-id "$3" --multipart-upload '{"Parts": '"$4"'}' 2>&1) || local completed=$?
  if [[ $completed -ne 0 ]]; then
    log 2 "error completing multipart upload: $error"
    return 1
  fi
  log 5 "complete multipart upload error: $error"
  return 0
}

complete_multipart_upload_rest() {
  if ! check_param_count_gt "bucket, key, upload ID, parts, additional params" 4 $#; then
    return 1
  fi
  env_vars="BUCKET_NAME=$1 OBJECT_KEY=$2 UPLOAD_ID=$3 PARTS=$4 $5"
  if ! send_rest_command_expect_success "$env_vars" "./tests/rest_scripts/complete_multipart_upload.sh" "200"; then
    log 2 "error sending REST command and checking error"
    return 1
  fi
  return 0
}

complete_multipart_upload_rest_expect_error() {
  if ! check_param_count_gt "bucket, key, upload ID, parts, additional params, response code, error code, message" 8 $#; then
    return 1
  fi
  env_vars="BUCKET_NAME=$1 OBJECT_KEY=$2 UPLOAD_ID=$3 PARTS=$4 $5"
  if ! send_rest_command_expect_error "$env_vars" "./tests/rest_scripts/complete_multipart_upload.sh" "$6" "$7" "$8"; then
    log 2 "error sending REST command and checking error"
    return 1
  fi
  return 0
}

complete_multipart_upload_rest_nonexistent_param() {
  if ! check_param_count_v2 "bucket, key, upload ID, parts payload" 4 $#; then
    return 1
  fi
  if ! result=$(COMMAND_LOG="$COMMAND_LOG" BUCKET_NAME="$1" OBJECT_KEY="$2" UPLOAD_ID="$3" PARTS="$4" ALGORITHM_PARAMETER="true" CHECKSUM_ALGORITHM="crc32c" OUTPUT_FILE="$TEST_FILE_FOLDER/result.txt" ./tests/rest_scripts/complete_multipart_upload.sh 2>&1); then
    log 2 "error completing multipart upload: $result"
    return 1
  fi
  if [ "$result" != "200" ]; then
    log 2 "complete multipart upload returned code $result: $(cat "$TEST_FILE_FOLDER/result.txt")"
    return 1
  fi
}

complete_multipart_upload_rest_incorrect_checksum() {
  if ! check_param_count_v2 "bucket, key, upload ID, parts payload, type, algorithm, correct hash" 7 $#; then
    return 1
  fi
  checksum="$7"
  if [ "${checksum:0:1}" == "a" ]; then
    checksum="b${checksum:1}"
  else
    checksum="a${checksum:1}"
  fi
  if ! result=$(COMMAND_LOG="$COMMAND_LOG" BUCKET_NAME="$1" OBJECT_KEY="$2" UPLOAD_ID="$3" PARTS="$4" CHECKSUM_TYPE="$5" CHECKSUM_ALGORITHM="$6" CHECKSUM_HASH="$checksum" OUTPUT_FILE="$TEST_FILE_FOLDER/result.txt" ./tests/rest_scripts/complete_multipart_upload.sh 2>&1); then
    log 2 "error completing multipart upload: $result"
    return 1
  fi
  if ! check_rest_expected_error "$result" "$TEST_FILE_FOLDER/result.txt" 400 "BadDigest" "did not match"; then
    log 2 "expected '400', was $result: $(cat "$TEST_FILE_FOLDER/result.txt")"
    return 1
  fi
}

complete_multipart_upload_rest_invalid_checksum() {
  if ! check_param_count_v2 "bucket, key, upload ID, parts payload, type, algorithm, correct hash" 7 $#; then
    return 1
  fi
  log 5 "bucket name: $1"
  if ! result=$(COMMAND_LOG="$COMMAND_LOG" BUCKET_NAME="$1" OBJECT_KEY="$2" UPLOAD_ID="$3" PARTS="$4" CHECKSUM_TYPE="$5" CHECKSUM_ALGORITHM="$6" CHECKSUM_HASH="$7" OUTPUT_FILE="$TEST_FILE_FOLDER/result.txt" ./tests/rest_scripts/complete_multipart_upload.sh 2>&1); then
    log 2 "error completing multipart upload: $result"
    return 1
  fi
  if ! check_rest_expected_error "$result" "$TEST_FILE_FOLDER/result.txt" 400 "InvalidRequest" "header is invalid"; then
    log 2 "expected '400', was $result: $(cat "$TEST_FILE_FOLDER/result.txt")"
    return 1
  fi
}