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