sockaddr_storage client_addr;
    socklen_t len = sizeof(client_addr);
    SOCKET ClientSocket = accept(Socket, (sockaddr*)&client_addr, &len);
    if (ClientSocket == INVALID_SOCKET)
        ThrowFmt("Accept error", "System error %d", WSAGetLastError());

    IncomingConnection* newPeer = new IncomingConnection(ClientSocket);

    if (client_addr.ss_family == AF_INET && len == sizeof(sockaddr_in))
    {
        snprintf(newPeer->Name, sizeof(newPeer->Name), "%s:%d",
                 inet_ntoa(reinterpret_cast<sockaddr_in*>(&client_addr)->sin_addr),
                 ntohs(reinterpret_cast<sockaddr_in*>(&client_addr)->sin_port));
    }
    else if (client_addr.ss_family == AF_INET6 && len == sizeof(sockaddr_in6))
    {
        if (inet_ntop(AF_INET6, &reinterpret_cast<sockaddr_in6*>(&client_addr)->sin6_addr, newPeer->Name, sizeof(newPeer->Name)) == nullptr)
        {
            snprintf(newPeer->Name, sizeof(newPeer->Name), "[inet_ntop error %d]", errno);
        }
        char* p = strchr(newPeer->Name, 0);
        snprintf(p, sizeof(newPeer->Name) - (p - newPeer->Name), ":%d", ntohs(reinterpret_cast<sockaddr_in6*>(&client_addr)->sin6_port));
    }
    else
    {
        snprintf(newPeer->Name, sizeof(newPeer->Name), "unknown address of type %d (len %d)", client_addr.ss_family, len);
    }

    Log::Write(3, "Incoming connection %d from %s\n", (int)newPeer->Socket, newPeer->Name);