【.NET】获取MC服务器信息（人数等）代码 - 编程开发

mcmny

本帖最后由 mcmny 于 2015-2-7 21:39 编辑

注意：本代码原出处为wiki.vg，因不知其的开源协议，请谨慎使用，谢谢！

本代码是制作成命名空间的形式，方便调用。。。。

求回复，求人气。。。。。。。。。。。。

代码：

VB.net:

Imports System.Collections.Generic
Imports System.IO
Imports System.Net
Imports System.Net.Sockets
Imports System.Text
Imports System.Text.RegularExpressions
Namespace eMZi.Gaming.Minecraft
''' <summary>
''' Represents retrieved Minecraft Server information
''' </summary>
Public NotInheritable Class MinecraftServerInfo
''' <summary>
''' Gets the server's MOTD
''' </summary>
Public Property ServerMotd() As String
Get
Return m_ServerMotd
End Get
Private Set
m_ServerMotd = Value
End Set
End Property
Private m_ServerMotd As String
''' <summary>
''' Gets the server's MOTD converted into HTML
''' </summary>
Public ReadOnly Property ServerMotdHtml() As String
Get
Return Me.MotdHtml()
End Get
End Property
''' <summary>
''' Gets the server's max player count
''' </summary>
Public Property MaxPlayerCount() As Integer
Get
Return m_MaxPlayerCount
End Get
Private Set
m_MaxPlayerCount = Value
End Set
End Property
Private m_MaxPlayerCount As Integer
''' <summary>
''' Gets the server's current player count
''' </summary>
Public Property CurrentPlayerCount() As Integer
Get
Return m_CurrentPlayerCount
End Get
Private Set
m_CurrentPlayerCount = Value
End Set
End Property
Private m_CurrentPlayerCount As Integer
''' <summary>
''' Gets the server's Minecraft version
''' </summary>
Public Property MinecraftVersion() As Version
Get
Return m_MinecraftVersion
End Get
Private Set
m_MinecraftVersion = Value
End Set
End Property
Private m_MinecraftVersion As Version
''' <summary>
''' Gets HTML colors associated with specific formatting codes
''' </summary>
Private Shared ReadOnly Property MinecraftColors() As Dictionary(Of Char, String)
Get
Return New Dictionary(Of Char, String)() From { _
{"0"C, "#000000"}, _
{"1"C, "#0000AA"}, _
{"2"C, "#00AA00"}, _
{"3"C, "#00AAAA"}, _
{"4"C, "#AA0000"}, _
{"5"C, "#AA00AA"}, _
{"6"C, "#FFAA00"}, _
{"7"C, "#AAAAAA"}, _
{"8"C, "#555555"}, _
{"9"C, "#5555FF"}, _
{"a"C, "#55FF55"}, _
{"b"C, "#55FFFF"}, _
{"c"C, "#FF5555"}, _
{"d"C, "#FF55FF"}, _
{"e"C, "#FFFF55"}, _
{"f"C, "#FFFFFF"} _
}
End Get
End Property
''' <summary>
''' Gets HTML styles associated with specific formatting codes
''' </summary>
Private Shared ReadOnly Property MinecraftStyles() As Dictionary(Of Char, String)
Get
Return New Dictionary(Of Char, String)() From { _
{"k"C, "none;font-weight:normal;font-style:normal"}, _
{"m"C, "line-through;font-weight:normal;font-style:normal"}, _
{"l"C, "none;font-weight:900;font-style:normal"}, _
{"n"C, "underline;font-weight:normal;font-style:normal;"}, _
{"o"C, "none;font-weight:normal;font-style:italic;"}, _
{"r"C, "none;font-weight:normal;font-style:normal;color:#FFFFFF;"} _
}
End Get
End Property
''' <summary>
''' Creates a new instance of <see cref="MinecraftServerInfo"/> with specified values
''' </summary>
''' <param name="motd">Server's MOTD</param>
''' <param name="maxplayers">Server's max player count</param>
''' <param name="playercount">Server's current player count</param>
''' <param name="version">Server's Minecraft version</param>
Private Sub New(motd As String, maxplayers As Integer, playercount As Integer, mcversion As Version)
Me.ServerMotd = motd
Me.MaxPlayerCount = maxplayers
Me.CurrentPlayerCount = playercount
Me.MinecraftVersion = mcversion
End Sub
''' <summary>
''' Gets the server's MOTD formatted as HTML
''' </summary>
''' <returns>HTML-formatted MOTD</returns>
Private Function MotdHtml() As String
Dim regex As New Regex("§([k-oK-O])(.*?)(§[0-9a-fA-Fk-oK-OrR]|$)")
Dim s As String = Me.ServerMotd
While regex.IsMatch(s)
s = regex.Replace(s, Function(m)
Dim ast As String = "text-decoration:" & MinecraftStyles(m.Groups(1).Value(0))
Dim html As String = "" & m.Groups(2).Value & "" & m.Groups(3).Value
Return html
End Function)
End While
regex = New Regex("§([0-9a-fA-F])(.*?)(§[0-9a-fA-FrR]|$)")
While regex.IsMatch(s)
s = regex.Replace(s, Function(m)
Dim ast As String = "color:" & MinecraftColors(m.Groups(1).Value(0))
Dim html As String = "" & m.Groups(2).Value & "" & m.Groups(3).Value
Return html
End Function)
End While
Return s
End Function
''' <summary>
''' Gets the information from specified server
''' </summary>
''' <param name="endpoint">IP and Port of the server to get information from</param>
''' <returns>A <see cref="MinecraftServerInformation"/> instance with retrieved data</returns>
''' <exception cref="System.Exception">Upon failure, throws exception with descriptive information and InnerException with details</exception>
Public Shared Function GetServerInformation(endpoint As IPEndPoint) As MinecraftServerInfo
If endpoint Is Nothing Then
Throw New ArgumentNullException("endpoint")
End If
Try
Dim packetdat As String() = Nothing
Using client As New TcpClient()
client.Connect(endpoint)
Using ns As NetworkStream = client.GetStream()
ns.Write(New Byte() {&Hfe, &H1}, 0, 2)
Dim buff As Byte() = New Byte(2047) {}
Dim br As Integer = ns.Read(buff, 0, buff.Length)
If buff(0) <> &Hff Then
Throw New InvalidDataException("Received invalid packet")
End If
Dim packet As String = Encoding.BigEndianUnicode.GetString(buff, 3, br - 3)
If Not packet.StartsWith("§") Then
Throw New InvalidDataException("Received invalid data")
End If
packetdat = packet.Split(ControlChars.NullChar)
ns.Close()
End Using
client.Close()
End Using
Return New MinecraftServerInfo(packetdat(3), Integer.Parse(packetdat(5)), Integer.Parse(packetdat(4)), Version.Parse(packetdat(2)))
Catch ex As SocketException
Throw New Exception("There was a connection problem, look into InnerException for details", ex)
Catch ex As InvalidDataException
Throw New Exception("The data received was invalid, look into InnerException for details", ex)
Catch ex As Exception
Throw New Exception("There was a problem, look into InnerException for details", ex)
End Try
End Function
''' <summary>
''' Gets the information from specified server
''' </summary>
''' <param name="ip">IP of the server to get info from</param>
''' <param name="port">Port of the server to get info from</param>
''' <returns>A <see cref="MinecraftServerInformation"/> instance with retrieved data</returns>
''' <exception cref="System.Exception">Upon failure, throws exception with descriptive information and InnerException with details</exception>
Public Shared Function GetServerInformation(ip As IPAddress, port As Integer) As MinecraftServerInfo
Return GetServerInformation(New IPEndPoint(ip, port))
End Function
End Class
End Namespace

复制代码

C#:

using System;
using System.Collections.Generic;
using System.IO;
using System.Net;
using System.Net.Sockets;
using System.Text;
using System.Text.RegularExpressions;
namespace eMZi.Gaming.Minecraft
{
/// <summary>
/// Represents retrieved Minecraft Server information
/// </summary>
public sealed class MinecraftServerInfo
{
/// <summary>
/// Gets the server's MOTD
/// </summary>
public string ServerMotd { get; private set; }
/// <summary>
/// Gets the server's MOTD converted into HTML
/// </summary>
public string ServerMotdHtml { get { return this.MotdHtml(); } }
/// <summary>
/// Gets the server's max player count
/// </summary>
public int MaxPlayerCount { get; private set; }
/// <summary>
/// Gets the server's current player count
/// </summary>
public int CurrentPlayerCount { get; private set; }
/// <summary>
/// Gets the server's Minecraft version
/// </summary>
public Version MinecraftVersion { get; private set; }
/// <summary>
/// Gets HTML colors associated with specific formatting codes
/// </summary>
private static Dictionary<char, string> MinecraftColors { get { return new Dictionary<char, string>() { { '0', "#000000" }, { '1', "#0000AA" }, { '2', "#00AA00" }, { '3', "#00AAAA" }, { '4', "#AA0000" }, { '5', "#AA00AA" }, { '6', "#FFAA00" }, { '7', "#AAAAAA" }, { '8', "#555555" }, { '9', "#5555FF" }, { 'a', "#55FF55" }, { 'b', "#55FFFF" }, { 'c', "#FF5555" }, { 'd', "#FF55FF" }, { 'e', "#FFFF55" }, { 'f', "#FFFFFF" } }; } }
/// <summary>
/// Gets HTML styles associated with specific formatting codes
/// </summary>
private static Dictionary<char, string> MinecraftStyles { get { return new Dictionary<char, string>() { { 'k', "none;font-weight:normal;font-style:normal" }, { 'm', "line-through;font-weight:normal;font-style:normal" }, { 'l', "none;font-weight:900;font-style:normal" }, { 'n', "underline;font-weight:normal;font-style:normal;" }, { 'o', "none;font-weight:normal;font-style:italic;" }, { 'r', "none;font-weight:normal;font-style:normal;color:#FFFFFF;" } }; } }
/// <summary>
/// Creates a new instance of <see cref="MinecraftServerInfo"/> with specified values
/// </summary>
/// <param name="motd">Server's MOTD</param>
/// <param name="maxplayers">Server's max player count</param>
/// <param name="playercount">Server's current player count</param>
/// <param name="version">Server's Minecraft version</param>
private MinecraftServerInfo(string motd, int maxplayers, int playercount, Version mcversion)
{
this.ServerMotd = motd;
this.MaxPlayerCount = maxplayers;
this.CurrentPlayerCount = playercount;
this.MinecraftVersion = mcversion;
}
/// <summary>
/// Gets the server's MOTD formatted as HTML
/// </summary>
/// <returns>HTML-formatted MOTD</returns>
private string MotdHtml()
{
Regex regex = new Regex("§([k-oK-O])(.*?)(§[0-9a-fA-Fk-oK-OrR]|$)");
string s = this.ServerMotd;
while (regex.IsMatch(s))
s = regex.Replace(s, m =>
{
string ast = "text-decoration:" + MinecraftStyles[m.Groups[1].Value[0]];
string html = "" + m.Groups[2].Value + "" + m.Groups[3].Value;
return html;
});
regex = new Regex("§([0-9a-fA-F])(.*?)(§[0-9a-fA-FrR]|$)");
while (regex.IsMatch(s))
s = regex.Replace(s, m =>
{
string ast = "color:" + MinecraftColors[m.Groups[1].Value[0]];
string html = "" + m.Groups[2].Value + "" + m.Groups[3].Value;
return html;
});
return s;
}
/// <summary>
/// Gets the information from specified server
/// </summary>
/// <param name="endpoint">IP and Port of the server to get information from</param>
/// <returns>A <see cref="MinecraftServerInformation"/> instance with retrieved data</returns>
/// <exception cref="System.Exception">Upon failure, throws exception with descriptive information and InnerException with details</exception>
public static MinecraftServerInfo GetServerInformation(IPEndPoint endpoint)
{
if (endpoint == null)
throw new ArgumentNullException("endpoint");
try
{
string[] packetdat = null;
using (TcpClient client = new TcpClient())
{
client.Connect(endpoint);
using (NetworkStream ns = client.GetStream())
{
ns.Write(new byte[] { 0xFE, 0x01 }, 0, 2);
byte[] buff = new byte[2048];
int br = ns.Read(buff, 0, buff.Length);
if (buff[0] != 0xFF)
throw new InvalidDataException("Received invalid packet");
string packet = Encoding.BigEndianUnicode.GetString(buff, 3, br - 3);
if (!packet.StartsWith("§"))
throw new InvalidDataException("Received invalid data");
packetdat = packet.Split('\u0000');
ns.Close();
}
client.Close();
}
return new MinecraftServerInfo(packetdat[3], int.Parse(packetdat[5]), int.Parse(packetdat[4]), Version.Parse(packetdat[2]));
}
catch (SocketException ex)
{
throw new Exception("There was a connection problem, look into InnerException for details", ex);
}
catch (InvalidDataException ex)
{
throw new Exception("The data received was invalid, look into InnerException for details", ex);
}
catch (Exception ex)
{
throw new Exception("There was a problem, look into InnerException for details", ex);
}
}
/// <summary>
/// Gets the information from specified server
/// </summary>
/// <param name="ip">IP of the server to get info from</param>
/// <param name="port">Port of the server to get info from</param>
/// <returns>A <see cref="MinecraftServerInformation"/> instance with retrieved data</returns>
/// <exception cref="System.Exception">Upon failure, throws exception with descriptive information and InnerException with details</exception>
public static MinecraftServerInfo GetServerInformation(IPAddress ip, int port)
{
return GetServerInformation(new IPEndPoint(ip, port));
}
}
}

复制代码

调用实例:

本代码以Mcbbs论坛官方服务器为例，且其中部分代码经过本人修改，确保能够执行。。。

VB.net:

Imports System.Net.Sockets
Imports System.Collections.Generic
Imports System.IO
Imports System.Net
Imports System.Text
Imports System.Text.RegularExpressions
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ip As String
Dim iph As IPHostEntry = Dns.GetHostEntry("mcbbs-play.com")
For Each ip1 As IPAddress In iph.AddressList
ip = ip1.ToString
Exit For
Next
Dim a As eMZi.Gaming.Minecraft.MinecraftServerInfo
Dim c As IPAddress
c = IPAddress.Parse(ip)
Dim b As New IPEndPoint(c, 25565)
a = eMZi.Gaming.Minecraft.MinecraftServerInfo.GetServerInformation(b)
MessageBox.Show(a.ServerMotd)
MessageBox.Show(a.ServerMotdHtml)
MessageBox.Show(a.MaxPlayerCount)
MessageBox.Show(a.CurrentPlayerCount)
MessageBox.Show(a.MinecraftVersion)
End Sub
End Class
Namespace eMZi.Gaming.Minecraft
Public NotInheritable Class MinecraftServerInfo
Public Property ServerMotd() As String
' Gets the server's MOTD
Get
Return m_ServerMotd
End Get
Private Set(ByVal value As String)
m_ServerMotd = Value
End Set
End Property
Private m_ServerMotd As String
Public ReadOnly Property ServerMotdHtml() As String
' Gets the server's MOTD converted into HTML
Get
Return Me.MotdHtml()
End Get
End Property
Public Property MaxPlayerCount() As Integer
' Gets the server's max player count
Get
Return m_MaxPlayerCount
End Get
Private Set(ByVal value As Integer)
m_MaxPlayerCount = Value
End Set
End Property
Private m_MaxPlayerCount As Integer
Public Property CurrentPlayerCount() As Integer
' Gets the server's current player count
Get
Return m_CurrentPlayerCount
End Get
Private Set(ByVal value As Integer)
m_CurrentPlayerCount = Value
End Set
End Property
Private m_CurrentPlayerCount As Integer
Public Property MinecraftVersion() As String
' Gets the server's Minecraft version
Get
Return m_MinecraftVersion
End Get
Private Set(ByVal value As String)
m_MinecraftVersion = value
End Set
End Property
Private m_MinecraftVersion As String
Private Shared ReadOnly Property MinecraftColors() As Dictionary(Of Char, String)
' Gets HTML colors associated with specific formatting codes
Get
Return New Dictionary(Of Char, String)() From { _
{"0"c, "#000000"}, _
{"1"c, "#0000AA"}, _
{"2"c, "#00AA00"}, _
{"3"c, "#00AAAA"}, _
{"4"c, "#AA0000"}, _
{"5"c, "#AA00AA"}, _
{"6"c, "#FFAA00"}, _
{"7"c, "#AAAAAA"}, _
{"8"c, "#555555"}, _
{"9"c, "#5555FF"}, _
{"a"c, "#55FF55"}, _
{"b"c, "#55FFFF"}, _
{"c"c, "#FF5555"}, _
{"d"c, "#FF55FF"}, _
{"e"c, "#FFFF55"}, _
{"f"c, "#FFFFFF"} _
}
End Get
End Property
Private Shared ReadOnly Property MinecraftStyles() As Dictionary(Of Char, String)
Get
Return New Dictionary(Of Char, String)() From { _
{"k"c, "none;font-weight:normal;font-style:normal"}, _
{"m"c, "line-through;font-weight:normal;font-style:normal"}, _
{"l"c, "none;font-weight:900;font-style:normal"}, _
{"n"c, "underline;font-weight:normal;font-style:normal;"}, _
{"o"c, "none;font-weight:normal;font-style:italic;"}, _
{"r"c, "none;font-weight:normal;font-style:normal;color:#FFFFFF;"} _
}
End Get
End Property
Private Sub New(ByVal motd As String, ByVal maxplayers As Integer, ByVal playercount As Integer, ByVal mcversion As String)
Me.ServerMotd = motd
Me.MaxPlayerCount = maxplayers
Me.CurrentPlayerCount = playercount
Me.MinecraftVersion = mcversion
End Sub
Private Function MotdHtml() As String
Dim regex As New Regex("§([k-oK-O])(.*?)(§[0-9a-fA-Fk-oK-OrR]|$)")
Dim s As String = Me.ServerMotd
While regex.IsMatch(s)
s = regex.Replace(s, Function(m)
Dim ast As String = "text-decoration:" & MinecraftStyles(m.Groups(1).Value(0))
Dim html As String = "" & m.Groups(2).Value & "" & m.Groups(3).Value
Return html
End Function)
End While
regex = New Regex("§([0-9a-fA-F])(.*?)(§[0-9a-fA-FrR]|$)")
While regex.IsMatch(s)
s = regex.Replace(s, Function(m)
Dim ast As String = "color:" & MinecraftColors(m.Groups(1).Value(0))
Dim html As String = "" & m.Groups(2).Value & "" & m.Groups(3).Value
Return html
End Function)
End While
Return s
End Function
Public Shared Function GetServerInformation(ByVal endpoint As IPEndPoint) As MinecraftServerInfo
If endpoint Is Nothing Then
Throw New ArgumentNullException("endpoint")
End If
Try
Dim packetdat As String() = Nothing
Using client As New TcpClient()
client.Connect(endpoint)
Using ns As NetworkStream = client.GetStream()
ns.Write(New Byte() {&HFE, &H1}, 0, 2)
Dim buff As Byte() = New Byte(2047) {}
Dim br As Integer = ns.Read(buff, 0, buff.Length)
If buff(0) <> &HFF Then
Throw New InvalidDataException("Received invalid packet")
End If
Dim packet As String = Encoding.BigEndianUnicode.GetString(buff, 3, br - 3)
If Not packet.StartsWith("§") Then
Throw New InvalidDataException("Received invalid data")
End If
packetdat = packet.Split(ControlChars.NullChar)
ns.Close()
End Using
client.Close()
End Using
Return New MinecraftServerInfo(packetdat(3), Integer.Parse(packetdat(5)), Integer.Parse(packetdat(4)), (packetdat(2)))
Catch ex As SocketException
Throw New Exception("There was a connection problem, look into InnerException for details", ex)
Catch ex As InvalidDataException
Throw New Exception("The data received was invalid, look into InnerException for details", ex)
Catch ex As Exception
Throw New Exception("There was a problem, look into InnerException for details", ex)
End Try
End Function
Public Shared Function GetServerInformation(ByVal ip As IPAddress, ByVal port As Integer) As MinecraftServerInfo
Return GetServerInformation(New IPEndPoint(ip, port))
End Function
End Class
End Namespace

复制代码

C#:

using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
using System.Net.Sockets;
using System.IO;
using System.Net;
using System.Text;
using System.Text.RegularExpressions;
public class Form1
{
private void Form1_Load(System.Object sender, System.EventArgs e)
{
}
private void Button1_Click(System.Object sender, System.EventArgs e)
{
string ip = null;
IPHostEntry iph = Dns.GetHostEntry("mcbbs-play.com");
foreach (IPAddress ip1 in iph.AddressList) {
ip = ip1.ToString();
break; // TODO: might not be correct. Was : Exit For
}
eMZi.Gaming.Minecraft.MinecraftServerInfo a = null;
IPAddress c = null;
c = IPAddress.Parse(ip);
IPEndPoint b = new IPEndPoint(c, 25565);
a = eMZi.Gaming.Minecraft.MinecraftServerInfo.GetServerInformation(b);
MessageBox.Show(a.ServerMotd);
MessageBox.Show(a.ServerMotdHtml);
MessageBox.Show(a.MaxPlayerCount);
MessageBox.Show(a.CurrentPlayerCount);
MessageBox.Show(a.MinecraftVersion);
}
public Form1()
{
Load += Form1_Load;
}
}
namespace eMZi.Gaming.Minecraft
{
public sealed class MinecraftServerInfo
{
public string ServerMotd {
// Gets the server's MOTD
get { return m_ServerMotd; }
private set { m_ServerMotd = value; }
}
private string m_ServerMotd;
public string ServerMotdHtml {
// Gets the server's MOTD converted into HTML
get { return this.MotdHtml(); }
}
public int MaxPlayerCount {
// Gets the server's max player count
get { return m_MaxPlayerCount; }
private set { m_MaxPlayerCount = value; }
}
private int m_MaxPlayerCount;
public int CurrentPlayerCount {
// Gets the server's current player count
get { return m_CurrentPlayerCount; }
private set { m_CurrentPlayerCount = value; }
}
private int m_CurrentPlayerCount;
public string MinecraftVersion {
// Gets the server's Minecraft version
get { return m_MinecraftVersion; }
private set { m_MinecraftVersion = value; }
}
private string m_MinecraftVersion;
private static Dictionary<char, string> MinecraftColors {
// Gets HTML colors associated with specific formatting codes
get { return new Dictionary<char, string> {{'0',"#000000"},{'1',"#0000AA"},{'2',"#00AA00"},{'3',"#00AAAA"},{'4',"#AA0000"},{'5',"#AA00AA"},{'6',"#FFAA00"},{'7',"#AAAAAA"},{'8',"#555555"},{'9',"#5555FF"},{'a',"#55FF55"},{'b',"#55FFFF"},{'c',"#FF5555"},{'d',"#FF55FF"},{'e',"#FFFF55"},{'f',"#FFFFFF"}}; }
}
private static Dictionary<char, string> MinecraftStyles {
get { return new Dictionary<char, string> {{'k',"none;font-weight:normal;font-style:normal"},{'m',"line-through;font-weight:normal;font-style:normal"},{'l',"none;font-weight:900;font-style:normal"},{'n',"underline;font-weight:normal;font-style:normal;"},{'o',"none;font-weight:normal;font-style:italic;"},{'r',"none;font-weight:normal;font-style:normal;color:#FFFFFF;"}}; }
}
private MinecraftServerInfo(string motd, int maxplayers, int playercount, string mcversion)
{
this.ServerMotd = motd;
this.MaxPlayerCount = maxplayers;
this.CurrentPlayerCount = playercount;
this.MinecraftVersion = mcversion;
}
private string MotdHtml()
{
Regex regex = new Regex("§([k-oK-O])(.*?)(§[0-9a-fA-Fk-oK-OrR]|$)");
string s = this.ServerMotd;
while (regex.IsMatch(s)) {
s = regex.Replace(s, m =>
{
string ast = "text-decoration:" + MinecraftStyles[m.Groups(1).Value(0)];
string html = "" + m.Groups(2).Value + "" + m.Groups(3).Value;
return html;
});
}
regex = new Regex("§([0-9a-fA-F])(.*?)(§[0-9a-fA-FrR]|$)");
while (regex.IsMatch(s)) {
s = regex.Replace(s, m =>
{
string ast = "color:" + MinecraftColors[m.Groups(1).Value(0)];
string html = "" + m.Groups(2).Value + "" + m.Groups(3).Value;
return html;
});
}
return s;
}
public static MinecraftServerInfo GetServerInformation(IPEndPoint endpoint)
{
if (endpoint == null) {
throw new ArgumentNullException("endpoint");
}
try {
string[] packetdat = null;
using (TcpClient client = new TcpClient()) {
client.Connect(endpoint);
using (NetworkStream ns = client.GetStream()) {
ns.Write(new byte[] {
0xfe,
0x1
}, 0, 2);
byte[] buff = new byte[2048];
int br = ns.Read(buff, 0, buff.Length);
if (buff[0] != 0xff) {
throw new InvalidDataException("Received invalid packet");
}
string packet = Encoding.BigEndianUnicode.GetString(buff, 3, br - 3);
if (!packet.StartsWith("§")) {
throw new InvalidDataException("Received invalid data");
}
packetdat = packet.Split(ControlChars.NullChar);
ns.Close();
}
client.Close();
}
return new MinecraftServerInfo(packetdat[3], int.Parse(packetdat[5]), int.Parse(packetdat[4]), (packetdat[2]));
} catch (SocketException ex) {
throw new Exception("There was a connection problem, look into InnerException for details", ex);
} catch (InvalidDataException ex) {
throw new Exception("The data received was invalid, look into InnerException for details", ex);
} catch (Exception ex) {
throw new Exception("There was a problem, look into InnerException for details", ex);
}
}
public static MinecraftServerInfo GetServerInformation(IPAddress ip, int port)
{
return GetServerInformation(new IPEndPoint(ip, port));
}
}
}

复制代码

kuangwenxin

毛玩意

mcmny

本帖最后由 mcmny 于 2015-2-6 19:47 编辑

kuangwenxin 发表于 2015-2-6 19:44
毛玩意

适用于VB.net与C#及一切以.net为平台的语言获取MC服务器信息的代码。。。。。

kuangwenxin

奥

変態のマギ

不错，不过有几个地方可以省略的，虽然优化不大，但是会快一些，比如好几个不必要的赋值等

mcmny

啦啦啦，拉来版主。。。
@zhh0000zhh

我才是小灰灰

类似源码我用E写过

mcmny

我才是小灰灰发表于 2015-2-11 07:59
类似源码我用E写过

表示这是我从WIKI.VG那里转来的。。。。

bakaawt

太好了！我正好需要这个！

wahaha216

貌似不能获取localhost的？

mcmny

wahaha216 发表于 2015-2-12 16:39
貌似不能获取localhost的？

只需要把IP改为127.0.0.1即可。。。。

wahaha216

mcmny 发表于 2015-2-12 18:15
只需要把IP改为127.0.0.1即可。。。。

soga。3Q

PeoLeser

简直赞b(￣▽￣)d~

matts8008

这是什么代码？JAVA？

mcmny

matts8008 发表于 2015-7-11 14:45
这是什么代码？JAVA？

.NET平台的代码，不是java。。。。

matts8008

mcmny 发表于 2015-7-11 14:47
.NET平台的代码，不是java。。。。

哦。。。。。。。

晚安2001

然而我根本看不懂233

mmmmm_ccccc

请问楼主，为什么不行？出现了一个错误

qq2467315284

对于会C#的我来说这真是太好了QWQ
感谢LZ

gofly

大爱楼主！有VB.NET也~

TheEvilDude

okay this is cool

justiceの深蓝

MinecraftServerInfo a = MinecraftServerInfo.GetServerInformation(IPAddress.Parse("127.0.0.1"), 25565);
Console.WriteLine($"a.ServerMotd={a.ServerMotd}");
Console.WriteLine($"a.ServerMotdHtml={a.ServerMotdHtml}");
Console.WriteLine($"a.MaxPlayerCount={a.MaxPlayerCount}");
Console.WriteLine($"a.CurrentPlayerCount={a.CurrentPlayerCount}");
Console.WriteLine($"a.MinecraftVersion={a.MinecraftVersion}");
Console.ReadKey();

复制代码

何必写前面那一堆呢..