类型
|
说明
|
SERVICE_FILE_SYSTEM_DRIVER=2
|
文件系统驱动服务。
|
SERVICE_KERNEL_DRIVER=1
|
驱动服务。
|
SERVICE_WIN32_OWN_PROCESS=16
|
独占一个进程的服务。
|
SERVICE_WIN32_SHARE_PROCESS=32
|
与其他服务共享一个进程的服务。
|
//服务程序主函数。
#include
"stdafx.h"
#include
"Windows.h"
#define
SZAPPNAME "serverSample" //服务程序名
#define
SZSERVICENAME "serviceSample" //标识服务的内部名
//内部变量
bool
bDebugServer=false;
SERVICE_STATUS ssStatus;
SERVICE_STATUS_HANDLE sshStatusHandle;
DWORD dwErr=0;
TCHAR szErr[256];
//下面的函数由程序实现
void
WINAPI Service_Main(DWORD dwArgc, LPTSTR *lpszArgv);
void
WINAPI Service_Ctrl(DWORD dwCtrlCode);
void
installService();
void
removeService();
void
debugService(int argc,char** argv);
bool
ReportStatusToSCMgr(DWORD dwCurrentState,DWORD dwWin32ExitCode,DWORD dwWaitHint);
void
AddToMessageLog(LPTSTR lpszMsg);
int
_tmain(int argc, _TCHAR* argv[])
{
SERVICE_TABLE_ENTRY dispatchTable[]=
{
{TEXT(SZSERVICENAME),(LPSERVICE_MAIN_FUNCTION)Service_Main},
{ NULL,NULL}
};
if((argc>1)&&((*argv[1]=='-')||(argv[1]=="/")))
{
if(_stricmp("install",argv[1]+1)==0)
{
installService();
}
else if(_stricmp("remove",argv[1]+1)==0)
{
removeService();
}
else if(_stricmp("debug",argv[1]+1)==0)
{
bDebugServer=true;
debugService(argc,argv);
}
else
{ //如果未能和上面的如何参数匹配,则可能是服务控制管理程序来启动该程序。立即调用
//StartServiceCtrlDispatcher 函数。
printf("%s - install to install the service /n",SZAPPNAME);
printf("%s - remove to remove the service /n",SZAPPNAME);
printf("%s - debug to debug the service /n",SZAPPNAME);
printf("/n StartServiceCtrlDispatcher being called./n");
printf("This may take several seconds.Please wait./n");
if(!StartServiceCtrlDispatcher(dispatchTable))
AddToMessageLog(TEXT("StartServiceCtrlDispatcher failed."));
else
AddToMessageLog(TEXT("StartServiceCtrlDispatcher OK."));
}
exit(0);
}
return 0;
}
|
2.服务入口点函数
服务入口点函数 service_main 首先调用系统函数 ReGISterServiceCtrlHandler 注册服务控制处理函数 service_ctrl,然后调用 ReportStatusToSCMgr 函数,它通过系统函数 SetServiceStatus 更新服务的状态,然后调用特定的服务初始化入口函数 ServiceStart 完成具体的初始化工作。
//服务入口点函数 void ServiceStart(DWORD dwArgc,LPTSTR* lpszArgv);//具体服务的初始化入口函数 { //注册服务控制处理函数 sshStatusHandle=RegisterServiceCtrlHandler(TEXT(SZSERVICENAME),Service_Ctrl); //如果注册失败 if(!sshStatusHandle) { goto cleanup; return; } //初始化 SERVICE_STATUS 结构中的成员 ssStatus.dwServiceType=SERVICE_WIN32_OWN_PROCESS; ssStatus.dwServiceSpecificExitCode=0; //更新服务状态 if(!ReportStatusToSCMgr( SERVICE_START_PENDING,//服务状态,The service is starting. NO_ERROR, //退出码 3000)) //等待时间 goto cleanup; //更新服务状态失败则转向 cleanup ServiceStart(dwArgc,lpszArgv); return; cleanup: //把服务状态更新为 SERVICE_STOPPED,并退出。 if(sshStatusHandle) (void)ReportStatusToSCMgr(SERVICE_STOPPED,dwErr,0); } |
3.控制处理程序函数
函数 Service_Ctrl 是服务的控制处理程序函数,由主函数线程的控制分发程序引用。在处理控制请求码时,应该在确定的时间间隔内更新服务状态检查点,避免发生服务不能响应的错误。
//控制处理程序函数 void WINAPI Service_Ctrl(DWORD dwCtrlCode) { //处理控制请求码 switch(dwCtrlCode) { //先更新服务状态为 SERVICDE_STOP_PENDING,再停止服务。 case SERVICE_CONTROL_STOP: ReportStatusToSCMgr(SERVICE_STOP_PENDING,NO_ERROR,500); ServiceStop(); //由具体的服务程序实现 return; //暂停服务 case SERVICE_CONTROL_PAUSE: ReportStatusToSCMgr(SERVICE_STOP_PENDING,NO_ERROR,500); ServicePause(); //由具体的服务程序实现 ssStatus.dwCurrentState=SERVICE_PAUSED; return; //继续服务 case SERVICE_CONTROL_CONTINUE: ReportStatusToSCMgr(SERVICE_STOP_PENDING,NO_ERROR,500); ServiceContinue(); //由具体的服务程序实现 ssStatus.dwCurrentState=SERVICE_RUNNING; return; //更新服务状态 case SERVICE_CONTROL_INTERROGATE: break; //无效控制码 default: break; } ReportStatusToSCMgr(ssStatus.dwCurrentState,NO_ERROR,0); } |
除了系统定义的五种控制码外(还有一种是:SERVICE_CONTROL_SHUTDOWN),用户还可自定义控制码,其取值范围是128-255。用户可以通过控制面板中的服务项向特定服务程序的控制处理函数发送控制码,程序员可以调用系统函数 ControlService 直接向服务程序的控制处理函数发送控制码。其函数原型如下:
BOOL ControlService(
SC_HANDLE hService,
DWORD dwControl,
LPSERVICE_STATUS lpServiceStatus
);
hService :函数 OpenService or CreateService 返回的服务程序句柄。
dwControl :控制码,不能是SERVICE_CONTROL_SHUTDOWN。
lpServiceStatus:返回最后收到的服务状态信息。
4.安装服务程序
每个已安装服务程序在 HKEY_LOCAL_MACHINE/SYSTE/CurrentControlSet/Services 下都有一个服务名的关键字,程序员可以调用系统函数 CreateService 安装服务程序,并指定服务类型,服务名等。这个函数创建一个服务对象,并将其增加到相关的服务控制管理器数据库中。 XML:namespace prefix = o ns = "urn:schemas-microsoft-com:Office:office" />
下面是函数原型:
SC_HANDLE CreateService(
SC_HANDLE hSCManager, //服务控制管理程序维护的登记数据库的句柄,由系统函数OpenSCManager 返回
LPCTSTR lpServiceName, //以NULL 结尾的服务名,用于创建登记数据库中的关键字
LPCTSTR lpDisplayName, //以NULL 结尾的服务名,用于用户界面标识服务
DWORD dwDesiredAccess, //指定服务返回类型
DWORD dwServiceType, //指定服务类型
DWORD dwStartType, //指定何时启动服务
DWORD dwErrorControl, //指定服务启动失败的严重程度
LPCTSTR lPBinaryPathName, //指定服务程序二进制文件的路径
LPCTSTR lpLoadOrderGroup, //指定顺序装入的服务组名
LPDWORD lpdwTagId, //忽略,NULL
LPCTSTR lpDependencies, //指定启动该服务前必须先启动的服务或服务组
LPCTSTR lpServiceStartName, //以NULL 结尾的字符串,指定服务帐号。如是NULL,则表示使用LocalSystem 帐号
LPCTSTR lpPassword //以NULL 结尾的字符串,指定对应的口令。为NULL表示无口令。但使用LocalSystem时填NULL
);
对于一个已安装的服务程序,可以调用系统函数 OpenService 来获取服务程序的句柄
下面是其函数原型:
SC_HANDLE OpenService(
SC_HANDLE hSCManager,
LPCTSTR lpServiceName,
DWORD dwDesiredAccess
);
hSCManager :服务控制管理程序微服的登记数据库的句柄。由函数 OpenSCManager function 返回 这个句柄。
lpServiceName :将要打开的以NULL 结尾的服务程序的名字,和 CreateService 中的 lpServiceName 相对应。
dwDesiredAccess :指定服务的访问类型。服务响应请求时,首先检查访问类型。
用CreateService 或OpenService 打开的服务程序句柄使用完毕后必须用CloseServiceHandle 关闭。
OpenSCManager打开的服务管理数据库句柄也必须用它来关闭。
//安装服务程序 void installService() { SC_HANDLE schService; SC_HANDLE schSCManager; TCHAR szPath[512]; //得到程序磁盘文件的路径 if(GetModuleFileName(NULL,szPath,512)==0) { _tprintf(TEXT("Unable to install %s - %s /n"), TEXT(SZAPPNAME), GetLastError());//@1获取调用函数返回的最后错误码 return; } //打开服务管理数据库 schSCManager=OpenSCManager( NULL, //本地计算机 NULL, //默认的数据库 SC_MANAGER_ALL_ACCESS //要求所有的访问权 ); if(schSCManager) { //登记服务程序 schService=CreateService( schSCManager, //服务管理数据库句柄 TEXT(SZSERVICENAME), //服务名 TEXT(SZAPPNAME), //用于显示服务的标识 SERVICE_ALL_ACCESS, //响应所有的访问请求 SERVICE_WIN32_OWN_PROCESS, //服务类型 SERVICE_DEMAND_START, //启动类型 SERVICE_ERROR_NORMAL, //错误控制类型 szPath, //服务程序磁盘文件的路径 NULL, //服务不属于任何组 NULL, //没有tag标识符 NULL, //启动服务所依赖的服务或服务组,这里仅仅是一个空字符串 NULL, //LocalSystem 帐号 NULL); if(schService) { _tprintf(TEXT("%s installed. /n"),TEXT(SZAPPNAME)); CloseServiceHandle(schService); } else { _tprintf(TEXT("CreateService failed - %s /n"),GetLastError()); } CloseServiceHandle(schSCManager); } else _tprintf(TEXT("OpenSCManager failed - %s /n"),GetLastError()); } |
5.停止和删除已安装的服务程序
//停止和删除已安装的服务程序 void removeService() { SC_HANDLE schService; SC_HANDLE schSCManager; //打开服务管理数据库 schSCManager=OpenSCManager( NULL, //本地计算机 NULL, //默认的数据库 SC_MANAGER_ALL_Access //要求所有的访问权 ); if(schSCManager) { //获取服务程序句柄 schService=OpenService( schSCManager, //服务管理数据库句柄 TEXT(SZSERVICENAME), //服务名 SERVICE_ALL_ACCESS //响应所有的访问请求 ); if(schService) { //试图停止服务 if(ControlService( schService, //服务程序句柄 SERVICE_CONTROL_STOP, //停止服务请求码 &ssStatus //接收最后的服务状态信息 )) { _tprintf(TEXT("Stopping %s."),TEXT(SZAPPNAME)); Sleep(1000);
//等待服务停止 // while(QueryServiceStatus(schService,&ssStatus)) { if(SERVICE_STOP_PENDING==ssStatus.dwCurrentState) { _tprintf(TEXT(".")); Sleep(1000); } else break; } if(SERVICE_STOPPED==ssStatus.dwCurrentState) _tprintf(TEXT("/n %s stopped. /n"),TEXT(SZAPPNAME)); else _tprintf(TEXT("/n %s failed to stopp. /n"),TEXT(SZAPPNAME)); } //删除已安装的服务程序安装 if(DeleteService(schService)) _tprintf(TEXT("%s removed. /n"),TEXT(SZAPPNAME)); else _tprintf(TEXT("DeleteService failed - %s. /n"), GetLastError()); CloseServiceHandle(schService); } else _tprintf(TEXT("OpenService failed - %s /n"),GetLastError()); CloseServiceHandle(schSCManager); } else _tprintf(TEXT("OpenSCManager failed - %s /n"),GetLastError()); }
|
在编译程序的时候,我们会发觉ServiceStop();ServicePause();ServiceContinue();等三个函数没有具体实现,这对于理解此文的人来说应该不难编写,在此我可以给点文档内的参考:声明 SetTheServiceStatus()函数,
//
// SetTheServiceStatus - This just wraps up SetServiceStatus.
//
void SetTheServiceStatus(DWORD dwCurrentState, DWORD dwWin32ExitCode,
DWORD dwCheckPoint, DWORD dwWaitHint)
{
SERVICE_STATUS ss; // Current status of the service.
//
// Disable control requests until the service is started.
//
if (dwCurrentState == SERVICE_START_PENDING)
ss.dwControlsAccepted = 0;
else
ss.dwControlsAccepted =
SERVICE_ACCEPT_STOP|SERVICE_ACCEPT_SHUTDOWN;
// Other flags include SERVICE_ACCEPT_PAUSE_CONTINUE
// and SERVICE_ACCEPT_SHUTDOWN.
// Initialize ss structure.
ss.dwServiceType = SERVICE_WIN32_OWN_PROCESS;
ss.dwServiceSpecificExitCode = 0;
ss.dwCurrentState = dwCurrentState;
ss.dwWin32ExitCode = dwWin32ExitCode;
ss.dwCheckPoint = dwCheckPoint;
ss.dwWaitHint = dwWaitHint;
// Send status of the service to the Service Controller.
if (!SetServiceStatus(ssh, &ss))
ErrorStopService(TEXT("SetServiceStatus"));
}
然后用如下的方式来调用函数来实现源程序中缺少的功能 :
SetTheServiceStatus(SERVICE_STOPPED, GetLastError(), 0, 0);// Stop the service.