Subversion Repositories filter_foundry

Rev

Rev 322 | Rev 331 | 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
 
324 daniel-mar 53
int domanifest(char *newmanifest, 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) {
315 daniel-mar 171
                simplealert(_strdup("UpdateVersionInfoWithHandle failed"));
258 daniel-mar 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(&timestamp, 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;
324 daniel-mar 346
        char* manifestp_copy;
258 daniel-mar 347
        PARM_T *pparm = NULL;
324 daniel-mar 348
        size_t piplsize,aetesize,origsize;
258 daniel-mar 349
        Str255 title;
350
        LPCTSTR parm_type;
351
        int i,parm_id;
352
        Boolean discard = true;
276 daniel-mar 353
        unsigned int obfuscseed = 0;
258 daniel-mar 354
        long event_id;
319 daniel-mar 355
        Boolean mustFreeSrcMod;
258 daniel-mar 356
 
319 daniel-mar 357
        if (srcmod == NULL) {
358
                srcmod = LoadLibraryEx(dstname, NULL, LOAD_LIBRARY_AS_DATAFILE);
359
                if (!srcmod) {
360
                        dbglasterror(_strdup("LoadLibraryEx"));
361
                        return false;
362
                }
363
                mustFreeSrcMod = true;
364
        }
365
        else {
366
                mustFreeSrcMod = false;
367
        }
368
 
258 daniel-mar 369
        if( (hupdate = _BeginUpdateResource(dstname,false)) ){
370
                DBG("BeginUpdateResource OK");
308 daniel-mar 371
                if( (datarsrc = FindResource(srcmod,MAKEINTRESOURCE(16000), "TPLT"))
258 daniel-mar 372
                        && (datah = LoadResource(srcmod,datarsrc))
373
                        && (datap = (Ptr)LockResource(datah))
374
                        && (aetersrc = FindResource(srcmod, MAKEINTRESOURCE(16000), "AETE"))
375
                        && (aeteh = LoadResource(srcmod, aetersrc))
376
                        && (aetep = (Ptr)LockResource(aeteh))
377
                        && (manifestsrc = FindResource(srcmod, MAKEINTRESOURCE(50), "TPLT"))
378
                        && (manifesth = LoadResource(srcmod, manifestsrc))
379
                        && (manifestp = (Ptr)LockResource(manifesth)) )
380
                {
324 daniel-mar 381
                        char* newmanifest;
382
                        int manifestsize = SizeofResource(srcmod, manifestsrc);
258 daniel-mar 383
 
324 daniel-mar 384
                        newmanifest = (char*)malloc(manifestsize + 4096/*+4KiB for name,description,etc.*/);
385
 
258 daniel-mar 386
                        DBG("loaded DATA, PiPL");
387
 
388
                        PLstrcpy(title,gdata->parm.title);
389
                        if(gdata->parm.popDialog)
390
                                PLstrcat(title,(StringPtr)"\003...");
391
 
392
                        origsize = SizeofResource(srcmod,datarsrc);
393
 
394
                        if( (newpipl = (Ptr)malloc(origsize+0x300))
395
                         && (newaete = (Ptr)malloc(4096))
396
                         && (pparm = (PARM_T*)malloc(sizeof(PARM_T))) )
397
                        {
398
                                // ====== Generate AETE and PIPL
399
 
400
                                /* add user-specified title and category to new PiPL */
401
                                memcpy(newpipl,datap,origsize);
402
                                /* note that Windows PiPLs have 2 byte version datum in front
403
                                   that isn't reflected in struct definition or Mac resource template: */
404
                                piplsize = fixpipl((PIPropertyList*)(newpipl+2),origsize-2,title, &event_id) + 2;
405
 
406
                                /* set up the PARM resource with saved parameters */
407
                                memcpy(pparm,&gdata->parm,sizeof(PARM_T));
408
 
409
                                /* Generate 'aete' resource (contains names of the parameters for the "Actions" tab in Photoshop) */
410
                                aetesize = aete_generate(newaete, pparm, event_id);
411
 
412
                                // ====== Change Pascal strings to C-Strings
413
 
414
                                /* convert to C strings for Windows PARM resource */
415
                                // Don't do it before aete_generate, because they need Pascal strings
416
                                myp2cstr(pparm->category);
417
                                myp2cstr(pparm->title);
418
                                myp2cstr(pparm->copyright);
419
                                myp2cstr(pparm->author);
420
                                for (i = 0; i < 4; ++i)
421
                                        myp2cstr(pparm->map[i]);
422
                                for (i = 0; i < 8; ++i)
423
                                        myp2cstr(pparm->ctl[i]);
424
 
324 daniel-mar 425
                                // ====== Create fitting manifest for the activation context
258 daniel-mar 426
 
324 daniel-mar 427
                                manifestp_copy = (char*)malloc(manifestsize + 1/*sz*/);
428
                                if (manifestp_copy != 0) {
429
                                        memcpy(manifestp_copy, manifestp, manifestsize); // copy manifestp to manifestp_copy, because manifestp is readonly
430
                                        manifestp_copy[manifestsize] = '\0'; // and add the null-terminating char, because domanifest() uses sprintf() on it
431
                                        manifestsize = domanifest(newmanifest, manifestp_copy, pparm, bits);
432
                                        free(manifestp_copy);
433
                                }
434
 
258 daniel-mar 435
                                // ====== Change version attributes
436
 
437
                                changeVersionInfo(dstname, pparm, hupdate);
438
 
439
                                // ====== Obfuscate pparm!
440
 
292 daniel-mar 441
                                if (gdata->obfusc) {
258 daniel-mar 442
                                        parm_type = RT_RCDATA;
443
                                        parm_id = OBFUSCDATA_ID;
276 daniel-mar 444
 
445
                                        // Note: After we have finished updating the resources, we will write <obfuscseed> into the binary code of the 8BF file
292 daniel-mar 446
                                        obfuscseed = obfusc(pparm);
258 daniel-mar 447
                                }else{
448
                                        parm_type = "PARM";
449
                                        parm_id = PARM_ID;
450
                                }
451
 
452
                                // ====== Save AETE, PIPL, Manifest and PARM/RCDATA
453
 
454
                                /* Attention: The resource we have found using FindResource() might have a different
455
                                   language than the resource we are saving (Neutral), so we might end up having
456
                                   multiple languages for the same resource. Therefore, the language "Neutral" was
457
                                   set in the Scripting.rc file for the resource AETE and PIPL.rc for the resources PIPL. */
274 daniel-mar 458
 
308 daniel-mar 459
                                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
460
                                        && _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
461
                                        && _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
462
                                        && _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
463
                                        && _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
464
                                        && _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
465
                                        && _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
466
                                        && _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
324 daniel-mar 467
                                        && ((bits != 32) || _UpdateResource(hupdate, "DLL", "UNICOWS", MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), NULL, 0)) // clean up things we don't need in the standalone plugin
308 daniel-mar 468
                                        && _UpdateResource(hupdate, "PIPL" /* note: caps!! */,MAKEINTRESOURCE(16000), MAKELANGID(LANG_NEUTRAL,SUBLANG_NEUTRAL),newpipl,(DWORD)piplsize)
258 daniel-mar 469
                                        && _UpdateResource(hupdate, "AETE" /* note: caps!! */, MAKEINTRESOURCE(16000), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), newaete, (DWORD)aetesize)
470
                                        && _UpdateResource(hupdate, RT_MANIFEST, MAKEINTRESOURCE(1), MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), newmanifest, (DWORD)manifestsize)
308 daniel-mar 471
                                        && _UpdateResource(hupdate, parm_type,MAKEINTRESOURCE(parm_id), MAKELANGID(LANG_NEUTRAL,SUBLANG_NEUTRAL),pparm,sizeof(PARM_T)) )
258 daniel-mar 472
                                {
473
                                        discard = false;
474
                                } else {
475
                                        dbglasterror(_strdup("UpdateResource"));
476
                                }
477
                        }
478
 
479
                }else dbglasterror(_strdup("Find-, Load- or LockResource"));
480
 
276 daniel-mar 481
                // Here, the file will be saved
319 daniel-mar 482
                if (mustFreeSrcMod) {
483
                        FreeLibrary(srcmod);
484
                }
485
                if (!_EndUpdateResource(hupdate, discard)) {
258 daniel-mar 486
                        dbglasterror(_strdup("EndUpdateResource"));
319 daniel-mar 487
                }
488
                else {
258 daniel-mar 489
 
319 daniel-mar 490
                        if (gdata->obfusc) {
491
                                // We modify the binary code to replace the deobfuscate-seed from <cObfuscV4Seed> to <obfuscseed>
492
                                if (binary_replace_file(dstname, cObfuscV4Seed, obfuscseed) != 1) {
493
                                        // The seed must only be exactly 1 time inside the 8BF file,
494
                                        // since "const volatile" makes sure that the compiler won't place
495
                                        // it at several locations in the code.
496
                                        dbg("binary_replace_file failed");
497
                                        discard = true;
498
                                }
276 daniel-mar 499
                        }
500
 
319 daniel-mar 501
                        update_pe_timestamp(dstname, time(0));
278 daniel-mar 502
 
319 daniel-mar 503
                        repair_pe_checksum(dstname);
504
                }
505
 
258 daniel-mar 506
                if(pparm) free(pparm);
507
                if(newpipl) free(newpipl);
508
                if(newaete) free(newaete);
509
        }else
510
                dbglasterror(_strdup("BeginUpdateResource"));
511
        return !discard;
512
}
513
 
278 daniel-mar 514
Boolean remove_64_filename_prefix(char* dstname) {
274 daniel-mar 515
        // foobar.8bf => foobar.8bf
516
        // foobar64.8bf => foobar.8bf
276 daniel-mar 517
        size_t i;
274 daniel-mar 518
        for (i = strlen(dstname); i > 2; i--) {
519
                if (dstname[i] == '.') {
520
                        if ((dstname[i - 2] == '6') && (dstname[i - 1] == '4')) {
276 daniel-mar 521
                                size_t tmp = strlen(dstname);
274 daniel-mar 522
                                memcpy(&dstname[i - 2], &dstname[i], strlen(dstname) - i + 1);
523
                                dstname[tmp - 2] = 0;
524
                                return true;
525
                        }
526
                }
527
        }
528
        return false;
529
}
530
 
278 daniel-mar 531
Boolean add_64_filename_prefix(char* dstname) {
274 daniel-mar 532
        // foobar.8bf => foobar64.8bf
276 daniel-mar 533
        size_t i;
274 daniel-mar 534
        for (i = strlen(dstname); i > 2; i--) {
535
                if (dstname[i] == '.') {
276 daniel-mar 536
                        size_t tmp = strlen(dstname);
274 daniel-mar 537
                        memcpy(&dstname[i + 2], &dstname[i], strlen(dstname) - i + 1);
538
                        dstname[i] = '6';
539
                        dstname[i + 1] = '4';
540
                        dstname[tmp + 2] = 0;
541
                        return true;
542
                }
543
        }
544
        return false;
545
}
546
 
547
BOOL FileExists(LPCTSTR szPath) {
548
        DWORD dwAttrib = GetFileAttributes(szPath);
549
        return (dwAttrib != INVALID_FILE_ATTRIBUTES &&
550
                !(dwAttrib & FILE_ATTRIBUTE_DIRECTORY));
551
}
552
 
314 daniel-mar 553
Boolean extract_file(LPCTSTR lpType, LPCTSTR lpName, const char* outName) {
308 daniel-mar 554
        HGLOBAL datah;
555
        LPVOID datap;
556
        HRSRC datarsrc;
557
        size_t datalen;
558
 
559
        if ((datarsrc = FindResource((HMODULE)hDllInstance, lpName, lpType))
560
                && (datah = LoadResource((HMODULE)hDllInstance, datarsrc))
561
                && (datalen = SizeofResource((HMODULE)hDllInstance, datarsrc))
562
                && (datap = (Ptr)LockResource(datah))) {
563
 
564
                FILE* fp = fopen(outName, "wb+");
565
                if (fp == NULL) return false;
566
                if (fwrite(datap, 1, datalen, fp) != datalen) return false;
567
                if (fclose(fp)) return false;
568
 
569
                return true;
570
        }
571
        else {
572
                return false;
573
        }
574
}
575
 
576
OSErr do_make_standalone(char* dstname, int bits) {
274 daniel-mar 577
        Boolean res;
292 daniel-mar 578
        char err[MAX_PATH + 200];
579
 
274 daniel-mar 580
        //DeleteFile(dstname);
314 daniel-mar 581
        if (extract_file("TPLT", MAKEINTRESOURCE(1000 + bits), dstname)) {
319 daniel-mar 582
                res = doresources(NULL, dstname, bits);
583
                if (!res) {
292 daniel-mar 584
                        DeleteFile(dstname);
319 daniel-mar 585
                        sprintf(err, "Could not create %d bit standalone plugin (doresources failed).", bits);
292 daniel-mar 586
                        alertuser(_strdup(&err[0]), _strdup(""));
274 daniel-mar 587
                }
588
        }
589
        else {
308 daniel-mar 590
                // 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 591
                res = false;
292 daniel-mar 592
                //DeleteFile(dstname);
308 daniel-mar 593
                sprintf(err, "Could not create %d bit standalone plugin (File extraction failed).", bits);
274 daniel-mar 594
                alertuser(_strdup(&err[0]), _strdup(""));
595
        }
596
 
597
        return res ? noErr : ioErr;
598
}
599
 
314 daniel-mar 600
Boolean check_unicows() {
601
        // Unicows.dll is required for Win9x to implement the BeginUpdateResource functionalities
602
 
603
        if (isWin32NT()) {
604
                // Modern Windows don't require UnicoWS
605
                return true;
606
        } else {
258 daniel-mar 607
                HMODULE hLib;
608
 
609
                hLib = LoadLibraryA("UNICOWS.DLL");
610
                if (!hLib) {
318 daniel-mar 611
                        char dstname[MAX_PATH + 1];
258 daniel-mar 612
 
314 daniel-mar 613
                        // Try to install UnicoWS automatically
318 daniel-mar 614
                        GetSystemDirectoryA(&dstname[0], MAX_PATH);
615
                        strcat(&dstname[0], "\\UNICOWS.DLL");
616
                        extract_file("DLL", "UNICOWS", &dstname[0]); // included in make_win.rc
279 daniel-mar 617
 
314 daniel-mar 618
                        hLib = LoadLibraryA("UNICOWS.DLL");
619
                        if (!hLib) {
620
                                // This should not happen
316 daniel-mar 621
                                simplealert(_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 your system directory"));
258 daniel-mar 622
 
314 daniel-mar 623
                                return false;
624
                        }
625
                        else {
626
                                FreeLibrary(hLib);
627
                                return true;
628
                        }
258 daniel-mar 629
                }
630
                else {
631
                        FreeLibrary(hLib);
314 daniel-mar 632
                        return true;
258 daniel-mar 633
                }
634
        }
314 daniel-mar 635
}
258 daniel-mar 636
 
314 daniel-mar 637
OSErr make_standalone(StandardFileReply *sfr){
638
        OSErr tmpErr, outErr;
639
        char dstname[MAX_PATH+1];
640
 
274 daniel-mar 641
        outErr = noErr;
314 daniel-mar 642
 
643
        check_unicows();
308 daniel-mar 644
 
645
        // Make 32 bit:
646
        // Destfile = no64_or_32(chosenname)
274 daniel-mar 647
        myp2cstrcpy(dstname, sfr->sfFile.name);
648
        remove_64_filename_prefix(dstname);
308 daniel-mar 649
        tmpErr = do_make_standalone(&dstname[0], 32);
274 daniel-mar 650
        if (tmpErr != noErr)
651
                outErr = tmpErr;
652
        else
308 daniel-mar 653
                showmessage(_strdup("32 bit standalone filter was successfully created"));
274 daniel-mar 654
 
308 daniel-mar 655
        if (isWin32NT()) {
656
                // Make 64 bit:
657
                // Destfile = no64_or_32(chosenname) + 64
274 daniel-mar 658
                myp2cstrcpy(dstname, sfr->sfFile.name);
659
                remove_64_filename_prefix(dstname);
308 daniel-mar 660
                add_64_filename_prefix(dstname);
661
                tmpErr = do_make_standalone(&dstname[0], 64);
274 daniel-mar 662
                if (tmpErr != noErr)
663
                        outErr = tmpErr;
664
                else
308 daniel-mar 665
                        showmessage(_strdup("64 bit standalone filter was successfully created"));
277 daniel-mar 666
        }
279 daniel-mar 667
        else {
668
                // Unicows.dll cannot edit resources of 64 bit DLLs.
669
                // The normal Kernel function BeginUpdateResource can edit 64 bit DLLs, even in NT4.0 SP6
320 daniel-mar 670
                simplewarning(_strdup("Note: A 64 bit standalone filter cannot be created with your Windows version"));
279 daniel-mar 671
        }
274 daniel-mar 672
 
673
        return outErr;
258 daniel-mar 674
}
308 daniel-mar 675