WindowsNT Service的写法!(抄的)

bskay 2002-01-12 06:08:09
#include <stdio.h>
#include <Windows.h>
#include <Winsvc.h>


//WritePrivateProfileString
//GetPrivateProfileString


SERVICE_STATUS MyStatus;
SERVICE_STATUS_HANDLE MyServiceStatusHandle;

VOID WINAPI MyServiceMain(
DWORD dwArgc, // number of arguments
LPTSTR *lpszArgv // array of arguments
);

VOID MyServiceCtrlHandler (DWORD opcode);
DWORD MyServiceInitialization (DWORD argc, LPTSTR *argv,
DWORD *specificError);

VOID SvcDebugOut(LPSTR String, DWORD Status);

BOOL MyInstallService()
{
SC_HANDLE schSCManager = OpenSCManager(
NULL, // local machine
NULL, // ServicesActive database SERVICES_ACTIVE_DATABASE
SC_MANAGER_ALL_ACCESS); // full access rights

if (schSCManager == NULL)
return FALSE;

SC_HANDLE schService = OpenService(
schSCManager, // SCM database
"__Svc__", // service name
SERVICE_ALL_ACCESS);
if (schService != NULL)
{
if(!DeleteService(schService))
return FALSE;
CloseServiceHandle(schService);
}
LPCTSTR lpszBinaryPathName =
"E:\\cdmapp\\test\\MyService\\Debug\\MyService.exe";

schService = CreateService(
schSCManager, // SCManager database
"__Svc__", // name of service
"A B C D E Service", // service name to display
SERVICE_ALL_ACCESS, // desired access
SERVICE_WIN32_OWN_PROCESS, // service type
SERVICE_DEMAND_START, // start type
SERVICE_ERROR_NORMAL, // error control type
lpszBinaryPathName, // service's binary
NULL, // no load ordering group
NULL, // no tag identifier
NULL, // no dependencies
NULL, // LocalSystem account
NULL); // no password

if (schService == NULL)
return FALSE;

CloseServiceHandle(schService);
CloseServiceHandle(schSCManager);

return TRUE;
}
BOOL MyStartService()
{
SC_HANDLE schSCManager = OpenSCManager(
NULL, // local machine
NULL, // ServicesActive database SERVICES_ACTIVE_DATABASE
SC_MANAGER_ALL_ACCESS); // full access rights

if (schSCManager == NULL)
return FALSE;
SC_HANDLE schService = OpenService(
schSCManager, // SCM database
"__Svc__", // service name
SERVICE_ALL_ACCESS);
if (schService == NULL)
return FALSE;

if (!StartService(
schService, // handle to service
0, // number of arguments
NULL) ) // no arguments
return FALSE;

CloseServiceHandle(schService);
CloseServiceHandle(schSCManager);

return FALSE;
}
void DoTest()
{
WritePrivateProfileString(
"App",
"key",
"String",
"C:\\ppp.ini");
TCHAR buf[255];
GetPrivateProfileString(
"App",
"key",
"String",
buf,
254,
"C:\\ppp.ini");

}
void main( )
{
DoTest();
if ( 0 )
MyInstallService();
if ( 0 )
MyStartService();
SERVICE_TABLE_ENTRY DispatchTable[] =
{
{ "__Svc__", MyServiceMain },
{ NULL, NULL }
};

if (!StartServiceCtrlDispatcher( DispatchTable))
{
SvcDebugOut(
" [MY_SERVICE] StartServiceCtrlDispatcher error = %d\n",
GetLastError());
}
}

VOID SvcDebugOut(LPSTR String, DWORD Status)
{
CHAR Buffer[1024];
if (strlen(String) < 1000)
{
sprintf(Buffer, String, Status);
OutputDebugStringA(Buffer);
}
}

void WINAPI MyServiceMain (DWORD argc, LPTSTR *argv)
{
DWORD status;
DWORD specificError;

MyServiceStatus.dwServiceType = SERVICE_WIN32;
MyServiceStatus.dwCurrentState = SERVICE_START_PENDING;
MyServiceStatus.dwControlsAccepted = SERVICE_ACCEPT_STOP |
SERVICE_ACCEPT_PAUSE_CONTINUE;
MyServiceStatus.dwWin32ExitCode = 0;
MyServiceStatus.dwServiceSpecificExitCode = 0;
MyServiceStatus.dwCheckPoint = 0;
MyServiceStatus.dwWaitHint = 0;

MyServiceStatusHandle = RegisterServiceCtrlHandler(
"MyService",
(LPHANDLER_FUNCTION)MyServiceCtrlHandler);

if (MyServiceStatusHandle == (SERVICE_STATUS_HANDLE)0)
{
SvcDebugOut(" [MY_SERVICE] RegisterServiceCtrlHandler failed %d\n", GetLastError());
return;
}

// Initialization code goes here.
status = MyServiceInitialization(argc,argv, &specificError);

// Handle error condition
if (status != NO_ERROR)
{
MyServiceStatus.dwCurrentState = SERVICE_STOPPED;
MyServiceStatus.dwCheckPoint = 0;
MyServiceStatus.dwWaitHint = 0;
MyServiceStatus.dwWin32ExitCode = status;
MyServiceStatus.dwServiceSpecificExitCode = specificError;

SetServiceStatus (MyServiceStatusHandle, &MyServiceStatus);
return;
}

// Initialization complete - report running status.
MyServiceStatus.dwCurrentState = SERVICE_RUNNING;
MyServiceStatus.dwCheckPoint = 0;
MyServiceStatus.dwWaitHint = 0;

if (!SetServiceStatus (MyServiceStatusHandle, &MyServiceStatus))
{
status = GetLastError();
SvcDebugOut(" [MY_SERVICE] SetServiceStatus error %ld\n",status);
}

// This is where the service does its work.
SvcDebugOut(" [MY_SERVICE] Returning the Main Thread \n",0);

return;
}

// Stub initialization function.
DWORD MyServiceInitialization(DWORD argc, LPTSTR *argv,
DWORD *specificError)
{
argv;
argc;
specificError;
return(0);
}
VOID MyServiceCtrlHandler (DWORD Opcode)
{
DWORD status;

switch(Opcode)
{
case SERVICE_CONTROL_PAUSE:
// Do whatever it takes to pause here.
MyServiceStatus.dwCurrentState = SERVICE_PAUSED;
break;

case SERVICE_CONTROL_CONTINUE:
// Do whatever it takes to continue here.
MyServiceStatus.dwCurrentState = SERVICE_RUNNING;
break;

case SERVICE_CONTROL_STOP:
// Do whatever it takes to stop here.
MyServiceStatus.dwWin32ExitCode = 0;
MyServiceStatus.dwCurrentState = SERVICE_STOPPED;
MyServiceStatus.dwCheckPoint = 0;
MyServiceStatus.dwWaitHint = 0;

if (!SetServiceStatus (MyServiceStatusHandle,
&MyServiceStatus))
{
status = GetLastError();
SvcDebugOut(" [MY_SERVICE] SetServiceStatus error %ld\n",status);
}

SvcDebugOut(" [MY_SERVICE] Leaving MyService \n",0);
return;

case SERVICE_CONTROL_INTERROGATE:
// Fall through to send current status.
break;

default:
SvcDebugOut(" [MY_SERVICE] Unrecognized opcode %ld\n",
Opcode);
}

// Send current status.
if (!SetServiceStatus (MyServiceStatusHandle, &MyServiceStatus))
{
status = GetLastError();
SvcDebugOut(" [MY_SERVICE] SetServiceStatus error %ld\n",status);
}
return;
}
...全文
92 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
Soft21 2002-01-13
  • 打赏
  • 举报
回复
大家好啊,这个问题,这里还是有高手的嘛
intel_p4 2002-01-12
  • 打赏
  • 举报
回复
我试一下
Kendiv 2002-01-12
  • 打赏
  • 举报
回复
不错,可以研究一下。

16,472

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • Web++
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了,记忆之中,与CSDN的年龄几乎差不多。随着时间的推移,MFC技术渐渐的偏离了开发主流,若干年之后的今天,当我们面对着微软的这个经典之笔,内心充满着敬意,那些曾经的记忆,可以说代表着二十年前曾经的辉煌……
        向经典致敬,或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天,我们期待着MFC技术能够恢复其曾经的辉煌,或许这个期待会永远成为一种“梦想”,或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代,期待更好的互联网技术能够使得MFC技术框架得以重现活力,……

试试用AI创作助手写篇文章吧