转自: http://www.du52.com/text.php?id=27
下面就跟着我一步一步地教你怎么去创建一个服务应用程序吧。
本文主要介绍了OpenSCManager、 CreateService、OpenService、ControlService、DeleteService、 RegisterServiceCtrlHandler、SetServiceStatus、StartServiceCtrlDispatcher等操 作服务程序的主要几个API的用法,具体的函数参数大家可以查阅MSDN。
一、建立Win32 Application应用程序(当然你也可以建立其它的应用程序,但服务一般是没有用户界面的),并命名为ServiceTest。
二、定义全局函数变量
07 | void LogEvent( LPCTSTR pszFormat, ...); |
08 | void WINAPI ServiceMain(); |
09 | void WINAPI ServiceStrl( DWORD dwOpcode); |
11 | TCHAR szServiceName[] = _T( "ServiceTest" ); |
13 | SERVICE_STATUS_HANDLE hServiceStatus; |
14 | SERVICE_STATUS status; |
三、添加Init初始化函数
这里主要是设置服务句柄和状态。
2 | status.dwServiceType = SERVICE_WIN32_OWN_PROCESS; |
3 | status.dwCurrentState = SERVICE_STOPPED; |
4 | tatus.dwControlsAccepted = SERVICE_ACCEPT_STOP; |
5 | status.dwWin32ExitCode = 0; |
6 | status.dwServiceSpecificExitCode = 0; |
7 | status.dwCheckPoint = 0; |
四、添加安装和删除服务函数
这里主要是用到了五个函数OpenSCManager、CreateService、OpenService、ControlService、 DeleteService。OpenSCManager用于打开服务控制管理器;CreateService用于创建服务;OpenService用于 打开已有的服务,返回该服务的句柄;ControlService则用于控制已打开的服务状态,这里是让服务停止后才删除;DeleteService用 于删除指定服务。
06 | OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS); |
10 | SC_HANDLE hService = ::CreateService( |
11 | hSCM, szServiceName, szServiceName, |
12 | SERVICE_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS, |
13 | SERVICE_DEMAND_START, SERVICE_ERROR_NORMAL, |
14 | szFilePath, NULL, NULL, _T( "" ), NULL, NULL); |
16 | ::CloseServiceHandle(hService); |
17 | ::CloseServiceHandle(hSCM); |
25 | OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS); |
29 | OpenService(hSCM, szServiceName, SERVICE_STOP | DELETE); |
33 | ControlService(hService, SERVICE_CONTROL_STOP, &status); |
37 | DeleteService(hService); |
五、添加服务主线程函数和控制函数
这里调用RegisterServiceCtrlHandler来注册服务的控制函数,这里要设置status.dwControlsAccepted为SERVICE_ACCEPT_STOP,否则你不能控制这个服务的状态。
01 | void WINAPI ServiceMain() |
05 | status.dwCurrentState = SERVICE_START_PENDING; |
06 | status.dwControlsAccepted = SERVICE_ACCEPT_STOP; |
10 | hServiceStatus = RegisterServiceCtrlHandler(szServiceName, ServiceStrl); |
11 | if (hServiceStatus == NULL) |
13 | LogEvent(_T( "Handler not installed" )); |
16 | SetServiceStatus(hServiceStatus, &status); |
17 | status.dwWin32ExitCode = S_OK; |
18 | status.dwCheckPoint = 0; |
19 | status.dwWaitHint = 0; |
20 | status.dwCurrentState = SERVICE_RUNNING; |
21 | SetServiceStatus(hServiceStatus, &status); |
30 | status.dwCurrentState = SERVICE_STOPPED; |
31 | SetServiceStatus(hServiceStatus, &status); |
32 | LogEvent(_T( "Service stopped" )); |
六、在主线程函数里注册控制函数和程序执行主体
01 | void WINAPI ServiceMain() |
七、在main函数里注册添加安装、删除、注册主函数
01 | int APIENTRY WinMain( HINSTANCE hInstance, |
02 | HINSTANCE hPrevInstance, |
08 | dwThreadID = ::GetCurrentThreadId(); |
09 | SERVICE_TABLE_ENTRY st[] = |
11 | { szServiceName, (LPSERVICE_MAIN_FUNCTION)ServiceMain }, |
15 | if (stricmp(lpCmdLine, "/install" ) == 0) |
17 | else if (stricmp(lpCmdLine, "/uninstall" ) == 0) |
21 | if (!::StartServiceCtrlDispatcher(st)) |
23 | LogEvent(_T( "Register Service Main Function Error!" )); |
八、总结
其它做一个服务程序并难,主要是懂得程序的执行体放于哪里?和注册程序的主函数和注册控制函数,如果这两个没有注册的话,你就程序就不知道如何去控制 了。status.dwControlsAccepted = SERVICE_ACCEPT_STOP;这个也重要,如果你没有设置的话,那么服务就不会受你控制了。