libucl/src/ucl_util.c

1032 ucl_object_insert_key_common (ucl_object_t *top, ucl_object_t *elt,
1039 	if (elt == NULL || key == NULL) {
1069 			elt->flags |= UCL_OBJECT_NEED_KEY_ESCAPE;
1074 	elt->key = key;
1075 	elt->keylen = keylen;
1078 		ucl_copy_key_trash (elt);
1081 	found = ucl_hash_search_obj (top->value.ov, elt);
1084 		top->value.ov = ucl_hash_insert_object (top->value.ov, elt);
1085 		DL_APPEND (found, elt);
1091 			top->value.ov = ucl_hash_insert_object (top->value.ov, elt);
1093 			DL_APPEND (found, elt);
1096 			if (found->type != UCL_OBJECT && elt->type == UCL_OBJECT) {
1097 				/* Insert old elt to new one */
1098 				elt = ucl_object_insert_key_common (elt, found, found->key, found->keylen, copy_key, false, false);
1100 				top->value.ov = ucl_hash_insert_object (top->value.ov, elt);
1102 			else if (found->type == UCL_OBJECT && elt->type != UCL_OBJECT) {
1104 				found = ucl_object_insert_key_common (found, elt, elt->key, elt->keylen, copy_key, false, false);
1106 			else if (found->type == UCL_OBJECT && elt->type == UCL_OBJECT) {
1108 				while ((cur = ucl_iterate_object (elt, &it, true)) != NULL) {
1112 				ucl_object_unref (elt);
1116 				DL_APPEND (found, elt);
1120 			DL_APPEND (found, elt);
1151 ucl_object_insert_key (ucl_object_t *top, ucl_object_t *elt,
1154 	return ucl_object_insert_key_common (top, elt, key, keylen, copy_key, false, false);
1158 ucl_object_insert_key_merged (ucl_object_t *top, ucl_object_t *elt,
1161 	return ucl_object_insert_key_common (top, elt, key, keylen, copy_key, true, false);
1165 ucl_object_replace_key (ucl_object_t *top, ucl_object_t *elt,
1168 	return ucl_object_insert_key_common (top, elt, key, keylen, copy_key, false, true);
1208 	ucl_object_t *elt;
1216 			elt = *iter;
1217 			if (elt == NULL) {
1218 				elt = obj->value.av;
1219 				if (elt == NULL) {
1223 			else if (elt == obj->value.av) {
1226 			*iter = elt->next ? elt->next : obj->value.av;
1227 			return elt;
1234 	elt = *iter;
1235 	if (elt == NULL) {
1236 		elt = obj;
1237 		if (elt == NULL) {
1241 	else if (elt == obj) {
1244 	*iter = elt->next ? elt->next : obj;
1245 	return elt;