kingate代理软件--一个不错的开源代理(不过里面代码好乱),win32调试日记

kingate代理软件--一个不错的开源代理,是学习代理开发很好开源软件，不过里面代码好乱。我这几天我看代码发现，它里面是提供win32代码,作者已经把源代码开源出来了,为什么在windows下还是把几函数实现没有公布出来。真假。。。我试着把它放在vs2008编译。只要实现那几个没实现的函数，或者你把main.cpp中#define _WIN32_SERVICE屏蔽。再把utils.cpp中#include <afxmt.h>修改为#include <time.h>,就可以。下面是我网上找到的那几个函数实现：

 

forwin32.cpp

///

 

 

#include<time.h>

#include "forwin32.h"

#include "kingate.h"

#include "malloc_debug.h"

 

#ifdef _WIN32

 

SERVICE_STATUS        ServiceStatus;

SERVICE_STATUS_HANDLE ServiceStatusHandle;

 

int  pthread_mutex_init(pthread_mutex_t *mutex,void *t)

{

// char tmp[100];

// sprintf(tmp,"lock%d%d",rand(),time(NULL));

*mutex=CreateMutex(NULL,FALSE,NULL);

return 0;

};

int pthread_mutex_destroy(pthread_mutex_t *mutex)

{

CloseHandle(*mutex);

return 0;

}

 

extern void StartAll();

extern void StopAll();

void WINAPI ThreadProc()

{

    StartAll();

}

 

void WINAPI kingateControl(DWORD dwCode)

{

    switch(dwCode)

    {

    case SERVICE_CONTROL_PAUSE:

        ServiceStatus.dwCurrentState = SERVICE_PAUSED;

        break;

 

    case SERVICE_CONTROL_CONTINUE:

        ServiceStatus.dwCurrentState = SERVICE_RUNNING;

        break;

    case SERVICE_CONTROL_STOP:

        StopAll();

        ServiceStatus.dwCurrentState  = SERVICE_STOPPED;

        ServiceStatus.dwWin32ExitCode = 0;

        ServiceStatus.dwCheckPoint    = 0;

        ServiceStatus.dwWaitHint      = 0;

        if(SetServiceStatus(ServiceStatusHandle,&ServiceStatus)==0)

        {

            OutputDebugString("SetServiceStatus in CmdControl in Switch Error !/n");

        }

 

        return ;

    case SERVICE_CONTROL_INTERROGATE:

        break;

    default:

        break;

    }

 

    if(SetServiceStatus(ServiceStatusHandle,&ServiceStatus)==0)

    {

        OutputDebugString("SetServiceStatus in CmdControl out Switch Error !/n");

    }

}

 

void WINAPI kingateMain(DWORD argc, LPTSTR * argv)

{

    HANDLE    hThread;

    ServiceStatus.dwServiceType             = SERVICE_WIN32;

    ServiceStatus.dwCurrentState            = SERVICE_START_PENDING;

    ServiceStatus.dwControlsAccepted        = SERVICE_ACCEPT_STOP | SERVICE_ACCEPT_PAUSE_CONTINUE;

    ServiceStatus.dwServiceSpecificExitCode = 0;

    ServiceStatus.dwWin32ExitCode           = 0;

    ServiceStatus.dwCheckPoint              = 0;

    ServiceStatus.dwWaitHint                = 0;

 

    ServiceStatusHandle = RegisterServiceCtrlHandler("kingate",kingateControl);

 

    if(ServiceStatusHandle == 0)

    {

        OutputDebugString("RegisterServiceCtrlHandler Error !/n");

        return ;

    }

 

    ServiceStatus.dwCurrentState = SERVICE_RUNNING;

    ServiceStatus.dwCheckPoint   = 0;

    ServiceStatus.dwWaitHint     = 0;

 

    if(SetServiceStatus(ServiceStatusHandle,&ServiceStatus)==0)

    {

        OutputDebugString("SetServiceStatus in CmdStart Error !/n");

        return ;

    }

 

    hThread=CreateThread(NULL,0,(LPTHREAD_START_ROUTINE)ThreadProc,NULL,0,NULL);

    if(hThread==NULL)

    {

        OutputDebugString("CreateThread in CmdStart Error !/n");

    }

 

    return ;

}

bool InstallService(const char * szServiceName)

{

    char             szCurrentPath[MAX_PATH];

    GetModuleFileName(NULL,szCurrentPath,MAX_PATH);

SERVICE_STATUS   InstallServiceStatus;

    DWORD dwErrorCode = 0;

    SC_HANDLE schSCManager = OpenSCManager(NULL,NULL,SC_MANAGER_ALL_ACCESS);

    if(schSCManager == NULL)

    {

        printf("Open Service Control Manager Database Failure !/n");

        return false;

    }

 

    printf("Creating Service .... ");

    SC_HANDLE schService=CreateService(schSCManager,szServiceName,szServiceName,SERVICE_ALL_ACCESS,

        SERVICE_WIN32_OWN_PROCESS,SERVICE_AUTO_START,

        SERVICE_ERROR_IGNORE,szCurrentPath,NULL,NULL,NULL,NULL,NULL); 

    if(schService==NULL)

    {

        dwErrorCode=GetLastError();

        if(dwErrorCode!=ERROR_SERVICE_EXISTS)

        {

            printf("Failure !/n");

            CloseServiceHandle(schSCManager);

            return false;

        }

        else

        {

            printf("already Exists !/n");

            schService = OpenService(schSCManager,szServiceName,SERVICE_START);

            if(schService==NULL)

            {

                printf("Opening Service .... Failure !/n");

                CloseServiceHandle(schSCManager);

                return false;

            }

        }

    }

    else

    {

        printf("Success !/n");

    }

 

    printf("Starting Service .... ");

    if(StartService(schService,0,NULL)==0)                         

    {

        dwErrorCode=GetLastError();

        if(dwErrorCode==ERROR_SERVICE_ALREADY_RUNNING)

        {

            printf("already Running !/n");

            CloseServiceHandle(schSCManager);  

            CloseServiceHandle(schService);

            return true;

        }

    }

    else

    {

        printf("Pending ... ");

    }

 

    while(QueryServiceStatus(schService,&InstallServiceStatus)!=0)           

    {

        if(InstallServiceStatus.dwCurrentState==SERVICE_START_PENDING)

        {

            Sleep(100);

        }

        else

        {

            break;

        }

    }

    if(InstallServiceStatus.dwCurrentState!=SERVICE_RUNNING)

    {

        printf("Failure !/n");                       

    }

    else

    {

        printf("Success !/n");

    }

 

    CloseServiceHandle(schSCManager);

    CloseServiceHandle(schService);

 

    return InstallServiceStatus.dwCurrentState == SERVICE_RUNNING;

}

bool UninstallService(const char * szServiceName)

{

    DWORD dwErrorCode = 0;

    SERVICE_STATUS   RemoveServiceStatus;

    SC_HANDLE schSCManager = OpenSCManager(NULL,NULL,SC_MANAGER_ALL_ACCESS);

    if(schSCManager == NULL)

    {

        printf("Opening SCM ......... ");

        dwErrorCode = GetLastError();

        if(dwErrorCode != 5)

        {

            printf("Failure !/n"); 

        }

        else

        {

            printf("Failuer ... Access is Denied !/n");

        }

        return false;

    }

 

    SC_HANDLE schService = OpenService(schSCManager,szServiceName,SERVICE_ALL_ACCESS);

    if(schService==NULL) 

    {

        printf("Opening Service ..... ");

        dwErrorCode=GetLastError();

        if(dwErrorCode==1060)

        {

            printf("no Exists !/n");

        }

        else

        {

            printf("Failure !/n");

        }

        CloseServiceHandle(schSCManager);

        return false;

    }

    else

    {

        printf("Stopping Service .... ");

        if(QueryServiceStatus(schService,&RemoveServiceStatus)!=0)

        {

            if(RemoveServiceStatus.dwCurrentState==SERVICE_STOPPED)

            {

                printf("already Stopped !/n"); 

            }

            else

            {

                printf("Pending ... ");

                if(ControlService(schService,SERVICE_CONTROL_STOP,&RemoveServiceStatus)!=0)

                {

                    while(RemoveServiceStatus.dwCurrentState==SERVICE_STOP_PENDING)         

                    {

                        Sleep(10);

                        QueryServiceStatus(schService,&RemoveServiceStatus);

                    }

                    if(RemoveServiceStatus.dwCurrentState==SERVICE_STOPPED)

                    {

                        printf("Success !/n");

                    }

                    else

                    {

                        printf("Failure !/n");

                    }

                }

                else

                {

                    printf("Failure !/n");          

                }

            }

        }

        else

        {

            printf("Query Failure !/n");

        }

 

        printf("Removing Service .... ");     

        if(DeleteService(schService)==0)

        {

            printf("Failure !/n");   

        }

        else

        {

            printf("Success !/n");

        }

    }

 

    CloseServiceHandle(schSCManager);        

    CloseServiceHandle(schService);

    return RemoveServiceStatus.dwCurrentState == SERVICE_STOPPED;

}

 

void Log(const char *format, va_list argptr)

{

    char szMsg[1024];

    _vsnprintf(szMsg, sizeof(szMsg)-2, format, argptr);

    szMsg[sizeof(szMsg)-1] = '/0';

    strcat(szMsg, "/n");

 

    OutputDebugString(szMsg);

}

 

void LogEvent(LPCTSTR pFormat, ...)

{

    va_list args;

    va_start(args,pFormat);

    Log(pFormat, args);

    va_end(args);

}

/*

int

strerror_r(int err, char *errbuf, size_t lerrbuf)

{

LPTSTR lpszMsgBuf = NULL;

char b[80];

 

    FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER |

 FORMAT_MESSAGE_FROM_SYSTEM |

 FORMAT_MESSAGE_IGNORE_INSERTS,

 NULL, (DWORD)err,

 MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),

                  (LPTSTR)&lpszMsgBuf, 0, NULL);

 

    if ( lpszMsgBuf == NULL ) {

sprintf(b, "Error: (%d)", err);

if ( lerrbuf > 0 ) strncpy(errbuf, b, lerrbuf-1);

return(-1);

 

    }

 

    strncpy(errbuf, lpszMsgBuf, MIN(lerrbuf-1, strlen(lpszMsgBuf)-1));

    LocalFree(lpszMsgBuf);

    return(0);

}

*/

#endif