/*****************************************************************************
#                                                                            *
# Copyright 2020 AT&T Intellectual Property                                  *
#                                                                            *
# 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 <iostream>
#include <fstream>
#include <vector>



extern "C" {
  #include "OCUCP-PF-Container.h"
  #include "OCTET_STRING.h"
  #include "asn_application.h"
  #include "E2SM-KPM-IndicationMessage.h"
  #include "FQIPERSlicesPerPlmnListItem.h"
  #include "E2SM-KPM-RANfunction-Description.h"
  #include "E2SM-KPM-IndicationHeader-Format1.h"
  #include "E2SM-KPM-IndicationHeader.h"
  #include "Timestamp.h"
  #include "E2AP-PDU.h"
  #include "RICsubscriptionRequest.h"
  #include "RICsubscriptionResponse.h"
  #include "RICactionType.h"
  #include "ProtocolIE-Field.h"
  #include "ProtocolIE-SingleContainer.h"
  #include "InitiatingMessage.h"
}

#include "kpm_callbacks.hpp"
#include "encode_kpm.hpp"

#include "encode_e2apv1.hpp"

#include <nlohmann/json.hpp>
#include <thread>
#include <chrono>

using json = nlohmann::json;

using namespace std;
class E2Sim;


E2Sim e2sim;

int main(int argc, char* argv[]) {

  fprintf(stderr, "Starting KPM processor sim");

  fprintf(stderr, "JSON Test\n");


  asn_codec_ctx_t *opt_cod;
  
  E2SM_KPM_RANfunction_Description_t *ranfunc_desc =
    (E2SM_KPM_RANfunction_Description_t*)calloc(1,sizeof(E2SM_KPM_RANfunction_Description_t));
  encode_kpm_function_description(ranfunc_desc);
  
  uint8_t e2smbuffer[8192];
  size_t e2smbuffer_size = 8192;
  
  asn_enc_rval_t er =
    asn_encode_to_buffer(opt_cod,
			 ATS_ALIGNED_BASIC_PER,
			 &asn_DEF_E2SM_KPM_RANfunction_Description,
			 ranfunc_desc, e2smbuffer, e2smbuffer_size);
  
  fprintf(stderr, "er encded is %d\n", er.encoded);
  fprintf(stderr, "after encoding message\n");
  fprintf(stderr, "here is encoded message %s\n", e2smbuffer);
  
  uint8_t *ranfuncdesc = (uint8_t*)calloc(1,er.encoded);
  memcpy(ranfuncdesc, e2smbuffer, er.encoded);
  
  printf("this is the char array %s\n", (char*)ranfuncdesc);
  
  OCTET_STRING_t *ranfunc_ostr = (OCTET_STRING_t*)calloc(1,sizeof(OCTET_STRING_t));
  ranfunc_ostr->buf = (uint8_t*)calloc(1,er.encoded);
  ranfunc_ostr->size = er.encoded;
  memcpy(ranfunc_ostr->buf,e2smbuffer,er.encoded);

  printf("!!!lenth of ranfuncdesc is %d\n", strlen((char*)ranfuncdesc));
  printf("value of this index is %d\n", ranfuncdesc[0]);
  printf("value of this index is %d\n", ranfuncdesc[1]);
  printf("value of this index is %d\n", ranfuncdesc[2]);
  printf("value of this index is %d\n", ranfuncdesc[3]);
  printf("value of this index is %d\n", ranfuncdesc[4]);
  printf("value of this index is %d\n", ranfuncdesc[5]);
  printf("value of this index is %d\n", ranfuncdesc[6]);
  printf("value of this index is %d\n", ranfuncdesc[10]);
  printf("value of this index is %d\n", ranfuncdesc[15]);
  printf("value of this index is %d\n", ranfuncdesc[100]);
  printf("value of this index is %d\n", ranfuncdesc[101]);
  
  e2sim.register_e2sm(0,ranfunc_ostr);
  e2sim.register_subscription_callback(0,&callback_kpm_subscription_request);

  e2sim.run_loop(argc, argv);

}

void run_report_loop(long requestorId, long instanceId, long ranFunctionId, long actionId) {

  std::ifstream input("/playpen/src/reports.json");
  bool x = input.good();

  fprintf(stderr, "%s\n", x ? "true" : "false");

  long seqNum = 1;

  std::string str;
  
  while ( getline(input, str) ) {

    json all_ues_json;

    fprintf(stderr,"De line is %s\n", str.c_str());

    bool valid = false;

    try {
      all_ues_json = json::parse(str);

      valid = true;
    } catch (...) {
      fprintf(stderr, "Exception on reading json\n");
    }

    if (valid) {

      fprintf(stderr, "key is valid\n");

      std::string first_key = all_ues_json.begin().key();
      fprintf(stderr, "first key is %s\n", first_key.c_str());
      
      if (first_key.compare("ueMeasReport") == 0) {
	
	fprintf(stderr, "it is equal to ue meas report\n");

	int numMeasReports = (all_ues_json["/ueMeasReport/ueMeasReportList"_json_pointer]).size();
	
      
	for (int i = 0; i < numMeasReports; i++) {
	  int nextCellId;
	  int nextRsrp;
	  int nextRsrq;
	  int nextRssinr;
	  float tput;
	  int prb_usage;
	  fprintf(stderr,"UE number %d\n", i);
	  
	  json::json_pointer p0(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/throughput");
	  tput = all_ues_json[p0].get<float>();
	  fprintf(stderr, "Throughput %f\n", tput);
	  
	  json::json_pointer p00(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/prb_usage");
	  prb_usage = all_ues_json[p00].get<int>();
	  fprintf(stderr, "Throughput %d\n", prb_usage);	
	  
	  json::json_pointer p1(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/nrCellIdentity");
	  nextCellId = all_ues_json[p1].get<int>();
	  fprintf(stderr, "Serving Cell %d\n",nextCellId);
	  
	  json::json_pointer p2(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/servingCellRfReport/rsrp");
	  nextRsrp = all_ues_json[p2].get<int>();
	  fprintf(stderr,"  RSRP %d\n", nextRsrp);
	  
	  json::json_pointer p3(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/servingCellRfReport/rsrq");
	  nextRsrq = all_ues_json[p3].get<int>();
	  fprintf(stderr,"  RSRQ %d\n",nextRsrq);
	  
	  json::json_pointer p4(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/servingCellRfReport/rssinr");
	  nextRssinr = all_ues_json[p4].get<int>();
	  fprintf(stderr,"  RSSINR %d\n", nextRssinr);
	  
	  json::json_pointer p5(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/neighbourCellList");
	  
	  uint8_t *crnti_buf = (uint8_t*)calloc(1,2);
	  
	  uint8_t *buf2 = (uint8_t*)"12";
	  memcpy(crnti_buf, buf2, 2);
	  
	  
	  std::string serving_str = "{\"rsrp\": " + std::to_string(nextRsrp) + ", \"rsrq\": " +
	    std::to_string(nextRsrq) + ", \"rssinr\": " + std::to_string(nextRssinr) + "}";
	  const uint8_t *serving_buf = reinterpret_cast<const uint8_t*>(serving_str.c_str());	
	  
	  int numNeighborCells = (all_ues_json[p5]).size();
	  
	  std::string neighbor_str = "[";
	  
	  int nextNbCell;
	  int nextNbRsrp;
	  int nextNbRsrq;
	  int nextNbRssinr;
	  
	  for (int j = 0; j < numNeighborCells; j++) {
	    json::json_pointer p8(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i) +"/neighbourCellList/" + std::to_string(j) + "/nbCellIdentity");
	    nextNbCell = all_ues_json[p8].get<int>();
	    //cout << "Neighbor Cell " << all_ues_json[p8] << endl;
	    json::json_pointer p9(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i)
				  +"/neighbourCellList/" + std::to_string(j) + "/nbCellRfReport/rsrp");
	    nextNbRsrp = all_ues_json[p9].get<int>();
	    //cout << "  RSRP " << nextNbRsrp << endl;
	    
	    json::json_pointer p10(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i)
				   +"/neighbourCellList/" + std::to_string(j) + "/nbCellRfReport/rsrq");
	    nextNbRsrq = all_ues_json[p10].get<int>();
	    //cout << "  RSRQ " << nextNbRsrq << endl;
	    
	    json::json_pointer p11(std::string("/ueMeasReport/ueMeasReportList/") + std::to_string(i)
				   +"/neighbourCellList/" + std::to_string(j) + "/nbCellRfReport/rssinr");
	    nextNbRssinr = all_ues_json[p11].get<int>();
	    //cout << "  RSSINR " << nextNbRssinr << endl;
	    
	    if (j != 0) {
	      neighbor_str += ",";
	      
	    }
	    
	    neighbor_str += "{\"CID\" : \"" + std::to_string(nextNbCell) + "\", \"Cell-RF\" : \"{\"rsrp\": " + std::to_string(nextNbRsrp) +
	      ", \"rsrq\": " + std::to_string(nextNbRsrq) + ", \"rssinr\": " + std::to_string(nextNbRssinr) + "}}";
	    
	  }
	  
	  neighbor_str += "]";
	  
	  fprintf(stderr,"This is neighbor str %s\n", neighbor_str.c_str());
	  
	  //Creating UE-level RAN-Container CUCP message
	  
	  fprintf(stderr,"Creating UE-level RAN-Container CUCP message\n");
	  
	  const uint8_t *neighbor_buf = reinterpret_cast<const uint8_t*>(neighbor_str.c_str());
	  uint8_t *plmnid_buf = (uint8_t*)"747";
	  uint8_t *nrcellid_buf = (uint8_t*)"12340";
	  
	  E2SM_KPM_IndicationMessage_t *ind_msg_cucp_ue =
	    (E2SM_KPM_IndicationMessage_t*)calloc(1,sizeof(E2SM_KPM_IndicationMessage_t));
	  
	  encode_kpm_report_rancontainer_cucp_parameterized(ind_msg_cucp_ue, plmnid_buf, nrcellid_buf, crnti_buf, serving_buf, neighbor_buf);
	  
	  uint8_t e2sm_message_buf_cucp_ue[8192];
	  size_t e2sm_message_buf_size_cucp_ue = 8192;
	  
	  asn_codec_ctx_t *opt_cod;

	  
	  asn_enc_rval_t er_message_cucp_ue = asn_encode_to_buffer(opt_cod,
								   ATS_ALIGNED_BASIC_PER,
								   &asn_DEF_E2SM_KPM_IndicationMessage,
								   ind_msg_cucp_ue, e2sm_message_buf_cucp_ue, e2sm_message_buf_size_cucp_ue);
	  
	  fprintf(stderr, "er encded is %d\n", er_message_cucp_ue.encoded);
	  fprintf(stderr, "after encoding message\n");

	  E2SM_KPM_IndicationHeader_t* ind_header_cucp_ue =
	    (E2SM_KPM_IndicationHeader_t*)calloc(1,sizeof(E2SM_KPM_IndicationHeader_t));
	  encode_e2sm_kpm_indication_header(ind_header_cucp_ue);
	  fprintf(stderr, "Now printing xer outside of function call\n");
	  xer_fprint(stderr, &asn_DEF_E2SM_KPM_IndicationHeader, ind_header_cucp_ue);	  

	  uint8_t e2sm_header_buf_cucp_ue[8192];
	  size_t e2sm_header_buf_size_cucp_ue = 8192;
	  
	  asn_enc_rval_t er_header_cucp_ue = asn_encode_to_buffer(opt_cod,
								  ATS_ALIGNED_BASIC_PER,
								  &asn_DEF_E2SM_KPM_IndicationHeader,
								  ind_header_cucp_ue, e2sm_header_buf_cucp_ue, e2sm_header_buf_size_cucp_ue);

	  fprintf(stderr, "er encded is %d\n", er_header_cucp_ue.encoded);
	  fprintf(stderr, "error buf is %s\n", (char*)e2sm_header_buf_cucp_ue);
	  fprintf(stderr, "after encoding header\n");	  
	  
	  E2AP_PDU *pdu_cucp_ue = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));
	  
	  encoding::generate_e2apv1_indication_request_parameterized(pdu_cucp_ue, requestorId,
								     instanceId, ranFunctionId,
								     actionId, seqNum, e2sm_header_buf_cucp_ue,
								     er_header_cucp_ue.encoded, e2sm_message_buf_cucp_ue,
								     er_message_cucp_ue.encoded);
	  
	  
	  e2sim.encode_and_send_sctp_data(pdu_cucp_ue);

	  seqNum++;

	  std::this_thread::sleep_for (std::chrono::seconds(2));
	  
	  //Creating UE-level RAN-Container CUUP message
	  
	  fprintf(stderr,"Creating UE-level RAN-Container CUUP message\n");	
	  
	  E2SM_KPM_IndicationMessage_t *ind_msg_cuup_ue =
	    (E2SM_KPM_IndicationMessage_t*)calloc(1,sizeof(E2SM_KPM_IndicationMessage_t));
	  
	  long bytes = (long)(tput * 100);
	  
	  encode_kpm_report_rancontainer_cuup_parameterized(ind_msg_cuup_ue, plmnid_buf, nrcellid_buf, crnti_buf, bytes, 0);
	  
	  uint8_t e2sm_message_buf_cuup_ue[8192];
	  size_t e2sm_message_buf_size_cuup_ue = 8192;
	  
	  asn_codec_ctx_t *opt_cod2;
	  
	  
	  asn_enc_rval_t er_message_cuup_ue = asn_encode_to_buffer(opt_cod2,
							       ATS_ALIGNED_BASIC_PER,
							       &asn_DEF_E2SM_KPM_IndicationMessage,
							       ind_msg_cuup_ue, e2sm_message_buf_cuup_ue, e2sm_message_buf_size_cuup_ue);
	  
	  fprintf(stderr, "er encded is %d\n", er_message_cuup_ue.encoded);
	  fprintf(stderr, "after encoding message\n");

	  E2SM_KPM_IndicationHeader_t* ind_header_cuup_ue =
	    (E2SM_KPM_IndicationHeader_t*)calloc(1,sizeof(E2SM_KPM_IndicationHeader_t));
	  encode_e2sm_kpm_indication_header(ind_header_cuup_ue);

	  uint8_t e2sm_header_buf_cuup_ue[8192];
	  size_t e2sm_header_buf_size_cuup_ue = 8192;
	  
	  asn_enc_rval_t er_header_cuup_ue = asn_encode_to_buffer(opt_cod,
								  ATS_ALIGNED_BASIC_PER,
								  &asn_DEF_E2SM_KPM_IndicationHeader,
								  ind_header_cuup_ue, e2sm_header_buf_cuup_ue, e2sm_header_buf_size_cuup_ue);
	  
	  
	  E2AP_PDU *pdu_cuup_ue = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));	
	  
	  encoding::generate_e2apv1_indication_request_parameterized(pdu_cuup_ue, requestorId,
								     instanceId, ranFunctionId,
								     actionId, seqNum, e2sm_header_buf_cuup_ue,
								     er_header_cuup_ue.encoded,
								     e2sm_message_buf_cuup_ue, er_message_cuup_ue.encoded);

	  e2sim.encode_and_send_sctp_data(pdu_cuup_ue);

	  seqNum++;

	  std::this_thread::sleep_for (std::chrono::seconds(2));
	  
	  //Creating UE-level RAN-Container DU message
	  
	  fprintf(stderr,"Creating UE-level RAN-Container DU message\n");
	  
	  E2SM_KPM_IndicationMessage_t *ind_message_du_ue =
	    (E2SM_KPM_IndicationMessage_t*)calloc(1,sizeof(E2SM_KPM_IndicationMessage_t));
	  
	  encode_kpm_report_rancontainer_du_parameterized(ind_message_du_ue,
							  plmnid_buf, nrcellid_buf, crnti_buf, prb_usage, 0);
	  
	  uint8_t e2sm_message_buf_du_ue[8192];
	  size_t e2sm_message_buf_size_du_ue = 8192;
	  
	  asn_codec_ctx_t *opt_cod3;
	  
	  
	  asn_enc_rval_t er_message_du_ue = asn_encode_to_buffer(opt_cod3,
								 ATS_ALIGNED_BASIC_PER,
								 &asn_DEF_E2SM_KPM_IndicationMessage,
								 ind_message_du_ue,
								 e2sm_message_buf_du_ue,
								 e2sm_message_buf_size_du_ue);
	  
	  fprintf(stderr, "er encded is %d\n", er_message_du_ue.encoded);
	  fprintf(stderr, "after encoding message\n");

	  E2SM_KPM_IndicationHeader_t* ind_header_du_ue =
	    (E2SM_KPM_IndicationHeader_t*)calloc(1,sizeof(E2SM_KPM_IndicationHeader_t));
	  encode_e2sm_kpm_indication_header(ind_header_du_ue);	  

	  uint8_t e2sm_header_buf_du_ue[8192];
	  size_t e2sm_header_buf_size_du_ue = 8192;
	  
	  asn_enc_rval_t er_header_du_ue = asn_encode_to_buffer(opt_cod,
								ATS_ALIGNED_BASIC_PER,
								&asn_DEF_E2SM_KPM_IndicationHeader,
								ind_header_du_ue, e2sm_header_buf_du_ue,
								e2sm_header_buf_size_du_ue);
	  
	  
	  E2AP_PDU *pdu_du_ue = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));
	  
	  encoding::generate_e2apv1_indication_request_parameterized(pdu_du_ue, requestorId,
								     instanceId, ranFunctionId,
								     actionId, seqNum,
								     e2sm_header_buf_du_ue, er_header_du_ue.encoded,
								     e2sm_message_buf_du_ue, er_message_du_ue.encoded);

	  e2sim.encode_and_send_sctp_data(pdu_du_ue);

	  seqNum++;

	  std::this_thread::sleep_for (std::chrono::seconds(2));
	  
	  fprintf(stderr, "done with ue meas report\n");
	}
	
      } else if (first_key.compare("cellMeasReport") == 0) {

	fprintf(stderr, "it is equal to cell meas report\n");
	
	int numMeasReports = (all_ues_json["/cellMeasReport/cellMeasReportList"_json_pointer]).size();
	
	for (int i = 0; i < numMeasReports; i++) {
	  int nextCellId;

	  float bytes_dl;
	  float bytes_ul;
	  int prb_dl;
	  int prb_ul;
	  
	  fprintf(stderr,"UE number %d\n", i);
	  
	  json::json_pointer p0(std::string("/cellMeasReport/cellMeasReportList/") + std::to_string(i) +"/pdcpByteMeasReport/pdcpBytesDl");
	  bytes_dl = all_ues_json[p0].get<float>();
	  fprintf(stderr, "Bytes DL %f\n", bytes_dl);

	  json::json_pointer p1(std::string("/cellMeasReport/cellMeasReportList/") + std::to_string(i) +"/pdcpByteMeasReport/pdcpBytesUl");
	  bytes_ul = all_ues_json[p1].get<float>();
	  fprintf(stderr, "Bytes UL %f\n", bytes_ul);	  
	  
	  json::json_pointer p2(std::string("/cellMeasReport/cellMeasReportList/") + std::to_string(i) +"/prbMeasReport/availPrbDl");
	  prb_dl = all_ues_json[p2].get<int>();
	  fprintf(stderr, "Avail PRB DL %d\n", prb_dl);	

	  json::json_pointer p3(std::string("/cellMeasReport/cellMeasReportList/") + std::to_string(i) +"/prbMeasReport/availPrbUl");
	  prb_ul = all_ues_json[p3].get<int>();
	  fprintf(stderr, "Avail PRB UL %d\n", prb_ul);

	  uint8_t *buf = (uint8_t*)"GNBCUUP5";
	  
	  uint8_t *sst_buf = (uint8_t*)"1";
	  uint8_t *sd_buf = (uint8_t*)"100";
	  uint8_t *plmnid_buf = (uint8_t*)"747";

	  //Encoding Style 5 Message Body
	  
	  fprintf(stderr, "Encoding Style 5 Message body\n");

	  asn_codec_ctx_t *opt_cod;

	  E2SM_KPM_IndicationMessage_t *ind_msg_style5 =
	    (E2SM_KPM_IndicationMessage_t*)calloc(1,sizeof(E2SM_KPM_IndicationMessage_t));
	  E2AP_PDU *pdu_style5 = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));
	  
	  encode_kpm_report_style5_parameterized(ind_msg_style5 , buf, bytes_dl, bytes_ul, sst_buf, sd_buf, plmnid_buf);
	  
	  uint8_t e2sm_message_buf_style5[8192];
	  size_t e2sm_message_buf_size_style5 = 8192;
	  
	  asn_enc_rval_t er_message_style5 = asn_encode_to_buffer(opt_cod,
								  ATS_ALIGNED_BASIC_PER,
								  &asn_DEF_E2SM_KPM_IndicationMessage,
								  ind_msg_style5, e2sm_message_buf_style5, e2sm_message_buf_size_style5);
	  
	  fprintf(stderr, "er encded is %d\n", er_message_style5.encoded);
	  fprintf(stderr, "after encoding message\n");
	  
	  int seqNum0 = 1;


	  E2SM_KPM_IndicationHeader_t* ind_header_style5 =
	    (E2SM_KPM_IndicationHeader_t*)calloc(1,sizeof(E2SM_KPM_IndicationHeader_t));
	  encode_e2sm_kpm_indication_header(ind_header_style5);

	  uint8_t e2sm_header_buf_style5[8192];
	  size_t e2sm_header_buf_size_style5 = 8192;
	  
	  asn_enc_rval_t er_header_style5 = asn_encode_to_buffer(opt_cod,
								 ATS_ALIGNED_BASIC_PER,
								 &asn_DEF_E2SM_KPM_IndicationHeader,
								 ind_header_style5,
								 e2sm_header_buf_style5, e2sm_header_buf_size_style5);	  
	  
	  
	  encoding::generate_e2apv1_indication_request_parameterized(pdu_style5, requestorId,
								     instanceId, ranFunctionId,
								     actionId, seqNum0, e2sm_header_buf_style5,
								     er_header_style5.encoded, e2sm_message_buf_style5,
								     er_message_style5.encoded);

	  e2sim.encode_and_send_sctp_data(pdu_style5);

	  seqNum++;

	  std::this_thread::sleep_for (std::chrono::seconds(2));	  
	  

	  //Encoding Style 1 Message Body
	  
	  fprintf(stderr, "Encoding Style 1 Message body\n");	  
	  asn_codec_ctx_t *opt_cod2;
	  
	  
	  E2SM_KPM_IndicationMessage_t *ind_message_style1 =
	    (E2SM_KPM_IndicationMessage_t*)calloc(1,sizeof(E2SM_KPM_IndicationMessage_t));
	  E2AP_PDU *pdu_style1 = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));
	  
	  long fiveqi = 7;
	  
	  uint8_t *nrcellid_buf = (uint8_t*)"12340";

	  long l_dl_prbs = prb_dl;
	  long l_ul_prbs = prb_ul;
	  
	  encode_kpm_report_style1_parameterized(ind_message_style1, fiveqi,
						 prb_dl, prb_ul, sst_buf, sd_buf,
						 plmnid_buf, nrcellid_buf, &l_dl_prbs, &l_ul_prbs);
	  
	  uint8_t e2sm_message_buf_style1[8192];
	  size_t e2sm_message_buf_size_style1 = 8192;
	  
	  asn_enc_rval_t er_message_style1 = asn_encode_to_buffer(opt_cod2,
								  ATS_ALIGNED_BASIC_PER,
								  &asn_DEF_E2SM_KPM_IndicationMessage,
								  ind_message_style1,
								  e2sm_message_buf_style1, e2sm_message_buf_size_style1);
	  
	  fprintf(stderr, "er encded is %d\n", er_message_style1.encoded);
	  fprintf(stderr, "after encoding message\n");

	  
	  uint8_t *cpid_buf2 = (uint8_t*)"CPID";
	  
	  fprintf(stderr, "About to encode Indication\n");

	  E2SM_KPM_IndicationHeader_t* ind_header_style1 =
	    (E2SM_KPM_IndicationHeader_t*)calloc(1,sizeof(E2SM_KPM_IndicationHeader_t));
	  encode_e2sm_kpm_indication_header(ind_header_style1);

	  uint8_t e2sm_header_buf_style1[8192];
	  size_t e2sm_header_buf_size_style1 = 8192;
	  
	  asn_enc_rval_t er_header_style1 = asn_encode_to_buffer(opt_cod,
								 ATS_ALIGNED_BASIC_PER,
								 &asn_DEF_E2SM_KPM_IndicationHeader,
								 ind_header_style1,
								 e2sm_header_buf_style1, e2sm_header_buf_size_style1);
	  
	  encoding::generate_e2apv1_indication_request_parameterized(pdu_style1, requestorId,
								     instanceId, ranFunctionId,
								     actionId, seqNum, e2sm_header_buf_style1,
								     er_header_style1.encoded,
								     e2sm_message_buf_style1, er_message_style1.encoded);

	  e2sim.encode_and_send_sctp_data(pdu_style1);
	  seqNum++;
	  std::this_thread::sleep_for (std::chrono::seconds(2));	  
	  
	}
      }					           
    }
  }
}


void callback_kpm_subscription_request(E2AP_PDU_t *sub_req_pdu) {

  fprintf(stderr, "Calling callback_kpm_subscription_request\n");

  //Record RIC Request ID
  //Go through RIC action to be Setup List
  //Find first entry with REPORT action Type
  //Record ricActionID
  //Encode subscription response

  RICsubscriptionRequest_t orig_req =
    sub_req_pdu->choice.initiatingMessage->value.choice.RICsubscriptionRequest;
  
  RICsubscriptionResponse_IEs_t *ricreqid =
    (RICsubscriptionResponse_IEs_t*)calloc(1, sizeof(RICsubscriptionResponse_IEs_t));
					   
  int count = orig_req.protocolIEs.list.count;
  int size = orig_req.protocolIEs.list.size;
  
  RICsubscriptionRequest_IEs_t **ies = (RICsubscriptionRequest_IEs_t**)orig_req.protocolIEs.list.array;

  fprintf(stderr, "count%d\n", count);
  fprintf(stderr, "size%d\n", size);

  RICsubscriptionRequest_IEs__value_PR pres;

  long reqRequestorId;
  long reqInstanceId;
  long reqActionId;

  std::vector<long> actionIdsAccept;
  std::vector<long> actionIdsReject;

  for (int i=0; i < count; i++) {
    RICsubscriptionRequest_IEs_t *next_ie = ies[i];
    pres = next_ie->value.present;
    
    fprintf(stderr, "The next present value %d\n", pres);

    switch(pres) {
    case RICsubscriptionRequest_IEs__value_PR_RICrequestID:
      {
	fprintf(stderr,"in case request id\n");	
	RICrequestID_t reqId = next_ie->value.choice.RICrequestID;
	long requestorId = reqId.ricRequestorID;
	long instanceId = reqId.ricInstanceID;
	fprintf(stderr, "requestorId %d\n", requestorId);
	fprintf(stderr, "instanceId %d\n", instanceId);
	reqRequestorId = requestorId;
	reqInstanceId = instanceId;

	break;
      }
    case RICsubscriptionRequest_IEs__value_PR_RANfunctionID:
      {
	fprintf(stderr,"in case ran func id\n");	
	break;
      }
    case RICsubscriptionRequest_IEs__value_PR_RICsubscriptionDetails:
      {
	fprintf(stderr,"in case subscription details\n");
	RICsubscriptionDetails_t subDetails = next_ie->value.choice.RICsubscriptionDetails;
	fprintf(stderr,"in case subscription details 1\n");	
	RICeventTriggerDefinition_t triggerDef = subDetails.ricEventTriggerDefinition;
	fprintf(stderr,"in case subscription details 2\n");	
	RICactions_ToBeSetup_List_t actionList = subDetails.ricAction_ToBeSetup_List;
	fprintf(stderr,"in case subscription details 3\n");
	//We are ignoring the trigger definition

	//We identify the first action whose type is REPORT
	//That is the only one accepted; all others are rejected
	
	int actionCount = actionList.list.count;
	fprintf(stderr, "action count%d\n", actionCount);

	auto **item_array = actionList.list.array;

	bool foundAction = false;

	for (int i=0; i < actionCount; i++) {

	  auto *next_item = item_array[i];
	  RICactionID_t actionId = ((RICaction_ToBeSetup_ItemIEs*)next_item)->value.choice.RICaction_ToBeSetup_Item.ricActionID;
	  RICactionType_t actionType = ((RICaction_ToBeSetup_ItemIEs*)next_item)->value.choice.RICaction_ToBeSetup_Item.ricActionType;

	  if (!foundAction && actionType == RICactionType_report) {
	    reqActionId = actionId;
	    actionIdsAccept.push_back(reqActionId);
	    printf("adding accept\n");
	    foundAction = true;
	  } else {
	    reqActionId = actionId;
	    printf("adding reject\n");
	    actionIdsReject.push_back(reqActionId);
	  }
	}
	
	break;
      }
    default:
      {
	fprintf(stderr,"in case default\n");	
	break;
      }      
    }
    
  }

  fprintf(stderr, "After Processing Subscription Request\n");

  fprintf(stderr, "requestorId %d\n", reqRequestorId);
  fprintf(stderr, "instanceId %d\n", reqInstanceId);


  for (int i=0; i < actionIdsAccept.size(); i++) {
    fprintf(stderr, "Action ID %d %ld\n", i, actionIdsAccept.at(i));
    
  }

  E2AP_PDU *e2ap_pdu = (E2AP_PDU*)calloc(1,sizeof(E2AP_PDU));

  long *accept_array = &actionIdsAccept[0];
  long *reject_array = &actionIdsReject[0];
  int accept_size = actionIdsAccept.size();
  int reject_size = actionIdsReject.size();

  encoding::generate_e2apv1_subscription_response_success(e2ap_pdu, accept_array, reject_array, accept_size, reject_size, reqRequestorId, reqInstanceId);

  e2sim.encode_and_send_sctp_data(e2ap_pdu);

  //Start thread for sending REPORT messages

  //  std::thread loop_thread;

  long funcId = 0;

  run_report_loop(reqRequestorId, reqInstanceId, funcId, reqActionId);

  //  loop_thread = std::thread(&run_report_loop);

}