- /* Test bt_ctf_trace_get_environment_field_value_string */
- ok(bt_ctf_trace_get_environment_field_value_string(NULL, 0) == NULL,
- "bt_ctf_trace_get_environment_field_value_string handles a NULL trace correctly");
- ok(bt_ctf_trace_get_environment_field_value_string(trace, -1) == NULL,
- "bt_ctf_trace_get_environment_field_value_string handles an invalid index correctly");
- ok(bt_ctf_trace_get_environment_field_value_string(trace, 1) == NULL,
- "bt_ctf_trace_get_environment_field_value_string validates environment field type");
- ret_string = bt_ctf_trace_get_environment_field_value_string(trace, 0);
- ok(ret_string && !strcmp(ret_string, hostname),
- "bt_ctf_trace_get_environment_field_value_string returns a correct value");
-
- /* Test bt_ctf_trace_get_environment_field_value_integer */
- ok(bt_ctf_trace_get_environment_field_value_integer(NULL, 0, &ret_int64_t) < 0,
- "bt_ctf_trace_get_environment_field_value_integer handles a NULL trace correctly");
- ok(bt_ctf_trace_get_environment_field_value_integer(trace, 42, &ret_int64_t) < 0,
- "bt_ctf_trace_get_environment_field_value_integer handles an invalid index correctly");
- ok(bt_ctf_trace_get_environment_field_value_integer(trace, 1, NULL) < 0,
- "bt_ctf_trace_get_environment_field_value_integer handles a NULL value argument correctly");
- ok(bt_ctf_trace_get_environment_field_value_integer(trace, 0, &ret_int64_t) < 0,
- "bt_ctf_trace_get_environment_field_value_integer validates environment field type");
- ok(!bt_ctf_trace_get_environment_field_value_integer(trace, 1, &ret_int64_t),
- "bt_ctf_trace_get_environment_field_value_integer returns a value");
- ok(ret_int64_t == 123456,
- "bt_ctf_trace_get_environment_field_value_integer returned a correct value");
+ /* Test bt_ctf_trace_get_environment_field_value */
+ ok(bt_ctf_trace_get_environment_field_value(NULL, 0) == NULL,
+ "bt_ctf_trace_get_environment_field_value handles a NULL trace correctly");
+ ok(bt_ctf_trace_get_environment_field_value(trace, -1) == NULL,
+ "bt_ctf_trace_get_environment_field_value handles an invalid index correctly (negative)");
+ ok(bt_ctf_trace_get_environment_field_value(trace, 5) == NULL,
+ "bt_ctf_trace_get_environment_field_value handles an invalid index correctly (too large)");
+ obj = bt_ctf_trace_get_environment_field_value(trace, 1);
+ ret = bt_object_integer_get(obj, &ret_int64_t);
+ ok(!ret && ret_int64_t == 23,
+ "bt_ctf_trace_get_environment_field_value succeeds in getting an integer value");
+ BT_OBJECT_PUT(obj);
+ obj = bt_ctf_trace_get_environment_field_value(trace, 2);
+ ret = bt_object_string_get(obj, &ret_string);
+ ok(!ret && ret_string && !strcmp(ret_string, "the value"),
+ "bt_ctf_trace_get_environment_field_value succeeds in getting a string value");
+ BT_OBJECT_PUT(obj);
+
+ /* Test bt_ctf_trace_get_environment_field_value_by_name */
+ ok(!bt_ctf_trace_get_environment_field_value_by_name(NULL,
+ "test_env_str"),
+ "bt_ctf_trace_get_environment_field_value_by_name handles a NULL trace correctly");
+ ok(!bt_ctf_trace_get_environment_field_value_by_name(trace, NULL),
+ "bt_ctf_trace_get_environment_field_value_by_name handles a NULL name correctly");
+ ok(!bt_ctf_trace_get_environment_field_value_by_name(trace, "oh oh"),
+ "bt_ctf_trace_get_environment_field_value_by_name returns NULL or an unknown field name");
+ obj = bt_ctf_trace_get_environment_field_value_by_name(trace,
+ "test_env_str");
+ ret = bt_object_string_get(obj, &ret_string);
+ ok(!ret && ret_string && !strcmp(ret_string, "oh yeah"),
+ "bt_ctf_trace_get_environment_field_value_by_name succeeds in getting an existing field");
+ BT_OBJECT_PUT(obj);
+
+ /* Test environment field replacement */
+ ok(!bt_ctf_trace_set_environment_field_integer(trace, "test_env_int",
+ 654321),
+ "bt_ctf_trace_set_environment_field_integer succeeds with an existing name");
+ ok(bt_ctf_trace_get_environment_field_count(trace) == 5,
+ "bt_ctf_trace_set_environment_field_integer with an existing key does not increase the environment size");
+ obj = bt_ctf_trace_get_environment_field_value(trace, 3);
+ ret = bt_object_integer_get(obj, &ret_int64_t);
+ ok(!ret && ret_int64_t == 654321,
+ "bt_ctf_trace_get_environment_field_value successfully replaces an existing field");
+ BT_OBJECT_PUT(obj);