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