Revision:
0:25fa8795676b
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/simple-mbed-cloud-client/mbed-cloud-client/mbed-client/source/m2mtlvserializer.cpp	Sun Apr 18 15:20:23 2021 +0000
@@ -0,0 +1,305 @@
+/*
+ * Copyright (c) 2015 ARM Limited. All rights reserved.
+ * SPDX-License-Identifier: Apache-2.0
+ * Licensed under the Apache License, Version 2.0 (the License); you may
+ * not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ * http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an AS IS BASIS, WITHOUT
+ * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+#include "include/m2mtlvserializer.h"
+#include "mbed-client/m2mconstants.h"
+
+#include <stdlib.h>
+#include "common_functions.h"
+
+#define TRACE_GROUP "mClt"
+
+#define MAX_TLV_LENGTH_SIZE 3
+#define MAX_TLV_ID_SIZE 2
+#define TLV_TYPE_SIZE 1
+
+uint8_t* M2MTLVSerializer::serialize(const M2MObjectInstanceList &object_instance_list, uint32_t &size)
+{
+    return serialize_object_instances(object_instance_list, size);
+}
+
+uint8_t* M2MTLVSerializer::serialize(const M2MResourceList &resource_list, uint32_t &size)
+{
+    bool valid = true;
+    return serialize_resources(resource_list, size,valid);
+}
+
+uint8_t* M2MTLVSerializer::serialize(const M2MResource *resource, uint32_t &size)
+{
+    uint8_t* data = NULL;
+    serialize(resource, data, size);
+    return data;
+}
+
+uint8_t* M2MTLVSerializer::serialize_object_instances(const M2MObjectInstanceList &object_instance_list, uint32_t &size)
+{
+    uint8_t *data = NULL;
+
+    if(!object_instance_list.empty()) {
+        M2MObjectInstanceList::const_iterator it;
+        it = object_instance_list.begin();
+        for (; it!=object_instance_list.end(); it++) {            
+            uint16_t id = (*it)->instance_id();
+            serialize(id, *it, data, size);            
+        }
+    }
+    return data;
+}
+
+uint8_t* M2MTLVSerializer::serialize_resources(const M2MResourceList &resource_list, uint32_t &size, bool &valid)
+{
+    uint8_t *data = NULL;
+
+    if(!resource_list.empty()) {
+        M2MResourceList::const_iterator it;
+        it = resource_list.begin();
+        for (; it!=resource_list.end(); it++) {
+            if((*it)->name_id() == -1) {
+                valid = false;
+                break;
+            }
+        }
+        if(valid) {
+            it = resource_list.begin();
+            for (; it!=resource_list.end(); it++) {
+                if (((*it)->operation() & M2MBase::GET_ALLOWED) == M2MBase::GET_ALLOWED) {
+                    if(!serialize(*it, data, size)) {
+                        /* serializing has failed */
+                        /* free data so far */
+                        free(data);
+                        /* invalidate */
+                        valid = false;
+                        /* return NULL immediately */
+                        return NULL;
+                    }
+                }
+            }
+        }
+    }
+    return data;
+}
+
+bool M2MTLVSerializer::serialize(uint16_t id, const M2MObjectInstance *object_instance, uint8_t *&data, uint32_t &size)
+{
+    uint8_t *resource_data = NULL;
+    uint32_t resource_size = 0;
+    bool success;
+
+    bool valid = true;
+    resource_data = serialize_resources(object_instance->resources(),resource_size,valid);
+    if(valid) {
+        if(serialize_TILV(TYPE_OBJECT_INSTANCE, id, resource_data, resource_size, data, size)) {
+            success = true;
+        } else {
+            /* serializing object instance failed */
+            success = false;
+        }
+        free(resource_data);
+    } else {
+        /* serializing resources failed */
+        success = false;
+    }
+    return success;
+}
+
+bool M2MTLVSerializer::serialize(const M2MResource *resource, uint8_t *&data, uint32_t &size)
+{
+    bool success = false;
+    if(resource->name_id() != -1) {
+        success = resource->supports_multiple_instances() ?
+                serialize_multiple_resource(resource, data, size) :
+                serialize_resource(resource, data, size);
+    }
+    return success;
+}
+
+bool M2MTLVSerializer::serialize_resource(const M2MResource *resource, uint8_t *&data, uint32_t &size)
+{
+    bool success = false;
+    if(resource->name_id() != -1) {
+        if ( (resource->resource_instance_type() == M2MResourceBase::INTEGER) ||
+             (resource->resource_instance_type() == M2MResourceBase::BOOLEAN) ||
+             (resource->resource_instance_type() == M2MResourceBase::TIME) ) {
+            success = serialize_TLV_binary_int(resource, TYPE_RESOURCE, resource->name_id(), data, size);
+        }
+        else if (resource->resource_instance_type() == M2MResourceBase::FLOAT) {
+            success = serialize_TLV_binary_float(resource, TYPE_RESOURCE, resource->name_id(), data, size);
+        }
+        else {
+             success = serialize_TILV(TYPE_RESOURCE, resource->name_id(),
+                      resource->value(), resource->value_length(), data, size);
+        }
+    }
+    return success;
+}
+
+bool M2MTLVSerializer::serialize_multiple_resource(const M2MResource *resource, uint8_t *&data, uint32_t &size)
+{
+    bool success = false;
+    uint8_t *nested_data = NULL;
+    uint32_t nested_data_size = 0;
+
+    const M2MResourceInstanceList &instance_list = resource->resource_instances();
+    if(!instance_list.empty()) {
+        M2MResourceInstanceList::const_iterator it;
+        it = instance_list.begin();
+        for (; it!=instance_list.end(); it++) {
+            uint16_t id = (*it)->instance_id();
+            if (((*it)->operation() & M2MBase::GET_ALLOWED) == M2MBase::GET_ALLOWED) {
+                if(!serialize_resource_instance(id, (*it), nested_data, nested_data_size)) {
+                    /* serializing instance has failed */
+                    /* free data so far allocated */
+                    free(nested_data);
+                    /* return fail immediately*/
+                    success = false;
+                    return success;
+                }
+            }
+        }
+    }
+    if(resource->name_id() != -1 &&
+            (resource->operation() & M2MBase::GET_ALLOWED) == M2MBase::GET_ALLOWED) {
+        success = serialize_TILV(TYPE_MULTIPLE_RESOURCE, resource->name_id(),
+                                    nested_data, nested_data_size, data, size);
+    }
+
+    free(nested_data);
+    return success;
+}
+
+bool M2MTLVSerializer::serialize_resource_instance(uint16_t id, const M2MResourceInstance *resource, uint8_t *&data, uint32_t &size)
+{
+    bool success;
+
+    if ( (resource->resource_instance_type() == M2MResourceBase::INTEGER) ||
+         (resource->resource_instance_type() == M2MResourceBase::BOOLEAN) ||
+         (resource->resource_instance_type() == M2MResourceBase::TIME) ) {
+        success=serialize_TLV_binary_int(resource, TYPE_RESOURCE_INSTANCE, id, data, size);
+    }
+    else if (resource->resource_instance_type() == M2MResourceBase::FLOAT) {
+        success=serialize_TLV_binary_float(resource, TYPE_RESOURCE_INSTANCE, id, data, size);
+    }
+    else {
+        success=serialize_TILV(TYPE_RESOURCE_INSTANCE, id, resource->value(), resource->value_length(), data, size);
+    }
+
+    return success;
+}
+
+/* See, OMA-TS-LightweightM2M-V1_0-20170208-A, Appendix C,
+ * Data Types, Integer, Boolean and Time TLV Format */
+bool M2MTLVSerializer::serialize_TLV_binary_int(const M2MResourceBase *resource, uint8_t type, uint16_t id, uint8_t *&data, uint32_t &size)
+{
+    int64_t valueInt = resource->get_value_int();
+    uint32_t buffer_size;
+    /* max len 8 bytes */
+    uint8_t buffer[8];
+
+    if (resource->resource_instance_type() == M2MResourceBase::BOOLEAN) {
+        buffer_size = 1;
+        buffer[0] = valueInt;
+    } else {
+        buffer_size = 8;
+        common_write_64_bit(valueInt, buffer);
+    }
+
+    return serialize_TILV(type, id, buffer, buffer_size, data, size);
+}
+
+/* See, OMA-TS-LightweightM2M-V1_0-20170208-A, Appendix C,
+ * Data Type Float (32 bit only) TLV Format */
+bool M2MTLVSerializer::serialize_TLV_binary_float(const M2MResourceBase *resource, uint8_t type, uint16_t id, uint8_t *&data, uint32_t &size)
+{
+    float valueFloat = resource->get_value_float();
+    /* max len 8 bytes */
+    uint8_t buffer[4];
+
+    common_write_32_bit(*(uint32_t*)&valueFloat, buffer);
+
+    return serialize_TILV(type, id, buffer, 4, data, size);
+}
+
+
+bool M2MTLVSerializer::serialize_TILV(uint8_t type, uint16_t id, uint8_t *value, uint32_t value_length, uint8_t *&data, uint32_t &size)
+{
+    uint8_t *tlv = 0;
+    const uint32_t type_length = TLV_TYPE_SIZE;
+    type += id < 256 ? 0 : ID16;
+    type += value_length < 8 ? value_length :
+            value_length < 256 ? LENGTH8 :
+            value_length < 65536 ? LENGTH16 : LENGTH24;
+    uint8_t tlv_type;
+    tlv_type = type & 0xFF;
+
+    uint32_t id_size;
+    uint8_t id_array[MAX_TLV_ID_SIZE];
+    serialize_id(id, id_size, id_array);
+
+    uint32_t length_size;
+    uint8_t length_array[MAX_TLV_LENGTH_SIZE];
+    serialize_length(value_length, length_size, length_array);
+
+    tlv = (uint8_t*)malloc(size + type_length + id_size + length_size + value_length);
+    if (!tlv) {
+        /* memory allocation has failed */
+        /* return failure immediately */
+        return false;
+        /* eventually NULL will be returned to serializer public method caller */
+    }
+    if(data) {
+        memcpy(tlv, data, size);
+        free(data);
+    }
+    memcpy(tlv+size, &tlv_type, type_length);
+    memcpy(tlv+size+type_length, id_array, id_size);
+    memcpy(tlv+size+type_length+id_size, length_array, length_size);
+    memcpy(tlv+size+type_length+id_size+length_size, value, value_length);
+
+    data = tlv;
+    size += type_length + id_size + length_size + value_length;
+    return true;
+}
+
+void M2MTLVSerializer::serialize_id(uint16_t id, uint32_t &size, uint8_t *id_ptr)
+{
+    if(id > 255) {
+        size=2;
+        id_ptr[0] = (id & 0xFF00) >> 8;
+        id_ptr[1] = id & 0xFF;
+    } else {
+        size=1;
+        id_ptr[0] = id & 0xFF;
+    }
+}
+
+void M2MTLVSerializer::serialize_length(uint32_t length, uint32_t &size, uint8_t *length_ptr)
+{
+    if (length > 65535) {
+        size = 3;
+        length_ptr[0] = (length & 0xFF0000) >> 16;
+        length_ptr[1] = (length & 0xFF00) >> 8;
+        length_ptr[2] = length & 0xFF;
+    } else if (length > 255) {
+        size = 2;
+        length_ptr[0] = (length & 0xFF00) >> 8;
+        length_ptr[1] = length & 0xFF;
+    } else if (length > 7) {
+        size = 1;
+        length_ptr[0] = length & 0xFF;
+    } else {
+        size=0;
+    }
+}
+