Paradise/code/datums/outfits/vv_outfit.dm

// This outfit preserves varedits made on the items
// Created from admin helpers.
/datum/outfit/varedit
	var/list/vv_values
	var/list/stored_access
	var/update_id_name = FALSE //If the name of the human is same as the name on the id they're wearing we'll update provided id when equipping

/datum/outfit/varedit/pre_equip(mob/living/carbon/human/H, visualsOnly)
	H.delete_equipment() //Applying VV to wrong objects is not reccomended.
	. = ..()

/datum/outfit/varedit/proc/set_equipment_by_slot(slot, item_path)
	switch(slot)
		if(slot_w_uniform)
			uniform = item_path
		if(slot_back)
			back = item_path
		if(slot_wear_suit)
			suit = item_path
		if(slot_belt)
			belt = item_path
		if(slot_gloves)
			gloves = item_path
		if(slot_shoes)
			shoes = item_path
		if(slot_head)
			head = item_path
		if(slot_wear_mask)
			mask = item_path
		if(slot_l_ear)
			l_ear = item_path
		if(slot_r_ear)
			r_ear = item_path
		if(slot_glasses)
			glasses = item_path
		if(slot_wear_id)
			id = item_path
		if(slot_wear_pda)
			pda = item_path
		if(slot_s_store)
			suit_store = item_path
		if(slot_l_store)
			l_pocket = item_path
		if(slot_r_store)
			r_pocket = item_path


/proc/collect_vv(obj/item/I)
	//Temporary/Internal stuff, do not copy these.
	var/static/list/ignored_vars = list("vars","x","y","z","plane","layer","override","animate_movement","pixel_step_size","screen_loc","fingerprintslast","tip_timer")

	if(istype(I))
		var/list/vedits = list()
		for(var/varname in I.vars)
			if(!I.can_vv_get(varname))
				continue
			if(varname in ignored_vars)
				continue
			var/vval = I.vars[varname] // Can't check initial() because it doesn't work on a list index
			//Only text/numbers and icons variables to make it less weirdness prone.
			if(!istext(vval) && !isnum(vval) && !isicon(vval))
				continue
			vedits[varname] = I.vars[varname]
		return vedits

/mob/living/carbon/human/proc/copy_outfit()
	var/datum/outfit/varedit/O = new

	//Copy equipment
	var/list/result = list()
	var/list/slots_to_check = list(slot_w_uniform, slot_back, slot_wear_suit, slot_belt, slot_gloves, slot_shoes, slot_head, slot_wear_mask, slot_l_ear, slot_r_ear, slot_glasses, slot_wear_id, slot_wear_pda, slot_s_store, slot_l_store, slot_r_store)
	for(var/s in slots_to_check)
		var/obj/item/I = get_item_by_slot(s)
		var/vedits = collect_vv(I)
		if(vedits)
			result["[s]"] = vedits
		if(istype(I))
			O.set_equipment_by_slot(s, I.type)

	//Copy access
	O.stored_access = list()
	var/obj/item/id_slot = get_item_by_slot(slot_wear_id)
	if(id_slot)
		O.stored_access |= id_slot.GetAccess()
		var/obj/item/card/id/ID = id_slot.GetID()
		if(ID && ID.registered_name == real_name)
			O.update_id_name = TRUE

	//Copy hands
	if(l_hand || r_hand) //Not in the mood to let outfits transfer amputees
		var/obj/item/left_hand = l_hand
		var/obj/item/right_hand = r_hand
		if(istype(left_hand))
			O.l_hand = left_hand.type
			var/vedits = collect_vv(left_hand)
			if(vedits)
				result["LHAND"] = vedits
		if(istype(right_hand))
			O.r_hand = right_hand.type
			var/vedits = collect_vv(left_hand)
			if(vedits)
				result["RHAND"] = vedits
	O.vv_values = result

	//Copy backpack contents if exist.
	var/obj/item/backpack = get_item_by_slot(slot_back)
	if(istype(backpack) && LAZYLEN(backpack.contents) > 0)
		var/list/typecounts = list()
		for(var/obj/item/I in backpack)
			if(typecounts[I.type])
				typecounts[I.type] += 1
			else
				typecounts[I.type] = 1
		O.backpack_contents = typecounts
		//TODO : Copy varedits from backpack stuff too.

	//Copy implants
	O.implants = list()
	for(var/obj/item/implant/I in contents)
		if(istype(I))
			O.implants |= I.type

	// Copy cybernetic implants
	O.cybernetic_implants = list()
	for(var/org in internal_organs)
		var/obj/item/organ/internal/aug = org
		O.cybernetic_implants |= aug.type

	// Copy accessories
	var/obj/item/clothing/under/uniform_slot = get_item_by_slot(slot_w_uniform)
	if(uniform_slot)
		O.accessories = list()
		for(var/obj/item/clothing/accessory/A in uniform_slot.accessories)
			if(istype(A))
				O.accessories |= A

	//Copy to outfit cache
	var/outfit_name = stripped_input(usr, "Enter the outfit name")
	O.name = outfit_name
	GLOB.custom_outfits += O
	to_chat(usr, "Outfit registered, use select equipment to equip it.")

/datum/outfit/varedit/post_equip(mob/living/carbon/human/H, visualsOnly)
	. = ..()
	//Apply VV
	for(var/slot in vv_values)
		var/list/edits = vv_values[slot]
		var/obj/item/I
		switch(slot)
			if("LHAND")
				I = H.l_hand
			if("RHAND")
				I = H.r_hand
			else
				I = H.get_item_by_slot(text2num(slot))
		for(var/vname in edits)
			I.vv_edit_var(vname,edits[vname])
	//Apply access
	var/obj/item/id_slot = H.get_item_by_slot(slot_wear_id)
	if(id_slot)
		var/obj/item/card/id/card = id_slot.GetID()
		if(istype(card))
			card.access |= stored_access
		if(update_id_name)
			card.registered_name = H.real_name
			card.update_label()

/datum/outfit/varedit/get_json_data()
	. = .. ()
	.["stored_access"] = stored_access
	.["update_id_name"] = update_id_name
	var/list/stripped_vv = list()
	for(var/slot in vv_values)
		var/list/vedits = vv_values[slot]
		var/list/stripped_edits = list()
		for(var/edit in vedits)
			if(istext(vedits[edit]) || isnum(vedits[edit]) || isnull(vedits[edit]))
				stripped_edits[edit] = vedits[edit]
		if(stripped_edits.len)
			stripped_vv[slot] = stripped_edits
	.["vv_values"] = stripped_vv

/datum/outfit/varedit/load_from(list/outfit_data)
	. = ..()
	stored_access = outfit_data["stored_access"]
	vv_values = outfit_data["vv_values"]
	update_id_name = outfit_data["update_id_name"]