| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621 |
- // ServerDlg.cpp : implementation file
- //
- #include "stdafx.h"
- #include "Server.h"
- #include "ServerDlg.h"
- #include "afxdialogex.h"
- // CServerDlg dialog
- const CString SPECIAL_SERVER_NAME = _T("hpsocket.org");
- int SPECIAL_SERVER_INDEX = -1;
- const LPCTSTR CServerDlg::ADDRESS = _T("0.0.0.0");
- const USHORT CServerDlg::HTTP_PORT = 8080;
- const USHORT CServerDlg::HTTPS_PORT = 8443;
- CServerDlg::CServerDlg(CWnd* pParent /*=NULL*/)
- : CDialogEx(CServerDlg::IDD, pParent)
- , m_HttpListener(HTTP_NAME)
- , m_HttpsListener(HTTPS_NAME)
- , m_HttpServer(&m_HttpListener)
- , m_HttpsServer(&m_HttpsListener)
- {
- m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
- }
- void CServerDlg::DoDataExchange(CDataExchange* pDX)
- {
- CDialogEx::DoDataExchange(pDX);
- DDX_Control(pDX, IDC_INFO, m_Info);
- DDX_Control(pDX, IDC_START, m_Start);
- DDX_Control(pDX, IDC_STOP, m_Stop);
- DDX_Control(pDX, IDC_CONN_ID, m_ConnID);
- DDX_Control(pDX, IDC_DISCONNECT, m_DisConn);
- DDX_Control(pDX, IDC_RELEASE, m_Release);
- DDX_Control(pDX, IDC_HTTP, m_RadioHttp);
- DDX_Control(pDX, IDC_HTTPS, m_RadioHttps);
- }
- BEGIN_MESSAGE_MAP(CServerDlg, CDialogEx)
- ON_WM_PAINT()
- ON_WM_VKEYTOITEM()
- ON_WM_QUERYDRAGICON()
- ON_MESSAGE(USER_INFO_MSG, OnUserInfoMsg)
- ON_BN_CLICKED(IDC_START, &CServerDlg::OnBnClickedStart)
- ON_BN_CLICKED(IDC_STOP, &CServerDlg::OnBnClickedStop)
- ON_BN_CLICKED(IDC_DISCONNECT, &CServerDlg::OnBnClickedDisconnect)
- ON_EN_CHANGE(IDC_CONN_ID, &CServerDlg::OnEnChangeConnId)
- ON_BN_CLICKED(IDC_RELEASE, &CServerDlg::OnBnClickedRelease)
- END_MESSAGE_MAP()
- // CServerDlg message handlers
- BOOL CServerDlg::OnInitDialog()
- {
- CDialogEx::OnInitDialog();
- // Set the icon for this dialog. The framework does this automatically
- // when the application's main window is not a dialog
- SetIcon(m_hIcon, TRUE); // Set big icon
- SetIcon(m_hIcon, FALSE); // Set small icon
- // TODO: Add extra initialization here
- CString strTitle;
- CString strOriginTitle;
- GetWindowText(strOriginTitle);
- strTitle.Format(_T("%s - (%s:%d/%d)"), strOriginTitle, ADDRESS, HTTP_PORT, HTTPS_PORT);
- SetWindowText(strTitle);
- m_RadioHttp.SetCheck(BST_CHECKED);
- ::SetMainWnd(this);
- ::SetInfoList(&m_Info);
- SetAppState(ST_STOPPED);
- return TRUE; // return TRUE unless you set the focus to a control
- }
- // If you add a minimize button to your dialog, you will need the code below
- // to draw the icon. For MFC applications using the document/view model,
- // this is automatically done for you by the framework.
- void CServerDlg::OnPaint()
- {
- if (IsIconic())
- {
- CPaintDC dc(this); // device context for painting
- SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);
- // Center icon in client rectangle
- int cxIcon = GetSystemMetrics(SM_CXICON);
- int cyIcon = GetSystemMetrics(SM_CYICON);
- CRect rect;
- GetClientRect(&rect);
- int x = (rect.Width() - cxIcon + 1) / 2;
- int y = (rect.Height() - cyIcon + 1) / 2;
- // Draw the icon
- dc.DrawIcon(x, y, m_hIcon);
- }
- else
- {
- CDialogEx::OnPaint();
- }
- }
- // The system calls this function to obtain the cursor to display while the user drags
- // the minimized window.
- HCURSOR CServerDlg::OnQueryDragIcon()
- {
- return static_cast<HCURSOR>(m_hIcon);
- }
- BOOL CServerDlg::PreTranslateMessage(MSG* pMsg)
- {
- if (
- pMsg->message == WM_KEYDOWN
- &&( pMsg->wParam == VK_ESCAPE
- || pMsg->wParam == VK_CANCEL
- || pMsg->wParam == VK_RETURN
- ))
- return TRUE;
- return CDialog::PreTranslateMessage(pMsg);
- }
- void CServerDlg::SetAppState(EnAppState state)
- {
- m_enState = state;
- if(this->GetSafeHwnd() == nullptr)
- return;
- m_Start.EnableWindow(m_enState == ST_STOPPED);
- m_Stop.EnableWindow(m_enState == ST_STARTED);
- m_RadioHttp.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_RadioHttps.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_DisConn.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_Release.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- }
- int CALLBACK CServerDlg::SIN_ServerNameCallback(LPCTSTR lpszServerName)
- {
- if(::IsIPAddress(lpszServerName))
- return 0;
- int len = lstrlen(lpszServerName);
- int diff = len - SPECIAL_SERVER_NAME.GetLength();
- if(diff < 0)
- return 0;
- if(SPECIAL_SERVER_NAME.CompareNoCase(lpszServerName + diff) != 0)
- return 0;
- return SPECIAL_SERVER_INDEX;
- }
- void CServerDlg::OnBnClickedStart()
- {
- SetAppState(ST_STARTING);
- g_SSL.Cleanup();
- if(g_SSL.Initialize(SSL_SM_SERVER, SSL_VM_NONE, g_s_lpszPemCertFile, g_s_lpszPemKeyFile, g_s_lpszKeyPasswod, g_s_lpszCAPemCertFileOrPath, SIN_ServerNameCallback))
- SPECIAL_SERVER_INDEX = g_SSL.AddServerContext(SSL_VM_NONE, g_s_lpszPemCertFile2, g_s_lpszPemKeyFile2, g_s_lpszKeyPasswod2, g_s_lpszCAPemCertFileOrPath2);
- else
- {
- ::LogServerStartFail(::GetLastError(), _T("initialize SSL env fail"));
- SetAppState(ST_STOPPED);
- return;
- }
- if(m_HttpServer.Start(ADDRESS, HTTP_PORT))
- {
- ::LogServerStart(ADDRESS, HTTP_PORT, HTTP_NAME);
- if(m_HttpsServer.Start(ADDRESS, HTTPS_PORT))
- {
- ::LogServerStart(ADDRESS, HTTPS_PORT, HTTPS_NAME);
- SetAppState(ST_STARTED);
- }
- else
- {
- m_HttpServer.Stop();
- ::LogServerStartFail(m_HttpsServer.GetLastError(), m_HttpsServer.GetLastErrorDesc(), HTTPS_NAME);
- SetAppState(ST_STOPPED);
- }
- }
- else
- {
- ::LogServerStartFail(m_HttpServer.GetLastError(), m_HttpServer.GetLastErrorDesc(), HTTP_NAME);
- SetAppState(ST_STOPPED);
- }
- }
- void CServerDlg::OnBnClickedStop()
- {
- SetAppState(ST_STOPPING);
- if(!m_HttpsServer.Stop())
- ASSERT(FALSE);
- ::LogServerStop(HTTPS_NAME);
- if(!m_HttpServer.Stop())
- ASSERT(FALSE);
- ::LogServerStop(HTTP_NAME);
- SetAppState(ST_STOPPED);
- }
- void CServerDlg::OnBnClickedDisconnect()
- {
- CString strConnID;
- m_ConnID.GetWindowText(strConnID);
- CONNID dwConnID = (CONNID)_ttoi(strConnID);
- BOOL bHttp = m_RadioHttp.GetCheck() == BST_CHECKED;
- LPCTSTR lpszName = bHttp ? HTTP_NAME : HTTPS_NAME;
- IHttpServer* pServer = bHttp ? (IHttpServer*)&m_HttpServer : (IHttpServer*)&m_HttpsServer;
- if(pServer->Disconnect(dwConnID))
- ::LogDisconnect(dwConnID, lpszName);
- else
- ::LogDisconnectFail(dwConnID, lpszName);
- }
- void CServerDlg::OnBnClickedRelease()
- {
- CString strConnID;
- m_ConnID.GetWindowText(strConnID);
- CONNID dwConnID = (CONNID)_ttoi(strConnID);
- BOOL bHttp = m_RadioHttp.GetCheck() == BST_CHECKED;
- LPCTSTR lpszName = bHttp ? HTTP_NAME : HTTPS_NAME;
- IHttpServer* pServer = bHttp ? (IHttpServer*)&m_HttpServer : (IHttpServer*)&m_HttpsServer;
- if(pServer->Release(dwConnID))
- ::LogRelease(dwConnID, lpszName);
- else
- ::LogReleaseFail(dwConnID, lpszName);
- }
- void CServerDlg::OnEnChangeConnId()
- {
- m_RadioHttp.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_RadioHttps.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_DisConn.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- m_Release.EnableWindow(m_enState == ST_STARTED && m_ConnID.GetWindowTextLength() > 0);
- }
- int CServerDlg::OnVKeyToItem(UINT nKey, CListBox* pListBox, UINT nIndex)
- {
- if(nKey == 'C')
- pListBox->ResetContent();
- return __super::OnVKeyToItem(nKey, pListBox, nIndex);
- }
- LRESULT CServerDlg::OnUserInfoMsg(WPARAM wp, LPARAM lp)
- {
- info_msg* msg = (info_msg*)wp;
- ::LogInfoMsg(msg);
- return 0;
- }
- // ------------------------------------------------------------------------------------------------------------- //
- EnHandleResult CHttpServerListenerImpl::OnPrepareListen(ITcpServer* pSender, SOCKET soListen)
- {
- TCHAR szAddress[40];
- int iAddressLen = sizeof(szAddress) / sizeof(TCHAR);
- USHORT usPort;
-
- pSender->GetListenAddress(szAddress, iAddressLen, usPort);
- ::PostOnPrepareListen(szAddress, usPort, m_strName);
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnAccept(ITcpServer* pSender, CONNID dwConnID, SOCKET soClient)
- {
- BOOL bPass = TRUE;
- TCHAR szAddress[40];
- int iAddressLen = sizeof(szAddress) / sizeof(TCHAR);
- USHORT usPort;
- pSender->GetRemoteAddress(dwConnID, szAddress, iAddressLen, usPort);
- ::PostOnAccept(dwConnID, szAddress, usPort, bPass, m_strName);
- return bPass ? HR_OK : HR_ERROR;
- }
- EnHandleResult CHttpServerListenerImpl::OnHandShake(ITcpServer* pSender, CONNID dwConnID)
- {
- ::PostOnHandShake(dwConnID, m_strName);
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnReceive(ITcpServer* pSender, CONNID dwConnID, const BYTE* pData, int iLength)
- {
- ::PostOnReceive(dwConnID, pData, iLength, m_strName);
- if(pSender->Send(dwConnID, pData, iLength))
- return HR_OK;
- else
- return HR_ERROR;
- }
- EnHandleResult CHttpServerListenerImpl::OnSend(ITcpServer* pSender, CONNID dwConnID, const BYTE* pData, int iLength)
- {
- ::PostOnSend(dwConnID, pData, iLength, m_strName);
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnClose(ITcpServer* pSender, CONNID dwConnID, EnSocketOperation enOperation, int iErrorCode)
- {
- iErrorCode == SE_OK ? ::PostOnClose(dwConnID, m_strName) :
- ::PostOnError(dwConnID, enOperation, iErrorCode, m_strName) ;
- CBufferPtr* pBuffer = nullptr;
- pSender->GetConnectionExtra(dwConnID, (PVOID*)&pBuffer);
- if(pBuffer) delete pBuffer;
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnShutdown(ITcpServer* pSender)
- {
- ::PostOnShutdown(m_strName);
- return HR_OK;
- }
- // ------------------------------------------------------------------------------------------------------------- //
- EnHttpParseResult CHttpServerListenerImpl::OnMessageBegin(IHttpServer* pSender, CONNID dwConnID)
- {
- ::PostOnMessageBegin(dwConnID, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnRequestLine(IHttpServer* pSender, CONNID dwConnID, LPCSTR lpszMethod, LPCSTR lpszUrl)
- {
- ::PostOnRequestLine(dwConnID, lpszMethod, pSender->GetUrlFieldSet(dwConnID), lpszUrl, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnHeader(IHttpServer* pSender, CONNID dwConnID, LPCSTR lpszName, LPCSTR lpszValue)
- {
- ::PostOnHeader(dwConnID, lpszName, lpszValue, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnHeadersComplete(IHttpServer* pSender, CONNID dwConnID)
- {
- CStringA strSummary = GetHeaderSummary(pSender, dwConnID, " ", 0, TRUE);
- ::PostOnHeadersComplete(dwConnID, strSummary, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnBody(IHttpServer* pSender, CONNID dwConnID, const BYTE* pData, int iLength)
- {
- ::PostOnBody(dwConnID, pData, iLength, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnChunkHeader(IHttpServer* pSender, CONNID dwConnID, int iLength)
- {
- ::PostOnChunkHeader(dwConnID, iLength, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnChunkComplete(IHttpServer* pSender, CONNID dwConnID)
- {
- ::PostOnChunkComplete(dwConnID, m_strName);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnMessageComplete(IHttpServer* pSender, CONNID dwConnID)
- {
- ::PostOnMessageComplete(dwConnID, m_strName);
- if(pSender->IsUpgrade(dwConnID))
- return HPR_OK;
- CStringA strBody = GetHeaderSummary(pSender, dwConnID, " ", 0, FALSE);
- int iBodyLength = strBody.GetLength();
- BOOL bSkipBody = FALSE;
- if(strcmp(pSender->GetMethod(dwConnID), HTTP_METHOD_HEAD) == 0)
- bSkipBody = TRUE;
- CStringA strContentLength;
- strContentLength.Format("%u", iBodyLength);
- DWORD dwSeq = 1;
- LPCSTR lpszReqSequence = nullptr;
- if(pSender->GetCookie(dwConnID, "__reqSequence", &lpszReqSequence))
- dwSeq += atoi(lpszReqSequence);
- CStringA strSeqCookie;
- strSeqCookie.Format("__reqSequence=%u; path=/", dwSeq);
- THeader header[] = {{"Content-Type", "text/plain"}, {"Content-Length", strContentLength}, {"Set-Cookie", strSeqCookie}};
- int iHeaderCount = sizeof(header) / sizeof(THeader);
- if(bSkipBody)
- {
- strBody.Empty();
- iBodyLength = 0;
- }
- pSender->SendResponse( dwConnID,
- HSC_OK,
- "HP Http Server OK",
- header, iHeaderCount,
- (const BYTE*)(LPCSTR)strBody,
- iBodyLength);
- if(!pSender->IsKeepAlive(dwConnID))
- pSender->Release(dwConnID);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnUpgrade(IHttpServer* pSender, CONNID dwConnID, EnHttpUpgradeType enUpgradeType)
- {
- ::PostOnUpgrade(dwConnID, enUpgradeType, m_strName);
- if(enUpgradeType == HUT_HTTP_TUNNEL)
- {
- pSender->SendResponse(dwConnID, HSC_OK, "Connection Established");
- }
- else if(enUpgradeType == HUT_WEB_SOCKET)
- {
- THeader header[] = {{"Connection", UPGRADE_HEADER},
- {UPGRADE_HEADER, WEB_SOCKET_HEADER_VALUE},
- {nullptr, nullptr},
- {nullptr, nullptr}};
- LPCSTR lpszAccept = nullptr;
-
- if(!pSender->GetHeader(dwConnID, "Sec-WebSocket-Key", &lpszAccept))
- return HPR_ERROR;
- CStringA strAccept;
- ::MakeSecWebSocketAccept(lpszAccept, strAccept);
- header[2].name = "Sec-WebSocket-Accept";
- header[2].value = strAccept;
- LPCSTR lpszProtocol = nullptr;
- if(pSender->GetHeader(dwConnID, "Sec-WebSocket-Protocol", &lpszProtocol))
- {
- int i = 0;
- CStringA strProtocol(lpszProtocol);
- CStringA strFirst = strProtocol.Tokenize(", ", i);
- if(!strFirst.IsEmpty())
- {
- header[3].name = "Sec-WebSocket-Protocol";
- header[3].value = strFirst;
- }
- }
- int iHeaderCount = sizeof(header) / sizeof(THeader);
- pSender->SendResponse(dwConnID, HSC_SWITCHING_PROTOCOLS, nullptr, header, iHeaderCount);
- pSender->SetConnectionExtra(dwConnID, new CBufferPtr);
- }
- else
- ASSERT(FALSE);
- return HPR_OK;
- }
- EnHttpParseResult CHttpServerListenerImpl::OnParseError(IHttpServer* pSender, CONNID dwConnID, int iErrorCode, LPCSTR lpszErrorDesc)
- {
- ::PostOnParseError(dwConnID, iErrorCode, lpszErrorDesc, m_strName);
- return HPR_OK;
- }
- // ------------------------------------------------------------------------------------------------------------- //
- EnHandleResult CHttpServerListenerImpl::OnWSMessageHeader(IHttpServer* pSender, CONNID dwConnID, BOOL bFinal, BYTE iReserved, BYTE iOperationCode, const BYTE lpszMask[4], ULONGLONG ullBodyLen)
- {
- ::PostOnWSMessageHeader(dwConnID, bFinal, iReserved, iOperationCode, lpszMask, ullBodyLen, m_strName);
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnWSMessageBody(IHttpServer* pSender, CONNID dwConnID, const BYTE* pData, int iLength)
- {
- ::PostOnWSMessageBody(dwConnID, pData, iLength, m_strName);
- CBufferPtr* pBuffer = nullptr;
- pSender->GetConnectionExtra(dwConnID, (PVOID*)&pBuffer);
- VERIFY(pBuffer);
- pBuffer->Cat(pData, iLength);
- return HR_OK;
- }
- EnHandleResult CHttpServerListenerImpl::OnWSMessageComplete(IHttpServer* pSender, CONNID dwConnID)
- {
- ::PostOnWSMessageComplete(dwConnID, m_strName);
- CBufferPtr* pBuffer = nullptr;
- pSender->GetConnectionExtra(dwConnID, (PVOID*)&pBuffer);
- VERIFY(pBuffer);
- BOOL bFinal;
- BYTE iReserved, iOperationCode;
- VERIFY(pSender->GetWSMessageState(dwConnID, &bFinal, &iReserved, &iOperationCode, nullptr, nullptr, nullptr));
- pSender->SendWSMessage(dwConnID, bFinal, iReserved, iOperationCode, nullptr, pBuffer->Ptr(), (int)pBuffer->Size());
- pBuffer->Free();
- if(iOperationCode == 0x8)
- pSender->Disconnect(dwConnID);
- return HR_OK;
- }
- // ------------------------------------------------------------------------------------------------------------- //
- CStringA CHttpServerListenerImpl::GetHeaderSummary(IHttpServer* pSender, CONNID dwConnID, LPCSTR lpszSep, int iSepCount, BOOL bWithContentLength)
- {
- CStringA SEP1;
- for(int i = 0; i < iSepCount; i++)
- SEP1 += lpszSep;
- CStringA SEP2(SEP1);
- SEP2 += lpszSep;
- CStringA strResult;
- USHORT usUrlFieldSet = pSender->GetUrlFieldSet(dwConnID);
- strResult.AppendFormat("%s[URL Fields]%s", SEP1, CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "SCHEMA", pSender->GetUrlField(dwConnID, HUF_SCHEMA), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "HOST", pSender->GetUrlField(dwConnID, HUF_HOST), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "PORT", pSender->GetUrlField(dwConnID, HUF_PORT), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "PATH", pSender->GetUrlField(dwConnID, HUF_PATH), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "QUERY", pSender->GetUrlField(dwConnID, HUF_QUERY), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "FRAGMENT", pSender->GetUrlField(dwConnID, HUF_FRAGMENT), CRLF);
- strResult.AppendFormat("%s%8s: %s%s", SEP2, "USERINFO", pSender->GetUrlField(dwConnID, HUF_USERINFO), CRLF);
- DWORD dwHeaderCount = 0;
- pSender->GetAllHeaders(dwConnID, nullptr, dwHeaderCount);
- strResult.AppendFormat("%s[Request Headers]%s", SEP1, CRLF);
- if(dwHeaderCount == 0)
- strResult.AppendFormat("%s(no header)%s", SEP2, CRLF);
- else
- {
- unique_ptr<THeader[]> headers(new THeader[dwHeaderCount]);
- VERIFY(pSender->GetAllHeaders(dwConnID, headers.get(), dwHeaderCount));
- for(DWORD i = 0; i < dwHeaderCount; i++)
- strResult.AppendFormat("%s%s: %s%s", SEP2, headers[i].name, headers[i].value, CRLF);
- }
- DWORD dwCookieCount = 0;
- pSender->GetAllCookies(dwConnID, nullptr, dwCookieCount);
- strResult.AppendFormat("%s[Cookies]%s", SEP1, CRLF);
- if(dwCookieCount == 0)
- strResult.AppendFormat("%s(no cookie)%s", SEP2, CRLF);
- else
- {
- unique_ptr<TCookie[]> cookies(new TCookie[dwCookieCount]);
- VERIFY(pSender->GetAllCookies(dwConnID, cookies.get(), dwCookieCount));
- for(DWORD i = 0; i < dwCookieCount; i++)
- strResult.AppendFormat("%s%s: %s%s", SEP2, cookies[i].name, cookies[i].value, CRLF);
- }
- CStringA strVersion;
- ::HttpVersionToString((EnHttpVersion)pSender->GetVersion(dwConnID), strVersion);
- EnHttpUpgradeType enUpgType = pSender->GetUpgradeType(dwConnID);
- LPCSTR lpszUpgrade = enUpgType != HUT_NONE ? "true" : "false";
- LPCSTR lpszKeepAlive = pSender->IsKeepAlive(dwConnID) ? "true" : "false";
- strResult.AppendFormat("%s[Basic Info]%s", SEP1, CRLF);
- strResult.AppendFormat("%s%13s: %s%s", SEP2, "Version", strVersion, CRLF);
- strResult.AppendFormat("%s%13s: %s%s", SEP2, "Method", pSender->GetMethod(dwConnID), CRLF);
- strResult.AppendFormat("%s%13s: %s%s", SEP2, "IsUpgrade", lpszUpgrade, CRLF);
- if(enUpgType != HUT_NONE)
- strResult.AppendFormat("%s%13s: %d%s", SEP2, "UpgradeType", enUpgType, CRLF);
- strResult.AppendFormat("%s%13s: %s%s", SEP2, "IsKeepAlive", lpszKeepAlive, CRLF);
- if(bWithContentLength)
- strResult.AppendFormat("%s%13s: %lld%s", SEP2, "ContentLength", pSender->GetContentLength(dwConnID), CRLF);
- strResult.AppendFormat("%s%13s: %s%s", SEP2, "ContentType", pSender->GetContentType(dwConnID), CRLF);
-
- return strResult;
- }
|