#include <ipcIService.h>

#include <ipcCID.h>

#include <nsIComponentRegistrar.h>

#ifdef XPCOM_GLUE

# include <nsXPCOMGlue.h>

#endif

#include <nsEventQueueUtils.h>

#include <nsGenericFactory.h>

#include "prio.h"

#include "prproces.h"

#include "server.h"

#include "Logging.h"

#include <VBox/param.h>

#include <iprt/buildconfig.h>

#include <iprt/initterm.h>

#include <iprt/critsect.h>

#include <iprt/getopt.h>

#include <iprt/message.h>

#include <iprt/string.h>

#include <iprt/stream.h>

#include <iprt/path.h>

#include <iprt/timer.h>

#include <iprt/env.h>

#include <signal.h> // for the signal handler

#include <stdlib.h>

#include <unistd.h>

#include <errno.h>

#include <fcntl.h>

#include <sys/stat.h>

#include <sys/resource.h>

#include <nsIGenericFactory.h>

#include <VirtualBox_XPCOM.h>

#include "ApplianceImpl.h"

#include "AudioAdapterImpl.h"

#include "BandwidthControlImpl.h"

#include "BandwidthGroupImpl.h"

#include "DHCPServerRunner.h"

#include "DHCPServerImpl.h"

#include "GuestOSTypeImpl.h"

#include "HostImpl.h"

#include "HostNetworkInterfaceImpl.h"

#include "MachineImpl.h"

#include "MediumFormatImpl.h"

#include "MediumImpl.h"

#include "NATEngineImpl.h"

#include "NetworkAdapterImpl.h"

#include "ParallelPortImpl.h"

#include "ProgressCombinedImpl.h"

#include "ProgressProxyImpl.h"

#include "SerialPortImpl.h"

#include "SharedFolderImpl.h"

#include "SnapshotImpl.h"

#include "StorageControllerImpl.h"

#include "SystemPropertiesImpl.h"

#include "USBControllerImpl.h"

#include "VFSExplorerImpl.h"

#include "VirtualBoxImpl.h"

#include "VRDEServerImpl.h"

#ifdef VBOX_WITH_USB

# include "HostUSBDeviceImpl.h"

# include "USBDeviceFilterImpl.h"

# include "USBDeviceImpl.h"

#endif

#ifdef VBOX_WITH_EXTPACK

# include "ExtPackManagerImpl.h"

#endif

NS_DECL_CLASSINFO(VirtualBox)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(VirtualBox, IVirtualBox)

NS_DECL_CLASSINFO(Machine)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Machine, IMachine)

NS_DECL_CLASSINFO(VFSExplorer)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(VFSExplorer, IVFSExplorer)

NS_DECL_CLASSINFO(Appliance)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Appliance, IAppliance)

NS_DECL_CLASSINFO(VirtualSystemDescription)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(VirtualSystemDescription, IVirtualSystemDescription)

NS_DECL_CLASSINFO(SessionMachine)

NS_IMPL_THREADSAFE_ISUPPORTS2_CI(SessionMachine, IMachine, IInternalMachineControl)

NS_DECL_CLASSINFO(SnapshotMachine)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(SnapshotMachine, IMachine)

NS_DECL_CLASSINFO(Snapshot)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Snapshot, ISnapshot)

NS_DECL_CLASSINFO(Medium)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Medium, IMedium)

NS_DECL_CLASSINFO(MediumFormat)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(MediumFormat, IMediumFormat)

NS_DECL_CLASSINFO(MediumAttachment)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(MediumAttachment, IMediumAttachment)

NS_DECL_CLASSINFO(Progress)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Progress, IProgress)

NS_DECL_CLASSINFO(CombinedProgress)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(CombinedProgress, IProgress)

NS_DECL_CLASSINFO(ProgressProxy)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(ProgressProxy, IProgress)

NS_DECL_CLASSINFO(SharedFolder)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(SharedFolder, ISharedFolder)

NS_DECL_CLASSINFO(VRDEServer)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(VRDEServer, IVRDEServer)

NS_DECL_CLASSINFO(Host)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(Host, IHost)

NS_DECL_CLASSINFO(HostNetworkInterface)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(HostNetworkInterface, IHostNetworkInterface)

NS_DECL_CLASSINFO(DHCPServer)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(DHCPServer, IDHCPServer)

NS_DECL_CLASSINFO(GuestOSType)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(GuestOSType, IGuestOSType)

NS_DECL_CLASSINFO(NetworkAdapter)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(NetworkAdapter, INetworkAdapter)

NS_DECL_CLASSINFO(NATEngine)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(NATEngine, INATEngine)

NS_DECL_CLASSINFO(SerialPort)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(SerialPort, ISerialPort)

NS_DECL_CLASSINFO(ParallelPort)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(ParallelPort, IParallelPort)

NS_DECL_CLASSINFO(USBController)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(USBController, IUSBController)

NS_DECL_CLASSINFO(StorageController)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(StorageController, IStorageController)

#ifdef VBOX_WITH_USB

NS_DECL_CLASSINFO(USBDeviceFilter)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(USBDeviceFilter, IUSBDeviceFilter)

NS_DECL_CLASSINFO(HostUSBDevice)

NS_IMPL_THREADSAFE_ISUPPORTS2_CI(HostUSBDevice, IUSBDevice, IHostUSBDevice)

NS_DECL_CLASSINFO(HostUSBDeviceFilter)

NS_IMPL_THREADSAFE_ISUPPORTS2_CI(HostUSBDeviceFilter, IUSBDeviceFilter, IHostUSBDeviceFilter)

#endif

NS_DECL_CLASSINFO(AudioAdapter)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(AudioAdapter, IAudioAdapter)

NS_DECL_CLASSINFO(SystemProperties)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(SystemProperties, ISystemProperties)

#ifdef VBOX_WITH_RESOURCE_USAGE_API

NS_DECL_CLASSINFO(PerformanceCollector)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(PerformanceCollector, IPerformanceCollector)

NS_DECL_CLASSINFO(PerformanceMetric)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(PerformanceMetric, IPerformanceMetric)

#endif /* VBOX_WITH_RESOURCE_USAGE_API */

NS_DECL_CLASSINFO(BIOSSettings)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(BIOSSettings, IBIOSSettings)

#ifdef VBOX_WITH_EXTPACK

NS_DECL_CLASSINFO(ExtPackFile)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(ExtPackFile, IExtPackFile)

NS_DECL_CLASSINFO(ExtPack)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(ExtPack, IExtPack)

NS_DECL_CLASSINFO(ExtPackManager)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(ExtPackManager, IExtPackManager)

#endif

NS_DECL_CLASSINFO(BandwidthGroup)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(BandwidthGroup, IBandwidthGroup)

NS_DECL_CLASSINFO(BandwidthControl)

NS_IMPL_THREADSAFE_ISUPPORTS1_CI(BandwidthControl, IBandwidthControl)

static bool gAutoShutdown = false;

static uint32_t gShutdownDelayMs = 5000;

static nsIEventQueue *gEventQ = nsnull;

static PRBool volatile gKeepRunning = PR_TRUE;

static PRBool volatile gAllowSigUsrQuit = PR_TRUE;

class MyEvent

{

public:

MyEvent()

{

mEv.that = NULL;

};

/**

nsresult postTo(nsIEventQueue *aEventQ)

{

AssertReturn(mEv.that == NULL, NS_ERROR_FAILURE);

AssertReturn(aEventQ, NS_ERROR_FAILURE);

nsresult rv = aEventQ->InitEvent(&mEv.e, NULL,

eventHandler, eventDestructor);

if (NS_SUCCEEDED(rv))

{

mEv.that = this;

rv = aEventQ->PostEvent(&mEv.e);

if (NS_SUCCEEDED(rv))

return rv;

}

delete this;

return rv;

}

virtual void *handler() = 0;

private:

struct Ev

{

PLEvent e;

MyEvent *that;

} mEv;

static void *PR_CALLBACK eventHandler(PLEvent *self)

{

return reinterpret_cast<Ev *>(self)->that->handler();

}

static void PR_CALLBACK eventDestructor(PLEvent *self)

{

delete reinterpret_cast<Ev *>(self)->that;

}

};

class VirtualBoxClassFactory : public VirtualBox

{

public:

virtual ~VirtualBoxClassFactory()

{

LogFlowFunc(("Deleting VirtualBox...\n"));

FinalRelease();

sInstance = NULL;

LogFlowFunc(("VirtualBox object deleted.\n"));

RTPrintf("Informational: VirtualBox object deleted.\n");

}

NS_IMETHOD_(nsrefcnt) Release()

{

/* we overload Release() to guarantee the VirtualBox destructor is

nsrefcnt count = VirtualBox::Release();

if (count == 1)

{

/* the last reference held by clients is being released

PRBool onMainThread = PR_TRUE;

if (gEventQ)

gEventQ->IsOnCurrentThread(&onMainThread);

PRBool timerStarted = PR_FALSE;

/* sTimer is null if this call originates from FactoryDestructor()*/

if (sTimer != NULL)

{

LogFlowFunc(("Last VirtualBox instance was released.\n"));

LogFlowFunc(("Scheduling server shutdown in %u ms...\n",

gShutdownDelayMs));

/* make sure the previous timer (if any) is stopped;

RTTimerLRStop(sTimer);

int vrc = RTTimerLRStart(sTimer, gShutdownDelayMs * RT_NS_1MS_64);

AssertRC(vrc);

timerStarted = SUCCEEDED(vrc);

}

else

{

LogFlowFunc(("Last VirtualBox instance was released "

"on XPCOM shutdown.\n"));

Assert(onMainThread);

}

gAllowSigUsrQuit = PR_TRUE;

if (!timerStarted)

{

if (!onMainThread)

{

/* Failed to start the timer, post the shutdown event

ShutdownTimer(NULL, NULL, 0);

}

else

{

/* Here we come if:

Assert(gEventQ == NULL);

}

}

}

return count;

}

class MaybeQuitEvent : public MyEvent

{

/* called on the main thread */

void *handler()

{

LogFlowFuncEnter();

Assert(RTCritSectIsInitialized(&sLock));

/* stop accepting GetInstance() requests on other threads during

RTCritSectEnter(&sLock);

nsrefcnt count = 0;

/* sInstance is NULL here if it was deleted immediately after

if (sInstance != NULL)

{

/* Release the guard reference added in GetInstance() */

count = sInstance->Release();

}

if (count == 0)

{

if (gAutoShutdown)

{

Assert(sInstance == NULL);

LogFlowFunc(("Terminating the server process...\n"));

/* make it leave the event loop */

gKeepRunning = PR_FALSE;

}

else

LogFlowFunc(("No automatic shutdown.\n"));

}

else

{

/* This condition is quite rare: a new client happened to

LogFlowFunc(("Destruction is canceled (refcnt=%d).\n", count));

}

RTCritSectLeave(&sLock);

LogFlowFuncLeave();

return NULL;

}

};

static void ShutdownTimer(RTTIMERLR hTimerLR, void *pvUser, uint64_t /*iTick*/)

{

NOREF(hTimerLR);

NOREF(pvUser);

/* A "too late" event is theoretically possible if somebody

AssertReturnVoid(gEventQ);

/* post a quit event to the main queue */

MaybeQuitEvent *ev = new MaybeQuitEvent();

nsresult rv = ev->postTo(gEventQ);

NOREF(rv);

/* A failure above means we've been already stopped (for example

}

static NS_IMETHODIMP FactoryConstructor()

{

LogFlowFunc(("\n"));

/* create a critsect to protect object construction */

if (RT_FAILURE(RTCritSectInit(&sLock)))

return NS_ERROR_OUT_OF_MEMORY;

int vrc = RTTimerLRCreateEx(&sTimer, 0, 0, ShutdownTimer, NULL);

if (RT_FAILURE(vrc))

{

LogFlowFunc(("Failed to create a timer! (vrc=%Rrc)\n", vrc));

return NS_ERROR_FAILURE;

}

return NS_OK;

}

static NS_IMETHODIMP FactoryDestructor()

{

LogFlowFunc(("\n"));

RTTimerLRDestroy(sTimer);

sTimer = NULL;

RTCritSectDelete(&sLock);

if (sInstance != NULL)

{

/* Either posting a destruction event failed for some reason (most

sInstance->Release();

}

return NS_OK;

}

static nsresult GetInstance(VirtualBox **inst)

{

LogFlowFunc(("Getting VirtualBox object...\n"));

RTCritSectEnter(&sLock);

if (!gKeepRunning)

{

LogFlowFunc(("Process termination requested first. Refusing.\n"));

RTCritSectLeave(&sLock);

/* this rv is what CreateInstance() on the client side returns

return NS_ERROR_ABORT;

}

nsresult rv = NS_OK;

if (sInstance == NULL)

{

LogFlowFunc (("Creating new VirtualBox object...\n"));

sInstance = new VirtualBoxClassFactory();

if (sInstance != NULL)

{

/* make an extra AddRef to take the full control

sInstance->AddRef();

sInstance->AddRef(); /* protect FinalConstruct() */

rv = sInstance->FinalConstruct();

RTPrintf("Informational: VirtualBox object created (rc=%Rhrc).\n", rv);

if (NS_FAILED(rv))

{

/* On failure diring VirtualBox initialization, delete it

sInstance->Release();

sInstance->Release();

Assert(sInstance == NULL);

}

else

{

/* On success, make sure the previous timer is stopped to

gAllowSigUsrQuit = PR_FALSE;

RTTimerLRStop(sTimer);

}

}

else

{

rv = NS_ERROR_OUT_OF_MEMORY;

}

}

else

{

LogFlowFunc(("Using existing VirtualBox object...\n"));

nsrefcnt count = sInstance->AddRef();

Assert(count > 1);

if (count == 2)

{

LogFlowFunc(("Another client has requested a reference to VirtualBox, canceling destruction...\n"));

/* make sure the previous timer is stopped */

gAllowSigUsrQuit = PR_FALSE;

RTTimerLRStop(sTimer);

}

}

*inst = sInstance;

RTCritSectLeave(&sLock);

return rv;

}

private:

/* Don't be confused that sInstance is of the *ClassFactory type. This is

static VirtualBoxClassFactory *sInstance;

static RTCRITSECT sLock;

static RTTIMERLR sTimer;

};

VirtualBoxClassFactory *VirtualBoxClassFactory::sInstance = NULL;

RTCRITSECT VirtualBoxClassFactory::sLock;

RTTIMERLR VirtualBoxClassFactory::sTimer = NIL_RTTIMERLR;

NS_GENERIC_FACTORY_SINGLETON_CONSTRUCTOR_WITH_RC(VirtualBox, VirtualBoxClassFactory::GetInstance)

typedef NSFactoryDestructorProcPtr NSFactoryConstructorProcPtr;

struct nsModuleComponentInfoPlusFactoryConstructor

{

/** standard module component information */

const nsModuleComponentInfo *mpModuleComponentInfo;

/** (optional) Factory Construction Callback */

NSFactoryConstructorProcPtr mFactoryConstructor;

};

static nsresult

RegisterSelfComponents(nsIComponentRegistrar *registrar,

const nsModuleComponentInfoPlusFactoryConstructor *aComponents,

PRUint32 count)

{

nsresult rc = NS_OK;

const nsModuleComponentInfoPlusFactoryConstructor *info = aComponents;

for (PRUint32 i = 0; i < count && NS_SUCCEEDED(rc); i++, info++)

{

/* skip components w/o a constructor */

if (!info->mpModuleComponentInfo->mConstructor)

continue;

/* create a new generic factory for a component and register it */

nsIGenericFactory *factory;

rc = NS_NewGenericFactory(&factory, info->mpModuleComponentInfo);

if (NS_SUCCEEDED(rc) && info->mFactoryConstructor)

{

rc = info->mFactoryConstructor();

if (NS_FAILED(rc))

NS_RELEASE(factory);

}

if (NS_SUCCEEDED(rc))

{

rc = registrar->RegisterFactory(info->mpModuleComponentInfo->mCID,

info->mpModuleComponentInfo->mDescription,

info->mpModuleComponentInfo->mContractID,

factory);

NS_RELEASE(factory);

}

}

return rc;

}

static ipcIService *gIpcServ = nsnull;

static const char *g_pszPidFile = NULL;

class ForceQuitEvent : public MyEvent

{

void *handler()

{

LogFlowFunc(("\n"));

gKeepRunning = PR_FALSE;

if (g_pszPidFile)

RTFileDelete(g_pszPidFile);

return NULL;

}

};

static void signal_handler(int sig)

{

if (gEventQ && gKeepRunning)

{

if (sig == SIGUSR1)

{

if (gAllowSigUsrQuit)

{

VirtualBoxClassFactory::MaybeQuitEvent *ev = new VirtualBoxClassFactory::MaybeQuitEvent();

ev->postTo(gEventQ);

}

/* else do nothing */

}

else

{

/* post a force quit event to the queue */

ForceQuitEvent *ev = new ForceQuitEvent();

ev->postTo(gEventQ);

}

}

}

static nsresult vboxsvcSpawnDaemonByReExec(const char *pszPath, bool fAutoShutdown, const char *pszPidFile)

{

PRFileDesc *readable = nsnull, *writable = nsnull;

PRProcessAttr *attr = nsnull;

nsresult rv = NS_ERROR_FAILURE;

PRFileDesc *devNull;

unsigned args_index = 0;

// The ugly casts are necessary because the PR_CreateProcessDetached has

// a const array of writable strings as a parameter. It won't write. */

char * args[1 + 1 + 2 + 1];

args[args_index++] = (char *)pszPath;

if (fAutoShutdown)

args[args_index++] = (char *)"--auto-shutdown";

if (pszPidFile)

{

args[args_index++] = (char *)"--pidfile";

args[args_index++] = (char *)pszPidFile;

}

args[args_index++] = 0;

// Use a pipe to determine when the daemon process is in the position

// to actually process requests. The daemon will write "READY" to the pipe.

if (PR_CreatePipe(&readable, &writable) != PR_SUCCESS)

goto end;

PR_SetFDInheritable(writable, PR_TRUE);

attr = PR_NewProcessAttr();

if (!attr)

goto end;

if (PR_ProcessAttrSetInheritableFD(attr, writable, VBOXSVC_STARTUP_PIPE_NAME) != PR_SUCCESS)

goto end;

devNull = PR_Open("/dev/null", PR_RDWR, 0);

if (!devNull)

goto end;

PR_ProcessAttrSetStdioRedirect(attr, PR_StandardInput, devNull);

PR_ProcessAttrSetStdioRedirect(attr, PR_StandardOutput, devNull);

PR_ProcessAttrSetStdioRedirect(attr, PR_StandardError, devNull);

if (PR_CreateProcessDetached(pszPath, (char * const *)args, nsnull, attr) != PR_SUCCESS)

goto end;

// Close /dev/null

PR_Close(devNull);

// Close the child end of the pipe to make it the only owner of the

// file descriptor, so that unexpected closing can be detected.

PR_Close(writable);

writable = nsnull;

char msg[10];

memset(msg, '\0', sizeof(msg));

if ( PR_Read(readable, msg, sizeof(msg)-1) != 5

|| strcmp(msg, "READY"))

goto end;

rv = NS_OK;

end:

if (readable)

PR_Close(readable);

if (writable)

PR_Close(writable);

if (attr)

PR_DestroyProcessAttr(attr);

return rv;

}

int main(int argc, char **argv)

{

/*

int vrc = RTR3InitExe(argc, &argv, 0);

if (RT_FAILURE(vrc))

return RTMsgInitFailure(vrc);

static const RTGETOPTDEF s_aOptions[] =

{

{ "--automate", 'a', RTGETOPT_REQ_NOTHING },

{ "--auto-shutdown", 'A', RTGETOPT_REQ_NOTHING },

{ "--daemonize", 'd', RTGETOPT_REQ_NOTHING },

{ "--shutdown-delay", 'D', RTGETOPT_REQ_UINT32 },

{ "--pidfile", 'p', RTGETOPT_REQ_STRING },

{ "--logfile", 'F', RTGETOPT_REQ_STRING },

{ "--logrotate", 'R', RTGETOPT_REQ_UINT32 },

{ "--logsize", 'S', RTGETOPT_REQ_UINT64 },

{ "--loginterval", 'I', RTGETOPT_REQ_UINT32 }

};

const char *pszLogFile = NULL;

uint32_t cHistory = 10; // enable log rotation, 10 files

uint32_t uHistoryFileTime = RT_SEC_1DAY; // max 1 day per file

uint64_t uHistoryFileSize = 100 * _1M; // max 100MB per file

bool fDaemonize = false;

PRFileDesc *daemon_pipe_wr = nsnull;

RTGETOPTSTATE GetOptState;

vrc = RTGetOptInit(&GetOptState, argc, argv, &s_aOptions[0], RT_ELEMENTS(s_aOptions), 1, 0 /*fFlags*/);

AssertRC(vrc);

RTGETOPTUNION ValueUnion;

while ((vrc = RTGetOpt(&GetOptState, &ValueUnion)))

{

switch (vrc)

{

case 'a':

/* --automate mode means we are started by XPCOM on

gAutoShutdown = true;

fDaemonize = true;

break;

case 'A':

/* --auto-shutdown mode means we're already daemonized. */

gAutoShutdown = true;

break;

case 'd':

fDaemonize = true;

break;

case 'D':

gShutdownDelayMs = ValueUnion.u32;

break;

case 'p':

g_pszPidFile = ValueUnion.psz;

break;

case 'F':

pszLogFile = ValueUnion.psz;

break;

case 'R':

cHistory = ValueUnion.u32;

break;

case 'S':

uHistoryFileSize = ValueUnion.u64;

break;

case 'I':

uHistoryFileTime = ValueUnion.u32;

break;

case 'h':

RTPrintf("no help\n");

return 1;

case 'V':

RTPrintf("%sr%s\n", RTBldCfgVersion(), RTBldCfgRevisionStr());

return 0;

default:

return RTGetOptPrintError(vrc, &ValueUnion);

}

}

if (fDaemonize)

{

vboxsvcSpawnDaemonByReExec(argv[0], gAutoShutdown, g_pszPidFile);

exit(126);

}

nsresult rc;

if (!pszLogFile)

{

char szLogFile[RTPATH_MAX];

vrc = com::GetVBoxUserHomeDirectory(szLogFile, sizeof(szLogFile));

if (RT_SUCCESS(vrc))

vrc = RTPathAppend(szLogFile, sizeof(szLogFile), "VBoxSVC.log");

if (RT_SUCCESS(vrc))

pszLogFile = RTStrDup(szLogFile);

}

char szError[RTPATH_MAX + 128];

vrc = com::VBoxLogRelCreate("XPCOM Server", pszLogFile,

RTLOGFLAGS_PREFIX_THREAD | RTLOGFLAGS_PREFIX_TIME_PROG,

"all", "VBOXSVC_RELEASE_LOG",

RTLOGDEST_FILE, UINT32_MAX /* cMaxEntriesPerGroup */,

cHistory, uHistoryFileTime, uHistoryFileSize,

szError, sizeof(szError));

if (RT_FAILURE(vrc))

return RTMsgErrorExit(RTEXITCODE_FAILURE, "failed to open release log (%s, %Rrc)", szError, vrc);

daemon_pipe_wr = PR_GetInheritedFD(VBOXSVC_STARTUP_PIPE_NAME);

RTEnvUnset("NSPR_INHERIT_FDS");

const nsModuleComponentInfo VirtualBoxInfo = {

"VirtualBox component",

NS_VIRTUALBOX_CID,

NS_VIRTUALBOX_CONTRACTID,

VirtualBoxConstructor, // constructor function

NULL, // registration function

NULL, // deregistration function

VirtualBoxClassFactory::FactoryDestructor, // factory destructor function

NS_CI_INTERFACE_GETTER_NAME(VirtualBox),

NULL, // language helper

&NS_CLASSINFO_NAME(VirtualBox),

0 // flags

};

const nsModuleComponentInfoPlusFactoryConstructor components[] = {

{

&VirtualBoxInfo,

VirtualBoxClassFactory::FactoryConstructor // factory constructor function

}

};

do

{

rc = com::Initialize();

if (NS_FAILED(rc))

{

RTMsgError("Failed to initialize XPCOM! (rc=%Rhrc)\n", rc);

break;

}

nsCOMPtr <nsIComponentRegistrar> registrar;

rc = NS_GetComponentRegistrar(getter_AddRefs(registrar));

if (NS_FAILED(rc))

{

RTMsgError("Failed to get component registrar! (rc=%Rhrc)", rc);

break;

}

registrar->AutoRegister(nsnull);

rc = RegisterSelfComponents(registrar, components,

NS_ARRAY_LENGTH(components));

if (NS_FAILED(rc))

{

RTMsgError("Failed to register server components! (rc=%Rhrc)", rc);

break;

}

/* get the main thread's event queue (afaik, the dconnect service always

rc = NS_GetMainEventQ(&gEventQ);

if (NS_FAILED(rc))

{

RTMsgError("Failed to get the main event queue! (rc=%Rhrc)", rc);

break;

}

nsCOMPtr<ipcIService> ipcServ (do_GetService(IPC_SERVICE_CONTRACTID, &rc));

if (NS_FAILED(rc))

{

RTMsgError("Failed to get IPC service! (rc=%Rhrc)", rc);

break;

}

NS_ADDREF(gIpcServ = ipcServ);

LogFlowFunc(("Will use \"%s\" as server name.\n", VBOXSVC_IPC_NAME));

rc = gIpcServ->AddName(VBOXSVC_IPC_NAME);

if (NS_FAILED(rc))

{

LogFlowFunc(("Failed to register the server name (rc=%Rhrc (%08X))!\n"

"Is another server already running?\n", rc, rc));

RTMsgError("Failed to register the server name \"%s\" (rc=%Rhrc)!\n"

"Is another server already running?\n",

VBOXSVC_IPC_NAME, rc);

NS_RELEASE(gIpcServ);

break;

}

{

/* setup signal handling to convert some signals to a quit event */

struct sigaction sa;

sa.sa_handler = signal_handler;

sigemptyset(&sa.sa_mask);

sa.sa_flags = 0;

sigaction(SIGINT, &sa, NULL);

sigaction(SIGQUIT, &sa, NULL);

sigaction(SIGTERM, &sa, NULL);

sigaction(SIGTRAP, &sa, NULL);

sigaction(SIGUSR1, &sa, NULL);

}

{

char szBuf[80];

int iSize;

iSize = RTStrPrintf(szBuf, sizeof(szBuf),

VBOX_PRODUCT" XPCOM Server Version "

VBOX_VERSION_STRING);

for (int i = iSize; i > 0; i--)

putchar('*');

RTPrintf("\n%s\n", szBuf);

RTPrintf("(C) 2004-" VBOX_C_YEAR " " VBOX_VENDOR "\n"

"All rights reserved.\n");

#ifdef DEBUG

RTPrintf("Debug version.\n");

#endif

}

if (daemon_pipe_wr != nsnull)

{

RTPrintf("\nStarting event loop....\n[send TERM signal to quit]\n");

/* now we're ready, signal the parent process */

PR_Write(daemon_pipe_wr, "READY", strlen("READY"));

/* close writing end of the pipe, its job is done */

PR_Close(daemon_pipe_wr);

}

else

RTPrintf("\nStarting event loop....\n[press Ctrl-C to quit]\n");

if (g_pszPidFile)

{

RTFILE hPidFile = NIL_RTFILE;

vrc = RTFileOpen(&hPidFile, g_pszPidFile, RTFILE_O_WRITE | RTFILE_O_CREATE_REPLACE | RTFILE_O_DENY_NONE);

if (RT_SUCCESS(vrc))

{

char szBuf[32];

const char *lf = "\n";

RTStrFormatNumber(szBuf, getpid(), 10, 0, 0, 0);

RTFileWrite(hPidFile, szBuf, strlen(szBuf), NULL);

RTFileWrite(hPidFile, lf, strlen(lf), NULL);

RTFileClose(hPidFile);

}

}

// Increase the file table size to 10240 or as high as possible.

struct rlimit lim;

if (getrlimit(RLIMIT_NOFILE, &lim) == 0)

{

if ( lim.rlim_cur < 10240

&& lim.rlim_cur < lim.rlim_max)

{

lim.rlim_cur = RT_MIN(lim.rlim_max, 10240);

if (setrlimit(RLIMIT_NOFILE, &lim) == -1)

RTPrintf("WARNING: failed to increase file descriptor limit. (%d)\n", errno);

}

}

else

RTPrintf("WARNING: failed to obtain per-process file-descriptor limit (%d).\n", errno);

PLEvent *ev;

while (gKeepRunning)

{

gEventQ->WaitForEvent(&ev);

gEventQ->HandleEvent(ev);

}

/* stop accepting new events. Clients that happen to resolve our

gEventQ->StopAcceptingEvents();

/* unregister ourselves. After this point, clients will start a new

gIpcServ->RemoveName(VBOXSVC_IPC_NAME);

/* process any remaining events. These events may include

gEventQ->ProcessPendingEvents();

RTPrintf("Terminated event loop.\n");

}

while (0); // this scopes the nsCOMPtrs

NS_IF_RELEASE(gIpcServ);

NS_IF_RELEASE(gEventQ);

/* no nsCOMPtrs are allowed to be alive when you call com::Shutdown(). */

LogFlowFunc(("Calling com::Shutdown()...\n"));

rc = com::Shutdown();

LogFlowFunc(("Finished com::Shutdown() (rc=%Rhrc)\n", rc));

if (NS_FAILED(rc))

RTMsgError("Failed to shutdown XPCOM! (rc=%Rhrc)", rc);

RTPrintf("XPCOM server has shutdown.\n");

if (g_pszPidFile)

RTFileDelete(g_pszPidFile);

return 0;

}