/*
 * Licensed to the OpenAirInterface (OAI) Software Alliance under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The OpenAirInterface Software Alliance licenses this file to You under
 * the OAI Public License, Version 1.1  (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.openairinterface.org/?page_id=698
 *
 * 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.
 *-------------------------------------------------------------------------------
 * For more information about the OpenAirInterface (OAI) Software Alliance:
 *      contact@openairinterface.org
 */

#include "DLNASTransport.hpp"

#include "3gpp_24.501.hpp"
#include "bstrlib.h"
#include "logger.hpp"

using namespace nas;

//------------------------------------------------------------------------------
DLNASTransport::DLNASTransport() {
  plain_header              = NULL;
  ie_payload_container_type = NULL;
  ie_payload_container      = NULL;
  ie_pdu_session_identity_2 = NULL;
  ie_additional_information = NULL;
  ie_5gmm_cause             = NULL;
  ie_back_off_timer_value   = NULL;
}

//------------------------------------------------------------------------------
DLNASTransport::~DLNASTransport() {}

//------------------------------------------------------------------------------
void DLNASTransport::SetHeader(uint8_t security_header_type) {
  plain_header = new NasMmPlainHeader();
  plain_header->SetHeader(
      EPD_5GS_MM_MSG, security_header_type, DL_NAS_TRANSPORT);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetPayloadContainerType(uint8_t value) {
  ie_payload_container_type = new PayloadContainerType(value);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetPayloadContainer(
    std::vector<PayloadContainerEntry> content) {
  ie_payload_container = new Payload_Container(content);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetPayloadContainer(uint8_t* buf, int len) {
  bstring b            = blk2bstr(buf, len);
  ie_payload_container = new Payload_Container(b);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetPduSessionId(uint8_t value) {
  ie_pdu_session_identity_2 = new PduSessionIdentity2(0x12, value);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetAdditionalInformation(const bstring& value) {
  ie_additional_information = new AdditionalInformation(value);
}

//------------------------------------------------------------------------------
void DLNASTransport::Set5gmmCause(uint8_t value) {
  ie_5gmm_cause = new _5GMM_Cause(0x58, value);
}

//------------------------------------------------------------------------------
void DLNASTransport::SetBackOffTimerValue(uint8_t unit, uint8_t value) {
  ie_back_off_timer_value = new GprsTimer3(0x37, unit, value);
}

//------------------------------------------------------------------------------
int DLNASTransport::Encode(uint8_t* buf, int len) {
  Logger::nas_mm().debug("Encoding DLNASTransport message");
  int encoded_size = 0;
  if (!plain_header) {
    Logger::nas_mm().error("Mandatory IE missing Header");
    return 0;
  }
  if (!(plain_header->Encode(buf, len))) return 0;
  encoded_size += 3;
  if (!ie_payload_container_type) {
    Logger::nas_mm().warn("IE ie_payload_container_type is not available");
  } else {
    int size = ie_payload_container_type->Encode(
        buf + encoded_size, len - encoded_size);
    if (size == KEncodeDecodeError) {
      Logger::nas_mm().error("Encoding ie_payload_container_type error");
      return 0;
    }
    if (size == 0)
      size++;  // 1/2 octet for  ie_payload_container_type, 1/2 octet for spare
    encoded_size += size;
  }
  if (!ie_payload_container or !ie_payload_container_type) {
    Logger::nas_mm().warn("IE ie_payload_container is not available");
  } else {
    if (int size = ie_payload_container->Encode(
            buf + encoded_size, len - encoded_size,
            ie_payload_container_type->GetValue())) {
      encoded_size += size;
    } else {
      Logger::nas_mm().error("Encoding ie_payload_container error");
      return 0;
    }
  }
  if (!ie_pdu_session_identity_2) {
    Logger::nas_mm().warn("IE ie_pdu_session_identity_2 is not available");
  } else {
    if (int size = ie_pdu_session_identity_2->Encode(
            buf + encoded_size, len - encoded_size)) {
      encoded_size += size;
    } else {
      Logger::nas_mm().error("Encoding IE ie_pdu_session_identity_2 error");
      return 0;
    }
  }
  if (!ie_additional_information) {
    Logger::nas_mm().warn("IE ie_additional_information is not available");
  } else {
    if (int size = ie_additional_information->Encode(
            buf + encoded_size, len - encoded_size)) {
      encoded_size += size;
    } else {
      Logger::nas_mm().error("Encoding IE ie_additional_information error");
      return 0;
    }
  }
  if (!ie_5gmm_cause) {
    Logger::nas_mm().warn("IE ie_5gmm_cause is not available");
  } else {
    if (int size =
            ie_5gmm_cause->Encode(buf + encoded_size, len - encoded_size)) {
      encoded_size += size;
    } else {
      Logger::nas_mm().error("Encoding ie_5gmm_cause error");
    }
  }
  if (!ie_back_off_timer_value) {
    Logger::nas_mm().warn("IE ie_back_off_timer_value is not available");
  } else {
    if (int size = ie_back_off_timer_value->Encode(
            buf + encoded_size, len - encoded_size)) {
      encoded_size += size;
    } else {
      Logger::nas_mm().error("Encoding ie_back_off_timer_value error");
      return 0;
    }
  }
  Logger::nas_mm().debug(
      "Encoded DLNASTransport message len (%d)", encoded_size);
  return encoded_size;
}

//------------------------------------------------------------------------------
int DLNASTransport::Decode(NasMmPlainHeader* header, uint8_t* buf, int len) {
  Logger::nas_mm().debug("Decoding DLNASTransport message");
  int decoded_size          = 3;
  plain_header              = header;
  ie_payload_container_type = new PayloadContainerType();
  decoded_size += ie_payload_container_type->Decode(
      buf + decoded_size, len - decoded_size, false);
  decoded_size++;  // 1/2 octet for PayloadContainerType, 1/2 octet for spare
  ie_payload_container = new Payload_Container();
  decoded_size += ie_payload_container->Decode(
      buf + decoded_size, len - decoded_size, false,
      N1_SM_INFORMATION);  // TODO: verified Typeb of Payload Container
  Logger::nas_mm().debug("Decoded_size (%d)", decoded_size);
  uint8_t octet = *(buf + decoded_size);
  Logger::nas_mm().debug("First option IEI (0x%x)", octet);
  while ((octet != 0x0)) {
    switch (octet) {
      case 0x12: {
        Logger::nas_mm().debug("Decoding IEI (0x12)");
        ie_pdu_session_identity_2 = new PduSessionIdentity2();
        decoded_size += ie_pdu_session_identity_2->Decode(
            buf + decoded_size, len - decoded_size, true);
        octet = *(buf + decoded_size);
        Logger::nas_mm().debug("Next IEI (0x%x)", octet);
      } break;
      case 0x24: {
        Logger::nas_mm().debug("Decoding IEI (0x24)");
        ie_additional_information = new AdditionalInformation();
        decoded_size += ie_additional_information->Decode(
            buf + decoded_size, len - decoded_size, true);
        octet = *(buf + decoded_size);
        Logger::nas_mm().debug("Next IEI (0x%x)", octet);
      } break;
      case 0x58: {
        Logger::nas_mm().debug("Decoding IEI (0x58)");
        ie_5gmm_cause = new _5GMM_Cause();
        decoded_size +=
            ie_5gmm_cause->Decode(buf + decoded_size, len - decoded_size, true);
        octet = *(buf + decoded_size);
        Logger::nas_mm().debug("Next IEI (0x%x)", octet);
      } break;
      case 0x37: {
        Logger::nas_mm().debug("Decoding IEI (0x37)");
        ie_back_off_timer_value = new GprsTimer3(kIeiGprsTimer3BackOffTimer);
        decoded_size += ie_back_off_timer_value->Decode(
            buf + decoded_size, len - decoded_size, true);
        octet = *(buf + decoded_size);
        Logger::nas_mm().debug("Next IEI (0x%x)", octet);
      } break;
    }
  }
  Logger::nas_mm().debug(
      "Decoded DLNASTransport message len (%d)", decoded_size);
  return 1;
}
