Bubberstation/code/datums/lazy_template.dm

/**
 * Datum used to designate certain areas that do not need to exist nor be loaded at world start
 * but do want to be loaded under certain circumstances. Use this for stuff like the nukie base or wizden, aka stuff that only matters when their antag is rolled.
 */
/datum/lazy_template
	/// If this is true each load will increment an index keyed to the type and it will load [map_name]_[index]
	var/list/datum/turf_reservation/reservations = list()
	var/uses_multiple_allocations = FALSE
	/// Key to identify this template - used in caching
	var/key
	/// Directory of maps to prefix to the filename
	var/map_dir = "_maps/templates/lazy_templates"
	/// The filename (without extension) of the map to load
	var/map_name
	/// place_on_top: Whether to use /turf/proc/PlaceOnTop rather than /turf/proc/ChangeTurf
	var/place_on_top = FALSE
	/// type of turf reservation
	var/turf_reservation_type = /datum/turf_reservation

/datum/lazy_template/New()
	reservations = list()
	..()

/datum/lazy_template/Destroy(force)
	if(!force)
		stack_trace("Something is trying to delete [type]")
		return QDEL_HINT_LETMELIVE

	QDEL_LIST(reservations)
	GLOB.lazy_templates -= key
	return ..()

/**
 * Does the grunt work of loading the template.
 */
/datum/lazy_template/proc/lazy_load()
	RETURN_TYPE(/turf)
	// This is a static assosciative list that is used to ensure maps that have variations are correctly varied when spawned
	// I want to make it to where you can make a range and it'll randomly pick'n'take from the available versions at random
	// But that can be done later when I have the time
	var/static/list/multiple_allocation_hash = list()

	var/load_path = "[map_dir]/[map_name].dmm"
	if(uses_multiple_allocations)
		var/times = multiple_allocation_hash[key] || 0
		times += 1
		multiple_allocation_hash[key] = times
		load_path = "[map_dir]/[map_name]_[times].dmm"

	if(!load_path || !fexists(load_path))
		CRASH("lazy template [type] has an invalid load_path: '[load_path]', check directory and map name!")

	var/datum/parsed_map/parsed_template = load_map(
		file(load_path),
		measure_only = TRUE,
	)
	if(isnull(parsed_template.parsed_bounds))
		CRASH("Failed to cache lazy template for loading: '[key]'")

	var/width = parsed_template.parsed_bounds[MAP_MAXX] - parsed_template.parsed_bounds[MAP_MINX] + 1
	var/height = parsed_template.parsed_bounds[MAP_MAXY] - parsed_template.parsed_bounds[MAP_MINY] + 1
	var/datum/turf_reservation/reservation = SSmapping.request_turf_block_reservation(
		width,
		height,
		parsed_template.parsed_bounds[MAP_MAXZ],
		reservation_type = turf_reservation_type,
	)
	if(!reservation)
		CRASH("Failed to reserve a block for lazy template: '[key]'")

	// lists kept for overall loading
	var/list/loaded_atom_movables = list()
	var/list/loaded_turfs = list()
	var/list/loaded_areas = list()

	var/list/obj/structure/cable/loaded_cables = list()
	var/list/obj/machinery/atmospherics/loaded_atmospherics = list()

	for(var/z_idx in parsed_template.parsed_bounds[MAP_MAXZ] to 1 step -1)
		var/turf/bottom_left = reservation.bottom_left_turfs[z_idx]
		var/turf/top_right = reservation.top_right_turfs[z_idx]

		// Make our turfs dead to atmos
		// Cache for sonic speed
		var/list/to_rebuild = SSair.adjacent_rebuild
		for(var/turf/contained_turf as anything in block(bottom_left, top_right))
			SSair.remove_from_active(contained_turf)
			to_rebuild -= contained_turf
			for(var/turf/sub_turf as anything in contained_turf.atmos_adjacent_turfs)
				sub_turf.atmos_adjacent_turfs?.Remove(contained_turf)
			contained_turf.atmos_adjacent_turfs?.Cut()
			CHECK_TICK

		load_map(
			file(load_path),
			bottom_left.x,
			bottom_left.y,
			bottom_left.z,
			z_upper = z_idx,
			z_lower = z_idx,
			place_on_top = place_on_top,
		)
		for(var/turf/turf as anything in block(bottom_left, top_right))
			loaded_turfs += turf
			loaded_areas |= get_area(turf)

			// atoms can actually be in the contents of two or more turfs based on its icon/bound size
			// see https://www.byond.com/docs/ref/index.html#/atom/var/contents
			for(var/thing in (turf.get_all_contents() - turf))
				if(istype(thing, /obj/structure/cable))
					loaded_cables += thing
				else if(istype(thing, /obj/machinery/atmospherics))
					loaded_atmospherics += thing
				loaded_atom_movables |= thing

	SSatoms.InitializeAtoms(loaded_areas + loaded_atom_movables + loaded_turfs)
	for(var/turf/turf as anything in loaded_turfs)
		CALCULATE_ADJACENT_TURFS(turf, NORMAL_TURF)
		CHECK_TICK

	SSlighting.setup_static_lighting_if_needed(loaded_turfs)
	SSmachines.setup_template_powernets(loaded_cables)
	SSair.setup_template_machinery(loaded_atmospherics)

	SEND_SIGNAL(src, COMSIG_LAZY_TEMPLATE_LOADED, loaded_atom_movables, loaded_turfs, loaded_areas)
	reservations += reservation
	return reservation

/datum/lazy_template/nukie_elevator
	key = LAZY_TEMPLATE_KEY_NUKIEELEVATOR
	map_name = "nukie_elevator"

/datum/lazy_template/nukie_base
	key = LAZY_TEMPLATE_KEY_NUKIEBASE
	map_name = "nukie_base"

/datum/lazy_template/wizard_dem
	key = LAZY_TEMPLATE_KEY_WIZARDDEN
	map_name = "wizard_den"

/datum/lazy_template/ninja_holding_facility
	key = LAZY_TEMPLATE_KEY_NINJA_HOLDING_FACILITY
	map_name = "ninja_den"

/datum/lazy_template/abductor_ship
	key = LAZY_TEMPLATE_KEY_ABDUCTOR_SHIPS
	map_name = "abductor_ships"

/datum/lazy_template/heretic_sacrifice_room
	key = LAZY_TEMPLATE_KEY_HERETIC_SACRIFICE
	map_name = "heretic_sacrifice"

/datum/lazy_template/voidwalker_void
	key = LAZY_TEMPLATE_KEY_VOIDWALKER_VOID
	map_name = "voidwalker_void"