#
#
#
# profiles_cache_whitelist.cfv
#
#
#
# get_new_collected_whitelist_objects_node()
# checkout_collected_whitelist_objects()
#


#
#
#
# get_new_collected_whitelist_objects_node()
#
#
#

subroutine(get_new_collected_whitelist_objects_node, (

	# Create an empty collected_whitelist_objects node to which we add any cached object names when the object is succesfully completed
	
	delete_node("v.collected_whitelist_objects");
	v.collected_whitelist_objects = "";
	
	# Return the node
	
	"v.collected_whitelist_objects";
));


#
#
#
# checkout_collected_whitelist_objects()
#
#
#

subroutine(checkout_collected_whitelist_objects(
	string profile_name,
	node collected_whitelist_objects), (
	
	# Write all objects which have been succesfully created to profiles_cache/whitelist
	
#	debug_message("\n#### checkout_collected_whitelist_objects() START \n");
#	debug_message("\n" . node_as_string(collected_whitelist_objects) . "\n");
	
	if (num_subnodes(collected_whitelist_objects) > 0) then (
	
		node main_item;
		string main_item_name; # main_item_name is a directory name like raw_report_elements, html_report_elements, tables, etc.
		
		node item;
		string item_name; # item_name is the name/ID of a cached object, i.e. "52309c3e6af95ce32b14f5e0815e22e6"
		
		foreach main_item collected_whitelist_objects (
		
			main_item_name = node_name(main_item);
			
			foreach item main_item (
			
				item_name = node_name(item);
				
				# Set node in profiles_cache/profile_name/whitelist
				
				"profiles_cache/" . profile_name . ".whitelist." . main_item_name . "." . item_name = "";
				
				save_node("profiles_cache/" . profile_name . ".whitelist." . main_item_name . "." . item_name);
			);
		);
	);
	
#	debug_message("\n#### checkout_collected_whitelist_objects() END \n");
));