/obj/effect/mob_spawn
	name = "Mob Spawner"
	density = TRUE
	anchored = TRUE
	//So it shows up in the map editor
	icon = 'icons/effects/mapping_helpers.dmi'
	icon_state = "mobspawner"
	///A forced name of the mob, though can be overridden if a special name is passed as an argument
	var/mob_name
	///the type of the mob, you best inherit this
	var/mob_type = /mob/living/basic/cockroach
	///Lazy string list of factions that the spawned mob will be in upon spawn
	var/list/faction

	////Human specific stuff. Don't set these if you aren't using a human, the unit tests will put a stop to your sinful hand.

	///sets the human as a species, use a typepath (example: /datum/species/skeleton)
	var/mob_species
	///equips the human with an outfit.
	var/datum/outfit/outfit
	///for mappers to override parts of the outfit. really only in here for secret away missions, please try to refrain from using this out of laziness
	var/list/outfit_override
	///sets a human's hairstyle
	var/hairstyle
	///sets a human's facial hair
	var/facial_hairstyle
	///sets a human's hair color (use special for gradients, sorry)
	var/haircolor
	///sets a human's facial hair color
	var/facial_haircolor
	///sets a human's skin tone
	var/skin_tone

/obj/effect/mob_spawn/Initialize(mapload)
	. = ..()
	if(faction)
		faction = string_list(faction)

///obj/effect/mob_spawn/proc/create(mob/mob_possessor, newname) // ORIGINAL
/obj/effect/mob_spawn/proc/create(mob/mob_possessor, newname, ckey) // SKYRAT EDIT CHANGE
	var/mob/living/spawned_mob = new mob_type(get_turf(src)) //living mobs only // ORIGINAL
	//var/mob/living/spawned_mob = new create_mob(user, newname) // SKYRAT EDIT CHANGE
	name_mob(spawned_mob, newname)
	special(spawned_mob, mob_possessor)
	equip(spawned_mob)
	return spawned_mob

/obj/effect/mob_spawn/proc/special(mob/living/spawned_mob)
	SHOULD_CALL_PARENT(TRUE)
	if(faction)
		spawned_mob.faction = faction
	if(ishuman(spawned_mob))
		var/mob/living/carbon/human/spawned_human = spawned_mob
		if(mob_species)
			spawned_human.set_species(mob_species)
		spawned_human.underwear = "Nude"
		spawned_human.undershirt = "Nude"
		spawned_human.socks = "Nude"
		if(hairstyle)
			spawned_human.hairstyle = hairstyle
		else
			spawned_human.hairstyle = random_hairstyle(spawned_human.gender)
		if(facial_hairstyle)
			spawned_human.facial_hairstyle = facial_hairstyle
		else
			spawned_human.facial_hairstyle = random_facial_hairstyle(spawned_human.gender)
		if(haircolor)
			spawned_human.hair_color = haircolor
		else
			spawned_human.hair_color = "#[random_color()]"
		if(facial_haircolor)
			spawned_human.facial_hair_color = facial_haircolor
		else
			spawned_human.facial_hair_color = "#[random_color()]"
		if(skin_tone)
			spawned_human.skin_tone = skin_tone
		else
			spawned_human.skin_tone = random_skin_tone()
		spawned_human.update_hair()
		spawned_human.update_body()

/obj/effect/mob_spawn/proc/name_mob(mob/living/spawned_mob, forced_name)
	var/chosen_name
	//passed arguments on mob spawns are number one priority
	if(forced_name)
		chosen_name = forced_name
	//then the mob name var
	else if(mob_name)
		chosen_name = mob_name
	//then if no name was chosen the one the mob has by default works great
	if(!chosen_name)
		return
	//not using an old name doesn't update records- but ghost roles don't have records so who cares
	spawned_mob.fully_replace_character_name(null, chosen_name)

/obj/effect/mob_spawn/proc/equip(mob/living/spawned_mob)
	if(outfit)
		var/mob/living/carbon/human/spawned_human = spawned_mob
		if(outfit_override)
			outfit = new outfit //create it now to apply vars
			for(var/outfit_var in outfit_override)
				if(!ispath(outfit_override[outfit_var]) && !isnull(outfit_override[outfit_var]))
					CRASH("outfit_override var on [mob_name] spawner has incorrect values! it must be an assoc list with outfit \"var\" = path | null")
				outfit.vars[outfit_var] = outfit_override[outfit_var]
		spawned_human.equipOutfit(outfit)

///these mob spawn subtypes do not trigger until attacked by a ghost.
/obj/effect/mob_spawn/ghost_role
	///a short, lowercase name for the mob used in possession prompt that pops up on ghost attacks. must be set.
	var/prompt_name = ""
	///if false, you won't prompt for this role. best used for replacing the prompt system with something else like a radial, or something.
	var/prompt_ghost = TRUE
	///how many times this spawner can be used (it won't delete unless it's out of uses)
	var/uses = 1

	////descriptions

	///This should be the declaration of what the ghost role is, and maybe a short blurb after if you want. Shown in the spawner menu and after spawning first.
	var/you_are_text = ""
	///This should be the actual instructions/description/context to the ghost role. This should be the really long explainy bit, basically.
	var/flavour_text = ""
	///This is critical non-policy information about the ghost role. Shown in the spawner menu and after spawning last.
	var/important_text = ""

	///Show these on spawn? Usually used for hardcoded special flavor
	var/show_flavor = TRUE

	////bans and policy

	///which role to check for a job ban (ROLE_LAVALAND is the default ghost role ban)
	var/role_ban = ROLE_LAVALAND
	/// Typepath indicating the kind of job datum this ghost role will have. PLEASE inherit this with a new job datum, it's not hard. jobs come with policy configs.
	var/spawner_job_path = /datum/job/ghost_role

/obj/effect/mob_spawn/ghost_role/Initialize(mapload)
	. = ..()
	SSpoints_of_interest.make_point_of_interest(src)
	LAZYADD(GLOB.mob_spawners[name], src)

/obj/effect/mob_spawn/Destroy()
	var/list/spawners = GLOB.mob_spawners[name]
	LAZYREMOVE(spawners, src)
	if(!LAZYLEN(spawners))
		GLOB.mob_spawners -= name
	return ..()

//SKYRAT EDIT ADDITION BEGIN
/obj/effect/mob_spawn/proc/extra_prompts(mob/user)
	return TRUE
/*
/obj/effect/mob_spawn/proc/create_mob(mob/user, newname)
	var/mob/living/spawned_mob = new mob_type(get_turf(src)) //living mobs only
	if(!random || newname)
		if(newname)
			spawned_mob.real_name = newname
		else
			spawned_mob.real_name = mob_name ? mob_name : spawned_mob.name
		if(!mob_gender)
			mob_gender = pick(MALE, FEMALE)
		spawned_mob.gender = mob_gender
	return spawned_mob
*/
//SKYRAT EDIT ADDITION END

//ATTACK GHOST IGNORING PARENT RETURN VALUE
/obj/effect/mob_spawn/ghost_role/attack_ghost(mob/user)
	if(!SSticker.HasRoundStarted() || !loc)
		return
	if(prompt_ghost)
		var/ghost_role = tgui_alert(usr, "Become [prompt_name]? (Warning, You can no longer be revived!)",, list("Yes", "No"))
		if(ghost_role != "Yes" || !loc || QDELETED(user))
			return
	//SKYRAT EDIT ADDITION BEGIN
	if(!extra_prompts(user))
		return

	if(is_banned_from(user.ckey, BAN_GHOST_ROLE_SPAWNER))
		to_chat(user, span_warning("Error, you are banned from playing ghost roles!"))
		return
	//SKYRAT EDIT ADDITION END

	if(!(GLOB.ghost_role_flags & GHOSTROLE_SPAWNER) && !(flags_1 & ADMIN_SPAWNED_1))
		to_chat(user, span_warning("An admin has temporarily disabled non-admin ghost roles!"))
		return
	if(!uses) //just in case
		to_chat(user, span_warning("This spawner is out of charges!"))
		return
	if(is_banned_from(user.key, role_ban))
		to_chat(user, span_warning("You are banned from this role!"))
		return
	if(!allow_spawn(user, silent = FALSE))
		return
	if(QDELETED(src) || QDELETED(user))
		return
	log_game("[key_name(user)] became a [prompt_name]")
	create(user)

/obj/effect/mob_spawn/ghost_role/special(mob/living/spawned_mob, mob/mob_possessor)
	. = ..()
	if(mob_possessor)
		spawned_mob.ckey = mob_possessor.ckey
	if(show_flavor)
		var/output_message = "<span class='infoplain'><span class='big bold'>[you_are_text]</span></span>"
		if(flavour_text != "")
			output_message += "\n<span class='infoplain'><b>[flavour_text]</b></span>"
		if(important_text != "")
			output_message += "\n[span_userdanger("[important_text]")]"
		to_chat(spawned_mob, output_message)
	var/datum/mind/spawned_mind = spawned_mob.mind
	if(spawned_mind)
		spawned_mob.mind.set_assigned_role(SSjob.GetJobType(spawner_job_path))
		spawned_mind.name = spawned_mob.real_name


//multiple use mob spawner functionality here- doesn't make sense on corpses
///obj/effect/mob_spawn/ghost_role/create(mob/mob_possessor, newname) // ORIGINAL
/obj/effect/mob_spawn/ghost_role/create(mob/mob_possessor, newname, ckey) // SKRAT EDIT CHANGE
	. = ..()
	if(uses > 0)
		uses--
	if(!uses)
		qdel(src)

///override this to add special spawn conditions to a ghost role
/obj/effect/mob_spawn/ghost_role/proc/allow_spawn(mob/user, silent = FALSE)
	return TRUE

///these mob spawn subtypes trigger immediately (New or Initialize) and are not player controlled... since they're dead, you know?
/obj/effect/mob_spawn/corpse
	///when this mob spawn should auto trigger.
	var/spawn_when = CORPSE_INSTANT

	////damage values (very often, mappers want corpses to be mangled)

	///brute damage this corpse will spawn with
	var/brute_damage = 0
	///oxy damage this corpse will spawn with
	var/oxy_damage = 0
	///burn damage this corpse will spawn with
	var/burn_damage = 0

/obj/effect/mob_spawn/corpse/Initialize(mapload)
	. = ..()
	switch(spawn_when)
		if(CORPSE_INSTANT)
			INVOKE_ASYNC(src, .proc/create)
		if(CORPSE_ROUNDSTART)
			if(mapload || (SSticker && SSticker.current_state > GAME_STATE_SETTING_UP))
				INVOKE_ASYNC(src, .proc/create)

/obj/effect/mob_spawn/corpse/special(mob/living/spawned_mob)
	. = ..()
	spawned_mob.death(TRUE)
	spawned_mob.adjustOxyLoss(oxy_damage)
	spawned_mob.adjustBruteLoss(brute_damage)
	spawned_mob.adjustFireLoss(burn_damage)

/obj/effect/mob_spawn/corpse/create(mob/mob_possessor, newname)
	. = ..()
	qdel(src)

//almost all mob spawns in this game, dead or living, are human. so voila

/obj/effect/mob_spawn/ghost_role/human
	//gives it a base sprite instead of a mapping helper. makes sense, right?
	icon = 'icons/obj/machines/sleeper.dmi'
	icon_state = "sleeper"
	mob_type = /mob/living/carbon/human
	// SKYRAT EDIT START
	mob_species = /datum/species/human
	var/can_use_pref_char = TRUE
	var/can_use_alias = FALSE
	var/any_station_species = FALSE
	var/chosen_alias
	var/is_pref_char
	var/last_ckey //For validation of the user
	/// whether the spawner handles the loadout and quirks of the user by itself in one of its own procs, if set to false, the spawner will do it automatically
	var/handles_loadout_and_quirks = FALSE
	var/random = FALSE

/obj/effect/mob_spawn/ghost_role/human/extra_prompts(mob/user)
	last_ckey = user.ckey
	chosen_alias = null
	is_pref_char = null
	if(can_use_pref_char)
		var/initial_string = "Would you like to spawn as a randomly created character, or use the one currently selected in your preferences?"
		var/action = tgui_alert(user, initial_string, "", list("Use Random Character", "Use Character From Preferences"))
		if(action && action == "Use Character From Preferences")
			var/warning_string = "WARNING: This spawner will use your currently selected character in prefs ([user.client.prefs?.read_preference(/datum/preference/name/real_name)])\nMake sure that the character is not used as a station crew, or would have a good reason to be this role.(ie. intern in Space Hotel)\nUSING STATION CHARACTERS FOR SYNDICATE OR HOSTILE ROLES IS PROHIBITED WILL GET YOU BANNED!\nConsider making a character dedicated to the role.\nDo you wanna proceed?"
			var/action2 = tgui_alert(user, warning_string, "", list("Yes", "No"))
			if(action2 && action2 == "Yes")
				is_pref_char = TRUE
			else
				return FALSE

	if(can_use_alias)
		var/action = tgui_alert(user, "Would you like to use an alias?\nIf you do, your name will be changed to that", "", list("Dont Use Alias", "Use Alias"))
		if(action && action == "Use Alias")
			var/msg = reject_bad_name(input(user, "Set your character's alias for this role", "Alias") as text|null)
			if(!msg)
				return FALSE
			chosen_alias = msg

	if(is_pref_char)
		var/species_type = user.client.prefs.read_preference(/datum/preference/choiced/species)
		if(!any_station_species && species_type != mob_species)
			alert(user, "Sorry, This spawner is limited to those species: [mob_species]. Please switch your character.", "", "Ok")
			return FALSE

	if(QDELETED(src) || QDELETED(user))
		return FALSE
	//What's happening here?
	//This function is fairly asynchronous and doesnt keep variables in context, so this check is for validation that we are using the correct user
	if(last_ckey != user.ckey)
		return FALSE
	return TRUE

/obj/effect/mob_spawn/ghost_role/human/proc/create_mob(mob/user, newname)
	var/mob/living/carbon/human/H = new mob_type(get_turf(src))
	if(is_pref_char)
		user.client?.prefs?.safe_transfer_prefs_to(H)
		H.dna.update_dna_identity()
		if(chosen_alias)
			H.name = chosen_alias
			H.real_name = chosen_alias
		//Pre-job equips so Voxes dont die
		H.dna.species.pre_equip_species_outfit(null, H)
		H.regenerate_icons()
		if(!handles_loadout_and_quirks)
			SSquirks.AssignQuirks(H, user.client, TRUE, TRUE, null, FALSE, H)
			for(var/datum/loadout_item/item as anything in loadout_list_to_datums(H?.client?.prefs?.loadout_list))
				item.post_equip_item(H.client?.prefs, H)
	else
		if(!random || newname)
			if(newname)
				H.real_name = newname
			else
				H.real_name = mob_name ? mob_name : H.name
			/*
			if(!mob_gender)
				mob_gender = pick(MALE, FEMALE)
			H.gender = mob_gender
			H.body_type = mob_gender
			*/
		if(mob_species)
			H.set_species(mob_species)
		H.underwear = "Nude"
		H.undershirt = "Nude"
		H.socks = "Nude"
		if(hairstyle)
			H.hairstyle = hairstyle
		else
			H.hairstyle = random_hairstyle(H.gender)
		if(facial_hairstyle)
			H.facial_hairstyle = facial_hairstyle
		else
			H.facial_hairstyle = random_facial_hairstyle(H.gender)
		if(skin_tone)
			H.skin_tone = skin_tone
		else
			H.skin_tone = random_skin_tone()
		H.update_hair()
		H.update_body()
	return H
//SKYRAT EDIT ADDITION END

/obj/effect/mob_spawn/corpse/human
	icon_state = "corpsehuman"
	mob_type = /mob/living/carbon/human
	///disables PDA and sensors. only makes sense on corpses because ghost roles could simply turn those on again.
	var/conceal_presence = TRUE
	///husks the corpse if true.
	var/husk = FALSE

/obj/effect/mob_spawn/corpse/human/special(mob/living/carbon/human/spawned_human)
	. = ..()
	if(husk)
		spawned_human.Drain()
	else //Because for some reason I can't track down, things are getting turned into husks even if husk = false. It's in some damage proc somewhere.
		spawned_human.cure_husk()

/obj/effect/mob_spawn/corpse/human/equip(mob/living/carbon/human/spawned_human)
	. = ..()
	if(conceal_presence)
		// We don't want corpse PDAs to show up in the messenger list.
		var/obj/item/pda/messenger = locate(/obj/item/pda) in spawned_human
		if(messenger)
			messenger.toff = TRUE
		// Or on crew monitors
		var/obj/item/clothing/under/sensor_clothes = spawned_human.w_uniform
		if(istype(sensor_clothes))
			sensor_clothes.sensor_mode = NO_SENSORS
			spawned_human.update_suit_sensors()

//don't use this in subtypes, just add 1000 brute yourself. that being said, this is a type that has 1000 brute. it doesn't really have a home anywhere else, it just needs to exist
/obj/effect/mob_spawn/corpse/human/damaged
	brute_damage = 1000