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