resource/csdk/connectivity/src/cablockwisetransfer.c

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