Rev 294 | Rev 314 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
258 | daniel-mar | 1 | /* |
2 | This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop |
||
3 | Copyright (C) 2003-2009 Toby Thain, toby@telegraphics.com.au |
||
4 | Copyright (C) 2018-2021 Daniel Marschall, ViaThinkSoft |
||
5 | |||
6 | This program is free software; you can redistribute it and/or modify |
||
7 | it under the terms of the GNU General Public License as published by |
||
8 | the Free Software Foundation; either version 2 of the License, or |
||
9 | (at your option) any later version. |
||
10 | |||
11 | This program is distributed in the hope that it will be useful, |
||
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
||
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||
14 | GNU General Public License for more details. |
||
15 | |||
16 | You should have received a copy of the GNU General Public License |
||
17 | along with this program; if not, write to the Free Software |
||
18 | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
||
19 | */ |
||
20 | |||
21 | #include "ff.h" |
||
22 | |||
278 | daniel-mar | 23 | #include <time.h> |
24 | |||
258 | daniel-mar | 25 | #include "file_compat.h" |
26 | #include "compat_string.h" |
||
27 | #include "versioninfo_modify_win.h" |
||
28 | #include "version.h" |
||
29 | |||
30 | extern HINSTANCE hDllInstance; |
||
31 | |||
274 | daniel-mar | 32 | Boolean doresources(HMODULE srcmod,char *dstname, int bits); |
258 | daniel-mar | 33 | |
34 | void dbglasterror(char *func){ |
||
35 | char s[0x100]; |
||
36 | |||
37 | strcpy(s,func); |
||
38 | strcat(s," failed: "); |
||
39 | FormatMessage( FORMAT_MESSAGE_FROM_SYSTEM,NULL,GetLastError(),0,s+strlen(s),0x100,NULL ); |
||
40 | dbg(s); |
||
41 | } |
||
42 | |||
43 | /* |
||
44 | BOOL CALLBACK enumfunc(HMODULE hModule,LPCTSTR lpszType,LPCTSTR lpszName,WORD wIDLanguage,LONG lParam){ |
||
45 | char s[0x100]; |
||
46 | sprintf(s,"EnumResourceLanguages callback: module=%#x type=%s name=%s lang=%d", |
||
47 | hModule,lpszType,lpszName,wIDLanguage); |
||
48 | dbg(s); |
||
49 | return TRUE; |
||
50 | } |
||
51 | */ |
||
52 | |||
274 | daniel-mar | 53 | int domanifest(char *newmanifest, const char *manifestp, PARM_T* pparm, int bits) { |
258 | daniel-mar | 54 | char name[1024]; |
55 | char description[1024]; |
||
56 | size_t i; |
||
276 | daniel-mar | 57 | size_t iname = 0; |
258 | daniel-mar | 58 | int idescription = 0; |
59 | |||
60 | // Description |
||
61 | for (i = 0; i < strlen((char*)pparm->category); i++) { |
||
62 | char c = pparm->category[i]; |
||
63 | if ((c != '<') && (c != '>')) { |
||
64 | description[idescription++] = c; |
||
65 | } |
||
66 | } |
||
67 | description[idescription++] = ' '; |
||
68 | description[idescription++] = '-'; |
||
69 | description[idescription++] = ' '; |
||
70 | for (i = 0; i < strlen((char*)pparm->title); i++) { |
||
71 | char c = pparm->title[i]; |
||
72 | if ((c != '<') && (c != '>')) { |
||
73 | description[idescription++] = c; |
||
74 | } |
||
75 | } |
||
76 | description[idescription++] = '\0'; |
||
77 | |||
78 | // Name |
||
79 | strcpy(name, "Telegraphics.FilterFoundry."); |
||
80 | iname = strlen("Telegraphics.FilterFoundry."); |
||
81 | for (i = 0; i < strlen((char*)pparm->category); i++) { |
||
82 | char c = pparm->category[i]; |
||
83 | if (((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))) { |
||
84 | name[iname++] = c; |
||
85 | } |
||
86 | } |
||
87 | name[iname++] = '.'; |
||
88 | for (i = 0; i < strlen((char*)pparm->title); i++) { |
||
89 | char c = pparm->title[i]; |
||
90 | if (((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z'))) { |
||
91 | name[iname++] = c; |
||
92 | } |
||
93 | } |
||
94 | name[iname++] = '\0'; |
||
95 | |||
274 | daniel-mar | 96 | if (bits == 64) { |
97 | return sprintf(newmanifest, manifestp, (char*)name, "amd64", VERSION_STR, (char*)description); |
||
98 | } |
||
99 | else { |
||
100 | return sprintf(newmanifest, manifestp, (char*)name, "x86", VERSION_STR, (char*)description); |
||
101 | } |
||
258 | daniel-mar | 102 | } |
103 | |||
104 | void changeVersionInfo(char* dstname, PARM_T* pparm, HGLOBAL hupdate) { |
||
105 | char* soleFilename; |
||
106 | LPWSTR changeRequestStr, tmp; |
||
107 | |||
108 | if (soleFilename = strrchr(dstname, '\\')) { |
||
109 | ++soleFilename; |
||
110 | } |
||
111 | else { |
||
112 | soleFilename = dstname; |
||
113 | } |
||
114 | |||
115 | // Format of argument "PCWSTR changes" is "<name>\0<value>\0<name>\0<value>\0....." |
||
116 | // You can CHANGE values for any given name |
||
117 | // You can DELETE entries by setting the value to "\b" (0x08 backspace character) |
||
118 | // You cannot (yet) ADD entries. |
||
119 | changeRequestStr = (LPWSTR)malloc(6 * 2 * 100 + 1); |
||
120 | |||
121 | tmp = changeRequestStr; |
||
122 | |||
123 | tmp += mbstowcs(tmp, "Comments", 100); |
||
124 | tmp++; |
||
125 | tmp += mbstowcs(tmp, "Built using Filter Foundry " VERSION_STR, 100); |
||
126 | tmp++; |
||
127 | |||
128 | tmp += mbstowcs(tmp, "CompanyName", 100); |
||
129 | tmp++; |
||
130 | if (strlen((char*)pparm->author) > 0) { |
||
131 | tmp += mbstowcs(tmp, (char*)pparm->author, 100); |
||
132 | } |
||
133 | else { |
||
134 | tmp += mbstowcs(tmp, "\b", 100); // \b = remove |
||
135 | } |
||
136 | tmp++; |
||
137 | |||
138 | tmp += mbstowcs(tmp, "LegalCopyright", 100); |
||
139 | tmp++; |
||
140 | if (strlen((char*)pparm->copyright) > 0) { |
||
141 | tmp += mbstowcs(tmp, (char*)pparm->copyright, 100); |
||
142 | } |
||
143 | else { |
||
144 | tmp += mbstowcs(tmp, "\b", 100); // \b = remove |
||
145 | } |
||
146 | tmp++; |
||
147 | |||
148 | tmp += mbstowcs(tmp, "FileDescription", 100); |
||
149 | tmp++; |
||
150 | if (strlen((char*)pparm->title) > 0) { |
||
151 | tmp += mbstowcs(tmp, (char*)pparm->title, 100); |
||
152 | } |
||
153 | else { |
||
154 | tmp += mbstowcs(tmp, "Untitled filter", 100); |
||
155 | } |
||
156 | tmp++; |
||
157 | |||
158 | tmp += mbstowcs(tmp, "OriginalFilename", 100); |
||
159 | tmp++; |
||
160 | tmp += mbstowcs(tmp, soleFilename, 100); |
||
161 | tmp++; |
||
162 | |||
163 | tmp += mbstowcs(tmp, "License", 100); |
||
164 | tmp++; |
||
165 | tmp += mbstowcs(tmp, "\b", 100); // \b = remove, since filter is standalone and might have its own license |
||
166 | tmp++; |
||
167 | |||
168 | tmp += mbstowcs(tmp, "", 1); |
||
169 | |||
170 | if (UpdateVersionInfoWithHandle(dstname, hupdate, changeRequestStr) != NOERROR) { |
||
171 | alertuser(_strdup("UpdateVersionInfoWithHandle failed"), _strdup("")); |
||
172 | } |
||
173 | |||
174 | free(changeRequestStr); |
||
175 | } |
||
176 | |||
278 | daniel-mar | 177 | Boolean update_pe_timestamp(const char* filename, time_t timestamp) { |
280 | daniel-mar | 178 | size_t peoffset; |
179 | FILE* fptr; |
||
180 | |||
181 | fptr = fopen(filename, "rb+"); |
||
278 | daniel-mar | 182 | if (fptr == NULL) return false; |
183 | |||
184 | fseek(fptr, 0x3C, SEEK_SET); |
||
185 | fread(&peoffset, sizeof(peoffset), 1, fptr); |
||
186 | |||
280 | daniel-mar | 187 | fseek(fptr, (long)peoffset + 8, SEEK_SET); |
278 | daniel-mar | 188 | fwrite(×tamp, sizeof(time_t), 1, fptr); |
189 | |||
190 | fclose(fptr); |
||
191 | |||
192 | return true; |
||
193 | } |
||
194 | |||
276 | daniel-mar | 195 | int binary_replace_file(const char* filename, unsigned int search, unsigned int replace) { |
196 | unsigned int srecord = 0; |
||
197 | int found = 0; |
||
198 | |||
199 | FILE* fptr = fopen(filename, "rb+"); |
||
200 | if (fptr == NULL) return -1; |
||
201 | |||
202 | while ((fread(&srecord, sizeof(srecord), 1, fptr) == 1)) |
||
203 | { |
||
204 | if (srecord == search) { |
||
205 | srecord = replace; |
||
206 | fseek(fptr, -1*(long)sizeof(srecord), SEEK_CUR); |
||
207 | fwrite(&srecord, (int)sizeof(srecord), 1, fptr); |
||
208 | fseek(fptr, 0, SEEK_CUR); // important! |
||
209 | found++; |
||
210 | } |
||
211 | else { |
||
212 | fseek(fptr, -1*(long)(sizeof(srecord) - 1), SEEK_CUR); |
||
213 | } |
||
214 | } |
||
215 | fclose(fptr); |
||
216 | |||
217 | return found; |
||
218 | } |
||
219 | |||
281 | daniel-mar | 220 | //DOS .EXE header |
221 | struct image_dos_header |
||
222 | { |
||
223 | uint16_t e_magic; // Magic number |
||
224 | uint16_t e_cblp; // Bytes on last page of file |
||
225 | uint16_t e_cp; // Pages in file |
||
226 | uint16_t e_crlc; // Relocations |
||
227 | uint16_t e_cparhdr; // Size of header in paragraphs |
||
228 | uint16_t e_minalloc; // Minimum extra paragraphs needed |
||
229 | uint16_t e_maxalloc; // Maximum extra paragraphs needed |
||
230 | uint16_t e_ss; // Initial (relative) SS value |
||
231 | uint16_t e_sp; // Initial SP value |
||
232 | uint16_t e_csum; // Checksum |
||
233 | uint16_t e_ip; // Initial IP value |
||
234 | uint16_t e_cs; // Initial (relative) CS value |
||
235 | uint16_t e_lfarlc; // File address of relocation table |
||
236 | uint16_t e_ovno; // Overlay number |
||
237 | uint16_t e_res[4]; // Reserved words |
||
238 | uint16_t e_oemid; // OEM identifier (for e_oeminfo) |
||
239 | uint16_t e_oeminfo; // OEM information; e_oemid specific |
||
240 | uint16_t e_res2[10]; // Reserved words |
||
241 | int32_t e_lfanew; // File address of new exe header |
||
242 | }; |
||
243 | |||
244 | struct image_file_header |
||
245 | { |
||
246 | uint16_t Machine; |
||
247 | uint16_t NumberOfSections; |
||
248 | uint32_t TimeDateStamp; |
||
249 | uint32_t PointerToSymbolTable; |
||
250 | uint32_t NumberOfSymbols; |
||
251 | uint16_t SizeOfOptionalHeader; |
||
252 | uint16_t Characteristics; |
||
253 | }; |
||
254 | |||
255 | uint32_t calculate_checksum(const char* filename) { |
||
256 | //Calculate checksum of image |
||
257 | // Taken from "PE Bliss" Cross-Platform Portable Executable C++ Library |
||
258 | // https://github.com/mrexodia/portable-executable-library/blob/master/pe_lib/pe_checksum.cpp |
||
259 | // Converted from C++ to C by Daniel Marschall |
||
260 | |||
261 | FILE* fptr; |
||
262 | unsigned long long checksum = 0; |
||
263 | struct image_dos_header header; |
||
264 | size_t filesize; |
||
265 | unsigned long long top; |
||
266 | unsigned long pe_checksum_pos; |
||
267 | static const unsigned long checksum_pos_in_optional_headers = 64; |
||
268 | size_t i; |
||
269 | |||
270 | fptr = fopen(filename, "rb"); |
||
271 | if (fptr == NULL) return 0x00000000; |
||
272 | |||
273 | //Read DOS header |
||
274 | fseek(fptr, 0, SEEK_SET); |
||
275 | fread(&header, sizeof(struct image_dos_header), 1, fptr); |
||
276 | |||
277 | //Calculate PE checksum |
||
278 | fseek(fptr, 0, SEEK_SET); |
||
279 | top = 0xFFFFFFFF; |
||
280 | top++; |
||
281 | |||
282 | //"CheckSum" field position in optional PE headers - it's always 64 for PE and PE+ |
||
283 | //Calculate real PE headers "CheckSum" field position |
||
284 | //Sum is safe here |
||
285 | pe_checksum_pos = header.e_lfanew + sizeof(struct image_file_header) + sizeof(uint32_t) + checksum_pos_in_optional_headers; |
||
286 | |||
287 | //Calculate checksum for each byte of file |
||
288 | fseek(fptr, 0L, SEEK_END); |
||
289 | filesize = ftell(fptr); |
||
290 | fseek(fptr, 0L, SEEK_SET); |
||
291 | for (i = 0; i < filesize; i += 4) |
||
292 | { |
||
293 | unsigned long dw = 0; |
||
294 | |||
295 | //Read DWORD from file |
||
296 | fread(&dw, sizeof(dw), 1, fptr); |
||
297 | //Skip "CheckSum" DWORD |
||
298 | if (i == pe_checksum_pos) |
||
299 | continue; |
||
300 | |||
301 | //Calculate checksum |
||
302 | checksum = (checksum & 0xffffffff) + dw + (checksum >> 32); |
||
303 | if (checksum > top) |
||
304 | checksum = (checksum & 0xffffffff) + (checksum >> 32); |
||
305 | } |
||
306 | |||
307 | //Finish checksum |
||
308 | checksum = (checksum & 0xffff) + (checksum >> 16); |
||
309 | checksum = (checksum)+(checksum >> 16); |
||
310 | checksum = checksum & 0xffff; |
||
311 | |||
312 | checksum += (unsigned long)(filesize); |
||
313 | |||
314 | fclose(fptr); |
||
315 | |||
316 | //Return checksum |
||
317 | return (uint32_t)checksum; |
||
318 | } |
||
319 | |||
320 | Boolean repair_pe_checksum(const char* filename) { |
||
321 | size_t peoffset; |
||
322 | FILE* fptr; |
||
323 | |||
324 | uint32_t checksum = calculate_checksum(filename); |
||
325 | //if (checksum == 0x00000000) return false; |
||
326 | |||
327 | fptr = fopen(filename, "rb+"); |
||
328 | if (fptr == NULL) return false; |
||
329 | |||
330 | fseek(fptr, 0x3C, SEEK_SET); |
||
331 | fread(&peoffset, sizeof(peoffset), 1, fptr); |
||
332 | |||
333 | fseek(fptr, (long)peoffset + 88, SEEK_SET); |
||
334 | fwrite(&checksum, sizeof(uint32_t), 1, fptr); |
||
335 | |||
336 | fclose(fptr); |
||
337 | |||
338 | return true; |
||
339 | } |
||
340 | |||
274 | daniel-mar | 341 | Boolean doresources(HMODULE srcmod,char *dstname, int bits){ |
258 | daniel-mar | 342 | HRSRC datarsrc,aetersrc,manifestsrc; |
343 | HGLOBAL datah,aeteh,hupdate,manifesth; |
||
344 | Ptr newpipl = NULL, newaete = NULL; |
||
345 | LPVOID datap, aetep, manifestp; |
||
346 | PARM_T *pparm = NULL; |
||
347 | size_t piplsize,aetesize,origsize,manifestsize; |
||
348 | Str255 title; |
||
349 | LPCTSTR parm_type; |
||
350 | int i,parm_id; |
||
351 | Boolean discard = true; |
||
276 | daniel-mar | 352 | unsigned int obfuscseed = 0; |
258 | daniel-mar | 353 | long event_id; |
354 | |||
355 | if( (hupdate = _BeginUpdateResource(dstname,false)) ){ |
||
356 | DBG("BeginUpdateResource OK"); |
||
308 | daniel-mar | 357 | if( (datarsrc = FindResource(srcmod,MAKEINTRESOURCE(16000), "TPLT")) |
258 | daniel-mar | 358 | && (datah = LoadResource(srcmod,datarsrc)) |
359 | && (datap = (Ptr)LockResource(datah)) |
||
360 | && (aetersrc = FindResource(srcmod, MAKEINTRESOURCE(16000), "AETE")) |
||
361 | && (aeteh = LoadResource(srcmod, aetersrc)) |
||
362 | && (aetep = (Ptr)LockResource(aeteh)) |
||
363 | && (manifestsrc = FindResource(srcmod, MAKEINTRESOURCE(50), "TPLT")) |
||
364 | && (manifesth = LoadResource(srcmod, manifestsrc)) |
||
365 | && (manifestp = (Ptr)LockResource(manifesth)) ) |
||
366 | { |
||
367 | char newmanifest[5000]; |
||
368 | |||
369 | DBG("loaded DATA, PiPL"); |
||
370 | |||
371 | PLstrcpy(title,gdata->parm.title); |
||
372 | if(gdata->parm.popDialog) |
||
373 | PLstrcat(title,(StringPtr)"\003..."); |
||
374 | |||
375 | origsize = SizeofResource(srcmod,datarsrc); |
||
376 | |||
377 | if( (newpipl = (Ptr)malloc(origsize+0x300)) |
||
378 | && (newaete = (Ptr)malloc(4096)) |
||
379 | && (pparm = (PARM_T*)malloc(sizeof(PARM_T))) ) |
||
380 | { |
||
381 | // ====== Generate AETE and PIPL |
||
382 | |||
383 | /* add user-specified title and category to new PiPL */ |
||
384 | memcpy(newpipl,datap,origsize); |
||
385 | /* note that Windows PiPLs have 2 byte version datum in front |
||
386 | that isn't reflected in struct definition or Mac resource template: */ |
||
387 | piplsize = fixpipl((PIPropertyList*)(newpipl+2),origsize-2,title, &event_id) + 2; |
||
388 | |||
389 | /* set up the PARM resource with saved parameters */ |
||
390 | memcpy(pparm,&gdata->parm,sizeof(PARM_T)); |
||
391 | |||
392 | /* Generate 'aete' resource (contains names of the parameters for the "Actions" tab in Photoshop) */ |
||
393 | aetesize = aete_generate(newaete, pparm, event_id); |
||
394 | |||
395 | // ====== Change Pascal strings to C-Strings |
||
396 | |||
397 | /* convert to C strings for Windows PARM resource */ |
||
398 | // Don't do it before aete_generate, because they need Pascal strings |
||
399 | myp2cstr(pparm->category); |
||
400 | myp2cstr(pparm->title); |
||
401 | myp2cstr(pparm->copyright); |
||
402 | myp2cstr(pparm->author); |
||
403 | for (i = 0; i < 4; ++i) |
||
404 | myp2cstr(pparm->map[i]); |
||
405 | for (i = 0; i < 8; ++i) |
||
406 | myp2cstr(pparm->ctl[i]); |
||
407 | |||
274 | daniel-mar | 408 | manifestsize = domanifest(newmanifest, (const char*)manifestp, pparm, bits); |
258 | daniel-mar | 409 | |
410 | // ====== Change version attributes |
||
411 | |||
412 | changeVersionInfo(dstname, pparm, hupdate); |
||
413 | |||
414 | // ====== Obfuscate pparm! |
||
415 | |||
292 | daniel-mar | 416 | if (gdata->obfusc) { |
258 | daniel-mar | 417 | parm_type = RT_RCDATA; |
418 | parm_id = OBFUSCDATA_ID; |
||
276 | daniel-mar | 419 | |
420 | // Note: After we have finished updating the resources, we will write <obfuscseed> into the binary code of the 8BF file |
||
292 | daniel-mar | 421 | obfuscseed = obfusc(pparm); |
258 | daniel-mar | 422 | }else{ |
423 | parm_type = "PARM"; |
||
424 | parm_id = PARM_ID; |
||
425 | } |
||
426 | |||
427 | // ====== Save AETE, PIPL, Manifest and PARM/RCDATA |
||
428 | |||
429 | /* Attention: The resource we have found using FindResource() might have a different |
||
430 | language than the resource we are saving (Neutral), so we might end up having |
||
431 | multiple languages for the same resource. Therefore, the language "Neutral" was |
||
432 | set in the Scripting.rc file for the resource AETE and PIPL.rc for the resources PIPL. */ |
||
274 | daniel-mar | 433 | |
308 | daniel-mar | 434 | if(_UpdateResource(hupdate, "TPLT" /* note: caps!! */, MAKEINTRESOURCE(50), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
435 | && _UpdateResource(hupdate, "TPLT" /* note: caps!! */, MAKEINTRESOURCE(16000), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
||
436 | && _UpdateResource(hupdate, RT_DIALOG, MAKEINTRESOURCE(ID_BUILDDLG), MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), NULL, 0) // clean up things we don't need in the standalone plugin |
||
437 | && _UpdateResource(hupdate, RT_DIALOG, MAKEINTRESOURCE(ID_MAINDLG), MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), NULL, 0) // clean up things we don't need in the standalone plugin |
||
438 | && _UpdateResource(hupdate, RT_GROUP_ICON, "CAUTION_ICO", MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
||
439 | && _UpdateResource(hupdate, RT_ICON, MAKEINTRESOURCE(1)/*Caution*/, MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
||
440 | && _UpdateResource(hupdate, RT_GROUP_CURSOR, MAKEINTRESOURCE(IDC_FF_HAND_QUESTION), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
||
441 | && _UpdateResource(hupdate, RT_CURSOR, MAKEINTRESOURCE(6)/*QuestionHand*/, MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), NULL, 0) // clean up things we don't need in the standalone plugin |
||
442 | && _UpdateResource(hupdate, "PIPL" /* note: caps!! */,MAKEINTRESOURCE(16000), MAKELANGID(LANG_NEUTRAL,SUBLANG_NEUTRAL),newpipl,(DWORD)piplsize) |
||
258 | daniel-mar | 443 | && _UpdateResource(hupdate, "AETE" /* note: caps!! */, MAKEINTRESOURCE(16000), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), newaete, (DWORD)aetesize) |
444 | && _UpdateResource(hupdate, RT_MANIFEST, MAKEINTRESOURCE(1), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), newmanifest, (DWORD)manifestsize) |
||
308 | daniel-mar | 445 | && _UpdateResource(hupdate, parm_type,MAKEINTRESOURCE(parm_id), MAKELANGID(LANG_NEUTRAL,SUBLANG_NEUTRAL),pparm,sizeof(PARM_T)) ) |
258 | daniel-mar | 446 | { |
447 | discard = false; |
||
448 | } else { |
||
449 | dbglasterror(_strdup("UpdateResource")); |
||
450 | } |
||
451 | } |
||
452 | |||
453 | }else dbglasterror(_strdup("Find-, Load- or LockResource")); |
||
454 | |||
276 | daniel-mar | 455 | // Here, the file will be saved |
258 | daniel-mar | 456 | if(!_EndUpdateResource(hupdate,discard)) |
457 | dbglasterror(_strdup("EndUpdateResource")); |
||
458 | |||
276 | daniel-mar | 459 | if (gdata->obfusc) { |
277 | daniel-mar | 460 | // We modify the binary code to replace the deobfuscate-seed from <cObfuscV4Seed> to <obfuscseed> |
278 | daniel-mar | 461 | if (binary_replace_file(dstname, cObfuscV4Seed, obfuscseed) != 1) { |
462 | // The seed must only be exactly 1 time inside the 8BF file, |
||
463 | // since "const volatile" makes sure that the compiler won't place |
||
464 | // it at several locations in the code. |
||
276 | daniel-mar | 465 | dbg("binary_replace_file failed"); |
466 | discard = true; |
||
467 | } |
||
468 | } |
||
469 | |||
278 | daniel-mar | 470 | update_pe_timestamp(dstname, time(0)); |
471 | |||
281 | daniel-mar | 472 | repair_pe_checksum(dstname); |
473 | |||
258 | daniel-mar | 474 | if(pparm) free(pparm); |
475 | if(newpipl) free(newpipl); |
||
476 | if(newaete) free(newaete); |
||
477 | }else |
||
478 | dbglasterror(_strdup("BeginUpdateResource")); |
||
479 | return !discard; |
||
480 | } |
||
481 | |||
278 | daniel-mar | 482 | Boolean remove_64_filename_prefix(char* dstname) { |
274 | daniel-mar | 483 | // foobar.8bf => foobar.8bf |
484 | // foobar64.8bf => foobar.8bf |
||
276 | daniel-mar | 485 | size_t i; |
274 | daniel-mar | 486 | for (i = strlen(dstname); i > 2; i--) { |
487 | if (dstname[i] == '.') { |
||
488 | if ((dstname[i - 2] == '6') && (dstname[i - 1] == '4')) { |
||
276 | daniel-mar | 489 | size_t tmp = strlen(dstname); |
274 | daniel-mar | 490 | memcpy(&dstname[i - 2], &dstname[i], strlen(dstname) - i + 1); |
491 | dstname[tmp - 2] = 0; |
||
492 | return true; |
||
493 | } |
||
494 | } |
||
495 | } |
||
496 | return false; |
||
497 | } |
||
498 | |||
278 | daniel-mar | 499 | Boolean add_64_filename_prefix(char* dstname) { |
274 | daniel-mar | 500 | // foobar.8bf => foobar64.8bf |
276 | daniel-mar | 501 | size_t i; |
274 | daniel-mar | 502 | for (i = strlen(dstname); i > 2; i--) { |
503 | if (dstname[i] == '.') { |
||
276 | daniel-mar | 504 | size_t tmp = strlen(dstname); |
274 | daniel-mar | 505 | memcpy(&dstname[i + 2], &dstname[i], strlen(dstname) - i + 1); |
506 | dstname[i] = '6'; |
||
507 | dstname[i + 1] = '4'; |
||
508 | dstname[tmp + 2] = 0; |
||
509 | return true; |
||
510 | } |
||
511 | } |
||
512 | return false; |
||
513 | } |
||
514 | |||
515 | BOOL FileExists(LPCTSTR szPath) { |
||
516 | DWORD dwAttrib = GetFileAttributes(szPath); |
||
517 | return (dwAttrib != INVALID_FILE_ATTRIBUTES && |
||
518 | !(dwAttrib & FILE_ATTRIBUTE_DIRECTORY)); |
||
519 | } |
||
520 | |||
308 | daniel-mar | 521 | Boolean extractFile(LPCTSTR lpType, LPCTSTR lpName, const char* outName) { |
522 | HGLOBAL datah; |
||
523 | LPVOID datap; |
||
524 | HRSRC datarsrc; |
||
525 | size_t datalen; |
||
526 | |||
527 | if ((datarsrc = FindResource((HMODULE)hDllInstance, lpName, lpType)) |
||
528 | && (datah = LoadResource((HMODULE)hDllInstance, datarsrc)) |
||
529 | && (datalen = SizeofResource((HMODULE)hDllInstance, datarsrc)) |
||
530 | && (datap = (Ptr)LockResource(datah))) { |
||
531 | |||
532 | FILE* fp = fopen(outName, "wb+"); |
||
533 | if (fp == NULL) return false; |
||
534 | if (fwrite(datap, 1, datalen, fp) != datalen) return false; |
||
535 | if (fclose(fp)) return false; |
||
536 | |||
537 | return true; |
||
538 | } |
||
539 | else { |
||
540 | return false; |
||
541 | } |
||
542 | } |
||
543 | |||
544 | OSErr do_make_standalone(char* dstname, int bits) { |
||
274 | daniel-mar | 545 | Boolean res; |
292 | daniel-mar | 546 | char err[MAX_PATH + 200]; |
547 | |||
274 | daniel-mar | 548 | //DeleteFile(dstname); |
308 | daniel-mar | 549 | if (extractFile("TPLT", MAKEINTRESOURCE(1000 + bits), dstname)) { |
274 | daniel-mar | 550 | HMODULE hSrcmod; |
308 | daniel-mar | 551 | hSrcmod = LoadLibraryEx(dstname, NULL, LOAD_LIBRARY_AS_DATAFILE); |
274 | daniel-mar | 552 | if (hSrcmod) { |
553 | res = doresources(hSrcmod, dstname, bits); |
||
308 | daniel-mar | 554 | FreeLibrary(hSrcmod); // do it now, otherwise DeleteFile() will not work |
274 | daniel-mar | 555 | if (!res) { |
556 | DeleteFile(dstname); |
||
292 | daniel-mar | 557 | sprintf(err, "Could not create %d bit standalone plugin (doresources failed).", bits); |
558 | alertuser(_strdup(&err[0]), _strdup("")); |
||
274 | daniel-mar | 559 | } |
560 | } |
||
561 | else { |
||
292 | daniel-mar | 562 | DWORD dwErr = GetLastError(); |
274 | daniel-mar | 563 | res = false; |
292 | daniel-mar | 564 | DeleteFile(dstname); |
565 | // TODO: Also translate Win32 error to use readable text ( https://docs.microsoft.com/en-us/windows/win32/debug/retrieving-the-last-error-code ) |
||
294 | daniel-mar | 566 | sprintf(err, "Could not create %d bit standalone plugin (LoadLibraryEx failed, Win32 error %lu).", bits, dwErr); |
292 | daniel-mar | 567 | alertuser(_strdup(&err[0]), _strdup("")); |
274 | daniel-mar | 568 | } |
569 | } |
||
570 | else { |
||
308 | daniel-mar | 571 | // If you see this error, please make sure that you have called foundry_3264_mixer to include the 32/64 plugins as resource! |
274 | daniel-mar | 572 | res = false; |
292 | daniel-mar | 573 | //DeleteFile(dstname); |
308 | daniel-mar | 574 | sprintf(err, "Could not create %d bit standalone plugin (File extraction failed).", bits); |
274 | daniel-mar | 575 | alertuser(_strdup(&err[0]), _strdup("")); |
576 | } |
||
577 | |||
578 | return res ? noErr : ioErr; |
||
579 | } |
||
580 | |||
258 | daniel-mar | 581 | OSErr make_standalone(StandardFileReply *sfr){ |
274 | daniel-mar | 582 | OSErr tmpErr, outErr; |
308 | daniel-mar | 583 | char dstname[MAX_PATH+1]; |
258 | daniel-mar | 584 | |
585 | if (!isWin32NT()) { |
||
586 | HMODULE hLib; |
||
587 | |||
588 | hLib = LoadLibraryA("UNICOWS.DLL"); |
||
589 | if (!hLib) { |
||
590 | char* sysdir; |
||
591 | |||
279 | daniel-mar | 592 | // Unicows.dll is required to implement the BeginUpdateResource functionalities in Win9x |
593 | |||
258 | daniel-mar | 594 | sysdir = (char*)malloc(MAX_PATH); |
595 | GetSystemDirectoryA(sysdir, MAX_PATH); |
||
596 | alertuser(_strdup("To build standalone plugins using this version of\nWindows, you need to install UNICOWS.DLL\n\nPlease download it from the Internet\nand place it into following directory:"), sysdir); |
||
597 | free(sysdir); |
||
598 | |||
599 | return false; |
||
600 | } |
||
601 | else { |
||
602 | FreeLibrary(hLib); |
||
603 | } |
||
604 | } |
||
605 | |||
274 | daniel-mar | 606 | outErr = noErr; |
308 | daniel-mar | 607 | |
608 | // Make 32 bit: |
||
609 | // Destfile = no64_or_32(chosenname) |
||
274 | daniel-mar | 610 | myp2cstrcpy(dstname, sfr->sfFile.name); |
611 | remove_64_filename_prefix(dstname); |
||
308 | daniel-mar | 612 | tmpErr = do_make_standalone(&dstname[0], 32); |
274 | daniel-mar | 613 | if (tmpErr != noErr) |
614 | outErr = tmpErr; |
||
615 | else |
||
308 | daniel-mar | 616 | showmessage(_strdup("32 bit standalone filter was successfully created")); |
274 | daniel-mar | 617 | |
308 | daniel-mar | 618 | if (isWin32NT()) { |
619 | // Make 64 bit: |
||
620 | // Destfile = no64_or_32(chosenname) + 64 |
||
274 | daniel-mar | 621 | myp2cstrcpy(dstname, sfr->sfFile.name); |
622 | remove_64_filename_prefix(dstname); |
||
308 | daniel-mar | 623 | add_64_filename_prefix(dstname); |
624 | tmpErr = do_make_standalone(&dstname[0], 64); |
||
274 | daniel-mar | 625 | if (tmpErr != noErr) |
626 | outErr = tmpErr; |
||
627 | else |
||
308 | daniel-mar | 628 | showmessage(_strdup("64 bit standalone filter was successfully created")); |
277 | daniel-mar | 629 | } |
279 | daniel-mar | 630 | else { |
631 | // Unicows.dll cannot edit resources of 64 bit DLLs. |
||
632 | // The normal Kernel function BeginUpdateResource can edit 64 bit DLLs, even in NT4.0 SP6 |
||
633 | simplealert(_strdup("Note: A 64 bit standalone filter cannot be created with your Windows version")); |
||
634 | } |
||
274 | daniel-mar | 635 | |
636 | return outErr; |
||
258 | daniel-mar | 637 | } |
308 | daniel-mar | 638 |