var/global/list/y_whitelist = list()

proc
	load_ywhitelist()
		y_whitelist = list ()
		log_admin("Loading whitelist")
		var/DBConnection/dbcon = new()
		var/DBQuery/query
		dbcon.Connect("dbi:mysql:[sqldb]:[sqladdress]:[sqlport]","[sqllogin]","[sqlpass]")
		if(!dbcon.IsConnected())
			log_admin("Failed to load whitelist. Error: [dbcon.ErrorMsg()]")
			return 0
		query = dbcon.NewQuery("SELECT * FROM whitelist")
		query.Execute()
		while (query.NextRow())
			y_whitelist += "[query.item[1]]"
		dbcon.Disconnect()
		log_admin("Whitelist init complete. There's [y_whitelist.len] in whitelist")
		return 1

	isInWhitelist(var/K)
		K = ckey(K)
		if (K in y_whitelist)
			return 1
		return 0

/datum/admins/proc
	LoadWhitelist()
		set category = "Server"
		set name = "Update whitelist"

		if (load_ywhitelist())
			usr << "\blue \bold Success!"
		else
			usr << "\red \bold Fail!"