resource/csdk/connectivity/src/tcp_adapter/catcpserver.c

   1 /* ****************************************************************j
   2  *
   3  * Copyright 2015 Samsung Electronics All Rights Reserved.
   4  *
   5  *
   6  *
   7  * Licensed under the Apache License, Version 2.0 (the "License");
   8  * you may not use this file except in compliance with the License.
   9  * You may obtain a copy of the License at
  10  *
  11  *      http://www.apache.org/licenses/LICENSE-2.0
  12  *
  13  * Unless required by applicable law or agreed to in writing, software
  14  * distributed under the License is distributed on an "AS IS" BASIS,
  15  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  16  * See the License for the specific language governing permissions and
  17  * limitations under the License.
  18  *
  19  ******************************************************************/
  20
  21 #include <sys/types.h>
  22 #include <sys/socket.h>
  23 #include <sys/ioctl.h>
  24 #include <stdio.h>
  25 #include <unistd.h>
  26 #include <sys/types.h>
  27 #include <fcntl.h>
  28 #include <sys/select.h>
  29 #include <arpa/inet.h>
  30 #include <netinet/in.h>
  31 #include <net/if.h>
  32 #include <errno.h>
  33 #include <sys/poll.h>
  34
  35 #ifndef WITH_ARDUINO
  36 #include <sys/socket.h>
  37 #include <netinet/in.h>
  38 #include <netdb.h>
  39 #endif
  40
  41 #include "catcpinterface.h"
  42 #include "pdu.h"
  43 #include "caadapterutils.h"
  44 #include "camutex.h"
  45 #include "oic_malloc.h"
  46 #include "oic_string.h"
  47
  48 /**
  49  * Logging tag for module name.
  50  */
  51 #define TAG "OIC_CA_TCP_SERVER"
  52
  53 /**
  54  * Server port number for local test.
  55  */
  56 #define SERVER_PORT 8000
  57
  58 /**
  59  * Maximum CoAP over TCP header length
  60  * to know the total data length.
  61  */
  62 #define TCP_MAX_HEADER_LEN  6
  63
  64 /**
  65  * Accept server file descriptor.
  66  */
  67 static int g_acceptServerFD = -1;
  68
  69 /**
  70  * Mutex to synchronize device object list.
  71  */
  72 static ca_mutex g_mutexObjectList = NULL;
  73
  74 /**
  75  * Conditional mutex to synchronize.
  76  */
  77 static ca_cond g_condObjectList = NULL;
  78
  79 /**
  80  * Maintains the callback to be notified when data received from remote device.
  81  */
  82 static CATCPPacketReceivedCallback g_packetReceivedCallback;
  83
  84 /**
  85  * Error callback to update error in TCP.
  86  */
  87 static CATCPErrorHandleCallback g_TCPErrorHandler = NULL;
  88
  89 /**
  90  * Connected Callback to pass the connection information to RI.
  91  */
  92 static CATCPKeepAliveHandleCallback g_keepaliveCallback = NULL;
  93
  94 static CAResult_t CATCPCreateMutex();
  95 static void CATCPDestroyMutex();
  96 static CAResult_t CATCPCreateCond();
  97 static void CATCPDestroyCond();
  98 static CAResult_t CACreateAcceptSocket();
  99 static void CAAcceptConnection();
 100 static void CAFindReadyMessage();
 101 static void CASelectReturned(fd_set *readFds, int ret);
 102 static void CAReceiveMessage(int fd);
 103 static void CAReceiveHandler(void *data);
 104 static int CATCPCreateSocket(int family, CATCPSessionInfo_t *tcpServerInfo);
 105
 106 #define CHECKFD(FD) \
 107     if (FD > caglobals.tcp.maxfd) \
 108         caglobals.tcp.maxfd = FD;
 109
 110 static void CATCPDestroyMutex()
 111 {
 112     if (g_mutexObjectList)
 113     {
 114         ca_mutex_free(g_mutexObjectList);
 115         g_mutexObjectList = NULL;
 116     }
 117 }
 118
 119 static CAResult_t CATCPCreateMutex()
 120 {
 121     if (!g_mutexObjectList)
 122     {
 123         g_mutexObjectList = ca_mutex_new();
 124         if (!g_mutexObjectList)
 125         {
 126             OIC_LOG(ERROR, TAG, "Failed to created mutex!");
 127             return CA_STATUS_FAILED;
 128         }
 129     }
 130
 131     return CA_STATUS_OK;
 132 }
 133
 134 static void CATCPDestroyCond()
 135 {
 136     if (g_condObjectList)
 137     {
 138         ca_cond_free(g_condObjectList);
 139         g_condObjectList = NULL;
 140     }
 141 }
 142
 143 static CAResult_t CATCPCreateCond()
 144 {
 145     if (!g_condObjectList)
 146     {
 147         g_condObjectList = ca_cond_new();
 148         if (!g_condObjectList)
 149         {
 150             OIC_LOG(ERROR, TAG, "Failed to created cond!");
 151             return CA_STATUS_FAILED;
 152         }
 153     }
 154     return CA_STATUS_OK;
 155 }
 156
 157 static void CAReceiveHandler(void *data)
 158 {
 159     (void)data;
 160     OIC_LOG(DEBUG, TAG, "IN - CAReceiveHandler");
 161
 162     while (!caglobals.tcp.terminate)
 163     {
 164         CAFindReadyMessage();
 165     }
 166
 167     ca_mutex_lock(g_mutexObjectList);
 168     ca_cond_signal(g_condObjectList);
 169     ca_mutex_unlock(g_mutexObjectList);
 170
 171     OIC_LOG(DEBUG, TAG, "OUT - CAReceiveHandler");
 172 }
 173
 174 static void CAFindReadyMessage()
 175 {
 176     fd_set readFds;
 177     struct timeval timeout = { .tv_sec = caglobals.tcp.selectTimeout };
 178
 179     FD_ZERO(&readFds);
 180
 181     if (-1 != g_acceptServerFD)
 182     {
 183         FD_SET(g_acceptServerFD, &readFds);
 184     }
 185     if (-1 != caglobals.tcp.shutdownFds[0])
 186     {
 187         FD_SET(caglobals.tcp.shutdownFds[0], &readFds);
 188     }
 189
 190     uint32_t length = u_arraylist_length(caglobals.tcp.svrlist);
 191     for (size_t i = 0; i < length; i++)
 192     {
 193         CATCPSessionInfo_t *svritem =
 194                 (CATCPSessionInfo_t *) u_arraylist_get(caglobals.tcp.svrlist, i);
 195         if (svritem && 0 <= svritem->fd)
 196         {
 197             FD_SET(svritem->fd, &readFds);
 198         }
 199     }
 200
 201     int ret = select(caglobals.tcp.maxfd + 1, &readFds, NULL, NULL, &timeout);
 202
 203     if (caglobals.tcp.terminate)
 204     {
 205         OIC_LOG_V(DEBUG, TAG, "Packet receiver Stop request received.");
 206         return;
 207     }
 208     if (0 >= ret)
 209     {
 210         if (0 > ret)
 211         {
 212             OIC_LOG_V(FATAL, TAG, "select error %s", strerror(errno));
 213         }
 214         return;
 215     }
 216
 217     CASelectReturned(&readFds, ret);
 218 }
 219
 220 static void CASelectReturned(fd_set *readFds, int ret)
 221 {
 222     (void)ret;
 223
 224     if (g_acceptServerFD != -1 && FD_ISSET(g_acceptServerFD, readFds))
 225     {
 226         CAAcceptConnection();
 227         return;
 228     }
 229     else
 230     {
 231         uint32_t length = u_arraylist_length(caglobals.tcp.svrlist);
 232         for (size_t i = 0; i < length; i++)
 233         {
 234             CATCPSessionInfo_t *svritem =
 235                     (CATCPSessionInfo_t *) u_arraylist_get(caglobals.tcp.svrlist, i);
 236             if (svritem && svritem->fd >= 0)
 237             {
 238                 if (FD_ISSET(svritem->fd, readFds))
 239                 {
 240                     CAReceiveMessage(svritem->fd);
 241                     FD_CLR(svritem->fd, readFds);
 242                 }
 243             }
 244         }
 245     }
 246 }
 247
 248 static void CAAcceptConnection()
 249 {
 250     struct sockaddr_storage clientaddr;
 251     socklen_t clientlen = sizeof (struct sockaddr_in);
 252
 253     int sockfd = accept(g_acceptServerFD, (struct sockaddr *)&clientaddr,
 254                         &clientlen);
 255     if (-1 != sockfd)
 256     {
 257         CATCPSessionInfo_t *svritem =
 258                 (CATCPSessionInfo_t *) OICCalloc(1, sizeof (*svritem));
 259         if (!svritem)
 260         {
 261             OIC_LOG(ERROR, TAG, "Out of memory");
 262             close(sockfd);
 263             return;
 264         }
 265
 266         svritem->fd = sockfd;
 267         CAConvertAddrToName((struct sockaddr_storage *)&clientaddr, clientlen,
 268                             (char *) &svritem->sep.endpoint.addr, &svritem->sep.endpoint.port);
 269
 270         ca_mutex_lock(g_mutexObjectList);
 271         bool result = u_arraylist_add(caglobals.tcp.svrlist, svritem);
 272         if (!result)
 273         {
 274             OIC_LOG(ERROR, TAG, "u_arraylist_add failed.");
 275             close(sockfd);
 276             OICFree(svritem);
 277             ca_mutex_unlock(g_mutexObjectList);
 278             return;
 279         }
 280         ca_mutex_unlock(g_mutexObjectList);
 281
 282         CHECKFD(sockfd);
 283     }
 284 }
 285
 286 static void CAReceiveMessage(int fd)
 287 {
 288     // #1. get remote device information from file descriptor.
 289     size_t index = 0;
 290     CATCPSessionInfo_t *svritem = CAGetSessionInfoFromFD(fd, &index);
 291     if (!svritem)
 292     {
 293         OIC_LOG(ERROR, TAG, "there is no connection information in list");
 294         return;
 295     }
 296
 297     // #2. get already allocated memory size.
 298     size_t bufSize = (svritem->totalDataLen == 0) ? TCP_MAX_HEADER_LEN : svritem->totalDataLen;
 299     if (!svritem->recvData)
 300     {
 301         svritem->recvData = (unsigned char *) OICCalloc(1, bufSize);
 302         if (!svritem->recvData)
 303         {
 304             OIC_LOG(ERROR, TAG, "out of memory");
 305             CADisconnectTCPSession(svritem, index);
 306             return;
 307         }
 308     }
 309
 310     // #3. receive data from remote device.
 311     ssize_t recvLen = recv(fd, svritem->recvData + svritem->recvDataLen,
 312                            bufSize - svritem->recvDataLen, 0);
 313     if (recvLen <= 0)
 314     {
 315         if(EWOULDBLOCK != errno)
 316         {
 317             OIC_LOG_V(ERROR, TAG, "Recvfrom failed %s", strerror(errno));
 318             CADisconnectTCPSession(svritem, index);
 319         }
 320         return;
 321     }
 322     svritem->recvDataLen += recvLen;
 323
 324     // #4. get actual data length from coap over tcp header.
 325     if (!svritem->totalDataLen)
 326     {
 327         coap_transport_type transport = coap_get_tcp_header_type_from_initbyte(
 328                 ((unsigned char *) svritem->recvData)[0] >> 4);
 329
 330         size_t headerLen = coap_get_tcp_header_length_for_transport(transport);
 331         if (svritem->recvDataLen >= headerLen)
 332         {
 333             svritem->totalDataLen = CAGetTotalLengthFromHeader(
 334                     (unsigned char *) svritem->recvData);
 335             bufSize = svritem->totalDataLen;
 336             unsigned char *newBuf = OICRealloc(svritem->recvData, bufSize);
 337             if (!newBuf)
 338             {
 339                 OIC_LOG(ERROR, TAG, "out of memory");
 340                 CADisconnectTCPSession(svritem, index);
 341                 return;
 342             }
 343             svritem->recvData = newBuf;
 344         }
 345     }
 346
 347     // #5. pass the received data information to upper layer.
 348     if ((svritem->totalDataLen == svritem->recvDataLen) && g_packetReceivedCallback)
 349     {
 350         svritem->sep.endpoint.adapter = CA_ADAPTER_TCP;
 351         g_packetReceivedCallback(&svritem->sep, svritem->recvData, svritem->recvDataLen);
 352         OIC_LOG_V(DEBUG, TAG, "total received data len:%d", svritem->recvDataLen);
 353
 354         // initialize data info to receive next message.
 355         OICFree(svritem->recvData);
 356         svritem->recvData = NULL;
 357         svritem->recvDataLen = 0;
 358         svritem->totalDataLen = 0;
 359     }
 360
 361     return;
 362 }
 363
 364 static int CATCPCreateSocket(int family, CATCPSessionInfo_t *svritem)
 365 {
 366     // create tcp socket
 367     int fd = socket(family, SOCK_STREAM, IPPROTO_TCP);
 368     if (-1 == fd)
 369     {
 370         OIC_LOG_V(ERROR, TAG, "create socket failed: %s", strerror(errno));
 371         goto exit;
 372     }
 373
 374     struct sockaddr_storage sa = { .ss_family = family };
 375     CAConvertNameToAddr(svritem->sep.endpoint.addr, svritem->sep.endpoint.port, &sa);
 376     socklen_t socklen = sizeof (struct sockaddr_in);
 377
 378     // connect to TCP server
 379     int ret = connect(fd, (struct sockaddr *)&sa, socklen);
 380     if (0 == ret)
 381     {
 382         OIC_LOG(DEBUG, TAG, "connect socket success");
 383     }
 384     else if (EINPROGRESS == errno)
 385     {
 386         OIC_LOG(DEBUG, TAG, "EINPROGRESS");
 387         int error = 0;
 388         socklen_t len = sizeof(error);
 389         if (getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len) < 0)
 390         {
 391             OIC_LOG(ERROR, TAG, "getsockopt() error");
 392             goto exit;
 393         }
 394
 395         if (error)
 396         {
 397             if (ECONNREFUSED == error)
 398             {
 399                 OIC_LOG(ERROR, TAG, "connection refused");
 400                 goto exit;
 401             }
 402             OIC_LOG(ERROR, TAG, "failed to connect socket");
 403             goto exit;
 404         }
 405         OIC_LOG(DEBUG, TAG, "connect socket success");
 406     }
 407     else
 408     {
 409         OIC_LOG(ERROR, TAG, "failed to connect socket");
 410         goto exit;
 411     }
 412
 413     return fd;
 414
 415 exit:
 416     if (fd >= 0)
 417     {
 418         close(fd);
 419     }
 420     return -1;
 421 }
 422
 423 static CAResult_t CACreateAcceptSocket()
 424 {
 425     int reuse = 1;
 426     struct sockaddr_in server = { .sin_addr.s_addr = INADDR_ANY,
 427                                   .sin_family = AF_INET,
 428                                   .sin_port = htons(SERVER_PORT),
 429                                   .sin_zero = { 0 } };
 430
 431     g_acceptServerFD = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
 432     if (g_acceptServerFD < 0)
 433     {
 434         OIC_LOG(ERROR, TAG, "Failed to create socket");
 435         goto exit;
 436     }
 437
 438     if (-1 == setsockopt(g_acceptServerFD, SOL_SOCKET, SO_REUSEADDR, &reuse, sizeof(reuse)))
 439     {
 440         OIC_LOG(ERROR, TAG, "setsockopt SO_REUSEADDR");
 441         goto exit;
 442     }
 443
 444     int serverlen = sizeof(server);
 445     if (-1 == bind(g_acceptServerFD, (struct sockaddr *)&server, serverlen))
 446     {
 447         OIC_LOG(ERROR, TAG, "bind() error");
 448         goto exit;
 449     }
 450
 451     if (listen(g_acceptServerFD, caglobals.tcp.listenBacklog) != 0)
 452     {
 453         OIC_LOG(ERROR, TAG, "listen() error");
 454         goto exit;
 455     }
 456
 457     CHECKFD(g_acceptServerFD);
 458
 459     return CA_STATUS_OK;
 460
 461 exit:
 462     if (g_acceptServerFD >= 0)
 463     {
 464         close(g_acceptServerFD);
 465         g_acceptServerFD = -1;
 466     }
 467     return CA_STATUS_FAILED;
 468 }
 469
 470 static void CAInitializePipe()
 471 {
 472     int ret = pipe(caglobals.tcp.shutdownFds);
 473     if (-1 != ret)
 474     {
 475         ret = fcntl(caglobals.tcp.shutdownFds[0], F_GETFD);
 476         if (-1 != ret)
 477         {
 478             ret = fcntl(caglobals.tcp.shutdownFds[0], F_SETFD, ret|FD_CLOEXEC);
 479         }
 480         if (-1 != ret)
 481         {
 482             ret = fcntl(caglobals.tcp.shutdownFds[1], F_GETFD);
 483         }
 484         if (-1 != ret)
 485         {
 486             ret = fcntl(caglobals.tcp.shutdownFds[1], F_SETFD, ret|FD_CLOEXEC);
 487         }
 488         if (-1 == ret)
 489         {
 490             close(caglobals.tcp.shutdownFds[1]);
 491             close(caglobals.tcp.shutdownFds[0]);
 492
 493             caglobals.tcp.shutdownFds[0] = -1;
 494             caglobals.tcp.shutdownFds[1] = -1;
 495
 496             OIC_LOG_V(ERROR, TAG, "pipe failed: %s", strerror(errno));
 497         }
 498     }
 499 }
 500
 501 CAResult_t CATCPStartServer(const ca_thread_pool_t threadPool)
 502 {
 503     if (caglobals.tcp.started)
 504     {
 505         return CA_STATUS_OK;
 506     }
 507
 508     if (!caglobals.tcp.ipv4tcpenabled)
 509     {
 510         caglobals.tcp.ipv4tcpenabled = true;    // only needed to run CA tests
 511     }
 512
 513     CAResult_t res = CATCPCreateMutex();
 514     if (CA_STATUS_OK == res)
 515     {
 516         res = CATCPCreateCond();
 517     }
 518     if (CA_STATUS_OK != res)
 519     {
 520         OIC_LOG(ERROR, TAG, "failed to create mutex/cond");
 521         return res;
 522     }
 523
 524     ca_mutex_lock(g_mutexObjectList);
 525     if (!caglobals.tcp.svrlist)
 526     {
 527         caglobals.tcp.svrlist = u_arraylist_create();
 528     }
 529     ca_mutex_unlock(g_mutexObjectList);
 530
 531     res = CACreateAcceptSocket();
 532     if (CA_STATUS_OK != res)
 533     {
 534         OIC_LOG(ERROR, TAG, "failed to create accept socket");
 535         return res;
 536     }
 537
 538     // create pipe for fast shutdown
 539     CAInitializePipe();
 540     CHECKFD(caglobals.tcp.shutdownFds[0]);
 541     CHECKFD(caglobals.tcp.shutdownFds[1]);
 542
 543     caglobals.tcp.terminate = false;
 544     res = ca_thread_pool_add_task(threadPool, CAReceiveHandler, NULL);
 545     if (CA_STATUS_OK != res)
 546     {
 547         OIC_LOG(ERROR, TAG, "thread_pool_add_task failed");
 548         return res;
 549     }
 550     OIC_LOG(DEBUG, TAG, "CAReceiveHandler thread started successfully.");
 551
 552     caglobals.tcp.started = true;
 553     return CA_STATUS_OK;
 554 }
 555
 556 void CATCPStopServer()
 557 {
 558     // mutex lock
 559     ca_mutex_lock(g_mutexObjectList);
 560
 561     // set terminate flag
 562     caglobals.tcp.terminate = true;
 563
 564     if (caglobals.tcp.shutdownFds[1] != -1)
 565     {
 566         close(caglobals.tcp.shutdownFds[1]);
 567         // receive thread will stop immediately
 568     }
 569
 570     if (caglobals.tcp.started)
 571     {
 572         ca_cond_wait(g_condObjectList, g_mutexObjectList);
 573     }
 574     caglobals.tcp.started = false;
 575
 576     // mutex unlock
 577     ca_mutex_unlock(g_mutexObjectList);
 578
 579     if (-1 != g_acceptServerFD)
 580     {
 581         close(g_acceptServerFD);
 582         g_acceptServerFD = -1;
 583     }
 584
 585     CATCPDisconnectAll();
 586     CATCPDestroyMutex();
 587     CATCPDestroyCond();
 588 }
 589
 590 void CATCPSetPacketReceiveCallback(CATCPPacketReceivedCallback callback)
 591 {
 592     g_packetReceivedCallback = callback;
 593 }
 594
 595 void CATCPSetKeepAliveCallback(CATCPKeepAliveHandleCallback keepaliveHandler)
 596 {
 597     g_keepaliveCallback = keepaliveHandler;
 598 }
 599
 600 static size_t CACheckPayloadLength(const void *data, size_t dlen)
 601 {
 602     VERIFY_NON_NULL_RET(data, TAG, "data", -1);
 603
 604     coap_transport_type transport = coap_get_tcp_header_type_from_initbyte(
 605             ((unsigned char *)data)[0] >> 4);
 606
 607     coap_pdu_t *pdu = coap_new_pdu(transport, dlen);
 608     if (!pdu)
 609     {
 610         OIC_LOG(ERROR, TAG, "outpdu is null");
 611         return 0;
 612     }
 613
 614     int ret = coap_pdu_parse((unsigned char *) data, dlen, pdu, transport);
 615     if (0 >= ret)
 616     {
 617         OIC_LOG(ERROR, TAG, "pdu parse failed");
 618         coap_delete_pdu(pdu);
 619         return 0;
 620     }
 621
 622     size_t payloadLen = 0;
 623     size_t headerSize = coap_get_tcp_header_length_for_transport(transport);
 624     OIC_LOG_V(DEBUG, TAG, "headerSize : %d, pdu length : %d",
 625               headerSize, pdu->length);
 626     if (pdu->length > headerSize)
 627     {
 628         payloadLen = (unsigned char *) pdu->hdr + pdu->length - pdu->data;
 629     }
 630
 631     OICFree(pdu);
 632
 633     return payloadLen;
 634 }
 635
 636 static void sendData(const CAEndpoint_t *endpoint,
 637                      const void *data, size_t dlen)
 638 {
 639     // #1. get TCP Server object from list
 640     size_t index = 0;
 641     CATCPSessionInfo_t *svritem = CAGetTCPSessionInfoFromEndpoint(endpoint, &index);
 642     if (!svritem)
 643     {
 644         // if there is no connection info, connect to TCP Server
 645         svritem = CAConnectTCPSession(endpoint);
 646         if (!svritem)
 647         {
 648             OIC_LOG(ERROR, TAG, "Failed to create TCP server object");
 649             g_TCPErrorHandler(endpoint, data, dlen, CA_SEND_FAILED);
 650             return;
 651         }
 652     }
 653
 654     // #2. check payload length
 655     size_t payloadLen = CACheckPayloadLength(data, dlen);
 656     // if payload length is zero, disconnect from TCP server
 657     if (!payloadLen)
 658     {
 659         OIC_LOG(DEBUG, TAG, "payload length is zero, disconnect from remote device");
 660         CADisconnectTCPSession(svritem, index);
 661         return;
 662     }
 663
 664     // #3. check connection state
 665     if (svritem->fd < 0)
 666     {
 667         // if file descriptor value is wrong, remove TCP Server info from list
 668         OIC_LOG(ERROR, TAG, "Failed to connect to TCP server");
 669         CADisconnectTCPSession(svritem, index);
 670         g_TCPErrorHandler(endpoint, data, dlen, CA_SEND_FAILED);
 671         return;
 672     }
 673
 674     // #4. send data to TCP Server
 675     ssize_t remainLen = dlen;
 676     do
 677     {
 678         ssize_t len = send(svritem->fd, data, remainLen, 0);
 679         if (-1 == len)
 680         {
 681             if (EWOULDBLOCK != errno)
 682             {
 683                 OIC_LOG_V(ERROR, TAG, "unicast ipv4tcp sendTo failed: %s", strerror(errno));
 684                 g_TCPErrorHandler(endpoint, data, dlen, CA_SEND_FAILED);
 685                 return;
 686             }
 687             continue;
 688         }
 689         data += len;
 690         remainLen -= len;
 691     } while (remainLen > 0);
 692
 693     OIC_LOG_V(INFO, TAG, "unicast ipv4tcp sendTo is successful: %zu bytes", dlen);
 694 }
 695
 696 void CATCPSendData(CAEndpoint_t *endpoint, const void *data, uint32_t datalen,
 697                    bool isMulticast)
 698 {
 699     VERIFY_NON_NULL_VOID(endpoint, TAG, "endpoint is NULL");
 700     VERIFY_NON_NULL_VOID(data, TAG, "data is NULL");
 701
 702     if (!isMulticast)
 703     {
 704         if (caglobals.tcp.ipv4tcpenabled && (endpoint->adapter & CA_ADAPTER_TCP))
 705         {
 706             sendData(endpoint, data, datalen);
 707         }
 708     }
 709 }
 710
 711 CAResult_t CAGetTCPInterfaceInformation(CAEndpoint_t **info, uint32_t *size)
 712 {
 713     VERIFY_NON_NULL(info, TAG, "info is NULL");
 714     VERIFY_NON_NULL(size, TAG, "size is NULL");
 715
 716     return CA_NOT_SUPPORTED;
 717 }
 718
 719 CATCPSessionInfo_t *CAConnectTCPSession(const CAEndpoint_t *endpoint)
 720 {
 721     VERIFY_NON_NULL_RET(endpoint, TAG, "endpoint is NULL", NULL);
 722
 723     // #1. create TCP server object
 724     CATCPSessionInfo_t *svritem = (CATCPSessionInfo_t *) OICCalloc(1, sizeof (*svritem));
 725     if (!svritem)
 726     {
 727         OIC_LOG(ERROR, TAG, "Out of memory");
 728         return NULL;
 729     }
 730     memcpy(svritem->sep.endpoint.addr, endpoint->addr, sizeof(svritem->sep.endpoint.addr));
 731     svritem->sep.endpoint.port = endpoint->port;
 732
 733     // #2. create the socket and connect to TCP server
 734     if (caglobals.tcp.ipv4tcpenabled)
 735     {
 736         int fd = CATCPCreateSocket(AF_INET, svritem);
 737         if (-1 == fd)
 738         {
 739             OICFree(svritem);
 740             return NULL;
 741         }
 742
 743         // #3. add TCP connection info to list
 744         svritem->fd = fd;
 745         ca_mutex_lock(g_mutexObjectList);
 746         if (caglobals.tcp.svrlist)
 747         {
 748             bool res = u_arraylist_add(caglobals.tcp.svrlist, svritem);
 749             if (!res)
 750             {
 751                 OIC_LOG(ERROR, TAG, "u_arraylist_add failed.");
 752                 close(svritem->fd);
 753                 OICFree(svritem);
 754                 ca_mutex_unlock(g_mutexObjectList);
 755                 return NULL;
 756             }
 757         }
 758         ca_mutex_unlock(g_mutexObjectList);
 759
 760         CHECKFD(fd);
 761
 762         // pass the connection information to RI for keepalive.
 763         if (g_keepaliveCallback)
 764         {
 765             g_keepaliveCallback(svritem->sep.endpoint.addr, svritem->sep.endpoint.port, true);
 766         }
 767     }
 768
 769     return svritem;
 770 }
 771
 772 CAResult_t CADisconnectTCPSession(CATCPSessionInfo_t *svritem, size_t index)
 773 {
 774     VERIFY_NON_NULL(svritem, TAG, "svritem is NULL");
 775
 776     ca_mutex_lock(g_mutexObjectList);
 777
 778     // close the socket and remove TCP connection info in list
 779     if (svritem->fd >= 0)
 780     {
 781         close(svritem->fd);
 782     }
 783     u_arraylist_remove(caglobals.tcp.svrlist, index);
 784     OICFree(svritem->recvData);
 785     OICFree(svritem);
 786     ca_mutex_unlock(g_mutexObjectList);
 787
 788     // pass the connection information to RI for keepalive.
 789     if (g_keepaliveCallback)
 790     {
 791         g_keepaliveCallback(svritem->sep.endpoint.addr, svritem->sep.endpoint.port, false);
 792     }
 793
 794     return CA_STATUS_OK;
 795 }
 796
 797 void CATCPDisconnectAll()
 798 {
 799     ca_mutex_lock(g_mutexObjectList);
 800     uint32_t length = u_arraylist_length(caglobals.tcp.svrlist);
 801
 802     CATCPSessionInfo_t *svritem = NULL;
 803     for (size_t i = 0; i < length; i++)
 804     {
 805         svritem = (CATCPSessionInfo_t *) u_arraylist_get(caglobals.tcp.svrlist, i);
 806         if (svritem && svritem->fd >= 0)
 807         {
 808             shutdown(svritem->fd, SHUT_RDWR);
 809             close(svritem->fd);
 810             OICFree(svritem->recvData);
 811         }
 812     }
 813     u_arraylist_destroy(caglobals.tcp.svrlist);
 814     ca_mutex_unlock(g_mutexObjectList);
 815 }
 816
 817 CATCPSessionInfo_t *CAGetTCPSessionInfoFromEndpoint(const CAEndpoint_t *endpoint,
 818                                                     size_t *index)
 819 {
 820     VERIFY_NON_NULL_RET(endpoint, TAG, "endpoint is NULL", NULL);
 821     VERIFY_NON_NULL_RET(index, TAG, "index is NULL", NULL);
 822
 823     // get connection info from list
 824     uint32_t length = u_arraylist_length(caglobals.tcp.svrlist);
 825     for (size_t i = 0; i < length; i++)
 826     {
 827         CATCPSessionInfo_t *svritem = (CATCPSessionInfo_t *) u_arraylist_get(
 828                 caglobals.tcp.svrlist, i);
 829         if (!svritem)
 830         {
 831             continue;
 832         }
 833
 834         if (!strncmp(svritem->sep.endpoint.addr, endpoint->addr,
 835                      sizeof(svritem->sep.endpoint.addr))
 836                 && (svritem->sep.endpoint.port == endpoint->port))
 837         {
 838             *index = i;
 839             return svritem;
 840         }
 841     }
 842
 843     return NULL;
 844 }
 845
 846 CATCPSessionInfo_t *CAGetSessionInfoFromFD(int fd, size_t *index)
 847 {
 848     ca_mutex_lock(g_mutexObjectList);
 849
 850     // check from the last item.
 851     CATCPSessionInfo_t *svritem = NULL;
 852     uint32_t length = u_arraylist_length(caglobals.tcp.svrlist);
 853     for (size_t i = 0; i < length; i++)
 854     {
 855         svritem = (CATCPSessionInfo_t *) u_arraylist_get(caglobals.tcp.svrlist, i);
 856
 857         if (svritem && svritem->fd == fd)
 858         {
 859             *index = i;
 860             ca_mutex_unlock(g_mutexObjectList);
 861             return svritem;
 862         }
 863     }
 864
 865     ca_mutex_unlock(g_mutexObjectList);
 866
 867     return NULL;
 868 }
 869
 870 size_t CAGetTotalLengthFromHeader(const unsigned char *recvBuffer)
 871 {
 872     OIC_LOG(DEBUG, TAG, "IN - CAGetTotalLengthFromHeader");
 873
 874     coap_transport_type transport = coap_get_tcp_header_type_from_initbyte(
 875             ((unsigned char *)recvBuffer)[0] >> 4);
 876     size_t optPaylaodLen = coap_get_length_from_header((unsigned char *)recvBuffer,
 877                                                         transport);
 878     size_t headerLen = coap_get_tcp_header_length((unsigned char *)recvBuffer);
 879
 880     OIC_LOG_V(DEBUG, TAG, "option/paylaod length [%d]", optPaylaodLen);
 881     OIC_LOG_V(DEBUG, TAG, "header length [%d]", headerLen);
 882     OIC_LOG_V(DEBUG, TAG, "total data length [%d]", headerLen + optPaylaodLen);
 883
 884     OIC_LOG(DEBUG, TAG, "OUT - CAGetTotalLengthFromHeader");
 885     return headerLen + optPaylaodLen;
 886 }
 887
 888 void CATCPSetErrorHandler(CATCPErrorHandleCallback errorHandleCallback)
 889 {
 890     g_TCPErrorHandler = errorHandleCallback;
 891 }