////////////////////////////////
//// Mind/body data storage system
//// for the resleeving tech
////////////////////////////////

/mob/living/carbon/human/var/resleeve_lock
/mob/living/carbon/human/var/original_player

/////// Mind-backup record ///////
/datum/transhuman/mind_record
	//User visible
	var/mindname = "!!ERROR!!"

	//0: Normal, 1: Might be dead, 2: Definitely dead, show on console
	var/dead_state = 0
	var/last_update = 0
	var/last_notification
	var/do_notify = TRUE

	//Backend
	var/ckey = ""
	var/id_gender = MALE
	var/datum/mind/mind_ref
	var/cryo_at = 0
	var/languages = list()
	var/mind_oocnotes = ""
	var/mind_ooclikes = ""
	var/mind_oocdislikes = ""
	//CHOMPEdit Start
	var/mind_oocfavs = ""
	var/mind_oocmaybes = ""
	var/mind_oocstyle = FALSE
	//CHOMPEdit End
	var/nif_path
	var/nif_durability
	var/list/nif_software
	var/list/nif_savedata = list()

	var/one_time = FALSE

/datum/transhuman/mind_record/New(var/datum/mind/mind, var/mob/living/carbon/human/M, var/add_to_db = TRUE, var/one_time = FALSE, var/database_key)
	ASSERT(mind)

	src.one_time = one_time

	//The mind!
	mind_ref = mind
	mindname = mind.name
	ckey = ckey(mind.key)

	cryo_at = 0

	//Mental stuff the game doesn't keep mentally
	if(istype(M) || istype(M,/mob/living/carbon/brain/caught_soul))
		id_gender = M.identifying_gender
		languages = M.languages.Copy()
		mind_oocnotes = M.ooc_notes
		if(M.nif)
			nif_path = M.nif.type
			nif_durability = M.nif.durability
			var/list/nifsofts = list()
			for(var/N in M.nif.nifsofts)
				if(N)
					var/datum/nifsoft/nifsoft = N
					nifsofts += nifsoft.type
			nif_software = nifsofts
			nif_savedata = M.nif.save_data.Copy()

	//CHOMPEdit Start - Preference for Automatic transcore notifications
	if(istype(M,/mob) && !M.read_preference(/datum/preference/toggle/autotranscore))
		do_notify = FALSE
	//CHOMPEdit End

	last_update = world.time

	if(add_to_db)
		SStranscore.add_backup(src, database_key = database_key)

/////// Body Record ///////
/datum/transhuman/body_record
	var/datum/dna2/record/mydna

	//These may or may not be set, mostly irrelevant since it's just a body record.
	var/ckey
	var/locked
	var/client/client_ref
	var/datum/mind/mind_ref
	var/synthetic
	var/speciesname
	var/bodygender
	var/body_oocnotes
	var/body_ooclikes
	var/body_oocdislikes
	//CHOMPEdit Start
	var/body_oocfavs
	var/body_oocmaybes
	var/body_oocstyle
	//CHOMPEdit End
	var/list/limb_data = list(BP_HEAD, BP_L_HAND, BP_R_HAND, BP_L_ARM, BP_R_ARM, BP_L_FOOT, BP_R_FOOT, BP_L_LEG, BP_R_LEG, BP_GROIN, BP_TORSO)
	var/list/organ_data = list(O_HEART, O_EYES, O_LUNGS, O_BRAIN)
	var/list/genetic_modifiers = list()
	var/toocomplex
	var/sizemult
	var/weight
	var/aflags
	var/breath_type = GAS_O2

/datum/transhuman/body_record/New(var/copyfrom, var/add_to_db = 0, var/ckeylock = 0)
	..()
	if(istype(copyfrom, /datum/transhuman/body_record))
		init_from_br(copyfrom)
	else if(ishuman(copyfrom))
		init_from_mob(copyfrom, add_to_db, ckeylock)

/datum/transhuman/body_record/Destroy()
	qdel_null(mydna.dna)
	qdel_null(mydna)
	client_ref = null
	mind_ref = null
	limb_data.Cut()
	organ_data.Cut()
	..()
	return QDEL_HINT_HARDDEL // For now at least there is no easy way to clear references to this in machines etc.

/datum/transhuman/body_record/proc/init_from_mob(var/mob/living/carbon/human/M, var/add_to_db = 0, var/ckeylock = 0, var/database_key)
	ASSERT(!QDELETED(M))
	ASSERT(istype(M))

	//Person OOCly doesn't want people impersonating them
	locked = ckeylock

	//CHOMPEdit Start, keep the lock
	//Prevent people from printing restricted and whitelisted species
	var/datum/species/S = GLOB.all_species["[M.dna.species]"]
	if(S)
		toocomplex = (S.spawn_flags & SPECIES_IS_WHITELISTED) || (S.spawn_flags & SPECIES_IS_RESTRICTED)
		// Force ckey locking if species is whitelisted
		//if((S.spawn_flags & SPECIES_IS_WHITELISTED) || (S.spawn_flags & SPECIES_IS_RESTRICTED))
			//locked = TRUE
	//CHOMPEdit End

	//General stuff about them
	synthetic = M.isSynthetic()
	speciesname = M.custom_species ? M.custom_species : null
	bodygender = M.gender
	body_oocnotes = M.ooc_notes
	sizemult = M.size_multiplier
	weight = M.weight
	aflags = M.appearance_flags
	breath_type = M.species.breath_type

	//Probably should
	M.dna.check_integrity()

	//The DNA2 stuff
	mydna = new ()
	qdel_swap(mydna.dna, M.dna.Clone())
	mydna.ckey = M.ckey
	mydna.id = copytext(md5(M.real_name), 2, 6)
	mydna.name = M.dna.real_name
	mydna.types = DNA2_BUF_UI|DNA2_BUF_UE|DNA2_BUF_SE
	mydna.flavor = M.flavor_texts.Copy()

	//My stuff
	client_ref = M.client
	ckey = M.ckey
	mind_ref = M.mind

	//External organ status. 0:gone, 1:normal, "string":manufacturer
	for(var/limb in limb_data)
		var/obj/item/organ/external/O = M.organs_by_name[limb]

		//Missing limb.
		if(!O)
			limb_data[limb] = 0

		//Has model set, is pros.
		else if(O.model)
			limb_data[limb] = O.model

		//Nothing special, present and normal.
		else
			limb_data[limb] = 1

	//Internal organ status
	for(var/org in organ_data)
		var/obj/item/organ/I = M.internal_organs_by_name[org]

		//Who knows? Missing lungs maybe on synths, etc.
		if(!I)
			continue

		//This needs special handling because brains never think they are 'robotic', even posibrains
		if(org == O_BRAIN)
			switch(I.type)
				if(/obj/item/organ/internal/mmi_holder) //Assisted
					organ_data[org] = 1
				if(/obj/item/organ/internal/mmi_holder/posibrain) //Mechanical
					organ_data[org] = 2
				if(/obj/item/organ/internal/mmi_holder/robot) //Digital
					organ_data[org] = 3
				else //Anything else just give a brain to
					organ_data[org] = 0
			continue

		//Just set the data to this. 0:normal, 1:assisted, 2:mechanical, 3:digital
		organ_data[org] = I.robotic

	//Genetic modifiers
	for(var/datum/modifier/mod as anything in M.modifiers)
		if(mod.flags & MODIFIER_GENETIC)
			genetic_modifiers.Add(mod.type)

	if(add_to_db)
		SStranscore.add_body(src, database_key = database_key)


/**
 * Make a deep copy of this record so it can be saved on a disk without modifications
 * to the original affecting the copy.
 * Just to be clear, this has nothing to do do with acutal biological cloning, body printing, resleeving,
 * or anything like that! This is the computer science concept of "cloning" a data structure!
 */
/datum/transhuman/body_record/proc/init_from_br(var/datum/transhuman/body_record/orig)
	ASSERT(!QDELETED(orig))
	ASSERT(istype(orig))
	src.mydna = new ()
	qdel_swap(src.mydna.dna, orig.mydna.dna.Clone())
	src.mydna.ckey = orig.mydna.ckey
	src.mydna.id = orig.mydna.id
	src.mydna.name = orig.mydna.name
	src.mydna.types = orig.mydna.types
	src.mydna.flavor = orig.mydna.flavor.Copy()
	src.ckey = orig.ckey
	src.locked = orig.locked
	src.client_ref = orig.client_ref
	src.mind_ref = orig.mind_ref
	src.synthetic = orig.synthetic
	src.speciesname = orig.speciesname
	src.bodygender = orig.bodygender
	src.body_oocnotes = orig.body_oocnotes
	src.body_ooclikes = orig.body_ooclikes
	src.body_oocdislikes = orig.body_oocdislikes
	src.limb_data = orig.limb_data.Copy()
	src.organ_data = orig.organ_data.Copy()
	src.genetic_modifiers = orig.genetic_modifiers.Copy()
	src.toocomplex = orig.toocomplex
	src.sizemult = orig.sizemult
	src.aflags = orig.aflags
	src.breath_type = orig.breath_type
	src.weight = orig.weight