From 48d53f9b4d2c98a37a33fea70ceb6837a1ad2df9 Mon Sep 17 00:00:00 2001
From: tommy <thefamousdoge@hotmail.com>
Date: Fri, 12 Jan 2024 22:42:26 -0500
Subject: [PATCH] rewrite and publicize minecraft server commands

These commands have existed for a while but were kept private due to them only being used in a private discord server and not the structure not handling different servers (if someone set an ip for their server, anyone who used the status command would see the result for that ip). Now that I have reset my computer and lost local changes I decided to rewrite it (better this time) and publish it.
---
 src/modules/commands/minecraft.lua | 114 +++++++++++++++++++++++++++++
 1 file changed, 114 insertions(+)
 create mode 100644 src/modules/commands/minecraft.lua

diff --git a/src/modules/commands/minecraft.lua b/src/modules/commands/minecraft.lua
new file mode 100644
index 0000000..d9fe1b7
--- /dev/null
+++ b/src/modules/commands/minecraft.lua
@@ -0,0 +1,114 @@
+local discordia=require('discordia')
+local json=require('json')
+local http_request=require('./../http.lua')
+local Commands=require('./../commands.lua')
+discordia.extensions()
+
+local COLOURS={
+	GREEN=0x00ff00,
+	RED=0xff0000
+}
+
+--initialize minecraft ip data
+local MinecraftDataFile=io.open('minecraft_data.json','r')
+if not MinecraftDataFile or (MinecraftDataFile and MinecraftDataFile:read('*a')=='') then
+	print('no such file exists! so make it')
+	io.open('minecraft_data.json','w+'):write(json.encode({})):close()
+end
+if MinecraftDataFile then
+	MinecraftDataFile:close()
+end
+
+Commands:Add('setip',{},'set ip for status',function(CommandData)
+	local CommandArgs=CommandData.args
+	local CommandMessage=CommandData.message
+	local ServerIPStr=CommandArgs[1]
+	if not ServerIPStr then
+		return CommandMessage:reply('No IP provided')
+	end
+
+	local ServerIP=ServerIPStr:match("(%d+.%d+.%d+.%d+)")
+	if not ServerIP then
+		return CommandMessage:reply('Invalid server IP')
+	end
+	local ServerPort=ServerIPStr:match(ServerIP..':(%d+)') or 25565
+
+	local GuildId=CommandMessage.guild.id
+	if not GuildId then
+		return CommandMessage:reply('You cannot use this command outside of a Discord server')
+	end
+
+	local GuildMinecraftData={IP=ServerIP,PORT=ServerPort}
+
+	local GlobalMinecraftData=json.decode(io.open('minecraft_data.json','r'):read('*a'))
+	GlobalMinecraftData[GuildId]=GuildMinecraftData
+	io.open('minecraft_data.json','w+'):write(json.encode(GlobalMinecraftData)):close()
+
+	return CommandMessage:reply({
+		content='Successfully added `'..ServerIP..':'..ServerPort..'` for ServerId='..GuildId,
+		reference={
+			message=CommandMessage,
+			mention=true
+		}
+	})
+end)
+
+Commands:Add('status',{},'get status for minecraft server',function(CommandData)
+	local CommandMessage=CommandData.message
+
+	local GuildId=CommandMessage.guild.id
+	if not GuildId then
+		return CommandMessage:reply('You cannot use this command outside of a Discord server')
+	end
+
+	local GlobalMinecraftData=json.decode(io.open('minecraft_data.json','r'):read('*a'))
+	if not GlobalMinecraftData then
+		return CommandMessage:reply('Could not read server data')
+	end
+
+	local ServerMinecraftData=GlobalMinecraftData[GuildId]
+	if not ServerMinecraftData then
+		return CommandMessage:reply('There is no data for this Discord server')
+	end
+
+	local ServerIPStr=ServerMinecraftData.IP..':'..ServerMinecraftData.PORT
+	local Response,Headers=http_request('GET',('https://api.mcsrvstat.us/3/%s'):format(ServerIPStr))
+
+	local IsOnline=Response.online
+	local EmbedData
+	if IsOnline then
+		local MaxPlayers=Response.players.max
+		local OnlinePlayers=Response.players.online
+		local AnonymousPlayers=OnlinePlayers
+		local Players={}
+		if OnlinePlayers>0 then
+			for PlayerIndex,PlayerData in next,Response.players.list do
+				table.insert(Players,PlayerData.name)
+				AnonymousPlayers=AnonymousPlayers-1
+			end
+		else
+			table.insert(Players,'No players online')
+		end
+		if AnonymousPlayers>0 then
+			for AnonymousPlayerIndex=1,AnonymousPlayers do
+				table.insert(Players,'Anonymous Player')
+			end
+		end
+		EmbedData={
+	        title='Server Status for '..ServerIPStr,
+	        description=Response.motd.clean[1]..' ('..Response.version..')',
+	        fields={
+	        	{name='Players',value=OnlinePlayers..'/'..MaxPlayers,inline=true},
+	        	{name='List of players',value=table.concat(Players,'\n'),inline=true}
+	        },
+	        color=COLOURS.GREEN
+	    }
+	else
+		EmbedData={
+			title='Server Status for '..ServerIPStr,
+			description='Server is offline',
+			color=COLOURS.RED
+		}
+	end
+	return CommandMessage:reply({embed=EmbedData})
+end)
\ No newline at end of file