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