Main
Current News
Archived News
Search News
Forums
Discussion Forum


Old Forum
Programs
Install Programs
Downloads
More Downloads...
Troubleshooting
Other Sections
Source Code
Format Specs.
Misc. Information
Non-SF Stuff
Links



projects / grpapi.git / blame
? search:
summary | graphiclog | shortlog | log | commit | commitdiff | tree
blob | history | HEAD
(no commit message)
[grpapi.git] / grpapi / grpapi.cpp
CommitLineData
14362b19 1#include "grpapi.h"\r
ecca31ff 2#include "../LoadStorm/storm.h"\r
14362b19 3#include <malloc.h>\r
4\r
5#ifdef GRPAPI_STATIC\r
6#define DllMain GrpMain\r
7\r
8#include "grp_static.h"\r
9\r
10struct GRPLIBMODULE {\r
11 GRPLIBMODULE();\r
12 ~GRPLIBMODULE();\r
13} GrpLib;\r
14\r
15BOOL APIENTRY DllMain(HINSTANCE hInstDLL, DWORD ul_reason_for_call, LPVOID lpReserved);\r
16\r
17GRPLIBMODULE::GRPLIBMODULE()\r
18{\r
19 GrpMain(0,DLL_PROCESS_ATTACH,0);\r
20}\r
21\r
22GRPLIBMODULE::~GRPLIBMODULE()\r
23{\r
24 GrpMain(0,DLL_PROCESS_DETACH,0);\r
25}\r
26\r
27#endif\r
28\r
29typedef struct {\r
30 BYTE Left;\r
31 BYTE Top;\r
32 BYTE Width;\r
33 BYTE Height;\r
34 DWORD Offset;\r
35} FRAMEHEADER;\r
36\r
ecca31ff 37GETPIXELPROC MyGetPixel = GetPixel;\r
38SETPIXELPROC MySetPixel = (SETPIXELPROC)SetPixelV;\r
39\r
14362b19 40void __inline SetPix(HDC hDC, int X, int Y, COLORREF clrColor, DWORD dwFlags, DWORD dwAlpha);\r
41\r
42extern HINSTANCE hStorm;\r
43\r
44BOOL APIENTRY DllMain( HINSTANCE hInstDLL, \r
45 DWORD ul_reason_for_call, \r
46 LPVOID lpReserved\r
47 )\r
48{\r
49 switch (ul_reason_for_call)\r
50 {\r
51 case DLL_PROCESS_ATTACH:\r
52 break;\r
53 case DLL_THREAD_ATTACH:\r
54 break;\r
55 case DLL_THREAD_DETACH:\r
56 break;\r
57 case DLL_PROCESS_DETACH:\r
58 break;\r
59 }\r
60\r
61 return TRUE;\r
62}\r
63\r
64BOOL GRPAPI WINAPI LoadGrpApi()\r
65{\r
ecca31ff 66 if (!hStorm) return FALSE;\r
14362b19 67 else return TRUE;\r
68}\r
69\r
70void GRPAPI WINAPI FreeGrpApi()\r
71{\r
72}\r
73\r
ecca31ff 74BOOL GRPAPI WINAPI SetMpqDll(LPCSTR lpDllFileName)\r
75{\r
76 if (LoadStorm((char *)lpDllFileName)) return TRUE;\r
77 else return FALSE;\r
78}\r
79\r
14362b19 80BOOL GRPAPI WINAPI LoadPalette(LPCSTR lpFileName, DWORD *dwPaletteBuffer)\r
81{\r
ecca31ff 82 if (!lpFileName || !dwPaletteBuffer) return FALSE;\r
14362b19 83 HANDLE hFile;\r
ecca31ff 84 if (SFileOpenFileEx && SFileGetFileSize\r
85 && SFileSetFilePointer && SFileReadFile\r
86 && SFileCloseFile) {\r
87 if (!SFileOpenFileEx(0,lpFileName,1,&hFile)) return FALSE;\r
14362b19 88 DWORD fsz = SFileGetFileSize(hFile,0);\r
89 SFileSetFilePointer(hFile,0,0,FILE_BEGIN);\r
90 if (fsz>=1024) {\r
91 memset(dwPaletteBuffer,0,1024);\r
92 SFileReadFile(hFile,dwPaletteBuffer,1024,0,0);\r
93 }\r
94 else if (fsz==768) {\r
95 char *buffer = (char *)_alloca(768);\r
96 memset(buffer,0,768);\r
97 SFileReadFile(hFile,buffer,768,0,0);\r
98 for (DWORD i=0;i<256;i++) {\r
99 memcpy(&dwPaletteBuffer[i],buffer+i*3,3);\r
100 *(((char *)&dwPaletteBuffer[i])+3) = 0;\r
101 }\r
102 }\r
103 else {\r
104 memset(dwPaletteBuffer,0,1024);\r
105 SFileReadFile(hFile,dwPaletteBuffer,fsz,0,0);\r
106 }\r
107 SFileCloseFile(hFile);\r
108 }\r
109 else {\r
110 hFile = CreateFile(lpFileName,GENERIC_READ,FILE_SHARE_READ,0,OPEN_EXISTING,0,0);\r
111 if (hFile==INVALID_HANDLE_VALUE) return FALSE;\r
112 DWORD fsz = GetFileSize(hFile,0),tsz;\r
113 SetFilePointer(hFile,0,0,FILE_BEGIN);\r
114 if (fsz>=1024) {\r
115 memset(dwPaletteBuffer,0,1024);\r
116 ReadFile(hFile,dwPaletteBuffer,1024,&tsz,0);\r
117 }\r
118 else if (fsz==768) {\r
119 char *buffer = (char *)_alloca(768);\r
120 memset(buffer,0,768);\r
121 ReadFile(hFile,buffer,768,&tsz,0);\r
122 for (DWORD i=0;i<256;i++) {\r
123 memcpy(&dwPaletteBuffer[i],buffer+i*3,3);\r
124 *(((char *)&dwPaletteBuffer[i])+3) = 0;\r
125 }\r
126 }\r
127 else {\r
128 memset(dwPaletteBuffer,0,1024);\r
129 ReadFile(hFile,dwPaletteBuffer,fsz,&tsz,0);\r
130 }\r
131 CloseHandle(hFile);\r
132 }\r
133 return TRUE;\r
134}\r
135\r
136HANDLE GRPAPI WINAPI LoadGrp(LPCSTR lpFileName)\r
137{\r
ecca31ff 138 if (!lpFileName) return (HANDLE)-1;\r
14362b19 139 HANDLE hFile;\r
140 char *GrpFile;\r
ecca31ff 141 if (SFileOpenFileEx && SFileGetFileSize\r
142 && SFileSetFilePointer && SFileReadFile\r
143 && SFileCloseFile) {\r
144 if (!SFileOpenFileEx(0,lpFileName,1,&hFile)) return (HANDLE)-1;\r
14362b19 145 DWORD fsz = SFileGetFileSize(hFile,0);\r
146 if (fsz<6) {\r
147 SFileCloseFile(hFile);\r
148 return (HANDLE)-1;\r
149 }\r
150 GrpFile = (char *)VirtualAlloc(0,fsz,MEM_COMMIT,PAGE_READWRITE);\r
ecca31ff 151 if (GrpFile) {\r
14362b19 152 SFileSetFilePointer(hFile,0,0,FILE_BEGIN);\r
153 SFileReadFile(hFile,GrpFile,fsz,0,0);\r
154 }\r
155 else GrpFile=(char *)-1;\r
156 SFileCloseFile(hFile);\r
157 }\r
158 else {\r
159 hFile = CreateFile(lpFileName,GENERIC_READ,FILE_SHARE_READ,0,OPEN_EXISTING,0,0);\r
160 if (hFile==INVALID_HANDLE_VALUE) return (HANDLE)-1;\r
161 DWORD fsz = GetFileSize(hFile,0),tsz;\r
162 if (fsz<6) {\r
163 CloseHandle(hFile);\r
164 return (HANDLE)-1;\r
165 }\r
166 GrpFile = (char *)VirtualAlloc(0,fsz,MEM_COMMIT,PAGE_READWRITE);\r
ecca31ff 167 if (GrpFile) {\r
14362b19 168 SetFilePointer(hFile,0,0,FILE_BEGIN);\r
169 ReadFile(hFile,GrpFile,fsz,&tsz,0);\r
170 }\r
171 else GrpFile=(char *)-1;\r
172 CloseHandle(hFile);\r
173 }\r
174 return (HANDLE)GrpFile;\r
175}\r
176\r
177BOOL GRPAPI WINAPI DestroyGrp(HANDLE hGrp)\r
178{\r
ecca31ff 179 if (!hGrp || hGrp==INVALID_HANDLE_VALUE) return FALSE;\r
14362b19 180 VirtualFree(hGrp,0,MEM_RELEASE);\r
181 return TRUE;\r
182}\r
183\r
184BOOL GRPAPI WINAPI DrawGrp(HANDLE hGrp, HDC hdcDest, int nXDest, int nYDest, WORD nFrame, DWORD *dwPalette, DWORD dwFlags, DWORD dwAlpha)\r
185{\r
ecca31ff 186 if (!hGrp || hGrp==INVALID_HANDLE_VALUE || hdcDest==0 || !dwPalette) return FALSE;\r
14362b19 187 GRPHEADER *GrpFile = (GRPHEADER *)hGrp;\r
188 nFrame %= GrpFile->nFrames;\r
189 FRAMEHEADER *GrpFrame = &((FRAMEHEADER *)(((char *)GrpFile)+6))[nFrame];\r
190 DWORD Right,Bottom;\r
191 if (dwFlags&HORIZONTAL_FLIP) Right = nXDest+GrpFile->wMaxWidth-1-GrpFrame->Left;\r
192 if (dwFlags&VERTICAL_FLIP) Bottom = nYDest+GrpFile->wMaxHeight-1-GrpFrame->Top;\r
193 nXDest += GrpFrame->Left;\r
194 nYDest += GrpFrame->Top;\r
195 WORD *GrpOffsets = ((WORD *)(((char *)GrpFile)+GrpFrame->Offset));\r
ecca31ff 196 BYTE *RowData;\r
197 WORD x,ofs;\r
198 DWORD y;\r
199 WORD i;\r
200 if (!(dwFlags&HORIZONTAL_FLIP) && !(dwFlags&VERTICAL_FLIP)) {\r
201 for (y=0;y<GrpFrame->Height;y++) {\r
202 RowData = ((BYTE *)(((char *)GrpOffsets)+GrpOffsets[y]));\r
203 x=0; ofs=0;\r
204 while (x<GrpFrame->Width) {\r
205 if (!(RowData[ofs] & 0x80)) {\r
206 if (!(RowData[ofs] & 0x40)) {\r
207 for (i=1;i<=RowData[ofs] && x<GrpFrame->Width;i++) {\r
208 SetPix(hdcDest,nXDest+x,nYDest+y,dwPalette[RowData[ofs+i]],dwFlags,dwAlpha);\r
209 x++;\r
210 }\r
211 ofs+=RowData[ofs]+1;\r
14362b19 212 }\r
ecca31ff 213 else {\r
214 for (i=0;i<RowData[ofs]-64 && x<GrpFrame->Width;i++) {\r
215 SetPix(hdcDest,nXDest+x,nYDest+y,dwPalette[RowData[ofs+1]],dwFlags,dwAlpha);\r
216 x++;\r
217 }\r
218 ofs+=2;\r
14362b19 219 }\r
220 }\r
ecca31ff 221 else {\r
222 x+=RowData[ofs]-128;\r
223 ofs++;\r
224 }\r
225 }\r
226 }\r
227 }\r
228 else if (dwFlags&HORIZONTAL_FLIP && !(dwFlags&VERTICAL_FLIP)) {\r
229 for (y=0;y<GrpFrame->Height;y++) {\r
230 RowData = ((BYTE *)(((char *)GrpOffsets)+GrpOffsets[y]));\r
231 x=0; ofs=0;\r
232 while (x<GrpFrame->Width) {\r
233 if (!(RowData[ofs] & 0x80)) {\r
234 if (!(RowData[ofs] & 0x40)) {\r
235 for (i=1;i<=RowData[ofs] && x<GrpFrame->Width;i++) {\r
236 SetPix(hdcDest,Right-x,nYDest+y,dwPalette[RowData[ofs+i]],dwFlags,dwAlpha);\r
237 x++;\r
238 }\r
239 ofs+=RowData[ofs]+1;\r
240 }\r
241 else {\r
242 for (i=0;i<RowData[ofs]-64 && x<GrpFrame->Width;i++) {\r
243 SetPix(hdcDest,Right-x,nYDest+y,dwPalette[RowData[ofs+1]],dwFlags,dwAlpha);\r
244 x++;\r
245 }\r
246 ofs+=2;\r
14362b19 247 }\r
248 }\r
249 else {\r
ecca31ff 250 x+=RowData[ofs]-128;\r
251 ofs++;\r
14362b19 252 }\r
14362b19 253 }\r
ecca31ff 254 }\r
255 }\r
256 else if (!(dwFlags&HORIZONTAL_FLIP) && dwFlags&VERTICAL_FLIP) {\r
257 for (y=0;y<GrpFrame->Height;y++) {\r
258 RowData = ((BYTE *)(((char *)GrpOffsets)+GrpOffsets[y]));\r
259 x=0; ofs=0;\r
260 while (x<GrpFrame->Width) {\r
261 if (!(RowData[ofs] & 0x80)) {\r
262 if (!(RowData[ofs] & 0x40)) {\r
263 for (i=1;i<=RowData[ofs] && x<GrpFrame->Width;i++) {\r
264 SetPix(hdcDest,nXDest+x,Bottom-y,dwPalette[RowData[ofs+i]],dwFlags,dwAlpha);\r
265 x++;\r
266 }\r
267 ofs+=RowData[ofs]+1;\r
14362b19 268 }\r
ecca31ff 269 else {\r
270 for (i=0;i<RowData[ofs]-64 && x<GrpFrame->Width;i++) {\r
271 SetPix(hdcDest,nXDest+x,Bottom-y,dwPalette[RowData[ofs+1]],dwFlags,dwAlpha);\r
272 x++;\r
273 }\r
274 ofs+=2;\r
14362b19 275 }\r
276 }\r
ecca31ff 277 else {\r
278 x+=RowData[ofs]-128;\r
279 ofs++;\r
280 }\r
281 }\r
282 }\r
283 }\r
284 else {\r
285 for (y=0;y<GrpFrame->Height;y++) {\r
286 RowData = ((BYTE *)(((char *)GrpOffsets)+GrpOffsets[y]));\r
287 x=0; ofs=0;\r
288 while (x<GrpFrame->Width) {\r
289 if (!(RowData[ofs] & 0x80)) {\r
290 if (!(RowData[ofs] & 0x40)) {\r
291 for (i=1;i<=RowData[ofs] && x<GrpFrame->Width;i++) {\r
292 SetPix(hdcDest,Right-x,Bottom-y,dwPalette[RowData[ofs+i]],dwFlags,dwAlpha);\r
293 x++;\r
294 }\r
295 ofs+=RowData[ofs]+1;\r
296 }\r
297 else {\r
298 for (i=0;i<RowData[ofs]-64 && x<GrpFrame->Width;i++) {\r
299 SetPix(hdcDest,Right-x,Bottom-y,dwPalette[RowData[ofs+1]],dwFlags,dwAlpha);\r
300 x++;\r
301 }\r
302 ofs+=2;\r
14362b19 303 }\r
304 }\r
305 else {\r
ecca31ff 306 x+=RowData[ofs]-128;\r
307 ofs++;\r
14362b19 308 }\r
14362b19 309 }\r
310 }\r
311 }\r
312 return TRUE;\r
313}\r
314\r
315BOOL GRPAPI WINAPI GetGrpInfo(HANDLE hGrp, GRPHEADER *GrpInfo)\r
316{\r
ecca31ff 317 if (!hGrp || hGrp==INVALID_HANDLE_VALUE || !GrpInfo) return FALSE;\r
14362b19 318 memcpy(GrpInfo,hGrp,6);\r
319 return TRUE;\r
320}\r
321\r
ecca31ff 322void GRPAPI WINAPI SetFunctionGetPixel(GETPIXELPROC lpGetPixelProc)\r
323{\r
324 MyGetPixel = lpGetPixelProc;\r
325}\r
326\r
327void GRPAPI WINAPI SetFunctionSetPixel(SETPIXELPROC lpSetPixelProc)\r
328{\r
329 MySetPixel = lpSetPixelProc;\r
330}\r
331\r
14362b19 332void __inline SetPix(HDC hDC, int X, int Y, COLORREF clrColor, DWORD dwFlags, DWORD dwAlpha)\r
333{\r
334 if (dwFlags&SHADOW_COLOR) {\r
ecca31ff 335 clrColor = (dwFlags >> 8) & 0x00FFFFFF;\r
14362b19 336 }\r
337 if (dwFlags&ALPHA_BLEND) {\r
ecca31ff 338 DWORD dwColor = MyGetPixel(hDC,X,Y);\r
14362b19 339\r
340 // Old alpha\r
341 /*((BYTE *)&dwColor)[0]*=1-((float)((BYTE *)&dwAlpha)[0]/256);\r
342 ((BYTE *)&dwColor)[1]*=1-((float)((BYTE *)&dwAlpha)[1]/256);\r
343 ((BYTE *)&dwColor)[2]*=1-((float)((BYTE *)&dwAlpha)[2]/256);\r
344 ((BYTE *)&clrColor)[0]*=(float)((BYTE *)&dwAlpha)[0]/256;\r
345 ((BYTE *)&clrColor)[1]*=(float)((BYTE *)&dwAlpha)[1]/256;\r
346 ((BYTE *)&clrColor)[2]*=(float)((BYTE *)&dwAlpha)[2]/256;\r
347 ((BYTE *)&clrColor)[0]+=((BYTE *)&dwColor)[0];\r
348 ((BYTE *)&clrColor)[1]+=((BYTE *)&dwColor)[1];\r
349 ((BYTE *)&clrColor)[2]+=((BYTE *)&dwColor)[2];*/\r
350\r
351 /* blendedcolor =\r
352 ( ( forecolor * ( 1 - alpha ) ) >> 8 )\r
353 + ( ( backcolor * ( 256 - alpha ) ) >> 8 ) */\r
354 ((BYTE *)&clrColor)[0] =\r
355 ( ( ((BYTE *)&clrColor)[0] * ( ((BYTE *)&dwAlpha)[0] + 1 ) ) >> 8 )\r
356 + ( ( ((BYTE *)&dwColor)[0] * ( 256 - ((BYTE *)&dwAlpha)[0] ) ) >> 8 );\r
357 ((BYTE *)&clrColor)[1] =\r
358 ( ( ((BYTE *)&clrColor)[1] * ( ((BYTE *)&dwAlpha)[1] + 1 ) ) >> 8 )\r
359 + ( ( ((BYTE *)&dwColor)[1] * ( 256 - ((BYTE *)&dwAlpha)[1] ) ) >> 8 );\r
360 ((BYTE *)&clrColor)[2] =\r
361 ( ( ((BYTE *)&clrColor)[2] * ( ((BYTE *)&dwAlpha)[2] + 1 ) ) >> 8 )\r
362 + ( ( ((BYTE *)&dwColor)[2] * ( 256 - ((BYTE *)&dwAlpha)[2] ) ) >> 8 );\r
363 }\r
ecca31ff 364 MySetPixel(hDC,X,Y,clrColor);\r
14362b19 365}\r
GRP encoding/decoding library