RetroZilla/xpfe/bootstrap/nsNativeAppSupportOS2.cpp
2015-10-20 23:03:22 -04:00

2550 lines
86 KiB
C++

/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*-
* ***** BEGIN LICENSE BLOCK *****
* Version: MPL 1.1/GPL 2.0/LGPL 2.1
*
* The contents of this file are subject to the Mozilla Public License Version
* 1.1 (the "License"); you may not use this file except in compliance with
* the License. You may obtain a copy of the License at
* http://www.mozilla.org/MPL/
*
* Software distributed under the License is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
* for the specific language governing rights and limitations under the
* License.
*
* The Original Code is Mozilla Communicator client code.
*
* The Initial Developer of the Original Code is
* Netscape Communications Corporation.
* Portions created by the Initial Developer are Copyright (C) 1998
* the Initial Developer. All Rights Reserved.
*
* Contributor(s):
* Bill Law law@netscape.com
* IBM Corp.
* Rich Walsh dragtext@e-vertise.com
*
* Alternatively, the contents of this file may be used under the terms of
* either of the GNU General Public License Version 2 or later (the "GPL"),
* or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
* in which case the provisions of the GPL or the LGPL are applicable instead
* of those above. If you wish to allow use of your version of this file only
* under the terms of either the GPL or the LGPL, and not to allow others to
* use your version of this file under the terms of the MPL, indicate your
* decision by deleting the provisions above and replace them with the notice
* and other provisions required by the GPL or the LGPL. If you do not delete
* the provisions above, a recipient may use your version of this file under
* the terms of any one of the MPL, the GPL or the LGPL.
*
* ***** END LICENSE BLOCK ***** */
#define INCL_PM
#define INCL_GPI
#define INCL_DOS
#define INCL_DOSERRORS
#include <os2.h>
#include "nsStringSupport.h"
#include "nsNativeAppSupportBase.h"
#include "nsNativeAppSupportOS2.h"
#include "nsICmdLineService.h"
#include "nsCOMPtr.h"
#include "nsIComponentManager.h"
#include "nsComponentManagerUtils.h"
#include "nsIServiceManager.h"
#include "nsServiceManagerUtils.h"
#include "nsICmdLineHandler.h"
#include "nsIDOMWindow.h"
#include "nsXPCOM.h"
#include "nsISupportsPrimitives.h"
#include "nsISupportsArray.h"
#include "nsIWindowWatcher.h"
#include "nsIDOMWindowInternal.h"
#include "nsIDOMChromeWindow.h"
#include "nsIBrowserDOMWindow.h"
#include "nsIScriptGlobalObject.h"
#include "nsIDocShell.h"
#include "nsIBaseWindow.h"
#include "nsIWidget.h"
#include "nsIAppShellService.h"
#include "nsIAppStartup.h"
#include "nsIProfileInternal.h"
#include "nsIXULWindow.h"
#include "nsIInterfaceRequestor.h"
#include "nsIInterfaceRequestorUtils.h"
#include "nsIPrefBranch.h"
#include "nsIPrefService.h"
#include "nsIPromptService.h"
#include "nsNetCID.h"
#include "nsIIOService.h"
#include "nsIURI.h"
#include "nsIObserverService.h"
#include "nsXPFEComponentsCID.h"
// These are needed to load a URL in a browser window.
#include "nsIDOMLocation.h"
#include "nsIJSContextStack.h"
#include "nsIWindowMediator.h"
#include "nsPaletteOS2.h"
#include <sys/stat.h>
#include <stdlib.h>
#include <ctype.h>
#include "prprf.h"
// getting from nsAppRunner. Use to help track down arguments.
extern char **__argv;
extern int *__pargc;
/* trying to keep this like Window's COPYDATASTRUCT, but a compiler error is
* forcing me to add chBuff so that we can append the data to the end of the
* structure
*/
typedef struct _COPYDATASTRUCT
{
ULONG dwData;
ULONG cbData;
PVOID lpData;
CHAR chBuff;
}COPYDATASTRUCT, *PCOPYDATASTRUCT;
#define WM_COPYDATA (WM_USER + 60)
char szCommandLine[2*CCHMAXPATH];
static HWND hwndForDOMWindow( nsISupports * );
static
nsresult
GetMostRecentWindow(const PRUnichar* aType, nsIDOMWindowInternal** aWindow) {
nsresult rv;
nsCOMPtr<nsIWindowMediator> med( do_GetService( NS_WINDOWMEDIATOR_CONTRACTID, &rv ) );
if ( NS_FAILED( rv ) )
return rv;
if ( med )
return med->GetMostRecentWindow( aType, aWindow );
return NS_ERROR_FAILURE;
}
static
void
activateWindow( nsIDOMWindowInternal *win ) {
// Try to get native window handle.
HWND hwnd = hwndForDOMWindow( win );
if ( hwnd ) {
/* if we are looking at a client window, then we really probably want
* the frame so that we can manipulate THAT
*/
LONG id = WinQueryWindowUShort( hwnd, QWS_ID );
if( id == FID_CLIENT )
{
hwnd = WinQueryWindow( hwnd, QW_PARENT );
}
// Restore the window in case it is minimized.
// Use the OS call, if possible.
WinSetWindowPos( hwnd, 0L, 0L, 0L, 0L, 0L,
SWP_SHOW | SWP_RESTORE | SWP_ACTIVATE );
} else {
// Use internal method.
win->Focus();
}
}
// Define this macro to 1 to get DDE debugging output.
#define MOZ_DEBUG_DDE 0
#ifdef DEBUG_law
#undef MOZ_DEBUG_DDE
#define MOZ_DEBUG_DDE 1
#endif
class nsSplashScreenOS2 : public nsISplashScreen {
public:
nsSplashScreenOS2();
~nsSplashScreenOS2();
NS_IMETHOD Show();
NS_IMETHOD Hide();
// nsISupports methods
NS_IMETHOD_(nsrefcnt) AddRef() {
mRefCnt++;
return mRefCnt;
}
NS_IMETHOD_(nsrefcnt) Release() {
--mRefCnt;
if ( !mRefCnt ) {
delete this;
return 0;
}
return mRefCnt;
}
NS_IMETHOD QueryInterface( const nsIID &iid, void**p ) {
nsresult rv = NS_OK;
if ( p ) {
*p = 0;
if ( iid.Equals( NS_GET_IID( nsISplashScreen ) ) ) {
nsISplashScreen *result = this;
*p = result;
NS_ADDREF( result );
} else if ( iid.Equals( NS_GET_IID( nsISupports ) ) ) {
nsISupports *result = NS_STATIC_CAST( nsISupports*, this );
*p = result;
NS_ADDREF( result );
} else {
rv = NS_NOINTERFACE;
}
} else {
rv = NS_ERROR_NULL_POINTER;
}
return rv;
}
void SetDialog( HWND dlg );
void LoadBitmap();
static nsSplashScreenOS2* GetPointer( HWND dlg );
HWND mDlg;
HBITMAP mBitmap;
nsrefcnt mRefCnt;
HDC hdcMemory;
HPS hpsMemory;
LONG mBitmapCX;
LONG mBitmapCY;
}; // class nsSplashScreenOS2
MRESULT EXPENTRY DialogProc( HWND dlg, ULONG msg, MPARAM mp1, MPARAM mp2 );
void ThreadProc (void *splashScreen);
// Simple Win32 mutex wrapper.
struct Mutex {
Mutex( const char *name )
: mName( name ),
mHandle( 0 ),
mState( 0xFFFF ) {
/* OS/2 named semaphores must begin with "\\SEM32\\" to be valid */
mName.Insert("\\SEM32\\", 0);
APIRET rc = DosCreateMutexSem(mName.get(), &mHandle, 0, FALSE);
if (rc != NO_ERROR) {
#if MOZ_DEBUG_DDE
printf( "CreateMutex error = 0x%08X\n", (int)rc );
#endif
}
}
~Mutex() {
if ( mHandle ) {
// Make sure we release it if we own it.
Unlock();
APIRET rc = DosCloseMutexSem(mHandle);
if (rc != NO_ERROR) {
#if MOZ_DEBUG_DDE
printf( "CloseHandle error = 0x%08X\n", (int)rc );
#endif
}
}
}
BOOL Lock( DWORD timeout ) {
if ( mHandle ) {
#if MOZ_DEBUG_DDE
printf( "Waiting (%d msec) for DDE mutex...\n", (int)timeout );
#endif
mState = DosRequestMutexSem( mHandle, timeout );
#if MOZ_DEBUG_DDE
printf( "...wait complete, result = 0x%08X\n", (int)mState );
#endif
return (mState == NO_ERROR);
} else {
return FALSE;
}
}
void Unlock() {
if ( mHandle && mState == NO_ERROR ) {
#if MOZ_DEBUG_DDE
printf( "Releasing DDE mutex\n" );
#endif
DosReleaseMutexSem( mHandle );
mState = 0xFFFF;
}
}
private:
nsCString mName;
HMTX mHandle;
DWORD mState;
};
/* DDE Notes
*
* This section describes the Win32 DDE service implementation for
* SeaMonkey. DDE is used on Win32 platforms to communicate between
* separate instances of seamonkey.exe (or other Mozilla-based
* executables), or, between the Win32 desktop shell and SeaMonkey.
*
* The first instance of SeaMonkey will become the "server" and
* subsequent executables (and the shell) will use DDE to send
* requests to that process. The requests are DDE "execute" requests
* that pass the command line arguments.
*
* SeaMonkey registers the DDE application "Mozilla" and currently
* supports only the "WWW_OpenURL" topic. This should be reasonably
* compatible with applications that interfaced with Netscape
* Communicator (and its predecessors?). Note that even that topic
* may not be supported in a compatible fashion as the command-line
* options for SeaMonkey are different than for Communiator.
*
* It is imperative that at most one instance of SeaMonkey execute in
* "server mode" at any one time. The "native app support" in SeaMonkey
* on Win32 ensures that only the server process performs XPCOM
* initialization (that is not required for subsequent client processes
* to communicate with the server process).
*
* To guarantee that only one server starts up, a Win32 "mutex" is used
* to ensure only one process executes the server-detection code. That
* code consists of initializing DDE and doing a DdeConnect to SeaMonkey's
* application/topic. If that connection succeeds, then a server process
* must be running already.
*
* Otherwise, no server has started. In that case, the current process
* calls DdeNameService to register that application/topic. Only at that
* point does the mutex get released.
*
* There are a couple of subtleties that one should be aware of:
*
* 1. It is imperative that DdeInitialize be called only after the mutex
* lock has been obtained. The reason is that at shutdown, DDE
* notifications go out to all initialized DDE processes. Thus, if
* the mutex is owned by a terminating intance of SeaMonkey, then
* calling DdeInitialize and then WaitForSingleObject will cause the
* DdeUninitialize from the terminating process to "hang" until the
* process waiting for the mutex times out (and can then service the
* notification that the DDE server is terminating). So, don't mess
* with the sequence of things in the startup/shutdown logic.
*
* 2. All mutex requests are made with a reasonably long timeout value and
* are designed to "fail safe" (i.e., a timeout is treated as failure).
*
* 3. An attempt has been made to minimize the degree to which the main
* SeaMonkey application logic needs to be aware of the DDE mechanisms
* implemented herein. As a result, this module surfaces a very
* large-grained interface, consisting of simple start/stop methods.
* As a consequence, details of certain scenarios can be "lost."
* Particularly, incoming DDE requests can arrive after this module
* initiates the DDE server, but before SeaMonkey is initialized to the
* point where those requests can be serviced (e.g., open a browser
* window to a particular URL). Since the client process sends the
* request early on, it may not be prepared to respond to that error.
* Thus, such situations may fail silently. The design goal is that
* they fail harmlessly. Refinements on this point will be made as
* details emerge (and time permits).
*/
/* Update 2001 March
*
* A significant DDE bug in Windows is causing SeaMonkey to get wedged at
* startup. This is detailed in Bugzilla bug 53952
* (http://bugzilla.mozilla.org/show_bug.cgi?id=53952).
*
* To resolve this, we are using a new strategy:
* o Use a "message window" to detect that SeaMonkey is already running and
* to pass requests from a second instance back to the first;
* o Run only as a "DDE server" (not as DDE client); this avoids the
* problematic call to DDEConnect().
*
* We still use the mutex semaphore to protect the code that detects
* whether SeaMonkey is already running.
*/
class nsNativeAppSupportOS2 : public nsNativeAppSupportBase
{
public:
// Overrides of base implementation.
NS_IMETHOD Start( PRBool *aResult );
NS_IMETHOD Stop( PRBool *aResult );
NS_IMETHOD Quit();
NS_IMETHOD StartServerMode();
NS_IMETHOD OnLastWindowClosing();
NS_IMETHOD SetIsServerMode( PRBool isServerMode );
NS_IMETHOD EnsureProfile(nsICmdLineService* args);
// The "old" Start method (renamed).
NS_IMETHOD StartDDE();
// Utility function to handle a Win32-specific command line
// option: "-console", which dynamically creates a Windows
// console.
// On OS/2, we use the return from CheckConsole to determine
// whether or not to use the OS/2 specific turbo mode
PRBool CheckConsole();
private:
static HDDEDATA APIENTRY HandleDDENotification( ULONG idInst,
USHORT uType,
USHORT uFmt,
HCONV hconv,
HSZ hsz1,
HSZ hsz2,
HDDEDATA hdata,
ULONG dwData1,
ULONG dwData2 );
static nsresult HandleRequest( LPBYTE request, PRBool newWindow, nsIDOMWindow **aResult );
static void ParseDDEArg( HSZ args, int index, nsCString& string);
static void ParseDDEArg( const char* args, int index, nsCString& aString);
static void ActivateLastWindow();
static HDDEDATA CreateDDEData( DWORD value );
static HDDEDATA CreateDDEData( LPBYTE value, DWORD len );
static PRBool InitTopicStrings();
static int FindTopic( HSZ topic );
static nsresult GetCmdLineArgs( LPBYTE request, nsICmdLineService **aResult );
static nsresult OpenWindow( const char *urlstr, const char *args, nsIDOMWindow **aResult );
static nsresult OpenBrowserWindow( const char *args, PRBool newWindow, nsIDOMWindow **aResult );
static nsresult ReParent( nsISupports *window, HWND newParent );
static nsresult GetStartupURL(nsICmdLineService *args, nsCString& taskURL);
static int mConversations;
enum {
topicOpenURL,
topicActivate,
topicCancelProgress,
topicVersion,
topicRegisterViewer,
topicUnRegisterViewer,
topicGetWindowInfo,
// Note: Insert new values above this line!!!!!
topicCount // Count of the number of real topics
};
static HSZ mApplication, mTopics[ topicCount ];
static DWORD mInstance;
static char *mAppName;
static PRBool mInitialWindowActive;
static PRBool mForceProfileStartup;
static char mMutexName[];
static PRBool mUseDDE;
friend struct MessageWindow;
}; // nsNativeAppSupportOS2
nsSplashScreenOS2::nsSplashScreenOS2()
: mDlg( 0 ), mBitmap( 0 ), mRefCnt( 0 ),
hdcMemory( 0 ), hpsMemory( 0 ), mBitmapCX(0), mBitmapCY(0) {
}
nsSplashScreenOS2::~nsSplashScreenOS2() {
#if MOZ_DEBUG_DDE
printf( "splash screen dtor called\n" );
#endif
// Make sure dialog is gone.
Hide();
}
NS_IMETHODIMP
nsSplashScreenOS2::Show() {
//Spawn new thread to display real splash screen.
_beginthread( ThreadProc, NULL, 16384, (void *)this );
return NS_OK;
}
NS_IMETHODIMP
nsSplashScreenOS2::Hide() {
if ( mDlg ) {
// Dismiss the dialog.
WinPostMsg(mDlg, WM_CLOSE, 0, 0);
mDlg = 0;
GpiSetBitmap(hpsMemory, NULLHANDLE);
if (mBitmap) {
GpiDeleteBitmap(mBitmap);
mBitmap = 0;
}
if (hdcMemory) {
DevCloseDC(hdcMemory);
hdcMemory = 0;
}
if (hpsMemory) {
GpiDestroyPS(hpsMemory);
hpsMemory = 0;
}
}
return NS_OK;
}
HBITMAP LoadAndSetBitmapFromFile(HPS hps, PSZ pszFilename)
{
FILE *fp = fopen(pszFilename, "rb");
if (fp == NULL) {
return NULLHANDLE;
}
fseek(fp, 0, SEEK_END );
ULONG cbFile = ftell(fp);
if (cbFile ==0) {
fclose(fp);
return NULLHANDLE;
}
fseek(fp, 0, SEEK_SET );
PBYTE pBitmapData = (PBYTE)malloc(cbFile);
fread((PVOID)pBitmapData, cbFile, 1, fp);
fclose(fp);
PBITMAPFILEHEADER2 pbfh2 = (PBITMAPFILEHEADER2)pBitmapData;
PBITMAPINFOHEADER2 pbmp2 = NULL;
switch (pbfh2->usType)
{
case BFT_BITMAPARRAY:
/*
* If this is a Bitmap-Array, adjust pointer to the normal
* file header. We'll just use the first bitmap in the
* array and ignore other device forms.
*/
pbfh2 = &(((PBITMAPARRAYFILEHEADER2) pBitmapData)->bfh2);
pbmp2 = &pbfh2->bmp2;
break;
case BFT_BMAP:
pbmp2 = &pbfh2->bmp2;
break;
case BFT_ICON:
case BFT_POINTER:
case BFT_COLORICON:
case BFT_COLORPOINTER:
default:
break;
}
if (pbmp2 == NULL) {
free(pBitmapData);
return NULLHANDLE;
}
LONG lScans;
if (pbmp2->cbFix == sizeof(BITMAPINFOHEADER))
lScans = (LONG) ((PBITMAPINFOHEADER)pbmp2)->cy;
else
lScans = pbmp2->cy;
HBITMAP hbmp = GpiCreateBitmap(hps, pbmp2, 0L, NULL, NULL);
if (!hbmp) {
free(pBitmapData);
return NULLHANDLE;
}
if (GpiSetBitmap(hps, hbmp) == HBM_ERROR) {
GpiDeleteBitmap(hbmp);
free(pBitmapData);
return NULLHANDLE;
}
LONG lScansSet = GpiSetBitmapBits(hps, 0L, lScans, pBitmapData + pbfh2->offBits,
(PBITMAPINFO2) pbmp2);
free(pBitmapData);
if (lScansSet != lScans) {
GpiSetBitmap(hps, NULLHANDLE);
GpiDeleteBitmap(hbmp);
return NULLHANDLE;
}
return hbmp;
}
void
nsSplashScreenOS2::LoadBitmap() {
hdcMemory = DevOpenDC((HAB)0, OD_MEMORY, "*", 0L, NULL, 0L);
SIZEL sizel = {0, 0};
hpsMemory = GpiCreatePS((HAB)0, hdcMemory, &sizel,
PU_PELS | GPIF_DEFAULT | GPIT_MICRO | GPIA_ASSOC );
// Check for '<program-name>.bmp" in same directory as executable.
PPIB ppib;
PTIB ptib;
char fileName[CCHMAXPATH];
DosGetInfoBlocks( &ptib, &ppib);
DosQueryModuleName( ppib->pib_hmte, CCHMAXPATH, fileName);
int fileNameLen = strlen(fileName);
if (fileNameLen >=3) {
fileName[ fileNameLen - 3 ] = 0;
strcat( fileName, "bmp" );
// Try to load bitmap from that file.
mBitmap = LoadAndSetBitmapFromFile(hpsMemory, fileName);
}
if (!mBitmap) {
mBitmap = GpiLoadBitmap(hpsMemory, NULL, IDB_SPLASH, 0L, 0L);
GpiSetBitmap(hpsMemory, mBitmap);
}
BITMAPINFOHEADER bitmap;
bitmap.cbFix = sizeof(BITMAPINFOHEADER);
GpiQueryBitmapParameters(mBitmap, &bitmap);
mBitmapCX = bitmap.cx;
mBitmapCY = bitmap.cy;
}
MRESULT EXPENTRY DialogProc( HWND dlg, ULONG msg, MPARAM mp1, MPARAM mp2 ) {
if ( msg == WM_INITDLG ) {
// Store dialog handle.
nsSplashScreenOS2 *splashScreen = (nsSplashScreenOS2*)mp2;
if ( mp2 ) {
splashScreen->SetDialog( dlg );
// Try to load customized bitmap.
splashScreen->LoadBitmap();
}
/* Size and center the splash screen correctly. The flags in the
* dialog template do not do the right thing if the user's
* machine is using large fonts.
*/
HBITMAP hbitmap = splashScreen->mBitmap;
if ( hbitmap ) {
WinSetWindowPos( dlg,
HWND_TOP,
WinQuerySysValue( HWND_DESKTOP, SV_CXSCREEN )/2 - splashScreen->mBitmapCX/2,
WinQuerySysValue( HWND_DESKTOP, SV_CYSCREEN )/2 - splashScreen->mBitmapCY/2,
splashScreen->mBitmapCX,
splashScreen->mBitmapCY,
SWP_ACTIVATE | SWP_MOVE | SWP_SIZE );
WinShowWindow( dlg, TRUE );
}
return (MRESULT)FALSE;
}
else if ( msg == WM_PAINT ) {
nsSplashScreenOS2 *splashScreen = (nsSplashScreenOS2*)WinQueryWindowPtr( dlg, QWL_USER );
HPS hps = WinBeginPaint (dlg, NULLHANDLE, NULL);
#if 0
nsPaletteOS2::SelectGlobalPalette(hps, dlg);
#endif
GpiErase (hps);
POINTL aptl[8] = {{0, 0}, {splashScreen->mBitmapCX, splashScreen->mBitmapCY},
{0, 0}, {0, 0},
{0, 0}, {0, 0},
{0, 0}, {0, 0}};
GpiBitBlt( hps, splashScreen->hpsMemory, 3L, aptl, ROP_SRCCOPY, 0L );
WinEndPaint( hps );
return (MRESULT)TRUE;
}
#if 0
else if ( msg == WM_REALIZEPALETTE ) {
HPS hps = WinGetPS(dlg);
nsPaletteOS2::SelectGlobalPalette(hps, dlg);
WinReleasePS(hps);
WinInvalidateRect( dlg, 0, TRUE);
return (MRESULT)TRUE;
}
#endif
return WinDefDlgProc (dlg, msg, mp1, mp2);
}
void nsSplashScreenOS2::SetDialog( HWND dlg ) {
// Save dialog handle.
mDlg = dlg;
// Store this pointer in the dialog.
WinSetWindowPtr( mDlg, QWL_USER, this );
}
nsSplashScreenOS2 *nsSplashScreenOS2::GetPointer( HWND dlg ) {
// Get result from dialog user data.
PVOID data = WinQueryWindowPtr( dlg, QWL_USER );
return (nsSplashScreenOS2*)data;
}
void ThreadProc(void *splashScreen) {
HAB hab = WinInitialize( 0 );
HMQ hmq = WinCreateMsgQueue( hab, 0 );
WinDlgBox( HWND_DESKTOP, HWND_DESKTOP, (PFNWP)DialogProc, NULLHANDLE, IDD_SPLASH, (MPARAM)splashScreen );
WinDestroyMsgQueue( hmq );
WinTerminate( hab );
// _endthread();
}
#define TURBOD "mozturbo.exe"
PRBool gAbortServer = PR_FALSE;
PRBool
nsNativeAppSupportOS2::CheckConsole() {
CHAR pszAppPath[CCHMAXPATH];
PPIB ppib;
PTIB ptib;
DosGetInfoBlocks(&ptib, &ppib);
DosQueryModuleName(ppib->pib_hmte, CCHMAXPATH, pszAppPath);
*strrchr(pszAppPath, '\\') = '\0'; // XXX DBCS misery
for ( int i = 1; i < *__pargc; i++ ) {
if ( strcmp( "-turbo", __argv[i] ) == 0 ||
strcmp( "/turbo", __argv[i] ) == 0 ||
strcmp( "-server", __argv[i] ) == 0 ||
strcmp( "/server", __argv[i] ) == 0 ) {
struct stat st;
CHAR pszTurboPath[CCHMAXPATH];
strcpy(pszTurboPath, pszAppPath);
strcat(pszTurboPath, "\\");
strcat(pszTurboPath, TURBOD);
int statrv = stat(pszTurboPath, &st);
/* If we can't find the turbo EXE, use the builtin turbo */
if (statrv == 0) {
RESULTCODES rcodes;
CHAR pszArgString[CCHMAXPATH];
strcpy(pszArgString, pszTurboPath);
strcat(pszArgString, " -l -p ");
strcat(pszArgString, pszAppPath);
pszArgString[strlen(pszTurboPath)] = '\0';
DosExecPgm(NULL,0,EXEC_BACKGROUND,
pszArgString,
0, &rcodes,
pszTurboPath);
return PR_FALSE; /* Don't start the app */
} else {
// Start in server mode (and suppress splash screen).
mServerMode = PR_TRUE;
mShouldShowUI = PR_FALSE;
__argv[i] = "-nosplash"; // Bit of a hack, but it works!
// Ignore other args.
}
}
}
for ( int j = 1; j < *__pargc; j++ ) {
if (strcmp("-killAll", __argv[j]) == 0 || strcmp("/killAll", __argv[j]) == 0 ||
strcmp("-kill", __argv[j]) == 0 || strcmp("/kill", __argv[j]) == 0) {
struct stat st;
CHAR pszTurboPath[CCHMAXPATH];
strcpy(pszTurboPath, pszAppPath);
strcat(pszTurboPath, "\\");
strcat(pszTurboPath, TURBOD);
int statrv = stat(pszTurboPath, &st);
/* If we can't find the turbo EXE, use the builtin turbo */
if (statrv == 0) {
RESULTCODES rcodes;
CHAR pszArgString[CCHMAXPATH];
strcpy(pszArgString, pszTurboPath);
strcat(pszArgString, " -u");
pszArgString[strlen(pszTurboPath)] = '\0';
DosExecPgm(NULL,0,EXEC_BACKGROUND,
pszArgString,
0, &rcodes,
pszTurboPath);
return PR_FALSE; /* Don't start the app */
} else {
gAbortServer = PR_TRUE;
}
break;
}
}
return PR_TRUE; /* Start the app */
}
// Create and return an instance of class nsNativeAppSupportOS2.
nsresult
NS_CreateNativeAppSupport( nsINativeAppSupport **aResult ) {
if ( aResult ) {
nsNativeAppSupportOS2 *pNative = new nsNativeAppSupportOS2;
if ( pNative ) {
// Check for dynamic console creation request.
// If CheckConsole returns PR_FALSE, we should
// start the turbo daemon and close the app.
if (pNative->CheckConsole() == PR_FALSE) {
delete pNative;
return NS_ERROR_FAILURE;
}
*aResult = pNative;
NS_ADDREF( *aResult );
} else {
return NS_ERROR_OUT_OF_MEMORY;
}
} else {
return NS_ERROR_NULL_POINTER;
}
return NS_OK;
}
// Create instance of OS/2 splash screen object.
nsresult
NS_CreateSplashScreen( nsISplashScreen **aResult ) {
/* In order to handle -splash on the command line, */
/* we use a variable to handle splash. Defaults to true. */
/* We set it to false if you have turned off the logo */
/* in OS/2, but then back to true if you specify -splash. */
BOOL doSplashScreen = TRUE;
if ( aResult ) {
*aResult = 0;
CHAR pBuffer[3];
PrfQueryProfileString( HINI_USERPROFILE, "PM_ControlPanel", "LogoDisplayTime", "1", pBuffer, 3);
if (pBuffer[0] == '0') {
doSplashScreen = FALSE;
} /* endif */
for ( int i = 1; i < *__pargc; i++ ) {
if ( strcmp( "-quiet", __argv[i] ) == 0
||
strcmp( "/quiet", __argv[i] ) == 0 ) {
doSplashScreen = FALSE;
}
if ( strcmp( "-splash", __argv[i] ) == 0
||
strcmp( "/splash", __argv[i] ) == 0 ) {
doSplashScreen = TRUE;
}
}
if (!doSplashScreen) {
return NS_OK;
}
*aResult = new nsSplashScreenOS2;
if ( *aResult ) {
NS_ADDREF( *aResult );
} else {
return NS_ERROR_OUT_OF_MEMORY;
}
} else {
return NS_ERROR_NULL_POINTER;
}
return NS_OK;
}
// Constants
#define MOZ_STARTUP_MUTEX_NAME "StartupMutex"
#define MOZ_DDE_START_TIMEOUT 30000
#define MOZ_DDE_STOP_TIMEOUT 15000
#define MOZ_DDE_EXEC_TIMEOUT 15000
// The array entries must match the enum ordering!
const char * const topicNames[] = { "WWW_OpenURL",
"WWW_Activate",
"WWW_CancelProgress",
"WWW_Version",
"WWW_RegisterViewer",
"WWW_UnRegisterViewer",
"WWW_GetWindowInfo" };
// Static member definitions.
int nsNativeAppSupportOS2::mConversations = 0;
HSZ nsNativeAppSupportOS2::mApplication = 0;
HSZ nsNativeAppSupportOS2::mTopics[nsNativeAppSupportOS2::topicCount] = { 0 };
DWORD nsNativeAppSupportOS2::mInstance = 0;
PRBool nsNativeAppSupportOS2::mInitialWindowActive = PR_FALSE;
PRBool nsNativeAppSupportOS2::mForceProfileStartup = PR_FALSE;
// Added this as pmddeml has no api like this
int DdeCmpStringHandles( HSZ hsz1, HSZ hsz2 )
{
char chhsz1[CCHMAXPATH], chhsz2[CCHMAXPATH];
int rc = -1;
/* I am assuming that the strings will never be more that CCHMAXPATH in
* length. Safe bet (for now). To find true length, call WinDdeQueryString
* and pass in (hsz, NULL, 0L, 0) and it will return iLength. Passing 0
* for codepage will use the codepage of the current thread.
*/
WinDdeQueryString( hsz1, chhsz1, sizeof( chhsz1 ), 0 );
WinDdeQueryString( hsz2, chhsz2, sizeof( chhsz2 ),0 );
rc = stricmp( chhsz1, chhsz2 );
return(rc);
}
char *GetCommandLine()
{
/* This function is meant to be like the Window's GetCommandLine() function.
* The value returned by pPIB->pib_pchcmd is of the format:
* <executable>\0<command line parameters>. So the first string is the
* .exe and the second string is what followed on the command line. Dorky,
* but I guess it'll have to do.
*/
PTIB pTIB = NULL;
PPIB pPIB = NULL;
APIRET rc = NO_ERROR;
char *pchParam = NULL;
rc = DosGetInfoBlocks( &pTIB, &pPIB );
if( rc == NO_ERROR )
{
INT iLen = 0;
char *pchTemp = NULL;
pchParam = pPIB->pib_pchcmd;
strcpy( szCommandLine, pchParam );
iLen = strlen( pchParam );
/* szCommandLine[iLen] is '\0', so see what's next. Probably be another
* '\0', a space or start of the arguments
*/
pchTemp = &(pchParam[iLen+1]);
/* At this point, szCommandLine holds just the program name. Now we
* go for the parameters. If our next value is a space, ignore it
* and go for the next character
*/
if( *pchTemp )
{
szCommandLine[iLen] = ' ';
iLen++;
if( *pchTemp == ' ' )
{
pchTemp++;
}
strcpy( &(szCommandLine[iLen]), pchTemp );
}
}
return( szCommandLine );
}
typedef struct _DDEMLFN
{
PFN *fn;
ULONG ord;
} DDEMLFN, *PDDEMLFN;
DDEMLFN ddemlfnTable[] =
{
{ (PFN *)&WinDdeAbandonTransaction ,100 },
{ (PFN *)&WinDdeAccessData ,101 },
{ (PFN *)&WinDdeAddData ,102 },
{ (PFN *)&WinDdeSubmitTransaction ,103 },
{ (PFN *)&WinDdeCompareStringHandles ,104 },
{ (PFN *)&WinDdeConnect ,105 },
{ (PFN *)&WinDdeConnectList ,106 },
{ (PFN *)&WinDdeCreateDataHandle ,107 },
{ (PFN *)&WinDdeCreateStringHandle ,108 },
{ (PFN *)&WinDdeDisconnect ,109 },
{ (PFN *)&WinDdeDisconnectList ,110 },
{ (PFN *)&WinDdeEnableCallback ,111 },
{ (PFN *)&WinDdeFreeDataHandle ,112 },
{ (PFN *)&WinDdeFreeStringHandle ,113 },
{ (PFN *)&WinDdeGetData ,114 },
{ (PFN *)&WinDdeInitialize ,116 },
{ (PFN *)&WinDdeKeepStringHandle ,117 },
{ (PFN *)&WinDdeNameService ,118 },
{ (PFN *)&WinDdePostAdvise ,119 },
{ (PFN *)&WinDdeQueryConvInfo ,120 },
{ (PFN *)&WinDdeQueryNextServer ,121 },
{ (PFN *)&WinDdeQueryString ,122 },
{ (PFN *)&WinDdeReconnect ,123 },
{ (PFN *)&WinDdeSetUserHandle ,124 },
{ (PFN *)&WinDdeUninitialize ,126 },
{ (PFN *)NULL , 0 }
};
/* SetupOS2ddeml makes sure that we can get pointers to all of the DDEML
* functions in demlfnTable using entrypoints. If we can't find one of them
* or can't load pmddeml.dll, then returns FALSE
*/
BOOL SetupOS2ddeml()
{
BOOL bRC = FALSE;
HMODULE hmodDDEML = NULLHANDLE;
APIRET rc = NO_ERROR;
rc = DosLoadModule( NULL, 0, "PMDDEML", &hmodDDEML );
if( rc == NO_ERROR )
{
int i;
/* all of this had better work. Get ready to be a success! */
bRC = TRUE;
for( i=0; ddemlfnTable[i].ord != 0; i++ )
{
rc = DosQueryProcAddr( hmodDDEML, ddemlfnTable[i].ord, NULL,
ddemlfnTable[i].fn );
if( rc != NO_ERROR )
{
/* we're horked. Return rc = horked */
bRC = FALSE;
break;
}
}
} /* load PMDDEML */
return( bRC );
}
char nsNativeAppSupportOS2::mMutexName[ 128 ] = { 0 };
// Message window encapsulation.
struct MessageWindow {
// ctor/dtor are simplistic
MessageWindow() {
// Try to find window.
HATOMTBL hatomtbl;
HENUM henum;
HWND hwndNext;
char classname[CCHMAXPATH];
mHandle = NULLHANDLE;
hatomtbl = WinQuerySystemAtomTable();
mMsgWindowAtom = WinFindAtom(hatomtbl, className());
if (mMsgWindowAtom == 0)
{
// If there is not atom in the system table for this class name, then
// we can assume that the app is not currently running.
mMsgWindowAtom = WinAddAtom(hatomtbl, className());
} else {
// Found an existing atom for this class name. Cycle through existing
// windows and see if one with our window id and class name already
// exists
henum = WinBeginEnumWindows(HWND_OBJECT);
while ((hwndNext = WinGetNextWindow(henum)) != NULLHANDLE)
{
if (WinQueryWindowUShort(hwndNext, QWS_ID) == (USHORT)mMsgWindowAtom)
{
WinQueryClassName(hwndNext, CCHMAXPATH, classname);
if (strcmp(classname, className()) == 0)
{
mHandle = hwndNext;
break;
}
}
}
}
}
HWND getHWND() {
return mHandle;
}
// Class name: appName + "MessageWindow"
static const char *className() {
static char classNameBuffer[128];
static char *mClassName = 0;
if ( !mClassName ) {
sprintf( classNameBuffer,
"%s%s",
nsNativeAppSupportOS2::mAppName,
"MessageWindow" );
mClassName = classNameBuffer;
}
return mClassName;
}
// Create: Register class and create window.
NS_IMETHOD Create() {
// Register the window class.
NS_ENSURE_TRUE( WinRegisterClass( 0, className(),
(PFNWP)&MessageWindow::WindowProc,
0L, 0 ),
NS_ERROR_FAILURE );
/* Giving a size but offscreen so that won't be seen, even if all
* goes wrong. Giving a size so that can be seen and understood by
* tools
*/
const char * pszClassName = className();
mHandle = WinCreateWindow( HWND_OBJECT,
pszClassName,
NULL, // name
WS_DISABLED, // style
0,0, // x, y
0,0, // cx,cy
HWND_DESKTOP,// owner
HWND_BOTTOM, // hwndbehind
(USHORT)mMsgWindowAtom, // id
NULL, // pCtlData
NULL ); // pres params
#if MOZ_DEBUG_DDE
printf( "Message window = 0x%08X\n", (int)mHandle );
#endif
return NS_OK;
}
// Destory: Get rid of window and reset mHandle.
NS_IMETHOD Destroy() {
nsresult retval = NS_OK;
if ( mHandle ) {
HATOMTBL hatomtbl = WinQuerySystemAtomTable();
WinDeleteAtom(hatomtbl, mMsgWindowAtom);
// DestroyWindow can only destroy windows created from
// the same thread.
BOOL desRes = WinDestroyWindow( mHandle );
if ( FALSE != desRes ) {
mHandle = NULL;
}
else {
retval = NS_ERROR_FAILURE;
}
}
return retval;
}
// SendRequest: Pass string via WM_COPYDATA to message window.
NS_IMETHOD SendRequest( const char *cmd ) {
/* Nothing like WM_COPYDATA in OS/2, where the OS allows pointers to be
* passed to a different process and automatically accessible by that
* process. So we have to create shared mem on our side and then the
* process that gets the WM_COPYDATA message has to do a
* DosGetSharedMem on this pointer to be able to access the data
*/
COPYDATASTRUCT *pcds;
APIRET rc = NO_ERROR;
PVOID pvData = NULL;
ULONG ulSize = sizeof(COPYDATASTRUCT)+strlen(cmd)+1;
rc = DosAllocSharedMem( &pvData, NULL, ulSize,
(PAG_COMMIT|PAG_READ|PAG_WRITE|OBJ_GETTABLE) );
if( rc != NO_ERROR )
{
/* don't even try doing anything else. Windows doesn't worry about
* errors so I guess that we shouldn't either
*/
return NS_OK;
}
memset( pvData, '\0', ulSize );
pcds = (COPYDATASTRUCT *)(pvData);
pcds->dwData = 0;
pcds->cbData = strlen(cmd)+1;
/* put the data in the buffer space immediately after the
* COPYDATASTRUCT
*/
pcds->lpData = &(pcds->chBuff);
if( cmd )
{
strcpy( (char *)pcds->lpData, cmd );
}
WinSendMsg( mHandle, WM_COPYDATA, 0, (MPARAM)pcds );
DosFreeMem( pvData );
return NS_OK;
}
// Window proc.
static MRESULT EXPENTRY WindowProc( HWND msgWindow, ULONG msg, MPARAM wp,
MPARAM lp )
{
MRESULT rc = (MRESULT)TRUE;
if ( msg == WM_COPYDATA ) {
// This is an incoming request.
COPYDATASTRUCT *cds = (COPYDATASTRUCT*)lp;
DosGetSharedMem( (PVOID)cds, PAG_READ|PAG_WRITE );
#if MOZ_DEBUG_DDE
printf( "Incoming request: %s\n", (const char*)cds->lpData );
#endif
// Get current window and return its window handle.
nsCOMPtr<nsIDOMWindow> win;
(void)nsNativeAppSupportOS2::HandleRequest( (LPBYTE)cds->lpData, PR_FALSE, getter_AddRefs( win ) );
return win ? (MRESULT)hwndForDOMWindow( win ) : 0;
}
/* We have to return a FALSE from WM_CREATE or this window will never
* get off of the ground
*/
else if ( msg == WM_CREATE ) {
rc = (MRESULT)FALSE;
}
return rc;
}
private:
HWND mHandle;
USHORT mMsgWindowAtom;
}; // struct MessageWindow
static char nameBuffer[128] = { 0 };
char *nsNativeAppSupportOS2::mAppName = nameBuffer;
PRBool nsNativeAppSupportOS2::mUseDDE = PR_FALSE;
/* Start: Tries to find the "message window" to determine if it
* exists. If so, then SeaMonkey is already running. In that
* case, we use the handle to the "message" window and send
* a request corresponding to this process's command line
* options.
*
* If not, then this is the first instance of SeaMonkey. In
* that case, we create and set up the message window.
*
* The checking for existance of the message window must
* be protected by use of a mutex semaphore.
*/
NS_IMETHODIMP
nsNativeAppSupportOS2::Start( PRBool *aResult ) {
NS_ENSURE_ARG( aResult );
NS_ENSURE_TRUE( mInstance == 0, NS_ERROR_NOT_INITIALIZED );
nsresult rv = NS_ERROR_FAILURE;
*aResult = PR_FALSE;
// see if DDE should be enabled AND remove OS/2-specific
// options the app's commandline handler won't recognize
// (-console was handled earlier by StartOS2App())
for (int i = 1; i < *__pargc; i++ ) {
if (stricmp("-dde", __argv[i]) == 0 ||
stricmp("/dde", __argv[i]) == 0)
mUseDDE = PR_TRUE;
else
if (stricmp("-console", __argv[i]) != 0 &&
stricmp("/console", __argv[i]) != 0)
continue;
for (int j = i; j < *__pargc; j++)
__argv[j] = __argv[j+1];
(*__pargc)--;
i--;
}
// if this is a standalone instance, turn off DDE regardless of the
// commandline, then skip out before we look for another instance
if (getenv("MOZ_NO_REMOTE")) {
mUseDDE = PR_FALSE;
*aResult = PR_TRUE;
return NS_OK;
}
// Grab mutex first.
int retval;
UINT id = ID_DDE_APPLICATION_NAME;
retval = WinLoadString( NULLHANDLE, NULLHANDLE, id, sizeof(nameBuffer), nameBuffer );
if ( retval == 0 ) {
// No app name; just keep running.
*aResult = PR_TRUE;
return NS_OK;
}
// Build mutex name from app name.
PR_snprintf( mMutexName, sizeof mMutexName, "%s%s", nameBuffer, MOZ_STARTUP_MUTEX_NAME );
Mutex startupLock = Mutex( mMutexName );
NS_ENSURE_TRUE( startupLock.Lock( MOZ_DDE_START_TIMEOUT ), NS_ERROR_FAILURE );
/* We need to have a message queue to do the MessageWindow stuff (for both
* Create() and SendRequest()). If we don't have one, make it now.
* If we are going to end up going away right after ::Start() returns,
* then make sure to clean up the message queue.
*/
MQINFO mqinfo;
HAB hab = NULLHANDLE;
HMQ hmqCurrent = WinQueryQueueInfo( HMQ_CURRENT, &mqinfo,
sizeof( MQINFO ) );
if( !hmqCurrent )
{
hab = WinInitialize( 0 );
hmqCurrent = WinCreateMsgQueue( hab, 0 );
}
// Search for existing message window.
MessageWindow msgWindow;
if ( msgWindow.getHWND() ) {
// We are a client process. Pass request to message window.
char *cmd = GetCommandLine();
rv = msgWindow.SendRequest( cmd );
} else {
// We will be server.
if (!gAbortServer) {
rv = msgWindow.Create();
if ( NS_SUCCEEDED( rv ) ) {
if (mUseDDE) {
// Start up DDE server.
this->StartDDE();
}
// Tell caller to spin message loop.
*aResult = PR_TRUE;
}
}
}
startupLock.Unlock();
if( *aResult == PR_FALSE )
{
/* This process isn't going to continue much longer. Make sure that we
* clean up the message queue
*/
if (hmqCurrent)
WinDestroyMsgQueue(hmqCurrent);
if (hab)
WinTerminate(hab);
}
return rv;
}
PRBool
nsNativeAppSupportOS2::InitTopicStrings() {
for ( int i = 0; i < topicCount; i++ ) {
if ( !( mTopics[ i ] = WinDdeCreateStringHandle( (PSZ)topicNames[ i ], CP_WINANSI ) ) ) {
return PR_FALSE;
}
}
return PR_TRUE;
}
int
nsNativeAppSupportOS2::FindTopic( HSZ topic ) {
for ( int i = 0; i < topicCount; i++ ) {
if ( DdeCmpStringHandles( topic, mTopics[i] ) == 0 ) {
return i;
}
}
return -1;
}
// Start DDE server.
//
// This used to be the Start() method when we were using DDE as the
// primary IPC mechanism between secondary SeaMonkey processes and the
// initial "server" process.
//
// Now, it simply initializes the DDE server. The caller must check
// that this process is to be the server, and, must acquire the DDE
// startup mutex semaphore prior to calling this routine. See ::Start(),
// above.
NS_IMETHODIMP
nsNativeAppSupportOS2::StartDDE() {
NS_ENSURE_TRUE( mInstance == 0, NS_ERROR_NOT_INITIALIZED );
/* Get entrypoints for PMDDEML */
BOOL bDDEML = SetupOS2ddeml();
/* If we couldn't initialize DDEML, set mUSEDDE to PR_FALSE */
/* so we don't do anything else DDE related */
if (!bDDEML) {
mUseDDE = PR_FALSE;
return NS_OK;
}
// Initialize DDE.
NS_ENSURE_TRUE( DDEERR_NO_ERROR == WinDdeInitialize( &mInstance,
nsNativeAppSupportOS2::HandleDDENotification,
APPCLASS_STANDARD,
0 ),
NS_ERROR_FAILURE );
// Allocate DDE strings.
NS_ENSURE_TRUE( ( mApplication = WinDdeCreateStringHandle( mAppName, CP_WINANSI ) ) && InitTopicStrings(),
NS_ERROR_FAILURE );
// Next step is to register a DDE service.
NS_ENSURE_TRUE( WinDdeNameService( mInstance, mApplication, 0, DNS_REGISTER ), NS_ERROR_FAILURE );
#if MOZ_DEBUG_DDE
printf( "DDE server started\n" );
#endif
return NS_OK;
}
// If no DDE conversations are pending, terminate DDE.
NS_IMETHODIMP
nsNativeAppSupportOS2::Stop( PRBool *aResult ) {
NS_ENSURE_ARG( aResult );
NS_ENSURE_TRUE( mInstance, NS_ERROR_NOT_INITIALIZED );
nsresult rv = NS_OK;
*aResult = PR_TRUE;
if (!mUseDDE) {
return rv;
}
Mutex ddeLock( mMutexName );
if ( ddeLock.Lock( MOZ_DDE_STOP_TIMEOUT ) ) {
if ( mConversations == 0 ) {
this->Quit();
} else {
*aResult = PR_FALSE;
}
ddeLock.Unlock();
}
else {
// No DDE application name specified, but that's OK. Just
// forge ahead.
*aResult = PR_TRUE;
}
return rv;
}
// Terminate DDE regardless.
NS_IMETHODIMP
nsNativeAppSupportOS2::Quit() {
// If another process wants to look for the message window, they need
// to wait to hold the lock, in which case they will not find the
// window as we will destroy ours under our lock.
// When the mutex goes off the stack, it is unlocked via destructor.
Mutex mutexLock(mMutexName);
NS_ENSURE_TRUE(mutexLock.Lock(MOZ_DDE_START_TIMEOUT), NS_ERROR_FAILURE );
// If we've got a message window to receive IPC or new window requests,
// get rid of it as we are shutting down.
// Note: Destroy calls DestroyWindow, which will only work on a window
// created by the same thread.
MessageWindow mw;
mw.Destroy();
if ( mInstance ) {
// Unregister application name.
WinDdeNameService( mInstance, mApplication, 0, DNS_UNREGISTER );
// Clean up strings.
if ( mApplication ) {
WinDdeFreeStringHandle( mApplication );
mApplication = 0;
}
for ( int i = 0; i < topicCount; i++ ) {
if ( mTopics[i] ) {
WinDdeFreeStringHandle( mTopics[i] );
mTopics[i] = 0;
}
}
WinDdeUninitialize( mInstance );
mInstance = 0;
}
return NS_OK;
}
PRBool NS_CanRun()
{
return PR_FALSE; /* We do this so that we can bail if we are using custom turbo mode */
}
#if MOZ_DEBUG_DDE
// Macro to generate case statement for a given XTYP value.
#define XTYP_CASE(t) \
case t: result = #t; break
static nsCString uTypeDesc( UINT uType ) {
nsCString result;
switch ( uType ) {
XTYP_CASE(XTYP_ADVSTART);
XTYP_CASE(XTYP_CONNECT);
XTYP_CASE(XTYP_ADVREQ);
XTYP_CASE(XTYP_REQUEST);
XTYP_CASE(XTYP_WILDCONNECT);
XTYP_CASE(XTYP_ADVDATA);
XTYP_CASE(XTYP_EXECUTE);
XTYP_CASE(XTYP_POKE);
XTYP_CASE(XTYP_ADVSTOP);
XTYP_CASE(XTYP_CONNECT_CONFIRM);
XTYP_CASE(XTYP_DISCONNECT);
XTYP_CASE(XTYP_ERROR);
XTYP_CASE(XTYP_MONITOR);
XTYP_CASE(XTYP_REGISTER);
XTYP_CASE(XTYP_XACT_COMPLETE);
XTYP_CASE(XTYP_UNREGISTER);
default: result = "XTYP_?????";
}
return result;
}
static nsCString hszValue( DWORD instance, HSZ hsz ) {
// Extract string from HSZ.
nsCString result("[");
DWORD len = WinDdeQueryString( hsz, NULL, NULL, CP_WINANSI );
if ( len ) {
char buffer[ 256 ];
WinDdeQueryString( hsz, buffer, sizeof buffer, CP_WINANSI );
result += buffer;
}
result += "]";
return result;
}
#endif
// Utility function to escape double-quotes within a string.
static void escapeQuotes( nsString &aString ) {
PRInt32 offset = -1;
while( 1 ) {
// Find next '"'.
offset = FindCharInString( aString, '"', ++offset );
if ( offset == kNotFound ) {
// No more quotes, exit.
break;
} else {
// Insert back-slash ahead of the '"'.
aString.Insert( PRUnichar('\\'), offset );
// Increment offset because we just inserted a slash
offset++;
}
}
return;
}
HDDEDATA APIENTRY
nsNativeAppSupportOS2::HandleDDENotification( ULONG idInst, // DDEML instance
USHORT uType, // transaction type
USHORT uFmt, // clipboard data format
HCONV hconv, // handle to the conversation
HSZ hsz1, // handle to a string
HSZ hsz2, // handle to a string
HDDEDATA hdata, // handle to a global memory object
ULONG dwData1, // transaction-specific data
ULONG dwData2 ) { // transaction-specific data
#if MOZ_DEBUG_DDE
printf( "DDE: uType =%s\n", uTypeDesc( uType ).get() );
printf( " uFmt =%u\n", (unsigned)uFmt );
printf( " hconv =%08x\n", (int)hconv );
printf( " hsz1 =%08x:%s\n", (int)hsz1, hszValue( mInstance, hsz1 ).get() );
printf( " hsz2 =%08x:%s\n", (int)hsz2, hszValue( mInstance, hsz2 ).get() );
printf( " hdata =%08x\n", (int)hdata );
printf( " dwData1=%08x\n", (int)dwData1 );
printf( " dwData2=%08x\n", (int)dwData2 );
#endif
HDDEDATA result = 0;
if ( uType & XCLASS_BOOL ) {
switch ( uType ) {
case XTYP_CONNECT:
// Make sure its for our service/topic.
if ( FindTopic( hsz1 ) != -1 ) {
// We support this connection.
result = (HDDEDATA)1;
}
break;
case XTYP_CONNECT_CONFIRM:
// We don't care about the conversation handle, at this point.
result = (HDDEDATA)1;
break;
}
} else if ( uType & XCLASS_DATA ) {
if ( uType == XTYP_REQUEST ) {
switch ( FindTopic( hsz1 ) ) {
case topicOpenURL: {
// Open a given URL...
// Default is to open in current window.
PRBool new_window = PR_FALSE;
// Get the URL from the first argument in the command.
nsCAutoString url;
ParseDDEArg(hsz2, 0, url);
// Read the 3rd argument in the command to determine if a
// new window is to be used.
nsCAutoString windowID;
ParseDDEArg(hsz2, 2, windowID);
// "0" means to open the URL in a new window.
if ( windowID.Equals( "0" ) ) {
new_window = PR_TRUE;
}
// Make it look like command line args.
url.Insert( NS_STRINGIFY(MOZ_APP_NAME) " -url ", 0 );
#if MOZ_DEBUG_DDE
printf( "Handling dde XTYP_REQUEST request: [%s]...\n", url.get() );
#endif
// Now handle it.
nsCOMPtr<nsIDOMWindow> win;
HandleRequest( LPBYTE( url.get() ), new_window, getter_AddRefs( win ) );
// Return pseudo window ID.
result = CreateDDEData( 1 );
break;
}
case topicGetWindowInfo: {
// This topic has to get the current URL, get the current
// page title and then format the output into the DDE
// return string. The return value is "URL","Page Title",
// "Window ID" however the window ID is not used for this
// command, therefore it is returned as a null string
// This isn't really a loop. We just use "break"
// statements to bypass the remaining steps when
// something goes wrong.
do {
// Get most recently used Nav window.
nsCOMPtr<nsIDOMWindowInternal> navWin;
GetMostRecentWindow( NS_LITERAL_STRING( "navigator:browser" ).get(),
getter_AddRefs( navWin ) );
if ( !navWin ) {
// There is not a window open
break;
}
// Get content window.
nsCOMPtr<nsIDOMWindow> content;
navWin->GetContent( getter_AddRefs( content ) );
if ( !content ) {
break;
}
// Convert that to internal interface.
nsCOMPtr<nsIDOMWindowInternal> internalContent( do_QueryInterface( content ) );
if ( !internalContent ) {
break;
}
// Get location.
nsCOMPtr<nsIDOMLocation> location;
internalContent->GetLocation( getter_AddRefs( location ) );
if ( !location ) {
break;
}
// Get href for URL.
nsAutoString url;
if ( NS_FAILED( location->GetHref( url ) ) ) {
break;
}
// Escape any double-quotes.
escapeQuotes( url );
// Now for the title; first, get the "window" script global object.
nsCOMPtr<nsIScriptGlobalObject> scrGlobalObj( do_QueryInterface( internalContent ) );
if ( !scrGlobalObj ) {
break;
}
// Then from its doc shell get the base window...
nsCOMPtr<nsIBaseWindow> baseWindow =
do_QueryInterface( scrGlobalObj->GetDocShell() );
if ( !baseWindow ) {
break;
}
// And from the base window we can get the title.
nsXPIDLString title;
if(!baseWindow) {
break;
}
baseWindow->GetTitle(getter_Copies(title));
// Escape any double-quotes in the title.
escapeQuotes( title );
// Use a string buffer for the output data, first
// save a quote.
nsCAutoString outpt( NS_LITERAL_CSTRING("\"") );
// Now copy the URL converting the Unicode string
// to a single-byte ASCII string
outpt.Append( NS_LossyConvertUCS2toASCII( url ) );
// Add the "," used to separate the URL and the page
// title
outpt.Append( NS_LITERAL_CSTRING("\",\"") );
// Now copy the current page title to the return string
outpt.Append( NS_LossyConvertUCS2toASCII( title ));
// Fill out the return string with the remainin ",""
outpt.Append( NS_LITERAL_CSTRING( "\",\"\"" ));
// Create a DDE handle to a char string for the data
// being returned, this copies and creates a "shared"
// copy of the DDE response until the calling APP
// reads it and says it can be freed.
result = CreateDDEData( (LPBYTE)(const char*)outpt.get(),
outpt.Length() + 1 );
#if MOZ_DEBUG_DDE
printf( "WWW_GetWindowInfo->%s\n", outpt.get() );
#endif
} while ( PR_FALSE );
break;
}
case topicActivate: {
// Activate a Nav window...
nsCAutoString windowID;
ParseDDEArg(hsz2, 0, windowID);
// 4294967295 is decimal for 0xFFFFFFFF which is also a
// correct value to do that Activate last window stuff
if ( windowID.Equals( "-1" ) ||
windowID.Equals( "4294967295" ) ) {
// We only support activating the most recent window (or a new one).
ActivateLastWindow();
// Return pseudo window ID.
result = CreateDDEData( 1 );
}
break;
}
case topicVersion: {
// Return version. We're restarting at 1.0!
DWORD version = 1 << 16; // "1.0"
result = CreateDDEData( version );
break;
}
case topicRegisterViewer: {
// Register new viewer (not implemented).
result = CreateDDEData( PR_FALSE );
break;
}
case topicUnRegisterViewer: {
// Unregister new viewer (not implemented).
result = CreateDDEData( PR_FALSE );
break;
}
default:
break;
}
} else if ( uType & XTYP_POKE ) {
switch ( FindTopic( hsz1 ) ) {
case topicCancelProgress: {
// "Handle" progress cancel (actually, pretty much ignored).
result = (HDDEDATA)DDE_FACK;
break;
}
default:
break;
}
}
} else if ( uType & XCLASS_FLAGS ) {
if ( uType == XTYP_EXECUTE ) {
// Prove that we received the request.
DWORD bytes;
LPBYTE request = (LPBYTE)WinDdeAccessData( hdata, &bytes );
#if MOZ_DEBUG_DDE
printf( "Handling dde request: [%s]...\n", (char*)request );
#endif
// Default is to open in current window.
PRBool new_window = PR_FALSE;
nsCAutoString url;
ParseDDEArg((const char*) request, 0, url);
// Read the 3rd argument in the command to determine if a
// new window is to be used.
nsCAutoString windowID;
ParseDDEArg((const char*) request, 2, windowID);
// "0" means to open the URL in a new window.
if ( windowID.Equals( "0" ) ) {
new_window = PR_TRUE;
}
// Make it look like command line args.
url.Insert( NS_STRINGIFY(MOZ_APP_NAME) " -url ", 0 );
#if MOZ_DEBUG_DDE
printf( "Handling dde XTYP_REQUEST request: [%s]...\n", url.get() );
#endif
// Now handle it.
nsCOMPtr<nsIDOMWindow> win;
HandleRequest( LPBYTE( url.get() ), new_window, getter_AddRefs( win ) );
// Release the data.
// DdeUnaccessData( hdata );
result = (HDDEDATA)DDE_FACK;
} else {
result = (HDDEDATA)DDE_NOTPROCESSED;
}
} else if ( uType & XCLASS_NOTIFICATION ) {
}
#if MOZ_DEBUG_DDE
printf( "DDE result=%d (0x%08X)\n", (int)result, (int)result );
#endif
return result;
}
// Utility function to advance to end of quoted string.
// p+offset must point to the comma preceding the arg on entry.
// On return, p+result points to the closing '"' (or end of the string
// if the closing '"' is missing) if the arg is quoted. If the arg
// is not quoted, then p+result will point to the first character
// of the arg.
static PRInt32 advanceToEndOfQuotedArg( const char *p, PRInt32 offset, PRInt32 len ) {
// Check whether the current arg is quoted.
if ( p[++offset] == '"' ) {
// Advance past the closing quote.
while ( offset < len && p[++offset] != '"' ) {
// If the current character is a backslash, then the
// next character can't be a *real* '"', so skip it.
if ( p[offset] == '\\' ) {
offset++;
}
}
}
return offset;
}
void nsNativeAppSupportOS2::ParseDDEArg( const char* args, int index, nsCString& aString) {
if ( args ) {
int argLen = strlen(args);
nsDependentCString temp(args, argLen);
// offset points to the comma preceding the desired arg.
PRInt32 offset = -1;
// Skip commas till we get to the arg we want.
while( index-- ) {
// If this arg is quoted, then go to closing quote.
offset = advanceToEndOfQuotedArg( args, offset, argLen);
// Find next comma.
offset = FindCharInString( temp, ',', offset );
if ( offset == kNotFound ) {
// No more commas, give up.
aString = args;
return;
}
}
// The desired argument starts just past the preceding comma,
// which offset points to, and extends until the following
// comma (or the end of the string).
//
// Since the argument might be enclosed in quotes, we need to
// deal with that before searching for the terminating comma.
// We advance offset so it ends up pointing to the start of
// the argument we want.
PRInt32 end = advanceToEndOfQuotedArg( args, offset++, argLen );
// Find next comma (or end of string).
end = FindCharInString( temp, ',', end );
if ( end == kNotFound ) {
// Arg is the rest of the string.
end = argLen;
}
// Extract result.
aString.Assign( args + offset, end - offset );
}
return;
}
// Utility to parse out argument from a DDE item string.
void nsNativeAppSupportOS2::ParseDDEArg( HSZ args, int index, nsCString& aString) {
DWORD argLen = WinDdeQueryString( args, NULL, NULL, CP_WINANSI );
// there wasn't any string, so return empty string
if ( !argLen ) return;
// Ensure result's buffer is sufficiently big.
char *temp = (char *) malloc(argLen + 1);
if ( !temp ) return;
// Now get the string contents.
WinDdeQueryString( args, temp, argLen + 1, CP_WINANSI );
// Parse out the given arg.
ParseDDEArg(temp, index, aString);
free(temp);
}
void nsNativeAppSupportOS2::ActivateLastWindow() {
nsCOMPtr<nsIDOMWindowInternal> navWin;
GetMostRecentWindow( NS_LITERAL_STRING("navigator:browser").get(), getter_AddRefs( navWin ) );
if ( navWin ) {
// Activate that window.
activateWindow( navWin );
} else {
// Need to create a Navigator window, then.
nsCOMPtr<nsIDOMWindow> newWin;
OpenBrowserWindow( "about:blank", PR_TRUE, getter_AddRefs( newWin ) );
}
}
HDDEDATA nsNativeAppSupportOS2::CreateDDEData( DWORD value ) {
return CreateDDEData( (LPBYTE)&value, sizeof value );
}
HDDEDATA nsNativeAppSupportOS2::CreateDDEData( LPBYTE value, DWORD len ) {
HDDEDATA result = WinDdeCreateDataHandle( value,
len,
0,
mApplication,
CF_TEXT,
0 );
return result;
}
// Handle external request. The first argument is the command line
// received from the external client. We convert that string to an
// nsICmdLineService object via GetCmdLineArgs. Then, we look for certain
// well-known arguments. This replicates code elsewhere, to some extent,
// unfortunately (if you can fix that, please do). The second argument may
// be set to PR_TRUE to override the user's external link preference.
nsresult
nsNativeAppSupportOS2::HandleRequest( LPBYTE request, PRBool newWindow, nsIDOMWindow **aResult ) {
// if initial hidden window is still being displayed, we need to ignore requests
// because such requests might not function properly. See bug 147223 for details
if (mInitialWindowActive) {
return NS_ERROR_FAILURE;
}
// Parse command line.
nsCOMPtr<nsICmdLineService> args;
nsresult rv;
rv = GetCmdLineArgs( request, getter_AddRefs( args ) );
if (NS_FAILED(rv)) return rv;
nsCOMPtr<nsIAppStartup> appStartup (do_GetService(NS_APPSTARTUP_CONTRACTID, &rv));
if (NS_FAILED(rv)) return rv;
nsCOMPtr<nsINativeAppSupport> nativeApp;
rv = appStartup->GetNativeAppSupport(getter_AddRefs( nativeApp ));
if (NS_FAILED(rv)) return rv;
// first see if there is a url
nsXPIDLCString arg;
rv = args->GetURLToLoad(getter_Copies(arg));
if (NS_FAILED(rv)) return rv;
if (!arg.IsEmpty() ) {
// Launch browser.
#if MOZ_DEBUG_DDE
printf( "Launching browser on url [%s]...\n", arg.get() );
#endif
rv = nativeApp->EnsureProfile(args);
if (NS_SUCCEEDED(rv))
rv = OpenBrowserWindow( arg.get(), newWindow, aResult );
return rv;
}
// ok, let's try the -chrome argument
rv = args->GetCmdLineValue("-chrome", getter_Copies(arg));
if (NS_SUCCEEDED(rv) && (const char*)arg ) {
// Launch chrome.
#if MOZ_DEBUG_DDE
printf( "Launching chrome url [%s]...\n", (const char*)arg );
#endif
rv = nativeApp->EnsureProfile(args);
if (NS_SUCCEEDED(rv))
rv = OpenWindow( arg.get(), "", aResult );
return rv;
}
// try for the "-profilemanager" argument, in which case we want the
// profile manager to appear, but only if there are no windows open
rv = args->GetCmdLineValue( "-profilemanager", getter_Copies(arg));
if ( NS_SUCCEEDED(rv) && (const char*)arg ) { // -profilemanager on command line
nsCOMPtr<nsIDOMWindowInternal> window;
GetMostRecentWindow(0, getter_AddRefs(window));
if (!window) { // there are no open windows
mForceProfileStartup = PR_TRUE;
}
}
// try for the "-kill" argument, to shut down the server
rv = args->GetCmdLineValue( "-kill", getter_Copies(arg));
if ( NS_SUCCEEDED(rv) && (const char*)arg ) {
// Turn off server mode.
nsCOMPtr<nsIAppStartup> appStartup
(do_GetService(NS_APPSTARTUP_CONTRACTID, &rv));
if (NS_FAILED(rv)) return rv;
nsCOMPtr<nsINativeAppSupport> native;
rv = appStartup->GetNativeAppSupport( getter_AddRefs( native ));
if (NS_SUCCEEDED(rv)) {
native->SetIsServerMode( PR_FALSE );
// close app if there are no more top-level windows.
rv = appStartup->Quit(nsIAppStartup::eConsiderQuit);
}
return rv;
}
// Try standard startup's command-line handling logic from nsAppRunner.cpp...
// Need profile before opening windows.
rv = nativeApp->EnsureProfile(args);
if (NS_FAILED(rv)) return rv;
// This will tell us whether the command line processing opened a window.
PRBool windowOpened = PR_FALSE;
// Process command line options.
rv = DoCommandLines( args, &windowOpened );
// If a window was opened, then we're done.
// Note that we keep on trying in the unlikely event of an error.
if (rv == NS_ERROR_NOT_AVAILABLE || rv == NS_ERROR_ABORT || windowOpened) {
return NS_OK;
}
// ok, no idea what the param is.
#if MOZ_DEBUG_DDE
printf( "Unknown request [%s]\n", (char*) request );
#endif
// if all else fails, open a browser window
const char * const contractID =
"@mozilla.org/commandlinehandler/general-startup;1?type=browser";
nsCOMPtr<nsICmdLineHandler> handler = do_GetService(contractID, &rv);
if (NS_FAILED(rv)) return rv;
nsXPIDLString defaultArgs;
rv = handler->GetDefaultArgs(getter_Copies(defaultArgs));
if (NS_FAILED(rv) || defaultArgs.IsEmpty()) return rv;
NS_ConvertUTF16toUTF8 url( defaultArgs );
return OpenBrowserWindow(url.get(), newWindow, aResult);
}
// Parse command line args according to MS spec
// (see "Parsing C++ Command-Line Arguments" at
// http://msdn.microsoft.com/library/devprods/vs6/visualc/vclang/_pluslang_parsing_c.2b2b_.command.2d.line_arguments.htm).
nsresult
nsNativeAppSupportOS2::GetCmdLineArgs( LPBYTE request, nsICmdLineService **aResult ) {
nsresult rv = NS_OK;
int justCounting = 1;
char **argv = 0;
// Flags, etc.
int between = 1, quoted = 0, bSlashCount = 0;
int argc = 0;
char *p = (char*)request;
nsCAutoString arg;
// We loop if we've not finished the second pass through.
while ( 1 ) {
if ( between ) {
// We are traversing whitespace between args.
// Check for start of next arg.
if ( *p != 0 && !isspace( *p ) ) {
// Start of another arg.
between = 0;
arg = "";
switch ( *p ) {
case '\\':
// Count the backslash.
bSlashCount = 1;
break;
case '"':
// Remember we're inside quotes.
quoted = 1;
break;
default:
// Add character to arg.
arg += *p;
break;
}
} else {
// Another space between args, ignore it.
}
} else {
// We are processing the contents of an argument.
// Check for whitespace or end.
if ( *p == 0 || ( !quoted && isspace( *p ) ) ) {
// Process pending backslashes (interpret them
// literally since they're not followed by a ").
while( bSlashCount ) {
arg += '\\';
bSlashCount--;
}
// End current arg.
if ( !justCounting ) {
argv[argc] = new char[ arg.Length() + 1 ];
strcpy( argv[argc], arg.get() );
}
argc++;
// We're now between args.
between = 1;
} else {
// Still inside argument, process the character.
switch ( *p ) {
case '"':
// First, digest preceding backslashes (if any).
while ( bSlashCount > 1 ) {
// Put one backsplash in arg for each pair.
arg += '\\';
bSlashCount -= 2;
}
if ( bSlashCount ) {
// Quote is literal.
arg += '"';
bSlashCount = 0;
} else {
// Quote starts or ends a quoted section.
if ( quoted ) {
// Check for special case of consecutive double
// quotes inside a quoted section.
if ( *(p+1) == '"' ) {
// This implies a literal double-quote. Fake that
// out by causing next double-quote to look as
// if it was preceded by a backslash.
bSlashCount = 1;
} else {
quoted = 0;
}
} else {
quoted = 1;
}
}
break;
case '\\':
// Add to count.
bSlashCount++;
break;
default:
// Accept any preceding backslashes literally.
while ( bSlashCount ) {
arg += '\\';
bSlashCount--;
}
// Just add next char to the current arg.
arg += *p;
break;
}
}
}
// Check for end of input.
if ( *p ) {
// Go to next character.
p++;
} else {
// If on first pass, go on to second.
if ( justCounting ) {
// Allocate argv array.
argv = new char*[ argc ];
// Start second pass, initialize again
justCounting = 0;
p = (char*)request;
between = 1;
argc = quoted = bSlashCount = 0;
} else {
// Quit.
break;
}
}
}
nsCOMPtr<nsIComponentManager> compMgr;
NS_GetComponentManager(getter_AddRefs(compMgr));
rv = compMgr->CreateInstanceByContractID(
NS_COMMANDLINESERVICE_CONTRACTID,
nsnull, NS_GET_IID(nsICmdLineService),
(void**) aResult);
if ( NS_FAILED( rv ) || NS_FAILED( ( rv = (*aResult)->Initialize( argc, argv ) ) ) ) {
#if MOZ_DEBUG_DDE
printf( "Error creating command line service = 0x%08X (argc=%d, argv=0x%08X)\n", (int)rv, (int)argc, (int)argv );
#endif
}
// Cleanup.
while ( argc ) {
delete [] argv[ --argc ];
}
delete [] argv;
return rv;
}
// Check to see if we have a profile. We will not have a profile
// at this point if we were launched invisibly in -turbo mode, and
// the profile mgr needed to show UI (to pick from multiple profiles).
// At this point, we can show UI, so call DoProfileStartUp().
nsresult
nsNativeAppSupportOS2::EnsureProfile(nsICmdLineService* args)
{
nsresult rv;
nsCOMPtr<nsIProfileInternal> profileMgr(do_GetService(NS_PROFILE_CONTRACTID, &rv));
if (NS_FAILED(rv)) return rv;
nsCOMPtr<nsIAppStartup> appStartup(do_GetService(NS_APPSTARTUP_CONTRACTID, &rv));
if (NS_FAILED(rv)) return rv;
// If we have a profile, everything is fine.
// unless mForceProfileStartup is TRUE. This flag is set when the
// last window is closed in -turbo mode. When TRUE, it forces the
// profile UI to come up at the beginning of the next -turbo session
// even if we currently have a profile.
PRBool haveProfile;
rv = profileMgr->IsCurrentProfileAvailable(&haveProfile);
if (!mForceProfileStartup && NS_SUCCEEDED(rv) && haveProfile)
return NS_OK;
// If the profile selection is happening, fail.
PRBool doingProfileStartup;
rv = profileMgr->GetIsStartingUp(&doingProfileStartup);
if (NS_FAILED(rv) || doingProfileStartup) return NS_ERROR_FAILURE;
// See if profile manager is being suppressed via -silent flag.
PRBool canInteract = PR_TRUE;
nsXPIDLCString arg;
if (NS_SUCCEEDED(args->GetCmdLineValue("-silent", getter_Copies(arg)))) {
if (!arg.IsEmpty()) {
canInteract = PR_FALSE;
}
}
rv = appStartup->DoProfileStartup(args, canInteract);
mForceProfileStartup = PR_FALSE;
return rv;
}
nsresult
nsNativeAppSupportOS2::OpenWindow( const char*urlstr, const char *args, nsIDOMWindow **aResult ) {
nsresult rv = NS_ERROR_FAILURE;
nsCOMPtr<nsIWindowWatcher> wwatch(do_GetService(NS_WINDOWWATCHER_CONTRACTID));
nsCOMPtr<nsISupportsCString> sarg(do_CreateInstance(NS_SUPPORTS_CSTRING_CONTRACTID));
if (sarg)
sarg->SetData(nsDependentCString(args));
if (wwatch && sarg) {
rv = wwatch->OpenWindow(0, urlstr, "_blank", "chrome,dialog=no,all",
sarg, aResult);
#if MOZ_DEBUG_DDE
} else {
printf("Get WindowWatcher (or create string) failed\n");
#endif
}
return rv;
}
HWND hwndForDOMWindow( nsISupports *window ) {
nsCOMPtr<nsIScriptGlobalObject> ppScriptGlobalObj( do_QueryInterface(window) );
if ( !ppScriptGlobalObj ) {
return 0;
}
nsCOMPtr<nsIBaseWindow> ppBaseWindow =
do_QueryInterface( ppScriptGlobalObj->GetDocShell() );
if ( !ppBaseWindow ) {
return 0;
}
nsCOMPtr<nsIWidget> ppWidget;
ppBaseWindow->GetMainWidget( getter_AddRefs( ppWidget ) );
return (HWND)( ppWidget->GetNativeData( NS_NATIVE_WIDGET ) );
}
nsresult
nsNativeAppSupportOS2::ReParent( nsISupports *window, HWND newParent ) {
HWND hMainClient = hwndForDOMWindow( window );
if ( !hMainClient ) {
return NS_ERROR_FAILURE;
}
HWND hMainFrame = WinQueryWindow(hMainClient, QW_PARENT);
// Reset the parent.
WinSetParent( hMainFrame, newParent, FALSE );
return NS_OK;
}
static const char sJSStackContractID[] = "@mozilla.org/js/xpc/ContextStack;1";
class SafeJSContext {
public:
SafeJSContext();
~SafeJSContext();
nsresult Push();
JSContext *get() { return mContext; }
protected:
nsCOMPtr<nsIThreadJSContextStack> mService;
JSContext *mContext;
};
SafeJSContext::SafeJSContext() : mContext(nsnull) {
}
SafeJSContext::~SafeJSContext() {
JSContext *cx;
nsresult rv;
if(mContext) {
rv = mService->Pop(&cx);
NS_ASSERTION(NS_SUCCEEDED(rv) && cx == mContext, "JSContext push/pop mismatch");
}
}
nsresult SafeJSContext::Push() {
if (mContext) // only once
return NS_ERROR_FAILURE;
mService = do_GetService(sJSStackContractID);
if(mService) {
JSContext *cx;
if (NS_SUCCEEDED(mService->GetSafeJSContext(&cx)) &&
cx &&
NS_SUCCEEDED(mService->Push(cx))) {
// Save cx in mContext to indicate need to pop.
mContext = cx;
}
}
return mContext ? NS_OK : NS_ERROR_FAILURE;
}
nsresult
nsNativeAppSupportOS2::OpenBrowserWindow( const char *args, PRBool newWindow, nsIDOMWindow **aResult ) {
nsresult rv = NS_OK;
// Open the argument URL according to the external link preference.
// If there is no Nav window, or newWindow is PR_TRUE, open a new one.
// Get most recently used Nav window.
nsCOMPtr<nsIDOMWindowInternal> navWin;
GetMostRecentWindow( NS_LITERAL_STRING( "navigator:browser" ).get(), getter_AddRefs( navWin ) );
// This isn't really a loop. We just use "break" statements to fall
// out to the OpenWindow call when things go awry.
do {
// If caller requires a new window, then don't use an existing one.
if ( newWindow ) {
break;
}
if ( !navWin ) {
// Have to open a new one.
break;
}
nsCOMPtr<nsIDOMChromeWindow> chromeWin( do_QueryInterface( navWin ) );
if ( !chromeWin ) {
break;
}
nsCOMPtr<nsIBrowserDOMWindow> bwin;
chromeWin->GetBrowserDOMWindow( getter_AddRefs( bwin ) );
if ( !bwin ) {
break;
}
nsCOMPtr<nsIIOService> io( do_GetService( "@mozilla.org/network/io-service;1" ) );
if ( !io ) {
break;
}
nsCOMPtr<nsIURI> uri;
io->NewURI( nsDependentCString( args ), nsnull, nsnull, getter_AddRefs( uri ) );
if ( !uri ) {
break;
}
return bwin->OpenURI( uri, nsnull, nsIBrowserDOMWindow::OPEN_DEFAULTWINDOW, nsIBrowserDOMWindow::OPEN_EXTERNAL, aResult );
} while ( PR_FALSE );
nsCOMPtr<nsICmdLineHandler> handler(do_GetService("@mozilla.org/commandlinehandler/general-startup;1?type=browser", &rv));
if (NS_FAILED(rv)) return rv;
nsXPIDLCString chromeUrlForTask;
rv = handler->GetChromeUrlForTask(getter_Copies(chromeUrlForTask));
if (NS_FAILED(rv)) return rv;
// Last resort is to open a brand new window.
return OpenWindow( chromeUrlForTask.get(), args, aResult );
}
// This opens a special browser window for purposes of priming the pump for
// server mode (getting stuff into the caching, loading .dlls, etc.). The
// window will have these attributes:
// - Load about:blank (no home page)
// - No toolbar (so there's no sidebar panels loaded, either)
// - Pass magic arg to cause window to close in onload handler.
NS_IMETHODIMP
nsNativeAppSupportOS2::StartServerMode() {
if (mShouldShowUI) {
// We dont have to anything anymore. The native UI
// will create the window
return NS_OK;
} else {
// Sometimes a window will have been opened even though mShouldShowUI is false
// (e.g., "seamonkey -mail -turbo"). Detect that by testing whether there's a
// window already open.
nsCOMPtr<nsIDOMWindowInternal> win;
GetMostRecentWindow( 0, getter_AddRefs( win ) );
if ( win ) {
// Window already opened, don't need this special Nav window.
return NS_OK;
}
}
// Since native UI wont create any window, we create a hidden window
// so thing work alright.
// Create some of the objects we'll need.
nsCOMPtr<nsIWindowWatcher> ww(do_GetService(NS_WINDOWWATCHER_CONTRACTID));
nsCOMPtr<nsISupportsString> arg1(do_CreateInstance(NS_SUPPORTS_STRING_CONTRACTID));
nsCOMPtr<nsISupportsString> arg2(do_CreateInstance(NS_SUPPORTS_STRING_CONTRACTID));
if ( !ww || !arg1 || !arg2 ) {
return NS_OK;
}
// Create the array for the arguments.
nsCOMPtr<nsISupportsArray> argArray = do_CreateInstance(NS_SUPPORTSARRAY_CONTRACTID);
if ( !argArray ) {
return NS_OK;
}
// arg1 is the url to load.
// arg2 is the string that tells navigator.js to auto-close.
arg1->SetData( NS_LITERAL_STRING( "about:blank" ) );
arg2->SetData( NS_LITERAL_STRING( "turbo=yes" ) );
// Put args into array.
if ( NS_FAILED( argArray->AppendElement( arg1 ) ) ||
NS_FAILED( argArray->AppendElement( arg2 ) ) ) {
return NS_OK;
}
// Now open the window.
nsCOMPtr<nsIDOMWindow> newWindow;
ww->OpenWindow( 0,
"chrome://navigator/content",
"_blank",
"chrome,dialog=no,toolbar=no",
argArray,
getter_AddRefs( newWindow ) );
if ( !newWindow ) {
return NS_OK;
}
mInitialWindowActive = PR_TRUE;
// Hide this window by re-parenting it (to ensure it doesn't appear).
ReParent( newWindow, MessageWindow().getHWND() );
return NS_OK;
}
NS_IMETHODIMP
nsNativeAppSupportOS2::SetIsServerMode( PRBool isServerMode ) {
return nsNativeAppSupportBase::SetIsServerMode( isServerMode );
}
NS_IMETHODIMP
nsNativeAppSupportOS2::OnLastWindowClosing() {
if ( !mServerMode )
return NS_OK;
// If the last window closed is our special "turbo" window made
// in StartServerMode(), don't do anything.
if ( mInitialWindowActive ) {
mInitialWindowActive = PR_FALSE;
return NS_OK;
}
nsresult rv;
// If activated by the browser.turbo.singleProfileOnly pref,
// check for multi-profile situation and turn off turbo mode
// if there are multiple profiles.
PRBool singleProfileOnly = PR_FALSE;
nsCOMPtr<nsIPrefBranch> prefService( do_GetService( NS_PREFSERVICE_CONTRACTID, &rv ) );
if ( NS_SUCCEEDED( rv ) ) {
prefService->GetBoolPref( "browser.turbo.singleProfileOnly", &singleProfileOnly );
}
if ( singleProfileOnly ) {
nsCOMPtr<nsIProfile> profileMgr( do_GetService( NS_PROFILE_CONTRACTID, &rv ) );
if ( NS_SUCCEEDED( rv ) ) {
PRInt32 profileCount = 0;
if ( NS_SUCCEEDED( profileMgr->GetProfileCount( &profileCount ) ) &&
profileCount > 1 ) {
// Turn off turbo mode and quit the application.
SetIsServerMode( PR_FALSE );
nsCOMPtr<nsIAppStartup> appStartup
(do_GetService(NS_APPSTARTUP_CONTRACTID, &rv));
if ( NS_SUCCEEDED( rv ) ) {
appStartup->Quit(nsIAppStartup::eAttemptQuit);
}
return NS_OK;
}
}
}
nsCOMPtr<nsIObserverService> observerService(do_GetService("@mozilla.org/observer-service;1", &rv));
if (NS_FAILED(rv)) return rv;
observerService->NotifyObservers(nsnull, "session-logout", nsnull);
mForceProfileStartup = PR_TRUE;
return NS_OK;
}
// This is a public function called by nsAppRunner.cpp. Its primary
// purpose is to determine if any commandline options require a VIO
// ("console") window. If so and one isn't present, it will restart
// the app in a VIO session. It is intended to be called as early as
// possible during startup and before any other commandline processing.
// It returns TRUE if the current instance should continue running and
// FALSE if it should terminate upon this function's return.
PRBool StartOS2App( int aArgc, char **aArgv)
{
PRBool rv = PR_TRUE;
PPIB ppib;
PTIB ptib;
DosGetInfoBlocks(&ptib, &ppib);
// if this isn't a PM session, reset the session type to enable use
// of PM functions; if it is PM, look for args that require a VIO
// session - however, ignore them if any of the turbo-mode args are
// also present (why restart as VIO just to launch a detached process)
if (ppib->pib_ultype != SSF_TYPE_PM)
ppib->pib_ultype = SSF_TYPE_PM;
else {
for (int i = 1; i < aArgc; i++ ) {
char *arg = aArgv[i];
if (*arg != '-' && *arg != '/')
continue;
arg++;
// as soon as we find a turbo-mode arg, we're done; OTOH, if we
// find a VIO-mode arg, keep looking so we don't miss a turbo arg
if (stricmp("turbo", arg) == 0 ||
stricmp("server", arg) == 0 ||
stricmp("kill", arg) == 0 ||
stricmp("killall", arg) == 0) {
rv = PR_TRUE;
break;
}
else {
if (stricmp("?", arg) == 0 ||
stricmp("h", arg) == 0 ||
stricmp("v", arg) == 0 ||
stricmp("help", arg) == 0 ||
stricmp("version", arg) == 0 ||
stricmp("console", arg) == 0)
rv = PR_FALSE;
}
}
}
// if the session type is OK, increase the number of
// file handles available to the app, then exit
if (rv) {
ULONG ulMaxFH = 0;
LONG ulReqCount = 0;
DosSetRelMaxFH(&ulReqCount, &ulMaxFH);
if (ulMaxFH < 256)
DosSetMaxFH(256);
return rv;
}
// the app has to be restarted in a VIO session
char szErrObj[64] = "";
STARTDATA x;
memset(&x, 0, sizeof(x));
x.Length = sizeof(x);
x.InheritOpt = SSF_INHERTOPT_PARENT;
x.SessionType = SSF_TYPE_WINDOWABLEVIO;
x.PgmControl = SSF_CONTROL_NOAUTOCLOSE;
x.ObjectBuffer = szErrObj;
x.ObjectBuffLen = sizeof(szErrObj);
// the f/q exename is the string preceding ppib->pib_pchcmd;
// the original commandline is the string following it
char * ptr = ppib->pib_pchcmd - 2;
while (*ptr)
ptr--;
x.PgmName = ptr + 1;
x.PgmInputs = strchr(ppib->pib_pchcmd, 0) + 1;
// restart the app; if this session is in the background, trying
// to start in the foreground will produce an error, but the app
// will still start; if DosStartSession has a real failure, forget
// the console and let the current instance keep running
ULONG ulSession;
PID pid;
ULONG rc = DosStartSession(&x, &ulSession, &pid);
if (rc && rc != ERROR_SMG_START_IN_BACKGROUND)
rv = PR_TRUE;
return rv;
}