resource/csdk/connectivity/src/cablockwisetransfer.c

   1 /* ****************************************************************
   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 // Defining _BSD_SOURCE or _DEFAULT_SOURCE causes header files to expose
  22 // definitions that may otherwise be skipped. Skipping can cause implicit
  23 // declaration warnings and/or bugs and subtle problems in code execution.
  24 // For glibc information on feature test macros,
  25 // Refer http://www.gnu.org/software/libc/manual/html_node/Feature-Test-Macros.html
  26 //
  27 // This file requires #define use due to random()
  28 // For details on compatibility and glibc support,
  29 // Refer http://www.gnu.org/software/libc/manual/html_node/BSD-Random.html
  30 #define _DEFAULT_SOURCE
  31 #define _BSD_SOURCE
  32
  33 #include <stdio.h>
  34 #include <stdlib.h>
  35 #include <string.h>
  36
  37 #include "caadapterutils.h"
  38 #include "cainterface.h"
  39 #include "camessagehandler.h"
  40 #include "caremotehandler.h"
  41 #include "cablockwisetransfer.h"
  42 #include "oic_malloc.h"
  43 #include "oic_string.h"
  44 #include "camutex.h"
  45 #include "logger.h"
  46
  47 #define TAG "OIC_CA_BWT"
  48
  49 #define BLOCKWISE_OPTION_BUFFER    (sizeof(unsigned int))
  50 #define BLOCK_NUMBER_IDX           4
  51 #define BLOCK_M_BIT_IDX            3
  52 #define PORT_LENGTH                2
  53
  54 #define BLOCK_SIZE(arg) (1 << ((arg) + 4))
  55
  56 // context for block-wise transfer
  57 static CABlockWiseContext_t g_context = { .sendThreadFunc = NULL,
  58                                           .receivedThreadFunc = NULL,
  59                                           .dataList = NULL };
  60
  61 static bool CACheckPayloadLength(const CAData_t *sendData)
  62 {
  63     size_t payloadLen = 0;
  64     CAGetPayloadInfo(sendData, &payloadLen);
  65
  66     // check if message has to be transfered to a block
  67     size_t maxBlockSize = BLOCK_SIZE(CA_DEFAULT_BLOCK_SIZE);
  68     OIC_LOG_V(DEBUG, TAG, "payloadLen=%zu, maxBlockSize=%zu", payloadLen, maxBlockSize);
  69
  70     if (payloadLen <= maxBlockSize)
  71     {
  72         return false;
  73     }
  74
  75     return true;
  76 }
  77
  78 CAResult_t CAInitializeBlockWiseTransfer(CASendThreadFunc sendThreadFunc,
  79                                          CAReceiveThreadFunc receivedThreadFunc)
  80 {
  81     OIC_LOG(DEBUG, TAG, "CAInitializeBlockWiseTransfer");
  82
  83     // set block-wise transfer context
  84     if (!g_context.sendThreadFunc)
  85     {
  86         g_context.sendThreadFunc = sendThreadFunc;
  87     }
  88
  89     if (!g_context.receivedThreadFunc)
  90     {
  91         g_context.receivedThreadFunc = receivedThreadFunc;
  92     }
  93
  94     if (!g_context.dataList)
  95     {
  96         g_context.dataList = u_arraylist_create();
  97     }
  98
  99     CAResult_t res = CAInitBlockWiseMutexVariables();
 100     if (CA_STATUS_OK != res)
 101     {
 102         u_arraylist_free(&g_context.dataList);
 103         g_context.dataList = NULL;
 104         OIC_LOG(ERROR, TAG, "init has failed");
 105     }
 106
 107     return res;
 108 }
 109
 110 CAResult_t CATerminateBlockWiseTransfer()
 111 {
 112     OIC_LOG(DEBUG, TAG, "CATerminateBlockWiseTransfer");
 113
 114     if (g_context.dataList)
 115     {
 116         u_arraylist_free(&g_context.dataList);
 117     }
 118
 119     CATerminateBlockWiseMutexVariables();
 120
 121     return CA_STATUS_OK;
 122 }
 123
 124 CAResult_t CAInitBlockWiseMutexVariables()
 125 {
 126     if (!g_context.blockDataListMutex)
 127     {
 128         g_context.blockDataListMutex = ca_mutex_new();
 129         if (!g_context.blockDataListMutex)
 130         {
 131             OIC_LOG(ERROR, TAG, "ca_mutex_new has failed");
 132             return CA_STATUS_FAILED;
 133         }
 134     }
 135
 136     if (!g_context.blockDataSenderMutex)
 137     {
 138         g_context.blockDataSenderMutex = ca_mutex_new();
 139         if (!g_context.blockDataSenderMutex)
 140         {
 141             OIC_LOG(ERROR, TAG, "ca_mutex_new has failed");
 142             CATerminateBlockWiseMutexVariables();
 143             return CA_STATUS_FAILED;
 144         }
 145     }
 146
 147     return CA_STATUS_OK;
 148 }
 149
 150 void CATerminateBlockWiseMutexVariables()
 151 {
 152     if (g_context.blockDataListMutex)
 153     {
 154         ca_mutex_free(g_context.blockDataListMutex);
 155         g_context.blockDataListMutex = NULL;
 156     }
 157
 158     if (g_context.blockDataSenderMutex)
 159     {
 160         ca_mutex_free(g_context.blockDataSenderMutex);
 161         g_context.blockDataSenderMutex = NULL;
 162     }
 163 }
 164
 165 CAResult_t CASendBlockWiseData(const CAData_t *sendData)
 166 {
 167     VERIFY_NON_NULL(sendData, TAG, "sendData");
 168
 169     // check if message type is CA_MSG_RESET
 170     if (sendData->requestInfo)
 171     {
 172         if (CA_MSG_RESET == sendData->requestInfo->info.type)
 173         {
 174             OIC_LOG(DEBUG, TAG, "reset message can't be sent to the block");
 175             return CA_NOT_SUPPORTED;
 176         }
 177
 178         /*
 179          * Other uses of the Block options in conjunction with multicast
 180          * messages are for further study.
 181          */
 182         if (sendData->requestInfo->isMulticast)
 183         {
 184             OIC_LOG(DEBUG, TAG, "multicast message can't be sent to the block");
 185             return CA_NOT_SUPPORTED;
 186         }
 187     }
 188     else if (sendData->responseInfo)
 189     {
 190         if (CA_MSG_RESET == sendData->responseInfo->info.type)
 191         {
 192             OIC_LOG(DEBUG, TAG, "reset message can't be sent to the block");
 193             return CA_NOT_SUPPORTED;
 194         }
 195         if (sendData->responseInfo->isMulticast)
 196         {
 197             OIC_LOG(DEBUG, TAG, "multicast message can't be sent to the block");
 198             return CA_NOT_SUPPORTED;
 199         }
 200     }
 201
 202     // #1. check if it is already included in block data list
 203     CABlockData_t *currData = NULL;
 204     CAResult_t res = CACheckBlockDataValidation(sendData, &currData);
 205     if (CA_STATUS_OK != res)
 206     {
 207         // #2. if it is not included, add the data into list
 208         if (!currData)
 209         {
 210             OIC_LOG(DEBUG, TAG, "There is no block data");
 211
 212             bool isBlock = CACheckPayloadLength(sendData);
 213             if (!isBlock)
 214             {
 215                 if (sendData->requestInfo)
 216                 {
 217                     currData = CACreateNewBlockData(sendData);
 218                     if (!currData)
 219                     {
 220                         OIC_LOG(ERROR, TAG, "failed to create block data");
 221                         return CA_MEMORY_ALLOC_FAILED;
 222                     }
 223                 }
 224                 return CA_NOT_SUPPORTED;
 225             }
 226             currData = CACreateNewBlockData(sendData);
 227             if (!currData)
 228             {
 229                 OIC_LOG(ERROR, TAG, "failed to create block data");
 230                 return CA_MEMORY_ALLOC_FAILED;
 231             }
 232         }
 233     }
 234
 235     // #3. check request/response block option type and payload length
 236     res = CACheckBlockOptionType(currData);
 237     if (CA_STATUS_OK == res)
 238     {
 239         // #4. send block message
 240         OIC_LOG(DEBUG, TAG, "send first block msg");
 241         res = CAAddSendThreadQueue(currData->sentData,
 242                                    (const CABlockDataID_t *) &currData->blockDataId);
 243         if (CA_STATUS_OK != res)
 244         {
 245             OIC_LOG(ERROR, TAG, "add has failed");
 246             return res;
 247         }
 248     }
 249
 250     return res;
 251 }
 252
 253 CAResult_t CAAddSendThreadQueue(const CAData_t *sendData, const CABlockDataID_t *blockID)
 254 {
 255     VERIFY_NON_NULL(sendData, TAG, "sendData");
 256     VERIFY_NON_NULL(blockID, TAG, "blockID");
 257
 258     CAData_t *cloneData = CACloneCAData(sendData);
 259     if (!cloneData)
 260     {
 261         OIC_LOG(ERROR, TAG, "clone has failed");
 262         CARemoveBlockDataFromList(blockID);
 263         return CA_STATUS_FAILED;
 264     }
 265
 266     if (g_context.sendThreadFunc)
 267     {
 268         ca_mutex_lock(g_context.blockDataSenderMutex);
 269         g_context.sendThreadFunc(cloneData);
 270         ca_mutex_unlock(g_context.blockDataSenderMutex);
 271     }
 272     else
 273     {
 274         CADestroyDataSet(cloneData);
 275     }
 276     return CA_STATUS_OK;
 277 }
 278
 279 CAResult_t CACheckBlockOptionType(CABlockData_t *currData)
 280 {
 281     VERIFY_NON_NULL(currData, TAG, "currData");
 282     VERIFY_NON_NULL(currData->sentData, TAG, "currData->sentData");
 283
 284     bool isBlock = CACheckPayloadLength(currData->sentData);
 285     if (!isBlock)
 286     {
 287         return CA_NOT_SUPPORTED;
 288     }
 289
 290     // set block option (COAP_OPTION_BLOCK2 or COAP_OPTION_BLOCK1)
 291     if (currData->sentData->requestInfo) // request message
 292     {
 293         currData->type = COAP_OPTION_BLOCK1;
 294     }
 295     else // response message
 296     {
 297         currData->type = COAP_OPTION_BLOCK2;
 298     }
 299
 300     return CA_STATUS_OK;
 301 }
 302
 303 // TODO make pdu const after libcoap is updated to support that.
 304 CAResult_t CAReceiveBlockWiseData(coap_pdu_t *pdu, const CAEndpoint_t *endpoint,
 305                                   const CAData_t *receivedData, size_t dataLen)
 306 {
 307     OIC_LOG(DEBUG, TAG, "CAReceiveBlockWiseData");
 308     VERIFY_NON_NULL(pdu, TAG, "pdu");
 309     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
 310     VERIFY_NON_NULL(endpoint, TAG, "endpoint");
 311     VERIFY_NON_NULL(receivedData, TAG, "receivedData");
 312
 313     // check if received message type is CA_MSG_RESET
 314     if (CA_EMPTY == pdu->hdr->coap_hdr_udp_t.code)
 315     {
 316         OIC_LOG(DEBUG, TAG, "code is CA_EMPTY..");
 317
 318         if (!receivedData->responseInfo->info.token)
 319         {
 320             // get token from block-wise transfer list when CA_EMPTY(RST/ACK) is received
 321             CAResult_t res = CAGetTokenFromBlockDataList(pdu, endpoint,
 322                                                          receivedData->responseInfo);
 323             if (CA_STATUS_OK != res)
 324             {
 325                 OIC_LOG(ERROR, TAG, "fail to get token");
 326                 return res;
 327             }
 328         }
 329
 330         CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
 331                 receivedData->responseInfo->info.token,
 332                 receivedData->responseInfo->info.tokenLength,
 333                 endpoint->port);
 334         if (NULL == blockDataID || blockDataID->idLength < 1)
 335         {
 336             // if retransmission is timeout, callback msg will be send without token.
 337             if (NULL == blockDataID && !receivedData->responseInfo->info.token)
 338             {
 339                 OIC_LOG(INFO, TAG, "retransmission was stopped");
 340                 return CA_REQUEST_TIMEOUT;
 341             }
 342
 343             OIC_LOG(ERROR, TAG, "blockId is null");
 344             CADestroyBlockID(blockDataID);
 345             return CA_STATUS_FAILED;
 346         }
 347
 348         // If we didn't send the last block message and received EMPTY message,
 349         // we have to remain the block data from list.
 350         CABlockData_t *data = CAGetBlockDataFromBlockDataList(blockDataID);
 351         if (data && (data->block1.m || data->block2.m))
 352         {
 353             OIC_LOG(DEBUG, TAG, "this is normal EMPTY message for blockwise-transfer.");
 354             CADestroyBlockID(blockDataID);
 355             return CA_STATUS_OK;
 356         }
 357
 358         CARemoveBlockDataFromList(blockDataID);
 359         CADestroyBlockID(blockDataID);
 360         return CA_NOT_SUPPORTED;
 361     }
 362
 363     // check if block option is set and get block data
 364     coap_block_t block = { 0, 0, 0 };
 365
 366     // get block1 option
 367     int isBlock1 = coap_get_block(pdu, COAP_OPTION_BLOCK1, &block);
 368     if (isBlock1)
 369     {
 370         CAResult_t res = CASetNextBlockOption1(pdu, endpoint, receivedData, block, dataLen);
 371         if (CA_STATUS_OK != res)
 372         {
 373             OIC_LOG(ERROR, TAG, "setting has failed");
 374             return res;
 375         }
 376     }
 377
 378     // get block2 option
 379     int isBlock2 = coap_get_block(pdu, COAP_OPTION_BLOCK2, &block);
 380     if (isBlock2)
 381     {
 382         CAResult_t res = CASetNextBlockOption2(pdu, endpoint, receivedData, block, dataLen);
 383         if (CA_STATUS_OK != res)
 384         {
 385             OIC_LOG(ERROR, TAG, "setting has failed");
 386             return res;
 387         }
 388     }
 389
 390     // if there is no block option in pdu, check if there is error code.
 391     if (!isBlock1 && !isBlock2)
 392     {
 393         CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
 394                 (CAToken_t)pdu->hdr->coap_hdr_udp_t.token,
 395                 pdu->hdr->coap_hdr_udp_t.token_length,
 396                 endpoint->port);
 397         if (NULL == blockDataID || blockDataID->idLength < 1)
 398         {
 399             OIC_LOG(ERROR, TAG, "blockId is null");
 400             CADestroyBlockID(blockDataID);
 401             return CA_STATUS_FAILED;
 402         }
 403
 404         uint32_t code = CA_RESPONSE_CODE(pdu->hdr->coap_hdr_udp_t.code);
 405         if (CA_REQUEST_ENTITY_INCOMPLETE == code)
 406         {
 407             CABlockData_t *data = CAGetBlockDataFromBlockDataList(blockDataID);
 408             if (!data)
 409             {
 410                 OIC_LOG(ERROR, TAG, "getting has failed");
 411                 CADestroyBlockID(blockDataID);
 412                 return CA_STATUS_FAILED;
 413             }
 414
 415             coap_block_t *block = CAGetBlockOption(blockDataID, data->type);
 416             if (!block)
 417             {
 418                 OIC_LOG(ERROR, TAG, "block is null");
 419                 CADestroyBlockID(blockDataID);
 420                 return CA_STATUS_FAILED;
 421             }
 422
 423             CAResult_t res = CA_STATUS_OK;
 424             if (COAP_OPTION_BLOCK2 == data->type)
 425             {
 426                 res = CASetNextBlockOption2(pdu, endpoint, receivedData, *block, dataLen);
 427                 if (CA_STATUS_OK != res)
 428                 {
 429                     OIC_LOG(ERROR, TAG, "setting has failed");
 430                     CADestroyBlockID(blockDataID);
 431                     return CA_STATUS_FAILED;
 432                 }
 433             }
 434             else if (COAP_OPTION_BLOCK1 == data->type)
 435             {
 436                 res = CASetNextBlockOption1(pdu, endpoint, receivedData, *block, dataLen);
 437                 if (CA_STATUS_OK != res)
 438                 {
 439                     OIC_LOG(ERROR, TAG, "setting has failed");
 440                     CADestroyBlockID(blockDataID);
 441                     return res;
 442                 }
 443             }
 444             CADestroyBlockID(blockDataID);
 445         }
 446         else
 447         {
 448             // normal pdu data
 449             OIC_LOG(DEBUG, TAG, "it's normal pdu");
 450
 451             // if received data is response message
 452             // and sent data remain in block data list, remove block data
 453             if (receivedData->responseInfo)
 454             {
 455                 CARemoveBlockDataFromList(blockDataID);
 456             }
 457             CADestroyBlockID(blockDataID);
 458             return CA_NOT_SUPPORTED;
 459         }
 460     }
 461     return CA_STATUS_OK;
 462 }
 463
 464 CAResult_t CAProcessNextStep(const coap_pdu_t *pdu, const CAData_t *receivedData,
 465                              uint8_t blockWiseStatus, const CABlockDataID_t *blockID)
 466 {
 467     VERIFY_NON_NULL(pdu, TAG, "pdu");
 468     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
 469     VERIFY_NON_NULL(blockID, TAG, "blockID");
 470
 471     CAResult_t res = CA_STATUS_OK;
 472     CAData_t *data = NULL;
 473
 474     // process blockWiseStatus
 475     switch (blockWiseStatus)
 476     {
 477         case CA_OPTION2_FIRST_BLOCK:
 478             res = CAAddSendThreadQueue(receivedData, blockID);
 479             if (CA_STATUS_OK != res)
 480             {
 481                 OIC_LOG(ERROR, TAG, "add has failed");
 482                 return res;
 483             }
 484             break;
 485
 486         case CA_OPTION2_REQUEST:
 487             // add data to send thread
 488             data = CAGetDataSetFromBlockDataList(blockID);
 489             if (!data)
 490             {
 491                 OIC_LOG(ERROR, TAG, "it's unavailable");
 492                 return CA_STATUS_FAILED;
 493             }
 494
 495             if (data->responseInfo)
 496             {
 497                 data->responseInfo->info.type =
 498                         (pdu->hdr->coap_hdr_udp_t.type == CA_MSG_CONFIRM) ?
 499                                 CA_MSG_ACKNOWLEDGE : CA_MSG_NONCONFIRM;
 500                 data->responseInfo->info.messageId = pdu->hdr->coap_hdr_udp_t.id;
 501
 502                 res = CAAddSendThreadQueue(data, blockID);
 503                 if (CA_STATUS_OK != res)
 504                 {
 505                     OIC_LOG(ERROR, TAG, "add has failed");
 506                     return res;
 507                 }
 508             }
 509             break;
 510
 511         case CA_OPTION1_RESPONSE:
 512         case CA_OPTION2_RESPONSE:
 513         case CA_OPTION1_REQUEST_BLOCK:
 514             res = CASendBlockMessage(pdu, pdu->hdr->coap_hdr_udp_t.type, blockID);
 515             if (CA_STATUS_OK != res)
 516             {
 517                 OIC_LOG(ERROR, TAG, "send has failed");
 518                 return res;
 519             }
 520             break;
 521
 522         case CA_OPTION2_LAST_BLOCK:
 523             // process last block and send upper layer
 524             res = CAReceiveLastBlock(blockID, receivedData);
 525             if (CA_STATUS_OK != res)
 526             {
 527                 OIC_LOG(ERROR, TAG, "receive has failed");
 528                 return res;
 529             }
 530
 531             // remove data from list
 532             res = CARemoveBlockDataFromList(blockID);
 533             if (CA_STATUS_OK != res)
 534             {
 535                 OIC_LOG(ERROR, TAG, "remove has failed");
 536                 return res;
 537             }
 538             break;
 539
 540         case CA_OPTION1_REQUEST_LAST_BLOCK:
 541             // process last block and send upper layer
 542             res = CAReceiveLastBlock(blockID, receivedData);
 543             if (CA_STATUS_OK != res)
 544             {
 545                 OIC_LOG(ERROR, TAG, "receive has failed");
 546                 return res;
 547             }
 548             break;
 549
 550         case CA_BLOCK_INCOMPLETE:
 551             // add data to send thread
 552             res = CASendErrorMessage(pdu, blockWiseStatus, CA_REQUEST_ENTITY_INCOMPLETE, blockID);
 553             if (CA_STATUS_OK != res)
 554             {
 555                 OIC_LOG(ERROR, TAG, "send has failed");
 556                 return res;
 557             }
 558             break;
 559
 560         case CA_BLOCK_TOO_LARGE:
 561             if (receivedData->requestInfo)
 562             {
 563                 res = CASendErrorMessage(pdu, blockWiseStatus, CA_REQUEST_ENTITY_TOO_LARGE,
 564                                          blockID);
 565                 if (CA_STATUS_OK != res)
 566                 {
 567                     OIC_LOG(ERROR, TAG, "send has failed");
 568                     return res;
 569                 }
 570             }
 571             else if (receivedData->responseInfo)
 572             {
 573                 res = CASendBlockMessage(pdu, pdu->hdr->coap_hdr_udp_t.type, blockID);
 574                 if (CA_STATUS_OK != res)
 575                 {
 576                     OIC_LOG(ERROR, TAG, "send has failed");
 577                     return res;
 578                 }
 579             }
 580             break;
 581         default:
 582             OIC_LOG_V(ERROR, TAG, "no logic [%d]", blockWiseStatus);
 583     }
 584     return CA_STATUS_OK;
 585 }
 586
 587 static CAResult_t CASendDirectEmptyResponse(const CAEndpoint_t *endpoint, uint16_t messageId)
 588 {
 589     OIC_LOG(DEBUG, TAG, "Entering CASendDirectEmptyResponse");
 590     CAResponseInfo_t respInfo = {
 591         .result = CA_EMPTY
 592     };
 593     respInfo.info.type = CA_MSG_ACKNOWLEDGE;
 594     respInfo.info.messageId = messageId;
 595
 596     CAResult_t caResult = CASendResponse(endpoint, &respInfo);
 597
 598     OIC_LOG(DEBUG, TAG, "Exit CASendDirectEmptyResponse");
 599     return caResult;
 600 }
 601
 602 CAResult_t CASendBlockMessage(const coap_pdu_t *pdu, CAMessageType_t msgType,
 603                               const CABlockDataID_t *blockID)
 604 {
 605     VERIFY_NON_NULL(pdu, TAG, "pdu");
 606     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
 607     VERIFY_NON_NULL(blockID, TAG, "blockID");
 608
 609     CAData_t *data = CAGetDataSetFromBlockDataList(blockID);
 610     if (!data)
 611     {
 612         OIC_LOG(ERROR, TAG, "CAData is unavailable");
 613         return CA_STATUS_FAILED;
 614     }
 615
 616     CAMessageType_t sentMsgType = CA_MSG_NONCONFIRM;
 617     switch (msgType)
 618     {
 619         case CA_MSG_CONFIRM:
 620             sentMsgType = CA_MSG_ACKNOWLEDGE;
 621             break;
 622         case CA_MSG_ACKNOWLEDGE:
 623             sentMsgType = CA_MSG_CONFIRM;
 624             break;
 625         default:
 626             sentMsgType = CA_MSG_NONCONFIRM;
 627             break;
 628     }
 629
 630     uint32_t code = pdu->hdr->coap_hdr_udp_t.code;
 631     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
 632     {
 633         if (data->responseInfo)
 634         {
 635             OIC_LOG(DEBUG, TAG, "set response info");
 636             data->responseInfo->info.messageId = pdu->hdr->coap_hdr_udp_t.id;
 637             data->responseInfo->info.type = sentMsgType;
 638             data->responseInfo->result = CA_CONTINUE;
 639         }
 640     }
 641     else
 642     {
 643         // if the received response message type is CON, send empty message.
 644         // and then, send next block request message with new messagId.
 645         if (msgType == CA_MSG_CONFIRM)
 646         {
 647             CASendDirectEmptyResponse(data->remoteEndpoint,
 648                                       data->requestInfo->info.messageId);
 649             sentMsgType = CA_MSG_CONFIRM;
 650         }
 651
 652         if (data->requestInfo)
 653         {
 654             OIC_LOG(DEBUG, TAG, "need new msgID");
 655             data->requestInfo->info.messageId = 0;
 656             data->requestInfo->info.type = sentMsgType;
 657         }
 658     }
 659
 660     // add data to send thread
 661     CAResult_t res = CAAddSendThreadQueue(data, blockID);
 662     if (CA_STATUS_OK != res)
 663     {
 664         OIC_LOG(ERROR, TAG, "add has failed");
 665     }
 666
 667     return res;
 668 }
 669
 670 CAResult_t CASendErrorMessage(const coap_pdu_t *pdu, uint8_t status,
 671                               CAResponseResult_t responseResult, const CABlockDataID_t *blockID)
 672 {
 673     VERIFY_NON_NULL(pdu, TAG, "pdu");
 674     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
 675     VERIFY_NON_NULL(blockID, TAG, "blockID");
 676
 677     // create error responseInfo
 678     CABlockData_t *data = CAGetBlockDataFromBlockDataList(blockID);
 679     if (!data)
 680     {
 681         OIC_LOG(ERROR, TAG, "data is unavailable");
 682         return CA_STATUS_FAILED;
 683     }
 684
 685     CAMessageType_t sentMsgType = CA_MSG_NONCONFIRM;
 686     switch (pdu->hdr->coap_hdr_udp_t.type)
 687     {
 688         case CA_MSG_CONFIRM:
 689             sentMsgType = CA_MSG_ACKNOWLEDGE;
 690             break;
 691         case CA_MSG_ACKNOWLEDGE:
 692             sentMsgType = CA_MSG_CONFIRM;
 693             break;
 694     }
 695
 696     CAData_t *cloneData = NULL;
 697     if (data->sentData)
 698     {
 699         cloneData = CACloneCAData(data->sentData);
 700         if (!cloneData)
 701         {
 702             OIC_LOG(ERROR, TAG, "clone has failed");
 703             return CA_MEMORY_ALLOC_FAILED;
 704         }
 705
 706         if (cloneData->responseInfo)
 707         {
 708             cloneData->responseInfo->info.messageId = pdu->hdr->coap_hdr_udp_t.id;
 709             cloneData->responseInfo->info.type = sentMsgType;
 710             cloneData->responseInfo->result = responseResult;
 711         }
 712         else
 713         {
 714             CAInfo_t responseData = { .tokenLength = pdu->hdr->coap_hdr_udp_t.token_length };
 715             responseData.token = (CAToken_t) OICMalloc(responseData.tokenLength);
 716             if (!responseData.token)
 717             {
 718                 OIC_LOG(ERROR, TAG, "out of memory");
 719                 return CA_MEMORY_ALLOC_FAILED;
 720             }
 721             memcpy(responseData.token, pdu->hdr->coap_hdr_udp_t.token, responseData.tokenLength);
 722
 723             cloneData->responseInfo = (CAResponseInfo_t*) OICCalloc(1, sizeof(CAResponseInfo_t));
 724             if (!cloneData->responseInfo)
 725             {
 726                 OIC_LOG(ERROR, TAG, "out of memory");
 727                 OICFree(responseData.token);
 728                 return CA_MEMORY_ALLOC_FAILED;
 729             }
 730
 731             cloneData->responseInfo->info = responseData;
 732             cloneData->responseInfo->info.type = sentMsgType;
 733             cloneData->responseInfo->result = responseResult;
 734         }
 735         OIC_LOG(DEBUG, TAG, "set response message to send error code");
 736     }
 737     else
 738     {
 739         OIC_LOG(ERROR, TAG, "data has no sent-data");
 740         return CA_MEMORY_ALLOC_FAILED;
 741     }
 742
 743     // if there is a requestInfo, remove it to send response message
 744     if (cloneData->requestInfo)
 745     {
 746         CADestroyRequestInfoInternal(cloneData->requestInfo);
 747         cloneData->requestInfo = NULL;
 748     }
 749
 750     // add data to send thread
 751     if (g_context.sendThreadFunc)
 752     {
 753         ca_mutex_lock(g_context.blockDataSenderMutex);
 754         g_context.sendThreadFunc(cloneData);
 755         ca_mutex_unlock(g_context.blockDataSenderMutex);
 756     }
 757     else
 758     {
 759         CADestroyDataSet(cloneData);
 760     }
 761
 762     // if error code is 4.08, remove the stored payload and initialize block number
 763     if (CA_BLOCK_INCOMPLETE == status)
 764     {
 765         OICFree(data->payload);
 766         data->payload = NULL;
 767         data->payloadLength = 0;
 768         data->receivedPayloadLen = 0;
 769         data->block1.num = 0;
 770         data->block2.num = 0;
 771     }
 772
 773     return CA_STATUS_OK;
 774 }
 775
 776 CAResult_t CAReceiveLastBlock(const CABlockDataID_t *blockID, const CAData_t *receivedData)
 777 {
 778     VERIFY_NON_NULL(blockID, TAG, "blockID");
 779     VERIFY_NON_NULL(receivedData, TAG, "receivedData");
 780
 781     // total block data have to notify to Application
 782     CAData_t *cloneData = CACloneCAData(receivedData);
 783     if (!cloneData)
 784     {
 785         OIC_LOG(ERROR, TAG, "clone has failed");
 786         return CA_MEMORY_ALLOC_FAILED;
 787     }
 788
 789     // update payload
 790     size_t fullPayloadLen = 0;
 791     CAPayload_t fullPayload = CAGetPayloadFromBlockDataList(blockID, &fullPayloadLen);
 792     if (fullPayload)
 793     {
 794         CAResult_t res = CAUpdatePayloadToCAData(cloneData, fullPayload, fullPayloadLen);
 795         if (CA_STATUS_OK != res)
 796         {
 797             OIC_LOG(ERROR, TAG, "update has failed");
 798             CADestroyDataSet(cloneData);
 799             return res;
 800         }
 801     }
 802
 803     if (g_context.receivedThreadFunc)
 804     {
 805         g_context.receivedThreadFunc(cloneData);
 806     }
 807     else
 808     {
 809         CADestroyDataSet(cloneData);
 810     }
 811
 812     return CA_STATUS_OK;
 813 }
 814
 815 static CABlockData_t* CACheckTheExistOfBlockData(const CABlockDataID_t* blockDataID,
 816                                                  coap_pdu_t *pdu, const CAEndpoint_t *endpoint,
 817                                                  uint8_t blockType)
 818 {
 819     // Get BlockData data. If does not exist, create a new data
 820     CABlockData_t *data = CAGetBlockDataFromBlockDataList(blockDataID);
 821     if (!data)
 822     {
 823         OIC_LOG(DEBUG, TAG, "block data doesn't exist in list. create new one");
 824
 825         CAData_t *cadata = CACreateNewDataSet(pdu, endpoint);
 826         if (!cadata)
 827         {
 828             OIC_LOG(ERROR, TAG, "data is null");
 829             return NULL;
 830         }
 831
 832         data = CACreateNewBlockData(cadata);
 833         if (!data)
 834         {
 835             OIC_LOG(ERROR, TAG, "failed to create a new block data");
 836             CADestroyDataSet(cadata);
 837             return NULL;
 838         }
 839         CADestroyDataSet(cadata);
 840     }
 841
 842     // update BLOCK OPTION type
 843     CAResult_t res = CAUpdateBlockOptionType(blockDataID, blockType);
 844     if (CA_STATUS_OK != res)
 845     {
 846         OIC_LOG(ERROR, TAG, "update has failed");
 847         return NULL;
 848     }
 849
 850     return data;
 851 }
 852
 853 // TODO make pdu const after libcoap is updated to support that.
 854 CAResult_t CASetNextBlockOption1(coap_pdu_t *pdu, const CAEndpoint_t *endpoint,
 855                                  const CAData_t *receivedData, coap_block_t block,
 856                                  size_t dataLen)
 857 {
 858     OIC_LOG(INFO, TAG, "CASetNextBlockOption1");
 859     VERIFY_NON_NULL(pdu, TAG, "pdu");
 860     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
 861     VERIFY_NON_NULL(endpoint, TAG, "endpoint");
 862     VERIFY_NON_NULL(receivedData, TAG, "receivedData");
 863
 864     OIC_LOG_V(INFO, TAG, "num:%d, M:%d, sze:%d", block.num, block.m, block.szx);
 865
 866     CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
 867             (CAToken_t)pdu->hdr->coap_hdr_udp_t.token,
 868             pdu->hdr->coap_hdr_udp_t.token_length,
 869             endpoint->port);
 870     if (NULL == blockDataID || blockDataID->idLength < 1)
 871     {
 872         OIC_LOG(ERROR, TAG, "blockId is null");
 873         CADestroyBlockID(blockDataID);
 874         return CA_STATUS_FAILED;
 875     }
 876
 877     CABlockData_t *data = CACheckTheExistOfBlockData(blockDataID, pdu, endpoint,
 878                                                      COAP_OPTION_BLOCK1);
 879     if (!data)
 880     {
 881         OIC_LOG(ERROR, TAG, "Failed to create or get block data");
 882         goto exit;
 883     }
 884
 885     CAResult_t res = CA_STATUS_OK;
 886     uint8_t blockWiseStatus = CA_BLOCK_UNKNOWN;
 887     uint32_t code = pdu->hdr->coap_hdr_udp_t.code;
 888     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
 889     {
 890         // received message type is request
 891         OIC_LOG_V(INFO, TAG, "num:%d, M:%d", block.num, block.m);
 892
 893         // check the size option
 894         bool isSizeOption = CAIsPayloadLengthInPduWithBlockSizeOption(pdu, COAP_OPTION_SIZE1,
 895                                                                       &(data->payloadLength));
 896
 897         blockWiseStatus = CACheckBlockErrorType(data, &block, receivedData,
 898                                                 COAP_OPTION_BLOCK1, dataLen);
 899
 900         if (CA_BLOCK_RECEIVED_ALREADY != blockWiseStatus)
 901         {
 902             // store the received payload and merge
 903             res = CAUpdatePayloadData(data, receivedData, blockWiseStatus,
 904                                       isSizeOption, COAP_OPTION_BLOCK1);
 905             if (CA_STATUS_OK != res)
 906             {
 907                 OIC_LOG(ERROR, TAG, "update has failed");
 908                 goto exit;
 909             }
 910
 911             res = CAUpdateBlockOptionItems(data, pdu, &block, COAP_OPTION_BLOCK1,
 912                                            blockWiseStatus);
 913             if (CA_STATUS_OK != res)
 914             {
 915                 OIC_LOG(ERROR, TAG, "update has failed");
 916                 goto exit;
 917             }
 918
 919             // update block data
 920             res = CAUpdateBlockData(data, block, COAP_OPTION_BLOCK1);
 921             if (CA_STATUS_OK != res)
 922             {
 923                 OIC_LOG(ERROR, TAG, "update has failed");
 924                 goto exit;
 925             }
 926         }
 927
 928         // check the blcok-wise transfer status for next step
 929         if (CA_BLOCK_UNKNOWN == blockWiseStatus || CA_BLOCK_RECEIVED_ALREADY == blockWiseStatus)
 930         {
 931             OIC_LOG_V(DEBUG, TAG, "M bit is %d", block.m);
 932
 933             blockWiseStatus = (0 == block.m) ?
 934                     CA_OPTION1_REQUEST_LAST_BLOCK : CA_OPTION1_REQUEST_BLOCK;
 935         }
 936     }
 937     else
 938     {
 939         // received message type is response
 940         uint32_t code = CA_RESPONSE_CODE(pdu->hdr->coap_hdr_udp_t.code);
 941         if (0 == block.m && (CA_REQUEST_ENTITY_INCOMPLETE != code
 942                 && CA_REQUEST_ENTITY_TOO_LARGE != code))
 943         {
 944             int isBlock2 = coap_get_block(pdu, COAP_OPTION_BLOCK2, &block);
 945             if (isBlock2)
 946             {
 947                 OIC_LOG(INFO, TAG, "received data is combining block1 and block2");
 948                 // initialize block number for response message
 949                 data->block1.num = 0;
 950                 CADestroyBlockID(blockDataID);
 951                 return CA_STATUS_OK;
 952             }
 953             else
 954             {
 955                 OIC_LOG(INFO, TAG, "received data is not bulk data");
 956                 CAReceiveLastBlock(blockDataID, receivedData);
 957                 res = CA_STATUS_OK;
 958                 goto exit;
 959             }
 960         }
 961
 962         blockWiseStatus = CA_OPTION1_RESPONSE;
 963         res = CAUpdateBlockOptionItems(data, pdu, &block, COAP_OPTION_BLOCK1, blockWiseStatus);
 964         if (CA_STATUS_OK != res)
 965         {
 966             OIC_LOG(ERROR, TAG, "update has failed");
 967             CADestroyBlockID(blockDataID);
 968             return res;
 969         }
 970
 971         res = CAUpdateBlockData(data, block, COAP_OPTION_BLOCK1);
 972         if (CA_STATUS_OK != res)
 973         {
 974             OIC_LOG(ERROR, TAG, "update has failed");
 975             goto exit;
 976         }
 977     }
 978
 979     res = CAProcessNextStep(pdu, receivedData, blockWiseStatus, blockDataID);
 980     if (CA_STATUS_OK != res)
 981     {
 982         OIC_LOG(ERROR, TAG, "setting has failed");
 983         goto exit;
 984     }
 985
 986     CADestroyBlockID(blockDataID);
 987     return res;
 988
 989 exit:
 990     CARemoveBlockDataFromList(blockDataID);
 991     CADestroyBlockID(blockDataID);
 992     return res;
 993 }
 994
 995 // TODO make pdu const after libcoap is updated to support that.
 996 CAResult_t CASetNextBlockOption2(coap_pdu_t *pdu, const CAEndpoint_t *endpoint,
 997                                  const CAData_t *receivedData, coap_block_t block,
 998                                  size_t dataLen)
 999 {
1000     OIC_LOG(DEBUG, TAG, "CASetNextBlockOption2");
1001     OIC_LOG_V(INFO, TAG, "num:%d, M:%d, sze:%d", block.num, block.m, block.szx);
1002
1003     VERIFY_NON_NULL(pdu, TAG, "pdu");
1004     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
1005     VERIFY_NON_NULL(endpoint, TAG, "endpoint");
1006     VERIFY_NON_NULL(receivedData, TAG, "receivedData");
1007
1008     CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
1009             (CAToken_t)pdu->hdr->coap_hdr_udp_t.token,
1010             pdu->hdr->coap_hdr_udp_t.token_length,
1011             endpoint->port);
1012     if (NULL == blockDataID || blockDataID->idLength < 1)
1013     {
1014         OIC_LOG(ERROR, TAG, "blockId is null");
1015         CADestroyBlockID(blockDataID);
1016         return CA_STATUS_FAILED;
1017     }
1018
1019     CABlockData_t *data = CACheckTheExistOfBlockData(blockDataID, pdu, endpoint,
1020                                                      COAP_OPTION_BLOCK2);
1021     if (!data)
1022     {
1023         OIC_LOG(ERROR, TAG, "Failed to create or get block data");
1024         goto exit;
1025     }
1026
1027     CAResult_t res = CA_STATUS_OK;
1028     uint8_t blockWiseStatus = CA_BLOCK_UNKNOWN;
1029     if (0 == block.num && CA_GET == pdu->hdr->coap_hdr_udp_t.code && 0 == block.m)
1030     {
1031         OIC_LOG(INFO, TAG, "first block number");
1032
1033         res = CAUpdateBlockOptionItems(data, pdu, &block, COAP_OPTION_BLOCK2, blockWiseStatus);
1034         if (CA_STATUS_OK != res)
1035         {
1036             OIC_LOG(ERROR, TAG, "update has failed");
1037             goto exit;
1038         }
1039
1040         // first block data have to notify to Application
1041         res = CAUpdateBlockData(data, block, COAP_OPTION_BLOCK2);
1042         if (CA_STATUS_OK != res)
1043         {
1044             OIC_LOG(ERROR, TAG, "update has failed");
1045             goto exit;
1046         }
1047         blockWiseStatus = CA_OPTION2_FIRST_BLOCK;
1048     }
1049     else
1050     {
1051         uint32_t code = pdu->hdr->coap_hdr_udp_t.code;
1052         if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
1053         {
1054             // received message type is request
1055             OIC_LOG_V(INFO, TAG, "num:%d, M:%d", block.num, block.m);
1056
1057             blockWiseStatus = CA_OPTION2_REQUEST;
1058
1059             res = CAUpdateBlockOptionItems(data, pdu, &block, COAP_OPTION_BLOCK2, blockWiseStatus);
1060             if (CA_STATUS_OK != res)
1061             {
1062                 OIC_LOG(ERROR, TAG, "update has failed");
1063                 goto exit;
1064             }
1065
1066             res = CAUpdateBlockData(data, block, COAP_OPTION_BLOCK2);
1067             if (CA_STATUS_OK != res)
1068             {
1069                 OIC_LOG(ERROR, TAG, "update has failed");
1070                 goto exit;
1071             }
1072         }
1073         else
1074         {
1075             // received message type is response
1076             OIC_LOG(DEBUG, TAG, "received response message with block option2");
1077
1078             // check the size option
1079             bool isSizeOption = CAIsPayloadLengthInPduWithBlockSizeOption(pdu,
1080                                                                           COAP_OPTION_SIZE2,
1081                                                                           &(data->payloadLength));
1082
1083             uint32_t code = CA_RESPONSE_CODE(pdu->hdr->coap_hdr_udp_t.code);
1084             if (CA_REQUEST_ENTITY_INCOMPLETE != code && CA_REQUEST_ENTITY_TOO_LARGE != code)
1085             {
1086                 // check if received payload is exact
1087                 blockWiseStatus = CACheckBlockErrorType(data, &block, receivedData,
1088                                                         COAP_OPTION_BLOCK2, dataLen);
1089             }
1090
1091             if (CA_BLOCK_RECEIVED_ALREADY != blockWiseStatus)
1092             {
1093                 // store the received payload and merge
1094                 res = CAUpdatePayloadData(data, receivedData, blockWiseStatus,
1095                                           isSizeOption, COAP_OPTION_BLOCK2);
1096                 if (CA_STATUS_OK != res)
1097                 {
1098                     OIC_LOG(ERROR, TAG, "update has failed");
1099                     goto exit;
1100                 }
1101             }
1102
1103             if (0 == block.m && CA_BLOCK_UNKNOWN == blockWiseStatus) // Last block is received
1104             {
1105                 OIC_LOG(DEBUG, TAG, "M bit is 0");
1106                 blockWiseStatus = CA_OPTION2_LAST_BLOCK;
1107             }
1108             else
1109             {
1110                 if (CA_BLOCK_UNKNOWN == blockWiseStatus ||
1111                         CA_BLOCK_RECEIVED_ALREADY == blockWiseStatus)
1112                 {
1113                     OIC_LOG(DEBUG, TAG, "M bit is 1");
1114                     blockWiseStatus = CA_OPTION2_RESPONSE;
1115                 }
1116
1117                 res = CAUpdateBlockOptionItems(data, pdu, &block, COAP_OPTION_BLOCK2,
1118                                                blockWiseStatus);
1119                 if (CA_STATUS_OK != res)
1120                 {
1121                     OIC_LOG(ERROR, TAG, "update has failed");
1122                     goto exit;
1123                 }
1124
1125                 res = CAUpdateBlockData(data, block, COAP_OPTION_BLOCK2);
1126                 if (CA_STATUS_OK != res)
1127                 {
1128                     OIC_LOG(ERROR, TAG, "update has failed");
1129                     goto exit;
1130                 }
1131             }
1132         }
1133     }
1134
1135     res = CAProcessNextStep(pdu, receivedData, blockWiseStatus, blockDataID);
1136     if (CA_STATUS_OK != res)
1137     {
1138         OIC_LOG(ERROR, TAG, "setting has failed");
1139         goto exit;
1140     }
1141
1142     CADestroyBlockID(blockDataID);
1143     return CA_STATUS_OK;
1144
1145 exit:
1146     CARemoveBlockDataFromList(blockDataID);
1147     CADestroyBlockID(blockDataID);
1148     return res;
1149 }
1150
1151 CAResult_t CAUpdateBlockOptionItems(CABlockData_t *currData, const coap_pdu_t *pdu,
1152                                     coap_block_t *block, uint16_t blockType,
1153                                     uint32_t status)
1154 {
1155     VERIFY_NON_NULL(currData, TAG, "currData");
1156     VERIFY_NON_NULL(pdu, TAG, "pdu");
1157     VERIFY_NON_NULL(block, TAG, "block");
1158
1159     // update block data
1160     CAResult_t res = CA_STATUS_OK;
1161     uint32_t code = CA_RESPONSE_CODE(pdu->hdr->coap_hdr_udp_t.code);
1162
1163     if (CA_REQUEST_ENTITY_INCOMPLETE == code || CA_REQUEST_ENTITY_TOO_LARGE == code)
1164     {
1165         // response error code of the received block message
1166         res = CAHandleBlockErrorResponse(block, blockType, code);
1167         if (CA_STATUS_OK != res)
1168         {
1169             OIC_LOG(ERROR, TAG, "error handle has failed");
1170             return res;
1171         }
1172     }
1173     else
1174     {
1175         // update block option items
1176         switch (status)
1177         {
1178             case CA_OPTION1_RESPONSE:
1179                 if (currData->block1.num > block->num)
1180                 {
1181                     OIC_LOG(ERROR, TAG, "received incorrect block num");
1182                     return CA_STATUS_FAILED;
1183                 }
1184                 block->num++;
1185                 break;
1186             case CA_OPTION2_REQUEST:
1187                 block->m = 0;
1188                 break;
1189             case CA_OPTION2_RESPONSE:
1190                 if (currData->block2.num > block->num)
1191                 {
1192                     OIC_LOG(ERROR, TAG, "received incorrect block num");
1193                     return CA_STATUS_FAILED;
1194                 }
1195                 block->num++;
1196                 block->m = 0;
1197                 break;
1198             case CA_BLOCK_TOO_LARGE:
1199                 // if state of received block message is CA_BLOCK_TOO_LARGE or CA_BLOCK_INCOMPLETE
1200                 // we set the response error code appropriately and send
1201                 if (COAP_OPTION_BLOCK2 == blockType)
1202                 {
1203                     block->num++;
1204                     block->m = 0;
1205                     block->szx = currData->block2.szx;
1206                 }
1207                 else
1208                 {
1209                     block->szx = currData->block1.szx;
1210                 }
1211                 break;
1212             default:
1213                 OIC_LOG_V(ERROR, TAG, "no logic [%d]", status);
1214         }
1215
1216         if (CA_BLOCK_INCOMPLETE != status && CA_BLOCK_TOO_LARGE != status)
1217         {
1218             // negotiate block size
1219             res = CANegotiateBlockSize(currData, block, pdu, blockType);
1220             if (CA_STATUS_OK != res)
1221             {
1222                 OIC_LOG(ERROR, TAG, "negotiation has failed");
1223                 return res;
1224             }
1225         }
1226     }
1227     return res;
1228 }
1229
1230 CAResult_t CASetMoreBitFromBlock(size_t payloadLen, coap_block_t *block)
1231 {
1232     VERIFY_NON_NULL(block, TAG, "block");
1233
1234     if ((size_t) ((block->num + 1) << (block->szx + BLOCK_NUMBER_IDX)) < payloadLen)
1235     {
1236         OIC_LOG(DEBUG, TAG, "Set the M-bit(1)");
1237         block->m = 1;
1238     }
1239     else
1240     {
1241         OIC_LOG(DEBUG, TAG, "Set the M-bit(0)");
1242         block->m = 0;
1243     }
1244
1245     return CA_STATUS_OK;
1246 }
1247
1248 CAResult_t CANegotiateBlockSize(CABlockData_t *currData, coap_block_t *block,
1249                                 coap_pdu_t *pdu, uint16_t blockType)
1250 {
1251     OIC_LOG(DEBUG, TAG, "IN-NegotiateBlockSize");
1252
1253     VERIFY_NON_NULL(currData, TAG, "currData");
1254     VERIFY_NON_NULL(block, TAG, "block");
1255     VERIFY_NON_NULL(pdu, TAG, "pdu");
1256     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
1257
1258     bool isReqMsg = false;
1259     uint32_t code = pdu->hdr->coap_hdr_udp_t.code;
1260     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
1261     {
1262         isReqMsg = true;
1263     }
1264
1265     // #1. check the block option type
1266     if (COAP_OPTION_BLOCK2 == blockType)
1267     {
1268         // #2. check the message type
1269         if (!isReqMsg)
1270         {
1271             if (block->szx > currData->block2.szx)
1272             {
1273                 OIC_LOG(DEBUG, TAG, "sze is big");
1274
1275                 // #3. calculate new block number from block size
1276                 unsigned int blockNum = BLOCK_SIZE(block->szx) /
1277                                         BLOCK_SIZE(currData->block2.szx) - 1;
1278                 OIC_LOG(DEBUG, TAG, "num is set as Negotiation");
1279                 block->num += blockNum;
1280                 block->szx = currData->block2.szx;
1281                 OIC_LOG_V(DEBUG, TAG, "updated block num: %d", block->num);
1282             }
1283         }
1284         else
1285         {
1286             if (block->szx > currData->block2.szx)
1287             {
1288                 OIC_LOG(DEBUG, TAG, "sze is big");
1289                 block->szx = currData->block2.szx;
1290             }
1291         }
1292     }
1293     else if (COAP_OPTION_BLOCK1 == blockType)
1294     {
1295         if (!isReqMsg)
1296         {
1297             if (block->szx < currData->block1.szx)
1298             {
1299                 OIC_LOG(DEBUG, TAG, "sze is small");
1300
1301                 unsigned int blockNum = BLOCK_SIZE(currData->block1.szx) /
1302                                         BLOCK_SIZE(block->szx) - 1;
1303                 block->num += blockNum;
1304                 OIC_LOG_V(DEBUG, TAG, "updated block num: %d", block->num);
1305             }
1306         }
1307         else
1308         {
1309             if (block->szx > currData->block1.szx)
1310             {
1311                 OIC_LOG(DEBUG, TAG, "sze is big");
1312                 block->szx = currData->block1.szx;
1313             }
1314         }
1315     }
1316     else
1317     {
1318         OIC_LOG(DEBUG, TAG, "Invalid block option");
1319         return CA_STATUS_FAILED;
1320     }
1321
1322     OIC_LOG(DEBUG, TAG, "OUT-NegotiateBlockSize");
1323
1324     return CA_STATUS_OK;
1325 }
1326
1327 CAResult_t CAUpdateBlockData(CABlockData_t *currData, coap_block_t block,
1328                              uint16_t blockType)
1329 {
1330     VERIFY_NON_NULL(currData, TAG, "currData");
1331
1332     // check if block size is bigger than CABlockSize_t
1333     if (block.szx > CA_BLOCK_SIZE_1024_BYTE)
1334     {
1335         OIC_LOG(DEBUG, TAG, "invalid block szx");
1336         return CA_STATUS_FAILED;
1337     }
1338
1339     // update block option
1340     if (COAP_OPTION_BLOCK2 == blockType)
1341     {
1342         currData->block2 = block;
1343     }
1344     else
1345     {
1346         currData->block1 = block;
1347     }
1348
1349     OIC_LOG(DEBUG, TAG, "data has updated");
1350     return CA_STATUS_OK;
1351 }
1352
1353 CAResult_t CAUpdateMessageId(coap_pdu_t *pdu, const CABlockDataID_t *blockID)
1354 {
1355     VERIFY_NON_NULL(pdu, TAG, "pdu");
1356     VERIFY_NON_NULL(pdu->hdr, TAG, "pdu->hdr");
1357     VERIFY_NON_NULL(blockID, TAG, "blockID");
1358
1359     // if message is sent, update messageId in block-wise transfer list
1360     CAData_t * cadata = CAGetDataSetFromBlockDataList(blockID);
1361     if (!cadata)
1362     {
1363         OIC_LOG(ERROR, TAG, "CAData is unavailable");
1364         return CA_STATUS_FAILED;
1365     }
1366
1367     if (cadata->requestInfo)
1368     {
1369         cadata->requestInfo->info.messageId = pdu->hdr->coap_hdr_udp_t.id;
1370     }
1371
1372     return CA_STATUS_OK;
1373 }
1374
1375 CAResult_t CAAddBlockOption(coap_pdu_t **pdu, const CAInfo_t *info,
1376                             const CAEndpoint_t *endpoint, coap_list_t **options)
1377 {
1378     OIC_LOG(DEBUG, TAG, "IN-AddBlockOption");
1379     VERIFY_NON_NULL(pdu, TAG, "pdu");
1380     VERIFY_NON_NULL((*pdu), TAG, "(*pdu)");
1381     VERIFY_NON_NULL((*pdu)->hdr, TAG, "(*pdu)->hdr");
1382     VERIFY_NON_NULL(info, TAG, "info");
1383     VERIFY_NON_NULL(endpoint, TAG, "endpoint");
1384     VERIFY_NON_NULL(options, TAG, "options");
1385
1386     CAResult_t res = CA_STATUS_OK;
1387     size_t dataLength = 0;
1388     if (info->payload)
1389     {
1390         dataLength = info->payloadSize;
1391         OIC_LOG_V(DEBUG, TAG, "dataLength - %zu", dataLength);
1392     }
1393
1394     CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
1395             (CAToken_t)(*pdu)->hdr->coap_hdr_udp_t.token,
1396             (*pdu)->hdr->coap_hdr_udp_t.token_length,
1397             endpoint->port);
1398     if (NULL == blockDataID || blockDataID->idLength < 1)
1399     {
1400         OIC_LOG(ERROR, TAG, "blockId is null");
1401         res = CA_STATUS_FAILED;
1402         goto exit;
1403     }
1404
1405     uint32_t repCode = CA_RESPONSE_CODE((*pdu)->hdr->coap_hdr_udp_t.code);
1406     if (CA_REQUEST_ENTITY_INCOMPLETE == repCode)
1407     {
1408         OIC_LOG(INFO, TAG, "don't use option");
1409         res = CA_STATUS_OK;
1410         goto exit;
1411     }
1412
1413     uint8_t blockType = CAGetBlockOptionType(blockDataID);
1414     if (COAP_OPTION_BLOCK2 == blockType)
1415     {
1416         res = CAAddBlockOption2(pdu, info, dataLength, blockDataID, options);
1417         if (CA_STATUS_OK != res)
1418         {
1419             OIC_LOG(ERROR, TAG, "add has failed");
1420             goto exit;
1421         }
1422     }
1423     else if (COAP_OPTION_BLOCK1 == blockType)
1424     {
1425         res = CAAddBlockOption1(pdu, info, dataLength, blockDataID, options);
1426         if (CA_STATUS_OK != res)
1427         {
1428             OIC_LOG(ERROR, TAG, "add has failed");
1429             goto exit;
1430         }
1431     }
1432     else
1433     {
1434         OIC_LOG(DEBUG, TAG, "no BLOCK option");
1435
1436         // in case it is not large data, add option list to pdu.
1437         if (*options)
1438         {
1439             for (coap_list_t *opt = *options; opt; opt = opt->next)
1440             {
1441                 OIC_LOG_V(DEBUG, TAG, "[%s] opt will be added.",
1442                           COAP_OPTION_DATA(*(coap_option *) opt->data));
1443
1444                 OIC_LOG_V(DEBUG, TAG, "[%d] pdu length", (*pdu)->length);
1445                 coap_add_option(*pdu, COAP_OPTION_KEY(*(coap_option *) opt->data),
1446                                 COAP_OPTION_LENGTH(*(coap_option *) opt->data),
1447                                 COAP_OPTION_DATA(*(coap_option *) opt->data), coap_udp);
1448             }
1449         }
1450
1451         OIC_LOG_V(DEBUG, TAG, "[%d] pdu length after option", (*pdu)->length);
1452
1453         // if response data is so large. it have to send as block transfer
1454         if (!coap_add_data(*pdu, dataLength, (const unsigned char *) info->payload))
1455         {
1456             OIC_LOG(INFO, TAG, "it have to use block");
1457             res = CA_STATUS_FAILED;
1458             goto exit;
1459         }
1460         else
1461         {
1462             OIC_LOG(INFO, TAG, "not Blockwise Transfer");
1463         }
1464     }
1465
1466     uint32_t code = (*pdu)->hdr->coap_hdr_udp_t.code;
1467     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
1468     {
1469         // if received message type is RESET from remote device,
1470         // we have to use the updated message id of request message to find token.
1471         CABlockData_t *blockData = CAGetBlockDataFromBlockDataList(blockDataID);
1472         if (blockData)
1473         {
1474             res = CAUpdateMessageId(*pdu, blockDataID);
1475             if (CA_STATUS_OK != res)
1476             {
1477                 OIC_LOG(ERROR, TAG, "fail to update message id");
1478                 goto exit;
1479             }
1480         }
1481     }
1482
1483 exit:
1484     CADestroyBlockID(blockDataID);
1485     OIC_LOG(DEBUG, TAG, "OUT-AddBlockOption");
1486     return res;
1487 }
1488
1489 CAResult_t CAAddBlockOption2(coap_pdu_t **pdu, const CAInfo_t *info, size_t dataLength,
1490                              const CABlockDataID_t *blockID, coap_list_t **options)
1491 {
1492     OIC_LOG(DEBUG, TAG, "IN-AddBlockOption2");
1493     VERIFY_NON_NULL(pdu, TAG, "pdu");
1494     VERIFY_NON_NULL((*pdu), TAG, "(*pdu)");
1495     VERIFY_NON_NULL((*pdu)->hdr, TAG, "(*pdu)->hdr");
1496     VERIFY_NON_NULL(info, TAG, "info");
1497     VERIFY_NON_NULL(blockID, TAG, "blockID");
1498     VERIFY_NON_NULL(options, TAG, "options");
1499
1500     // get set block data from CABlock list-set.
1501     coap_block_t *block1 = CAGetBlockOption(blockID, COAP_OPTION_BLOCK1);
1502     coap_block_t *block2 = CAGetBlockOption(blockID, COAP_OPTION_BLOCK2);
1503     if (!block1 || !block2)
1504     {
1505         OIC_LOG(ERROR, TAG, "getting has failed");
1506         return CA_STATUS_FAILED;
1507     }
1508
1509     CAResult_t res = CA_STATUS_OK;
1510     uint32_t code = (*pdu)->hdr->coap_hdr_udp_t.code;
1511     if (CA_GET != code && CA_POST != code && CA_PUT != code && CA_DELETE != code)
1512     {
1513         CASetMoreBitFromBlock(dataLength, block2);
1514
1515         // if block number is 0, add size2 option
1516         if (0 == block2->num)
1517         {
1518             res = CAAddBlockSizeOption(*pdu, COAP_OPTION_SIZE2, dataLength, options);
1519             if (CA_STATUS_OK != res)
1520             {
1521                 OIC_LOG(ERROR, TAG, "add has failed");
1522                 goto exit;
1523             }
1524         }
1525
1526         res = CAAddBlockOptionImpl(block2, COAP_OPTION_BLOCK2, options);
1527         if (CA_STATUS_OK != res)
1528         {
1529             OIC_LOG(ERROR, TAG, "add has failed");
1530             goto exit;
1531         }
1532
1533         if (block1->num)
1534         {
1535             OIC_LOG(DEBUG, TAG, "combining block1 and block2");
1536             res = CAAddBlockOptionImpl(block1, COAP_OPTION_BLOCK1, options);
1537             if (CA_STATUS_OK != res)
1538             {
1539                 OIC_LOG(ERROR, TAG, "add has failed");
1540                 goto exit;
1541             }
1542             // initialize block number
1543             block1->num = 0;
1544         }
1545
1546         res = CAAddOptionToPDU(*pdu, options);
1547         if (CA_STATUS_OK != res)
1548         {
1549             OIC_LOG(ERROR, TAG, "add has failed");
1550             goto exit;
1551         }
1552
1553         if (!coap_add_block(*pdu, dataLength, (const unsigned char *) info->payload,
1554                             block2->num, block2->szx))
1555         {
1556             OIC_LOG(ERROR, TAG, "Data length is smaller than the start index");
1557             return CA_STATUS_FAILED;
1558         }
1559
1560         CALogBlockInfo(block2);
1561
1562         if (!block2->m)
1563         {
1564             // if sent message is last response block message, remove data
1565             CARemoveBlockDataFromList(blockID);
1566         }
1567     }
1568     else
1569     {
1570         OIC_LOG(DEBUG, TAG, "option2, not response msg");
1571         res = CAAddBlockOptionImpl(block2, COAP_OPTION_BLOCK2, options);
1572         if (CA_STATUS_OK != res)
1573         {
1574             OIC_LOG(ERROR, TAG, "add has failed");
1575             goto exit;
1576         }
1577
1578         res = CAAddOptionToPDU(*pdu, options);
1579         if (CA_STATUS_OK != res)
1580         {
1581             OIC_LOG(ERROR, TAG, "add has failed");
1582             goto exit;
1583         }
1584         CALogBlockInfo(block2);
1585     }
1586
1587     return CA_STATUS_OK;
1588
1589 exit:
1590     CARemoveBlockDataFromList(blockID);
1591     return res;
1592 }
1593
1594 CAResult_t CAAddBlockOption1(coap_pdu_t **pdu, const CAInfo_t *info, size_t dataLength,
1595                              const CABlockDataID_t *blockID, coap_list_t **options)
1596 {
1597     OIC_LOG(DEBUG, TAG, "IN-AddBlockOption1");
1598     VERIFY_NON_NULL(pdu, TAG, "pdu");
1599     VERIFY_NON_NULL((*pdu), TAG, "(*pdu)");
1600     VERIFY_NON_NULL((*pdu)->hdr, TAG, "(*pdu)->hdr");
1601     VERIFY_NON_NULL(info, TAG, "info");
1602     VERIFY_NON_NULL(blockID, TAG, "blockID");
1603     VERIFY_NON_NULL(options, TAG, "options");
1604
1605     // get set block data from CABlock list-set.
1606     coap_block_t *block1 = CAGetBlockOption(blockID, COAP_OPTION_BLOCK1);
1607     if (!block1)
1608     {
1609         OIC_LOG(ERROR, TAG, "getting has failed");
1610         return CA_STATUS_FAILED;
1611     }
1612
1613     CAResult_t res = CA_STATUS_OK;
1614     uint32_t code = (*pdu)->hdr->coap_hdr_udp_t.code;
1615     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
1616     {
1617         CASetMoreBitFromBlock(dataLength, block1);
1618
1619         // if block number is 0, add size1 option
1620         if (0 == block1->num)
1621         {
1622             res = CAAddBlockSizeOption(*pdu, COAP_OPTION_SIZE1, dataLength, options);
1623             if (CA_STATUS_OK != res)
1624             {
1625                 OIC_LOG(ERROR, TAG, "add has failed");
1626                 goto exit;
1627             }
1628         }
1629
1630         // add block option to option list.
1631         res = CAAddBlockOptionImpl(block1, COAP_OPTION_BLOCK1, options);
1632         if (CA_STATUS_OK != res)
1633         {
1634             OIC_LOG(ERROR, TAG, "add has failed");
1635             goto exit;
1636         }
1637
1638         // add option list to pdu.
1639         res = CAAddOptionToPDU(*pdu, options);
1640         if (CA_STATUS_OK != res)
1641         {
1642             OIC_LOG(ERROR, TAG, "add has failed");
1643             goto exit;
1644         }
1645
1646         // add the payload data as the block size.
1647         if (!coap_add_block(*pdu, dataLength, (const unsigned char *) info->payload, block1->num,
1648                             block1->szx))
1649         {
1650             OIC_LOG(ERROR, TAG, "Data length is smaller than the start index");
1651             return CA_STATUS_FAILED;
1652         }
1653     }
1654     else
1655     {
1656         OIC_LOG(DEBUG, TAG, "received response message with block option1");
1657
1658         // add block option to option list.
1659         res = CAAddBlockOptionImpl(block1, COAP_OPTION_BLOCK1, options);
1660         if (CA_STATUS_OK != res)
1661         {
1662             OIC_LOG(ERROR, TAG, "add has failed");
1663             goto exit;
1664         }
1665
1666         // add option list to pdu.
1667         res = CAAddOptionToPDU(*pdu, options);
1668         if (CA_STATUS_OK != res)
1669         {
1670             OIC_LOG(ERROR, TAG, "add has failed");
1671             goto exit;
1672         }
1673
1674         // add the payload data as the block size.
1675         if (!coap_add_data(*pdu, dataLength, (const unsigned char *) info->payload))
1676         {
1677             OIC_LOG(ERROR, TAG, "failed to add payload");
1678             return CA_STATUS_FAILED;
1679         }
1680
1681         // if it is last block message, remove block data from list.
1682         if (0 == block1->m)
1683         {
1684             // remove data from list
1685             res = CARemoveBlockDataFromList(blockID);
1686             if (CA_STATUS_OK != res)
1687             {
1688                 OIC_LOG(ERROR, TAG, "remove has failed");
1689                 return res;
1690             }
1691         }
1692     }
1693
1694     CALogBlockInfo(block1);
1695
1696     OIC_LOG(DEBUG, TAG, "OUT-AddBlockOption1");
1697
1698     return CA_STATUS_OK;
1699
1700 exit:
1701     CARemoveBlockDataFromList(blockID);
1702     return res;
1703 }
1704
1705 CAResult_t CAAddBlockOptionImpl(coap_block_t *block, uint8_t blockType,
1706                                 coap_list_t **options)
1707 {
1708     OIC_LOG(DEBUG, TAG, "IN-AddBlockOptionImpl");
1709     VERIFY_NON_NULL(block, TAG, "block");
1710     VERIFY_NON_NULL(options, TAG, "options");
1711
1712     unsigned char buf[BLOCKWISE_OPTION_BUFFER] = { 0 };
1713     unsigned int optionLength = coap_encode_var_bytes(buf,
1714                                                       ((block->num << BLOCK_NUMBER_IDX)
1715                                                        | (block->m << BLOCK_M_BIT_IDX)
1716                                                        | block->szx));
1717
1718     int ret = coap_insert(options,
1719                           CACreateNewOptionNode(blockType, optionLength, (char *) buf),
1720                           CAOrderOpts);
1721     if (ret <= 0)
1722     {
1723         return CA_STATUS_INVALID_PARAM;
1724     }
1725
1726     OIC_LOG(DEBUG, TAG, "OUT-AddBlockOptionImpl");
1727     return CA_STATUS_OK;
1728 }
1729
1730 CAResult_t CAAddOptionToPDU(coap_pdu_t *pdu, coap_list_t **options)
1731 {
1732     // after adding the block option to option list, add option list to pdu.
1733     if (*options)
1734     {
1735         for (coap_list_t *opt = *options; opt; opt = opt->next)
1736         {
1737             OIC_LOG_V(DEBUG, TAG, "[%s] opt will be added.",
1738                       COAP_OPTION_DATA(*(coap_option *) opt->data));
1739
1740             OIC_LOG_V(DEBUG, TAG, "[%d] pdu length", pdu->length);
1741             int ret = coap_add_option(pdu, COAP_OPTION_KEY(*(coap_option *) opt->data),
1742                                       COAP_OPTION_LENGTH(*(coap_option *) opt->data),
1743                                       COAP_OPTION_DATA(*(coap_option *) opt->data), coap_udp);
1744             if (!ret)
1745             {
1746                 return CA_STATUS_FAILED;
1747             }
1748         }
1749     }
1750
1751     OIC_LOG_V(DEBUG, TAG, "[%d] pdu length after option", pdu->length);
1752
1753     return CA_STATUS_OK;
1754 }
1755
1756 CAResult_t CAAddBlockSizeOption(coap_pdu_t *pdu, uint16_t sizeType, size_t dataLength,
1757                                 coap_list_t **options)
1758 {
1759     OIC_LOG(DEBUG, TAG, "IN-CAAddBlockSizeOption");
1760     VERIFY_NON_NULL(pdu, TAG, "pdu");
1761     VERIFY_NON_NULL(options, TAG, "options");
1762
1763     if (sizeType != COAP_OPTION_SIZE1 && sizeType != COAP_OPTION_SIZE2)
1764     {
1765         OIC_LOG(ERROR, TAG, "unknown option type");
1766         return CA_STATUS_FAILED;
1767     }
1768
1769     unsigned char value[BLOCKWISE_OPTION_BUFFER] = { 0 };
1770     unsigned int optionLength = coap_encode_var_bytes(value, dataLength);
1771
1772     int ret = coap_insert(options,
1773                           CACreateNewOptionNode(sizeType, optionLength, (char *) value),
1774                           CAOrderOpts);
1775     if (ret <= 0)
1776     {
1777         return CA_STATUS_INVALID_PARAM;
1778     }
1779
1780     OIC_LOG(DEBUG, TAG, "OUT-CAAddBlockSizeOption");
1781
1782     return CA_STATUS_OK;
1783 }
1784
1785 // TODO make pdu const after libcoap is updated to support that.
1786 bool CAIsPayloadLengthInPduWithBlockSizeOption(coap_pdu_t *pdu,
1787                                                uint16_t sizeType,
1788                                                size_t *totalPayloadLen)
1789 {
1790     OIC_LOG(DEBUG, TAG, "IN-CAIsPayloadLengthInPduWithBlockSizeOption");
1791     VERIFY_NON_NULL(pdu, TAG, "pdu");
1792     VERIFY_NON_NULL(totalPayloadLen, TAG, "totalPayloadLen");
1793
1794     if (sizeType != COAP_OPTION_SIZE1 && sizeType != COAP_OPTION_SIZE2)
1795     {
1796         OIC_LOG(ERROR, TAG, "unknown option type");
1797         return CA_STATUS_FAILED;
1798     }
1799
1800     coap_opt_iterator_t opt_iter;
1801     coap_opt_t *option = coap_check_option(pdu, sizeType, &opt_iter);
1802     if (option)
1803     {
1804         OIC_LOG(DEBUG, TAG, "get size option from pdu");
1805         *totalPayloadLen = coap_decode_var_bytes(COAP_OPT_VALUE(option),
1806                                                  COAP_OPT_LENGTH(option));
1807
1808         OIC_LOG_V(DEBUG, TAG, "the total payload length to be received is [%zu]bytes",
1809                   *totalPayloadLen);
1810
1811         return true;
1812     }
1813
1814     OIC_LOG(DEBUG, TAG, "OUT-CAIsPayloadLengthInPduWithBlockSizeOption");
1815
1816     return false;
1817 }
1818
1819 uint8_t CACheckBlockErrorType(CABlockData_t *currData, coap_block_t *receivedBlock,
1820                               const CAData_t *receivedData, uint16_t blockType,
1821                               size_t dataLen)
1822 {
1823     OIC_LOG(DEBUG, TAG, "IN-CheckBlockError");
1824
1825     VERIFY_NON_NULL(currData, TAG, "currData is NULL");
1826     VERIFY_NON_NULL(receivedBlock, TAG, "receivedBlock is NULL");
1827     VERIFY_NON_NULL(receivedData, TAG, "receivedData is NULL");
1828
1829     // #1. check the received payload length
1830     size_t blockPayloadLen = 0;
1831     CAGetPayloadInfo(receivedData, &blockPayloadLen);
1832
1833     // #2. check if the block sequence is right
1834     if (COAP_OPTION_BLOCK1 == blockType)
1835     {
1836         size_t prePayloadLen = currData->receivedPayloadLen;
1837         if (prePayloadLen != (size_t) BLOCK_SIZE(receivedBlock->szx) * receivedBlock->num)
1838         {
1839             if (receivedBlock->num > currData->block1.num + 1)
1840             {
1841                 // 408 Error handling of block loss
1842                 OIC_LOG(ERROR, TAG, "option1: error 4.08");
1843                 OIC_LOG(ERROR, TAG, "it didn't order");
1844                 return CA_BLOCK_INCOMPLETE;
1845             }
1846             return CA_BLOCK_RECEIVED_ALREADY;
1847         }
1848     }
1849     else if (COAP_OPTION_BLOCK2 == blockType)
1850     {
1851         if (receivedBlock->num != currData->block2.num)
1852         {
1853             if (receivedBlock->num > currData->block2.num)
1854             {
1855                 // 408 Error handling of block loss
1856                 OIC_LOG(ERROR, TAG, "option2: error 4.08");
1857                 OIC_LOG(ERROR, TAG, "it didn't order");
1858                 return CA_BLOCK_INCOMPLETE;
1859             }
1860             return CA_BLOCK_RECEIVED_ALREADY;
1861         }
1862     }
1863
1864     // #3. check if error check logic is required
1865     size_t optionLen = dataLen - blockPayloadLen;
1866     if (receivedBlock->m && blockPayloadLen != (size_t) BLOCK_SIZE(receivedBlock->szx))
1867     {
1868         // 413 Error handling of too large entity
1869         if (COAP_MAX_PDU_SIZE < BLOCK_SIZE(receivedBlock->szx) + optionLen)
1870         {
1871             // buffer size is smaller than received block size
1872             OIC_LOG(ERROR, TAG, "error type 4.13");
1873             OIC_LOG(ERROR, TAG, "too large size");
1874
1875             // set the block size to be smaller than COAP_MAX_PDU_SIZE
1876             for (int32_t size = CA_DEFAULT_BLOCK_SIZE; size >= 0; size--)
1877             {
1878                 if (COAP_MAX_PDU_SIZE >= BLOCK_SIZE(size) + optionLen)
1879                 {
1880                     OIC_LOG_V(ERROR, TAG, "replace sze with %d", size);
1881                     currData->block2.szx = size;
1882                     currData->block1.szx = size;
1883                     break;
1884                 }
1885             }
1886             return CA_BLOCK_TOO_LARGE;
1887         }
1888         else
1889         {
1890             // 408 Error handling of payload loss
1891             OIC_LOG(ERROR, TAG, "error type 4.08");
1892             OIC_LOG(ERROR, TAG, "payload len != block sze");
1893             return CA_BLOCK_INCOMPLETE;
1894         }
1895     }
1896     else if (0 == receivedBlock->m && 0 != currData->payloadLength)
1897     {
1898         // if the received block is last block, check the total payload length
1899         size_t receivedPayloadLen = currData->receivedPayloadLen;
1900         receivedPayloadLen += blockPayloadLen;
1901
1902         if (receivedPayloadLen != currData->payloadLength)
1903         {
1904             OIC_LOG(ERROR, TAG, "error type 4.08");
1905             OIC_LOG(ERROR, TAG, "total payload length is wrong");
1906             return CA_BLOCK_INCOMPLETE;
1907         }
1908     }
1909
1910     OIC_LOG(DEBUG, TAG, "received all data normally");
1911
1912     OIC_LOG(DEBUG, TAG, "OUT-CheckBlockError");
1913
1914     return CA_BLOCK_UNKNOWN;
1915 }
1916
1917 CAResult_t CAUpdatePayloadData(CABlockData_t *currData, const CAData_t *receivedData,
1918                                uint8_t status, bool isSizeOption, uint16_t blockType)
1919 {
1920     OIC_LOG(DEBUG, TAG, "IN-UpdatePayloadData");
1921
1922     VERIFY_NON_NULL(currData, TAG, "currData");
1923     VERIFY_NON_NULL(receivedData, TAG, "receivedData");
1924
1925     // if error code is 4.08, do not update payload
1926     if (CA_BLOCK_INCOMPLETE == status)
1927     {
1928         OIC_LOG(ERROR, TAG, "no require to update");
1929         return CA_STATUS_OK;
1930     }
1931
1932     size_t blockPayloadLen = 0;
1933     CAPayload_t blockPayload = CAGetPayloadInfo(receivedData, &blockPayloadLen);
1934
1935     if (CA_BLOCK_TOO_LARGE == status)
1936     {
1937         blockPayloadLen = (COAP_OPTION_BLOCK2 == blockType) ?
1938                 BLOCK_SIZE(currData->block2.szx) : BLOCK_SIZE(currData->block1.szx);
1939     }
1940
1941     // memory allocation for the received block payload
1942     size_t prePayloadLen = currData->receivedPayloadLen;
1943     if (blockPayload)
1944     {
1945         if (currData->payloadLength)
1946         {
1947             // in case the block message has the size option
1948             // allocate the memory for the total payload
1949             if (isSizeOption)
1950             {
1951                 CAPayload_t prePayload = currData->payload;
1952
1953                 OIC_LOG(DEBUG, TAG, "allocate memory for the total payload");
1954                 currData->payload = (CAPayload_t) OICCalloc(1, currData->payloadLength);
1955                 if (NULL == currData->payload)
1956                 {
1957                     OIC_LOG(ERROR, TAG, "out of memory");
1958                     return CA_MEMORY_ALLOC_FAILED;
1959                 }
1960                 memcpy(currData->payload, prePayload, prePayloadLen);
1961                 OICFree(prePayload);
1962             }
1963
1964             // update the total payload
1965             memcpy(currData->payload + prePayloadLen, blockPayload, blockPayloadLen);
1966         }
1967         else
1968         {
1969             OIC_LOG(DEBUG, TAG, "allocate memory for the received block payload");
1970
1971             size_t totalPayloadLen = prePayloadLen + blockPayloadLen;
1972             CAPayload_t newPayload = OICRealloc(currData->payload, totalPayloadLen);
1973             if (NULL == newPayload)
1974             {
1975                 OIC_LOG(ERROR, TAG, "out of memory");
1976                 return CA_MEMORY_ALLOC_FAILED;
1977             }
1978
1979             // update the total payload
1980             memset(newPayload + prePayloadLen, 0, blockPayloadLen);
1981             currData->payload = newPayload;
1982             memcpy(currData->payload + prePayloadLen, blockPayload, blockPayloadLen);
1983         }
1984
1985         // update received payload length
1986         currData->receivedPayloadLen += blockPayloadLen;
1987
1988         OIC_LOG_V(DEBUG, TAG, "updated payload: %s, len: %zu", currData->payload,
1989                   currData->receivedPayloadLen);
1990     }
1991
1992     OIC_LOG(DEBUG, TAG, "OUT-UpdatePayloadData");
1993     return CA_STATUS_OK;
1994 }
1995
1996 CAData_t* CACreateNewDataSet(const coap_pdu_t *pdu, const CAEndpoint_t *endpoint)
1997 {
1998     VERIFY_NON_NULL_RET(pdu, TAG, "pdu", NULL);
1999     VERIFY_NON_NULL_RET(pdu->hdr, TAG, "pdu->hdr", NULL);
2000     VERIFY_NON_NULL_RET(endpoint, TAG, "endpoint", NULL);
2001
2002     CARequestInfo_t* requestInfo = NULL;
2003     CAResponseInfo_t* responseInfo = NULL;
2004
2005     uint32_t code = pdu->hdr->coap_hdr_udp_t.code;
2006     if (CA_GET == code || CA_POST == code || CA_PUT == code || CA_DELETE == code)
2007     {
2008         CAInfo_t responseData = { .tokenLength = pdu->hdr->coap_hdr_udp_t.token_length };
2009         responseData.token = (CAToken_t) OICMalloc(responseData.tokenLength);
2010         if (!responseData.token)
2011         {
2012             OIC_LOG(ERROR, TAG, "out of memory");
2013             return NULL;
2014         }
2015         memcpy(responseData.token, pdu->hdr->coap_hdr_udp_t.token, responseData.tokenLength);
2016
2017         responseInfo = (CAResponseInfo_t*) OICCalloc(1, sizeof(CAResponseInfo_t));
2018         if (!responseInfo)
2019         {
2020             OIC_LOG(ERROR, TAG, "out of memory");
2021             OICFree(responseData.token);
2022             return NULL;
2023         }
2024         responseInfo->info = responseData;
2025     }
2026     else
2027     {
2028         CAInfo_t requestData = { .tokenLength = pdu->hdr->coap_hdr_udp_t.token_length };
2029         requestData.token = (CAToken_t) OICMalloc(requestData.tokenLength);
2030         if (!requestData.token)
2031         {
2032             OIC_LOG(ERROR, TAG, "out of memory");
2033             return NULL;
2034         }
2035         memcpy(requestData.token, pdu->hdr->coap_hdr_udp_t.token, requestData.tokenLength);
2036
2037         requestInfo = (CARequestInfo_t*) OICCalloc(1, sizeof(CARequestInfo_t));
2038         if (!requestInfo)
2039         {
2040             OIC_LOG(ERROR, TAG, "out of memory");
2041             OICFree(requestData.token);
2042             return NULL;
2043         }
2044         requestInfo->info = requestData;
2045
2046         // get resource uri information from received response message
2047         // to send next request message to remote device
2048         CAResponseInfo_t* resInfo = (CAResponseInfo_t*)OICCalloc(1, sizeof(*resInfo));
2049         if (!resInfo)
2050         {
2051             OIC_LOG(ERROR, TAG, "memory allocation failed");
2052             OICFree(requestData.token);
2053             return NULL;
2054         }
2055
2056         CAGetResponseInfoFromPDU(pdu, resInfo, endpoint);
2057         requestInfo->method = CA_GET;
2058         requestInfo->info.messageId = CAGetMessageIdFromPduBinaryData(pdu->hdr, pdu->length);
2059         requestInfo->info.resourceUri = OICStrdup(resInfo->info.resourceUri);
2060
2061         // after copying the resource uri, destroy response info.
2062         CADestroyResponseInfoInternal(resInfo);
2063     }
2064
2065     CAData_t *data = (CAData_t *) OICCalloc(1, sizeof(CAData_t));
2066     if (!data)
2067     {
2068         OIC_LOG(ERROR, TAG, "out of memory");
2069         OICFree(requestInfo);
2070         OICFree(responseInfo);
2071         return NULL;
2072     }
2073
2074     data->requestInfo = requestInfo;
2075     data->responseInfo = responseInfo;
2076     data->remoteEndpoint = CACloneEndpoint(endpoint);
2077     data->type = SEND_TYPE_UNICAST;
2078
2079     return data;
2080 }
2081
2082 CAData_t *CACloneCAData(const CAData_t *data)
2083 {
2084     VERIFY_NON_NULL_RET(data, TAG, "data", NULL);
2085
2086     CAData_t *clone = (CAData_t *) OICCalloc(1, sizeof(CAData_t));
2087     if (!clone)
2088     {
2089         OIC_LOG(ERROR, TAG, "out of memory");
2090         return NULL;
2091     }
2092     *clone = *data;
2093
2094     if (data->requestInfo)
2095     {
2096         clone->requestInfo = CACloneRequestInfo(data->requestInfo);
2097     }
2098     else if (data->responseInfo)
2099     {
2100         clone->responseInfo = CACloneResponseInfo(data->responseInfo);
2101     }
2102
2103     if (data->remoteEndpoint)
2104     {
2105         clone->remoteEndpoint = CACloneEndpoint(data->remoteEndpoint);
2106     }
2107
2108     return clone;
2109 }
2110
2111 CAResult_t CAUpdatePayloadToCAData(CAData_t *data, const CAPayload_t payload,
2112                                    size_t payloadLen)
2113 {
2114     OIC_LOG(DEBUG, TAG, "IN-UpdatePayload");
2115
2116     VERIFY_NON_NULL(data, TAG, "data is NULL");
2117     VERIFY_NON_NULL(payload, TAG, "payload is NULL");
2118
2119     CAPayload_t newPayload = NULL;
2120     switch (data->dataType)
2121     {
2122         case CA_REQUEST_DATA:
2123             if (!data->requestInfo)
2124             {
2125                 OIC_LOG(ERROR, TAG, "request info is null");
2126                 return CA_STATUS_FAILED;
2127             }
2128             // allocate payload field
2129             newPayload = OICRealloc(data->requestInfo->info.payload, payloadLen);
2130             if (!newPayload)
2131             {
2132                 OIC_LOG(ERROR, TAG, "out of memory");
2133                 return CA_STATUS_FAILED;
2134             }
2135             data->requestInfo->info.payload = newPayload;
2136             memcpy(data->requestInfo->info.payload, payload, payloadLen);
2137             data->requestInfo->info.payloadSize = payloadLen;
2138             break;
2139
2140         case CA_RESPONSE_DATA:
2141             if (!data->responseInfo)
2142             {
2143                 OIC_LOG(ERROR, TAG, "response info is null");
2144                 return CA_STATUS_FAILED;
2145             }
2146             // allocate payload field
2147             newPayload = OICRealloc(data->responseInfo->info.payload, payloadLen);
2148             if (!newPayload)
2149             {
2150                 OIC_LOG(ERROR, TAG, "out of memory");
2151                 return CA_STATUS_FAILED;
2152             }
2153             data->responseInfo->info.payload = newPayload;
2154             memcpy(data->responseInfo->info.payload, payload, payloadLen);
2155             data->responseInfo->info.payloadSize = payloadLen;
2156             break;
2157
2158         default:
2159             // does not occur case
2160             OIC_LOG(ERROR, TAG, "not supported data type");
2161             return CA_NOT_SUPPORTED;
2162     }
2163
2164     OIC_LOG(DEBUG, TAG, "OUT-UpdatePayload");
2165
2166     return CA_STATUS_OK;
2167 }
2168
2169 CAPayload_t CAGetPayloadInfo(const CAData_t *data, size_t *payloadLen)
2170 {
2171     VERIFY_NON_NULL_RET(data, TAG, "data", NULL);
2172     VERIFY_NON_NULL_RET(payloadLen, TAG, "payloadLen", NULL);
2173
2174     if (data->requestInfo)
2175     {
2176         if (data->requestInfo->info.payload)
2177         {
2178             *payloadLen = data->requestInfo->info.payloadSize;
2179             return data->requestInfo->info.payload;
2180         }
2181     }
2182     else
2183     {
2184         if (data->responseInfo->info.payload)
2185         {
2186             *payloadLen = data->responseInfo->info.payloadSize;
2187             return data->responseInfo->info.payload;
2188         }
2189     }
2190
2191     return NULL;
2192 }
2193
2194 CAResult_t CAHandleBlockErrorResponse(coap_block_t *block, uint16_t blockType,
2195                                       uint32_t responseResult)
2196 {
2197     OIC_LOG(DEBUG, TAG, "IN-HandleBlockErrorRes");
2198     VERIFY_NON_NULL(block, TAG, "block is NULL");
2199
2200     // update block data
2201     switch (responseResult)
2202     {
2203         case CA_REQUEST_ENTITY_INCOMPLETE:
2204             block->num = 0;
2205             break;
2206         case CA_REQUEST_ENTITY_TOO_LARGE:
2207             if (COAP_OPTION_BLOCK1 == blockType)
2208             {
2209                 block->num++;
2210             }
2211             block->m = 0;
2212             break;
2213         default:
2214             OIC_LOG_V(ERROR, TAG, "there is no Error Code of BWT[%d]", responseResult);
2215             return CA_STATUS_FAILED;
2216     }
2217
2218     OIC_LOG(DEBUG, TAG, "OUT-HandleBlockErrorRes");
2219     return CA_STATUS_OK;
2220 }
2221
2222 CAResult_t CAUpdateBlockOptionType(const CABlockDataID_t *blockID, uint8_t blockType)
2223 {
2224     OIC_LOG(DEBUG, TAG, "IN-UpdateBlockOptionType");
2225     VERIFY_NON_NULL(blockID, TAG, "blockID");
2226
2227     ca_mutex_lock(g_context.blockDataListMutex);
2228
2229     size_t len = u_arraylist_length(g_context.dataList);
2230     for (size_t i = 0; i < len; i++)
2231     {
2232         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2233         if (CABlockidMatches(currData, blockID))
2234         {
2235             currData->type = blockType;
2236             ca_mutex_unlock(g_context.blockDataListMutex);
2237             OIC_LOG(DEBUG, TAG, "OUT-UpdateBlockOptionType");
2238             return CA_STATUS_OK;
2239         }
2240     }
2241     ca_mutex_unlock(g_context.blockDataListMutex);
2242
2243     OIC_LOG(DEBUG, TAG, "OUT-UpdateBlockOptionType");
2244     return CA_STATUS_FAILED;
2245 }
2246
2247 uint8_t CAGetBlockOptionType(const CABlockDataID_t *blockID)
2248 {
2249     OIC_LOG(DEBUG, TAG, "IN-GetBlockOptionType");
2250     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", 0);
2251
2252     ca_mutex_lock(g_context.blockDataListMutex);
2253
2254     size_t len = u_arraylist_length(g_context.dataList);
2255     for (size_t i = 0; i < len; i++)
2256     {
2257         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2258         if (CABlockidMatches(currData, blockID))
2259         {
2260             ca_mutex_unlock(g_context.blockDataListMutex);
2261             OIC_LOG(DEBUG, TAG, "OUT-GetBlockOptionType");
2262             return currData->type;
2263         }
2264     }
2265     ca_mutex_unlock(g_context.blockDataListMutex);
2266
2267     OIC_LOG(DEBUG, TAG, "OUT-GetBlockOptionType");
2268     return 0;
2269 }
2270
2271 CAData_t *CAGetDataSetFromBlockDataList(const CABlockDataID_t *blockID)
2272 {
2273     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", NULL);
2274
2275     ca_mutex_lock(g_context.blockDataListMutex);
2276
2277     size_t len = u_arraylist_length(g_context.dataList);
2278     for (size_t i = 0; i < len; i++)
2279     {
2280         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2281         if (CABlockidMatches(currData, blockID))
2282         {
2283             ca_mutex_unlock(g_context.blockDataListMutex);
2284             return currData->sentData;
2285         }
2286     }
2287     ca_mutex_unlock(g_context.blockDataListMutex);
2288
2289     return NULL;
2290 }
2291
2292 CAResult_t CAGetTokenFromBlockDataList(const coap_pdu_t *pdu, const CAEndpoint_t *endpoint,
2293                                        CAResponseInfo_t *responseInfo)
2294 {
2295     OIC_LOG(DEBUG, TAG, "IN-CAGetTokenFromBlockDataList");
2296     VERIFY_NON_NULL(pdu, TAG, "pdu");
2297     VERIFY_NON_NULL(endpoint, TAG, "endpoint");
2298     VERIFY_NON_NULL(responseInfo, TAG, "responseInfo");
2299
2300     ca_mutex_lock(g_context.blockDataListMutex);
2301
2302     size_t len = u_arraylist_length(g_context.dataList);
2303     for (size_t i = 0; i < len; i++)
2304     {
2305         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2306         if (NULL == currData)
2307         {
2308             continue;
2309         }
2310
2311         if (NULL != currData->sentData && NULL != currData->sentData->requestInfo)
2312         {
2313             if (pdu->hdr->coap_hdr_udp_t.id == currData->sentData->requestInfo->info.messageId &&
2314                     endpoint->adapter == currData->sentData->remoteEndpoint->adapter)
2315             {
2316                 if (NULL != currData->sentData->requestInfo->info.token)
2317                 {
2318                     uint8_t length = currData->sentData->requestInfo->info.tokenLength;
2319                     responseInfo->info.tokenLength = length;
2320                     responseInfo->info.token = (char *) OICMalloc(length);
2321                     if (NULL == responseInfo->info.token)
2322                     {
2323                         OIC_LOG(ERROR, TAG, "out of memory");
2324                         ca_mutex_unlock(g_context.blockDataListMutex);
2325                         return CA_MEMORY_ALLOC_FAILED;
2326                     }
2327                     memcpy(responseInfo->info.token, currData->sentData->requestInfo->info.token,
2328                            responseInfo->info.tokenLength);
2329
2330                     ca_mutex_unlock(g_context.blockDataListMutex);
2331                     OIC_LOG(DEBUG, TAG, "OUT-CAGetTokenFromBlockDataList");
2332                     return CA_STATUS_OK;
2333                 }
2334             }
2335         }
2336     }
2337
2338     ca_mutex_unlock(g_context.blockDataListMutex);
2339
2340     OIC_LOG(DEBUG, TAG, "OUT-CAGetTokenFromBlockDataList");
2341     return CA_STATUS_FAILED;
2342 }
2343
2344 CAResult_t CACheckBlockDataValidation(const CAData_t *sendData, CABlockData_t **blockData)
2345 {
2346     VERIFY_NON_NULL(sendData, TAG, "sendData");
2347     VERIFY_NON_NULL(blockData, TAG, "blockData");
2348
2349     if (sendData->responseInfo)
2350     {
2351         CABlockDataID_t* blockDataID = CACreateBlockDatablockId(
2352                 (CAToken_t)sendData->responseInfo->info.token,
2353                 sendData->responseInfo->info.tokenLength,
2354                 sendData->remoteEndpoint->port);
2355         if (NULL == blockDataID || blockDataID->idLength < 1)
2356         {
2357             OIC_LOG(ERROR, TAG, "blockId is null");
2358             CADestroyBlockID(blockDataID);
2359             return CA_STATUS_FAILED;
2360         }
2361
2362         CABlockData_t *storedData = CAGetBlockDataFromBlockDataList(blockDataID);
2363         if (storedData)
2364         {
2365             OIC_LOG(DEBUG, TAG, "Send response about the received block request.");
2366             if (storedData->sentData)
2367             {
2368                 OIC_LOG(DEBUG, TAG, "init block number");
2369                 CADestroyDataSet(storedData->sentData);
2370             }
2371             storedData->sentData = CACloneCAData(sendData);
2372             *blockData = storedData;
2373             CADestroyBlockID(blockDataID);
2374             return CA_STATUS_OK;
2375         }
2376         CADestroyBlockID(blockDataID);
2377     }
2378
2379     return CA_STATUS_FAILED;
2380 }
2381
2382 CABlockData_t *CAGetBlockDataFromBlockDataList(const CABlockDataID_t *blockID)
2383 {
2384     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", NULL);
2385
2386     ca_mutex_lock(g_context.blockDataListMutex);
2387
2388     size_t len = u_arraylist_length(g_context.dataList);
2389     for (size_t i = 0; i < len; i++)
2390     {
2391         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2392         if (CABlockidMatches(currData, blockID))
2393         {
2394             ca_mutex_unlock(g_context.blockDataListMutex);
2395             return currData;
2396         }
2397     }
2398     ca_mutex_unlock(g_context.blockDataListMutex);
2399
2400     return NULL;
2401 }
2402
2403 coap_block_t *CAGetBlockOption(const CABlockDataID_t *blockID, uint16_t blockType)
2404 {
2405     OIC_LOG(DEBUG, TAG, "IN-GetBlockOption");
2406     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", NULL);
2407
2408     ca_mutex_lock(g_context.blockDataListMutex);
2409
2410     size_t len = u_arraylist_length(g_context.dataList);
2411     for (size_t i = 0; i < len; i++)
2412     {
2413         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2414         if (CABlockidMatches(currData, blockID))
2415         {
2416             ca_mutex_unlock(g_context.blockDataListMutex);
2417             OIC_LOG(DEBUG, TAG, "OUT-GetBlockOption");
2418             if (COAP_OPTION_BLOCK2 == blockType)
2419             {
2420                 return &currData->block2;
2421             }
2422             else if (COAP_OPTION_BLOCK1 == blockType)
2423             {
2424                 return &currData->block1;
2425             }
2426         }
2427     }
2428     ca_mutex_unlock(g_context.blockDataListMutex);
2429
2430     OIC_LOG(DEBUG, TAG, "OUT-GetBlockOption");
2431     return NULL;
2432 }
2433
2434 CAPayload_t CAGetPayloadFromBlockDataList(const CABlockDataID_t *blockID,
2435                                           size_t *fullPayloadLen)
2436 {
2437     OIC_LOG(DEBUG, TAG, "IN-GetFullPayload");
2438     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", NULL);
2439     VERIFY_NON_NULL_RET(fullPayloadLen, TAG, "fullPayloadLen", NULL);
2440
2441     ca_mutex_lock(g_context.blockDataListMutex);
2442
2443     size_t len = u_arraylist_length(g_context.dataList);
2444     for (size_t i = 0; i < len; i++)
2445     {
2446         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2447         if (CABlockidMatches(currData, blockID))
2448         {
2449             ca_mutex_unlock(g_context.blockDataListMutex);
2450             *fullPayloadLen = currData->receivedPayloadLen;
2451             OIC_LOG(DEBUG, TAG, "OUT-GetFullPayload");
2452             return currData->payload;
2453         }
2454     }
2455     ca_mutex_unlock(g_context.blockDataListMutex);
2456
2457     OIC_LOG(DEBUG, TAG, "OUT-GetFullPayload");
2458     return NULL;
2459 }
2460
2461 CABlockData_t *CACreateNewBlockData(const CAData_t *sendData)
2462 {
2463     OIC_LOG(DEBUG, TAG, "IN-CACreateNewBlockData");
2464     VERIFY_NON_NULL_RET(sendData, TAG, "sendData", NULL);
2465
2466     // create block data
2467     CABlockData_t *data = (CABlockData_t *) OICCalloc(1, sizeof(CABlockData_t));
2468     if (!data)
2469     {
2470         OIC_LOG(ERROR, TAG, "memory alloc has failed");
2471         return NULL;
2472     }
2473
2474     data->block1.szx = CA_DEFAULT_BLOCK_SIZE;
2475     data->block2.szx = CA_DEFAULT_BLOCK_SIZE;
2476     data->sentData = CACloneCAData(sendData);
2477     if (!data->sentData)
2478     {
2479         OIC_LOG(ERROR, TAG, PCF("memory alloc has failed"));
2480         OICFree(data);
2481         return NULL;
2482     }
2483
2484     CAToken_t token = NULL;
2485     uint8_t tokenLength = 0;
2486     if (data->sentData->requestInfo)
2487     {
2488         // update token info
2489         tokenLength = data->sentData->requestInfo->info.tokenLength;
2490         token = data->sentData->requestInfo->info.token;
2491     }
2492     else if (data->sentData->responseInfo)
2493     {
2494         tokenLength = data->sentData->responseInfo->info.tokenLength;
2495         token = data->sentData->responseInfo->info.token;
2496     }
2497
2498     if (!data->sentData->remoteEndpoint)
2499     {
2500         OIC_LOG(ERROR, TAG, "remoteEndpoint is null");
2501         CADestroyDataSet(data->sentData);
2502         OICFree(data);
2503         return NULL;
2504     }
2505
2506     CABlockDataID_t* blockDataID = CACreateBlockDatablockId(token, tokenLength,
2507                                                             data->sentData->remoteEndpoint->port);
2508     if (NULL == blockDataID || blockDataID->idLength < 1)
2509     {
2510         OIC_LOG(ERROR, TAG, "blockId is null");
2511         CADestroyBlockID(blockDataID);
2512         CADestroyDataSet(data->sentData);
2513         OICFree(data);
2514         return NULL;
2515     }
2516     data->blockDataId = blockDataID;
2517
2518     ca_mutex_lock(g_context.blockDataListMutex);
2519
2520     bool res = u_arraylist_add(g_context.dataList, (void *) data);
2521     if (!res)
2522     {
2523         OIC_LOG(ERROR, TAG, "add has failed");
2524         CADestroyBlockID(data->blockDataId);
2525         CADestroyDataSet(data->sentData);
2526         OICFree(data);
2527         ca_mutex_unlock(g_context.blockDataListMutex);
2528         return NULL;
2529     }
2530     ca_mutex_unlock(g_context.blockDataListMutex);
2531
2532     OIC_LOG(DEBUG, TAG, "OUT-CreateBlockData");
2533     return data;
2534 }
2535
2536 CAResult_t CARemoveBlockDataFromList(const CABlockDataID_t *blockID)
2537 {
2538     OIC_LOG(DEBUG, TAG, "CARemoveBlockData");
2539     VERIFY_NON_NULL(blockID, TAG, "blockID");
2540
2541     ca_mutex_lock(g_context.blockDataListMutex);
2542
2543     size_t len = u_arraylist_length(g_context.dataList);
2544     for (size_t i = 0; i < len; i++)
2545     {
2546         CABlockData_t *currData = (CABlockData_t *) u_arraylist_get(g_context.dataList, i);
2547         if (CABlockidMatches(currData, blockID))
2548         {
2549             CABlockData_t *removedData = u_arraylist_remove(g_context.dataList, i);
2550             if (!removedData)
2551             {
2552                 OIC_LOG(ERROR, TAG, "data is NULL");
2553                 ca_mutex_unlock(g_context.blockDataListMutex);
2554                 return CA_STATUS_FAILED;
2555             }
2556
2557             // destroy memory
2558             CADestroyDataSet(currData->sentData);
2559             CADestroyBlockID(currData->blockDataId);
2560             OICFree(currData->payload);
2561             OICFree(currData);
2562             ca_mutex_unlock(g_context.blockDataListMutex);
2563             return CA_STATUS_OK;
2564         }
2565     }
2566     ca_mutex_unlock(g_context.blockDataListMutex);
2567
2568     return CA_STATUS_OK;
2569 }
2570
2571 void CADestroyDataSet(CAData_t* data)
2572 {
2573     VERIFY_NON_NULL_VOID(data, TAG, "data");
2574
2575     CAFreeEndpoint(data->remoteEndpoint);
2576     CADestroyRequestInfoInternal(data->requestInfo);
2577     CADestroyResponseInfoInternal(data->responseInfo);
2578     OICFree(data);
2579 }
2580
2581 CABlockDataID_t* CACreateBlockDatablockId(const CAToken_t token, uint8_t tokenLength,
2582                                           uint16_t portNumber)
2583 {
2584     char port[PORT_LENGTH] = { 0, };
2585     port[0] = (char) ((portNumber >> 8) & 0xFF);
2586     port[1] = (char) (portNumber & 0xFF);
2587
2588     CABlockDataID_t* blockDataID = (CABlockDataID_t *) OICMalloc(sizeof(CABlockDataID_t));
2589     if (!blockDataID)
2590     {
2591         OIC_LOG(ERROR, TAG, "memory alloc has failed");
2592         return NULL;
2593     }
2594     blockDataID->idLength = tokenLength + sizeof(port);
2595     blockDataID->id = (uint8_t *) OICMalloc(blockDataID->idLength);
2596     if (!blockDataID->id)
2597     {
2598         OIC_LOG(ERROR, TAG, "memory alloc has failed");
2599         OICFree(blockDataID);
2600         return NULL;
2601     }
2602
2603     if (token)
2604     {
2605         memcpy(blockDataID->id, token, tokenLength);
2606     }
2607
2608     memcpy(blockDataID->id + tokenLength, port, sizeof(port));
2609
2610     OIC_LOG(DEBUG, TAG, "BlockID is ");
2611     OIC_LOG_BUFFER(DEBUG, TAG, (const uint8_t *)blockDataID->id, blockDataID->idLength);
2612
2613     return blockDataID;
2614 }
2615
2616 void CADestroyBlockID(CABlockDataID_t *blockID)
2617 {
2618     VERIFY_NON_NULL_VOID(blockID, TAG, "blockID");
2619     OICFree(blockID->id);
2620     OICFree(blockID);
2621     blockID = NULL;
2622 }
2623
2624 bool CABlockidMatches(const CABlockData_t *currData, const CABlockDataID_t *blockID)
2625 {
2626     VERIFY_NON_NULL_RET(currData, TAG, "currData", false);
2627     VERIFY_NON_NULL_RET(blockID, TAG, "blockID", false);
2628     VERIFY_NON_NULL_RET(blockID->id, TAG, "blockID->id", false);
2629
2630     if ((currData->blockDataId)
2631         && (currData->blockDataId->id)
2632         && (currData->blockDataId->idLength == blockID->idLength)
2633         && !memcmp(currData->blockDataId->id, blockID->id, currData->blockDataId->idLength))
2634     {
2635         return true;
2636     }
2637     return false;
2638 }
2639
2640 void CALogBlockInfo(coap_block_t *block)
2641 {
2642     VERIFY_NON_NULL_VOID(block, TAG, "block");
2643
2644     OIC_LOG(DEBUG, TAG, "block option info");
2645
2646     OIC_LOG_V(DEBUG, TAG, "block option-num : %d", block->num);
2647
2648     OIC_LOG_V(DEBUG, TAG, "block option-m   : %d", block->m);
2649
2650     OIC_LOG_V(DEBUG, TAG, "block option-szx : %d", block->szx);
2651 }