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