resource/csdk/connectivity/src/cablockwisetransfer.c

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