Feature/oscbs 29 calendar time object (#440)

* Added basic Calendar object, unit tests, and integration with example device object. * Added basic Time Value object, unit tests, and integration with example device object. --------- Co-authored-by: Steve Karg <skarg@users.sourceforge.net>
2024-02-02 08:01:27 +03:00
parent 340bd09561
commit 8f576461a8
38 changed files with 2574 additions and 45 deletions
@@ -0,0 +1,141 @@
+/**
+ * @file
+ * @brief Unit test for BACnet Time Value object encode/decode APIs
+ * @author Mikhail Antropov <michail.antropov@dsr-corporation.com>
+ * @author Steve Karg <skarg@users.sourceforge.net>
+ * @date June 2023
+ *
+ * SPDX-License-Identifier: MIT
+ */
+#include <zephyr/ztest.h>
+#include <bacnet/basic/object/time_value.h>
+#include <bacnet/bactext.h>
+
+/**
+ * @addtogroup bacnet_tests
+ * @{
+ */
+
+/**
+ * @brief Test Time Value handling
+ */
+static void testTimeValue(void)
+{
+    uint8_t apdu[MAX_APDU] = { 0 };
+    int len = 0, test_len = 0;
+    BACNET_READ_PROPERTY_DATA rpdata = { 0 };
+    BACNET_WRITE_PROPERTY_DATA wpdata = { 0 };
+    BACNET_APPLICATION_DATA_VALUE value = {0};
+    const int *pRequired = NULL;
+    const int *pOptional = NULL;
+    const int *pProprietary = NULL;
+    const uint32_t instance = 123;
+    uint32_t test_instance = 0;
+    bool status = false;
+    unsigned index;
+
+    Time_Value_Init();
+    test_instance = Time_Value_Create(instance);
+    zassert_equal(test_instance, instance, NULL);
+    status = Time_Value_Valid_Instance(instance);
+    zassert_true(status, NULL);
+    index = Time_Value_Instance_To_Index(instance);
+    zassert_equal(index, 0, NULL);
+
+    rpdata.application_data = &apdu[0];
+    rpdata.application_data_len = sizeof(apdu);
+    rpdata.object_type = OBJECT_TIME_VALUE;
+    rpdata.object_instance = instance;
+    rpdata.array_index = BACNET_ARRAY_ALL;
+
+    Time_Value_Property_Lists(
+        &pRequired, &pOptional, &pProprietary);
+    while ((*pRequired) >= 0) {
+        rpdata.object_property = *pRequired;
+        rpdata.array_index = BACNET_ARRAY_ALL;
+        len = Time_Value_Read_Property(&rpdata);
+        zassert_not_equal(len, BACNET_STATUS_ERROR,
+            "property '%s': failed to ReadProperty!\n",
+            bactext_property_name(rpdata.object_property));
+        if (len >= 0) {
+            test_len = bacapp_decode_known_property(rpdata.application_data,
+                len, &value, rpdata.object_type, rpdata.object_property);
+            if (rpdata.object_property != PROP_PRIORITY_ARRAY) {
+                zassert_equal(len, test_len,
+                    "property '%s': failed to decode!\n",
+                    bactext_property_name(rpdata.object_property));
+            }
+            /* check WriteProperty properties */
+            wpdata.object_type = rpdata.object_type;
+            wpdata.object_instance = rpdata.object_instance;
+            wpdata.object_property = rpdata.object_property;
+            wpdata.array_index = rpdata.array_index;
+            memcpy(&wpdata.application_data, rpdata.application_data, MAX_APDU);
+            wpdata.application_data_len = len;
+            wpdata.error_code = ERROR_CODE_SUCCESS;
+            status = Time_Value_Write_Property(&wpdata);
+            if (!status) {
+                /* verify WriteProperty property is known */
+                zassert_not_equal(wpdata.error_code,
+                    ERROR_CODE_UNKNOWN_PROPERTY,
+                    "property '%s': WriteProperty Unknown!\n",
+                    bactext_property_name(rpdata.object_property));
+            }
+        }
+        pRequired++;
+    }
+    while ((*pOptional) != -1) {
+        rpdata.object_property = *pOptional;
+        rpdata.array_index = BACNET_ARRAY_ALL;
+        len = Time_Value_Read_Property(&rpdata);
+        zassert_not_equal(len, BACNET_STATUS_ERROR,
+            "property '%s': failed to ReadProperty!\n",
+            bactext_property_name(rpdata.object_property));
+        if (len > 0) {
+            test_len = bacapp_decode_application_data(rpdata.application_data,
+                (uint8_t)rpdata.application_data_len, &value);
+            zassert_equal(len, test_len, "property '%s': failed to decode!\n",
+                bactext_property_name(rpdata.object_property));
+            /* check WriteProperty properties */
+            wpdata.object_type = rpdata.object_type;
+            wpdata.object_instance = rpdata.object_instance;
+            wpdata.object_property = rpdata.object_property;
+            wpdata.array_index = rpdata.array_index;
+            memcpy(&wpdata.application_data, rpdata.application_data, MAX_APDU);
+            wpdata.application_data_len = len;
+            wpdata.error_code = ERROR_CODE_SUCCESS;
+            status = Time_Value_Write_Property(&wpdata);
+            if (!status) {
+                /* verify WriteProperty property is known */
+                zassert_not_equal(wpdata.error_code,
+                    ERROR_CODE_UNKNOWN_PROPERTY,
+                    "property '%s': WriteProperty Unknown!\n",
+                    bactext_property_name(rpdata.object_property));
+            }
+        }
+        pOptional++;
+    }
+    /* check for unsupported property - use ALL */
+    rpdata.object_property = PROP_ALL;
+    len = Time_Value_Read_Property(&rpdata);
+    zassert_equal(len, BACNET_STATUS_ERROR, NULL);
+    status = Time_Value_Write_Property(&wpdata);
+    zassert_false(status, NULL);
+    /* check the delete function */
+    status = Time_Value_Delete(instance);
+    zassert_true(status, NULL);
+
+    return;
+}
+/**
+ * @}
+ */
+
+void test_main(void)
+{
+    ztest_test_suite(tv_tests,
+     ztest_unit_test(testTimeValue)
+     );
+
+    ztest_run_test_suite(tv_tests);
+}