RIC-E2-TERMINATION/sctpThread.cpp

   1 // Copyright 2019 AT&T Intellectual Property
   2 // Copyright 2019 Nokia
   3 //
   4 // Licensed under the Apache License, Version 2.0 (the "License");
   5 // you may not use this file except in compliance with the License.
   6 // You may obtain a copy of the License at
   7 //
   8 //      http://www.apache.org/licenses/LICENSE-2.0
   9 //
  10 // Unless required by applicable law or agreed to in writing, software
  11 // distributed under the License is distributed on an "AS IS" BASIS,
  12 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13 // See the License for the specific language governing permissions and
  14 // limitations under the License.
  15
  16 //  This source code is part of the near-RT RIC (RAN Intelligent Controller)
  17 //  platform project (RICP).
  18
  19 // TODO: High-level file comment.
  20
  21
  22
  23 #include <3rdparty/oranE2/RANfunctions-List.h>
  24 #include "sctpThread.h"
  25 #include "BuildRunName.h"
  26
  27 #include "3rdparty/oranE2SM/E2SM-gNB-NRT-RANfunction-Definition.h"
  28 #include "BuildXml.h"
  29 #include "pugixml/src/pugixml.hpp"
  30
  31 using namespace std;
  32 //using namespace std::placeholders;
  33 using namespace boost::filesystem;
  34
  35 //#ifdef __cplusplus
  36 //extern "C"
  37 //{
  38 //#endif
  39
  40 // need to expose without the include of gcov
  41 extern "C" void __gcov_flush(void);
  42
  43 static void catch_function(int signal) {
  44     __gcov_flush();
  45     exit(signal);
  46 }
  47
  48
  49 BOOST_LOG_INLINE_GLOBAL_LOGGER_DEFAULT(my_logger, src::logger_mt)
  50
  51 boost::shared_ptr<sinks::synchronous_sink<sinks::text_file_backend>> boostLogger;
  52 double cpuClock = 0.0;
  53 bool jsonTrace = true;
  54
  55 void init_log() {
  56     mdclog_attr_t *attr;
  57     mdclog_attr_init(&attr);
  58     mdclog_attr_set_ident(attr, "E2Terminator");
  59     mdclog_init(attr);
  60     mdclog_attr_destroy(attr);
  61 }
  62 auto start_time = std::chrono::high_resolution_clock::now();
  63 typedef std::chrono::duration<double, std::ratio<1,1>> seconds_t;
  64
  65 double age() {
  66     return seconds_t(std::chrono::high_resolution_clock::now() - start_time).count();
  67 }
  68
  69 double approx_CPU_MHz(unsigned sleeptime) {
  70     using namespace std::chrono_literals;
  71     uint32_t aux = 0;
  72     uint64_t cycles_start = rdtscp(aux);
  73     double time_start = age();
  74     std::this_thread::sleep_for(sleeptime * 1ms);
  75     uint64_t elapsed_cycles = rdtscp(aux) - cycles_start;
  76     double elapsed_time = age() - time_start;
  77     return elapsed_cycles / elapsed_time;
  78 }
  79
  80 //std::atomic<int64_t> rmrCounter{0};
  81 std::atomic<int64_t> num_of_messages{0};
  82 std::atomic<int64_t> num_of_XAPP_messages{0};
  83 static long transactionCounter = 0;
  84
  85 int buildListeningPort(sctp_params_t &sctpParams) {
  86     sctpParams.listenFD = socket (AF_INET6, SOCK_STREAM, IPPROTO_SCTP);
  87     struct sockaddr_in6 servaddr {};
  88     servaddr.sin6_family = AF_INET6;
  89     servaddr.sin6_addr   = in6addr_any;
  90     servaddr.sin6_port = htons(sctpParams.sctpPort);
  91     if (bind(sctpParams.listenFD, (SA *)&servaddr, sizeof(servaddr)) < 0 ) {
  92         mdclog_write(MDCLOG_ERR, "Error binding. %s\n", strerror(errno));
  93         return -1;
  94     }
  95     if (setSocketNoBlocking(sctpParams.listenFD) == -1) {
  96         //mdclog_write(MDCLOG_ERR, "Error binding. %s", strerror(errno));
  97         return -1;
  98     }
  99     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 100         struct sockaddr_in6 cliaddr {};
 101         socklen_t len = sizeof(cliaddr);
 102         getsockname(sctpParams.listenFD, (SA *)&cliaddr, &len);
 103         char buff[1024] {};
 104         inet_ntop(AF_INET6, &cliaddr.sin6_addr, buff, sizeof(buff));
 105         mdclog_write(MDCLOG_DEBUG, "My address: %s, port %d\n", buff, htons(cliaddr.sin6_port));
 106     }
 107
 108     if (listen(sctpParams.listenFD, SOMAXCONN) < 0) {
 109         mdclog_write(MDCLOG_ERR, "Error listening. %s\n", strerror(errno));
 110         return -1;
 111     }
 112     struct epoll_event event {};
 113     event.events = EPOLLIN | EPOLLET;
 114     event.data.fd = sctpParams.listenFD;
 115
 116     // add listening port to epoll
 117     if (epoll_ctl(sctpParams.epoll_fd, EPOLL_CTL_ADD, sctpParams.listenFD, &event)) {
 118         printf("Failed to add descriptor to epoll\n");
 119         mdclog_write(MDCLOG_ERR, "Failed to add descriptor to epoll. %s\n", strerror(errno));
 120         return -1;
 121     }
 122
 123     return 0;
 124 }
 125
 126 int buildConfiguration(sctp_params_t &sctpParams) {
 127     path p = (sctpParams.configFilePath + "/" + sctpParams.configFileName).c_str();
 128     if (exists(p)) {
 129         const int size = 2048;
 130         auto fileSize = file_size(p);
 131         if (fileSize > size) {
 132             mdclog_write(MDCLOG_ERR, "File %s larger than %d", p.string().c_str(), size);
 133             return -1;
 134         }
 135     } else {
 136         mdclog_write(MDCLOG_ERR, "Configuration File %s not exists", p.string().c_str());
 137         return -1;
 138     }
 139
 140     ReadConfigFile conf;
 141     if (conf.openConfigFile(p.string()) == -1) {
 142         mdclog_write(MDCLOG_ERR, "Filed to open config file %s, %s",
 143                      p.string().c_str(), strerror(errno));
 144         return -1;
 145     }
 146     int rmrPort = conf.getIntValue("nano");
 147     if (rmrPort == -1) {
 148         mdclog_write(MDCLOG_ERR, "illigal RMR port ");
 149         return -1;
 150     }
 151     sctpParams.rmrPort = (uint16_t)rmrPort;
 152     snprintf(sctpParams.rmrAddress, sizeof(sctpParams.rmrAddress), "%d", (int) (sctpParams.rmrPort));
 153
 154     auto tmpStr = conf.getStringValue("loglevel");
 155     if (tmpStr.length() == 0) {
 156         mdclog_write(MDCLOG_ERR, "illigal loglevel. Set loglevel to MDCLOG_INFO");
 157         tmpStr = "info";
 158     }
 159     transform(tmpStr.begin(), tmpStr.end(), tmpStr.begin(), ::tolower);
 160
 161     if ((tmpStr.compare("debug")) == 0) {
 162         sctpParams.logLevel = MDCLOG_DEBUG;
 163     } else if ((tmpStr.compare("info")) == 0) {
 164         sctpParams.logLevel = MDCLOG_INFO;
 165     } else if ((tmpStr.compare("warning")) == 0) {
 166         sctpParams.logLevel = MDCLOG_WARN;
 167     } else if ((tmpStr.compare("error")) == 0) {
 168         sctpParams.logLevel = MDCLOG_ERR;
 169     } else {
 170         mdclog_write(MDCLOG_ERR, "illigal loglevel = %s. Set loglevel to MDCLOG_INFO", tmpStr.c_str());
 171         sctpParams.logLevel = MDCLOG_INFO;
 172     }
 173     mdclog_level_set(sctpParams.logLevel);
 174
 175     tmpStr = conf.getStringValue("volume");
 176     if (tmpStr.length() == 0) {
 177         mdclog_write(MDCLOG_ERR, "illigal volume.");
 178         return -1;
 179     }
 180
 181     char tmpLogFilespec[VOLUME_URL_SIZE];
 182     tmpLogFilespec[0] = 0;
 183     sctpParams.volume[0] = 0;
 184     snprintf(sctpParams.volume, VOLUME_URL_SIZE, "%s", tmpStr.c_str());
 185     // copy the name to temp file as well
 186     snprintf(tmpLogFilespec, VOLUME_URL_SIZE, "%s", tmpStr.c_str());
 187
 188
 189     // define the file name in the tmp directory under the volume
 190     strcat(tmpLogFilespec,"/tmp/E2Term_%Y-%m-%d_%H-%M-%S.%N.tmpStr");
 191
 192     sctpParams.myIP = conf.getStringValue("local-ip");
 193     if (sctpParams.myIP.length() == 0) {
 194         mdclog_write(MDCLOG_ERR, "illigal local-ip.");
 195         return -1;
 196     }
 197
 198     int sctpPort = conf.getIntValue("sctp-port");
 199     if (sctpPort == -1) {
 200         mdclog_write(MDCLOG_ERR, "illigal SCTP port ");
 201         return -1;
 202     }
 203     sctpParams.sctpPort = (uint16_t)sctpPort;
 204
 205     sctpParams.fqdn = conf.getStringValue("external-fqdn");
 206     if (sctpParams.fqdn.length() == 0) {
 207         mdclog_write(MDCLOG_ERR, "illigal external-fqdn");
 208         return -1;
 209     }
 210
 211     std::string pod = conf.getStringValue("pod_name");
 212     if (pod.length() == 0) {
 213         mdclog_write(MDCLOG_ERR, "illigal pod_name in config file");
 214         return -1;
 215     }
 216     auto *podName = getenv(pod.c_str());
 217     if (podName == nullptr) {
 218         mdclog_write(MDCLOG_ERR, "illigal pod_name or environment varible not exists : %s", pod.c_str());
 219         return -1;
 220
 221     } else {
 222         sctpParams.podName.assign(podName);
 223         if (sctpParams.podName.length() == 0) {
 224             mdclog_write(MDCLOG_ERR, "illigal pod_name");
 225             return -1;
 226         }
 227     }
 228
 229     tmpStr = conf.getStringValue("trace");
 230     transform(tmpStr.begin(), tmpStr.end(), tmpStr.begin(), ::tolower);
 231     if ((tmpStr.compare("start")) == 0) {
 232         mdclog_write(MDCLOG_INFO, "Trace set to: start");
 233         sctpParams.trace = true;
 234     } else if ((tmpStr.compare("stop")) == 0) {
 235         mdclog_write(MDCLOG_INFO, "Trace set to: stop");
 236         sctpParams.trace = false;
 237     }
 238     jsonTrace = sctpParams.trace;
 239
 240     sctpParams.ka_message_length = snprintf(sctpParams.ka_message, KA_MESSAGE_SIZE, "{\"address\": \"%s:%d\","
 241                                                                                     "\"fqdn\": \"%s\","
 242                                                                                     "\"pod_name\": \"%s\"}",
 243                                             (const char *)sctpParams.myIP.c_str(),
 244                                             sctpParams.rmrPort,
 245                                             sctpParams.fqdn.c_str(),
 246                                             sctpParams.podName.c_str());
 247
 248     if (mdclog_level_get() >= MDCLOG_INFO) {
 249         mdclog_mdc_add("RMR Port", to_string(sctpParams.rmrPort).c_str());
 250         mdclog_mdc_add("LogLevel", to_string(sctpParams.logLevel).c_str());
 251         mdclog_mdc_add("volume", sctpParams.volume);
 252         mdclog_mdc_add("tmpLogFilespec", tmpLogFilespec);
 253         mdclog_mdc_add("my ip", sctpParams.myIP.c_str());
 254         mdclog_mdc_add("pod name", sctpParams.podName.c_str());
 255
 256         mdclog_write(MDCLOG_INFO, "running parameters for instance : %s", sctpParams.ka_message);
 257     }
 258     mdclog_mdc_clean();
 259
 260     // Files written to the current working directory
 261     boostLogger = logging::add_file_log(
 262             keywords::file_name = tmpLogFilespec, // to temp directory
 263             keywords::rotation_size = 10 * 1024 * 1024,
 264             keywords::time_based_rotation = sinks::file::rotation_at_time_interval(posix_time::hours(1)),
 265             keywords::format = "%Message%"
 266             //keywords::format = "[%TimeStamp%]: %Message%" // use each tmpStr with time stamp
 267     );
 268
 269     // Setup a destination folder for collecting rotated (closed) files --since the same volumn can use rename()
 270     boostLogger->locked_backend()->set_file_collector(sinks::file::make_collector(
 271             keywords::target = sctpParams.volume
 272     ));
 273
 274     // Upon restart, scan the directory for files matching the file_name pattern
 275     boostLogger->locked_backend()->scan_for_files();
 276
 277     // Enable auto-flushing after each tmpStr record written
 278     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 279         boostLogger->locked_backend()->auto_flush(true);
 280     }
 281
 282     return 0;
 283 }
 284
 285
 286
 287 int main(const int argc, char **argv) {
 288     sctp_params_t sctpParams;
 289
 290     {
 291         std::random_device device{};
 292         std::mt19937 generator(device());
 293         std::uniform_int_distribution<long> distribution(1, (long) 1e12);
 294         transactionCounter = distribution(generator);
 295     }
 296
 297 //    uint64_t st = 0;
 298 //    uint32_t aux1 = 0;
 299 //   st = rdtscp(aux1);
 300
 301     unsigned num_cpus = std::thread::hardware_concurrency();
 302     init_log();
 303     mdclog_level_set(MDCLOG_INFO);
 304
 305     if (std::signal(SIGINT, catch_function) == SIG_ERR) {
 306         mdclog_write(MDCLOG_ERR, "Error initializing SIGINT");
 307         exit(1);
 308     }
 309     if (std::signal(SIGABRT, catch_function)== SIG_ERR) {
 310         mdclog_write(MDCLOG_ERR, "Error initializing SIGABRT");
 311         exit(1);
 312     }
 313     if (std::signal(SIGTERM, catch_function)== SIG_ERR) {
 314         mdclog_write(MDCLOG_ERR, "Error initializing SIGTERM");
 315         exit(1);
 316     }
 317
 318     cpuClock = approx_CPU_MHz(100);
 319
 320     mdclog_write(MDCLOG_DEBUG, "CPU speed %11.11f", cpuClock);
 321
 322     auto result = parse(argc, argv, sctpParams);
 323
 324     if (buildConfiguration(sctpParams) != 0) {
 325         exit(-1);
 326     }
 327
 328     // start epoll
 329     sctpParams.epoll_fd = epoll_create1(0);
 330     if (sctpParams.epoll_fd == -1) {
 331         mdclog_write(MDCLOG_ERR, "failed to open epoll descriptor");
 332         exit(-1);
 333     }
 334
 335     getRmrContext(sctpParams);
 336     if (sctpParams.rmrCtx == nullptr) {
 337         close(sctpParams.epoll_fd);
 338         exit(-1);
 339     }
 340
 341     if (buildInotify(sctpParams) == -1) {
 342         close(sctpParams.rmrListenFd);
 343         rmr_close(sctpParams.rmrCtx);
 344         close(sctpParams.epoll_fd);
 345         exit(-1);
 346     }
 347
 348     if (buildListeningPort(sctpParams) != 0) {
 349         close(sctpParams.rmrListenFd);
 350         rmr_close(sctpParams.rmrCtx);
 351         close(sctpParams.epoll_fd);
 352         exit(-1);
 353     }
 354
 355     sctpParams.sctpMap = new mapWrapper();
 356
 357     std::vector<std::thread> threads(num_cpus);
 358 //    std::vector<std::thread> threads;
 359
 360     num_cpus = 1;
 361     for (unsigned int i = 0; i < num_cpus; i++) {
 362         threads[i] = std::thread(listener, &sctpParams);
 363
 364         cpu_set_t cpuset;
 365         CPU_ZERO(&cpuset);
 366         CPU_SET(i, &cpuset);
 367         int rc = pthread_setaffinity_np(threads[i].native_handle(), sizeof(cpu_set_t), &cpuset);
 368         if (rc != 0) {
 369             mdclog_write(MDCLOG_ERR, "Error calling pthread_setaffinity_np: %d", rc);
 370         }
 371     }
 372
 373     auto statFlag = false;
 374     auto statThread = std::thread(statColectorThread, (void *)&statFlag);
 375
 376     //loop over term_init until first message from xApp
 377     handleTermInit(sctpParams);
 378
 379     for (auto &t : threads) {
 380         t.join();
 381     }
 382
 383     statFlag = true;
 384     statThread.join();
 385
 386     return 0;
 387 }
 388
 389 void handleTermInit(sctp_params_t &sctpParams) {
 390     sendTermInit(sctpParams);
 391     //send to e2 manager init of e2 term
 392     //E2_TERM_INIT
 393
 394     int count = 0;
 395     while (true) {
 396         auto xappMessages = num_of_XAPP_messages.load(std::memory_order_acquire);
 397         if (xappMessages > 0) {
 398             if (mdclog_level_get() >=  MDCLOG_INFO) {
 399                 mdclog_write(MDCLOG_INFO, "Got a message from some appliction, stop sending E2_TERM_INIT");
 400             }
 401             return;
 402         }
 403         usleep(100000);
 404         count++;
 405         if (count % 1000 == 0) {
 406             mdclog_write(MDCLOG_ERR, "GOT No messages from any xApp");
 407             sendTermInit(sctpParams);
 408         }
 409     }
 410 }
 411
 412 void sendTermInit(sctp_params_t &sctpParams) {
 413     rmr_mbuf_t *msg = rmr_alloc_msg(sctpParams.rmrCtx, sctpParams.ka_message_length);
 414     auto count = 0;
 415     while (true) {
 416         msg->mtype = E2_TERM_INIT;
 417         msg->state = 0;
 418         rmr_bytes2payload(msg, (unsigned char *)sctpParams.ka_message, sctpParams.ka_message_length);
 419         static unsigned char tx[32];
 420         auto txLen = snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
 421         rmr_bytes2xact(msg, tx, txLen);
 422         msg = rmr_send_msg(sctpParams.rmrCtx, msg);
 423         if (msg == nullptr) {
 424             msg = rmr_alloc_msg(sctpParams.rmrCtx, sctpParams.ka_message_length);
 425         } else if (msg->state == 0) {
 426             rmr_free_msg(msg);
 427             if (mdclog_level_get() >=  MDCLOG_INFO) {
 428                 mdclog_write(MDCLOG_INFO, "E2_TERM_INIT succsesfuly sent ");
 429             }
 430             return;
 431         } else {
 432             if (count % 100 == 0) {
 433                 mdclog_write(MDCLOG_ERR, "Error sending E2_TERM_INIT cause : %s ", translateRmrErrorMessages(msg->state).c_str());
 434             }
 435             sleep(1);
 436         }
 437         count++;
 438     }
 439 }
 440
 441 /**
 442  *
 443  * @param argc
 444  * @param argv
 445  * @param sctpParams
 446  * @return
 447  */
 448 cxxopts::ParseResult parse(int argc, char *argv[], sctp_params_t &sctpParams) {
 449     cxxopts::Options options(argv[0], "e2 term help");
 450     options.positional_help("[optional args]").show_positional_help();
 451     options.allow_unrecognised_options().add_options()
 452             ("p,path", "config file path", cxxopts::value<std::string>(sctpParams.configFilePath)->default_value("config"))
 453             ("f,file", "config file name", cxxopts::value<std::string>(sctpParams.configFileName)->default_value("config.conf"))
 454             ("h,help", "Print help");
 455
 456     auto result = options.parse(argc, argv);
 457
 458     if (result.count("help")) {
 459         std::cout << options.help({""}) << std::endl;
 460         exit(0);
 461     }
 462     return result;
 463 }
 464
 465 /**
 466  *
 467  * @param sctpParams
 468  * @return -1 failed 0 success
 469  */
 470 int buildInotify(sctp_params_t &sctpParams) {
 471     sctpParams.inotifyFD = inotify_init1(IN_NONBLOCK);
 472     if (sctpParams.inotifyFD == -1) {
 473         mdclog_write(MDCLOG_ERR, "Failed to init inotify (inotify_init1) %s", strerror(errno));
 474         close(sctpParams.rmrListenFd);
 475         rmr_close(sctpParams.rmrCtx);
 476         close(sctpParams.epoll_fd);
 477         return -1;
 478     }
 479
 480     sctpParams.inotifyWD = inotify_add_watch(sctpParams.inotifyFD,
 481                                              (const char *)sctpParams.configFilePath.c_str(),
 482                                              (unsigned)IN_OPEN | (unsigned)IN_CLOSE_WRITE | (unsigned)IN_CLOSE_NOWRITE); //IN_CLOSE = (IN_CLOSE_WRITE | IN_CLOSE_NOWRITE)
 483     if (sctpParams.inotifyWD == -1) {
 484         mdclog_write(MDCLOG_ERR, "Failed to add directory : %s to  inotify (inotify_add_watch) %s",
 485                      sctpParams.configFilePath.c_str(),
 486                      strerror(errno));
 487         close(sctpParams.inotifyFD);
 488         return -1;
 489     }
 490
 491     struct epoll_event event{};
 492     event.events = (EPOLLIN);
 493     event.data.fd = sctpParams.inotifyFD;
 494     // add listening RMR FD to epoll
 495     if (epoll_ctl(sctpParams.epoll_fd, EPOLL_CTL_ADD, sctpParams.inotifyFD, &event)) {
 496         mdclog_write(MDCLOG_ERR, "Failed to add inotify FD to epoll");
 497         close(sctpParams.inotifyFD);
 498         return -1;
 499     }
 500     return 0;
 501 }
 502
 503 /**
 504  *
 505  * @param args
 506  * @return
 507  */
 508 void listener(sctp_params_t *params) {
 509     int num_of_SCTP_messages = 0;
 510     auto totalTime = 0.0;
 511     mdclog_mdc_clean();
 512     mdclog_level_set(params->logLevel);
 513
 514     std::thread::id this_id = std::this_thread::get_id();
 515     //save cout
 516     streambuf *oldCout = cout.rdbuf();
 517     ostringstream memCout;
 518     // create new cout
 519     cout.rdbuf(memCout.rdbuf());
 520     cout << this_id;
 521     //return to the normal cout
 522     cout.rdbuf(oldCout);
 523
 524     char tid[32];
 525     memcpy(tid, memCout.str().c_str(), memCout.str().length() < 32 ? memCout.str().length() : 31);
 526     tid[memCout.str().length()] = 0;
 527     mdclog_mdc_add("thread id", tid);
 528
 529     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 530         mdclog_write(MDCLOG_DEBUG, "started thread number %s", tid);
 531     }
 532
 533
 534     RmrMessagesBuffer_t rmrMessageBuffer{};
 535     //create and init RMR
 536     rmrMessageBuffer.rmrCtx = params->rmrCtx;
 537
 538     auto *events = (struct epoll_event *) calloc(MAXEVENTS, sizeof(struct epoll_event));
 539     struct timespec end{0, 0};
 540     struct timespec start{0, 0};
 541
 542     rmrMessageBuffer.rcvMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
 543     rmrMessageBuffer.sendMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
 544
 545     memcpy(rmrMessageBuffer.ka_message, params->ka_message, params->ka_message_length);
 546     rmrMessageBuffer.ka_message_len = params->ka_message_length;
 547     rmrMessageBuffer.ka_message[rmrMessageBuffer.ka_message_len] = 0;
 548
 549     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 550         mdclog_write(MDCLOG_DEBUG, "keep alive message is : %s", rmrMessageBuffer.ka_message);
 551     }
 552
 553     ReportingMessages_t message {};
 554
 555 //    for (int i = 0; i < MAX_RMR_BUFF_ARRY; i++) {
 556 //        rmrMessageBuffer.rcvBufferedMessages[i] = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
 557 //        rmrMessageBuffer.sendBufferedMessages[i] = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
 558 //    }
 559
 560     message.statCollector = StatCollector::GetInstance();
 561
 562     while (true) {
 563         if (mdclog_level_get() >= MDCLOG_DEBUG) {
 564             mdclog_write(MDCLOG_DEBUG, "Start EPOLL Wait");
 565         }
 566         auto numOfEvents = epoll_wait(params->epoll_fd, events, MAXEVENTS, -1);
 567         if (numOfEvents < 0 && errno == EINTR) {
 568             if (mdclog_level_get() >= MDCLOG_DEBUG) {
 569                 mdclog_write(MDCLOG_DEBUG, "got EINTR : %s", strerror(errno));
 570             }
 571             continue;
 572         }
 573         if (numOfEvents < 0) {
 574             mdclog_write(MDCLOG_ERR, "Epoll wait failed, errno = %s", strerror(errno));
 575             return;
 576         }
 577         for (auto i = 0; i < numOfEvents; i++) {
 578             if (mdclog_level_get() >= MDCLOG_DEBUG) {
 579                 mdclog_write(MDCLOG_DEBUG, "handling epoll event %d out of %d", i + 1, numOfEvents);
 580             }
 581             clock_gettime(CLOCK_MONOTONIC, &message.message.time);
 582             start.tv_sec = message.message.time.tv_sec;
 583             start.tv_nsec = message.message.time.tv_nsec;
 584
 585
 586             if ((events[i].events & EPOLLERR) || (events[i].events & EPOLLHUP)) {
 587                 handlepoll_error(events[i], message, rmrMessageBuffer, params);
 588             } else if (events[i].events & EPOLLOUT) {
 589                 handleEinprogressMessages(events[i], message, rmrMessageBuffer, params);
 590             } else if (params->listenFD == events[i].data.fd) {
 591                 if (mdclog_level_get() >= MDCLOG_INFO) {
 592                     mdclog_write(MDCLOG_INFO, "New connection request from sctp network\n");
 593                 }
 594                 // new connection is requested from RAN  start build connection
 595                 while (true) {
 596                     struct sockaddr in_addr {};
 597                     socklen_t in_len;
 598                     char hostBuff[NI_MAXHOST];
 599                     char portBuff[NI_MAXSERV];
 600
 601                     in_len = sizeof(in_addr);
 602                     auto *peerInfo = (ConnectedCU_t *)calloc(1, sizeof(ConnectedCU_t));
 603                     peerInfo->sctpParams = params;
 604                     peerInfo->fileDescriptor = accept(params->listenFD, &in_addr, &in_len);
 605                     if (peerInfo->fileDescriptor == -1) {
 606                         if ((errno == EAGAIN) || (errno == EWOULDBLOCK)) {
 607                             /* We have processed all incoming connections. */
 608                             break;
 609                         } else {
 610                             mdclog_write(MDCLOG_ERR, "Accept error, errno = %s", strerror(errno));
 611                             break;
 612                         }
 613                     }
 614                     if (setSocketNoBlocking(peerInfo->fileDescriptor) == -1) {
 615                         mdclog_write(MDCLOG_ERR, "setSocketNoBlocking failed to set new connection %s on port %s\n", hostBuff, portBuff);
 616                         close(peerInfo->fileDescriptor);
 617                         break;
 618                     }
 619                     auto  ans = getnameinfo(&in_addr, in_len,
 620                                             peerInfo->hostName, NI_MAXHOST,
 621                                             peerInfo->portNumber, NI_MAXSERV, (unsigned )((unsigned int)NI_NUMERICHOST | (unsigned int)NI_NUMERICSERV));
 622                     if (ans < 0) {
 623                         mdclog_write(MDCLOG_ERR, "Failed to get info on connection request. %s\n", strerror(errno));
 624                         close(peerInfo->fileDescriptor);
 625                         break;
 626                     }
 627                     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 628                         mdclog_write(MDCLOG_DEBUG, "Accepted connection on descriptor %d (host=%s, port=%s)\n", peerInfo->fileDescriptor, peerInfo->hostName, peerInfo->portNumber);
 629                     }
 630                     peerInfo->isConnected = false;
 631                     peerInfo->gotSetup = false;
 632                     if (addToEpoll(params->epoll_fd,
 633                                    peerInfo,
 634                                    (EPOLLIN | EPOLLET),
 635                                    params->sctpMap, nullptr,
 636                                    0) != 0) {
 637                         break;
 638                     }
 639                     break;
 640                 }
 641             } else if (params->rmrListenFd == events[i].data.fd) {
 642                 // got message from XAPP
 643                 num_of_XAPP_messages.fetch_add(1, std::memory_order_release);
 644                 num_of_messages.fetch_add(1, std::memory_order_release);
 645                 if (mdclog_level_get() >= MDCLOG_DEBUG) {
 646                     mdclog_write(MDCLOG_DEBUG, "new message from RMR");
 647                 }
 648                 if (receiveXappMessages(params->sctpMap,
 649                                         rmrMessageBuffer,
 650                                         message.message.time) != 0) {
 651                     mdclog_write(MDCLOG_ERR, "Error handling Xapp message");
 652                 }
 653             } else if (params->inotifyFD == events[i].data.fd) {
 654                 mdclog_write(MDCLOG_INFO, "Got event from inotify (configuration update)");
 655                 handleConfigChange(params);
 656             } else {
 657                 /* We RMR_ERR_RETRY have data on the fd waiting to be read. Read and display it.
 658                  * We must read whatever data is available completely, as we are running
 659                  *  in edge-triggered mode and won't get a notification again for the same data. */
 660                 num_of_messages.fetch_add(1, std::memory_order_release);
 661                 if (mdclog_level_get() >= MDCLOG_DEBUG) {
 662                     mdclog_write(MDCLOG_DEBUG, "new message from SCTP, epoll flags are : %0x", events[i].events);
 663                 }
 664                 receiveDataFromSctp(&events[i],
 665                                     params->sctpMap,
 666                                     num_of_SCTP_messages,
 667                                     rmrMessageBuffer,
 668                                     message.message.time);
 669             }
 670
 671             clock_gettime(CLOCK_MONOTONIC, &end);
 672             if (mdclog_level_get() >= MDCLOG_INFO) {
 673                 totalTime += ((end.tv_sec + 1.0e-9 * end.tv_nsec) -
 674                               ((double) start.tv_sec + 1.0e-9 * start.tv_nsec));
 675             }
 676             if (mdclog_level_get() >= MDCLOG_DEBUG) {
 677                 mdclog_write(MDCLOG_DEBUG, "message handling is %ld seconds %ld nanoseconds",
 678                              end.tv_sec - start.tv_sec,
 679                              end.tv_nsec - start.tv_nsec);
 680             }
 681         }
 682     }
 683 }
 684
 685 /**
 686  *
 687  * @param sctpParams
 688  */
 689 void handleConfigChange(sctp_params_t *sctpParams) {
 690     char buf[4096] __attribute__ ((aligned(__alignof__(struct inotify_event))));
 691     const struct inotify_event *event;
 692     char *ptr;
 693
 694     path p = (sctpParams->configFilePath + "/" + sctpParams->configFileName).c_str();
 695     auto endlessLoop = true;
 696     while (endlessLoop) {
 697         auto len = read(sctpParams->inotifyFD, buf, sizeof buf);
 698         if (len == -1) {
 699             if (errno != EAGAIN) {
 700                 mdclog_write(MDCLOG_ERR, "read %s ", strerror(errno));
 701                 endlessLoop = false;
 702                 continue;
 703             }
 704             else {
 705                 endlessLoop = false;
 706                 continue;
 707             }
 708         }
 709
 710         for (ptr = buf; ptr < buf + len; ptr += sizeof(struct inotify_event) + event->len) {
 711             event = (const struct inotify_event *)ptr;
 712             if (event->mask & (uint32_t)IN_ISDIR) {
 713                 continue;
 714             }
 715
 716             // the directory name
 717             if (sctpParams->inotifyWD == event->wd) {
 718                 // not the directory
 719             }
 720             if (event->len) {
 721                 auto  retVal = strcmp(sctpParams->configFileName.c_str(), event->name);
 722                 if (retVal != 0) {
 723                     continue;
 724                 }
 725             }
 726             // only the file we want
 727             if (event->mask & (uint32_t)IN_CLOSE_WRITE) {
 728                 if (mdclog_level_get() >= MDCLOG_INFO) {
 729                     mdclog_write(MDCLOG_INFO, "Configuration file changed");
 730                 }
 731                 if (exists(p)) {
 732                     const int size = 2048;
 733                     auto fileSize = file_size(p);
 734                     if (fileSize > size) {
 735                         mdclog_write(MDCLOG_ERR, "File %s larger than %d", p.string().c_str(), size);
 736                         return;
 737                     }
 738                 } else {
 739                     mdclog_write(MDCLOG_ERR, "Configuration File %s not exists", p.string().c_str());
 740                     return;
 741                 }
 742
 743                 ReadConfigFile conf;
 744                 if (conf.openConfigFile(p.string()) == -1) {
 745                     mdclog_write(MDCLOG_ERR, "Filed to open config file %s, %s",
 746                                  p.string().c_str(), strerror(errno));
 747                     return;
 748                 }
 749
 750                 auto tmpStr = conf.getStringValue("loglevel");
 751                 if (tmpStr.length() == 0) {
 752                     mdclog_write(MDCLOG_ERR, "illigal loglevel. Set loglevel to MDCLOG_INFO");
 753                     tmpStr = "info";
 754                 }
 755                 transform(tmpStr.begin(), tmpStr.end(), tmpStr.begin(), ::tolower);
 756
 757                 if ((tmpStr.compare("debug")) == 0) {
 758                     mdclog_write(MDCLOG_INFO, "Log level set to MDCLOG_DEBUG");
 759                     sctpParams->logLevel = MDCLOG_DEBUG;
 760                 } else if ((tmpStr.compare("info")) == 0) {
 761                     mdclog_write(MDCLOG_INFO, "Log level set to MDCLOG_INFO");
 762                     sctpParams->logLevel = MDCLOG_INFO;
 763                 } else if ((tmpStr.compare("warning")) == 0) {
 764                     mdclog_write(MDCLOG_INFO, "Log level set to MDCLOG_WARN");
 765                     sctpParams->logLevel = MDCLOG_WARN;
 766                 } else if ((tmpStr.compare("error")) == 0) {
 767                     mdclog_write(MDCLOG_INFO, "Log level set to MDCLOG_ERR");
 768                     sctpParams->logLevel = MDCLOG_ERR;
 769                 } else {
 770                     mdclog_write(MDCLOG_ERR, "illigal loglevel = %s. Set loglevel to MDCLOG_INFO", tmpStr.c_str());
 771                     sctpParams->logLevel = MDCLOG_INFO;
 772                 }
 773                 mdclog_level_set(sctpParams->logLevel);
 774
 775
 776                 tmpStr = conf.getStringValue("trace");
 777                 if (tmpStr.length() == 0) {
 778                     mdclog_write(MDCLOG_ERR, "illigal trace. Set trace to stop");
 779                     tmpStr = "stop";
 780                 }
 781
 782                 transform(tmpStr.begin(), tmpStr.end(), tmpStr.begin(), ::tolower);
 783                 if ((tmpStr.compare("start")) == 0) {
 784                     mdclog_write(MDCLOG_INFO, "Trace set to: start");
 785                     sctpParams->trace = true;
 786                 } else if ((tmpStr.compare("stop")) == 0) {
 787                     mdclog_write(MDCLOG_INFO, "Trace set to: stop");
 788                     sctpParams->trace = false;
 789                 } else {
 790                     mdclog_write(MDCLOG_ERR, "Trace was set to wrong value %s, set to stop", tmpStr.c_str());
 791                     sctpParams->trace = false;
 792                 }
 793                 jsonTrace = sctpParams->trace;
 794                 endlessLoop = false;
 795             }
 796         }
 797     }
 798 }
 799
 800 /**
 801  *
 802  * @param event
 803  * @param message
 804  * @param rmrMessageBuffer
 805  * @param params
 806  */
 807 void handleEinprogressMessages(struct epoll_event &event,
 808                                ReportingMessages_t &message,
 809                                RmrMessagesBuffer_t &rmrMessageBuffer,
 810                                sctp_params_t *params) {
 811     auto *peerInfo = (ConnectedCU_t *)event.data.ptr;
 812     memcpy(message.message.enodbName, peerInfo->enodbName, sizeof(peerInfo->enodbName));
 813
 814     mdclog_write(MDCLOG_INFO, "file descriptor %d got EPOLLOUT", peerInfo->fileDescriptor);
 815     auto retVal = 0;
 816     socklen_t retValLen = 0;
 817     auto rc = getsockopt(peerInfo->fileDescriptor, SOL_SOCKET, SO_ERROR, &retVal, &retValLen);
 818     if (rc != 0 || retVal != 0) {
 819         if (rc != 0) {
 820             rmrMessageBuffer.sendMessage->len = snprintf((char *)rmrMessageBuffer.sendMessage->payload, 256,
 821                                                          "%s|Failed SCTP Connection, after EINPROGRESS the getsockopt%s",
 822                                                          peerInfo->enodbName, strerror(errno));
 823         } else if (retVal != 0) {
 824             rmrMessageBuffer.sendMessage->len = snprintf((char *)rmrMessageBuffer.sendMessage->payload, 256,
 825                                                          "%s|Failed SCTP Connection after EINPROGRESS, SO_ERROR",
 826                                                          peerInfo->enodbName);
 827         }
 828
 829         message.message.asndata = rmrMessageBuffer.sendMessage->payload;
 830         message.message.asnLength = rmrMessageBuffer.sendMessage->len;
 831         mdclog_write(MDCLOG_ERR, "%s", rmrMessageBuffer.sendMessage->payload);
 832         message.message.direction = 'N';
 833         if (sendRequestToXapp(message, RIC_SCTP_CONNECTION_FAILURE, rmrMessageBuffer) != 0) {
 834             mdclog_write(MDCLOG_ERR, "SCTP_CONNECTION_FAIL message failed to send to xAPP");
 835         }
 836         memset(peerInfo->asnData, 0, peerInfo->asnLength);
 837         peerInfo->asnLength = 0;
 838         peerInfo->mtype = 0;
 839         return;
 840     }
 841
 842     peerInfo->isConnected = true;
 843
 844     if (modifyToEpoll(params->epoll_fd, peerInfo, (EPOLLIN | EPOLLET), params->sctpMap, peerInfo->enodbName,
 845                       peerInfo->mtype) != 0) {
 846         mdclog_write(MDCLOG_ERR, "epoll_ctl EPOLL_CTL_MOD");
 847         return;
 848     }
 849
 850     message.message.asndata = (unsigned char *)peerInfo->asnData;
 851     message.message.asnLength = peerInfo->asnLength;
 852     message.message.messageType = peerInfo->mtype;
 853     memcpy(message.message.enodbName, peerInfo->enodbName, sizeof(peerInfo->enodbName));
 854     num_of_messages.fetch_add(1, std::memory_order_release);
 855     if (mdclog_level_get() >= MDCLOG_DEBUG) {
 856         mdclog_write(MDCLOG_DEBUG, "send the delayed SETUP/ENDC SETUP to sctp for %s",
 857                      message.message.enodbName);
 858     }
 859     if (sendSctpMsg(peerInfo, message, params->sctpMap) != 0) {
 860         if (mdclog_level_get() >= MDCLOG_DEBUG) {
 861             mdclog_write(MDCLOG_DEBUG, "Error write to SCTP  %s %d", __func__, __LINE__);
 862         }
 863         return;
 864     }
 865
 866     memset(peerInfo->asnData, 0, peerInfo->asnLength);
 867     peerInfo->asnLength = 0;
 868     peerInfo->mtype = 0;
 869 }
 870
 871
 872 void handlepoll_error(struct epoll_event &event,
 873                       ReportingMessages_t &message,
 874                       RmrMessagesBuffer_t &rmrMessageBuffer,
 875                       sctp_params_t *params) {
 876     if (event.data.fd != params->rmrListenFd) {
 877         auto *peerInfo = (ConnectedCU_t *)event.data.ptr;
 878         mdclog_write(MDCLOG_ERR, "epoll error, events %0x on fd %d, RAN NAME : %s",
 879                      event.events, peerInfo->fileDescriptor, peerInfo->enodbName);
 880
 881         rmrMessageBuffer.sendMessage->len = snprintf((char *)rmrMessageBuffer.sendMessage->payload, 256,
 882                                                      "%s|Failed SCTP Connection",
 883                                                      peerInfo->enodbName);
 884         message.message.asndata = rmrMessageBuffer.sendMessage->payload;
 885         message.message.asnLength = rmrMessageBuffer.sendMessage->len;
 886
 887         memcpy(message.message.enodbName, peerInfo->enodbName, sizeof(peerInfo->enodbName));
 888         message.message.direction = 'N';
 889         if (sendRequestToXapp(message, RIC_SCTP_CONNECTION_FAILURE, rmrMessageBuffer) != 0) {
 890             mdclog_write(MDCLOG_ERR, "SCTP_CONNECTION_FAIL message failed to send to xAPP");
 891         }
 892
 893         close(peerInfo->fileDescriptor);
 894         params->sctpMap->erase(peerInfo->enodbName);
 895         cleanHashEntry((ConnectedCU_t *) event.data.ptr, params->sctpMap);
 896     } else {
 897         mdclog_write(MDCLOG_ERR, "epoll error, events %0x on RMR FD", event.events);
 898     }
 899 }
 900 /**
 901  *
 902  * @param socket
 903  * @return
 904  */
 905 int setSocketNoBlocking(int socket) {
 906     auto flags = fcntl(socket, F_GETFL, 0);
 907
 908     if (flags == -1) {
 909         mdclog_mdc_add("func", "fcntl");
 910         mdclog_write(MDCLOG_ERR, "%s, %s", __FUNCTION__, strerror(errno));
 911         mdclog_mdc_clean();
 912         return -1;
 913     }
 914
 915     flags = (unsigned) flags | (unsigned) O_NONBLOCK;
 916     if (fcntl(socket, F_SETFL, flags) == -1) {
 917         mdclog_mdc_add("func", "fcntl");
 918         mdclog_write(MDCLOG_ERR, "%s, %s", __FUNCTION__, strerror(errno));
 919         mdclog_mdc_clean();
 920         return -1;
 921     }
 922
 923     return 0;
 924 }
 925
 926 /**
 927  *
 928  * @param val
 929  * @param m
 930  */
 931 void cleanHashEntry(ConnectedCU_t *val, Sctp_Map_t *m) {
 932     char *dummy;
 933     auto port = (uint16_t) strtol(val->portNumber, &dummy, 10);
 934     char searchBuff[2048]{};
 935
 936     snprintf(searchBuff, sizeof searchBuff, "host:%s:%d", val->hostName, port);
 937     m->erase(searchBuff);
 938
 939     m->erase(val->enodbName);
 940     free(val);
 941 }
 942
 943 /**
 944  *
 945  * @param fd file discriptor
 946  * @param data the asn data to send
 947  * @param len  length of the data
 948  * @param enodbName the enodbName as in the map for printing purpose
 949  * @param m map host information
 950  * @param mtype message number
 951  * @return 0 success, anegative number on fail
 952  */
 953 int sendSctpMsg(ConnectedCU_t *peerInfo, ReportingMessages_t &message, Sctp_Map_t *m) {
 954     auto loglevel = mdclog_level_get();
 955     int fd = peerInfo->fileDescriptor;
 956     if (loglevel >= MDCLOG_DEBUG) {
 957         mdclog_write(MDCLOG_DEBUG, "Send SCTP message for CU %s, %s",
 958                      message.message.enodbName, __FUNCTION__);
 959     }
 960
 961     while (true) {
 962         if (send(fd,message.message.asndata, message.message.asnLength,MSG_NOSIGNAL) < 0) {
 963             if (errno == EINTR) {
 964                 continue;
 965             }
 966             mdclog_write(MDCLOG_ERR, "error writing to CU a message, %s ", strerror(errno));
 967             if (!peerInfo->isConnected) {
 968                 mdclog_write(MDCLOG_ERR, "connection to CU %s is still in progress.", message.message.enodbName);
 969                 return -1;
 970             }
 971             cleanHashEntry(peerInfo, m);
 972             close(fd);
 973             char key[MAX_ENODB_NAME_SIZE * 2];
 974             snprintf(key, MAX_ENODB_NAME_SIZE * 2, "msg:%s|%d", message.message.enodbName,
 975                      message.message.messageType);
 976             if (loglevel >= MDCLOG_DEBUG) {
 977                 mdclog_write(MDCLOG_DEBUG, "remove key = %s from %s at line %d", key, __FUNCTION__, __LINE__);
 978             }
 979             auto tmp = m->find(key);
 980             if (tmp) {
 981                 free(tmp);
 982             }
 983             m->erase(key);
 984             return -1;
 985         }
 986         // TODO remove stat update
 987         //message.statCollector->incSentMessage(string(message.message.enodbName));
 988         message.message.direction = 'D';
 989         // send report.buffer of size
 990         buildJsonMessage(message);
 991
 992         if (loglevel >= MDCLOG_DEBUG) {
 993             mdclog_write(MDCLOG_DEBUG,
 994                          "SCTP message for CU %s sent from %s",
 995                          message.message.enodbName,
 996                          __FUNCTION__);
 997         }
 998         return 0;
 999     }
1000 }
1001
1002 /**
1003  *
1004  * @param message
1005  * @param rmrMessageBuffer
1006  */
1007 void getRequestMetaData(ReportingMessages_t &message, RmrMessagesBuffer_t &rmrMessageBuffer) {
1008     rmr_get_meid(rmrMessageBuffer.rcvMessage, (unsigned char *) (message.message.enodbName));
1009
1010     message.message.asndata = rmrMessageBuffer.rcvMessage->payload;
1011     message.message.asnLength = rmrMessageBuffer.rcvMessage->len;
1012
1013     if (mdclog_level_get() >= MDCLOG_DEBUG) {
1014         mdclog_write(MDCLOG_DEBUG, "Message from Xapp RAN name = %s message length = %ld",
1015                      message.message.enodbName, (unsigned long) message.message.asnLength);
1016     }
1017 }
1018
1019
1020
1021 /**
1022  *
1023  * @param events
1024  * @param sctpMap
1025  * @param numOfMessages
1026  * @param rmrMessageBuffer
1027  * @param ts
1028  * @return
1029  */
1030 int receiveDataFromSctp(struct epoll_event *events,
1031                         Sctp_Map_t *sctpMap,
1032                         int &numOfMessages,
1033                         RmrMessagesBuffer_t &rmrMessageBuffer,
1034                         struct timespec &ts) {
1035     /* We have data on the fd waiting to be read. Read and display it.
1036  * We must read whatever data is available completely, as we are running
1037  *  in edge-triggered mode and won't get a notification again for the same data. */
1038     ReportingMessages_t message {};
1039     auto done = 0;
1040     auto loglevel = mdclog_level_get();
1041
1042     // get the identity of the interface
1043     message.peerInfo = (ConnectedCU_t *)events->data.ptr;
1044
1045     message.statCollector = StatCollector::GetInstance();
1046     struct timespec start{0, 0};
1047     struct timespec decodestart{0, 0};
1048     struct timespec end{0, 0};
1049
1050     E2AP_PDU_t *pdu = nullptr;
1051
1052
1053     while (true) {
1054         if (loglevel >= MDCLOG_DEBUG) {
1055             mdclog_write(MDCLOG_DEBUG, "Start Read from SCTP %d fd", message.peerInfo->fileDescriptor);
1056             clock_gettime(CLOCK_MONOTONIC, &start);
1057         }
1058         // read the buffer directly to rmr payload
1059         message.message.asndata = rmrMessageBuffer.sendMessage->payload;
1060         message.message.asnLength = rmrMessageBuffer.sendMessage->len =
1061                 read(message.peerInfo->fileDescriptor, rmrMessageBuffer.sendMessage->payload, RECEIVE_SCTP_BUFFER_SIZE);
1062
1063         if (loglevel >= MDCLOG_DEBUG) {
1064             mdclog_write(MDCLOG_DEBUG, "Finish Read from SCTP %d fd message length = %ld",
1065                          message.peerInfo->fileDescriptor, message.message.asnLength);
1066         }
1067
1068         memcpy(message.message.enodbName, message.peerInfo->enodbName, sizeof(message.peerInfo->enodbName));
1069         message.statCollector->incRecvMessage(string(message.message.enodbName));
1070         message.message.direction = 'U';
1071         message.message.time.tv_nsec = ts.tv_nsec;
1072         message.message.time.tv_sec = ts.tv_sec;
1073
1074         if (message.message.asnLength < 0) {
1075             if (errno == EINTR) {
1076                 continue;
1077             }
1078             /* If errno == EAGAIN, that means we have read all
1079                data. So goReportingMessages_t back to the main loop. */
1080             if (errno != EAGAIN) {
1081                 mdclog_write(MDCLOG_ERR, "Read error, %s ", strerror(errno));
1082                 done = 1;
1083             } else if (loglevel >= MDCLOG_DEBUG) {
1084                 mdclog_write(MDCLOG_DEBUG, "EAGAIN - descriptor = %d", message.peerInfo->fileDescriptor);
1085             }
1086             break;
1087         } else if (message.message.asnLength == 0) {
1088             /* End of file. The remote has closed the connection. */
1089             if (loglevel >= MDCLOG_INFO) {
1090                 mdclog_write(MDCLOG_INFO, "END of File Closed connection - descriptor = %d",
1091                              message.peerInfo->fileDescriptor);
1092             }
1093             done = 1;
1094             break;
1095         }
1096
1097         if (loglevel >= MDCLOG_DEBUG) {
1098             char printBuffer[4096]{};
1099             char *tmp = printBuffer;
1100             for (size_t i = 0; i < (size_t)message.message.asnLength; ++i) {
1101                 snprintf(tmp, 3, "%02x", message.message.asndata[i]);
1102                 tmp += 2;
1103             }
1104             printBuffer[message.message.asnLength] = 0;
1105             clock_gettime(CLOCK_MONOTONIC, &end);
1106             mdclog_write(MDCLOG_DEBUG, "Before Encoding E2AP PDU for : %s, Read time is : %ld seconds, %ld nanoseconds",
1107                          message.peerInfo->enodbName, end.tv_sec - start.tv_sec, end.tv_nsec - start.tv_nsec);
1108             mdclog_write(MDCLOG_DEBUG, "PDU buffer length = %ld, data =  : %s", message.message.asnLength,
1109                          printBuffer);
1110             clock_gettime(CLOCK_MONOTONIC, &decodestart);
1111         }
1112
1113         auto rval = asn_decode(nullptr, ATS_ALIGNED_BASIC_PER, &asn_DEF_E2AP_PDU, (void **) &pdu,
1114                           message.message.asndata, message.message.asnLength);
1115         if (rval.code != RC_OK) {
1116             mdclog_write(MDCLOG_ERR, "Error %d Decoding (unpack) E2AP PDU from RAN : %s", rval.code,
1117                          message.peerInfo->enodbName);
1118             //todo may need reset to pdu
1119             break;
1120         }
1121
1122         if (loglevel >= MDCLOG_DEBUG) {
1123             clock_gettime(CLOCK_MONOTONIC, &end);
1124             mdclog_write(MDCLOG_DEBUG, "After Encoding E2AP PDU for : %s, Read time is : %ld seconds, %ld nanoseconds",
1125                          message.peerInfo->enodbName, end.tv_sec - decodestart.tv_sec, end.tv_nsec - decodestart.tv_nsec);
1126             char *printBuffer;
1127             size_t size;
1128             FILE *stream = open_memstream(&printBuffer, &size);
1129             asn_fprint(stream, &asn_DEF_E2AP_PDU, pdu);
1130             mdclog_write(MDCLOG_DEBUG, "Encoding E2AP PDU past : %s", printBuffer);
1131             clock_gettime(CLOCK_MONOTONIC, &decodestart);
1132         }
1133
1134         switch (pdu->present) {
1135             case E2AP_PDU_PR_initiatingMessage: {//initiating message
1136                 asnInitiatingRequest(pdu, sctpMap,message, rmrMessageBuffer);
1137                 break;
1138             }
1139             case E2AP_PDU_PR_successfulOutcome: { //successful outcome
1140                 asnSuccsesfulMsg(pdu, sctpMap, message,  rmrMessageBuffer);
1141                 break;
1142             }
1143             case E2AP_PDU_PR_unsuccessfulOutcome: { //Unsuccessful Outcome
1144                 asnUnSuccsesfulMsg(pdu, sctpMap, message, rmrMessageBuffer);
1145                 break;
1146             }
1147             default:
1148                 mdclog_write(MDCLOG_ERR, "Unknown index %d in E2AP PDU", pdu->present);
1149                 break;
1150         }
1151         if (loglevel >= MDCLOG_DEBUG) {
1152             clock_gettime(CLOCK_MONOTONIC, &end);
1153             mdclog_write(MDCLOG_DEBUG,
1154                          "After processing message and sent to rmr for : %s, Read time is : %ld seconds, %ld nanoseconds",
1155                          message.peerInfo->enodbName, end.tv_sec - decodestart.tv_sec, end.tv_nsec - decodestart.tv_nsec);
1156         }
1157         numOfMessages++;
1158         if (pdu != nullptr) {
1159             ASN_STRUCT_RESET(asn_DEF_E2AP_PDU, pdu);
1160             //ASN_STRUCT_FREE(asn_DEF_E2AP_PDU, pdu);
1161             //pdu = nullptr;
1162         }
1163     }
1164
1165     if (done) {
1166         if (loglevel >= MDCLOG_INFO) {
1167             mdclog_write(MDCLOG_INFO, "Closed connection - descriptor = %d", message.peerInfo->fileDescriptor);
1168         }
1169         message.message.asnLength = rmrMessageBuffer.sendMessage->len =
1170                 snprintf((char *)rmrMessageBuffer.sendMessage->payload,
1171                          256,
1172                          "%s|CU disconnected unexpectedly",
1173                          message.peerInfo->enodbName);
1174         message.message.asndata = rmrMessageBuffer.sendMessage->payload;
1175
1176         if (sendRequestToXapp(message,
1177                               RIC_SCTP_CONNECTION_FAILURE,
1178                               rmrMessageBuffer) != 0) {
1179             mdclog_write(MDCLOG_ERR, "SCTP_CONNECTION_FAIL message failed to send to xAPP");
1180         }
1181
1182         /* Closing descriptor make epoll remove it from the set of descriptors which are monitored. */
1183         close(message.peerInfo->fileDescriptor);
1184         cleanHashEntry((ConnectedCU_t *) events->data.ptr, sctpMap);
1185     }
1186     if (loglevel >= MDCLOG_DEBUG) {
1187         clock_gettime(CLOCK_MONOTONIC, &end);
1188         mdclog_write(MDCLOG_DEBUG, "from receive SCTP to send RMR time is %ld seconds and %ld nanoseconds",
1189                      end.tv_sec - start.tv_sec, end.tv_nsec - start.tv_nsec);
1190
1191     }
1192     return 0;
1193 }
1194
1195 static void buildAndsendSetupRequest(ReportingMessages_t &message,
1196                                      RmrMessagesBuffer_t &rmrMessageBuffer,
1197                                      E2AP_PDU_t *pdu,
1198                                      vector<string> &repValues) {
1199     auto logLevel = mdclog_level_get();
1200
1201     // now we can send the data to e2Mgr
1202     auto buffer_size = RECEIVE_SCTP_BUFFER_SIZE * 2;
1203
1204     auto *rmrMsg = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, buffer_size);
1205     // add addrees to message
1206
1207
1208     // unsigned char *buffer = &rmrMsg->payload[j];
1209     unsigned char buffer[RECEIVE_SCTP_BUFFER_SIZE * 2];
1210     // encode to xml
1211     auto er = asn_encode_to_buffer(nullptr, ATS_BASIC_XER, &asn_DEF_E2AP_PDU, pdu, buffer, buffer_size);
1212     if (er.encoded == -1) {
1213         mdclog_write(MDCLOG_ERR, "encoding of %s failed, %s", asn_DEF_E2AP_PDU.name, strerror(errno));
1214     } else if (er.encoded > (ssize_t) buffer_size) {
1215         mdclog_write(MDCLOG_ERR, "Buffer of size %d is to small for %s, at %s line %d",
1216                      (int) buffer_size,
1217                      asn_DEF_E2AP_PDU.name, __func__, __LINE__);
1218     } else {
1219         string messageType("E2setupRequest");
1220         string ieName("E2setupRequestIEs");
1221         buildXmlData(messageType, ieName, repValues, buffer);
1222 //        string xmlStr = (char *)buffer;
1223 //        auto removeSpaces = [] (string str) -> string {
1224 //            str.erase(remove(str.begin(), str.end(), ' '), str.end());
1225 //            str.erase(remove(str.begin(), str.end(), '\t'), str.end());
1226 //            return str;
1227 //        };
1228 //
1229 //        xmlStr = removeSpaces(xmlStr);
1230 //        // we have the XML
1231 //        rmrMsg->len = snprintf((char *)rmrMsg->payload, RECEIVE_SCTP_BUFFER_SIZE * 2, "%s:%d|%s",
1232 //                               message.peerInfo->sctpParams->myIP.c_str(),
1233 //                               message.peerInfo->sctpParams->rmrPort,
1234 //                               xmlStr.c_str());
1235         rmrMsg->len = snprintf((char *)rmrMsg->payload, RECEIVE_SCTP_BUFFER_SIZE * 2, "%s:%d|%s",
1236                                message.peerInfo->sctpParams->myIP.c_str(),
1237                                message.peerInfo->sctpParams->rmrPort,
1238                                buffer);
1239         if (logLevel >= MDCLOG_DEBUG) {
1240             mdclog_write(MDCLOG_DEBUG, "Setup request of size %d :\n %s\n", rmrMsg->len, rmrMsg->payload);
1241         }
1242         // send to RMR
1243         message.message.messageType = rmrMsg->mtype = RIC_E2_SETUP_REQ;
1244         rmrMsg->state = 0;
1245         rmr_bytes2meid(rmrMsg, (unsigned char *) message.message.enodbName, strlen(message.message.enodbName));
1246
1247         static unsigned char tx[32];
1248         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1249         rmr_bytes2xact(rmrMsg, tx, strlen((const char *) tx));
1250
1251         rmrMsg = rmr_send_msg(rmrMessageBuffer.rmrCtx, rmrMsg);
1252         if (rmrMsg == nullptr) {
1253             mdclog_write(MDCLOG_ERR, "RMR failed to send returned nullptr");
1254         } else if (rmrMsg->state != 0) {
1255             char meid[RMR_MAX_MEID]{};
1256             if (rmrMsg->state == RMR_ERR_RETRY) {
1257                 usleep(5);
1258                 rmrMsg->state = 0;
1259                 mdclog_write(MDCLOG_INFO, "RETRY sending Message %d to Xapp from %s",
1260                              rmrMsg->mtype, rmr_get_meid(rmrMsg, (unsigned char *) meid));
1261                 rmrMsg = rmr_send_msg(rmrMessageBuffer.rmrCtx, rmrMsg);
1262                 if (rmrMsg == nullptr) {
1263                     mdclog_write(MDCLOG_ERR, "RMR failed send returned nullptr");
1264                 } else if (rmrMsg->state != 0) {
1265                     mdclog_write(MDCLOG_ERR,
1266                                  "RMR Retry failed %s sending request %d to Xapp from %s",
1267                                  translateRmrErrorMessages(rmrMsg->state).c_str(),
1268                                  rmrMsg->mtype,
1269                                  rmr_get_meid(rmrMsg, (unsigned char *) meid));
1270                 }
1271             } else {
1272                 mdclog_write(MDCLOG_ERR, "RMR failed: %s. sending request %d to Xapp from %s",
1273                              translateRmrErrorMessages(rmrMsg->state).c_str(),
1274                              rmrMsg->mtype,
1275                              rmr_get_meid(rmrMsg, (unsigned char *) meid));
1276             }
1277         }
1278         message.peerInfo->gotSetup = true;
1279         buildJsonMessage(message);
1280         if (rmrMsg != nullptr) {
1281             rmr_free_msg(rmrMsg);
1282         }
1283     }
1284
1285 }
1286
1287 int RAN_Function_list_To_Vector(RANfunctions_List_t& list, vector <string> &runFunXML_v) {
1288     auto index = 0;
1289     runFunXML_v.clear();
1290     for (auto j = 0; j < list.list.count; j++) {
1291         auto *raNfunctionItemIEs = (RANfunction_ItemIEs_t *)list.list.array[j];
1292         if (raNfunctionItemIEs->id == ProtocolIE_ID_id_RANfunction_Item &&
1293             (raNfunctionItemIEs->value.present == RANfunction_ItemIEs__value_PR_RANfunction_Item)) {
1294             // encode to xml
1295             E2SM_gNB_NRT_RANfunction_Definition_t *ranFunDef = nullptr;
1296             auto rval = asn_decode(nullptr, ATS_ALIGNED_BASIC_PER,
1297                                    &asn_DEF_E2SM_gNB_NRT_RANfunction_Definition,
1298                                    (void **)&ranFunDef,
1299                                    raNfunctionItemIEs->value.choice.RANfunction_Item.ranFunctionDefinition.buf,
1300                                    raNfunctionItemIEs->value.choice.RANfunction_Item.ranFunctionDefinition.size);
1301             if (rval.code != RC_OK) {
1302                 mdclog_write(MDCLOG_ERR, "Error %d Decoding (unpack) E2SM message from : %s",
1303                              rval.code,
1304                              asn_DEF_E2SM_gNB_NRT_RANfunction_Definition.name);
1305                 return -1;
1306             }
1307
1308 //                        if (mdclog_level_get() >= MDCLOG_DEBUG) {
1309 //                            char *printBuffer;
1310 //                            size_t size;
1311 //                            FILE *stream = open_memstream(&printBuffer, &size);
1312 //                            asn_fprint(stream, &asn_DEF_E2SM_gNB_NRT_RANfunction_Definition, ranFunDef);
1313 //                            mdclog_write(MDCLOG_DEBUG, "Encoding E2SM %s PDU past : %s",
1314 //                                         asn_DEF_E2SM_gNB_NRT_RANfunction_Definition.name,
1315 //                                         printBuffer);
1316 //                        }
1317             auto xml_buffer_size = RECEIVE_SCTP_BUFFER_SIZE * 2;
1318             unsigned char xml_buffer[RECEIVE_SCTP_BUFFER_SIZE * 2];
1319             // encode to xml
1320             auto er = asn_encode_to_buffer(nullptr,
1321                                            ATS_BASIC_XER,
1322                                            &asn_DEF_E2SM_gNB_NRT_RANfunction_Definition,
1323                                            ranFunDef,
1324                                            xml_buffer,
1325                                            xml_buffer_size);
1326             if (er.encoded == -1) {
1327                 mdclog_write(MDCLOG_ERR, "encoding of %s failed, %s",
1328                              asn_DEF_E2SM_gNB_NRT_RANfunction_Definition.name,
1329                              strerror(errno));
1330             } else if (er.encoded > (ssize_t)xml_buffer_size) {
1331                 mdclog_write(MDCLOG_ERR, "Buffer of size %d is to small for %s, at %s line %d",
1332                              (int) xml_buffer_size,
1333                              asn_DEF_E2SM_gNB_NRT_RANfunction_Definition.name, __func__, __LINE__);
1334             } else {
1335                 if (mdclog_level_get() >= MDCLOG_DEBUG) {
1336                     mdclog_write(MDCLOG_DEBUG, "Encoding E2SM %s PDU number %d : %s",
1337                                  asn_DEF_E2SM_gNB_NRT_RANfunction_Definition.name,
1338                                  index++,
1339                                  xml_buffer);
1340                 }
1341                 string runFuncs = (char *)(xml_buffer);
1342                 runFunXML_v.emplace_back(runFuncs);
1343             }
1344         }
1345     }
1346     return 0;
1347 }
1348
1349
1350
1351 int collectSetupRequestData(E2AP_PDU_t *pdu,
1352                             Sctp_Map_t *sctpMap,
1353                             ReportingMessages_t &message,
1354                             vector <string> &runFunDEFXML_v) {
1355     memset(message.peerInfo->enodbName, 0 , MAX_ENODB_NAME_SIZE);
1356     for (auto i = 0; i < pdu->choice.initiatingMessage->value.choice.E2setupRequest.protocolIEs.list.count; i++) {
1357         auto *ie = pdu->choice.initiatingMessage->value.choice.E2setupRequest.protocolIEs.list.array[i];
1358         if (ie->id == ProtocolIE_ID_id_GlobalE2node_ID) {
1359             // get the ran name for meid
1360             if (ie->value.present == E2setupRequestIEs__value_PR_GlobalE2node_ID) {
1361                 if (buildRanName(message.peerInfo->enodbName, ie) < 0) {
1362                     mdclog_write(MDCLOG_ERR, "Bad param in E2setupRequestIEs GlobalE2node_ID.\n");
1363                     // no mesage will be sent
1364                     return -1;
1365                 }
1366                 memcpy(message.message.enodbName, message.peerInfo->enodbName, strlen(message.peerInfo->enodbName));
1367                 sctpMap->setkey(message.message.enodbName, message.peerInfo);
1368             }
1369         }
1370         // reformat RANFUNCTION Definition to XML
1371         if (ie->id == ProtocolIE_ID_id_RANfunctionsAdded) {
1372             if (ie->value.present == E2setupRequestIEs__value_PR_RANfunctions_List) {
1373                 if (mdclog_level_get() >= MDCLOG_DEBUG) {
1374                     mdclog_write(MDCLOG_DEBUG, "Run function list have %d entries",
1375                                  ie->value.choice.RANfunctions_List.list.count);
1376                 }
1377                 if (RAN_Function_list_To_Vector(ie->value.choice.RANfunctions_List, runFunDEFXML_v) != 0 ) {
1378                     return -1;
1379                 }
1380             }
1381         }
1382     }
1383     if (mdclog_level_get() >= MDCLOG_DEBUG) {
1384         mdclog_write(MDCLOG_DEBUG, "Run function vector have %ld entries",
1385                      runFunDEFXML_v.size());
1386     }
1387     return 0;
1388 }
1389 /**
1390  *
1391  * @param pdu
1392  * @param message
1393  * @param rmrMessageBuffer
1394  */
1395 void asnInitiatingRequest(E2AP_PDU_t *pdu,
1396                           Sctp_Map_t *sctpMap,
1397                           ReportingMessages_t &message,
1398                           RmrMessagesBuffer_t &rmrMessageBuffer) {
1399     auto logLevel = mdclog_level_get();
1400     auto procedureCode = ((InitiatingMessage_t *) pdu->choice.initiatingMessage)->procedureCode;
1401     if (logLevel >= MDCLOG_DEBUG) {
1402         mdclog_write(MDCLOG_DEBUG, "Initiating message %ld\n", procedureCode);
1403     }
1404     switch (procedureCode) {
1405         case ProcedureCode_id_E2setup: {
1406             if (logLevel >= MDCLOG_DEBUG) {
1407                 mdclog_write(MDCLOG_DEBUG, "Got E2setup");
1408             }
1409
1410             // first get the message as XML buffer
1411             auto setup_xml_buffer_size = RECEIVE_SCTP_BUFFER_SIZE * 2;
1412             unsigned char setup_xml_buffer[RECEIVE_SCTP_BUFFER_SIZE * 2];
1413
1414             auto er = asn_encode_to_buffer(nullptr, ATS_BASIC_XER, &asn_DEF_E2AP_PDU, pdu, setup_xml_buffer, setup_xml_buffer_size);
1415             if (er.encoded == -1) {
1416                 mdclog_write(MDCLOG_ERR, "encoding of %s failed, %s", asn_DEF_E2AP_PDU.name, strerror(errno));
1417                 break;
1418             } else if (er.encoded > (ssize_t) setup_xml_buffer_size) {
1419                 mdclog_write(MDCLOG_ERR, "Buffer of size %d is to small for %s, at %s line %d",
1420                              (int)setup_xml_buffer_size,
1421                              asn_DEF_E2AP_PDU.name, __func__, __LINE__);
1422                 break;
1423             }
1424             std::string xmlString(setup_xml_buffer_size,  setup_xml_buffer_size + er.encoded);
1425
1426             vector <string> runFunDEFXML_v;
1427             runFunDEFXML_v.clear();
1428             if (collectSetupRequestData(pdu, sctpMap,  message, runFunDEFXML_v) != 0) {
1429                 break;
1430             }
1431
1432             buildAndsendSetupRequest(message, rmrMessageBuffer, pdu, runFunDEFXML_v);
1433             break;
1434         }
1435         case ProcedureCode_id_RICserviceUpdate: {
1436             if (logLevel >= MDCLOG_DEBUG) {
1437                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceUpdate %s", message.message.enodbName);
1438             }
1439             if (sendRequestToXapp(message, RIC_SERVICE_UPDATE, rmrMessageBuffer) != 0) {
1440                 mdclog_write(MDCLOG_ERR, "RIC_SERVICE_UPDATE message failed to send to xAPP");
1441             }
1442             break;
1443         }
1444         case ProcedureCode_id_ErrorIndication: {
1445             if (logLevel >= MDCLOG_DEBUG) {
1446                 mdclog_write(MDCLOG_DEBUG, "Got ErrorIndication %s", message.message.enodbName);
1447             }
1448             if (sendRequestToXapp(message, RIC_ERROR_INDICATION, rmrMessageBuffer) != 0) {
1449                 mdclog_write(MDCLOG_ERR, "RIC_ERROR_INDICATION failed to send to xAPP");
1450             }
1451             break;
1452         }
1453         case ProcedureCode_id_Reset: {
1454             if (logLevel >= MDCLOG_DEBUG) {
1455                 mdclog_write(MDCLOG_DEBUG, "Got Reset %s", message.message.enodbName);
1456             }
1457             if (sendRequestToXapp(message, RIC_X2_RESET, rmrMessageBuffer) != 0) {
1458                 mdclog_write(MDCLOG_ERR, "RIC_X2_RESET message failed to send to xAPP");
1459             }
1460             break;
1461         }
1462         case ProcedureCode_id_RICcontrol: {
1463             if (logLevel >= MDCLOG_DEBUG) {
1464                 mdclog_write(MDCLOG_DEBUG, "Got RICcontrol %s", message.message.enodbName);
1465             }
1466             break;
1467         }
1468         case ProcedureCode_id_RICindication: {
1469             if (logLevel >= MDCLOG_DEBUG) {
1470                 mdclog_write(MDCLOG_DEBUG, "Got RICindication %s", message.message.enodbName);
1471             }
1472             for (auto i = 0; i < pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.count; i++) {
1473                 auto messageSent = false;
1474                 RICindication_IEs_t *ie = pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.array[i];
1475                 if (logLevel >= MDCLOG_DEBUG) {
1476                     mdclog_write(MDCLOG_DEBUG, "ie type (ProtocolIE_ID) = %ld", ie->id);
1477                 }
1478                 if (ie->id == ProtocolIE_ID_id_RICrequestID) {
1479                     if (logLevel >= MDCLOG_DEBUG) {
1480                         mdclog_write(MDCLOG_DEBUG, "Got RIC requestId entry, ie type (ProtocolIE_ID) = %ld", ie->id);
1481                     }
1482                     if (ie->value.present == RICindication_IEs__value_PR_RICrequestID) {
1483                         static unsigned char tx[32];
1484                         message.message.messageType = rmrMessageBuffer.sendMessage->mtype = RIC_INDICATION;
1485                         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1486                         rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, strlen((const char *) tx));
1487                         rmr_bytes2meid(rmrMessageBuffer.sendMessage,
1488                                        (unsigned char *)message.message.enodbName,
1489                                        strlen(message.message.enodbName));
1490                         rmrMessageBuffer.sendMessage->state = 0;
1491                         rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricInstanceID;
1492
1493                         //ie->value.choice.RICrequestID.ricInstanceID;
1494                         if (mdclog_level_get() >= MDCLOG_DEBUG) {
1495                             mdclog_write(MDCLOG_DEBUG, "sub id = %d, mtype = %d, ric instance id %ld, requestor id = %ld",
1496                                          rmrMessageBuffer.sendMessage->sub_id,
1497                                          rmrMessageBuffer.sendMessage->mtype,
1498                                          ie->value.choice.RICrequestID.ricInstanceID,
1499                                          ie->value.choice.RICrequestID.ricRequestorID);
1500                         }
1501                         sendRmrMessage(rmrMessageBuffer, message);
1502                         messageSent = true;
1503                     } else {
1504                         mdclog_write(MDCLOG_ERR, "RIC request id missing illigal request");
1505                     }
1506                 }
1507                 if (messageSent) {
1508                     break;
1509                 }
1510             }
1511             break;
1512         }
1513         case ProcedureCode_id_RICserviceQuery: {
1514             if (logLevel >= MDCLOG_DEBUG) {
1515                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceQuery %s", message.message.enodbName);
1516             }
1517             break;
1518         }
1519         case ProcedureCode_id_RICsubscription: {
1520             if (logLevel >= MDCLOG_DEBUG) {
1521                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscription %s", message.message.enodbName);
1522             }
1523             break;
1524         }
1525         case ProcedureCode_id_RICsubscriptionDelete: {
1526             if (logLevel >= MDCLOG_DEBUG) {
1527                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscriptionDelete %s", message.message.enodbName);
1528             }
1529             break;
1530         }
1531         default: {
1532             mdclog_write(MDCLOG_ERR, "Undefined or not supported message = %ld", procedureCode);
1533             message.message.messageType = 0; // no RMR message type yet
1534
1535             buildJsonMessage(message);
1536
1537             break;
1538         }
1539     }
1540 }
1541
1542 /**
1543  *
1544  * @param pdu
1545  * @param message
1546  * @param rmrMessageBuffer
1547  */
1548 void asnSuccsesfulMsg(E2AP_PDU_t *pdu,
1549                       Sctp_Map_t *sctpMap,
1550                       ReportingMessages_t &message,
1551                       RmrMessagesBuffer_t &rmrMessageBuffer) {
1552     auto procedureCode = pdu->choice.successfulOutcome->procedureCode;
1553     auto logLevel = mdclog_level_get();
1554     if (logLevel >= MDCLOG_INFO) {
1555         mdclog_write(MDCLOG_INFO, "Successful Outcome %ld", procedureCode);
1556     }
1557     switch (procedureCode) {
1558         case ProcedureCode_id_E2setup: {
1559             if (logLevel >= MDCLOG_DEBUG) {
1560                 mdclog_write(MDCLOG_DEBUG, "Got E2setup\n");
1561             }
1562             break;
1563         }
1564         case ProcedureCode_id_ErrorIndication: {
1565             if (logLevel >= MDCLOG_DEBUG) {
1566                 mdclog_write(MDCLOG_DEBUG, "Got ErrorIndication %s", message.message.enodbName);
1567             }
1568             if (sendRequestToXapp(message, RIC_ERROR_INDICATION, rmrMessageBuffer) != 0) {
1569                 mdclog_write(MDCLOG_ERR, "RIC_ERROR_INDICATION failed to send to xAPP");
1570             }
1571             break;
1572         }
1573         case ProcedureCode_id_Reset: {
1574             if (logLevel >= MDCLOG_DEBUG) {
1575                 mdclog_write(MDCLOG_DEBUG, "Got Reset %s", message.message.enodbName);
1576             }
1577             if (sendRequestToXapp(message, RIC_X2_RESET, rmrMessageBuffer) != 0) {
1578                 mdclog_write(MDCLOG_ERR, "RIC_X2_RESET message failed to send to xAPP");
1579             }
1580             break;
1581         }
1582         case ProcedureCode_id_RICcontrol: {
1583             if (logLevel >= MDCLOG_DEBUG) {
1584                 mdclog_write(MDCLOG_DEBUG, "Got RICcontrol %s", message.message.enodbName);
1585             }
1586             for (auto i = 0;
1587                  i < pdu->choice.successfulOutcome->value.choice.RICcontrolAcknowledge.protocolIEs.list.count; i++) {
1588                 auto messageSent = false;
1589                 RICcontrolAcknowledge_IEs_t *ie = pdu->choice.successfulOutcome->value.choice.RICcontrolAcknowledge.protocolIEs.list.array[i];
1590                 if (mdclog_level_get() >= MDCLOG_DEBUG) {
1591                     mdclog_write(MDCLOG_DEBUG, "ie type (ProtocolIE_ID) = %ld", ie->id);
1592                 }
1593                 if (ie->id == ProtocolIE_ID_id_RICrequestID) {
1594                     if (mdclog_level_get() >= MDCLOG_DEBUG) {
1595                         mdclog_write(MDCLOG_DEBUG, "Got RIC requestId entry, ie type (ProtocolIE_ID) = %ld", ie->id);
1596                     }
1597                     if (ie->value.present == RICcontrolAcknowledge_IEs__value_PR_RICrequestID) {
1598                         message.message.messageType = rmrMessageBuffer.sendMessage->mtype = RIC_CONTROL_ACK;
1599                         rmrMessageBuffer.sendMessage->state = 0;
1600 //                        rmrMessageBuffer.sendMessage->sub_id = (int) ie->value.choice.RICrequestID.ricRequestorID;
1601                         rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricInstanceID;
1602
1603                         static unsigned char tx[32];
1604                         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1605                         rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, strlen((const char *) tx));
1606                         rmr_bytes2meid(rmrMessageBuffer.sendMessage,
1607                                        (unsigned char *)message.message.enodbName,
1608                                        strlen(message.message.enodbName));
1609
1610                         sendRmrMessage(rmrMessageBuffer, message);
1611                         messageSent = true;
1612                     } else {
1613                         mdclog_write(MDCLOG_ERR, "RIC request id missing illigal request");
1614                     }
1615                 }
1616                 if (messageSent) {
1617                     break;
1618                 }
1619             }
1620
1621             break;
1622         }
1623         case ProcedureCode_id_RICindication: {
1624             if (logLevel >= MDCLOG_DEBUG) {
1625                 mdclog_write(MDCLOG_DEBUG, "Got RICindication %s", message.message.enodbName);
1626             }
1627             for (auto i = 0; i < pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.count; i++) {
1628                 auto messageSent = false;
1629                 RICindication_IEs_t *ie = pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.array[i];
1630                 if (logLevel >= MDCLOG_DEBUG) {
1631                     mdclog_write(MDCLOG_DEBUG, "ie type (ProtocolIE_ID) = %ld", ie->id);
1632                 }
1633                 if (ie->id == ProtocolIE_ID_id_RICrequestID) {
1634                     if (logLevel >= MDCLOG_DEBUG) {
1635                         mdclog_write(MDCLOG_DEBUG, "Got RIC requestId entry, ie type (ProtocolIE_ID) = %ld", ie->id);
1636                     }
1637                     if (ie->value.present == RICindication_IEs__value_PR_RICrequestID) {
1638                         static unsigned char tx[32];
1639                         message.message.messageType = rmrMessageBuffer.sendMessage->mtype = RIC_INDICATION;
1640                         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1641                         rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, strlen((const char *) tx));
1642                         rmr_bytes2meid(rmrMessageBuffer.sendMessage,
1643                                        (unsigned char *)message.message.enodbName,
1644                                        strlen(message.message.enodbName));
1645                         rmrMessageBuffer.sendMessage->state = 0;
1646 //                        rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricRequestorID;
1647                         rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricInstanceID;
1648                         if (mdclog_level_get() >= MDCLOG_DEBUG) {
1649                             mdclog_write(MDCLOG_DEBUG, "RIC sub id = %d, message type = %d",
1650                                          rmrMessageBuffer.sendMessage->sub_id,
1651                                          rmrMessageBuffer.sendMessage->mtype);
1652                         }
1653                         sendRmrMessage(rmrMessageBuffer, message);
1654                         messageSent = true;
1655                     } else {
1656                         mdclog_write(MDCLOG_ERR, "RIC request id missing illigal request");
1657                     }
1658                 }
1659                 if (messageSent) {
1660                     break;
1661                 }
1662             }
1663             break;
1664         }
1665         case ProcedureCode_id_RICserviceQuery: {
1666             if (logLevel >= MDCLOG_DEBUG) {
1667                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceQuery %s", message.message.enodbName);
1668             }
1669             break;
1670         }
1671         case ProcedureCode_id_RICserviceUpdate: {
1672             if (logLevel >= MDCLOG_DEBUG) {
1673                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceUpdate %s", message.message.enodbName);
1674             }
1675             if (sendRequestToXapp(message, RIC_SERVICE_UPDATE, rmrMessageBuffer) != 0) {
1676                 mdclog_write(MDCLOG_ERR, "RIC_SERVICE_UPDATE message failed to send to xAPP");
1677             }
1678             break;
1679         }
1680         case ProcedureCode_id_RICsubscription: {
1681             if (logLevel >= MDCLOG_DEBUG) {
1682                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscription %s", message.message.enodbName);
1683             }
1684             if (sendRequestToXapp(message, RIC_SUB_RESP, rmrMessageBuffer) != 0) {
1685                 mdclog_write(MDCLOG_ERR, "Subscription successful message failed to send to xAPP");
1686             }
1687             break;
1688         }
1689         case ProcedureCode_id_RICsubscriptionDelete: {
1690             if (logLevel >= MDCLOG_DEBUG) {
1691                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscriptionDelete %s", message.message.enodbName);
1692             }
1693             if (sendRequestToXapp(message, RIC_SUB_DEL_RESP, rmrMessageBuffer) != 0) {
1694                 mdclog_write(MDCLOG_ERR, "Subscription delete successful message failed to send to xAPP");
1695             }
1696             break;
1697         }
1698         default: {
1699             mdclog_write(MDCLOG_WARN, "Undefined or not supported message = %ld", procedureCode);
1700             message.message.messageType = 0; // no RMR message type yet
1701             buildJsonMessage(message);
1702
1703             break;
1704         }
1705     }
1706 }
1707
1708 /**
1709  *
1710  * @param pdu
1711  * @param message
1712  * @param rmrMessageBuffer
1713  */
1714 void asnUnSuccsesfulMsg(E2AP_PDU_t *pdu,
1715                         Sctp_Map_t *sctpMap,
1716                         ReportingMessages_t &message,
1717                         RmrMessagesBuffer_t &rmrMessageBuffer) {
1718     auto procedureCode = pdu->choice.unsuccessfulOutcome->procedureCode;
1719     auto logLevel = mdclog_level_get();
1720     if (logLevel >= MDCLOG_INFO) {
1721         mdclog_write(MDCLOG_INFO, "Unsuccessful Outcome %ld", procedureCode);
1722     }
1723     switch (procedureCode) {
1724         case ProcedureCode_id_E2setup: {
1725             if (logLevel >= MDCLOG_DEBUG) {
1726                 mdclog_write(MDCLOG_DEBUG, "Got E2setup\n");
1727             }
1728             break;
1729         }
1730         case ProcedureCode_id_ErrorIndication: {
1731             if (logLevel >= MDCLOG_DEBUG) {
1732                 mdclog_write(MDCLOG_DEBUG, "Got ErrorIndication %s", message.message.enodbName);
1733             }
1734             if (sendRequestToXapp(message, RIC_ERROR_INDICATION, rmrMessageBuffer) != 0) {
1735                 mdclog_write(MDCLOG_ERR, "RIC_ERROR_INDICATION failed to send to xAPP");
1736             }
1737             break;
1738         }
1739         case ProcedureCode_id_Reset: {
1740             if (logLevel >= MDCLOG_DEBUG) {
1741                 mdclog_write(MDCLOG_DEBUG, "Got Reset %s", message.message.enodbName);
1742             }
1743             if (sendRequestToXapp(message, RIC_X2_RESET, rmrMessageBuffer) != 0) {
1744                 mdclog_write(MDCLOG_ERR, "RIC_X2_RESET message failed to send to xAPP");
1745             }
1746             break;
1747         }
1748         case ProcedureCode_id_RICcontrol: {
1749             if (logLevel >= MDCLOG_DEBUG) {
1750                 mdclog_write(MDCLOG_DEBUG, "Got RICcontrol %s", message.message.enodbName);
1751             }
1752             for (int i = 0;
1753                  i < pdu->choice.unsuccessfulOutcome->value.choice.RICcontrolFailure.protocolIEs.list.count; i++) {
1754                 auto messageSent = false;
1755                 RICcontrolFailure_IEs_t *ie = pdu->choice.unsuccessfulOutcome->value.choice.RICcontrolFailure.protocolIEs.list.array[i];
1756                 if (logLevel >= MDCLOG_DEBUG) {
1757                     mdclog_write(MDCLOG_DEBUG, "ie type (ProtocolIE_ID) = %ld", ie->id);
1758                 }
1759                 if (ie->id == ProtocolIE_ID_id_RICrequestID) {
1760                     if (logLevel >= MDCLOG_DEBUG) {
1761                         mdclog_write(MDCLOG_DEBUG, "Got RIC requestId entry, ie type (ProtocolIE_ID) = %ld", ie->id);
1762                     }
1763                     if (ie->value.present == RICcontrolFailure_IEs__value_PR_RICrequestID) {
1764                         message.message.messageType = rmrMessageBuffer.sendMessage->mtype = RIC_CONTROL_FAILURE;
1765                         rmrMessageBuffer.sendMessage->state = 0;
1766 //                        rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricRequestorID;
1767                         rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricInstanceID;
1768                         static unsigned char tx[32];
1769                         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1770                         rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, strlen((const char *) tx));
1771                         rmr_bytes2meid(rmrMessageBuffer.sendMessage, (unsigned char *) message.message.enodbName,
1772                                        strlen(message.message.enodbName));
1773                         sendRmrMessage(rmrMessageBuffer, message);
1774                         messageSent = true;
1775                     } else {
1776                         mdclog_write(MDCLOG_ERR, "RIC request id missing illigal request");
1777                     }
1778                 }
1779                 if (messageSent) {
1780                     break;
1781                 }
1782             }
1783             break;
1784         }
1785         case ProcedureCode_id_RICindication: {
1786             if (logLevel >= MDCLOG_DEBUG) {
1787                 mdclog_write(MDCLOG_DEBUG, "Got RICindication %s", message.message.enodbName);
1788             }
1789             for (auto i = 0; i < pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.count; i++) {
1790                 auto messageSent = false;
1791                 RICindication_IEs_t *ie = pdu->choice.initiatingMessage->value.choice.RICindication.protocolIEs.list.array[i];
1792                 if (logLevel >= MDCLOG_DEBUG) {
1793                     mdclog_write(MDCLOG_DEBUG, "ie type (ProtocolIE_ID) = %ld", ie->id);
1794                 }
1795                 if (ie->id == ProtocolIE_ID_id_RICrequestID) {
1796                     if (logLevel >= MDCLOG_DEBUG) {
1797                         mdclog_write(MDCLOG_DEBUG, "Got RIC requestId entry, ie type (ProtocolIE_ID) = %ld", ie->id);
1798                     }
1799                     if (ie->value.present == RICindication_IEs__value_PR_RICrequestID) {
1800                         static unsigned char tx[32];
1801                         message.message.messageType = rmrMessageBuffer.sendMessage->mtype = RIC_INDICATION;
1802                         snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1803                         rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, strlen((const char *) tx));
1804                         rmr_bytes2meid(rmrMessageBuffer.sendMessage,
1805                                        (unsigned char *)message.message.enodbName,
1806                                        strlen(message.message.enodbName));
1807                         rmrMessageBuffer.sendMessage->state = 0;
1808 //                        rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricRequestorID;
1809                         rmrMessageBuffer.sendMessage->sub_id = (int)ie->value.choice.RICrequestID.ricInstanceID;
1810                         if (mdclog_level_get() >= MDCLOG_DEBUG) {
1811                             mdclog_write(MDCLOG_DEBUG, "RIC sub id = %d, message type = %d",
1812                                          rmrMessageBuffer.sendMessage->sub_id,
1813                                          rmrMessageBuffer.sendMessage->mtype);
1814                         }
1815                         sendRmrMessage(rmrMessageBuffer, message);
1816                         messageSent = true;
1817                     } else {
1818                         mdclog_write(MDCLOG_ERR, "RIC request id missing illigal request");
1819                     }
1820                 }
1821                 if (messageSent) {
1822                     break;
1823                 }
1824             }
1825             break;
1826         }
1827         case ProcedureCode_id_RICserviceQuery: {
1828             if (logLevel >= MDCLOG_DEBUG) {
1829                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceQuery %s", message.message.enodbName);
1830             }
1831             break;
1832         }
1833         case ProcedureCode_id_RICserviceUpdate: {
1834             if (logLevel >= MDCLOG_DEBUG) {
1835                 mdclog_write(MDCLOG_DEBUG, "Got RICserviceUpdate %s", message.message.enodbName);
1836             }
1837             if (sendRequestToXapp(message, RIC_SERVICE_UPDATE, rmrMessageBuffer) != 0) {
1838                 mdclog_write(MDCLOG_ERR, "RIC_SERVICE_UPDATE message failed to send to xAPP");
1839             }
1840             break;
1841         }
1842         case ProcedureCode_id_RICsubscription: {
1843             if (logLevel >= MDCLOG_DEBUG) {
1844                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscription %s", message.message.enodbName);
1845             }
1846             if (sendRequestToXapp(message, RIC_SUB_FAILURE, rmrMessageBuffer) != 0) {
1847                 mdclog_write(MDCLOG_ERR, "Subscription unsuccessful message failed to send to xAPP");
1848             }
1849             break;
1850         }
1851         case ProcedureCode_id_RICsubscriptionDelete: {
1852             if (logLevel >= MDCLOG_DEBUG) {
1853                 mdclog_write(MDCLOG_DEBUG, "Got RICsubscriptionDelete %s", message.message.enodbName);
1854             }
1855             if (sendRequestToXapp(message, RIC_SUB_DEL_FAILURE, rmrMessageBuffer) != 0) {
1856                 mdclog_write(MDCLOG_ERR, "Subscription Delete unsuccessful message failed to send to xAPP");
1857             }
1858             break;
1859         }
1860         default: {
1861             mdclog_write(MDCLOG_WARN, "Undefined or not supported message = %ld", procedureCode);
1862             message.message.messageType = 0; // no RMR message type yet
1863
1864             buildJsonMessage(message);
1865
1866             break;
1867         }
1868     }
1869 }
1870
1871 /**
1872  *
1873  * @param message
1874  * @param requestId
1875  * @param rmrMmessageBuffer
1876  * @return
1877  */
1878 int sendRequestToXapp(ReportingMessages_t &message,
1879                       int requestId,
1880                       RmrMessagesBuffer_t &rmrMmessageBuffer) {
1881     rmr_bytes2meid(rmrMmessageBuffer.sendMessage,
1882                    (unsigned char *)message.message.enodbName,
1883                    strlen(message.message.enodbName));
1884     message.message.messageType = rmrMmessageBuffer.sendMessage->mtype = requestId;
1885     rmrMmessageBuffer.sendMessage->state = 0;
1886     static unsigned char tx[32];
1887     snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
1888     rmr_bytes2xact(rmrMmessageBuffer.sendMessage, tx, strlen((const char *) tx));
1889
1890     auto rc = sendRmrMessage(rmrMmessageBuffer, message);
1891     return rc;
1892 }
1893
1894
1895 void getRmrContext(sctp_params_t &pSctpParams) {
1896     pSctpParams.rmrCtx = nullptr;
1897     pSctpParams.rmrCtx = rmr_init(pSctpParams.rmrAddress, RECEIVE_XAPP_BUFFER_SIZE, RMRFL_NONE);
1898     if (pSctpParams.rmrCtx == nullptr) {
1899         mdclog_write(MDCLOG_ERR, "Failed to initialize RMR");
1900         return;
1901     }
1902
1903     rmr_set_stimeout(pSctpParams.rmrCtx, 0);    // disable retries for any send operation
1904     // we need to find that routing table exist and we can run
1905     if (mdclog_level_get() >= MDCLOG_INFO) {
1906         mdclog_write(MDCLOG_INFO, "We are after RMR INIT wait for RMR_Ready");
1907     }
1908     int rmrReady = 0;
1909     int count = 0;
1910     while (!rmrReady) {
1911         if ((rmrReady = rmr_ready(pSctpParams.rmrCtx)) == 0) {
1912             sleep(1);
1913         }
1914         count++;
1915         if (count % 60 == 0) {
1916             mdclog_write(MDCLOG_INFO, "waiting to RMR ready state for %d seconds", count);
1917         }
1918     }
1919     if (mdclog_level_get() >= MDCLOG_INFO) {
1920         mdclog_write(MDCLOG_INFO, "RMR running");
1921     }
1922     rmr_init_trace(pSctpParams.rmrCtx, 200);
1923     // get the RMR fd for the epoll
1924     pSctpParams.rmrListenFd = rmr_get_rcvfd(pSctpParams.rmrCtx);
1925     struct epoll_event event{};
1926     // add RMR fd to epoll
1927     event.events = (EPOLLIN);
1928     event.data.fd = pSctpParams.rmrListenFd;
1929     // add listening RMR FD to epoll
1930     if (epoll_ctl(pSctpParams.epoll_fd, EPOLL_CTL_ADD, pSctpParams.rmrListenFd, &event)) {
1931         mdclog_write(MDCLOG_ERR, "Failed to add RMR descriptor to epoll");
1932         close(pSctpParams.rmrListenFd);
1933         rmr_close(pSctpParams.rmrCtx);
1934         pSctpParams.rmrCtx = nullptr;
1935     }
1936 }
1937
1938 int PER_FromXML(ReportingMessages_t &message, RmrMessagesBuffer_t &rmrMessageBuffer) {
1939     E2AP_PDU_t *pdu;
1940
1941     if (mdclog_level_get() >= MDCLOG_DEBUG) {
1942         mdclog_write(MDCLOG_DEBUG, "got xml setup response \n %s\n", rmrMessageBuffer.rcvMessage->payload);
1943     }
1944     auto rval = asn_decode(nullptr, ATS_BASIC_XER, &asn_DEF_E2AP_PDU, (void **) &pdu,
1945                            rmrMessageBuffer.rcvMessage->payload, rmrMessageBuffer.rcvMessage->len);
1946     if (rval.code != RC_OK) {
1947         mdclog_write(MDCLOG_ERR, "Error %d Decoding (unpack) setup response  from E2MGR : %s",
1948                      rval.code,
1949                      message.message.enodbName);
1950         return -1;
1951     }
1952
1953     int buff_size = RECEIVE_XAPP_BUFFER_SIZE;
1954     auto er = asn_encode_to_buffer(nullptr, ATS_ALIGNED_BASIC_PER, &asn_DEF_E2AP_PDU, pdu,
1955                                    rmrMessageBuffer.rcvMessage->payload, buff_size);
1956     if (er.encoded == -1) {
1957         mdclog_write(MDCLOG_ERR, "encoding of %s failed, %s", asn_DEF_E2AP_PDU.name, strerror(errno));
1958         return -1;
1959     } else if (er.encoded > (ssize_t)buff_size) {
1960         mdclog_write(MDCLOG_ERR, "Buffer of size %d is to small for %s, at %s line %d",
1961                      (int)rmrMessageBuffer.rcvMessage->len,
1962                      asn_DEF_E2AP_PDU.name,
1963                      __func__,
1964                      __LINE__);
1965         return -1;
1966     }
1967     rmrMessageBuffer.rcvMessage->len = er.encoded;
1968     return 0;
1969 }
1970
1971 /**
1972  *
1973  * @param sctpMap
1974  * @param rmrMessageBuffer
1975  * @param ts
1976  * @return
1977  */
1978 int receiveXappMessages(Sctp_Map_t *sctpMap,
1979                         RmrMessagesBuffer_t &rmrMessageBuffer,
1980                         struct timespec &ts) {
1981     if (rmrMessageBuffer.rcvMessage == nullptr) {
1982         //we have error
1983         mdclog_write(MDCLOG_ERR, "RMR Allocation message, %s", strerror(errno));
1984         return -1;
1985     }
1986
1987     if (mdclog_level_get() >= MDCLOG_DEBUG) {
1988         mdclog_write(MDCLOG_DEBUG, "Call to rmr_rcv_msg");
1989     }
1990     rmrMessageBuffer.rcvMessage = rmr_rcv_msg(rmrMessageBuffer.rmrCtx, rmrMessageBuffer.rcvMessage);
1991     if (rmrMessageBuffer.rcvMessage == nullptr) {
1992         mdclog_write(MDCLOG_ERR, "RMR Receving message with null pointer, Realloc rmr mesage buffer");
1993         rmrMessageBuffer.rcvMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
1994         return -2;
1995     }
1996     ReportingMessages_t message;
1997     message.message.direction = 'D';
1998     message.message.time.tv_nsec = ts.tv_nsec;
1999     message.message.time.tv_sec = ts.tv_sec;
2000
2001     // get message payload
2002     //auto msgData = msg->payload;
2003     if (rmrMessageBuffer.rcvMessage->state != 0) {
2004         mdclog_write(MDCLOG_ERR, "RMR Receving message with stat = %d", rmrMessageBuffer.rcvMessage->state);
2005         return -1;
2006     }
2007     rmr_get_meid(rmrMessageBuffer.rcvMessage, (unsigned char *)message.message.enodbName);
2008     switch (rmrMessageBuffer.rcvMessage->mtype) {
2009         case RIC_E2_SETUP_RESP : {
2010             if (PER_FromXML(message, rmrMessageBuffer) != 0) {
2011                 break;
2012             }
2013
2014             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2015                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_E2_SETUP_RESP");
2016                 return -6;
2017             }
2018             break;
2019         }
2020         case RIC_E2_SETUP_FAILURE : {
2021             if (PER_FromXML(message, rmrMessageBuffer) != 0) {
2022                 break;
2023             }
2024             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2025                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_E2_SETUP_FAILURE");
2026                 return -6;
2027             }
2028             break;
2029         }
2030         case RIC_ERROR_INDICATION: {
2031             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2032                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_ERROR_INDICATION");
2033                 return -6;
2034             }
2035             break;
2036         }
2037         case RIC_SUB_REQ: {
2038             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2039                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_SUB_REQ");
2040                 return -6;
2041             }
2042             break;
2043         }
2044         case RIC_SUB_DEL_REQ: {
2045             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2046                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_SUB_DEL_REQ");
2047                 return -6;
2048             }
2049             break;
2050         }
2051         case RIC_CONTROL_REQ: {
2052             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2053                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_CONTROL_REQ");
2054                 return -6;
2055             }
2056             break;
2057         }
2058         case RIC_SERVICE_QUERY: {
2059             if (PER_FromXML(message, rmrMessageBuffer) != 0) {
2060                 break;
2061             }
2062             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2063                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_SERVICE_QUERY");
2064                 return -6;
2065             }
2066             break;
2067         }
2068         case RIC_SERVICE_UPDATE_ACK: {
2069             if (PER_FromXML(message, rmrMessageBuffer) != 0) {
2070                 break;
2071             }
2072             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2073                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_SERVICE_UPDATE_ACK");
2074                 return -6;
2075             }
2076             break;
2077         }
2078         case RIC_SERVICE_UPDATE_FAILURE: {
2079             if (PER_FromXML(message, rmrMessageBuffer) != 0) {
2080                 break;
2081             }
2082             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2083                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_SERVICE_UPDATE_FAILURE");
2084                 return -6;
2085             }
2086             break;
2087         }
2088         case RIC_X2_RESET: {
2089             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2090                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_X2_RESET");
2091                 return -6;
2092             }
2093             break;
2094         }
2095         case RIC_X2_RESET_RESP: {
2096             if (sendDirectionalSctpMsg(rmrMessageBuffer, message, 0, sctpMap) != 0) {
2097                 mdclog_write(MDCLOG_ERR, "Failed to send RIC_X2_RESET_RESP");
2098                 return -6;
2099             }
2100             break;
2101         }
2102         case RIC_SCTP_CLEAR_ALL: {
2103             mdclog_write(MDCLOG_INFO, "RIC_SCTP_CLEAR_ALL");
2104             // loop on all keys and close socket and then erase all map.
2105             vector<char *> v;
2106             sctpMap->getKeys(v);
2107             for (auto const &iter : v) { //}; iter != sctpMap.end(); iter++) {
2108                 if (!boost::starts_with((string) (iter), "host:") && !boost::starts_with((string) (iter), "msg:")) {
2109                     auto *peerInfo = (ConnectedCU_t *) sctpMap->find(iter);
2110                     if (peerInfo == nullptr) {
2111                         continue;
2112                     }
2113                     close(peerInfo->fileDescriptor);
2114                     memcpy(message.message.enodbName, peerInfo->enodbName, sizeof(peerInfo->enodbName));
2115                     message.message.direction = 'D';
2116                     message.message.time.tv_nsec = ts.tv_nsec;
2117                     message.message.time.tv_sec = ts.tv_sec;
2118
2119                     message.message.asnLength = rmrMessageBuffer.sendMessage->len =
2120                             snprintf((char *)rmrMessageBuffer.sendMessage->payload,
2121                                      256,
2122                                      "%s|RIC_SCTP_CLEAR_ALL",
2123                                      peerInfo->enodbName);
2124                     message.message.asndata = rmrMessageBuffer.sendMessage->payload;
2125                     mdclog_write(MDCLOG_INFO, "%s", message.message.asndata);
2126                     if (sendRequestToXapp(message, RIC_SCTP_CONNECTION_FAILURE, rmrMessageBuffer) != 0) {
2127                         mdclog_write(MDCLOG_ERR, "SCTP_CONNECTION_FAIL message failed to send to xAPP");
2128                     }
2129                     free(peerInfo);
2130                 }
2131             }
2132
2133             sleep(1);
2134             sctpMap->clear();
2135             break;
2136         }
2137         case E2_TERM_KEEP_ALIVE_REQ: {
2138             // send message back
2139             rmr_bytes2payload(rmrMessageBuffer.sendMessage,
2140                               (unsigned char *)rmrMessageBuffer.ka_message,
2141                               rmrMessageBuffer.ka_message_len);
2142             rmrMessageBuffer.sendMessage->mtype = E2_TERM_KEEP_ALIVE_RESP;
2143             rmrMessageBuffer.sendMessage->state = 0;
2144             static unsigned char tx[32];
2145             auto txLen = snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
2146             rmr_bytes2xact(rmrMessageBuffer.sendMessage, tx, txLen);
2147             rmrMessageBuffer.sendMessage = rmr_send_msg(rmrMessageBuffer.rmrCtx, rmrMessageBuffer.sendMessage);
2148             if (rmrMessageBuffer.sendMessage == nullptr) {
2149                 rmrMessageBuffer.sendMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
2150                 mdclog_write(MDCLOG_ERR, "Failed to send E2_TERM_KEEP_ALIVE_RESP RMR message returned NULL");
2151             } else if (rmrMessageBuffer.sendMessage->state != 0)  {
2152                 mdclog_write(MDCLOG_ERR, "Failed to send E2_TERM_KEEP_ALIVE_RESP, on RMR state = %d ( %s)",
2153                              rmrMessageBuffer.sendMessage->state, translateRmrErrorMessages(rmrMessageBuffer.sendMessage->state).c_str());
2154             } else if (mdclog_level_get() >= MDCLOG_DEBUG) {
2155                 mdclog_write(MDCLOG_DEBUG, "Got Keep Alive Request send : %s", rmrMessageBuffer.ka_message);
2156             }
2157
2158             break;
2159         }
2160         default:
2161             mdclog_write(MDCLOG_WARN, "Message Type : %d is not seported", rmrMessageBuffer.rcvMessage->mtype);
2162             message.message.asndata = rmrMessageBuffer.rcvMessage->payload;
2163             message.message.asnLength = rmrMessageBuffer.rcvMessage->len;
2164             message.message.time.tv_nsec = ts.tv_nsec;
2165             message.message.time.tv_sec = ts.tv_sec;
2166             message.message.messageType = rmrMessageBuffer.rcvMessage->mtype;
2167
2168             buildJsonMessage(message);
2169
2170
2171             return -7;
2172     }
2173     if (mdclog_level_get() >= MDCLOG_DEBUG) {
2174         mdclog_write(MDCLOG_DEBUG, "EXIT OK from %s", __FUNCTION__);
2175     }
2176     return 0;
2177 }
2178
2179 /**
2180  * Send message to the CU that is not expecting for successful or unsuccessful results
2181  * @param messageBuffer
2182  * @param message
2183  * @param failedMsgId
2184  * @param sctpMap
2185  * @return
2186  */
2187 int sendDirectionalSctpMsg(RmrMessagesBuffer_t &messageBuffer,
2188                            ReportingMessages_t &message,
2189                            int failedMsgId,
2190                            Sctp_Map_t *sctpMap) {
2191
2192     getRequestMetaData(message, messageBuffer);
2193     if (mdclog_level_get() >= MDCLOG_INFO) {
2194         mdclog_write(MDCLOG_INFO, "send message to %s address", message.message.enodbName);
2195     }
2196
2197     auto rc = sendMessagetoCu(sctpMap, messageBuffer, message, failedMsgId);
2198     return rc;
2199 }
2200
2201 /**
2202  *
2203  * @param sctpMap
2204  * @param messageBuffer
2205  * @param message
2206  * @param failedMesgId
2207  * @return
2208  */
2209 int sendMessagetoCu(Sctp_Map_t *sctpMap,
2210                     RmrMessagesBuffer_t &messageBuffer,
2211                     ReportingMessages_t &message,
2212                     int failedMesgId) {
2213     auto *peerInfo = (ConnectedCU_t *) sctpMap->find(message.message.enodbName);
2214     if (peerInfo == nullptr) {
2215         if (failedMesgId != 0) {
2216             sendFailedSendingMessagetoXapp(messageBuffer, message, failedMesgId);
2217         } else {
2218             mdclog_write(MDCLOG_ERR, "Failed to send message no CU entry %s", message.message.enodbName);
2219         }
2220         return -1;
2221     }
2222
2223     // get the FD
2224     message.message.messageType = messageBuffer.rcvMessage->mtype;
2225     auto rc = sendSctpMsg(peerInfo, message, sctpMap);
2226     return rc;
2227 }
2228
2229 /**
2230  *
2231  * @param rmrCtx the rmr context to send and receive
2232  * @param msg the msg we got fromxApp
2233  * @param metaData data from xApp in ordered struct
2234  * @param failedMesgId the return message type error
2235  */
2236 void
2237 sendFailedSendingMessagetoXapp(RmrMessagesBuffer_t &rmrMessageBuffer, ReportingMessages_t &message, int failedMesgId) {
2238     rmr_mbuf_t *msg = rmrMessageBuffer.sendMessage;
2239     msg->len = snprintf((char *) msg->payload, 200, "the gNb/eNode name %s not found",
2240                         message.message.enodbName);
2241     if (mdclog_level_get() >= MDCLOG_INFO) {
2242         mdclog_write(MDCLOG_INFO, "%s", msg->payload);
2243     }
2244     msg->mtype = failedMesgId;
2245     msg->state = 0;
2246
2247     static unsigned char tx[32];
2248     snprintf((char *) tx, sizeof tx, "%15ld", transactionCounter++);
2249     rmr_bytes2xact(msg, tx, strlen((const char *) tx));
2250
2251     sendRmrMessage(rmrMessageBuffer, message);
2252 }
2253
2254
2255
2256 /**
2257  *
2258  * @param epoll_fd
2259  * @param peerInfo
2260  * @param events
2261  * @param sctpMap
2262  * @param enodbName
2263  * @param msgType
2264  * @return
2265  */
2266 int addToEpoll(int epoll_fd,
2267                ConnectedCU_t *peerInfo,
2268                uint32_t events,
2269                Sctp_Map_t *sctpMap,
2270                char *enodbName,
2271                int msgType) {
2272     // Add to Epol
2273     struct epoll_event event{};
2274     event.data.ptr = peerInfo;
2275     event.events = events;
2276     if (epoll_ctl(epoll_fd, EPOLL_CTL_ADD, peerInfo->fileDescriptor, &event) < 0) {
2277         if (mdclog_level_get() >= MDCLOG_DEBUG) {
2278             mdclog_write(MDCLOG_DEBUG, "epoll_ctl EPOLL_CTL_ADD (may chack not to quit here), %s, %s %d",
2279                          strerror(errno), __func__, __LINE__);
2280         }
2281         close(peerInfo->fileDescriptor);
2282         if (enodbName != nullptr) {
2283             cleanHashEntry(peerInfo, sctpMap);
2284             char key[MAX_ENODB_NAME_SIZE * 2];
2285             snprintf(key, MAX_ENODB_NAME_SIZE * 2, "msg:%s|%d", enodbName, msgType);
2286             if (mdclog_level_get() >= MDCLOG_DEBUG) {
2287                 mdclog_write(MDCLOG_DEBUG, "remove key = %s from %s at line %d", key, __FUNCTION__, __LINE__);
2288             }
2289             auto tmp = sctpMap->find(key);
2290             if (tmp) {
2291                 free(tmp);
2292                 sctpMap->erase(key);
2293             }
2294         } else {
2295             peerInfo->enodbName[0] = 0;
2296         }
2297         mdclog_write(MDCLOG_ERR, "epoll_ctl EPOLL_CTL_ADD (may chack not to quit here)");
2298         return -1;
2299     }
2300     return 0;
2301 }
2302
2303 /**
2304  *
2305  * @param epoll_fd
2306  * @param peerInfo
2307  * @param events
2308  * @param sctpMap
2309  * @param enodbName
2310  * @param msgType
2311  * @return
2312  */
2313 int modifyToEpoll(int epoll_fd,
2314                   ConnectedCU_t *peerInfo,
2315                   uint32_t events,
2316                   Sctp_Map_t *sctpMap,
2317                   char *enodbName,
2318                   int msgType) {
2319     // Add to Epol
2320     struct epoll_event event{};
2321     event.data.ptr = peerInfo;
2322     event.events = events;
2323     if (epoll_ctl(epoll_fd, EPOLL_CTL_MOD, peerInfo->fileDescriptor, &event) < 0) {
2324         if (mdclog_level_get() >= MDCLOG_DEBUG) {
2325             mdclog_write(MDCLOG_DEBUG, "epoll_ctl EPOLL_CTL_MOD (may chack not to quit here), %s, %s %d",
2326                          strerror(errno), __func__, __LINE__);
2327         }
2328         close(peerInfo->fileDescriptor);
2329         cleanHashEntry(peerInfo, sctpMap);
2330         char key[MAX_ENODB_NAME_SIZE * 2];
2331         snprintf(key, MAX_ENODB_NAME_SIZE * 2, "msg:%s|%d", enodbName, msgType);
2332         if (mdclog_level_get() >= MDCLOG_DEBUG) {
2333             mdclog_write(MDCLOG_DEBUG, "remove key = %s from %s at line %d", key, __FUNCTION__, __LINE__);
2334         }
2335         auto tmp = sctpMap->find(key);
2336         if (tmp) {
2337             free(tmp);
2338         }
2339         sctpMap->erase(key);
2340         mdclog_write(MDCLOG_ERR, "epoll_ctl EPOLL_CTL_ADD (may chack not to quit here)");
2341         return -1;
2342     }
2343     return 0;
2344 }
2345
2346
2347 int sendRmrMessage(RmrMessagesBuffer_t &rmrMessageBuffer, ReportingMessages_t &message) {
2348     buildJsonMessage(message);
2349
2350     rmrMessageBuffer.sendMessage = rmr_send_msg(rmrMessageBuffer.rmrCtx, rmrMessageBuffer.sendMessage);
2351
2352     if (rmrMessageBuffer.sendMessage == nullptr) {
2353         rmrMessageBuffer.sendMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
2354         mdclog_write(MDCLOG_ERR, "RMR failed send message returned with NULL pointer");
2355         return -1;
2356     }
2357
2358     if (rmrMessageBuffer.sendMessage->state != 0) {
2359         char meid[RMR_MAX_MEID]{};
2360         if (rmrMessageBuffer.sendMessage->state == RMR_ERR_RETRY) {
2361             usleep(5);
2362             rmrMessageBuffer.sendMessage->state = 0;
2363             mdclog_write(MDCLOG_INFO, "RETRY sending Message type %d to Xapp from %s",
2364                          rmrMessageBuffer.sendMessage->mtype,
2365                          rmr_get_meid(rmrMessageBuffer.sendMessage, (unsigned char *)meid));
2366             rmrMessageBuffer.sendMessage = rmr_send_msg(rmrMessageBuffer.rmrCtx, rmrMessageBuffer.sendMessage);
2367             if (rmrMessageBuffer.sendMessage == nullptr) {
2368                 mdclog_write(MDCLOG_ERR, "RMR failed send message returned with NULL pointer");
2369                 rmrMessageBuffer.sendMessage = rmr_alloc_msg(rmrMessageBuffer.rmrCtx, RECEIVE_XAPP_BUFFER_SIZE);
2370                 return -1;
2371             } else if (rmrMessageBuffer.sendMessage->state != 0) {
2372                 mdclog_write(MDCLOG_ERR,
2373                              "Message state %s while sending request %d to Xapp from %s after retry of 10 microseconds",
2374                              translateRmrErrorMessages(rmrMessageBuffer.sendMessage->state).c_str(),
2375                              rmrMessageBuffer.sendMessage->mtype,
2376                              rmr_get_meid(rmrMessageBuffer.sendMessage, (unsigned char *)meid));
2377                 auto rc = rmrMessageBuffer.sendMessage->state;
2378                 return rc;
2379             }
2380         } else {
2381             mdclog_write(MDCLOG_ERR, "Message state %s while sending request %d to Xapp from %s",
2382                          translateRmrErrorMessages(rmrMessageBuffer.sendMessage->state).c_str(),
2383                          rmrMessageBuffer.sendMessage->mtype,
2384                          rmr_get_meid(rmrMessageBuffer.sendMessage, (unsigned char *)meid));
2385             return rmrMessageBuffer.sendMessage->state;
2386         }
2387     }
2388     return 0;
2389 }
2390
2391 void buildJsonMessage(ReportingMessages_t &message) {
2392     if (jsonTrace) {
2393         message.outLen = sizeof(message.base64Data);
2394         base64::encode((const unsigned char *) message.message.asndata,
2395                        (const int) message.message.asnLength,
2396                        message.base64Data,
2397                        message.outLen);
2398         if (mdclog_level_get() >= MDCLOG_DEBUG) {
2399             mdclog_write(MDCLOG_DEBUG, "Tracing: ASN length = %d, base64 message length = %d ",
2400                          (int) message.message.asnLength,
2401                          (int) message.outLen);
2402         }
2403
2404         snprintf(message.buffer, sizeof(message.buffer),
2405                  "{\"header\": {\"ts\": \"%ld.%09ld\","
2406                  "\"ranName\": \"%s\","
2407                  "\"messageType\": %d,"
2408                  "\"direction\": \"%c\"},"
2409                  "\"base64Length\": %d,"
2410                  "\"asnBase64\": \"%s\"}",
2411                  message.message.time.tv_sec,
2412                  message.message.time.tv_nsec,
2413                  message.message.enodbName,
2414                  message.message.messageType,
2415                  message.message.direction,
2416                  (int) message.outLen,
2417                  message.base64Data);
2418         static src::logger_mt &lg = my_logger::get();
2419
2420         BOOST_LOG(lg) << message.buffer;
2421     }
2422 }
2423
2424
2425 /**
2426  * take RMR error code to string
2427  * @param state
2428  * @return
2429  */
2430 string translateRmrErrorMessages(int state) {
2431     string str = {};
2432     switch (state) {
2433         case RMR_OK:
2434             str = "RMR_OK - state is good";
2435             break;
2436         case RMR_ERR_BADARG:
2437             str = "RMR_ERR_BADARG - argument passd to function was unusable";
2438             break;
2439         case RMR_ERR_NOENDPT:
2440             str = "RMR_ERR_NOENDPT - send//call could not find an endpoint based on msg type";
2441             break;
2442         case RMR_ERR_EMPTY:
2443             str = "RMR_ERR_EMPTY - msg received had no payload; attempt to send an empty message";
2444             break;
2445         case RMR_ERR_NOHDR:
2446             str = "RMR_ERR_NOHDR - message didn't contain a valid header";
2447             break;
2448         case RMR_ERR_SENDFAILED:
2449             str = "RMR_ERR_SENDFAILED - send failed; errno has nano reason";
2450             break;
2451         case RMR_ERR_CALLFAILED:
2452             str = "RMR_ERR_CALLFAILED - unable to send call() message";
2453             break;
2454         case RMR_ERR_NOWHOPEN:
2455             str = "RMR_ERR_NOWHOPEN - no wormholes are open";
2456             break;
2457         case RMR_ERR_WHID:
2458             str = "RMR_ERR_WHID - wormhole id was invalid";
2459             break;
2460         case RMR_ERR_OVERFLOW:
2461             str = "RMR_ERR_OVERFLOW - operation would have busted through a buffer/field size";
2462             break;
2463         case RMR_ERR_RETRY:
2464             str = "RMR_ERR_RETRY - request (send/call/rts) failed, but caller should retry (EAGAIN for wrappers)";
2465             break;
2466         case RMR_ERR_RCVFAILED:
2467             str = "RMR_ERR_RCVFAILED - receive failed (hard error)";
2468             break;
2469         case RMR_ERR_TIMEOUT:
2470             str = "RMR_ERR_TIMEOUT - message processing call timed out";
2471             break;
2472         case RMR_ERR_UNSET:
2473             str = "RMR_ERR_UNSET - the message hasn't been populated with a transport buffer";
2474             break;
2475         case RMR_ERR_TRUNC:
2476             str = "RMR_ERR_TRUNC - received message likely truncated";
2477             break;
2478         case RMR_ERR_INITFAILED:
2479             str = "RMR_ERR_INITFAILED - initialisation of something (probably message) failed";
2480             break;
2481         case RMR_ERR_NOTSUPP:
2482             str = "RMR_ERR_NOTSUPP - the request is not supported, or RMr was not initialised for the request";
2483             break;
2484         default:
2485             char buf[128]{};
2486             snprintf(buf, sizeof buf, "UNDOCUMENTED RMR_ERR : %d", state);
2487             str = buf;
2488             break;
2489     }
2490     return str;
2491 }
2492
2493