[TESTMERGE] New tgs commands + modification of a existant one (#58)

sandcode/code/modules/tgs/chat_commands.dm

@@ -0,0 +1,25 @@
+/datum/tgs_chat_command/who
+	name = "who"
+	help_text = "Lists everyone currently on the server"
+	admin_only = FALSE
+
+/datum/tgs_chat_command/who/Run(datum/tgs_chat_user/sender, params)
+	return tgswho()
+
+/datum/tgs_chat_command/awho
+	name = "awho"
+	help_text = "Lists everyone + sneaky admins currently on the server"
+	admin_only = TRUE
+
+/datum/tgs_chat_command/awho/Run(datum/tgs_chat_user/sender, params)
+	return tgsadminwho()
+
+/datum/tgs_chat_command/restart
+	name = "restart"
+	help_text = "Forces a restart on the server"
+	admin_only = TRUE
+
+/datum/tgs_chat_command/restart/Run(datum/tgs_chat_user/sender)
+	to_chat(world, "<span class='boldwarning'>Server restart - Initialized by [sender.friendly_name]</span>")
+	send2irc("Server", "[sender.friendly_name] forced a restart.")
+	return world.TgsEndProcess()

sandcode/code/modules/tgs/custom_procs.dm

@@ -0,0 +1,41 @@
+/proc/tgswho()
+	var/list/message = list("Players: \n")
+	var/list/player_keys = list()
+	for(var/player in GLOB.clients)
+		var/client/C = player
+		player_keys += "[C.holder.fakekey ? "[C.holder.fakekey]" : "[C]"]"
+
+	for(var/verified_player in player_keys)
+		message += "- [verified_player]\n"
+
+	return jointext(message, "")
+
+/proc/tgsadminwho()
+	var/list/full_message = list("Connected clients: \n")
+	var/list/message = list("Players: \n")
+	var/list/message_admin = list("Admins: \n")
+	var/list/player_keys = list()
+	var/list/admin_keys = list()
+	for(var/player in GLOB.clients)
+		var/client/C = player
+		player_keys += "[C]"
+
+	for(var/verified_player in player_keys)
+		message += "- [verified_player]\n"
+
+	for(var/adm in GLOB.admins)
+		var/client/C = adm
+		admin_keys += "[C.holder.fakekey ? "[C] disguised as [C.holder.fakekey]" : "[C]"]"
+	
+	for(var/verified_admin in admin_keys)
+		message_admin += "- [verified_admin]\n"
+
+	if(message_admin)
+		var/finished_admin_message = "[jointext(message_admin, "")]"
+		full_message += finished_admin_message
+
+	if(message)
+		var/finished_message = "[jointext(message, "")]"
+		full_message += finished_message
+
+	return jointext(full_message, "")