开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 加密解密 > CA认证 > 查看源码
WebServerPage.cpp
资源名称：MiniCA2.rar　[点击查看]
上传用户：dengkfang
上传日期：2008-12-30
资源大小：5233k
文件大小：22k
源码类别：

CA认证

开发平台：

Visual C++

WebServerPage.cpp：源码内容
  1. // WebServerPage.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "minica.h"
  6. #include "WebServerPage.h"
  7. #include ".GenericClassLanguage.h"
  8. #include "minict.h"
  10. #ifdef _DEBUG
  11. #define new DEBUG_NEW
  12. #undef THIS_FILE
  13. static char THIS_FILE[] = __FILE__;
  14. #endif
  16. #ifdef W3MFC_SSL_SUPPORT
  17. CCriticalSection* CWebServerPage::m_pOpenSSLCritSections = NULL;
  18. #endif
  20. CStaticTreeCtrl * CWebServerPage::m_pWebTree = NULL;
  21. CTreeNode * CWebServerPage::m_hWebClient = NULL;
  22. CTreeNode * CWebServerPage::m_hWebServer = NULL;
  24. void CMiniCaHttpServer::OnError(const CString& sError)
  25. {
  26. CWebServerPage::AddMsg(sError, FALSE, FALSE);
  27. }
  29. IMPLEMENT_DYNCREATE(CMiniCAHttpClient, CHttpClient)
  31. void CMiniCAHttpClient::PostLog(int nHTTPStatusCode, DWORD dwBodyLength)
  32. {
  33. //Log each request to the console window using the W3C Common
  34. //log format.
  36. //Get the current date and time
  37. time_t now = time(NULL);
  38. tm* pNow = localtime(&now);
  40. //Get the time zone information
  41. TIME_ZONE_INFORMATION tzi;
  42. GetTimeZoneInformation(&tzi);
  44. //Format the date and time appropiately
  45. TCHAR sDateTime[64];
  46. _tcsftime(sDateTime, 64, _T("[%d/%b/%Y:%H:%M:%S"), pNow);
  48. //Display the connections to the console window
  49. CString sUser(m_Request.m_sUsername);
  50. if (sUser.IsEmpty())
  51. sUser = _T("-");
  53. CString strMsg;
  55. strMsg.Format(_T("%d.%d.%d.%d - %s %s %04d] "%s" %d %dn"), 
  56. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b1,
  57. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b2, 
  58. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b3, 
  59. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b4, 
  60. sUser, sDateTime, tzi.Bias, m_Request.m_sRequest, nHTTPStatusCode, dwBodyLength);
  61. // CWebServerPage::AddMsg(strMsg);
  64. /* _tprintf(_T("%d.%d.%d.%d - %s %s %04d] "%s" %d %dn"), 
  65. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b1,
  66. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b2, 
  67. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b3, 
  68. m_Request.m_ClientAddress.sin_addr.S_un.S_un_b.s_b4, 
  69. sUser, sDateTime, tzi.Bias, m_Request.m_sRequest, nHTTPStatusCode, dwBodyLength);*/
  70. }
  71. /////////////////////////////////////////////////////////////////////////////
  72. // CWebServerPage property page
  75. IMPLEMENT_DYNCREATE(CWebServerPage, CPropertyPage)
  77. CWebServerPage::CWebServerPage() : CPropertyPage(CWebServerPage::IDD)
  78. {
  79. //{{AFX_DATA_INIT(CWebServerPage)
  80. //}}AFX_DATA_INIT
  81. m_hWebRoot = NULL;
  82. m_hWebServer = NULL;
  83. m_hWebClient = NULL;
  84. }
  86. CWebServerPage::~CWebServerPage()
  87. {
  88. }
  90. void CWebServerPage::DoDataExchange(CDataExchange* pDX)
  91. {
  92. CPropertyPage::DoDataExchange(pDX);
  93. //{{AFX_DATA_MAP(CWebServerPage)
  94. DDX_Control(pDX, IDC_STATIC_WEB, m_WebTree);
  95. //}}AFX_DATA_MAP
  96. }
  99. BEGIN_MESSAGE_MAP(CWebServerPage, CPropertyPage)
  100. //{{AFX_MSG_MAP(CWebServerPage)
  101. ON_BN_CLICKED(IDC_SERVER, OnServer)
  102. ON_BN_CLICKED(IDC_BSTOP, OnBstop)
  103. ON_WM_CLOSE()
  104. ON_WM_DESTROY()
  105. ON_BN_CLICKED(IDC_BRESERT, OnBresert)
  106. ON_BN_CLICKED(IDC_BCLEAR, OnBclear)
  107. //}}AFX_MSG_MAP
  108. END_MESSAGE_MAP()
  110. /////////////////////////////////////////////////////////////////////////////
  111. // CWebServerPage message handlers
  112. CWinThread * WebServiceThread = NULL;
  114. UINT _WebServiceThread(LPVOID lparam)
  115. {
  116. CWebServerPage * p=(CWebServerPage*)lparam;
  117. if(!p->Service())
  118. {
  119. WebServiceThread = NULL;
  120. p->m_WebTree.SetNodeColor(p->m_hWebRoot,RGB(255,0,0));
  121. p->m_WebTree.SetNodeColor(p->m_hWebClient,RGB(255,0,0));
  122. p->m_WebTree.SetNodeColor(p->m_hWebServer,RGB(255,0,0),TRUE);
  123. return 0;
  124. }
  125. else//开放 停止,重启,关闭 启动
  126. {
  127. }
  128. return 1;
  129. }
  132. void CWebServerPage::OnServer() 
  133. {
  134. // TODO: Add your control notification handler code here
  135. if(!WebServiceThread)
  136. WebServiceThread = ::AfxBeginThread(_WebServiceThread,this,THREAD_PRIORITY_IDLE);
  137. }
  139. #ifdef W3MFC_SSL_SUPPORT
  140. void __cdecl CWebServerPage::OpenSSLLockingCallback(int mode, int type, const char* /*file*/, int /*line*/)
  141. {
  142. ASSERT(m_pOpenSSLCritSections);
  143. if (mode & CRYPTO_LOCK)
  144. m_pOpenSSLCritSections[type].Lock();
  145. else
  146. m_pOpenSSLCritSections[type].Unlock();
  147. }
  148. #endif
  150. BOOL CWebServerPage::Service()
  151. {
  152. //Use an ini file in the same location as the exe
  153. /* TCHAR pszIni[_MAX_PATH];
  154. GetModuleFileName(NULL, pszIni, _MAX_PATH);
  155. TCHAR pszDrive[_MAX_DRIVE];
  156. TCHAR pszDir[_MAX_DIR];
  157. TCHAR pszFname[_MAX_FNAME];
  158. _tsplitpath(pszIni, pszDrive, pszDir, pszFname, NULL);
  159. _tmakepath(pszIni, pszDrive, pszDir, pszFname, _T("ini"));
  160. // free((void*)m_pszProfileName);
  161. m_pszProfileName=_tcsdup(pszIni);*/
  163. if(m_hWebRoot)
  164. m_WebTree.DeleteNode(m_hWebRoot);
  166. m_hWebRoot = m_WebTree.InsertChild( HTOPNODE, _T(MiniCT_1000)); //MiniCT_1000 "MiniCA Web Server(Stop)"
  168. m_WebTree.SetNodeColor(m_hWebRoot,RGB(255,0,0));
  170. m_hWebClient = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1001)); //MiniCT_1001 "Client"
  172. m_hWebServer = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1002)); //MiniCT_1002 "Server"
  174. CMiniCaApp * pApp = (CMiniCaApp *)AfxGetApp();
  176. CString lpszIni = pApp->GetAppPath() + "\WebServer.ini";
  178. pApp->m_pszProfileName = lpszIni;
  180. //setup all the virtual directories
  181. CHttpServerSettings settings;
  182. int nDirectories = pApp->GetProfileInt(_T("General"), _T("Directories"), 0);
  183. if (nDirectories == 0)
  184. {
  185. // AddMsg(_T("Usage: W3MFC [Configuration Ini File Path]n"));
  186. AddMsg(_T("Could not read any directory settings from the ini file"), FALSE);
  187. return FALSE; 
  188. }
  190. settings.FreeDirectoryArray();
  192. for (int i=0; i<nDirectories; i++)
  193. {
  194. //Create each directory. Client samples could instantiate a derived version
  195. //to customize the functionality
  196. CHttpDirectory* pDirectory = new CHttpDirectory;
  198. CString sSection;
  199. sSection.Format(_T("Dir%d"), i);
  201. CString sAlias = pApp->GetProfileString(sSection, _T("Alias"), _T(""));
  202. pDirectory->SetAlias(sAlias);
  204. CString sDirectory = pApp->GetProfileString(sSection, _T("Path"), _T(""));
  205. //查找Path是否带有":",如果有就是绝对对路径,否则就是相对路径
  206. if(sDirectory.FindOneOf(":") == -1) //相对路径
  207. {
  208. sDirectory = pApp->GetAppPath() + "\" + sDirectory;
  209. }
  210. pDirectory->SetDirectory(sDirectory);
  212. CString sDefaultFile = pApp->GetProfileString(sSection, _T("DefaultFile"), _T("index.html"));
  213. pDirectory->SetDefaultFile(sDefaultFile);
  215. BOOL bDirectoryListing = (BOOL) pApp->GetProfileInt(sSection, _T("DirectoryListing"), FALSE);
  216. pDirectory->SetDirectoryListing(bDirectoryListing);
  218. BOOL bWritable = (BOOL) pApp->GetProfileInt(sSection, _T("Writable"), FALSE);
  219. pDirectory->SetWritable(bWritable);
  221. BOOL bScript = (BOOL) pApp->GetProfileInt(sSection, _T("Script"), FALSE);
  222. pDirectory->SetScript(bScript);
  224. CString sUsername = pApp->GetProfileString(sSection, _T("Username"), _T(""));
  225. pDirectory->SetUsername(sUsername);
  227. CString sPassword = pApp->GetProfileString(sSection, _T("Password"), _T(""));
  228. pDirectory->SetPassword(sPassword);
  230. CString sRealm = pApp->GetProfileString(sSection, _T("Realm"), _T(""));
  231. pDirectory->SetRealm(sRealm);
  233. settings.m_Directories.SetAtGrow(i, pDirectory);
  234. }
  236. //Do not use port 80 for this sample app. Helps avoid any possible
  237. //conflict with exisiting web servers which may be running
  238. settings.m_nPort = (unsigned short) (pApp->GetProfileInt(_T("General"), _T("Port"), 80));
  240. //Setup the runtime client class
  241. settings.m_pRuntimeClientClass = RUNTIME_CLASS(CMiniCAHttpClient);
  243. //Comment out the following line to not do reverse DNS lookups on client connections
  244. settings.m_bDNSLookup = pApp->GetProfileInt(_T("General"), _T("DNSLookup"), FALSE);
  246. //Should we bind to an IP address
  247. CString sAddress = pApp->GetProfileString(_T("General"), _T("BindAddress"), _T(""));
  248. if (!sAddress.IsEmpty())
  249. {
  250. settings.m_bBind = TRUE;
  251. settings.m_sBindAddress = sAddress;
  252. }
  254. //All the other misc settings
  255. settings.m_dwIdleClientTimeout = pApp->GetProfileInt(_T("General"), _T("Timeout"), settings.m_dwIdleClientTimeout);
  256. settings.m_sServerName = pApp->GetProfileString(_T("General"), _T("ServerName"), settings.m_sServerName);
  257. settings.m_sUsername = pApp->GetProfileString(_T("General"), _T("Username"), settings.m_sUsername);
  258. settings.m_sPassword = pApp->GetProfileString(_T("General"), _T("Password"), settings.m_sPassword);
  259. settings.m_nThreadPoolSize = pApp->GetProfileInt(_T("General"), _T("ThreadPoolSize"), settings.m_nThreadPoolSize);
  260. settings.m_dwWritableTimeout = pApp->GetProfileInt(_T("General"), _T("WritableTimeout"), settings.m_dwWritableTimeout);
  261. settings.m_bEnableThreadLifetime = pApp->GetProfileInt(_T("General"), _T("EnableThreadLifetime"), settings.m_bEnableThreadLifetime);
  262. settings.m_dwThreadLifetime = pApp->GetProfileInt(_T("General"), _T("ThreadLifetime"), settings.m_dwThreadLifetime);
  263. settings.m_bUseIOCPQueue = pApp->GetProfileInt(_T("General"), _T("UseIOCPQueue"), settings.m_bUseIOCPQueue);
  264. settings.m_bKeepAlives = (BOOL) pApp->GetProfileInt(_T("General"), _T("KeepAlives"), settings.m_bKeepAlives);
  265. settings.m_bAutoExpire = (BOOL) pApp->GetProfileInt(_T("General"), _T("AutoExpire"), settings.m_bAutoExpire);
  266. settings.m_bAllowDeleteRequest = (BOOL) pApp->GetProfileInt(_T("General"), _T("AllowDeletes"), settings.m_bAllowDeleteRequest);
  267. #ifndef W3MFC_NO_CGI_SUPPORT
  268. settings.m_dwCGIResponseBufferSize = pApp->GetProfileInt(_T("General"), _T("CGIResponseBufferSize"), settings.m_dwCGIResponseBufferSize);
  269. #endif
  270. settings.m_bAllowAnonymous                   = (BOOL) pApp->GetProfileInt(_T("General"), _T("AllowAnonymous"), settings.m_bAllowAnonymous);
  271. settings.m_bAllowBasicAuthentication         = (BOOL) pApp->GetProfileInt(_T("General"), _T("AllowBasicAuthentication"), settings.m_bAllowBasicAuthentication);
  272. settings.m_bAllowNTLMAuthentication          = (BOOL) pApp->GetProfileInt(_T("General"), _T("AllowNTLMAuthentication"), settings.m_bAllowNTLMAuthentication);
  273. settings.m_bPerformPassthroughAuthentication = (BOOL) pApp->GetProfileInt(_T("General"), _T("PerformPassthroughAuthentication"), settings.m_bPerformPassthroughAuthentication);
  275. #ifdef W3MFC_SSL_SUPPORT
  276. settings.m_SSLProtocol             = (CHttpServerSettings::SSL_PROTOCOL) pApp->GetProfileInt(_T("SSL"), _T("Protocol"), settings.m_SSLProtocol);
  277. settings.m_sServerCertificateFile  = pApp->GetProfileString(_T("SSL"), _T("ServerCertificateFile"), settings.m_sServerCertificateFile);
  278. settings.m_sPrivateKeyFile         = pApp->GetProfileString(_T("SSL"), _T("PrivateKeyFile"), settings.m_sPrivateKeyFile);
  279. settings.m_bReuseSessions          = pApp->GetProfileInt(_T("SSL"), _T("ReuseSessions"), settings.m_bReuseSessions);
  280. settings.m_dwSSLSessionTimeout     = pApp->GetProfileInt(_T("SSL"), _T("SessionTimeout"), settings.m_dwSSLSessionTimeout);
  281. settings.m_dwSSLNegotiationTimeout = pApp->GetProfileInt(_T("SSL"), _T("NegotiationTimeout"), settings.m_dwSSLNegotiationTimeout);
  282. settings.m_sSSLRandomnessFile      = pApp->GetProfileString(_T("SSL"), _T("RandomnessFile"), settings.m_sSSLRandomnessFile);
  284. //Standard OpenSSL initialization
  285. SSL_load_error_strings();
  286. SSL_library_init();
  288. //Setup SSL to work correctly in a multithreaded environment
  289. if (m_pOpenSSLCritSections)
  290. {
  291. delete [] m_pOpenSSLCritSections;
  292. m_pOpenSSLCritSections = NULL;
  293. }
  295. ASSERT(m_pOpenSSLCritSections == NULL);
  296. m_pOpenSSLCritSections = new CCriticalSection[CRYPTO_num_locks()];
  297. if (m_pOpenSSLCritSections == NULL)
  298. {
  299. //Report the error
  300. AddMsg(_T("Failed to create SSL critical sections"));
  301. return FALSE;
  302. }
  303. CRYPTO_set_locking_callback(OpenSSLLockingCallback);
  304. #endif
  306. //Initialize the Mime manager we are going to use with a mime map as taken from the ini file
  307. CIniHttpMimeManager iniMimeManager;
  308. int nSizeOfMap = iniMimeManager.Initialize(pApp->m_pszProfileName, _T("Mime"));
  309. if (nSizeOfMap == 0)
  310. {
  311. AddMsg(_T("Failed to read any MIME map settings from ini file"));
  312. return FALSE; 
  313. }
  314. settings.m_pMimeManager = &iniMimeManager;
  316. #ifndef W3MFC_NO_ISAPI_SUPPORT
  317. //Initialize the ISAPI manager we are going to use with a extension map as taken from the ini file
  318. settings.m_bCacheISAPI                = (BOOL) pApp->GetProfileInt(_T("ISAPI"), _T("Cache"), settings.m_bCacheISAPI);
  319. CIniHttpISAPIManager iniISAPIManager;
  320. iniISAPIManager.Initialize(pApp->m_pszProfileName, _T("ISAPIMap"));
  321. settings.m_pISAPIManager = &iniISAPIManager;
  323. //Also initialize the ISAPI implementation
  324. int nISAPIHashTableSize = pApp->GetProfileInt(_T("ISAPI"), _T("HashTableSize"), 7929); 
  325. CHttpISAPI isapi(nISAPIHashTableSize);
  326. settings.m_pISAPI = &isapi;
  327. #endif
  329. //And the CGI implementation
  330. #ifndef W3MFC_NO_CGI_SUPPORT
  331. CHttpCGI cgi;
  332. settings.m_pCGI = &cgi;
  333. #endif
  335. //and start it up
  336. AddMsg(_T("MiniCA Web server is starting...n"), FALSE);
  337. CMiniCaHttpServer theWebServer;
  338. pTheWebServer = &theWebServer;
  339. if (!theWebServer.Start(&settings))
  340. {
  341. AddMsg(_T("Failed to start up the web servern"), FALSE);
  342. return FALSE;
  343. }
  345. //Display some additional info when the web servering is starting
  346. CString strMsg;
  347. strMsg.Format(_T("Listening for incoming connections on port %dn"), settings.m_nPort);
  348. AddMsg(strMsg, FALSE);
  349. if (settings.m_bDNSLookup)
  350. AddMsg(_T("Reverse DNS lookups will be performed on client requestsn"), FALSE);
  351. if (settings.m_bBind)
  352. {
  353. strMsg.Format(_T("Binding to local address: %sn"), settings.m_sBindAddress);
  354. AddMsg(strMsg, FALSE);
  355. }
  356. strMsg.Format(_T("Client idle timeout: %d msn"), settings.m_dwIdleClientTimeout);
  357. AddMsg(strMsg, FALSE);
  358. strMsg.Format(_T("Client write timeout: %d msn"), settings.m_dwWritableTimeout);
  359. AddMsg(strMsg, FALSE);
  360. strMsg.Format(_T("Configured Server Name: %sn"), settings.m_sServerName);
  361. AddMsg(strMsg, FALSE);
  362. strMsg.Format(_T("Thread pool size: %dn"), settings.m_nThreadPoolSize);
  363. AddMsg(strMsg, FALSE);
  364. if (settings.m_bEnableThreadLifetime)
  365. {
  366. strMsg.Format(_T("Threads in the thread pool will be recycled every %d minute(s)n"), settings.m_dwThreadLifetime);
  367. AddMsg(strMsg, FALSE);
  368. }
  370. if (settings.m_bUseIOCPQueue)
  371. {
  372. AddMsg(_T("Using IOCP Thread pool queuen"), FALSE);
  373. }
  374. else
  375. AddMsg(_T("Using Directed Thread pool queuen"), FALSE);
  376. if (settings.m_bKeepAlives)
  377. AddMsg(_T("Using Keep Alivesn"), FALSE);
  378. if (settings.m_bAutoExpire)
  379. AddMsg(_T("Reponses will be marked with an immediate "Expires" headern"), FALSE);
  380. if (settings.m_bAllowDeleteRequest)
  381. AddMsg(_T("HTTP DELETE verb will be allowedn"), FALSE);
  382. else
  383. AddMsg(_T("HTTP DELETE verb will not be allowedn"), FALSE);
  384. #ifndef W3MFC_NO_CGI_SUPPORT
  385. {
  386. strMsg.Format(_T("CGI Response Buffer size: %dn"), settings.m_dwCGIResponseBufferSize);
  387. AddMsg(strMsg, FALSE);
  388. }
  389. #else
  390. {
  391. strMsg.Format(_T("CGI support is disabled in this configurationn"), FALSE);
  392. AddMsg(strMsg);
  393. }
  395. #endif
  397. #ifndef W3MFC_NO_ISAPI_SUPPORT
  398. AddMsg(_T("ISAPI support is provided in this configurationn"), FALSE);
  399. if (settings.m_bCacheISAPI)
  400. AddMsg(_T("ISAPI dlls will be cached in memoryn"), FALSE);
  401. else
  402. AddMsg(_T("ISAPI dlls will not be cached in memoryn"), FALSE);
  403. #else
  404. AddMsg(_T("ISAPI support is disabled in this configurationn"), FALSE);
  405. #endif
  407. if (settings.m_bAllowAnonymous)
  408. AddMsg(_T("Anonymous Connections allowedn"), FALSE);
  409. else
  410. AddMsg(_T("Anonymous Connections are not allowedn"), FALSE);
  411. if (settings.m_bAllowBasicAuthentication)
  412. AddMsg(_T("Basic Authentication allowedn"), FALSE);
  413. if (settings.m_bAllowNTLMAuthentication)
  414. AddMsg(_T("NTLM Authentication allowedn"), FALSE);
  415. if (settings.m_bPerformPassthroughAuthentication)
  416. AddMsg(_T("Passthrough Authentication will be allowedn"), FALSE);
  417. else
  418. AddMsg(_T("Passthrough Authentication is not allowedn"), FALSE);
  420. #ifdef W3MFC_SSL_SUPPORT
  421. if (settings.m_SSLProtocol != CHttpServerSettings::SSL_NONE)
  422. {
  423. switch (settings.m_SSLProtocol)
  424. {
  425. case CHttpServerSettings::SSL_V2:
  426. {
  427. AddMsg(_T("Server will use SSL v2 protocoln"), FALSE);
  428. break;
  429. }
  430. case CHttpServerSettings::SSL_V3:
  431. {
  432. AddMsg(_T("Server will use SSL v3 protocoln"), FALSE);
  433. break;
  434. }
  435. case CHttpServerSettings::SSL_V2_OR_V3:
  436. {
  437. AddMsg(_T("Server will use SSL v3 protocol (downgrading to V2 if necessary)n"), FALSE);
  438. break;
  439. }
  440. case CHttpServerSettings::TLS_V1:
  441. {
  442. AddMsg(_T("Server will use TLS v1 protocoln"), FALSE);
  443. break;
  444. }
  445. default:
  446. {
  447. break;
  448. }
  449. }
  450. strMsg.Format(_T("Server certificate is %sn"), settings.m_sServerCertificateFile);
  451. AddMsg(strMsg, FALSE);
  452. if (!settings.m_sPrivateKeyFile.IsEmpty())
  453. {
  454. strMsg.Format(_T("Private key is %sn"), settings.m_sPrivateKeyFile);
  455. AddMsg(strMsg, FALSE);
  456. }
  457. if (!settings.m_sSSLRandomnessFile.IsEmpty())
  458. {
  459. strMsg.Format(_T("OpenSSL Randomness file is %sn"), settings.m_sSSLRandomnessFile);
  460. AddMsg(strMsg, FALSE);
  461. }
  462. strMsg.Format(_T("SSL Negotiation timeout will be %d millisecondsn"), settings.m_dwSSLNegotiationTimeout);
  463. AddMsg(strMsg, FALSE);
  464. if (settings.m_bReuseSessions)
  465. {
  466. AddMsg(_T("SSL Sessions can be reusedn"), FALSE);
  467. strMsg.Format(_T("SSL Session timeout will be %d secondsn"), settings.m_dwSSLSessionTimeout);
  468. AddMsg(strMsg, FALSE);
  469. }
  470. else
  471. AddMsg(_T("SSL Sessions can not be reusedn"), FALSE);
  472. }  
  473. #endif
  475. //Check that everything in the thread pool also started up ok
  476. if (!theWebServer.GetThreadPool().WaitForThreadsInitInstance())
  477. return FALSE;
  479. //Register the console handler to allow the program to be gracefully terminated
  481. //Wait until the server finishes
  482. m_WebTree.SetNodeText( m_hWebRoot, _T(MiniCT_1003)); //MiniCT_1003
  483. m_WebTree.SetNodeColor(m_hWebRoot,RGB(0,128,0));
  484. m_WebTree.SetNodeColor(m_hWebClient,RGB(0,128,0));
  485. m_WebTree.SetNodeColor(m_hWebServer,RGB(0,128,0),TRUE);
  487. GetDlgItem(IDC_BRESERT)->EnableWindow(TRUE);
  488. GetDlgItem(IDC_BSTOP)->EnableWindow(TRUE);
  489. GetDlgItem(IDC_SERVER)->EnableWindow(FALSE);
  491. theWebServer.Wait();
  492. AddMsg(_T("Web server has shut down...n"), FALSE);
  493. return TRUE;
  495. }
  497. BOOL CWebServerPage::OnInitDialog() 
  498. {
  499. CPropertyPage::OnInitDialog();
  501. // g_pWebList = &m_WebList;
  503. CString strMsg;
  505. // TODO: Add extra initialization here
  506. //Initialise Sockets
  507. WSADATA wsaData;
  508. if (WSAStartup(MAKEWORD(2,0), &wsaData) != 0) 
  509. {
  510. strMsg.Format(_T("Failed to initialise Winsock, GetLastError:%dn"), ::GetLastError());
  511. AddMsg(strMsg);
  512. return FALSE;
  513. }
  515. //Confirm that the WinSock DLL supports 2.0 
  516. if (LOBYTE(wsaData.wVersion) != 2) 
  517. {
  518. strMsg.Format(_T("Failed to initialize a compatible Winsock 2 TCP/IP stack, GetLastError:%dn"), ::GetLastError());
  519. AddMsg(strMsg);
  520. return FALSE; 
  521. }
  522. m_WebTree
  523. .SetTextFont( 9, FALSE, FALSE, "Arial Unicode MS" )
  524. .SetDefaultTextColor( RGB(0,64,255));
  526. m_hWebRoot = m_WebTree.InsertChild( HTOPNODE, _T(MiniCT_1000)); //MiniCT_1000
  528. m_WebTree.SetNodeColor(m_hWebRoot,RGB(255,0,0));
  530. m_hWebClient = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1001)); //MiniCT_1001
  531. m_WebTree.SetNodeColor(m_hWebClient,RGB(255,0,0));
  533. m_hWebServer = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1002)); //MiniCT_1002
  534. m_WebTree.SetNodeColor(m_hWebServer,RGB(255,0,0));
  536. CString strIniPathName = ((CMiniCaApp *)AfxGetApp())->GetAppPath() +  "\WebServer.ini";
  538. CFile file;
  539. if(!file.Open(strIniPathName,CFile::modeRead))
  540. {
  541. /*得到配置*/
  542. HRSRC hRsrc = 0;
  543. hRsrc = FindResource(NULL,MAKEINTRESOURCE(IDR_WEBSERVER_INI),"INI");
  545. DWORD lenCert = SizeofResource(NULL, hRsrc); 
  546. HGLOBAL hgCert=LoadResource(NULL,hRsrc);
  547. LPSTR lpCert=(LPSTR)LockResource(hgCert);
  549. file.Open(strIniPathName,CFile::modeCreate|CFile::modeWrite); //存文件
  550. {
  551. file.Write(lpCert,lenCert);
  552. }
  554. }
  555. file.Close();
  558. return TRUE;  // return TRUE unless you set the focus to a control
  559.               // EXCEPTION: OCX Property Pages should return FALSE
  560. }
  562. void CWebServerPage::AddMsg(CString strMsg, BOOL bClient, BOOL bSucceed) 
  563. {
  564. if(!bClient && !bSucceed) //错误信息
  565. {
  566. HTREENODE hTemp = m_pWebTree->InsertChild(m_hWebServer, strMsg);
  567. m_pWebTree->SetNodeColor(hTemp,RGB(255,0,0));
  568. }
  569. else
  570. {
  571. if(bClient)
  572. m_pWebTree->InsertChild(m_hWebClient, strMsg);
  573. else
  574. m_pWebTree->InsertChild(m_hWebServer, strMsg);
  575. }
  576. }
  578. void CWebServerPage::OnBstop() 
  579. {
  580. // TODO: Add your control notification handler code here
  581. StopServer();
  582. }
  584. void CWebServerPage::OnClose() 
  585. {
  586. // TODO: Add your message handler code here and/or call default
  587. // OnBstop();
  588. // Sleep(2000);
  589. //Close down sockets
  591. // CPropertyPage::OnClose();
  592. }
  594. void CWebServerPage::StopServer()
  595. {
  596. if(WebServiceThread)
  597. {
  598. pTheWebServer->Stop();
  599. m_WebTree.SetNodeText( m_hWebRoot, _T(MiniCT_1000));  //MiniCT_1000
  600. m_WebTree.SetNodeColor(m_hWebRoot,RGB(255,0,0));
  601. m_WebTree.SetNodeColor(m_hWebClient,RGB(255,0,0));
  602. m_WebTree.SetNodeColor(m_hWebServer,RGB(255,0,0),TRUE);
  604. WebServiceThread = NULL;
  606. GetDlgItem(IDC_BRESERT)->EnableWindow(FALSE);
  607. GetDlgItem(IDC_BSTOP)->EnableWindow(FALSE);
  608. GetDlgItem(IDC_SERVER)->EnableWindow(TRUE);
  609. }
  610. }
  612. BOOL CWebServerPage::IsWebRun()
  613. {
  614. return (WebServiceThread == NULL ? FALSE : TRUE);
  615. }
  617. void CWebServerPage::OnDestroy() 
  618. {
  619. CPropertyPage::OnDestroy();
  621. // TODO: Add your message handler code here
  622. /*#ifdef W3MFC_SSL_SUPPORT
  623.   //Clean up the SSL critical sections
  624.   if (m_pOpenSSLCritSections)
  625.   {
  626.     delete [] m_pOpenSSLCritSections;
  627.     m_pOpenSSLCritSections = NULL;
  628.   }
  629. #endif*/
  630. WSACleanup();
  632. }
  634. void CWebServerPage::OnBresert() //重启服务
  635. {
  636. // TODO: Add your control notification handler code here
  637. StopServer();
  638. OnServer();
  639. }
  641. void CWebServerPage::OnBclear() //信息清除
  642. {
  643. // TODO: Add your control notification handler code here
  644. if(m_hWebClient)
  645. m_WebTree.DeleteNode(m_hWebClient);
  646. if(m_hWebServer)
  647. m_WebTree.DeleteNode(m_hWebServer);
  648. m_hWebClient = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1001));
  650. m_hWebServer = m_WebTree.InsertChild( m_hWebRoot, _T(MiniCT_1002));
  651. m_WebTree.SetNodeColor(m_hWebServer,RGB(255,0,0));
  652. }
  654. void CWebServerPage::TranslateCT() //繙譯諸如樹型控件,列錶控件等內容
  655. {
  656. SetDlgItemText(IDC_BCLEAR, MiniCT_11901);
  657. SetDlgItemText(IDC_BSTOP, MiniCT_11902);
  658. SetDlgItemText(IDC_BRESERT, MiniCT_11903);
  659. SetDlgItemText(IDC_SERVER, MiniCT_11904);
  660. }