2 * (C) GraÅžvydas "notaz" Ignotas, 2009
\r
4 * This work is licensed under the terms of any of these licenses
\r
6 * - GNU GPL, version 2 or later.
\r
7 * - GNU LGPL, version 2.1 or later.
\r
9 * See the COPYING file in the top-level directory.
\r
13 #include "../lprintf.h"
\r
17 #define EmuWidth 320
\r
18 #define EmuHeight 240
\r
20 #define RELEASE(x) if (x) x->Release(); x=NULL;
\r
21 #define LOGFAIL() lprintf("fail: %s %s:%i\n", __FUNCTION__, __FILE__, __LINE__)
\r
23 static LPDIRECTDRAW7 m_pDD = NULL;
\r
24 static LPDIRECTDRAWSURFACE7 m_pddsFrontBuffer = NULL;
\r
25 static LPDIRECTDRAWSURFACE7 m_pddsBackBuffer = NULL;
\r
27 // quick and dirty stuff..
\r
28 void DirectExit(void)
\r
30 RELEASE(m_pddsBackBuffer);
\r
31 RELEASE(m_pddsFrontBuffer);
\r
35 int DirectInit(void)
\r
38 LPDIRECTDRAWCLIPPER pcClipper = NULL;
\r
39 DDSURFACEDESC2 ddsd;
\r
41 ret = DirectDrawCreateEx(NULL, (VOID**)&m_pDD, IID_IDirectDraw7, NULL);
\r
42 if (ret) { LOGFAIL(); return 1; }
\r
44 // Set cooperative level
\r
45 ret = m_pDD->SetCooperativeLevel( FrameWnd, DDSCL_NORMAL );
\r
46 if (ret) { LOGFAIL(); goto fail; }
\r
48 // Create the primary surface
\r
49 ZeroMemory( &ddsd, sizeof( ddsd ) );
\r
50 ddsd.dwSize = sizeof( ddsd );
\r
51 ddsd.dwFlags = DDSD_CAPS;
\r
52 ddsd.ddsCaps.dwCaps = DDSCAPS_PRIMARYSURFACE;
\r
54 ret = m_pDD->CreateSurface( &ddsd, &m_pddsFrontBuffer, NULL );
\r
55 if (ret) { LOGFAIL(); goto fail; }
\r
57 // Create the backbuffer surface
\r
58 ddsd.dwFlags = DDSD_CAPS | DDSD_WIDTH | DDSD_HEIGHT;
\r
59 ddsd.ddsCaps.dwCaps = DDSCAPS_OFFSCREENPLAIN | DDSCAPS_SYSTEMMEMORY;
\r
60 ddsd.dwWidth = EmuWidth;
\r
61 ddsd.dwHeight = EmuHeight;
\r
63 ret = m_pDD->CreateSurface( &ddsd, &m_pddsBackBuffer, NULL );
\r
64 if (ret) { LOGFAIL(); goto fail; }
\r
67 ret = m_pDD->CreateClipper( 0, &pcClipper, NULL );
\r
68 if (ret) { LOGFAIL(); goto fail; }
\r
70 ret = pcClipper->SetHWnd( 0, FrameWnd );
\r
71 if (ret) { LOGFAIL(); goto fail; }
\r
73 ret = m_pddsFrontBuffer->SetClipper( pcClipper );
\r
74 if (ret) { LOGFAIL(); goto fail; }
\r
85 int DirectScreen(const void *emu_screen)
\r
87 const unsigned short *ps = (const unsigned short *)emu_screen;
\r
91 memset(&sd, 0, sizeof(sd));
\r
92 sd.dwSize = sizeof(sd);
\r
93 ret = m_pddsBackBuffer->Lock(NULL, &sd, DDLOCK_SURFACEMEMORYPTR|DDLOCK_WAIT|DDLOCK_WRITEONLY, NULL);
\r
94 if (ret) { LOGFAIL(); return 1; }
\r
96 //lprintf("w: %i h: %i pi: %i pf: %i\n", sd.dwWidth, sd.dwHeight, sd.lPitch, sd.ddpfPixelFormat.dwRGBBitCount);
\r
98 if (sd.ddpfPixelFormat.dwRGBBitCount == 32)
\r
100 int *dst = (int *)sd.lpSurface;
\r
101 for (y = 0; y < EmuHeight; y++)
\r
103 for (x = 0; x < EmuWidth; x++)
\r
106 dst[x] = ((s&0xf800)<<8) | ((s&0x07e0)<<5) | ((s&0x001f)<<3);
\r
108 dst = (int *)((char *)dst + sd.lPitch);
\r
111 else if (sd.ddpfPixelFormat.dwRGBBitCount == 24) /* wine uses this for me */
\r
113 void *dst = sd.lpSurface;
\r
114 for (y = 0; y < EmuHeight; y++)
\r
116 unsigned char *dst1 = (unsigned char *) dst;
\r
117 for (x = 0; x < EmuWidth; x++, dst1 += 3)
\r
120 dst1[2] = (s&0xf800)>>8; dst1[1] = (s&0x07e0)>>3; dst1[0] = s<<3; // BGR
\r
122 dst = (void *)((char *)dst + sd.lPitch);
\r
125 else if (sd.ddpfPixelFormat.dwRGBBitCount == 16)
\r
127 unsigned short *dst = (unsigned short *)sd.lpSurface;
\r
128 for (y = 0; y < EmuHeight; y++)
\r
130 memcpy(dst, ps, EmuWidth*2);
\r
132 dst = (unsigned short *)((char *)dst + sd.lPitch);
\r
140 ret = m_pddsBackBuffer->Unlock(NULL);
\r
141 if (ret) { LOGFAIL(); return 1; }
\r
145 int DirectClear(unsigned int colour)
\r
149 ZeroMemory( &ddbltfx, sizeof(ddbltfx) );
\r
150 ddbltfx.dwSize = sizeof(ddbltfx);
\r
151 ddbltfx.dwFillColor = colour;
\r
153 if (m_pddsBackBuffer != NULL)
\r
154 ret = m_pddsBackBuffer->Blt( NULL, NULL, NULL, DDBLT_COLORFILL, &ddbltfx );
\r
155 if (ret) { LOGFAIL(); return 1; }
\r
159 int DirectPresent(void)
\r
162 if (FrameRectMy.right - FrameRectMy.left > 0 && FrameRectMy.bottom - FrameRectMy.top > 0)
\r
163 ret = m_pddsFrontBuffer->Blt(&FrameRectMy, m_pddsBackBuffer, &EmuScreenRect, DDBLT_WAIT, NULL);
\r
164 if (ret) { LOGFAIL(); return 1; }
\r
171 static IDirect3D8 *Direct3D=NULL;
\r
172 IDirect3DDevice8 *Device=NULL;
\r
173 IDirect3DSurface8 *DirectBack=NULL; // Back Buffer
\r
175 static IDirect3DVertexBuffer8 *VertexBuffer=NULL;
\r
177 struct CustomVertex
\r
179 float x,y,z; // Vertex cordinates
\r
180 unsigned int colour;
\r
181 float u,v; // Texture coordinates
\r
183 #define D3DFVF_CUSTOMVERTEX (D3DFVF_XYZ|D3DFVF_DIFFUSE|D3DFVF_TEX1)
\r
185 static CustomVertex VertexList[4];
\r
189 D3DPRESENT_PARAMETERS d3dpp;
\r
190 D3DDISPLAYMODE mode;
\r
193 memset(&d3dpp,0,sizeof(d3dpp));
\r
194 memset(&mode,0,sizeof(mode));
\r
196 Direct3D=Direct3DCreate8(D3D_SDK_VERSION); if (Direct3D==NULL) return 1;
\r
198 // Set up the structure used to create the D3D device:
\r
199 d3dpp.BackBufferWidth =MainWidth;
\r
200 d3dpp.BackBufferHeight=MainHeight;
\r
201 d3dpp.BackBufferCount =1;
\r
202 d3dpp.SwapEffect=D3DSWAPEFFECT_DISCARD;
\r
203 d3dpp.MultiSampleType =D3DMULTISAMPLE_NONE;
\r
206 d3dpp.BackBufferFormat=D3DFMT_X8R8G8B8;
\r
207 d3dpp.FullScreen_RefreshRateInHz=60;
\r
209 Direct3D->GetAdapterDisplayMode(D3DADAPTER_DEFAULT,&mode);
\r
210 d3dpp.BackBufferFormat=mode.Format;
\r
212 d3dpp.hDeviceWindow=FrameWnd;
\r
215 // Try to create a device with hardware vertex processing:
\r
218 int behave=D3DCREATE_HARDWARE_VERTEXPROCESSING;
\r
220 // Try software vertex processing:
\r
221 if (i==1) behave=D3DCREATE_MIXED_VERTEXPROCESSING;
\r
222 if (i==2) behave=D3DCREATE_SOFTWARE_VERTEXPROCESSING;
\r
224 Direct3D->CreateDevice(D3DADAPTER_DEFAULT,D3DDEVTYPE_HAL,FrameWnd,
\r
225 behave|D3DCREATE_MULTITHREADED,&d3dpp,&Device);
\r
233 Direct3D->CreateDevice(D3DADAPTER_DEFAULT,D3DDEVTYPE_REF,FrameWnd,
\r
234 D3DCREATE_SOFTWARE_VERTEXPROCESSING|D3DCREATE_MULTITHREADED,&d3dpp,&Device);
\r
235 if (Device==NULL) goto fail0;
\r
236 HMODULE test = LoadLibrary("d3d8d.dll");
\r
237 if (test != NULL) FreeLibrary(test);
\r
239 error("Sorry, but this program requires Direct3D with hardware acceleration.\n\n"
\r
240 "You can try using Direct3D software emulation, but you have to install "
\r
241 "DirectX SDK for it to work\n(it seems to be missing now).");
\r
249 Device->GetBackBuffer(0,D3DBACKBUFFER_TYPE_MONO,&DirectBack);
\r
250 if (DirectBack==NULL) goto fail1;
\r
252 Device->CreateVertexBuffer(sizeof(VertexList),0,D3DFVF_CUSTOMVERTEX,D3DPOOL_DEFAULT,&VertexBuffer);
\r
253 if (VertexBuffer==NULL) goto fail2;
\r
255 ret=TexScreenInit(); if (ret) goto fail3;
\r
259 Device->SetRenderState(D3DRS_LIGHTING,0); // Turn off lighting
\r
261 // Set up texture modes:
\r
262 Device->SetTextureStageState(0,D3DTSS_ADDRESSU,D3DTADDRESS_CLAMP);
\r
263 Device->SetTextureStageState(0,D3DTSS_ADDRESSV,D3DTADDRESS_CLAMP);
\r
268 RELEASE(VertexBuffer)
\r
270 RELEASE(DirectBack)
\r
284 RELEASE(VertexBuffer)
\r
285 RELEASE(DirectBack)
\r
290 int DirectClear(unsigned int colour)
\r
292 if (Device != NULL) {
\r
293 Device->Clear(0,NULL,D3DCLEAR_TARGET,colour,1.0f,0);
\r
300 int DirectPresent()
\r
302 if (Device != NULL) {
\r
303 Device->Present(NULL,NULL,NULL,NULL);
\r
310 #define PI 3.14159265f
\r
312 static int MakeVertexList()
\r
314 struct CustomVertex *vert=NULL,*pv=NULL;
\r
316 float scalex=0.0f,scaley=0.0f;
\r
317 unsigned int colour=0xffffff;
\r
318 float right=0.0f,bottom=0.0f;
\r
320 if (LoopMode!=8) colour=0x102040;
\r
322 dist=10.0f; scalex=dist*1.3333f; scaley=dist;
\r
324 scalex*=640.0f/(float)MainWidth;
\r
325 scaley*=448.0f/(float)MainHeight;
\r
329 // Put the vertices for the corners of the screen:
\r
332 pv->x=-scalex; pv->y=scaley;
\r
333 pv->colour=colour; pv++;
\r
335 *pv=vert[0]; pv->x= scalex; pv->y= scaley; pv++;
\r
336 *pv=vert[0]; pv->x=-scalex; pv->y=-scaley; pv++;
\r
337 *pv=vert[0]; pv->x= scalex; pv->y=-scaley; pv++;
\r
339 // Find where the screen images ends on the texture
\r
340 right =(float)EmuWidth /(float)TexWidth;
\r
341 bottom=(float)EmuHeight/(float)TexHeight;
\r
343 // Write texture coordinates:
\r
345 pv->u=0.0f; pv->v=0.00f; pv++;
\r
346 pv->u=right; pv->v=0.00f; pv++;
\r
347 pv->u=0.0f; pv->v=bottom; pv++;
\r
348 pv->u=right; pv->v=bottom; pv++;
\r
353 static int SetupMatrices()
\r
355 D3DXVECTOR3 eye ( 0.0f, 0.0f, 0.0f );
\r
356 D3DXVECTOR3 look( 0.0f, 0.0f, 0.0f );
\r
357 D3DXVECTOR3 up ( 0.0f, 1.0f, 0.0f );
\r
359 float nudgex=0.0f,nudgey=0.0f;
\r
361 memset(&mat,0,sizeof(mat));
\r
363 mat.m[0][0]=mat.m[1][1]=mat.m[2][2]=mat.m[3][3]=1.0f;
\r
364 Device->SetTransform(D3DTS_WORLD,&mat);
\r
366 look.x=(float)Inp.axis[2]/2457.6f;
\r
367 look.y=(float)Inp.axis[3]/2457.6f;
\r
370 // Nudge pixels to the centre of each screen pixel:
\r
371 nudgex=13.3333f/(float)(MainWidth <<1);
\r
372 nudgey=10.0000f/(float)(MainHeight<<1);
\r
373 eye.x +=nudgex; eye.y +=nudgey;
\r
374 look.x+=nudgex; look.y+=nudgey;
\r
376 D3DXMatrixLookAtLH(&mat,&eye,&look,&up);
\r
377 Device->SetTransform(D3DTS_VIEW,&mat);
\r
379 D3DXMatrixPerspectiveFovLH(&mat, 0.5f*PI, 1.3333f, 0.2f, 1000.0f);
\r
380 Device->SetTransform(D3DTS_PROJECTION,&mat);
\r
386 unsigned char *lock=NULL;
\r
389 if (Device == NULL)
\r
390 return DirectScreenDDraw();
\r
392 // Copy the screen to the screen texture:
\r
394 TexScreenSwizzle();
\r
396 ret=TexScreenLinear();
\r
397 if (ret) lprintf("TexScreenLinear failed\n");
\r
404 // Copy vertices in:
\r
405 VertexBuffer->Lock(0,sizeof(VertexList),&lock,0);
\r
406 if (lock==NULL) { lprintf("VertexBuffer->Lock failed\n"); return 1; }
\r
407 memcpy(lock,VertexList,sizeof(VertexList));
\r
408 VertexBuffer->Unlock();
\r
410 Device->BeginScene();
\r
411 Device->SetTexture(0,TexScreen);
\r
412 Device->SetStreamSource(0,VertexBuffer,sizeof(CustomVertex));
\r
413 Device->SetVertexShader(D3DFVF_CUSTOMVERTEX);
\r
414 Device->DrawPrimitive(D3DPT_TRIANGLESTRIP,0,2);
\r
415 Device->EndScene();
\r