WatchService.cpp 37 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427
  1. // WatchService.cpp : 定义控制台应用程序的入口点。
  2. //
  3. #include "stdafx.h"
  4. #include "psapi.h"
  5. #include <tlhelp32.h>
  6. #include "Global.h"
  7. #include "..\ChineseRes\ChineseRes\resource.h"
  8. #pragma comment ( lib, "psapi.lib" )
  9. const VER_WIN2000_PRO = 1;
  10. const VER_WIN2000_SRV = 2;
  11. const VER_WIN2000_ADVANCE_SRV = 3;
  12. const VER_WIN_XP = 4;
  13. const VER_WIN2003 = 5;
  14. const VER_WINNT = 6;
  15. const VER_VISA_UP = 7;
  16. const VER_OTHER = 8;
  17. const BUFSIZE = 1024;
  18. //定义全局函数变量
  19. int g_nWindowsVer = VER_OTHER;
  20. void Init();
  21. BOOL IsInstalled();
  22. BOOL Install();
  23. BOOL Uninstall();
  24. void WINAPI ServiceMain();
  25. void WINAPI ServiceStrl(DWORD dwOpcode);
  26. void LogEvent(LPCTSTR pFormat, ...);
  27. int FindProcessCount(char *strProcessName);
  28. DWORD FindAndKillProcess(char *strProcessName);
  29. void KillProcess(DWORD dwProcess);
  30. int GetSysData();
  31. INT GetWindowVersion();
  32. SERVICE_STATUS_HANDLE g_hServiceStatus;
  33. SERVICE_STATUS g_status;
  34. DWORD dwThreadID;
  35. BOOL InitWatchService();
  36. void UnInitWatchService();
  37. HANDLE g_hRunObject = NULL;
  38. HANDLE g_hWatchThread = NULL;
  39. DWORD WINAPI ReConnectTwoShipperServerThread( void *pData );
  40. DWORD WINAPI ReConnectWatchSrvThread( void *pData );
  41. HANDLE g_hReConnectWatchSrvThread = NULL;
  42. HANDLE g_hReConnectTwoShipperServerThread = NULL;
  43. DWORD WINAPI BackupDBThread( void *pData );
  44. HANDLE g_hBackupDBThread = NULL;
  45. char g_strWatchDirectory[MAX_PATH]={0};
  46. CHAR g_strAppName[MAX_PATH] = {0}; // 软件名称
  47. char g_strVirComDir[MAX_PATH] = {0};
  48. HINSTANCE g_hLangDLL;
  49. int _tmain(int argc, _TCHAR* argv[])
  50. {
  51. GetSysData();
  52. CHAR szPath[MAX_PATH] = {0};
  53. int nProcessCount = 0;
  54. memset(szPath, 0, sizeof(szPath));
  55. strcpy(szPath, g_strWatchDirectory);
  56. strcat(szPath, "\\WatchService.exe");
  57. // 进程存在,直接退出
  58. nProcessCount = FindProcessCount(szPath);
  59. if( nProcessCount > 1 )
  60. {
  61. return 0;
  62. }
  63. Init();
  64. dwThreadID = ::GetCurrentThreadId();
  65. SERVICE_TABLE_ENTRY st[] =
  66. {
  67. { g_szServiceName, (LPSERVICE_MAIN_FUNCTION)ServiceMain },
  68. { NULL, NULL }
  69. };
  70. if(argc > 1)
  71. {
  72. if (stricmp((char *)argv[1], "/install") == 0)
  73. {
  74. Install();
  75. }
  76. else if (stricmp((char *)argv[1], "/uninstall") == 0)
  77. {
  78. Uninstall();
  79. }
  80. else
  81. {
  82. if (!::StartServiceCtrlDispatcher(st))
  83. {
  84. LogEvent(_T("Register Service Main Function Error!"));
  85. }
  86. }
  87. }
  88. else
  89. {
  90. if (!::StartServiceCtrlDispatcher(st))
  91. {
  92. LogEvent(_T("Register Service Main Function Error!"));
  93. }
  94. }
  95. return 0;
  96. }
  97. INT GetWindowVersion()
  98. {
  99. int nResult = VER_OTHER;
  100. OSVERSIONINFOEX osvi;
  101. BOOL bOsVersionInfoEx;
  102. // Try calling GetVersionEx using the OSVERSIONINFOEX structure.
  103. // If that fails, try using the OSVERSIONINFO structure.
  104. ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));
  105. osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);
  106. if( !(bOsVersionInfoEx = GetVersionEx ((OSVERSIONINFO *) &osvi)) )
  107. {
  108. osvi.dwOSVersionInfoSize = sizeof (OSVERSIONINFO);
  109. if (! GetVersionEx ( (OSVERSIONINFO *) &osvi) )
  110. return -1;
  111. }
  112. switch (osvi.dwPlatformId)
  113. {
  114. // Test for the Windows NT product family.
  115. case VER_PLATFORM_WIN32_NT:
  116. // Test for the specific product family.
  117. if ( osvi.dwMajorVersion == 5 && osvi.dwMinorVersion == 2 )
  118. {
  119. nResult = VER_WIN2003;
  120. printf ("Microsoft Windows Server&nbsp;2003 family, ");
  121. }
  122. if ( osvi.dwMajorVersion == 5 && osvi.dwMinorVersion == 1 )
  123. {
  124. nResult = VER_WIN_XP;
  125. printf ("Microsoft Windows XP ");
  126. }
  127. if ( osvi.dwMajorVersion == 5 && osvi.dwMinorVersion == 0 )
  128. {
  129. nResult = VER_WIN2000_PRO;
  130. printf ("Microsoft Windows 2000 ");
  131. }
  132. if ( osvi.dwMajorVersion <= 4 )
  133. {
  134. nResult = VER_WINNT;
  135. printf("Microsoft Windows NT ");
  136. }
  137. // Test for specific product on Windows NT 4.0 SP6 and later.
  138. if( bOsVersionInfoEx )
  139. {
  140. // Test for the workstation type.
  141. if ( osvi.wProductType == VER_NT_WORKSTATION )
  142. {
  143. if( osvi.dwMajorVersion == 4 )
  144. printf ( "Workstation 4.0 " );
  145. else if( osvi.wSuiteMask & VER_SUITE_PERSONAL )
  146. printf ( "Home Edition " );
  147. else
  148. printf ( "Professional " );
  149. }
  150. // Test for the server type.
  151. else if ( osvi.wProductType == VER_NT_SERVER )
  152. {
  153. if( osvi.dwMajorVersion == 5 && osvi.dwMinorVersion == 2 )
  154. {
  155. if( osvi.wSuiteMask & VER_SUITE_DATACENTER )
  156. printf ( "Datacenter Edition " );
  157. else if( osvi.wSuiteMask & VER_SUITE_ENTERPRISE )
  158. printf ( "Enterprise Edition " );
  159. else if ( osvi.wSuiteMask == VER_SUITE_BLADE )
  160. printf ( "Web Edition " );
  161. else
  162. printf ( "Standard Edition " );
  163. }
  164. else if( osvi.dwMajorVersion == 5 && osvi.dwMinorVersion == 0 )
  165. {
  166. if( osvi.wSuiteMask & VER_SUITE_DATACENTER )
  167. {
  168. printf ( "Datacenter Server " );
  169. }
  170. else if( osvi.wSuiteMask & VER_SUITE_ENTERPRISE )
  171. {
  172. nResult = VER_WIN2000_ADVANCE_SRV;
  173. printf ( "Advanced Server " );
  174. }
  175. else
  176. {
  177. nResult = VER_WIN2000_SRV;
  178. printf ( "Server " );
  179. }
  180. }
  181. else // Windows NT 4.0
  182. {
  183. if( osvi.wSuiteMask & VER_SUITE_ENTERPRISE )
  184. printf ("Server 4.0, Enterprise Edition " );
  185. else
  186. printf ( "Server 4.0 " );
  187. }
  188. }
  189. }
  190. else // Test for specific product on Windows NT 4.0 SP5 and earlier
  191. {
  192. HKEY hKey;
  193. char szProductType[BUFSIZE];
  194. DWORD dwBufLen=BUFSIZE;
  195. LONG lRet;
  196. lRet = RegOpenKeyEx( HKEY_LOCAL_MACHINE,
  197. "SYSTEM\\CurrentControlSet\\Control\\ProductOptions",
  198. 0, KEY_QUERY_VALUE, &hKey );
  199. if( lRet != ERROR_SUCCESS )
  200. return FALSE;
  201. lRet = RegQueryValueEx( hKey, "ProductType", NULL, NULL,
  202. (LPBYTE) szProductType, &dwBufLen);
  203. if( (lRet != ERROR_SUCCESS) || (dwBufLen > BUFSIZE) )
  204. return FALSE;
  205. RegCloseKey( hKey );
  206. if ( lstrcmpi( "WINNT", szProductType) == 0 )
  207. printf( "Workstation " );
  208. if ( lstrcmpi( "LANMANNT", szProductType) == 0 )
  209. printf( "Server " );
  210. if ( lstrcmpi( "SERVERNT", szProductType) == 0 )
  211. printf( "Advanced Server " );
  212. printf( "%d.%d ", osvi.dwMajorVersion, osvi.dwMinorVersion );
  213. }
  214. // Display service pack (if any) and build number.
  215. if( osvi.dwMajorVersion == 4 &&
  216. lstrcmpi( osvi.szCSDVersion, "Service Pack 6" ) == 0 )
  217. {
  218. HKEY hKey;
  219. LONG lRet;
  220. // Test for SP6 versus SP6a.
  221. lRet = RegOpenKeyEx( HKEY_LOCAL_MACHINE,
  222. "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Hotfix\\Q246009",
  223. 0, KEY_QUERY_VALUE, &hKey );
  224. if( lRet == ERROR_SUCCESS )
  225. printf( "Service Pack 6a (Build %d)\n", osvi.dwBuildNumber & 0xFFFF );
  226. else // Windows NT 4.0 prior to SP6a
  227. {
  228. printf( "%s (Build %d)\n",
  229. osvi.szCSDVersion,
  230. osvi.dwBuildNumber & 0xFFFF);
  231. }
  232. RegCloseKey( hKey );
  233. }
  234. else // Windows NT 3.51 and earlier or Windows 2000 and later
  235. {
  236. printf( "%s (Build %d)\n",
  237. osvi.szCSDVersion,
  238. osvi.dwBuildNumber & 0xFFFF);
  239. }
  240. break;
  241. // Test for the Windows 95 product family.
  242. case VER_PLATFORM_WIN32_WINDOWS:
  243. if (osvi.dwMajorVersion == 4 && osvi.dwMinorVersion == 0)
  244. {
  245. printf ("Microsoft Windows 95 ");
  246. if ( osvi.szCSDVersion[1] == 'C' || osvi.szCSDVersion[1] == 'B' )
  247. printf("OSR2 " );
  248. }
  249. if (osvi.dwMajorVersion == 4 && osvi.dwMinorVersion == 10)
  250. {
  251. printf ("Microsoft Windows 98 ");
  252. if ( osvi.szCSDVersion[1] == 'A' )
  253. printf("SE " );
  254. }
  255. if (osvi.dwMajorVersion == 4 && osvi.dwMinorVersion == 90)
  256. {
  257. printf ("Microsoft Windows Millennium Edition\n");
  258. }
  259. break;
  260. case VER_PLATFORM_WIN32s:
  261. printf ("Microsoft Win32s\n");
  262. break;
  263. }
  264. return nResult;
  265. }
  266. void ReStartProcess(char *pPath)
  267. {
  268. PROCESS_INFORMATION pi;
  269. STARTUPINFO sti;
  270. ZeroMemory(&sti,sizeof(sti));
  271. sti.cb=sizeof(sti);
  272. sti.lpDesktop="winsta0\\default";
  273. CreateProcess(pPath,NULL,NULL,NULL,FALSE,0,NULL,NULL,&sti,&pi);
  274. }
  275. void StartIOService()
  276. {
  277. // 打开服务管理对象
  278. SC_HANDLE hSC = ::OpenSCManager( NULL,
  279. NULL, GENERIC_EXECUTE);
  280. if( hSC == NULL)
  281. {
  282. return;
  283. }
  284. // 打开www服务。
  285. SC_HANDLE hSvc = ::OpenService( hSC, "eBus-CMS IO Service",
  286. SERVICE_START | SERVICE_QUERY_STATUS | SERVICE_STOP);
  287. if( hSvc == NULL)
  288. {
  289. ::CloseServiceHandle( hSC);
  290. return;
  291. }
  292. // 获得服务的状态
  293. SERVICE_STATUS status;
  294. if( ::QueryServiceStatus( hSvc, &status) == FALSE)
  295. {
  296. ::CloseServiceHandle( hSvc);
  297. ::CloseServiceHandle( hSC);
  298. return;
  299. }
  300. //如果处于停止状态则启动服务,否则停止服务。
  301. if( status.dwCurrentState == SERVICE_RUNNING)
  302. {
  303. return;
  304. }
  305. else if( status.dwCurrentState == SERVICE_STOPPED)
  306. {
  307. // 启动服务
  308. if( ::StartService( hSvc, NULL, NULL) == FALSE)
  309. {
  310. ::CloseServiceHandle( hSvc);
  311. ::CloseServiceHandle( hSC);
  312. return;
  313. }
  314. // 等待服务启动
  315. while( ::QueryServiceStatus( hSvc, &status) == TRUE)
  316. {
  317. ::Sleep( status.dwWaitHint);
  318. if( status.dwCurrentState == SERVICE_RUNNING)
  319. {
  320. ::CloseServiceHandle( hSvc);
  321. ::CloseServiceHandle( hSC);
  322. return;
  323. }
  324. }
  325. }
  326. ::CloseServiceHandle( hSvc);
  327. ::CloseServiceHandle( hSC);
  328. return;
  329. }
  330. void StopIOService()
  331. {
  332. }
  333. //将进程名转换为PID的函数
  334. DWORD ProcessToPID(char* InputProcessName)
  335. {
  336. DWORD aProcesses[1024], cbNeeded, cProcesses;
  337. unsigned int i;
  338. HANDLE hProcess;
  339. HMODULE hMod;
  340. char szProcessName[MAX_PATH] = "UnknownProcess";
  341. // 计算目前有多少进程, aProcesses[]用来存放有效的进程PIDs
  342. if( !EnumProcesses( aProcesses, sizeof(aProcesses), &cbNeeded ) ) return 0;
  343. cProcesses = cbNeeded / sizeof(DWORD);
  344. // 按有效的PID遍历所有的进程
  345. for( i = 0; i < cProcesses; i++ )
  346. {
  347. // 打开特定PID的进程
  348. hProcess = OpenProcess( PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, aProcesses[i]);
  349. // 取得特定PID的进程名
  350. if( hProcess )
  351. {
  352. if( EnumProcessModules( hProcess, &hMod, sizeof(hMod), &cbNeeded) )
  353. {
  354. GetModuleBaseName( hProcess, hMod, szProcessName, sizeof(szProcessName) );
  355. //LogEvent("得到的进程名%s", szProcessName);
  356. //将取得的进程名与输入的进程名比较,如相同则返回进程PID
  357. if(!_stricmp(szProcessName, InputProcessName))
  358. {
  359. CloseHandle( hProcess );
  360. DWORD dwSessionID = 0;
  361. ProcessIdToSessionId( aProcesses[i], &dwSessionID );
  362. if( dwSessionID != 0 )
  363. {
  364. KillProcess( aProcesses[i] );
  365. LogEvent("删除远程桌面用户串口服务器进程!");
  366. }
  367. //return aProcesses[i];
  368. }
  369. }
  370. }//end of if ( hProcess )
  371. }//end of for
  372. //没有找到相应的进程名,返回0
  373. CloseHandle( hProcess );
  374. return 0;
  375. }//end of ProcessToPID
  376. DWORD WINAPI WatchThreadProc(void *pPara)
  377. {
  378. CHAR szPath[MAX_PATH] = {0};
  379. int nProcessCount = 0;
  380. do
  381. {
  382. if( g_nWindowsVer == VER_WIN2000_ADVANCE_SRV || g_nWindowsVer == VER_WIN2000_SRV
  383. || g_nWindowsVer == VER_WIN2003 )
  384. {
  385. #if 0
  386. //LogEvent("Win2003系统");
  387. memset(szPath, 0, sizeof(szPath));
  388. strcpy(szPath, g_strVirComDir);
  389. //关闭远程桌面进程
  390. ProcessToPID("VComManage.exe");
  391. nProcessCount = FindProcessCount(szPath);
  392. if( nProcessCount > 1 )
  393. {
  394. // 指定桌面,要不看不到界面
  395. // 等待桌面进程成功以后再指定桌面
  396. nProcessCount = FindProcessCount("C:\\WINDOWS\\system32\\explorer.exe");
  397. while( nProcessCount <= 0 )
  398. {
  399. nProcessCount = FindProcessCount("C:\\WINDOWS\\system32\\explorer.exe");
  400. }
  401. ReStartProcess(szPath);
  402. Sleep(10000); // 等待串口服务器转发成功
  403. }
  404. #endif
  405. }
  406. if( g_nRunModeForIOServer==0 )
  407. {
  408. Sleep( 3000 );
  409. continue;
  410. }
  411. memset(szPath, 0, sizeof(szPath));
  412. strcpy(szPath, g_strWatchDirectory);
  413. strcat(szPath, "\\IOServer.exe");
  414. // 进程存在,直接退出
  415. #if 1
  416. nProcessCount = FindProcessCount(szPath);
  417. if( nProcessCount == 0 )
  418. {
  419. Sleep(5000); //等待5秒,再启动
  420. StartIOService();
  421. //ShellExecute(NULL, "open", szPath, NULL, NULL, SW_SHOWNORMAL);
  422. // 指定桌面,要不看不到界面
  423. //ReStartProcess(szPath);
  424. }
  425. else if( nProcessCount > 1 )
  426. {
  427. FindAndKillProcess(szPath);
  428. LogEvent("删除IO服务器进程!");
  429. Sleep(5000); //等待5秒,再启动
  430. StartIOService();
  431. //ShellExecute(NULL, "open", szPath, NULL, NULL, SW_SHOWNORMAL);
  432. // 指定桌面,要不看不到界面
  433. //ReStartProcess(szPath);
  434. }
  435. #endif
  436. }while( WaitForSingleObject( g_hRunObject, 1250L ) == WAIT_TIMEOUT );
  437. return 0;
  438. }
  439. DWORD __stdcall INTER_GetExplorerToken(OUT PHANDLE phExplorerToken )
  440. {
  441. DWORD dwStatus = ERROR_FILE_NOT_FOUND ;
  442. BOOL bRet = FALSE ;
  443. HANDLE hProcess = NULL ;
  444. HANDLE hProcessSnap = NULL ;
  445. char szExplorerPath[MAX_PATH] = { 0 } ;
  446. char FileName[MAX_PATH] = { 0 } ;
  447. PROCESSENTRY32 pe32 = { 0 } ;
  448. __try
  449. {
  450. GetWindowsDirectory( szExplorerPath , MAX_PATH ) ;
  451. strcat( szExplorerPath , "\\Explorer.EXE" ) ;
  452. hProcessSnap = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS , 0 ) ;
  453. if( hProcessSnap == INVALID_HANDLE_VALUE )
  454. {
  455. dwStatus = GetLastError() ;
  456. __leave ;
  457. }
  458. pe32.dwSize = sizeof( PROCESSENTRY32 ) ;
  459. if( !Process32First( hProcessSnap, &pe32 ))
  460. {
  461. dwStatus = GetLastError() ;
  462. __leave ;
  463. }
  464. do {
  465. hProcess = OpenProcess(
  466. PROCESS_ALL_ACCESS ,
  467. FALSE ,
  468. pe32.th32ProcessID ) ;
  469. if( NULL != hProcess )
  470. {
  471. DWORD (__stdcall *GMFNE)(HANDLE hProcess,
  472. HMODULE hModule,
  473. LPTSTR lpFilename,
  474. DWORD nSize);
  475. HMODULE hPsapi=LoadLibrary("PSAPI");
  476. if ( ! hPsapi )
  477. {
  478. dwStatus = GetLastError() ;
  479. break ;
  480. }
  481. GMFNE=(DWORD (__stdcall *) (HANDLE, HMODULE,LPTSTR,DWORD))GetProcAddress(hPsapi,"GetModuleFileNameExA");
  482. if ( GMFNE(hProcess , NULL , FileName , MAX_PATH) )
  483. {
  484. if( !strcmpi( FileName , szExplorerPath ))
  485. {
  486. HANDLE hToken ;
  487. if( OpenProcessToken( hProcess , TOKEN_ALL_ACCESS , &hToken ))
  488. {
  489. * phExplorerToken = hToken ;
  490. dwStatus = 0 ;
  491. }
  492. break ;
  493. }
  494. }
  495. CloseHandle ( hProcess ) ;
  496. hProcess = NULL ;
  497. }
  498. } while( Process32Next( hProcessSnap, &pe32 )) ;
  499. }
  500. __finally
  501. {
  502. if( NULL != hProcess )
  503. {
  504. CloseHandle( hProcess ) ;
  505. }
  506. if( NULL != hProcessSnap )
  507. {
  508. CloseHandle ( hProcessSnap ) ;
  509. }
  510. }
  511. return dwStatus ;
  512. }
  513. BOOL FolderExist(CString strPath)
  514. {
  515. WIN32_FIND_DATA wfd;
  516. BOOL rValue = FALSE;
  517. HANDLE hFind = FindFirstFile(strPath, &wfd);
  518. if( (hFind != INVALID_HANDLE_VALUE) && (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) )
  519. {
  520. rValue = TRUE;
  521. }
  522. FindClose(hFind);
  523. return rValue;
  524. }
  525. int CreateBat( CString sDBBackName )
  526. {
  527. CHAR strFile[MAX_PATH + 1] = "";
  528. CHAR strFileSave[MAX_PATH + 1] = "";
  529. CHAR strTemp[MAX_PATH + 1] = "";
  530. int iPosFile = 0;
  531. int iLenghtFile = 0;
  532. ////////////////////////////////////////////////////////////////////////////
  533. //获取应用名
  534. GetModuleFileName(NULL, g_strWatchDirectory, MAX_PATH);
  535. iLenghtFile = (int)strlen(g_strWatchDirectory);
  536. for (iPosFile = iLenghtFile - 1; iPosFile >= 0; iPosFile--)
  537. {
  538. if (g_strWatchDirectory[iPosFile] == '\\')
  539. {
  540. memset(g_strAppName, 0, sizeof(g_strAppName));
  541. memcpy(g_strAppName, g_strWatchDirectory + iPosFile + 1, iLenghtFile - iPosFile - 1);
  542. break;
  543. }
  544. }
  545. iLenghtFile = (int)strlen(g_strWatchDirectory);
  546. for (iPosFile = iLenghtFile - 1; iPosFile >= 0; iPosFile--)
  547. {
  548. if (g_strWatchDirectory[iPosFile] == '\\')
  549. {
  550. g_strWatchDirectory[iPosFile] = '\0';
  551. break;
  552. }
  553. }
  554. wsprintf(strFile, "%s\\set.ini", g_strWatchDirectory);
  555. wsprintf(strFileSave, "%s\\backupDB.bat", g_strWatchDirectory);
  556. DeleteFile( strFileSave );
  557. CString sDBName,sDBPwd,sTemp;
  558. //数据库名称
  559. GetPrivateProfileString("Database", "DataBaseName", "", strTemp, sizeof(strTemp), strFile);
  560. sDBName = strTemp;
  561. //数据库密码
  562. GetPrivateProfileString("Database", "Password", "", strTemp, sizeof(strTemp), strFile);
  563. sDBPwd = strTemp;
  564. CStdioFile MyFile;
  565. if(!MyFile.Open(strFileSave,CFile::modeWrite))
  566. MyFile.Open(strFileSave,CFile::modeCreate|CFile::modeWrite);
  567. MyFile.WriteString("set PGHOME=C:\\Program Files\\PostgreSQL\\8.3\n");
  568. MyFile.WriteString("set PGDATA=%PGHOME%\\data\n");
  569. MyFile.WriteString("set PGLIB=%PGHOME%\\lib\n");
  570. MyFile.WriteString("set PGHOST=localhost\n");
  571. MyFile.WriteString("set PATH=%PGHOME%\\bin;%PATH%\n");
  572. sTemp.Format("set PGPASSWORD=%s\n",sDBPwd );
  573. MyFile.WriteString(sTemp);
  574. sTemp.Format("pg_dump -F c -h localhost -U postgres %s >D:\\isP-CMS\\Datebase\\%s.backup",sDBName,sDBBackName );
  575. MyFile.WriteString(sTemp);
  576. MyFile.Close();
  577. if (!FolderExist("D:\\isP-CMS"))
  578. {
  579. LOG4C_FUN( ( "D:\\isP-CMS" ));
  580. CreateDirectory("D:\\isP-CMS", NULL);
  581. }
  582. if (!FolderExist("D:\\isP-CMS\\Datebase"))
  583. CreateDirectory("D:\\isP-CMS\\Datebase", NULL);
  584. return 0;
  585. }
  586. BOOL InitWatchService()
  587. {
  588. CSocketHandle::InitLibrary( MAKEWORD(2,2) );
  589. MTVERIFY (g_hRunObject = ::CreateEvent(
  590. NULL, /* Security */
  591. TRUE, /* Manual event */
  592. 0, /* Clear on creation */
  593. "WatchService::g_hRunObject"));
  594. char szFileName[MAX_PATH];
  595. sprintf(szFileName, "%s\\log4crc", g_strWatchDirectory);
  596. ///设置日志配置文件名
  597. LOG4C_PARAM_CFG_FILE_NAME(szFileName);
  598. ///设置日志级别
  599. LOG4C_PARAM_LOG_LEVEL("LOG_ERROR");
  600. ///设置日志文件大小
  601. LOG4C_PARAM_LOG_FILE_SIZE(10240);
  602. ///设置生成日志文件个数,达到最大个数将自动覆盖最旧的日志
  603. LOG4C_PARAM_LOG_FILE_NUM(5);
  604. ///设置每次记录日志都重新读取日志配置文件
  605. LOG4C_PARAM_REREAD_LOG_CFG_FILE(1);
  606. ///带参数日志模块初始化,以上所有设置了的参数都将生效,没有设置的采用缺省值
  607. LOG4C_INIT_WITH_PARAM();
  608. //char strBuffer[128] = "You are the Best One!\0 Yes.";
  609. //LOG4C_HEX_DUMP((LOG_INFO, strBuffer, sizeof(strBuffer)));
  610. //LOG4C_ORIGIN ((LOG_ERROR,"LOG4C_ORIGIN"));
  611. //LOG4C_NO_FILENUM((LOG_ERROR, "LOG4C_NO_FILENUM"));
  612. ////LOG4C_RETURN_WITH_VALUE(( LOG4C_PRIORITY_TRACE, "message"), 1);
  613. //LOG4C_FUN(("Hello World!"));
  614. //LOG4C((LOG_ERROR, "Hello World!"));
  615. //LOG4C_IF((4>3, LOG_ERROR, "LOG4C_IF:4>3"));
  616. //LOG4C_IF((2>3, LOG_ERROR, "LOG4C_IF:2>3"));
  617. g_nWindowsVer = GetWindowVersion();
  618. //LOG4C_FUN( (g_strWatchDirectory ));
  619. //LOG4C_NO_FILENUM((LOG_NOTICE, "test"));
  620. //
  621. //LOG4C_NO_FILENUM_NO_LAYOUT((LOG_NOTICE, "test"));
  622. CString str;
  623. if( g_nTwoShipperIsServer==1 )
  624. str.Format( "%s %s %s",g_strTwoShipperServerIP,g_strTwoShipperServerPort,"服务器" );
  625. else
  626. str.Format( "%s %s %s",g_strTwoShipperServerIP,g_strTwoShipperServerPort,"客户端" );
  627. LOG4C_FUN( (str ));
  628. //LogEvent("系统版本=%d", g_nWindowsVer);
  629. DWORD dwThreadId;
  630. #if 1
  631. g_hWatchThread = CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)WatchThreadProc, NULL, 0, &dwThreadId);
  632. #endif
  633. // 连接IO服务器
  634. #if 0
  635. // 连接WatchService
  636. g_pWatchServerSocket = new CWatchServerSocket;
  637. if( !g_pWatchServerSocket->Connection(g_strWatchServerIP, g_strWatchServerPort) )
  638. {
  639. g_pWatchServerSocket->m_bSocket = FALSE;
  640. }
  641. else
  642. {
  643. g_pWatchServerSocket->m_bSocket = TRUE;
  644. for( int i = 0; i < MAX_DLL_TYPE; i++ )
  645. {
  646. g_dwServiceOnlineTick[i] = 0;
  647. }
  648. }
  649. if( g_hReConnectWatchSrvThread == NULL )
  650. {
  651. MTVERIFY( g_hReConnectWatchSrvThread = ::CreateThread(NULL, 0, ReConnectWatchSrvThread, 0, 0, 0) );
  652. }
  653. #endif
  654. if( g_hBackupDBThread == NULL )
  655. {
  656. MTVERIFY( g_hBackupDBThread = ::CreateThread(NULL, 0, BackupDBThread, 0, 0, 0) );
  657. }
  658. if( g_nTwoShipperIsServer==0 && g_hReConnectTwoShipperServerThread == NULL )
  659. {
  660. MTVERIFY( g_hReConnectTwoShipperServerThread = ::CreateThread(NULL, 0, ReConnectTwoShipperServerThread, 0, 0, 0) );
  661. }
  662. // 连接TwoShipper
  663. g_pTwoShipperSocket = new CTwoShipperSocket(g_nTwoShipperIsServer);
  664. switch( g_nTwoShipperIsServer )
  665. {
  666. case 0://客户端
  667. {
  668. if( !g_pTwoShipperSocket->DllC_LoginServer(g_strTwoShipperServerIP, g_strTwoShipperServerPort) )
  669. {
  670. LOG4C_FUN( ("Login Server fail" ));
  671. g_pTwoShipperSocket->m_bClientLoginServerSuccess = false;
  672. }
  673. else
  674. {
  675. LOG4C_FUN( ("Login Server Success" ));
  676. g_pTwoShipperSocket->m_bClientLoginServerSuccess = true;
  677. }
  678. }
  679. break;
  680. case 1://服务器
  681. {
  682. if( !g_pTwoShipperSocket->DllS_StartServer( g_strTwoShipperServerPort) )
  683. {
  684. LOG4C_FUN( ("Start Server fail" ));
  685. }
  686. else
  687. LOG4C_FUN( ("Start Server Success" ));
  688. }
  689. break;
  690. }
  691. while(g_status.dwCurrentState != SERVICE_STOP_PENDING)
  692. {
  693. Sleep(1000);
  694. }
  695. UnInitWatchService();
  696. return FALSE;
  697. }
  698. void UnInitWatchService()
  699. {
  700. //LogEvent("Watch Server Stop");
  701. if (g_hRunObject != NULL)
  702. MTVERIFY( SetEvent( g_hRunObject ) );
  703. if( g_pWatchServerSocket != NULL )
  704. {
  705. g_pWatchServerSocket->DisConnection();
  706. delete g_pWatchServerSocket;
  707. g_pWatchServerSocket = NULL;
  708. }
  709. if (g_hWatchThread != NULL)
  710. {
  711. MTVERIFY( WaitForSingleObject( g_hWatchThread, INFINITE ) != WAIT_FAILED );
  712. MTVERIFY( CloseHandle(g_hWatchThread) );
  713. g_hWatchThread = NULL;
  714. }
  715. if( g_hReConnectWatchSrvThread != NULL )
  716. {
  717. MTVERIFY( WaitForSingleObject( g_hReConnectWatchSrvThread, INFINITE ) != WAIT_FAILED );
  718. MTVERIFY( CloseHandle( g_hReConnectWatchSrvThread ) );
  719. g_hReConnectWatchSrvThread = NULL;
  720. }
  721. if( g_hReConnectTwoShipperServerThread != NULL )
  722. {
  723. MTVERIFY( WaitForSingleObject( g_hReConnectTwoShipperServerThread, INFINITE ) != WAIT_FAILED );
  724. MTVERIFY( CloseHandle( g_hReConnectTwoShipperServerThread ) );
  725. g_hReConnectTwoShipperServerThread = NULL;
  726. }
  727. LOG4C_FINI();
  728. }
  729. //*********************************************************
  730. //Functiopn: Init
  731. //Description: 初始化
  732. //Calls: main
  733. //Called By:
  734. //Table Accessed:
  735. //Table Updated:
  736. //Input:
  737. //Output:
  738. //Return:
  739. //Others:
  740. //History:
  741. // <author>niying <time>2006-8-10 <version> <desc>
  742. //*********************************************************
  743. void Init()
  744. {
  745. g_hServiceStatus = NULL;
  746. g_status.dwServiceType = SERVICE_WIN32_OWN_PROCESS;
  747. g_status.dwCurrentState = SERVICE_STOPPED;
  748. g_status.dwControlsAccepted = SERVICE_ACCEPT_STOP;
  749. g_status.dwWin32ExitCode = 0;
  750. g_status.dwServiceSpecificExitCode = 0;
  751. g_status.dwCheckPoint = 0;
  752. g_status.dwWaitHint = 0;
  753. }
  754. //*********************************************************
  755. //Functiopn: ServiceMain
  756. //Description: 服务主函数,这在里进行控制对服务控制的注册
  757. //Calls:
  758. //Called By:
  759. //Table Accessed:
  760. //Table Updated:
  761. //Input:
  762. //Output:
  763. //Return:
  764. //Others:
  765. //History:
  766. // <author>niying <time>2006-8-10 <version> <desc>
  767. //*********************************************************
  768. void WINAPI ServiceMain()
  769. {
  770. // Register the control request handler
  771. g_status.dwCurrentState = SERVICE_START_PENDING;
  772. g_status.dwControlsAccepted = SERVICE_ACCEPT_STOP;
  773. //注册服务控制
  774. g_hServiceStatus = RegisterServiceCtrlHandler(g_szServiceName, ServiceStrl);
  775. if (g_hServiceStatus == NULL)
  776. {
  777. LogEvent(_T("Handler not installed"));
  778. return;
  779. }
  780. SetServiceStatus(g_hServiceStatus, &g_status);
  781. g_status.dwWin32ExitCode = S_OK;
  782. g_status.dwCheckPoint = 0;
  783. g_status.dwWaitHint = 0;
  784. g_status.dwCurrentState = SERVICE_RUNNING;
  785. SetServiceStatus(g_hServiceStatus, &g_status);
  786. InitWatchService();
  787. g_status.dwCurrentState = SERVICE_STOPPED;
  788. SetServiceStatus(g_hServiceStatus, &g_status);
  789. LogEvent(_T("Service stopped"));
  790. }
  791. //*********************************************************
  792. //Functiopn: ServiceStrl
  793. //Description: 服务控制主函数,这里实现对服务的控制,
  794. // 当在服务管理器上停止或其它操作时,将会运行此处代码
  795. //Calls:
  796. //Called By:
  797. //Table Accessed:
  798. //Table Updated:
  799. //Input: dwOpcode:控制服务的状态
  800. //Output:
  801. //Return:
  802. //Others:
  803. //History:
  804. // <author>niying <time>2006-8-10 <version> <desc>
  805. //*********************************************************
  806. void WINAPI ServiceStrl(DWORD dwOpcode)
  807. {
  808. switch (dwOpcode)
  809. {
  810. case SERVICE_CONTROL_STOP:
  811. //UnInitIOService();
  812. g_status.dwCurrentState = SERVICE_STOP_PENDING;
  813. SetServiceStatus(g_hServiceStatus, &g_status);
  814. PostThreadMessage(dwThreadID, WM_CLOSE, 0, 0);
  815. break;
  816. case SERVICE_CONTROL_PAUSE:
  817. break;
  818. case SERVICE_CONTROL_CONTINUE:
  819. break;
  820. case SERVICE_CONTROL_INTERROGATE:
  821. break;
  822. case SERVICE_CONTROL_SHUTDOWN:
  823. UnInitWatchService();
  824. break;
  825. default:
  826. LogEvent(_T("Bad service request"));
  827. }
  828. }
  829. //*********************************************************
  830. //Functiopn: IsInstalled
  831. //Description: 判断服务是否已经被安装
  832. //Calls:
  833. //Called By:
  834. //Table Accessed:
  835. //Table Updated:
  836. //Input:
  837. //Output:
  838. //Return:
  839. //Others:
  840. //History:
  841. // <author>niying <time>2006-8-10 <version> <desc>
  842. //*********************************************************
  843. BOOL IsInstalled()
  844. {
  845. BOOL bResult = FALSE;
  846. //打开服务控制管理器
  847. SC_HANDLE hSCM = ::OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
  848. if (hSCM != NULL)
  849. {
  850. //打开服务
  851. SC_HANDLE hService = ::OpenService(hSCM, g_szServiceName, SERVICE_QUERY_CONFIG);
  852. if (hService != NULL)
  853. {
  854. bResult = TRUE;
  855. ::CloseServiceHandle(hService);
  856. }
  857. ::CloseServiceHandle(hSCM);
  858. }
  859. return bResult;
  860. }
  861. //*********************************************************
  862. //Functiopn: Install
  863. //Description: 安装服务函数
  864. //Calls:
  865. //Called By:
  866. //Table Accessed:
  867. //Table Updated:
  868. //Input:
  869. //Output:
  870. //Return:
  871. //Others:
  872. //History:
  873. // <author>niying <time>2006-8-10 <version> <desc>
  874. //*********************************************************
  875. BOOL Install()
  876. {
  877. if (IsInstalled())
  878. return TRUE;
  879. //打开服务控制管理器
  880. SC_HANDLE hSCM = ::OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
  881. if (hSCM == NULL)
  882. {
  883. //MessageBox(NULL, _T("Couldn't open service manager"), g_szServiceName, MB_OK);
  884. return FALSE;
  885. }
  886. // Get the executable file path
  887. TCHAR szFilePath[MAX_PATH];
  888. ::GetModuleFileName(NULL, szFilePath, MAX_PATH);
  889. //创建服务
  890. SC_HANDLE hService = ::CreateService(
  891. hSCM,
  892. g_szServiceName,
  893. g_szServiceName,
  894. SERVICE_ALL_ACCESS,
  895. SERVICE_WIN32_OWN_PROCESS,
  896. SERVICE_AUTO_START, //SERVICE_DEMAND_START,
  897. SERVICE_ERROR_NORMAL,
  898. szFilePath,
  899. NULL,
  900. NULL,
  901. _T(""),
  902. NULL,
  903. NULL);
  904. if( strcmp(g_strLanguage, "CHS") == 0 )
  905. {
  906. g_hLangDLL = ::LoadLibrary("ChineseRes.dll");
  907. }
  908. else if( strcmp(g_strLanguage, "CHT") == 0 )
  909. {
  910. g_hLangDLL = ::LoadLibrary("TaiwanRes.dll");
  911. }
  912. else if( strcmp(g_strLanguage, "ENG") == 0 )
  913. {
  914. g_hLangDLL = ::LoadLibrary("EnglishRes.dll");
  915. }
  916. AfxSetResourceHandle(g_hLangDLL);
  917. CString strServiceName;
  918. strServiceName.LoadString(IDS_WATCH_SERVICE_NAME);
  919. SERVICE_DESCRIPTION ServiceDesc;
  920. static TCHAR szDescription[MAX_PATH];
  921. _tcscpy(szDescription, strServiceName);
  922. ServiceDesc.lpDescription = szDescription;
  923. ::ChangeServiceConfig2(hService, SERVICE_CONFIG_DESCRIPTION, &ServiceDesc);
  924. if (hService == NULL)
  925. {
  926. ::CloseServiceHandle(hSCM);
  927. //MessageBox(NULL, _T("Couldn't create service"), g_szServiceName, MB_OK);
  928. return FALSE;
  929. }
  930. ::CloseServiceHandle(hService);
  931. ::CloseServiceHandle(hSCM);
  932. return TRUE;
  933. }
  934. //*********************************************************
  935. //Functiopn: Uninstall
  936. //Description: 删除服务函数
  937. //Calls:
  938. //Called By:
  939. //Table Accessed:
  940. //Table Updated:
  941. //Input:
  942. //Output:
  943. //Return:
  944. //Others:
  945. //History:
  946. // <author>niying <time>2006-8-10 <version> <desc>
  947. //*********************************************************
  948. BOOL Uninstall()
  949. {
  950. if (!IsInstalled())
  951. return TRUE;
  952. SC_HANDLE hSCM = ::OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
  953. if (hSCM == NULL)
  954. {
  955. //MessageBox(NULL, _T("Couldn't open service manager"), g_szServiceName, MB_OK);
  956. return FALSE;
  957. }
  958. SC_HANDLE hService = ::OpenService(hSCM, g_szServiceName, SERVICE_STOP | DELETE);
  959. if (hService == NULL)
  960. {
  961. ::CloseServiceHandle(hSCM);
  962. //MessageBox(NULL, _T("Couldn't open service"), g_szServiceName, MB_OK);
  963. return FALSE;
  964. }
  965. SERVICE_STATUS g_status;
  966. ::ControlService(hService, SERVICE_CONTROL_STOP, &g_status);
  967. //删除服务
  968. BOOL bDelete = ::DeleteService(hService);
  969. ::CloseServiceHandle(hService);
  970. ::CloseServiceHandle(hSCM);
  971. if (bDelete)
  972. return TRUE;
  973. LogEvent(_T("Service could not be deleted"));
  974. return FALSE;
  975. }
  976. //
  977. // FindProcess
  978. // 这个函数唯一的参数是你指定的进程名,如:你的目标进程
  979. // 是 "Notepad.exe",返回值是该进程的ID,失败返回0
  980. //
  981. int FindProcessCount(char *strProcessName)
  982. {
  983. int nCount = 0;
  984. DWORD aProcesses[1024], cbNeeded, cbMNeeded;
  985. HMODULE hMods[1024];
  986. HANDLE hProcess;
  987. char szProcessName[MAX_PATH];
  988. if ( !EnumProcesses( aProcesses, sizeof(aProcesses), &cbNeeded ) )
  989. return 0;
  990. for(int i=0; i< (int) (cbNeeded / sizeof(DWORD)); i++)
  991. {
  992. //_tprintf(_T("%d\t"), aProcesses[i]);
  993. hProcess = OpenProcess( PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, aProcesses[i]);
  994. EnumProcessModules(hProcess, hMods, sizeof(hMods), &cbMNeeded);
  995. GetModuleFileNameEx( hProcess, hMods[0], szProcessName,sizeof(szProcessName));
  996. if(strstr(szProcessName, strProcessName))
  997. {
  998. //_tprintf(_T("%s;"), szProcessName);
  999. nCount++;
  1000. }
  1001. CloseHandle( hProcess );
  1002. //_tprintf(_T("\n"));
  1003. }
  1004. return nCount;
  1005. }
  1006. //
  1007. // Function: ErrorForce
  1008. // 此函数中用上面的 FindProcess 函数获得你的目标进程的ID
  1009. // 用WIN API OpenPorcess 获得此进程的句柄,再以TerminateProcess
  1010. // 强制结束这个进程
  1011. //
  1012. VOID KillProcess(DWORD dwProcess)
  1013. {
  1014. // When the all operation fail this function terminate the "winlogon" Process for force exit the system.
  1015. //HANDLE hTargetProcess = OpenProcess(PROCESS_QUERY_INFORMATION | // Required by Alpha
  1016. // PROCESS_CREATE_THREAD | // For CreateRemoteThread
  1017. // PROCESS_VM_OPERATION | // For VirtualAllocEx/VirtualFreeEx
  1018. // PROCESS_VM_WRITE, // For WriteProcessMemory
  1019. // FALSE, dwProcess);
  1020. HANDLE hTargetProcess = OpenProcess(SYNCHRONIZE | PROCESS_TERMINATE,
  1021. FALSE, dwProcess);
  1022. if(hTargetProcess == NULL)
  1023. {
  1024. return;
  1025. }
  1026. TerminateProcess(hTargetProcess, 0);
  1027. return;
  1028. }
  1029. //
  1030. // FindProcess
  1031. // 这个函数唯一的参数是你指定的进程名,如:你的目标进程
  1032. // 是 "Notepad.exe",返回值是该进程的ID,失败返回0
  1033. //
  1034. DWORD FindAndKillProcess(char *strProcessName)
  1035. {
  1036. DWORD aProcesses[1024], cbNeeded, cbMNeeded;
  1037. HMODULE hMods[1024];
  1038. HANDLE hProcess;
  1039. char szProcessName[MAX_PATH];
  1040. if ( !EnumProcesses( aProcesses, sizeof(aProcesses), &cbNeeded ) ) return 0;
  1041. for(int i=0; i< (int) (cbNeeded / sizeof(DWORD)); i++)
  1042. {
  1043. //_tprintf(_T("%d\t"), aProcesses[i]);
  1044. hProcess = OpenProcess( PROCESS_QUERY_INFORMATION | PROCESS_VM_READ, FALSE, aProcesses[i]);
  1045. EnumProcessModules(hProcess, hMods, sizeof(hMods), &cbMNeeded);
  1046. GetModuleFileNameEx( hProcess, hMods[0], szProcessName,sizeof(szProcessName));
  1047. if(strstr(szProcessName, strProcessName))
  1048. {
  1049. //_tprintf(_T("%s;"), szProcessName);
  1050. KillProcess(aProcesses[i]);
  1051. //return(aProcesses[i]);
  1052. }
  1053. //_tprintf(_T("\n"));
  1054. }
  1055. return 0;
  1056. }
  1057. int GetSysData()
  1058. {
  1059. CHAR strFile[MAX_PATH + 1] = "";
  1060. CHAR strValue[MAX_PATH + 1] = "";
  1061. int iPosFile = 0;
  1062. int iLenghtFile = 0;
  1063. ////////////////////////////////////////////////////////////////////////////
  1064. //获取应用名
  1065. GetModuleFileName(NULL, g_strWatchDirectory, MAX_PATH);
  1066. iLenghtFile = (int)strlen(g_strWatchDirectory);
  1067. for (iPosFile = iLenghtFile - 1; iPosFile >= 0; iPosFile--)
  1068. {
  1069. if (g_strWatchDirectory[iPosFile] == '\\')
  1070. {
  1071. memset(g_strAppName, 0, sizeof(g_strAppName));
  1072. memcpy(g_strAppName, g_strWatchDirectory + iPosFile + 1, iLenghtFile - iPosFile - 1);
  1073. break;
  1074. }
  1075. }
  1076. iLenghtFile = (int)strlen(g_strWatchDirectory);
  1077. for (iPosFile = iLenghtFile - 1; iPosFile >= 0; iPosFile--)
  1078. {
  1079. if (g_strWatchDirectory[iPosFile] == '\\')
  1080. {
  1081. g_strWatchDirectory[iPosFile] = '\0';
  1082. break;
  1083. }
  1084. }
  1085. wsprintf(strFile, "%s\\set.ini", g_strWatchDirectory);
  1086. //是否自动启动系统
  1087. GetPrivateProfileString("Other", "VirCom", "", g_strVirComDir, sizeof(g_strVirComDir), strFile);
  1088. //WatchService
  1089. GetPrivateProfileString("WatchServer", "ServerIP", "", g_strWatchServerIP, sizeof(g_strWatchServerIP), strFile);
  1090. GetPrivateProfileString("WatchServer", "Port", "", g_strWatchServerPort, sizeof(g_strWatchServerPort), strFile);
  1091. //WatchService
  1092. GetPrivateProfileString("TwoShipperBackUp", "ServerIP", "", g_strTwoShipperServerIP, sizeof(g_strTwoShipperServerIP), strFile);
  1093. GetPrivateProfileString("TwoShipperBackUp", "Port", "", g_strTwoShipperServerPort, sizeof(g_strTwoShipperServerPort), strFile);
  1094. CHAR sTemp[MAX_PORT + 1];
  1095. GetPrivateProfileString("TwoShipperBackUp", "IsInSlave", "", sTemp, sizeof(sTemp), strFile);
  1096. g_nTwoShipperIsServer = atoi( sTemp );
  1097. g_nRunModeForIOServer = (g_nTwoShipperIsServer+1)%2;
  1098. //语言
  1099. GetPrivateProfileString("Other", "Language", "", g_strLanguage, sizeof(g_strLanguage), strFile);
  1100. //数据库备份
  1101. GetPrivateProfileString("BackupDB", "BackType", "", sTemp, sizeof(sTemp), strFile);
  1102. g_nDBBackType = atoi( sTemp );
  1103. GetPrivateProfileString("BackupDB", "BackDate", "", sTemp, sizeof(sTemp), strFile);
  1104. g_nDBBackDate = atoi( sTemp );
  1105. GetPrivateProfileString("BackupDB", "BackTime", "", sTemp, sizeof(sTemp), strFile);
  1106. g_nDBBackTime = atoi( sTemp );
  1107. return 0;
  1108. }
  1109. DWORD WINAPI ReConnectWatchSrvThread( void *pData )
  1110. {
  1111. do
  1112. {
  1113. for( int i = 0; i < MAX_DLL_TYPE; i++ )
  1114. {
  1115. if( GetTickCount() - g_dwServiceOnlineTick[i] > 1 * 60 * 1000 &&
  1116. g_dwServiceOnlineTick[i] != 0 ) //大于两分钟没有心跳包,认为已断线
  1117. {
  1118. g_pWatchServerSocket->m_bSocket = FALSE;
  1119. CHAR szPath[MAX_PATH] = {0};
  1120. memset(szPath, 0, sizeof(szPath));
  1121. GetWindowsDirectory(szPath, MAX_PATH);
  1122. strcat(szPath, "\\system32\\dwwin.exe");
  1123. LogEvent("删除出错进程调试窗体!");
  1124. FindAndKillProcess(szPath);
  1125. memset(szPath, 0, sizeof(szPath));
  1126. strcpy(szPath, g_strWatchDirectory);
  1127. strcat(szPath, "\\IOServer.exe");
  1128. LogEvent("删除出错进程,等待重启服务!");
  1129. FindAndKillProcess(szPath);
  1130. for( int j = 0; j < MAX_DLL_TYPE; j++ )
  1131. {
  1132. g_dwServiceOnlineTick[j] = 0;
  1133. }
  1134. break;
  1135. }
  1136. }
  1137. if( g_pWatchServerSocket != NULL )
  1138. {
  1139. if( g_pWatchServerSocket->m_bSocket == FALSE )
  1140. {
  1141. g_pWatchServerSocket->DisConnection();
  1142. LogEvent("重连IO Server");
  1143. if( !g_pWatchServerSocket->Connection(g_strWatchServerIP, g_strWatchServerPort) )
  1144. {
  1145. g_pWatchServerSocket->m_bSocket = FALSE;
  1146. }
  1147. else
  1148. {
  1149. LogEvent("连接IO Server成功");
  1150. g_pWatchServerSocket->m_bSocket = TRUE;
  1151. for( int i = 0; i < MAX_DLL_TYPE; i++ )
  1152. {
  1153. g_dwServiceOnlineTick[i] = 0;
  1154. }
  1155. }
  1156. }
  1157. }
  1158. }while( WaitForSingleObject( g_hRunObject, 1250L ) == WAIT_TIMEOUT );
  1159. return 0;
  1160. }
  1161. DWORD WINAPI ReConnectTwoShipperServerThread( void *pData )
  1162. {
  1163. do
  1164. {
  1165. //if( g_pTwoShipperSocket->m_bClientLoginServerSuccess )
  1166. //{
  1167. // Sleep(1000);
  1168. // continue;
  1169. //}
  1170. if( g_pTwoShipperSocket != NULL && !g_pTwoShipperSocket->m_bClientLoginServerSuccess )
  1171. {
  1172. g_pTwoShipperSocket->DllC_LogoutServer();
  1173. if( !g_pTwoShipperSocket->DllC_LoginServer(g_strTwoShipperServerIP, g_strTwoShipperServerPort) )
  1174. {
  1175. CString str;
  1176. str.Format("Login Server fail %s %s",g_strTwoShipperServerIP, g_strTwoShipperServerPort );
  1177. LOG4C_FUN( (str ));
  1178. g_pTwoShipperSocket->m_bClientLoginServerSuccess = false;
  1179. }
  1180. else
  1181. {
  1182. CString str;
  1183. str.Format("Login Server Success %s %s",g_strTwoShipperServerIP, g_strTwoShipperServerPort );
  1184. LOG4C_FUN( (str ));
  1185. g_pTwoShipperSocket->m_bClientLoginServerSuccess = true;
  1186. }
  1187. }
  1188. else if( g_pTwoShipperSocket != NULL )
  1189. {
  1190. g_pTwoShipperSocket = new CTwoShipperSocket(g_nTwoShipperIsServer);
  1191. if( !g_pTwoShipperSocket->DllC_LoginServer(g_strTwoShipperServerIP, g_strTwoShipperServerPort) )
  1192. {
  1193. CString str;
  1194. str.Format("Login Server fail %s %s",g_strTwoShipperServerIP, g_strTwoShipperServerPort );
  1195. LOG4C_FUN( (str ));
  1196. g_pTwoShipperSocket->m_bClientLoginServerSuccess = false;
  1197. }
  1198. else
  1199. {
  1200. CString str;
  1201. str.Format("Login Server Success %s %s",g_strTwoShipperServerIP, g_strTwoShipperServerPort );
  1202. LOG4C_FUN( (str ));
  1203. g_pTwoShipperSocket->m_bClientLoginServerSuccess = true;
  1204. }
  1205. }
  1206. }while( WaitForSingleObject( g_hRunObject, 1250L ) == WAIT_TIMEOUT );
  1207. return 0;
  1208. }
  1209. DWORD WINAPI BackupDBThread( void *pData )
  1210. {
  1211. do
  1212. {
  1213. SYSTEMTIME st;
  1214. GetLocalTime( &st );
  1215. CString str;
  1216. str.Format("%d-%d-%d",st.wYear,st.wMonth,st.wDay);
  1217. LOG4C_FUN( ( str ));
  1218. CHAR strFile[MAX_PATH + 1] = "";
  1219. wsprintf(strFile, "%s\\backupDB.bat", g_strWatchDirectory);
  1220. if( g_nDBBackType==0 )//月
  1221. {
  1222. if( st.wDay==g_nDBBackDate && st.wHour==g_nDBBackTime && !g_bDBBack )
  1223. {
  1224. g_bDBBack = true;
  1225. CreateBat( str );
  1226. ShellExecute(NULL,"open",strFile,"","", SW_SHOW);
  1227. LOG4C_FUN( ( strFile ));
  1228. }
  1229. else if( st.wDay!=g_nDBBackDate || st.wHour!=g_nDBBackTime )
  1230. {
  1231. g_bDBBack = false;
  1232. }
  1233. }
  1234. else//周
  1235. {
  1236. if( st.wDayOfWeek==g_nDBBackDate && st.wHour==g_nDBBackTime && !g_bDBBack )
  1237. {
  1238. g_bDBBack = true;
  1239. CreateBat( str );
  1240. ShellExecute(NULL,"open",strFile,"","", SW_HIDE);
  1241. LOG4C_FUN( ( strFile ));
  1242. }
  1243. else if( st.wDay!=g_nDBBackDate || st.wHour!=g_nDBBackTime )
  1244. {
  1245. g_bDBBack = false;
  1246. }
  1247. }
  1248. Sleep( 1000*60*1 );
  1249. }while( WaitForSingleObject( g_hRunObject, 1250L ) == WAIT_TIMEOUT );
  1250. return 0;
  1251. }