resource/csdk/connectivity/src/cablockwisetransfer.c

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