source: trunk/dll/extract.c@ 1811

Last change on this file since 1811 was 1798, checked in by Gregg Young, 11 years ago

Fix case where fix to remove a leading quote from the extract path would remove the drive letter. Ticket [495]
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 16.6 KB
RevLine 
[123]1
2/***********************************************************************
3
4 $Id: extract.c 1798 2015-03-16 22:19:55Z gyoung $
5
6 Copyright (c) 1993-98 M. Kimes
[1694]7 Copyright (c) 2004, 2013 Steven H. Levine
[123]8
[186]9 01 Aug 04 SHL Rework lstrip/rstrip usage
10 05 Jun 05 SHL Use QWL_USER
[350]11 17 Jul 06 SHL Use Runtime_Error
[549]12 20 Dec 06 GKY Added checkbox to make default extract with directories
[574]13 22 Mar 07 GKY Use QWL_USER
[618]14 19 Apr 07 SHL Sync with AcceptOneDrop GetOneDrop mods
[793]15 20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[1104]16 19 Jul 08 GKY Replace save_dir2(dir) with pFM2SaveDirectory
[1300]17 29 Nov 08 GKY Add the option of creating a subdirectory from the arcname
18 for the extract path.
[1395]19 07 Feb 09 GKY Allow user to turn off alert and/or error beeps in settings notebook.
[1694]20 17 Jan 10 GKY Changes to get working with Watcom 1.9 Beta (1/16/10). Mostly cast CHAR CONSTANT * as CHAR *.
[1546]21 23 Oct 10 GKY Changes to populate and utilize a HELPTABLE for context specific help
[1694]22 11 Aug 13 GKY Fix directory create failure on extract to directory based on archive name
23 if the name needed quoting.
[1717]24 15 Feb 14 GKY Assure the title is blank on the execute dialog call with the "see" button
[1791]25 31 Aug 14 GKY Fix failure to remove leading quote on toogle of extract directory to and
26 from using file name.
[1798]27 16 Mar 15 GKY Fixed case where leading quote fix would remove the drive letter.
[123]28
29***********************************************************************/
30
[907]31#include <string.h>
32#include <ctype.h>
33
[2]34#define INCL_WIN
35#define INCL_DOS
[907]36#define INCL_LONGLONG // dircnrs.h
[2]37
[1179]38#include "fm3dll.h"
[1223]39#include "fm3dll2.h" // #define's for UM_*, control id's, etc.
[1207]40#include "init.h" // Data declaration(s)
41#include "arccnrs.h" // Data declaration(s)
42#include "notebook.h" // Data declaration(s)
43#include "mainwnd.h" // Data declaration(s)
[2]44#include "fm3dlg.h"
45#include "fm3str.h"
[907]46#include "errutil.h" // Dos_Error...
47#include "strutil.h" // GetPString
[1157]48#include "cmdline.h" // CmdLineDlgProc
49#include "extract.h"
50#include "walkem.h" // WalkExtractDlgProc
[1179]51#include "droplist.h" // AcceptOneDrop, DropHelp, GetOneDrop
52#include "misc.h" // DrawTargetEmphasis
53#include "chklist.h" // PosOverOkay
54#include "mkdir.h" // SetDir
55#include "valid.h" // MakeValidDir
56#include "systemf.h" // runemf2
57#include "dirs.h" // save_dir2
58#include "strips.h" // bstrip
[2]59
60#pragma data_seg(DATA1)
[350]61
62static PSZ pszSrcFile = __FILE__;
[2]63
[551]64MRESULT EXPENTRY ExtractTextProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[350]65{
[574]66 PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
[551]67 static BOOL emphasized = FALSE;
[2]68
[551]69 switch (msg) {
70 case DM_DRAGOVER:
71 if (!emphasized) {
72 emphasized = TRUE;
73 DrawTargetEmphasis(hwnd, emphasized);
74 }
[618]75 if (AcceptOneDrop(hwnd, mp1, mp2))
[551]76 return MRFROM2SHORT(DOR_DROP, DO_MOVE);
77 return MRFROM2SHORT(DOR_NEVERDROP, 0);
[2]78
[551]79 case DM_DRAGLEAVE:
80 if (emphasized) {
81 emphasized = FALSE;
82 DrawTargetEmphasis(hwnd, emphasized);
83 }
84 break;
[2]85
[551]86 case DM_DROPHELP:
87 DropHelp(mp1, mp2, hwnd, GetPString(IDS_EXTDROPHELPTEXT));
88 return 0;
[2]89
[551]90 case DM_DROP:
91 {
92 char szFrom[CCHMAXPATH + 2];
[2]93
[551]94 if (emphasized) {
95 emphasized = FALSE;
96 DrawTargetEmphasis(hwnd, emphasized);
[2]97 }
[618]98 if (GetOneDrop(hwnd, mp1, mp2, szFrom, sizeof(szFrom)))
[551]99 WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), WM_COMMAND,
100 MPFROM2SHORT(IDM_SWITCH, 0), MPFROMP(szFrom));
101 }
102 return 0;
[2]103 }
[551]104 return (oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
105 WinDefWindowProc(hwnd, msg, mp1, mp2);
[2]106}
107
[551]108MRESULT EXPENTRY ExtractDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[350]109{
[551]110 EXTRDATA *arcdata = NULL;
[1344]111 ULONG size;
[1300]112 BOOL fFileNameExtPath;
[2]113
[551]114 switch (msg) {
115 case WM_INITDLG:
[574]116 WinSetWindowPtr(hwnd, QWL_USER, mp2);
[551]117 arcdata = (EXTRDATA *) mp2;
118 {
[1344]119 BOOL fDirectory = FALSE;
[551]120 BOOL fRemember = FALSE;
121 PFNWP oldproc;
[2]122
[1300]123 fFileNameExtPath = FALSE;
[551]124 oldproc = WinSubclassWindow(WinWindowFromID(hwnd, EXT_DIRECTORY),
125 (PFNWP) ExtractTextProc);
126 if (oldproc)
127 WinSetWindowPtr(WinWindowFromID(hwnd, EXT_DIRECTORY),
[1344]128 QWL_USER, (PVOID) oldproc);
129 size = sizeof(BOOL);
[1505]130 PrfQueryProfileData(fmprof, FM3Str, "RememberExt",
[1344]131 (PVOID) & fRemember, &size);
132 size = sizeof(BOOL);
[1505]133 PrfQueryProfileData(fmprof, FM3Str, "DirectoryExt",
[1300]134 (PVOID) & fDirectory, &size);
[1344]135 size = sizeof(BOOL);
[1505]136 PrfQueryProfileData(fmprof, FM3Str, "FileNamePathExt",
[1300]137 (PVOID) & fFileNameExtPath, &size);
[551]138 WinCheckButton(hwnd, EXT_REMEMBER, fRemember);
139 WinCheckButton(hwnd, EXT_AWDIRS, fDirectory);
[1300]140 WinCheckButton(hwnd, EXT_FILENAMEEXT, fFileNameExtPath);
[551]141 WinSendDlgItemMsg(hwnd, EXT_DIRECTORY, EM_SETTEXTLIMIT,
142 MPFROM2SHORT(CCHMAXPATH, 0), MPVOID);
143 WinSendDlgItemMsg(hwnd, EXT_COMMAND, EM_SETTEXTLIMIT,
144 MPFROM2SHORT(256, 0), MPVOID);
145 WinSendDlgItemMsg(hwnd, EXT_MASK, EM_SETTEXTLIMIT,
146 MPFROM2SHORT(256, 0), MPVOID);
147 WinSendDlgItemMsg(hwnd, EXT_FILENAME, EM_SETTEXTLIMIT,
148 MPFROM2SHORT(CCHMAXPATH, 0), MPVOID);
149 if (arcdata->arcname && *arcdata->arcname)
150 WinSetDlgItemText(hwnd, EXT_FILENAME, arcdata->arcname);
151 else
[1498]152 WinSetDlgItemText(hwnd, EXT_FILENAME, (CHAR *) GetPString(IDS_EXTVARIOUSTEXT));
[1300]153
154 if (fFileNameExtPath && arcdata->arcname) {
155
156 CHAR FileName[CCHMAXPATH];
157 PSZ p;
158
159 strcpy(FileName, arcdata->arcname);
160 p = strrchr(FileName, '.');
[1692]161 if (p) {
[1300]162 *p = 0;
[1692]163 if (strchr(FileName, '\"'))
164 memmove(FileName, FileName + 1, strlen(FileName) + 1);
165 }
[1300]166 else {
167 p = FileName + strlen(arcdata->arcname);
168 p--;
169 *p = 0;
[1798]170 if (strchr(FileName, '\"') && strchr(FileName, '\"') == strrchr(FileName, '\"'))
[1692]171 memmove(FileName , FileName + 1, strlen(FileName) + 1);
[1300]172 }
173 strcpy(arcdata->extractdir, FileName);
174 WinSetDlgItemText(hwnd, EXT_DIRECTORY, arcdata->extractdir);
175 }
[551]176 if (fDirectory) {
177 WinSendDlgItemMsg(hwnd, EXT_WDIRS, BM_SETCHECK,
178 MPFROM2SHORT(TRUE, 0), MPVOID);
179 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->exwdirs);
180 }
181 else {
182 WinSendDlgItemMsg(hwnd, EXT_NORMAL, BM_SETCHECK,
183 MPFROM2SHORT(TRUE, 0), MPVOID);
184 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->extract);
[549]185
[551]186 }
187 if (fRemember) {
[2]188
[1344]189 CHAR textdir[CCHMAXPATH];
[2]190
[1505]191 PrfQueryProfileString(fmprof, FM3Str, "Ext_ExtractDir", NULL, textdir, sizeof(textdir));
[551]192 if (*textdir && !IsFile(textdir))
193 strcpy(arcdata->extractdir, textdir);
[1505]194 PrfQueryProfileString(fmprof, FM3Str, "Ext_Mask", NULL, textdir, sizeof(textdir));
[551]195 WinSetDlgItemText(hwnd, EXT_MASK, textdir);
196 }
197 if (*extractpath && (!fRemember || !*arcdata->extractdir)) {
198 if (arcdata->arcname && *arcdata->arcname &&
199 !strcmp(extractpath, "*")) {
[2]200
[551]201 CHAR *p;
[2]202
[551]203 strcpy(arcdata->extractdir, arcdata->arcname);
204 p = strrchr(arcdata->extractdir, '\\');
205 if (p) {
206 if (p < arcdata->extractdir + 3)
207 p++;
208 *p = 0;
209 }
210 }
211 else
212 strcpy(arcdata->extractdir, extractpath);
213 }
214 if (!*arcdata->extractdir) {
215 if (*lastextractpath)
216 strcpy(arcdata->extractdir, lastextractpath);
217 else if (arcdata->arcname && *arcdata->arcname) {
[2]218
[551]219 CHAR *p;
[2]220
[551]221 strcpy(arcdata->extractdir, arcdata->arcname);
222 p = strrchr(arcdata->extractdir, '\\');
223 if (p) {
224 if (p < arcdata->extractdir + 3)
225 p++;
226 *p = 0;
227 }
228 }
229 if (!*arcdata->extractdir)
[1104]230 strcpy(arcdata->extractdir, pFM2SaveDirectory);
[2]231 }
[551]232 WinSetDlgItemText(hwnd, EXT_DIRECTORY, arcdata->extractdir);
233 if (!arcdata->info->exwdirs)
234 WinEnableWindow(WinWindowFromID(hwnd, EXT_WDIRS), FALSE);
235 else if (fRemember) {
[1344]236 fRemember = FALSE;
237 size = sizeof(BOOL);
[1505]238 PrfQueryProfileData(fmprof, FM3Str, "Ext_WDirs",
[1300]239 (PVOID) &fRemember, &size);
[551]240 if (fRemember)
241 PostMsg(WinWindowFromID(hwnd, EXT_WDIRS), BM_CLICK, MPVOID, MPVOID);
242 }
243 }
244 *arcdata->command = 0;
245 PosOverOkay(hwnd);
246 break;
[2]247
[551]248 case WM_ADJUSTWINDOWPOS:
249 PostMsg(hwnd, UM_SETDIR, MPVOID, MPVOID);
250 break;
[2]251
[551]252 case UM_SETDIR:
253 PaintRecessedWindow(WinWindowFromID(hwnd, EXT_HELP), (HPS) 0, FALSE,
254 TRUE);
255 return 0;
[2]256
[551]257 case WM_CONTROL:
[574]258 arcdata = (EXTRDATA *) WinQueryWindowPtr(hwnd, QWL_USER);
[551]259 switch (SHORT1FROMMP(mp1)) {
260 case EXT_REMEMBER:
261 {
262 BOOL fRemember = WinQueryButtonCheckstate(hwnd, EXT_REMEMBER);
[1344]263 size = sizeof(BOOL);
[1505]264 PrfWriteProfileData(fmprof, FM3Str, "RememberExt",
[1344]265 (PVOID) &fRemember, size);
266 WinSendDlgItemMsg(hwnd, EXT_FILENAMEEXT, BM_SETCHECK,
267 MPFROM2SHORT(FALSE, 0), MPVOID);
[551]268 }
269 break;
[2]270
[551]271 case EXT_AWDIRS:
272 {
273 BOOL fDirectory = WinQueryButtonCheckstate(hwnd, EXT_AWDIRS);
[1344]274 size = sizeof(BOOL);
[1505]275 PrfWriteProfileData(fmprof, FM3Str, "DirectoryExt",
[1300]276 (PVOID) &fDirectory, size);
[549]277
[551]278 if (fDirectory) {
279 WinSendDlgItemMsg(hwnd, EXT_WDIRS, BM_SETCHECK,
280 MPFROM2SHORT(TRUE, 0), MPVOID);
281 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->exwdirs);
282 }
283 else {
284 WinSendDlgItemMsg(hwnd, EXT_NORMAL, BM_SETCHECK,
285 MPFROM2SHORT(TRUE, 0), MPVOID);
286 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->extract);
287 }
288 }
289 break;
[549]290
[1300]291 case EXT_FILENAMEEXT:
292 {
[1344]293 BOOL fFileNameExtPath = WinQueryButtonCheckstate(hwnd, EXT_FILENAMEEXT);
294 BOOL fRemember = WinQueryButtonCheckstate(hwnd, EXT_REMEMBER);
295 size = sizeof(BOOL);
[1505]296 PrfWriteProfileData(fmprof, FM3Str, "FileNamePathExt",
[1344]297 fRemember ? FALSE : (PVOID) &fFileNameExtPath, size);
[1349]298 if (fRemember) {
299 WinSendDlgItemMsg(hwnd, EXT_FILENAMEEXT, BM_SETCHECK,
300 MPFROM2SHORT(FALSE, 0), MPVOID);
[1344]301 break;
[1349]302 }
[1300]303 if (fFileNameExtPath && arcdata->arcname) {
304 CHAR FileName[CCHMAXPATH];
305 PSZ p;
306
307 strcpy(FileName, arcdata->arcname);
308 p = strrchr(FileName, '.');
[1692]309 if (p) {
310 *p = 0;
311 if (strchr(FileName, '\"'))
[1791]312 memmove(FileName, FileName + 1, strlen(FileName) + 1);
[1692]313 }
[1300]314 else {
315 p = FileName + strlen(arcdata->arcname);
316 p--;
317 *p = 0;
[1798]318 if (strchr(FileName, '\"') && strchr(FileName, '\"') == strrchr(FileName, '\"'))
[1791]319 memmove(FileName, FileName + 1, strlen(FileName) + 1);
[1300]320 }
321 strcpy(arcdata->extractdir, FileName);
322 WinSetDlgItemText(hwnd, EXT_DIRECTORY, arcdata->extractdir);
323 }
324 else {
325 *arcdata->extractdir = 0;
326 if (*extractpath) {
327 if (arcdata->arcname && *arcdata->arcname &&
328 !strcmp(extractpath, "*")) {
329
330 CHAR *p;
331
332 strcpy(arcdata->extractdir, arcdata->arcname);
333 p = strrchr(arcdata->extractdir, '\\');
334 if (p) {
335 if (p < arcdata->extractdir + 3)
336 p++;
337 *p = 0;
338 }
339 }
340 else
341 strcpy(arcdata->extractdir, extractpath);
342 }
343 if (!*arcdata->extractdir) {
[1306]344 if (arcdata->arcname && *arcdata->arcname) {
[1300]345
346 CHAR *p;
347
348 strcpy(arcdata->extractdir, arcdata->arcname);
349 p = strrchr(arcdata->extractdir, '\\');
350 if (p) {
351 if (p < arcdata->extractdir + 3)
352 p++;
353 *p = 0;
354 }
355 }
356 if (!*arcdata->extractdir)
357 strcpy(arcdata->extractdir, pFM2SaveDirectory);
358 }
[1798]359 if (strchr(arcdata->extractdir, '\"') && strchr(arcdata->extractdir, '\"') == strrchr(arcdata->extractdir, '\"'))
[1791]360 memmove(arcdata->extractdir, arcdata->extractdir + 1,
361 strlen(arcdata->extractdir) + 1);
[1300]362 WinSetDlgItemText(hwnd, EXT_DIRECTORY, arcdata->extractdir);
363 }
364 }
365 break;
366
[551]367 case EXT_FILENAME:
368 if (SHORT2FROMMP(mp1) == EN_KILLFOCUS)
[1498]369 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCDEFAULTHELPTEXT));
[551]370 if (SHORT2FROMMP(mp1) == EN_SETFOCUS)
[1498]371 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCARCNAMEHELPTEXT));
[551]372 break;
[2]373
[551]374 case EXT_DIRECTORY:
375 if (SHORT2FROMMP(mp1) == EN_KILLFOCUS)
[1498]376 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCDEFAULTHELPTEXT));
[551]377 if (SHORT2FROMMP(mp1) == EN_SETFOCUS)
[1498]378 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_EXTEXTRACTDIRHELPTEXT));
[551]379 break;
[2]380
[551]381 case EXT_COMMAND:
382 if (SHORT2FROMMP(mp1) == EN_KILLFOCUS)
[1498]383 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCDEFAULTHELPTEXT));
[551]384 if (SHORT2FROMMP(mp1) == EN_SETFOCUS)
[1498]385 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCCMDHELPTEXT));
[551]386 break;
[2]387
[551]388 case EXT_MASK:
389 if (SHORT2FROMMP(mp1) == EN_KILLFOCUS)
[1498]390 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCDEFAULTHELPTEXT));
[551]391 if (SHORT2FROMMP(mp1) == EN_SETFOCUS)
[1498]392 WinSetDlgItemText(hwnd, EXT_HELP, (CHAR *) GetPString(IDS_ARCMASKHELPTEXT));
[551]393 break;
[2]394
[551]395 case EXT_NORMAL:
396 if ((BOOL) WinSendDlgItemMsg(hwnd, EXT_NORMAL, BM_QUERYCHECK,
397 MPVOID, MPVOID))
398 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->extract);
399 break;
[2]400
[551]401 case EXT_WDIRS:
402 if (arcdata->info->exwdirs) {
403 if ((BOOL) WinSendDlgItemMsg(hwnd, EXT_WDIRS, BM_QUERYCHECK,
404 MPVOID, MPVOID))
405 WinSetDlgItemText(hwnd, EXT_COMMAND, arcdata->info->exwdirs);
[2]406 }
[551]407 break;
408 }
409 return 0;
[2]410
[551]411 case WM_COMMAND:
[574]412 arcdata = (EXTRDATA *) WinQueryWindowPtr(hwnd, QWL_USER);
[551]413 switch (SHORT1FROMMP(mp1)) {
414 case IDM_SWITCH:
415 if (mp2) {
[2]416
[551]417 CHAR tdir[CCHMAXPATH];
[2]418
[551]419 strcpy(tdir, (CHAR *) mp2);
420 MakeValidDir(tdir);
421 WinSetDlgItemText(hwnd, EXT_DIRECTORY, tdir);
422 }
423 break;
[2]424
[551]425 case DID_CANCEL:
426 arcdata->ret = 0;
427 WinDismissDlg(hwnd, 0);
428 break;
429 case DID_OK:
430 {
431 CHAR s[CCHMAXPATH + 1];
432 BOOL fRemember;
[2]433
[551]434 fRemember = WinQueryButtonCheckstate(hwnd, EXT_REMEMBER);
435 *s = 0;
436 WinQueryDlgItemText(hwnd, EXT_DIRECTORY, CCHMAXPATH, s);
437 bstrip(s);
438 if (*s) {
439 if (!SetDir(WinQueryWindow(WinQueryWindow(hwnd, QW_PARENT),
[1300]440 QW_OWNER), hwnd, s, fFileNameExtPath ? 1:0)) {
[551]441 strcpy(arcdata->extractdir, s);
442 WinSetDlgItemText(hwnd, EXT_DIRECTORY, s);
443 if ((!isalpha(*s) || s[1] != ':') && *s != '.')
444 saymsg(MB_ENTER, hwnd,
445 GetPString(IDS_WARNINGTEXT),
446 GetPString(IDS_SPECIFYDRIVETEXT));
447 }
448 else
449 break;
450 strcpy(lastextractpath, s);
451 if (fRemember) {
[1505]452 PrfWriteProfileString(fmprof, FM3Str, "Ext_ExtractDir", s);
[1344]453 fRemember = WinQueryButtonCheckstate(hwnd, EXT_WDIRS);
454 size = sizeof(BOOL);
[1505]455 PrfWriteProfileData(fmprof, FM3Str, "Ext_WDirs",
[1300]456 (PVOID) &fRemember, size);
[551]457 fRemember = TRUE;
458 }
459 *s = 0;
460 WinQueryDlgItemText(hwnd, EXT_COMMAND, 256, s);
461 if (*s) {
462 strcpy(arcdata->command, s);
463 *s = 0;
464 WinQueryDlgItemText(hwnd, EXT_MASK, 256, s);
465 *arcdata->masks = 0;
466 strcpy(arcdata->masks, s);
467 if (fRemember)
[1505]468 PrfWriteProfileString(fmprof, FM3Str, "Ext_Mask", s);
[551]469 arcdata->ret = 1;
470 WinDismissDlg(hwnd, 1);
471 break;
472 }
473 }
474 }
[1395]475 if (!fErrorBeepOff)
476 DosBeep(50, 100); // Complain a refuse to quit
[551]477 break;
[2]478
[551]479 case IDM_HELP:
[1546]480 case WM_HELP:
[551]481 if (hwndHelp)
482 WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
483 MPFROM2SHORT(HELP_EXTRACT, 0), MPFROMSHORT(HM_RESOURCEID));
484 break;
[2]485
[551]486 case EXT_WALK:
487 {
488 CHAR temp[CCHMAXPATH + 1];
[2]489
[551]490 strcpy(temp, arcdata->extractdir);
491 if (WinDlgBox(HWND_DESKTOP, WinQueryWindow(WinQueryWindow(hwnd,
492 QW_PARENT),
493 QW_OWNER),
494 WalkExtractDlgProc, FM3ModHandle, WALK_FRAME,
495 (PVOID) temp)) {
496 if (*temp && stricmp(temp, arcdata->extractdir)) {
497 strcpy(arcdata->extractdir, temp);
498 }
499 }
500 WinSetDlgItemText(hwnd, EXT_DIRECTORY, arcdata->extractdir);
501 }
502 break;
[2]503
[551]504 case EXT_SEE:
505 {
506 CHAR s[1001], *p;
507 EXECARGS ex;
[2]508
[551]509 WinQueryDlgItemText(hwnd, EXT_COMMAND, 256, s);
510 lstrip(s);
511 if (!*s)
512 Runtime_Error(pszSrcFile, __LINE__, "no command");
513 else {
514 p = strchr(s, ' ');
515 if (p)
516 *p = 0; // Drop options
517 memset(&ex, 0, sizeof(EXECARGS));
518 ex.commandline = s;
519 ex.flags = WINDOWED | SEPARATEKEEP | MAXIMIZED;
520 *ex.path = 0;
[1717]521 *ex.environment = 0;
522 *ex.title = 0;
[551]523 if (WinDlgBox(HWND_DESKTOP,
524 hwnd,
525 CmdLineDlgProc,
526 FM3ModHandle, EXEC_FRAME, MPFROMP(&ex)) && *s) {
527 runemf2(ex.flags,
[888]528 hwnd, pszSrcFile, __LINE__,
[551]529 NULL, (*ex.environment) ? ex.environment : NULL, "%s", s);
530 }
531 }
[2]532 }
[551]533 break;
534 }
535 return 0;
[2]536
[551]537 case WM_CLOSE:
538 break;
[2]539 }
[551]540 return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]541}
[793]542
543#pragma alloc_text(FMEXTRACT,ExtractTextProc,ExtractDlgProc)
Note: See TracBrowser for help on using the repository browser.