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