//ban people from using custom names and appearances. that'll show 'em.

GLOBAL_VAR(appearanceban_runonce)	//Updates legacy bans with new info
GLOBAL_LIST_EMPTY(appearance_keylist)	//to store the keys

/proc/appearance_fullban(mob/M, reason)
	if(!M || !M.key) return
	GLOB.appearance_keylist.Add(text("[M.ckey] ## [reason]"))
	appearance_savebanfile()

/proc/appearance_client_fullban(ckey)
	if(!ckey) return
	GLOB.appearance_keylist.Add(text("[ckey]"))
	appearance_savebanfile()

//returns a reason if M is banned, returns 0 otherwise
/proc/appearance_isbanned(mob/M)
	if(M)
		for(var/s in GLOB.appearance_keylist)
			if(findtext(s, "[M.ckey]") == 1)
				var/startpos = findtext(s, "## ") + 3
				if(startpos && startpos < length(s))
					var/text = copytext(s, startpos, 0)
					if(text)
						return text
				return "Reason Unspecified"
	return 0

/*
DEBUG
/mob/verb/list_all_appearances()
	set name = "list all appearances"

	for(var/s in appearance_keylist)
		to_chat(world, s)

/mob/verb/reload_appearances()
	set name = "reload appearances"

	appearance_loadbanfile()
*/
// AA 2020-11-25: This entire proc isnt even called. What the actual fuck.
// AA 2021-05-23: This entire proc STILL isnt even called. I am going to screan.
/proc/appearance_loadbanfile()
	if(!GLOB.configuration.general.use_database_bans)
		var/savefile/S=new("data/appearance_full.ban")
		S["keys[0]"] >> GLOB.appearance_keylist
		log_admin("Loading appearance_rank")
		S["runonce"] >> GLOB.appearanceban_runonce

		if(!length(GLOB.appearance_keylist))
			GLOB.appearance_keylist=list()
			log_admin("appearance_keylist was empty")
	else
		if(!SSdbcore.IsConnected())
			log_world("Database connection failed. Reverting to the legacy ban system.")
			GLOB.configuration.general.use_database_bans = FALSE
			appearance_loadbanfile()
			return

		//appearance bans
		var/datum/db_query/appearanceban_query = SSdbcore.NewQuery("SELECT ckey FROM ban WHERE bantype = 'APPEARANCE_BAN' AND NOT unbanned = 1")

		if(!appearanceban_query.warn_execute())
			qdel(appearanceban_query)
			return FALSE

		while(appearanceban_query.NextRow())
			var/ckey = appearanceban_query.item[1]

			GLOB.appearance_keylist.Add("[ckey]")

		qdel(appearanceban_query)

/proc/appearance_savebanfile()
	var/savefile/S=new("data/appearance_full.ban")
	to_chat(S["keys[0]"], GLOB.appearance_keylist)

/proc/appearance_unban(mob/M)
	appearance_remove("[M.ckey]")
	appearance_savebanfile()


/proc/appearance_updatelegacybans()
	if(!GLOB.appearanceban_runonce)
		log_admin("Updating appearancefile!")
		// Updates bans.. Or fixes them. Either way.
		for(var/T in GLOB.appearance_keylist)
			if(!T)	continue
		GLOB.appearanceban_runonce++	//don't run this update again


/proc/appearance_remove(X)
	for(var/i = 1; i <= length(GLOB.appearance_keylist); i++)
		if( findtext(GLOB.appearance_keylist[i], "[X]") )
			GLOB.appearance_keylist.Remove(GLOB.appearance_keylist[i])
			appearance_savebanfile()
			return 1
	return 0