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