/**
* Tear down the context currently associated with the display.
*/
static void engine_term_display(struct engine* engine)
{
dini_context(engine->context);
ps_context_unref(engine->context);
ps_canvas_unref(engine->canvas);
ps_shutdown();
}
void kbd_irq(void)
{
unsigned scan_code;
char temp[255];
unsigned int c;
DWORD flags;
dex32_stopints(&flags);
/* read I/O port 60h to reset interrupt at 8042 keyboard controller chip */
scan_code = inportb(0x60);
c=set1_scancode_to_ascii(scan_code);
if (c!=-1)
{
if (!kb_dohotkey(c,kbd_status))
{
if (c == SOFT_RESET) ps_shutdown();
else
if (c==KEY_F2+400) console_new();
else
if (c==KEY_F1+400) dex32_set_tm_state(!dex32_get_tm_state());
else
if (c==KEY_F4+400) kill_foreground(); //force terminate
else
if (c=='c'-'a')
signal_foreground(); //ask the app to terminate itself
else
{
if (inq(&_q,c)==-1) beep();
}
};
};
dex32_restoreints(flags);
};
static int PlatformProc(HWND hWnd, int message, WPARAM wParam, LPARAM lParam)
{
switch (message) {
case MSG_CREATE:
{
if (!hmWnd)
hmWnd = hWnd;
unsigned char* pdr = 0;
int w,h,p;
RECT r;
key_down = FALSE;
GetClientRect(hWnd, &r);
#if RGB555
sdc = CreateMemDC(width, height, 16, MEMDC_FLAG_SWSURFACE, 0x7C00, 0x3E0, 0x1F, 0x8000);
#else
sdc = CreateMemDC(width, height, 16, MEMDC_FLAG_SWSURFACE, 0xF800, 0x7E0, 0x1F, 0x00);
#endif
pdr = LockDC(sdc, &r, &w, &h, &p);
UnlockDC(sdc);
#if RGB555
fmt = COLOR_FORMAT_RGB555;
#else
fmt = COLOR_FORMAT_RGB565;
#endif
ps_initialize();
canvas = ps_canvas_create_with_data(pdr, fmt, w, h, p);
context = ps_context_create(canvas, 0);
on_init(context, width, height);
}
break;
case MSG_TIMER:
on_timer();
break;
case MSG_PAINT:
{
HDC hdc = BeginPaint(hWnd);
on_draw(context);
BitBlt(sdc, 0, 0, width, height, hdc, 0, 0, 0);
EndPaint(hWnd, hdc);
}
return 0;
case MSG_ERASEBKGND:
return 0;
case MSG_LBUTTONDOWN:
{
key_down = TRUE;
on_mouse_event(LEFT_BUTTON_DOWN, key_conv(wParam), LOSWORD(lParam), HISWORD(lParam));
}
break;
case MSG_LBUTTONUP:
{
key_down = FALSE;
on_mouse_event(LEFT_BUTTON_UP, key_conv(wParam), LOSWORD(lParam), HISWORD(lParam));
}
break;
case MSG_MOUSEMOVE:
{
DWORD k = key_conv(wParam);
if (key_down)
k |= EVT_LBUTTON;
on_mouse_event(MOUSE_MOVE, k, LOSWORD(lParam), HISWORD(lParam));
}
break;
case MSG_KEYDOWN:
on_key_event(KEY_EVENT_DOWN, get_virtual_key(wParam));
break;
case MSG_KEYUP:
on_key_event(KEY_EVENT_UP, get_virtual_key(wParam));
break;
case MSG_SIZECHANGED:
{
RECT r;
int w,h,p;
unsigned char* pdr = 0;
ps_canvas* old_canvas = 0;
RECT* rc = (RECT*)lParam;
width = RECTWP(rc);
height = RECTHP(rc);
if (sdc)
DeleteMemDC(sdc);
if (width < 1)
width = 1;
if (height < 1)
height = 1;
#if RGB555
sdc = CreateMemDC(width, height, 16, MEMDC_FLAG_SWSURFACE, 0x7C00, 0x3E0, 0x1F, 0x8000);
#else
sdc = CreateMemDC(width, height, 16, MEMDC_FLAG_SWSURFACE, 0xF800, 0x7E0, 0x1F, 0x00);
#endif
GetClientRect(hWnd, &r);
pdr = LockDC(sdc, &r, &w, &h, &p);
UnlockDC(sdc);
canvas = ps_canvas_create_with_data(pdr, fmt, w, h, p);
old_canvas = ps_context_set_canvas(context, canvas);
ps_canvas_unref(old_canvas);
on_size(width, height);
}
break;
case MSG_CLOSE:
on_term(context);
ps_context_unref(context);
ps_canvas_unref(canvas);
ps_shutdown();
DeleteMemDC(sdc);
DestroyMainWindow (hWnd);
PostQuitMessage (hWnd);
return 0;
}
return DefaultMainWinProc(hWnd, message, wParam, lParam);
}
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
PAINTSTRUCT ps;
HDC hdc;
switch (message)
{
case WM_CREATE:
{
if (!hmWnd)
hmWnd = hWnd;
hdc = GetDC(hWnd);
CBIT = GetDeviceCaps(hdc, BITSPIXEL);
CBYTE = CBIT/8;
ReleaseDC(hWnd, hdc);
buffer = malloc(width*height*CBYTE);
bmp.bmType = 0;
bmp.bmWidth = width;
bmp.bmHeight = height;
bmp.bmWidthBytes = width*CBYTE;
bmp.bmPlanes = 1;
bmp.bmBitsPixel = CBIT;
bmp.bmBits = buffer;
if (CBYTE == 4)
fmt = COLOR_FORMAT_BGRA;
else if (CBYTE == 3)
fmt = COLOR_FORMAT_BGR;
else if (CBYTE == 2)
fmt = COLOR_FORMAT_RGB565;
ps_initialize();
canvas = ps_canvas_create_with_data(buffer, fmt, width, height, width*CBYTE);
context = ps_context_create(canvas, 0);
on_init(context, width, height);
}
break;
case WM_PAINT:
{
HDC mdc;
HGDIOBJ h;
hdc = BeginPaint(hWnd, &ps);
on_draw(context);
mdc = CreateCompatibleDC(hdc);
hbmp = CreateBitmapIndirect(&bmp);
h = SelectObject(mdc, hbmp);
BitBlt(hdc, 0, 0, width, height, mdc, 0, 0, SRCCOPY);
SelectObject(mdc, h);
DeleteObject(hbmp);
DeleteDC(mdc);
EndPaint(hWnd, &ps);
}
break;
case WM_TIMER:
on_timer();
break;
case WM_SIZE:
{
ps_canvas* old_canvas = 0;
width = LOWORD(lParam);
height = HIWORD(lParam);
free(buffer);
if (width < 1)
width = 1;
if (height < 1)
height = 1;
buffer = malloc(width*height*CBYTE);
bmp.bmType = 0;
bmp.bmWidth = width;
bmp.bmHeight = height;
bmp.bmWidthBytes = width*CBYTE;
bmp.bmPlanes = 1;
bmp.bmBitsPixel = CBIT;
bmp.bmBits = buffer;
canvas = ps_canvas_create_with_data(buffer, fmt, width, height, width*CBYTE);
old_canvas = ps_context_set_canvas(context, canvas);
ps_canvas_unref(old_canvas);
on_size(width, height);
}
break;
case WM_ERASEBKGND:
break;
case WM_LBUTTONDOWN:
on_mouse_event(LEFT_BUTTON_DOWN, wParam, LOWORD(lParam), HIWORD(lParam));
break;
case WM_MOUSEMOVE:
on_mouse_event(MOUSE_MOVE, wParam, LOWORD(lParam), HIWORD(lParam));
break;
case WM_KEYDOWN:
on_key_event(KEY_EVENT_DOWN, wParam);
break;
case WM_KEYUP:
on_key_event(KEY_EVENT_UP, wParam);
break;
case WM_DESTROY:
{
on_term(context);
ps_context_unref(context);
ps_canvas_unref(canvas);
ps_shutdown();
free(buffer);
PostQuitMessage(0);
}
break;
default:
return DefWindowProc(hWnd, message, wParam, lParam);
}
return 0;
}
