/*
* Return the path to run the user's default browser. Caller must free the return string.
*/
static char *getBrowserPath(int size)
{
char cmd[MPR_MAX_STRING];
char *type, *cp, *path;
if (mprReadRegistry(mpr, &type, MPR_MAX_STRING, "HKEY_CLASSES_ROOT\\.htm", "") < 0) {
return 0;
}
mprSprintf(cmd, MPR_MAX_STRING, "HKEY_CLASSES_ROOT\\%s\\shell\\open\\command", type);
mprFree(type);
if (mprReadRegistry(mpr, &path, size, cmd, "") < 0) {
mprFree(cmd);
return 0;
}
for (cp = path; *cp; cp++) {
if (*cp == '\\') {
*cp = '/';
}
*cp = tolower(*cp);
}
mprLog(mpr, 4, "Browser path: %s\n", path);
return path;
}
static int getBrowserPath(char **path, int max)
{
mprAssert(path);
#if LINUX
if (access("/usr/bin/htmlview", X_OK) == 0) {
*path = mprStrdup("/usr/bin/htmlview");
return 0;
}
if (access("/usr/bin/mozilla", X_OK) == 0) {
*path = mprStrdup("/usr/bin/mozilla");
return 0;
}
if (access("/usr/bin/konqueror", X_OK) == 0) {
*path = mprStrdup("/usr/bin/knonqueror");
return 0;
}
return MPR_ERR_CANT_ACCESS;
#endif
#if WIN
char cmd[MPR_MAX_STRING];
char *type;
char *cp;
if (mprReadRegistry("HKEY_CLASSES_ROOT\\.htm", "", &type,
MPR_MAX_STRING) < 0) {
return MPR_ERR_CANT_ACCESS;
}
mprSprintf(cmd, MPR_MAX_STRING,
"HKEY_CLASSES_ROOT\\%s\\shell\\open\\command", type);
mprFree(type);
if (mprReadRegistry(cmd, "", path, max) < 0) {
mprFree(cmd);
return MPR_ERR_CANT_ACCESS;
}
for (cp = *path; *cp; cp++) {
if (*cp == '\\') {
*cp = '/';
}
*cp = tolower((uchar) *cp);
}
#endif
mprLog(4, "Browser path: %s\n", *path);
return 0;
}
/*
Return the path to run the user's default browser. Caller must free the return string.
*/
static char *getBrowserPath(int size)
{
char cmd[ME_MAX_BUFFER];
char *type, *cp, *path;
if ((type = mprReadRegistry("HKEY_CLASSES_ROOT\\.htm", "")) == 0) {
return 0;
}
fmt(cmd, ME_MAX_BUFFER, "HKEY_CLASSES_ROOT\\%s\\shell\\open\\command", type);
if ((path = mprReadRegistry(cmd, "")) == 0) {
return 0;
}
for (cp = path; *cp; cp++) {
if (*cp == '\\') {
*cp = '/';
}
*cp = tolower(*cp);
}
mprLog("appweb monitor", 4, "Browser path: %s\n", path);
return path;
}
static void WINAPI svcMainEntry(ulong argc, char **argv)
{
MprCmdLine *cmdLine;
char keyPath[80], *argBuf, *cp;
int threadId;
//
// Read the command line from the windows registry
//
argBuf = 0;
mprSprintf(keyPath, sizeof(keyPath),
"HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\%s",
APPWEB_SERVICE_NAME);
mprReadRegistry(keyPath, "ImagePath", &argBuf, MPR_MAX_STRING);
//
// The program name may be in quotes and may have spaces in it
//
if (argBuf[0] == '\"') {
if ((cp = strchr(&argBuf[1], '\"')) == 0) {
cp = argBuf;
} else {
cp++;
}
} else {
cp = argBuf;
}
while (isspace((uchar) *cp) || *cp == '\v') {
cp++;
}
cmdLine = new MprCmdLine(cp, cmdSpec);
serviceWaitEvent = CreateEvent(0, TRUE, FALSE, 0);
threadHandle = CreateThread(0, 0, (LPTHREAD_START_ROUTINE) svcThread,
(void*) cmdLine, 0, (ulong*) &threadId);
if (threadHandle == 0) {
// Should never happen, but try to keep going anyway.
realMain(cmdLine);
}
WaitForSingleObject(serviceWaitEvent, INFINITE);
CloseHandle(serviceWaitEvent);
delete cmdLine;
mprFree(argBuf);
}
static void run()
{
PROCESS_INFORMATION procInfo;
STARTUPINFO startInfo;
MprTime mark;
ulong status;
char *path, *cmd, *key;
int createFlags;
createFlags = 0;
#if USEFUL_FOR_DEBUG
/*
This is useful to debug manager as a windows service.
*/
DebugBreak();
#endif
/*
Read the service home directory and args. Default to the current dir if none specified.
*/
key = sfmt("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\%s", app->serviceName);
app->serviceHome = mprReadRegistry(key, "HomeDir");
app->serviceArgs = mprReadRegistry(key, "Args");
/*
Expect to find the service executable in the same directory as this manager program.
*/
if (app->serviceProgram == 0) {
path = sfmt("\"%s\\%s.exe\"", mprGetAppDir(), BLD_PRODUCT);
} else {
path = sfmt("\"%s\"", app->serviceProgram);
}
if (app->serviceArgs && *app->serviceArgs) {
cmd = sfmt("%s %s", path, app->serviceArgs);
} else {
cmd = path;
}
if (app->createConsole) {
createFlags |= CREATE_NEW_CONSOLE;
}
mark = mprGetTime();
while (! app->exiting) {
if (mprGetElapsedTime(mark) > (3600 * 1000)) {
mark = mprGetTime();
app->restartCount = 0;
app->restartWarned = 0;
}
if (app->servicePid == 0 && !app->serviceStopped) {
if (app->restartCount >= RESTART_MAX) {
if (! app->restartWarned) {
mprError("Too many restarts for %s, %d in ths last hour", app->appTitle, app->restartCount);
app->restartWarned++;
}
/*
This is not a real heart-beat. We are only waiting till the service process exits.
*/
WaitForSingleObject(app->heartBeatEvent, app->heartBeatPeriod);
continue;
}
memset(&startInfo, 0, sizeof(startInfo));
startInfo.cb = sizeof(startInfo);
/*
Launch the process
*/
if (! CreateProcess(0, cmd, 0, 0, FALSE, createFlags, 0, app->serviceHome, &startInfo, &procInfo)) {
mprError("Can't create process: %s, %d", cmd, mprGetOsError());
} else {
app->servicePid = (int) procInfo.hProcess;
}
app->restartCount++;
}
WaitForSingleObject(app->heartBeatEvent, app->heartBeatPeriod);
if (app->servicePid) {
if (GetExitCodeProcess((HANDLE) app->servicePid, (ulong*) &status)) {
if (status != STILL_ACTIVE) {
CloseHandle((HANDLE) app->servicePid);
app->servicePid = 0;
}
} else {
CloseHandle((HANDLE) app->servicePid);
app->servicePid = 0;
}
}
mprLog(1, "%s has exited with status %d", app->serviceProgram, status);
mprLog(1, "%s will be restarted in 10 seconds", app->serviceProgram);
}
}
static void angel()
{
PROCESS_INFORMATION procInfo;
STARTUPINFO startInfo;
MprTime mark;
ulong status;
char *dir, *homeDir, *serviceArgs;
char key[MPR_MAX_FNAME], path[MPR_MAX_FNAME], cmd[MPR_MAX_FNAME];
int createFlags, restartWarned;
servicePid = 0;
createFlags = 0;
restartWarned = 0;
#if USEFUL_FOR_DEBUG
DebugBreak();
#endif
/*
* Read the service home directory and args. Default to the current dir if none specified.
*/
homeDir = 0;
serviceArgs = 0;
mprSprintf(key, sizeof(key), "HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\%s", serviceName);
mprReadRegistry(mpr, &homeDir, MPR_MAX_FNAME, key, "HomeDir");
mprReadRegistry(mpr, &serviceArgs, MPR_MAX_FNAME, key, "Args");
/*
* Expect to find the service executable in the same directory as this angel program.
*/
if (serviceProgram == 0) {
GetModuleFileName(0, path, sizeof(path));
dir = mprGetPathDir(mpr, path);
mprSprintf(path, sizeof(path), "\"%s\\%s.exe\"", dir, BLD_PRODUCT);
mprFree(dir);
} else {
mprSprintf(path, sizeof(path), "\"%s\"", serviceProgram);
}
if (serviceArgs && *serviceArgs) {
mprSprintf(cmd, sizeof(cmd), "%s %s", path, serviceArgs);
} else {
mprSprintf(cmd, sizeof(cmd), "%s", path);
}
if (createConsole) {
createFlags |= CREATE_NEW_CONSOLE;
}
mark = mprGetTime(mpr);
while (! exiting) {
if (mprGetElapsedTime(mpr, mark) > (3600 * 1000)) {
mark = mprGetTime(mpr);
restartCount = 0;
restartWarned = 0;
}
if (servicePid == 0 && !serviceStopped) {
if (restartCount >= RESTART_MAX) {
if (! restartWarned) {
mprError(mpr, "Too many restarts for %s, %d in ths last hour", appTitle, restartCount);
restartWarned++;
}
/*
* This is not a real heart-beat. We are only waiting till the service process exits.
*/
WaitForSingleObject(heartBeatEvent, heartBeatPeriod);
continue;
}
memset(&startInfo, 0, sizeof(startInfo));
startInfo.cb = sizeof(startInfo);
/*
* Launch the process
*/
if (! CreateProcess(0, cmd, 0, 0, FALSE, createFlags, 0, homeDir, &startInfo, &procInfo)) {
mprError(mpr, "Can't create process: %s, %d", cmd, mprGetOsError());
} else {
servicePid = (int) procInfo.hProcess;
}
restartCount++;
}
WaitForSingleObject(heartBeatEvent, heartBeatPeriod);
if (servicePid) {
if (GetExitCodeProcess((HANDLE) servicePid, (ulong*) &status)) {
if (status != STILL_ACTIVE) {
CloseHandle((HANDLE) servicePid);
servicePid = 0;
}
} else {
CloseHandle((HANDLE) servicePid);
servicePid = 0;
}
}
if (verbose) {
mprPrintf(mpr, "%s has exited with status %d\n", serviceProgram, status);
mprPrintf(mpr, "%s will be restarted in 10 seconds\n", serviceProgram);
}
}
mprFree(homeDir);
mprFree(serviceArgs);
}
/*
Tokens:
ARCH Build architecture (x86_64)
CC Compiler (cc)
DEBUG Debug compilation options (-g, -Zi -Od)
INC Include directory out/inc
LIB Library directory (out/lib, xcode/VS: out/bin)
LIBS Libraries required to link with ESP
OBJ Name of compiled source (out/lib/view-MD5.o)
OUT Output module (view_MD5.dylib)
SHLIB Host Shared library (.lib, .so)
SHOBJ Host Shared Object (.dll, .so)
SRC Source code for view or controller (already templated)
TMP Temp directory
VS Visual Studio directory
WINSDK Windows SDK directory
*/
char *espExpandCommand(cchar *command, cchar *source, cchar *module)
{
MprBuf *buf;
MaAppweb *appweb;
cchar *cp, *out;
char *tmp;
#if BLD_WIN_LIKE
cchar *path;
path = 0;
#endif
if (command == 0) {
return 0;
}
out = mprTrimPathExt(module);
buf = mprCreateBuf(-1, -1);
appweb = MPR->appwebService;
for (cp = command; *cp; ) {
if (*cp == '$') {
if (matchToken(&cp, "${ARCH}")) {
/* Build architecture */
mprPutStringToBuf(buf, appweb->hostArch);
#if BLD_WIN_LIKE
} else if (matchToken(&cp, "${WINSDK}")) {
path = mprReadRegistry("HKLM\\SOFTWARE\\Microsoft\\Microsoft SDKs\\Windows", "CurrentInstallFolder");
path = strim(path, "\\", MPR_TRIM_END);
mprPutStringToBuf(buf, path);
} else if (matchToken(&cp, "${VS}")) {
path = mprGetPathParent(mprGetPathParent(getenv("VS100COMNTOOLS")));
mprPutStringToBuf(buf, mprGetPortablePath(path));
#endif
} else if (matchToken(&cp, "${CC}")) {
/* Compiler */
#if BLD_WIN_LIKE
// MOB - what about cross compilation
path = mprJoinPath(mprGetPathParent(mprGetPathParent(getenv("VS100COMNTOOLS"))), "VC/bin/cl.exe");
mprPutStringToBuf(buf, mprGetPortablePath(path));
#else
mprPutStringToBuf(buf, BLD_CC);
#endif
} else if (matchToken(&cp, "${DEBUG}")) {
mprPutStringToBuf(buf, ESP_DEBUG);
} else if (matchToken(&cp, "${INC}")) {
/* Include directory (out/inc) */
mprPutStringToBuf(buf, mprResolvePath(mprGetAppDir(), "inc"));
} else if (matchToken(&cp, "${LIB}")) {
/* Library directory. IDE's use bin dir */
mprPutStringToBuf(buf, getOutDir(BLD_LIB_NAME));
} else if (matchToken(&cp, "${LIBS}")) {
/* Required libraries to link. These may have nested ${TOKENS} */
mprPutStringToBuf(buf, espExpandCommand(ESP_LIBS, source, module));
} else if (matchToken(&cp, "${OBJ}")) {
/* Output object with extension (.o) */
mprPutStringToBuf(buf, mprJoinPathExt(out, BLD_OBJ));
} else if (matchToken(&cp, "${OUT}")) {
/* Output modules */
mprPutStringToBuf(buf, out);
} else if (matchToken(&cp, "${SHLIB}")) {
/* .lib */
mprPutStringToBuf(buf, appweb->hostOs);
} else if (matchToken(&cp, "${SHOBJ}")) {
/* .dll */
#ifdef BLD_HOST_SHOBJ
// MOB - need this for bit
mprPutStringToBuf(buf, BLD_HOST_SHOBJ);
#else
mprPutStringToBuf(buf, BLD_SHOBJ);
#endif
} else if (matchToken(&cp, "${SRC}")) {
/* View (already parsed into C code) or controller source */
mprPutStringToBuf(buf, source);
} else if (matchToken(&cp, "${TMP}")) {
#if BLD_WIN_LIKE
if ((tmp = getenv("TMP")) == 0) {
tmp = getenv("TEMP");
}
#else
tmp = getenv("TMPDIR");
#endif
mprPutStringToBuf(buf, tmp ? tmp : ".");
#ifdef WIND_BASE
} else if (matchToken(&cp, "${WIND_BASE}")) {
mprPutStringToBuf(buf, WIND_BASE);
#endif
#ifdef WIND_HOME
} else if (matchToken(&cp, "${WIND_HOME}")) {
mprPutStringToBuf(buf, WIND_HOME);
#endif
#ifdef WIND_HOST_TYPE
} else if (matchToken(&cp, "${WIND_HOST_TYPE}")) {
mprPutStringToBuf(buf, WIND_HOST_TYPE);
#endif
#ifdef WIND_PLATFORM
} else if (matchToken(&cp, "${WIND_PLATFORM}")) {
mprPutStringToBuf(buf, WIND_PLATFORM);
#endif
#ifdef WIND_GNU_PATH
} else if (matchToken(&cp, "${WIND_GNU_PATH}")) {
mprPutStringToBuf(buf, WIND_GNU_PATH);
#endif
} else {
mprPutCharToBuf(buf, *cp++);
}
} else {
mprPutCharToBuf(buf, *cp++);
}
}
mprAddNullToBuf(buf);
return sclone(mprGetBufStart(buf));
}
