Function GetDebugInfo

library/cpp/netliba/v12/udp_http.cpp:1429–1463

    }

    TString GetDebugInfo(const TUdpAddress& addr, double timeout) {
        NHPTimer::STime start;
        NHPTimer::GetTime(&start);
        TIntrusivePtr<IUdpHost> host = CreateUdpHost(0);
        if (!host) {
            fprintf(stderr, "CreateUdpHost failed!\n");
            return TString();
        }

        TIntrusivePtr<IConnection> connection = host->Connect(addr, TConnectionSettings());
        {
            TAutoPtr<TRopeDataPacket> rq = new TRopeDataPacket;
            rq->Write((char)PKT_GETDEBUGINFO);
            host->Send(connection, rq.Release(), PP_HIGH, TTos(), DEFAULT_NETLIBA_COLOR);
        }
        for (;;) {
            TAutoPtr<TUdpRequest> ptr = host->GetRequest();
            if (ptr.Get()) {
                TBlockChainIterator reqData(ptr->Data->GetChain());
                int sz = reqData.GetSize();
                TString res;
                res.resize(sz);
                reqData.Read(res.begin(), sz);
                return res;
            }
            host->Step();
            host->Wait(0.1f);

            NHPTimer::STime now;
            NHPTimer::GetTime(&now);
            if (NHPTimer::GetSeconds(now - start) > timeout) {
                return TString();
            }
        }
    }

    void StopAllNetLibaThreads() {
        AtomicSwap(&PanicAttack, 1); // AAAA!!!!