sl@0: // Copyright (c) 2003-2009 Nokia Corporation and/or its subsidiary(-ies).
sl@0: // All rights reserved.
sl@0: // This component and the accompanying materials are made available
sl@0: // under the terms of "Eclipse Public License v1.0"
sl@0: // which accompanies this distribution, and is available
sl@0: // at the URL "http://www.eclipse.org/legal/epl-v10.html".
sl@0: //
sl@0: // Initial Contributors:
sl@0: // Nokia Corporation - initial contribution.
sl@0: //
sl@0: // Contributors:
sl@0: //
sl@0: // Description:
sl@0: // Extracted from DEBLOGWN.CPP
sl@0: // Code to run the WIN32 windows with the output
sl@0: // 
sl@0: //
sl@0: 
sl@0: #include <e32std.h>
sl@0: #include <e32base.h>
sl@0: #include <emulator.h>
sl@0: #include "LOGWIN.H"
sl@0: 
sl@0: GLDEF_D struct TSharedMemory GSharedMemory;
sl@0: //GLDEF_D struct HWND__ *Hwnd;
sl@0: //LOCAL_D RSemaphore Sem;
sl@0: 
sl@0: const TUint KHeapSize=0x8000;
sl@0: 
sl@0: 
sl@0: TInt numLines(const CArrayVarSeg<TText> &aTextArray, TBool aOutOfMemory)
sl@0: 	{
sl@0: 	return (TInt)(aOutOfMemory)?
sl@0: 				aTextArray.Count():
sl@0: 				aTextArray.Count()-1;
sl@0: 	}
sl@0: 
sl@0: TInt numVisibleLines(TInt aHeight, TInt aTextHeight)
sl@0: 	{
sl@0: 	return aHeight/aTextHeight;
sl@0: 	}
sl@0: 
sl@0: TInt32 __stdcall WndProc(struct HWND__ *aHwnd, TUint aMessage, TUint wParam, TInt32 lParam)
sl@0:     {
sl@0:     HDC hdc;
sl@0:     PAINTSTRUCT ps;
sl@0: 	HFONT hfont;
sl@0:     RECT rect;
sl@0: 	TInt i,
sl@0: 		paintMin,
sl@0: 		paintMax;
sl@0: 	static LOGFONT logFont;
sl@0: 	static TEXTMETRIC tm;
sl@0: 	static TInt textHeight,
sl@0: 		width,
sl@0: 		height,
sl@0: 		scrollMin=0,
sl@0: 		scrollMax,
sl@0: 		numLinesAbove=scrollMin,
sl@0: 		prevNumLinesAbove;
sl@0: 	static CArrayVarSeg<TText> *pmsg;
sl@0: 	static TBool outOfMemory=EFalse;
sl@0: 
sl@0:     switch (aMessage)
sl@0:         {
sl@0:     case WM_CREATE:
sl@0: 		hdc=GetDC(aHwnd);
sl@0: 
sl@0: 		pmsg=new(ELeave) CArrayVarSeg<TText>(20);
sl@0: 		{
sl@0: 		TBuf<0x20> errorMsg;
sl@0: 		errorMsg=_L("ERROR: out of memory");
sl@0: 		errorMsg.ZeroTerminate();
sl@0: 		TRAPD(err,pmsg->AppendL(*errorMsg.Ptr(), (errorMsg.Length()+1)*sizeof(TText)));
sl@0: 		if (err!=KErrNone)
sl@0: 			return(err);
sl@0: 		}
sl@0: 		GetTextMetrics(hdc, &tm);
sl@0: 		textHeight=tm.tmHeight+tm.tmExternalLeading;
sl@0:         GetClientRect(aHwnd, &rect);
sl@0: 		width=rect.right;
sl@0: 		height=rect.bottom;
sl@0: 		scrollMax=numLines(*pmsg, outOfMemory);
sl@0: 		SetScrollPos(aHwnd, SB_VERT, numLinesAbove, TRUE);
sl@0: 		SetScrollRange(aHwnd, SB_VERT, scrollMin, scrollMax, FALSE);
sl@0: 		logFont.lfHeight=8;
sl@0: 		wsprintf(logFont.lfFaceName, (LPCTSTR)_S("courier"));
sl@0: 
sl@0: 		ReleaseDC(aHwnd, hdc);
sl@0: 		return 0;
sl@0: 	case WM_USER+EAppendText:
sl@0: 		{
sl@0: 		TRAPD(err,pmsg->InsertL(pmsg->Count()-1, *(TText *)lParam, wParam));
sl@0: 		if (err!=KErrNone)
sl@0: 			{
sl@0: 			pmsg->Delete(0, Max(0, (TInt)pmsg->Count()-1));
sl@0: 			numLinesAbove=scrollMax=scrollMin;
sl@0: 			SetScrollPos(aHwnd, SB_VERT, numLinesAbove, TRUE);
sl@0: 			SetScrollRange(aHwnd, SB_VERT, scrollMin, scrollMax, FALSE);
sl@0: 			hdc=GetDC(aHwnd);
sl@0: 			PatBlt(hdc, 0, 0, width, height, WHITENESS);
sl@0: 			ReleaseDC(aHwnd, hdc);
sl@0: 			return(err);
sl@0: 			}
sl@0: 		// adjust the scroll position so that the last line added is visible
sl@0: 		if (numLinesAbove<numLines(*pmsg, outOfMemory)-numVisibleLines(height, textHeight))
sl@0: 			{
sl@0: 			prevNumLinesAbove=numLinesAbove;
sl@0: 			numLinesAbove=numLines(*pmsg, outOfMemory)-numVisibleLines(height, textHeight);
sl@0: 			scrollMax=numLines(*pmsg, outOfMemory);
sl@0: 			SendMessage(aHwnd, WM_USER+EScrollToPos, 0, 0L);
sl@0: 			}
sl@0: 		else
sl@0: 			{
sl@0: 			hdc=GetDC(aHwnd);
sl@0: 			hfont=(HFONT)SelectObject(hdc, CreateFontIndirect(&logFont));
sl@0: 			TText *text=&((*pmsg)[scrollMax]);
sl@0: 			TextOut(hdc, 0, (scrollMax-numLinesAbove)*textHeight, (LPCTSTR)text, User::StringLength(text));
sl@0: 			scrollMax=numLines(*pmsg, outOfMemory);
sl@0: 			ReleaseDC(aHwnd, hdc);
sl@0: 			}
sl@0: 		return KErrNone;
sl@0: 		}
sl@0: 	case WM_USER+EScrollToPos:
sl@0: 		SetScrollPos(aHwnd, SB_VERT, numLinesAbove, TRUE);
sl@0: 		SetScrollRange(aHwnd, SB_VERT, scrollMin, scrollMax, FALSE);
sl@0: 
sl@0: 		hdc=GetDC(aHwnd);
sl@0: 		hfont=(HFONT)SelectObject(hdc, CreateFontIndirect(&logFont));
sl@0: 
sl@0: 		if (numLinesAbove>prevNumLinesAbove)
sl@0: 		// scrolling towards end, therefore text moves up on screen
sl@0: 			{
sl@0: 			TInt numLinesToDraw=numLinesAbove-prevNumLinesAbove;
sl@0: 			TInt numLinesToBlt=numVisibleLines(height, textHeight)-numLinesToDraw;
sl@0: 			if (numLinesToBlt>0)
sl@0: 				ScrollWindow(aHwnd, 0, -numLinesToDraw*textHeight, NULL, NULL);
sl@0: 			PatBlt(hdc, 0, numLinesToBlt*textHeight, width, numLinesToDraw*textHeight, WHITENESS);
sl@0: 			paintMin=Max(Min(numLinesAbove+numLinesToBlt, scrollMax), scrollMin);
sl@0: 			paintMax=Min(paintMin+numLinesToDraw, scrollMax);
sl@0: 			for (i=paintMin; i<paintMax; i++)
sl@0: 				{
sl@0: 				TText *text=&((*pmsg)[i]);
sl@0: 				TextOut(hdc, 0, (i-numLinesAbove)*textHeight, (LPCTSTR)text, User::StringLength(text));
sl@0: 				}
sl@0: 			}
sl@0: 		else
sl@0: 		// scrolling towards beginning, therefore text moves down on screen
sl@0: 			{
sl@0: 			TInt numLinesToDraw=prevNumLinesAbove-numLinesAbove;
sl@0: 			TInt numLinesToBlt=numVisibleLines(height, textHeight)-numLinesToDraw;
sl@0: 			if (numLinesToBlt>0)
sl@0: 				ScrollWindow(aHwnd, 0, numLinesToDraw*textHeight, NULL, NULL);
sl@0: 			PatBlt(hdc, 0, 0, width, numLinesToDraw*textHeight, WHITENESS);
sl@0: 			paintMin=Max(Min(numLinesAbove, scrollMax), scrollMin);
sl@0: 			paintMax=Min(paintMin+numLinesToDraw, scrollMax);
sl@0: 			for (i=paintMin; i<paintMax; i++)
sl@0: 				{
sl@0: 				TText *text=&((*pmsg)[i]);
sl@0: 				TextOut(hdc, 0, (i-numLinesAbove)*textHeight, (LPCTSTR)text, User::StringLength(text));
sl@0: 				}
sl@0: 			}
sl@0: 
sl@0: 		DeleteObject(hfont);
sl@0: 		ReleaseDC(aHwnd, hdc);
sl@0: 		return 0;
sl@0:     case WM_PAINT:
sl@0: 		hdc=BeginPaint(aHwnd, &ps);
sl@0: 		hfont=(HFONT)SelectObject(hdc, CreateFontIndirect(&logFont));
sl@0: 
sl@0: 		paintMin=Max(scrollMin, numLinesAbove);
sl@0: 		paintMax=Min(numLines(*pmsg, outOfMemory), numLinesAbove+numVisibleLines(height, textHeight));
sl@0: 		for (i=paintMin; i<paintMax; i++)
sl@0: 				{
sl@0: 				TText *text=&((*pmsg)[i]);
sl@0: 				TextOut(hdc, 0, (i-numLinesAbove)*textHeight, (LPCTSTR)text, User::StringLength(text));
sl@0: 				}
sl@0: 
sl@0: 		DeleteObject(hfont);
sl@0: 		EndPaint(aHwnd, &ps);
sl@0:         return 0;
sl@0:     case WM_SIZE:
sl@0:         width=LOWORD(lParam);
sl@0:         height=HIWORD(lParam);
sl@0: 		return 0;
sl@0:     case WM_VSCROLL:
sl@0: 		prevNumLinesAbove=numLinesAbove;
sl@0:         switch (LOWORD(wParam))
sl@0: 			{
sl@0: 		case SB_TOP:
sl@0: 			numLinesAbove=scrollMin;
sl@0: 			break;
sl@0: 		case SB_BOTTOM:
sl@0: 			numLinesAbove=scrollMax;
sl@0: 			break;
sl@0: 		case SB_LINEUP:
sl@0: 			numLinesAbove--;
sl@0: 			break;
sl@0: 		case SB_LINEDOWN:
sl@0: 			numLinesAbove++;
sl@0: 			break;
sl@0: 		case SB_PAGEUP:
sl@0: 			numLinesAbove-=numVisibleLines(height, textHeight);
sl@0: 			break;
sl@0: 		case SB_PAGEDOWN:
sl@0: 			numLinesAbove+=numVisibleLines(height, textHeight);
sl@0: 			break;
sl@0: 		case SB_THUMBTRACK:
sl@0: 			numLinesAbove=HIWORD(wParam);
sl@0: 			break;
sl@0: 			}
sl@0: 		numLinesAbove=max(scrollMin, min(numLinesAbove, scrollMax));
sl@0: 
sl@0: 		if (numLinesAbove!=prevNumLinesAbove)
sl@0: 			SendMessage(aHwnd, WM_USER+EScrollToPos, 0, 0L);
sl@0: 		return 0;
sl@0:     case WM_KEYDOWN:
sl@0: 		switch (wParam)
sl@0: 			{
sl@0: 		case VK_HOME:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_TOP, 0L);
sl@0: 			break;
sl@0: 		case VK_END:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_BOTTOM, 0L);
sl@0: 			break;
sl@0: 		case VK_PRIOR:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_PAGEUP, 0L);
sl@0: 			break;
sl@0: 		case VK_NEXT:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_PAGEDOWN, 0L);
sl@0: 			break;
sl@0: 		case VK_UP:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_LINEUP, 0L);
sl@0: 			break;
sl@0: 		case VK_DOWN:
sl@0: 			SendMessage(aHwnd, WM_VSCROLL, SB_LINEDOWN, 0L);
sl@0: 			break;
sl@0: 			}
sl@0: 		return 0;
sl@0: 	case WM_DESTROY:
sl@0: 		delete pmsg;
sl@0: 		PostQuitMessage(0);
sl@0: 		return 0;
sl@0: 		}
sl@0: 
sl@0: 	return DefWindowProc(aHwnd, aMessage, wParam, lParam);
sl@0: 	}
sl@0: 
sl@0: TInt logWinMain(TAny *)
sl@0:     {
sl@0:     MSG msg;
sl@0:     WNDCLASS wndclass;
sl@0:     const TText *szAppName=_S("Window Server Log");
sl@0: 
sl@0:     wndclass.style=CS_HREDRAW|CS_VREDRAW;
sl@0:     wndclass.lpfnWndProc=WndProc;
sl@0:     wndclass.cbClsExtra=0;
sl@0:     wndclass.cbWndExtra=0;
sl@0:     wndclass.hInstance=NULL;
sl@0:     wndclass.hIcon=LoadIcon(NULL, IDI_APPLICATION);
sl@0:     wndclass.hCursor=LoadCursor(NULL, IDC_ARROW);
sl@0: 	//wndclass.hbrBackground=(HBRUSH)GetStockObject(WHITE_BRUSH);
sl@0: 	wndclass.hbrBackground=(HBRUSH)GetSysColorBrush(COLOR_BTNFACE);
sl@0:     wndclass.lpszMenuName=NULL;
sl@0:     wndclass.lpszClassName=(LPCTSTR)szAppName;
sl@0: 
sl@0:     RegisterClass(&wndclass);
sl@0: 
sl@0: 	GSharedMemory.iHwnd=CreateWindow((LPCTSTR)szAppName,
sl@0:                     (LPCTSTR)szAppName,
sl@0: 					WS_OVERLAPPEDWINDOW,
sl@0: 					//WS_OVERLAPPEDWINDOW|WS_VSCROLL|WS_MINIMIZE,
sl@0:                     CW_USEDEFAULT,
sl@0:                     CW_USEDEFAULT,
sl@0:                     CW_USEDEFAULT,
sl@0:                     CW_USEDEFAULT,
sl@0:                     NULL,
sl@0:                     NULL,
sl@0:                     NULL,
sl@0:                     NULL);
sl@0: 
sl@0: 	ShowWindow(GSharedMemory.iHwnd, SW_SHOWMINNOACTIVE);
sl@0: 	//ShowWindow(GSharedMemory.iHwnd, SW_MINIMIZE);
sl@0: 	UpdateWindow(GSharedMemory.iHwnd);
sl@0: 	GSharedMemory.iStartSemaphore.Signal(); // allows logging to start now that the window, etc. has been set up
sl@0: 	Emulator::Escape();
sl@0:     while (GetMessage(&msg, NULL, 0, 0))
sl@0:         {
sl@0:         TranslateMessage(&msg);
sl@0:         DispatchMessage(&msg);
sl@0:         }
sl@0: 	Emulator::Reenter();
sl@0:     return msg.wParam;
sl@0:     }
sl@0: 
sl@0: GLDEF_C void CreateLogWinThreadL()
sl@0: 	{
sl@0: 	_LIT(KLogWin,"LogingWindow");
sl@0: 	RThread wsThread;
sl@0: 	GSharedMemory.iStartSemaphore.CreateLocal(0);
sl@0: 	User::LeaveIfError(wsThread.Create(KLogWin,logWinMain,KDefaultStackSize,KHeapSize,KHeapSize,NULL));
sl@0: 	wsThread.Resume();
sl@0: 	GSharedMemory.iStartSemaphore.Wait();
sl@0: 	}