Unreal-RedNetwork/Source/RSHWNetwork/Private/RSHWNetworkServer.cpp

402 lines
11 KiB
C++

#include "RSHWNetworkServer.h"
#include "KCPWrap.h"
#include "Logging.h"
#include "Sockets.h"
#include "IPAddress.h"
#include "SocketSubsystem.h"
#include "HAL/UnrealMemory.h"
URSHWNetworkServer::URSHWNetworkServer(const FObjectInitializer& ObjectInitializer)
: Super(ObjectInitializer)
{
PrimaryComponentTick.bCanEverTick = true;
}
bool URSHWNetworkServer::Send(int32 ClientID, const TArray<uint8>& Data)
{
if (!IsActive() || !Registration.Contains(ClientID)) return false;
const FRegistrationInfo& Info = Registration[ClientID];
return !Info.KCPUnit->Send(Data.GetData(), Data.Num());
}
int32 URSHWNetworkServer::UDPSend(int32 ClientID, const uint8* Data, int32 Count)
{
if (!IsActive() || !Registration.Contains(ClientID)) return false;
const FRegistrationInfo& Info = Registration[ClientID];
SendBuffer.SetNumUninitialized(8, false);
SendBuffer[0] = Info.Pass.ID >> 0;
SendBuffer[1] = Info.Pass.ID >> 8;
SendBuffer[2] = Info.Pass.ID >> 16;
SendBuffer[3] = Info.Pass.ID >> 24;
SendBuffer[4] = Info.Pass.Key >> 0;
SendBuffer[5] = Info.Pass.Key >> 8;
SendBuffer[6] = Info.Pass.Key >> 16;
SendBuffer[7] = Info.Pass.Key >> 24;
SendBuffer.Append(Data, Count);
int32 BytesSend;
SocketPtr->SendTo(SendBuffer.GetData(), SendBuffer.Num(), BytesSend, *Info.Addr);
return 0;
}
void URSHWNetworkServer::BeginPlay()
{
Super::BeginPlay();
}
void URSHWNetworkServer::EndPlay(const EEndPlayReason::Type EndPlayReason)
{
Deactivate();
Super::EndPlay(EndPlayReason);
}
void URSHWNetworkServer::TickComponent(float DeltaTime, ELevelTick TickType, FActorComponentTickFunction * ThisTickFunction)
{
Super::TickComponent(DeltaTime, TickType, ThisTickFunction);
if (!IsActive()) return;
ISocketSubsystem* SocketSubsystem = ISocketSubsystem::Get();
check(SocketSubsystem);
const FDateTime NowTime = FDateTime::Now();
// update kcp
{
TArray<int32> RegistrationAddr;
Registration.GetKeys(RegistrationAddr);
int32 Current = FPlatformTime::Cycles64() / 1000;
for (int32 ID : RegistrationAddr)
{
Registration[ID].KCPUnit->Update(Current);
}
}
// send heartbeat
{
TArray<int32> RegistrationAddr;
Registration.GetKeys(RegistrationAddr);
for (int32 ID : RegistrationAddr)
{
if (NowTime - Registration[ID].Heartbeat > Heartbeat)
{
SendBuffer.SetNum(8, false);
SendBuffer[0] = Registration[ID].Pass.ID >> 0;
SendBuffer[1] = Registration[ID].Pass.ID >> 8;
SendBuffer[2] = Registration[ID].Pass.ID >> 16;
SendBuffer[3] = Registration[ID].Pass.ID >> 24;
SendBuffer[4] = Registration[ID].Pass.Key >> 0;
SendBuffer[5] = Registration[ID].Pass.Key >> 8;
SendBuffer[6] = Registration[ID].Pass.Key >> 16;
SendBuffer[7] = Registration[ID].Pass.Key >> 24;
int32 BytesSend;
if (SocketPtr->SendTo(SendBuffer.GetData(), SendBuffer.Num(), BytesSend, *Registration[ID].Addr) && BytesSend == SendBuffer.Num())
{
Registration[ID].Heartbeat = NowTime;
}
}
}
}
// handle socket recv
{
int32 BytesRead;
TSharedRef<FInternetAddr> SourceAddr = SocketSubsystem->CreateInternetAddr();
while (SocketPtr) {
RecvBuffer.SetNumUninitialized(65535, false);
if (!SocketPtr->RecvFrom(RecvBuffer.GetData(), RecvBuffer.Num(), BytesRead, *SourceAddr)) break;
if (BytesRead < 8) continue;
RecvBuffer.SetNumUninitialized(BytesRead, false);
FRSHWNetworkPass SourcePass;
SourcePass.ID = 0;
SourcePass.Key = 0;
SourcePass.ID |= (int32)RecvBuffer[0] << 0;
SourcePass.ID |= (int32)RecvBuffer[1] << 8;
SourcePass.ID |= (int32)RecvBuffer[2] << 16;
SourcePass.ID |= (int32)RecvBuffer[3] << 24;
SourcePass.Key |= (int32)RecvBuffer[4] << 0;
SourcePass.Key |= (int32)RecvBuffer[5] << 8;
SourcePass.Key |= (int32)RecvBuffer[6] << 16;
SourcePass.Key |= (int32)RecvBuffer[7] << 24;
FString SourceAddrStr = SourceAddr->ToString(true);
// is pre-register pass request
if (!(SourcePass.ID | SourcePass.Key))
{
if (!PreRegistration.Contains(SourceAddrStr))
{
FPreRegistrationInfo NewRegistration;
NewRegistration.Time = NowTime;
NewRegistration.Pass.ID = NextRegistrationID++;
NewRegistration.Pass.Key ^= FMath::Rand() << 0;
NewRegistration.Pass.Key ^= FMath::Rand() << 8;
NewRegistration.Pass.Key ^= FMath::Rand() << 16;
NewRegistration.Pass.Key ^= FMath::Rand() << 24;
PreRegistration.Add(SourceAddrStr, NewRegistration);
UE_LOG(LogRSHWNetwork, Log, TEXT("Pre register pass [ %s - %i:%i ] in '%s'."), *SourceAddrStr, NewRegistration.Pass.ID, NewRegistration.Pass.Key, *GetName());
}
const FRSHWNetworkPass& Pass = PreRegistration[SourceAddrStr].Pass;
SendBuffer.SetNum(8, false);
SendBuffer[0] = Pass.ID >> 0;
SendBuffer[1] = Pass.ID >> 8;
SendBuffer[2] = Pass.ID >> 16;
SendBuffer[3] = Pass.ID >> 24;
SendBuffer[4] = Pass.Key >> 0;
SendBuffer[5] = Pass.Key >> 8;
SendBuffer[6] = Pass.Key >> 16;
SendBuffer[7] = Pass.Key >> 24;
int32 BytesSend;
if (SocketPtr->SendTo(SendBuffer.GetData(), SendBuffer.Num(), BytesSend, *SourceAddr) && BytesSend == SendBuffer.Num())
{
UE_LOG(LogRSHWNetwork, Log, TEXT("Send pre registration pass [ %s - %i:%i ] in '%s'."), *SourceAddrStr, Pass.ID, Pass.Key, *GetName());
}
}
else
{
// redirect connection
if (Registration.Contains(SourcePass.ID))
{
if (!(*Registration[SourcePass.ID].Addr == *SourceAddr))
{
Registration[SourcePass.ID].Addr = SourceAddr;
UE_LOG(LogRSHWNetwork, Log, TEXT("Redirect connection [ %i:%i ] in '%s'."), SourcePass.ID, SourcePass.Key, *GetName());
}
}
// register connection
{
bool bIsValidRegistration = false;
if (PreRegistration.Contains(SourceAddrStr))
{
if (PreRegistration[SourceAddrStr].Pass.ID == SourcePass.ID && PreRegistration[SourceAddrStr].Pass.Key == SourcePass.Key)
{
bIsValidRegistration = true;
}
}
if (bIsValidRegistration)
{
FRegistrationInfo NewRegistration;
NewRegistration.Pass = SourcePass;
NewRegistration.RecvTime = NowTime;
NewRegistration.Heartbeat = FDateTime::MinValue();
NewRegistration.Addr = SourceAddr;
NewRegistration.KCPUnit = MakeShared<FKCPWrap>(NewRegistration.Pass.ID, FString::Printf(TEXT("%s[%i]"), *GetName(), NewRegistration.Pass.ID));
NewRegistration.KCPUnit->SetTurboMode();
NewRegistration.KCPUnit->GetKCPCB().logmask = KCPLogMask;
NewRegistration.KCPUnit->OutputFunc = [this, ID = NewRegistration.Pass.ID](const uint8* Data, int32 Count) -> int32
{
return UDPSend(ID, Data, Count);
};
Registration.Add(SourcePass.ID, NewRegistration);
PreRegistration.Remove(SourceAddrStr);
UE_LOG(LogRSHWNetwork, Log, TEXT("Register connection [ %i:%i ] in '%s'."), SourcePass.ID, SourcePass.Key, *GetName());
OnLogin.Broadcast(SourcePass.ID);
}
}
}
if (Registration.Contains(SourcePass.ID))
{
Registration[SourcePass.ID].RecvTime = NowTime;
}
// is heartbeat request
if ((SourcePass.ID | SourcePass.Key) && RecvBuffer.Num() == 8) continue;
// is client request
if (Registration.Contains(SourcePass.ID))
{
Registration[SourcePass.ID].KCPUnit->Input(RecvBuffer.GetData() + 8, RecvBuffer.Num() - 8);
}
}
}
// handle pre-registration timeout
{
TArray<FString> PreRegistrationAddr;
PreRegistration.GetKeys(PreRegistrationAddr);
for (const FString& Addr : PreRegistrationAddr)
{
if (NowTime - PreRegistration[Addr].Time > TimeoutLimit)
{
UE_LOG(LogRSHWNetwork, Log, TEXT("Pre-registration pass [ %i:%i ] timeout in '%s'."), PreRegistration[Addr].Pass.ID, PreRegistration[Addr].Pass.Key, *GetName());
PreRegistration.Remove(Addr);
}
}
}
// handle running timeout
{
TArray<int32> RegistrationAddr;
Registration.GetKeys(RegistrationAddr);
for (int32 ID : RegistrationAddr)
{
if (NowTime - Registration[ID].RecvTime > TimeoutLimit)
{
UE_LOG(LogRSHWNetwork, Log, TEXT("Registration pass [ %i:%i ] timeout in '%s'."), Registration[ID].Pass.ID, Registration[ID].Pass.Key, *GetName());
Registration.Remove(ID);
OnUnlogin.Broadcast(ID);
}
}
}
// handle kcp recv
{
TArray<int32> RegistrationAddr;
Registration.GetKeys(RegistrationAddr);
for (int32 ID : RegistrationAddr)
{
while (Registration[ID].KCPUnit)
{
int32 Size = Registration[ID].KCPUnit->PeekSize();
if (Size <= 0) break;
RecvBuffer.SetNumUninitialized(Size, false);
Size = Registration[ID].KCPUnit->Recv(RecvBuffer.GetData(), RecvBuffer.Num());
if (Size <= 0) break;
RecvBuffer.SetNumUninitialized(Size, false);
OnRecv.Broadcast(ID, RecvBuffer);
}
}
}
}
void URSHWNetworkServer::Activate(bool bReset)
{
if (!GetOwner()->GetGameInstance()) return;
if (bReset) Deactivate();
if (!ShouldActivate()) return;
ISocketSubsystem* SocketSubsystem = ISocketSubsystem::Get();
if (SocketSubsystem == nullptr)
{
UE_LOG(LogRSHWNetwork, Error, TEXT("Socket subsystem is nullptr in '%s'."), *GetName());
return;
}
SocketPtr = SocketSubsystem->CreateSocket(NAME_DGram, FString::Printf(TEXT("RSHW Server Socket in '%s'."), *GetName()));
if (SocketPtr == nullptr)
{
UE_LOG(LogRSHWNetwork, Error, TEXT("Socket creation failed in '%s'."), *GetName());
return;
}
TSharedRef<FInternetAddr> ServerAddr = SocketSubsystem->CreateInternetAddr();
ServerAddr->SetAnyAddress();
ServerAddr->SetPort(Port);
if (!SocketPtr->Bind(*ServerAddr))
{
UE_LOG(LogRSHWNetwork, Error, TEXT("Socket bind failed in '%s'."), *GetName());
SocketSubsystem->DestroySocket(SocketPtr);
return;
}
if (!SocketPtr->SetNonBlocking())
{
UE_LOG(LogRSHWNetwork, Error, TEXT("Socket set non-blocking failed in '%s'."), *GetName());
SocketSubsystem->DestroySocket(SocketPtr);
return;
}
NextRegistrationID = 1;
UE_LOG(LogRSHWNetwork, Log, TEXT("RSHW network server '%s' activate."), *GetName());
SetComponentTickEnabled(true);
SetActiveFlag(true);
OnComponentActivated.Broadcast(this, bReset);
}
void URSHWNetworkServer::Deactivate()
{
if (ShouldActivate()) return;
TArray<int32> RegistrationAddr;
Registration.GetKeys(RegistrationAddr);
for (int32 ID : RegistrationAddr)
{
OnUnlogin.Broadcast(ID);
}
ISocketSubsystem* SocketSubsystem = ISocketSubsystem::Get();
check(SocketSubsystem);
SocketSubsystem->DestroySocket(SocketPtr);
SendBuffer.SetNum(0);
RecvBuffer.SetNum(0);
DataBuffer.SetNum(0);
PreRegistration.Reset();
Registration.Reset();
UE_LOG(LogRSHWNetwork, Log, TEXT("RSHW network server '%s' deactivate."), *GetName());
SetComponentTickEnabled(false);
SetActiveFlag(false);
OnComponentDeactivated.Broadcast(this);
}
void URSHWNetworkServer::BeginDestroy()
{
Deactivate();
Super::BeginDestroy();
}