wingos.cpp

一个更为先进的嵌入式操作系统.采用RMS线程调度算法,具有信号量等同步对象.亦包括GUI. 通过该系统您可以极大知道Windows的内部秘密.

// WinGOS.cpp : 定义应用程序的入口点。
//


#include "stdafx.h"
#include "WinGOS.h"
#include "WinHal.h"
#include "SimDisplay.h"

#define MAX_LOADSTRING 100
// 全局变量:
HINSTANCE hInst;								// 当前实例
TCHAR szTitle[MAX_LOADSTRING];					// 标题栏文本
TCHAR szWindowClass[MAX_LOADSTRING];			// 主窗口类名

// 此代码模块中包含的函数的前向声明:
ATOM				MyRegisterClass(HINSTANCE hInstance);
BOOL				InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	About(HWND, UINT, WPARAM, LPARAM);

HWND m_hWnd;
PVOID m_pBmpFile=NULL;
PBITMAPINFO m_pBmpInfo;
WORD g_aSDBuffer[SD_CYSCREEN*SD_CXSCREEN];
extern void TRACE(LPCSTR sz,...);

DWORD lsqrt(DWORD m)
{
	DWORD n,i,r,v;

	n=0;
	r=0;
	m<<=2;
	for(i=15;i>0;i--)
	{
		n<<=1;
		r<<=2; r|=m>>30;
		v=n; v<<=1; v|=1;
		m<<=2;
		if(r>=v)
		{
			r-=v;
			n++; 
		}
	} 
	return n; 
} 

void LoadBmpFile(LPCTSTR file)
{
	DWORD nSize;
	BOOL bResult;
	HANDLE hFile = CreateFile(file,GENERIC_READ,
		0,NULL,OPEN_EXISTING,0,NULL);
	if(hFile==HANDLE(-1))return;
	nSize=GetFileSize(hFile,NULL);
	m_pBmpFile=::VirtualAlloc(0,nSize,MEM_COMMIT,PAGE_READWRITE);
	bResult=ReadFile(hFile,m_pBmpFile,nSize,&nSize,NULL);
	CloseHandle(hFile);
}

void SD_Init()
{
	m_pBmpInfo=(PBITMAPINFO)malloc(sizeof(BITMAPINFOHEADER)+sizeof(DWORD)*3);
	BITMAPINFOHEADER &bh=*PBITMAPINFOHEADER(m_pBmpInfo);
	PDWORD aColor=PDWORD(&m_pBmpInfo->bmiColors);
	bh.biSize=sizeof(BITMAPINFOHEADER);
	bh.biWidth=SD_CXSCREEN;
	bh.biHeight=SD_CYSCREEN;
	bh.biPlanes=1;
	bh.biBitCount=16;
	bh.biCompression=BI_BITFIELDS;
	bh.biSizeImage=0;
	bh.biXPelsPerMeter=3270;
	bh.biYPelsPerMeter=3270;
	bh.biClrUsed=0;
	bh.biClrImportant=0;
	aColor[0]=31<<11;
	aColor[1]=63<<5;
	aColor[2]=31;

	LoadBmpFile("C:\\temp\\wp.bmp");
}

void SD_Invalidate(PVOID pRect)
{
	InvalidateRect(m_hWnd,NULL,FALSE);
}

void SD_ViewSize(double dScale)
{
	RECT rw,rc;
	int dx,dy;
	int sx,sy;
	GetWindowRect(m_hWnd,&rw);
	GetClientRect(m_hWnd,&rc);
	dx=rc.right-rc.left;
	dx=int(dScale*SD_CXSCREEN+0.5)-dx;
	dy=rc.bottom-rc.top;
	dy=int(dScale*SD_CYSCREEN+0.5)-dy;
	dx+=rw.right-rw.left;
	dy+=rw.bottom-rw.top;
	sx=GetSystemMetrics(SM_CXSCREEN);
	sy=GetSystemMetrics(SM_CYSCREEN);
	rw.left=(sx-dx)>>1;
	rw.top=(sy-dy)>>1;
	MoveWindow(m_hWnd,rw.left,rw.top,dx,dy,TRUE);
}

void SD_Update(HDC hDC)
{
	RECT rect;
	GetClientRect(m_hWnd,&rect);
	StretchDIBits(hDC,rect.left,rect.top,
		rect.right-rect.left,rect.bottom-rect.top,
		0,0,SD_CXSCREEN,SD_CYSCREEN,
		g_aSDBuffer,m_pBmpInfo,DIB_RGB_COLORS,SRCCOPY);
}

void Sim_MouseEvent(UINT nMessage,WPARAM wParam,LPARAM lParam)
{
	RECT r;
	DWORD x=LOWORD(lParam),y=HIWORD(lParam);
	GetClientRect(m_hWnd,&r);
	x=(x*SD_CXSCREEN+(r.right>>1))/r.right;
	y=(y*SD_CYSCREEN+(r.bottom>>1))/r.bottom;
	HalMain(halMouseEvent,nMessage,MAKELONG(x,y));
}

int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
 	// TODO: 在此放置代码。
	MSG msg;
	HACCEL hAccelTable;


	// 初始化全局字符串
	LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadString(hInstance, IDC_WINGOS, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	// 执行应用程序初始化:
	if (!InitInstance (hInstance, nCmdShow)) 
	{
		return FALSE;
	}

	//GOS 程序
	SD_Init();
	SD_Invalidate(NULL);
	HalMain(halCreate,0,0);
	::Sleep(50);
	if(m_pBmpFile)HalMain(halSetWallpaper,WPARAM(m_pBmpFile),0);

	hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC_WINGOS);

	// 主消息循环:
	g_AW.Play("c:\\temp\\gos.pcm");
	while (GetMessage(&msg, NULL, 0, 0)) 
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) 
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}
	g_AW.StopPlay();

	return (int) msg.wParam;
}



//
//  函数: MyRegisterClass()
//
//  目的: 注册窗口类。
//
//  注释: 
//
//    仅当希望在已添加到 Windows 95 的
//    “RegisterClassEx”函数之前此代码与 Win32 系统兼容时，
//    才需要此函数及其用法。调用此函数
//    十分重要，这样应用程序就可以获得关联的
//   “格式正确的”小图标。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
	WNDCLASSEX wcex;

	wcex.cbSize = sizeof(WNDCLASSEX); 

	wcex.style			= CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc	= (WNDPROC)WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, (LPCTSTR)IDI_WINGOS);
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= NULL;
	wcex.lpszMenuName	= (LPCTSTR)IDC_WINGOS;
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL);

	return RegisterClassEx(&wcex);
}

//
//   函数: InitInstance(HANDLE, int)
//
//   目的: 保存实例句柄并创建主窗口
//
//   注释: 
//
//        在此函数中，我们在全局变量中保存实例句柄并
//        创建和显示主程序窗口。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

   hInst = hInstance; // 将实例句柄存储在全局变量中

   m_hWnd=hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

   SD_ViewSize(1);
   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

   return TRUE;
}

//
//  函数: WndProc(HWND, unsigned, WORD, LONG)
//
//  目的: 处理主窗口的消息。
//
//  WM_COMMAND	- 处理应用程序菜单
//  WM_PAINT	- 绘制主窗口
//  WM_DESTROY	- 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;
	PAINTSTRUCT ps;
	HDC hdc;

	switch (message) 
	{
	case WM_COMMAND:
		wmId    = LOWORD(wParam); 
		wmEvent = HIWORD(wParam); 
		// 分析菜单选择:
		switch (wmId)
		{
		case IDM_ABOUT:
			DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
			break;
		case IDM_EXIT:
			DestroyWindow(hWnd);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
		}
		break;
	case WM_PAINT:
		hdc = BeginPaint(hWnd, &ps);
		// TODO: 在此添加任意绘图代码...
		SD_Update(hdc);
		EndPaint(hWnd, &ps);
		break;
	case WM_LBUTTONDOWN:
	case WM_LBUTTONUP:
	case WM_MOUSEMOVE:
		Sim_MouseEvent(message,wParam,lParam);
		break;
	case WM_DESTROY:
		PostQuitMessage(0);
		break;
	default:
		return DefWindowProc(hWnd, message, wParam, lParam);
	}
	return 0;
}

// “关于”框的消息处理程序。
LRESULT CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
	case WM_INITDIALOG:
		return TRUE;

	case WM_COMMAND:
		if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) 
		{
			EndDialog(hDlg, LOWORD(wParam));
			return TRUE;
		}
		break;
	}
	return FALSE;
}