/// Allows objects that entered parent's tile to move freely through other objects with this component regardless of density
/datum/component/climb_walkable

/datum/component/climb_walkable/RegisterWithParent()
	var/static/list/turf_connections = list(
		COMSIG_ATOM_ENTERED = PROC_REF(on_enter),
		COMSIG_ATOM_AFTER_SUCCESSFUL_INITIALIZED_ON = PROC_REF(on_enter),
		COMSIG_ATOM_EXITED = PROC_REF(on_exit),
	)
	AddComponent(/datum/component/connect_loc_behalf, parent, turf_connections)
	RegisterSignal(parent, COMSIG_ATOM_TRIED_PASS, PROC_REF(can_allow_through))

/datum/component/climb_walkable/UnregisterFromParent()
	UnregisterSignal(parent, COMSIG_ATOM_TRIED_PASS)
	for (var/atom/movable/climber in get_turf(parent))
		REMOVE_TRAIT(climber, TRAIT_ON_CLIMBABLE, REF(src))

/datum/component/climb_walkable/proc/on_enter(datum/source, atom/movable/arrived)
	SIGNAL_HANDLER
	ADD_TRAIT(arrived, TRAIT_ON_CLIMBABLE, REF(src))

/datum/component/climb_walkable/proc/on_exit(datum/source, atom/movable/gone, direction)
	SIGNAL_HANDLER
	REMOVE_TRAIT(gone, TRAIT_ON_CLIMBABLE, REF(src))

/datum/component/climb_walkable/proc/can_allow_through(datum/source, atom/movable/mover, border_dir)
	SIGNAL_HANDLER
	if(HAS_TRAIT(mover, TRAIT_ON_CLIMBABLE))
		return COMSIG_COMPONENT_PERMIT_PASSAGE