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