Context Navigation

source: trunk/dll/arccnrs.c@ 1316

Visit:

Last change on this file since 1316 was 1314, checked in by Gregg Young, 17 years ago
Subdirectory from the arcname for the extract path only created if an extract menu option is selected. (Ticket 22)
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 107.4 KB

Rev	Line
[27]	1
	2	/***********************************************************************
	3
	4	$Id: arccnrs.c 1314 2008-12-03 18:26:07Z gyoung $
	5
[123]	6	Archive containers
	7
[28]	8	Copyright (c) 1993-98 M. Kimes
[907]	9	Copyright (c) 2001, 2008 Steven H. Levine
[27]	10
[130]	11	11 Jun 02 SHL Ensure archive name not garbage
	12	22 May 03 SHL ArcObjWndProc: fix UM_RESCAN now that we understand it
	13	01 Aug 04 SHL Rework lstrip/rstrip usage
	14	23 May 05 SHL Use QWL_USER
[156]	15	25 May 05 SHL Rename comnam to szCommonName and fix typo
	16	25 May 05 SHL Use ULONGLONG and CommaFmtULL
[212]	17	05 Jun 05 SHL Drop obsolete, localize
	18	05 Jun 05 SHL Correct last sort logic
	19	05 Jun 05 SHL Use QWL_USER
[229]	20	22 Jun 05 SHL ArcSort: correct typo in last sort fix
[249]	21	13 Aug 05 SHL FillArcCnr: optimize
[300]	22	08 Dec 05 SHL FillArcCnr: allow list start and end markers to be empty (i.e. tar)
	23	08 Dec 05 SHL ArcCnrWndProc: suppress IDM_EXTRACT if no simple extract (i.e. tar)
	24	30 Dec 05 SHL ArcCnrWndProc: correct date/time column display setup
	25	29 May 06 SHL Comments
[358]	26	14 Jul 06 SHL Use Runtime_Error
[367]	27	26 Jul 06 SHL Correct SelectAll usage
[406]	28	29 Jul 06 SHL Use xfgets_bstripcr
[423]	29	31 Jul 06 SHL Lower priority for archives with more than 1000 entries
[426]	30	02 Aug 06 SHL Add logic to stop processing large archives
[460]	31	23 Aug 06 SHL Integrate John Small's switch list title logic
[531]	32	03 Nov 06 SHL Renames
[562]	33	14 Mar 07 SHL ArcObjWndProc/UM_ENTER: delay before starting viewer
[593]	34	30 Mar 07 GKY Remove GetPString for window class names
[618]	35	06 Apr 07 GKY Work around PM DragInfo and DrgFreeISH limit
[606]	36	06 Apr 07 GKY Add some error checking in drag/drop
[618]	37	20 Apr 07 SHL Sync with NumItemsToUnhilite mods
[627]	38	21 Apr 07 GKY Find FM2Utils by path or utils directory
[672]	39	12 May 07 SHL Use dcd->ulItemsToUnHilite; sync with UnHilite arg mods
[688]	40	10 Jun 07 GKY Add CheckPmDrgLimit including IsFm2Window as part of work around PM drag limit
[696]	41	16 Jun 07 SHL Use DosQueryAppType not DosQAppType
[751]	42	02 Aug 07 SHL Sync with ARCITEM mods
[773]	43	06 Aug 07 SHL Use BldFullPathName and BldQuotedFileName
	44	06 Aug 07 SHL Move BldQuotedFileName and BldQuotedFullPathNamehere
	45	to be near primary caller
[775]	46	06 Aug 07 GKY Reduce DosSleep times (ticket 148)
[793]	47	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[814]	48	26 Aug 07 GKY DosSleep(1) in loops changed to (0)
[872]	49	22 Nov 07 GKY Use CopyPresParams to fix presparam inconsistencies in menus
[897]	50	30 Dec 07 GKY Use TestCDates for sort by date
[917]	51	10 Jan 08 SHL Sync with CfgDlgProc mods
[946]	52	10 Feb 08 GKY Implement bubble help for bitmap menu items
[953]	53	15 Feb 08 SHL Sync with settings menu rework
[985]	54	29 Feb 08 GKY Use xfree where appropriate
[1068]	55	14 Jul 08 JBS Ticket 126: Add support for WPS open default & open settings in arccnrs
[1069]	56	16 Jul 08 GKY Fix trap on viewing multiple files from an archive (misplaced free)
[1082]	57	16 Jul 08 GKY Use TMP directory for temp files if present. Use MakeTempName
[1104]	58	19 Jul 08 GKY Replace save_dir2(dir) with pFM2SaveDirectory
[1120]	59	25 Aug 08 GKY Check TMP directory space warn if lee than 5 MiB prevent archiver from opening if
	60	less than 10 KiB (It hangs and can't be closed)
[1270]	61	08 Nov 08 GKY Add WaitChildThread to fix hang caused by viewer trying to open a file before
	62	the archiver process closes. (Ticket 58)
[1298]	63	23 Nov 08 JBS Ticket 284: Support archivers with no Start or End of list strings
[1301]	64	29 Nov 08 GKY Add flag to tell CheckListProc file is in an archive so it won't try to open it.
	65	29 Nov 08 GKY Remove or replace with a mutex semaphore DosEnterCriSec where appropriate.
[1306]	66	30 Nov 08 GKY Add the option of creating a subdirectory from the arcname
	67	for the extract path to arc container.
[1311]	68	02 Dec 08 JBS Ticket 284: Changed string indicating no Start/End of list strings.
[1314]	69	03 Dec 08 GKY Subdirectory from the arcname for the extract path only created if an "extract"
	70	menu option is selected.
[618]	71
[27]	72	***********************************************************************/
	73
[907]	74	#include <stdlib.h> // free..
[2]	75	#include <string.h>
	76	#include <ctype.h>
[907]	77	#include <direct.h> // rmdir
	78	#include <share.h> // SH_DENYWR
	79	#include <limits.h> // ULONG_MAX
[689]	80	#include <process.h> // _beginthread
[762]	81
	82	#if 0
[751]	83	#include <malloc.h> // _heapchk
[762]	84	#endif
[156]	85
[907]	86	#define INCL_DOS
	87	#define INCL_DOSERRORS
	88	#define INCL_WIN
	89	#define INCL_LONGLONG
	90
[1183]	91	#include "fm3dll.h"
[1220]	92	#include "fm3dll2.h" // #define's for UM_*, control id's, etc.
	93	#include "arccnrs.h"
	94	#include "makelist.h" // Typedef
	95	#include "colors.h" // Typedef
[1203]	96	#include "mainwnd2.h" // Data declaration(s)
	97	#include "grep.h" // Data declaration(s)
	98	#include "dircnrs.h" // Data declaration(s)
	99	#include "info.h" // Data declaration(s)
	100	#include "init.h" // Data declaration(s)
[2]	101	#include "fm3dlg.h"
	102	#include "fm3str.h"
	103	#include "mle.h"
[907]	104	#include "pathutil.h" // BldFullPathName
	105	#include "filldir.h" // EmptyCnr...
	106	#include "errutil.h" // Dos_Error...
	107	#include "strutil.h" // GetPString
[953]	108	#include "notebook.h" // CfgDlgProc
[1160]	109	#include "worker.h" // Action, MassAction
	110	#include "avv.h" // ArcReviewDlgProc, rewrite_archiverbb2
	111	#include "chklist.h" // CenterOverWindow, CheckListProc
	112	#include "common.h" // CommonCreateTextChildren, CommonFrameWndProc, CommonTextPaint
[1183]	113	// CommonTextButton
	114	#include "draglist.h" // DoFileDrag, DragOne
[1160]	115	#include "valid.h" // GetDesktopName, TestCDates
[1183]	116	#include "mainwnd.h" // GetNextWindowPos, MakeBubble, TopWindowName
[1160]	117	#include "objwin.h" // MakeObjWin
	118	#include "shadow.h" // MakeShadows
	119	#include "objcnr.h" // ObjCnrDlgProc
	120	#include "printer.h" // PrintListThread
	121	#include "srchpath.h" // RunFM2Util
[1183]	122	#include "misc.h" // Broadcast, CheckMenu, CurrentRecord, SayFilter, SaySort
	123	// DrawTargetEmphasis, IsFm2Window
[1160]	124	#include "select.h" // SelectAll, SelectList
	125	#include "findrec.h" // ShowCnrRecord
	126	#include "walkem.h" // WalkExtractDlgProc
[1183]	127	#include "droplist.h" // AcceptOneDrop, CheckPmDrgLimit, DropHelp, GetOneDrop
	128	#include "archive.h" // ArchiveDlgProc
	129	#include "common.h" // CommonTextProc
	130	#include "presparm.h" // CopyPresParams
	131	#include "defview.h" // DefaultViewKeys
	132	#include "systemf.h" // ExecOnList
	133	#include "filter.h" // PickMaskDlgProc
	134	#include "avl.h" // SBoxDlgProc
	135	#include "mkdir.h" // SetDir
	136	#include "collect.h" // StartCollector
	137	#include "viewer.h" // StartMLEEditor
	138	#include "newview.h" // StartViewer
	139	#include "commafmt.h" // commafmt
	140	#include "copyf.h" // unlinkf
	141	#include "literal.h" // wildcard
	142	#include "wrappers.h" // xrealloc
[1160]	143	#include "misc.h" // AdjustCnrColVis, QuickPopup, SetSortChecks, SwitchCommand
	144	#include "select.h" // DeselectAll, InvertAll
[1183]	145	#include "strips.h" // bstrip
	146	#include "dirs.h" // save_dir2
[1011]	147	#include "fortify.h"
[2]	148
[1220]	149	#define ARCFLAGS_REALDIR 0x00000001
	150	#define ARCFLAGS_PSEUDODIR 0x00000002
	151	#define CON_COLS 6
	152	#define EXTRA_ARCRECORD_BYTES (sizeof(ARCITEM) - sizeof(MINIRECORDCORE))
[1311]	153	#define NO_START_OF_ARCHIVER_LIST_STRING "None"
	154	#define NO_END_OF_ARCHIVER_LIST_STRING NO_START_OF_ARCHIVER_LIST_STRING
[1220]	155
[2]	156	#pragma data_seg(DATA1)
[1203]	157	static INT DefArcSortFlags;
[358]	158
[1203]	159	// Data definitions
[358]	160	static PSZ pszSrcFile = __FILE__;
[1203]	161	#pragma data_seg(GLOBAL1)
	162	HWND ArcCnrMenu;
	163	HWND ArcMenu;
	164	CHAR ArcTempRoot[CCHMAXPATH];
	165	BOOL fArcStuffVisible;
[1306]	166	BOOL fFileNameCnrPath;
[358]	167
[1203]	168	#pragma data_seg(GLOBAL2)
	169	CHAR lastextractpath[CCHMAXPATH];
	170	ULONGLONG ullDATFileSpaceNeeded;
	171
[1268]	172	typedef struct {
	173
[1271]	174	CHAR filename[CCHMAXPATH]; //file passed as MP1 message parameter (file selected)
	175	HWND hwndCnr; //hwnd you want the message posted to
	176	HWND hwndClient; //hwnd calling this thread; NULL will work
	177	ULONG RunFlags; //runemf2 flags see systemf.h
	178	CHAR *pszDirectory;
	179	CHAR *pszEnvironment;
	180	CHAR formatstring[40]; //Usally "%s"
[1272]	181	CHAR CmdLine[1024]; //Use sprintf to format multipart command line into single string
[1268]	182	}
	183	WAITCHILD;
	184
[1272]	185	/** Creates a thread to wait for a child process to complete then posts a message and closes
	186	* This function should only be used for runemf2 calls that include the WAIT flag
	187	*/
[1268]	188	VOID WaitChildThread(VOID * arg)
	189	{
	190	WAITCHILD *WaitChild;
	191	HAB thab;
	192	CHAR *filename;
[1271]	193	INT ret;
[1268]	194
	195	DosError(FERR_DISABLEHARDERR);
	196
	197	# ifdef FORTIFY
	198	Fortify_EnterScope();
	199	# endif
	200
	201	WaitChild = (WAITCHILD *) arg;
	202	if (WaitChild) {
	203	filename = xstrdup(WaitChild->filename, pszSrcFile, __LINE__);
	204	thab = WinInitialize(0);
	205	if (thab) {
	206	IncrThreadUsage();
[1272]	207	priority_normal();
[1271]	208	ret = runemf2(WaitChild->RunFlags, WaitChild->hwndClient, pszSrcFile, __LINE__,
	209	WaitChild->pszDirectory, WaitChild->pszEnvironment,
	210	WaitChild->formatstring, WaitChild->CmdLine);
	211	if (ret != -1) {
	212	if (IsFile(WaitChild->filename) == 1)
	213	PostMsg(WaitChild->hwndCnr, UM_ENTER, MPFROMP(filename), MPVOID);
	214	}
[1268]	215	DecrThreadUsage();
	216	WinTerminate(thab);
	217	}
[1271]	218	xfree(WaitChild->pszDirectory, pszSrcFile, __LINE__);
	219	xfree(WaitChild->pszEnvironment, pszSrcFile, __LINE__);
[1268]	220	free(WaitChild);
	221	} // if WaitChild
	222	# ifdef FORTIFY
	223	Fortify_LeaveScope();
	224	# endif
	225	_endthread();
	226	}
	227
[551]	228	static MRESULT EXPENTRY ArcErrProc(HWND hwnd, ULONG msg, MPARAM mp1,
	229	MPARAM mp2)
[172]	230	{
[2]	231	ARCDUMP *ad;
[773]	232	CHAR szQuotedArcName[CCHMAXPATH];
[2]	233
[551]	234	switch (msg) {
	235	case WM_INITDLG:
	236	if (!mp2)
	237	WinDismissDlg(hwnd, 0);
	238	else {
	239	ad = (ARCDUMP *) mp2;
	240	WinSetWindowPtr(hwnd, QWL_USER, ad);
	241	if (ad->errmsg)
	242	WinSetDlgItemText(hwnd, ARCERR_TEXT, ad->errmsg);
	243	if (!ad->info->test)
	244	WinEnableWindow(WinWindowFromID(hwnd, ARCERR_TEST), FALSE);
	245	if (ad->listname) {
	246	MLEsetlimit(WinWindowFromID(hwnd, ARCERR_MLE), -1L);
	247	MLEsetformat(WinWindowFromID(hwnd, ARCERR_MLE), MLFIE_NOTRANS);
	248	MLEsetcurpos(WinWindowFromID(hwnd, ARCERR_MLE),
	249	MLEgetlen(WinWindowFromID(hwnd, ARCERR_MLE)));
	250	MLEinsert(WinWindowFromID(hwnd, ARCERR_MLE),
	251	GetPString(IDS_ARCHIVERREPORTTEXT));
	252	MLEinsertfile(WinWindowFromID(hwnd, ARCERR_MLE), ad->listname);
[2]	253	}
[551]	254	}
	255	break;
	256
	257	case WM_COMMAND:
	258	switch (SHORT1FROMMP(mp1)) {
	259	case DID_CANCEL:
	260	WinDismissDlg(hwnd, 0);
[2]	261	break;
	262
[551]	263	case IDM_HELP:
	264	if (hwndHelp) {
	265	WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
	266	MPFROM2SHORT(HELP_ARCERR, 0), MPFROMSHORT(HM_RESOURCEID));
	267	}
	268	break;
[2]	269
[551]	270	case DID_OK:
	271	ad = WinQueryWindowPtr(hwnd, QWL_USER);
	272	WinDlgBox(HWND_DESKTOP, hwnd, ArcReviewDlgProc, FM3ModHandle,
	273	AD_FRAME, MPFROMP(ad));
	274	WinDismissDlg(hwnd, 0);
	275	break;
[2]	276
[551]	277	case ARCERR_VIEW:
	278	ad = WinQueryWindowPtr(hwnd, QWL_USER);
	279	{
	280	CHAR *list[2];
[2]	281
[551]	282	list[0] = ad->arcname;
	283	list[1] = NULL;
	284	if (TestBinary(ad->arcname)) {
	285	if (*binview)
	286	ExecOnList((HWND) 0, binview, WINDOWED \| SEPARATE, NULL, list,
[888]	287	NULL, pszSrcFile, __LINE__);
[551]	288	else
	289	StartMLEEditor(HWND_DESKTOP, 16 + 4 + 1, ad->arcname, hwnd);
	290	}
	291	else {
	292	if (*viewer) {
	293	ExecOnList((HWND) 0, viewer, WINDOWED \| SEPARATE \|
[907]	294	(fViewChild ? CHILD : 0),
	295	NULL, list, NULL, pszSrcFile, __LINE__);
[551]	296	}
	297	else
	298	StartMLEEditor(HWND_DESKTOP, 8 + 4 + 1, ad->arcname, hwnd);
	299	}
	300	}
	301	break;
[2]	302
[551]	303	case ARCERR_TEST:
	304	ad = WinQueryWindowPtr(hwnd, QWL_USER);
	305	runemf2(SEPARATEKEEP \| WINDOWED \| MAXIMIZED,
[888]	306	hwnd, pszSrcFile, __LINE__, NULL, NULL,
[773]	307	"%s %s",
	308	ad->info->test,
	309	BldQuotedFileName(szQuotedArcName, ad->arcname));
[551]	310	break;
	311	}
	312	return 0;
[2]	313	}
[551]	314	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	315	}
	316
[551]	317	static SHORT APIENTRY ArcSort(PMINIRECORDCORE pmrc1, PMINIRECORDCORE pmrc2,
	318	PVOID pStorage)
[172]	319	{
[551]	320	PARCITEM pai1 = (PARCITEM) pmrc1;
	321	PARCITEM pai2 = (PARCITEM) pmrc2;
	322	DIRCNRDATA pdcd = (DIRCNRDATA ) pStorage;
	323	SHORT ret = 0;
	324	CHAR pext, ppext;
	325	INT sortFlags;
[2]	326
[423]	327	if (!pdcd) {
[212]	328	HWND hwndCnr = pai1->hwndCnr;
[551]	329
	330	pdcd = WinQueryWindowPtr(hwndCnr, QWL_USER);
[358]	331	if (!pdcd) {
[377]	332	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
[212]	333	return ret;
	334	}
	335	}
	336
	337	sortFlags = pdcd->sortFlags; // Optimize
	338
[423]	339	if (sortFlags) {
[551]	340	switch (sortFlags & (~SORT_REVERSE)) {
	341	case SORT_FIRSTEXTENSION:
[730]	342	pext = strchr(pai1->pszFileName, '.');
	343	ppext = strchr(pai2->pszFileName, '.');
[551]	344	if (!pext)
	345	pext = NullStr;
	346	if (!ppext)
	347	ppext = NullStr;
	348	ret = stricmp(pext, ppext);
	349	break;
[2]	350
[551]	351	case SORT_LASTEXTENSION:
[730]	352	pext = strrchr(pai1->pszFileName, '.');
	353	ppext = strrchr(pai2->pszFileName, '.');
[551]	354	if (!pext)
	355	pext = NullStr;
	356	if (!ppext)
	357	ppext = NullStr;
	358	ret = stricmp(pext, ppext);
	359	break;
[2]	360
[551]	361	case SORT_LWDATE:
[897]	362	ret = TestCDates(&pai1->date, &pai1->time,
[907]	363	&pai2->date, &pai2->time);
	364	/*(pai1->date.year < pai2->date.year) ? 1 :
[551]	365	(pai1->date.year > pai2->date.year) ? -1 :
	366	(pai1->date.month < pai2->date.month) ? 1 :
	367	(pai1->date.month > pai2->date.month) ? -1 :
	368	(pai1->date.day < pai2->date.day) ? 1 :
	369	(pai1->date.day > pai2->date.day) ? -1 :
	370	(pai1->time.hours < pai2->time.hours) ? 1 :
	371	(pai1->time.hours > pai2->time.hours) ? -1 :
	372	(pai1->time.minutes < pai2->time.minutes) ? 1 :
	373	(pai1->time.minutes > pai2->time.minutes) ? -1 :
	374	(pai1->time.seconds < pai2->time.seconds) ? 1 :
[897]	375	(pai1->time.seconds > pai2->time.seconds) ? -1 : 0;*/
[551]	376	break;
[2]	377
[551]	378	case SORT_SIZE:
	379	ret =
	380	(pai1->cbFile < pai2->cbFile) ? 1 : (pai1->cbFile ==
	381	pai2->cbFile) ? 0 : -1;
	382	if (!ret)
	383	ret =
	384	(pai1->cbComp < pai2->cbComp) ? 1 : (pai1->cbComp ==
	385	pai2->cbComp) ? 0 : -1;
	386	break;
[2]	387
[551]	388	case SORT_EASIZE:
	389	ret =
	390	(pai1->cbComp < pai2->cbComp) ? 1 : (pai1->cbComp ==
	391	pai2->cbComp) ? 0 : -1;
	392	if (!ret)
	393	ret =
	394	(pai1->cbFile < pai2->cbFile) ? 1 : (pai1->cbFile ==
	395	pai2->cbFile) ? 0 : -1;
	396	break;
[2]	397	}
[423]	398	if (!ret)
[730]	399	ret = (SHORT) stricmp(pai1->pszFileName, pai2->pszFileName);
[423]	400	if (ret && (sortFlags & SORT_REVERSE))
[562]	401	ret = ret > 0 ? -1 : 1;
[2]	402	return ret;
	403	}
[730]	404	return (SHORT) stricmp(pai1->pszFileName, pai2->pszFileName);
[2]	405	}
	406
[551]	407	static INT APIENTRY ArcFilter(PMINIRECORDCORE rmini, PVOID arg)
[172]	408	{
[551]	409	DIRCNRDATA dcd = (DIRCNRDATA ) arg;
	410	PARCITEM r;
	411	register INT x;
	412	INT ret = FALSE;
[2]	413
[423]	414	if (dcd && *dcd->mask.szMask) {
[551]	415	r = (PARCITEM) rmini;
[423]	416	if (dcd->mask.pszMasks[1]) {
[551]	417	for (x = 0; dcd->mask.pszMasks[x]; x++) {
	418	if (*dcd->mask.pszMasks[x]) {
	419	if (*dcd->mask.pszMasks[x] != '/') {
[730]	420	if (wildcard(r->pszFileName, dcd->mask.pszMasks[x], FALSE))
[551]	421	ret = TRUE;
	422	}
	423	else {
[730]	424	if (wildcard(r->pszFileName, dcd->mask.pszMasks[x] + 1, FALSE)) {
[551]	425	ret = FALSE;
	426	break;
	427	}
	428	}
	429	}
[2]	430	}
	431	}
	432	else {
[730]	433	if (wildcard(r->pszFileName, dcd->mask.szMask, FALSE))
[551]	434	ret = TRUE;
[2]	435	}
	436	}
	437	else
	438	ret = TRUE;
	439	return ret;
	440	}
	441
[551]	442	static MRESULT EXPENTRY ArcFrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
	443	MPARAM mp2)
[172]	444	{
[551]	445	return CommonFrameWndProc(ARC_CNR, hwnd, msg, mp1, mp2);
[2]	446	}
	447
[551]	448	static BOOL IsArcThere(HWND hwnd, CHAR * arcname)
[172]	449	{
[423]	450	if (arcname) {
	451	if (IsFile(arcname) != 1) {
[551]	452	saymsg(MB_CANCEL, hwnd,
	453	GetPString(IDS_SAYWHATTEXT),
	454	GetPString(IDS_ARCNOTTHERETEXT), arcname);
[2]	455	return FALSE;
	456	}
	457	return TRUE;
	458	}
	459	return FALSE;
	460	}
	461
[751]	462	/**
	463	* Free storage associated with archive container item
	464	* Caller is responsible for correcting pointers
	465	*/
	466
	467	static VOID FreeArcItemData(PARCITEM pai)
	468	{
	469	// DbgMsg(pszSrcFile, __LINE__, "FreeArcItemData %p", pai);
[762]	470	PSZ psz;
[751]	471
[762]	472	if (pai->pszFileName && pai->pszFileName != NullStr) {
	473	psz = pai->pszFileName;
[1077]	474	pai->pszFileName = NULL; // 08 Jul 08 SHL was NulStr
[762]	475	free(psz);
	476	}
[751]	477	}
	478
	479	/**
[762]	480	* Remove item(s) from archive container and free associated storage if requested
	481	* @param paiFirst points to first item to remove or NULL to remove all
	482	* @param usCnt is remove count or 0 to remove all
[751]	483	*/
	484
[762]	485	static VOID RemoveArcItems(HWND hwnd, PARCITEM paiFirst, USHORT usCnt, USHORT usFlags)
[751]	486	{
[762]	487	INT remaining = usCnt;
	488	PARCITEM pai;
	489
	490	if ((usCnt && !paiFirst) \|\| (!usCnt && paiFirst))
	491	Runtime_Error(pszSrcFile, __LINE__, "paiFirst %p usCnt %u mismatch", paiFirst, usCnt);
	492	else {
	493	// Free our buffers if free requested
	494	if (usFlags & CMA_FREE) {
	495	if (paiFirst)
	496	pai = paiFirst;
	497	else {
[751]	498	pai = (PARCITEM)WinSendMsg(hwnd, CM_QUERYRECORD, MPVOID,
	499	MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER));
[762]	500	if ((INT)pai == -1) {
[751]	501	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_QUERYRECORD");
[762]	502	remaining = -1;
	503	pai = NULL;
[751]	504	}
	505	}
[762]	506	while (pai) {
	507	FreeArcItemData(pai);
	508	pai = (PARCITEM)pai->rc.preccNextRecord;
	509	if (remaining && --remaining == 0)
	510	break;
	511	}
[751]	512	}
	513	}
	514
[762]	515	// DbgMsg(pszSrcFile, __LINE__, "RemoveArcItems %p %u %s", pai, usCnt, pai->pszFileName);
[751]	516
[762]	517	if (remaining != - 1) {
	518	remaining = (INT)WinSendMsg(hwnd, CM_REMOVERECORD, MPFROMP(&paiFirst), MPFROM2SHORT(usCnt, usFlags));
	519	if (remaining == -1) {
[751]	520	// Win_Error2(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,IDS_CMREMOVEERRTEXT);
[762]	521	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_REMOVERECORD hwnd %x pai %p cnt %u", hwnd, paiFirst, usCnt);
[751]	522	}
	523	}
	524	}
	525
	526	/**
[762]	527	* Empty all records from an archive container and
	528	* free associated storage and free up field infos
[751]	529	*/
	530
	531	static VOID EmptyArcCnr(HWND hwnd)
	532	{
[773]	533	#if 0 // fixme to be gone or to be configurable
[751]	534	{
	535	int state = _heapchk();
	536	if (state != _HEAPOK)
	537	Runtime_Error(pszSrcFile, __LINE__, "heap corrupted %d", state);
[762]	538	else
	539	DbgMsg(pszSrcFile, __LINE__, "_memavl %u", _memavl());
[751]	540	}
	541	#endif
	542
	543	// Remove all ARCITEM records
	544	RemoveArcItems(hwnd, NULL, 0, CMA_FREE);
	545
	546	// Use common code to remove rest
	547	EmptyCnr(hwnd);
	548	}
	549
[423]	550	//== FillArcCnr() generate archive content list and fill container window ==
	551
[551]	552	static INT FillArcCnr(HWND hwndCnr, CHAR * arcname, ARC_TYPE ** arcinfo,
	553	ULONGLONG * pullTotalBytes, volatile PCHAR pStopFlag)
[44]	554	{
[551]	555	FILE *fp;
	556	HFILE oldstdout;
	557	HFILE newstdout;
	558	CHAR s[CCHMAXPATH * 2], lonename[CCHMAXPATH + 2],
[1082]	559	nsize, osize, fdate, fname, p, pp, *arctemp;
[551]	560	BOOL gotstart;
	561	BOOL gotend;
	562	BOOL wasquote;
[773]	563	BOOL nomove = FALSE; // fixme to be gone?
[1298]	564	INT highest = 0, fieldnum, counter = 0, numarcfiles = 0;
[551]	565	PARCITEM lastpai;
	566	ARC_TYPE *info;
	567	ARC_TYPE *tinfo;
	568	ULONG apptype;
	569	APIRET rc;
[2]	570
[423]	571	if (!arcname \|\| !arcinfo)
[2]	572	return 0;
[300]	573
[2]	574	info = *arcinfo;
[423]	575	if (!info)
[551]	576	info = find_type(arcname, NULL);
[1082]	577	arctemp = xmallocz(CCHMAXPATH, pszSrcFile, __LINE__);
[1120]	578	if (CheckDriveSpaceAvail(ArcTempRoot, ullDATFileSpaceNeeded, ullTmpSpaceNeeded) == 1)
	579	saymsg(MB_OK,
	580	HWND_DESKTOP,
	581	NullStr,
	582	GetPString(IDS_ARCTMPDRIVESPACELIMITED),
	583	ArcTempRoot);
[1082]	584	MakeTempName(arctemp, ArcTempRoot, 2);
[300]	585
[1120]	586
[2]	587	ReTry:
	588
	589	tinfo = NULL;
	590	numarcfiles = counter = highest = 0;
	591	gotstart = gotend = FALSE;
	592	lastpai = NULL;
[156]	593	*pullTotalBytes = 0;
[358]	594	if (!info \|\| !info->list)
[377]	595	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
[358]	596	else {
[751]	597	RemoveArcItems(hwndCnr, NULL, 0, CMA_FREE \| CMA_INVALIDATE \| CMA_ERASE);
[2]	598	*arcinfo = info;
	599	highest = info->osizepos;
[423]	600	if (info->nsizepos > highest)
[2]	601	highest = info->nsizepos;
[423]	602	if (info->fdpos > highest)
[2]	603	highest = info->fdpos;
[423]	604	if (info->fnpos > highest)
[2]	605	highest = info->fnpos;
[423]	606	if (highest > 50) {
[551]	607	saymsg(MB_ENTER \| MB_ICONEXCLAMATION, HWND_DESKTOP,
	608	GetPString(IDS_SHAMETEXT), "%s", GetPString(IDS_BUNGEDUPTEXT));
[423]	609	}
	610	if (info->fnpos == -1)
[2]	611	highest = 32767;
[300]	612
[2]	613	DosError(FERR_DISABLEHARDERR);
	614	DosForceDelete(arctemp);
	615	DosError(FERR_DISABLEHARDERR);
[300]	616
[551]	617	strcpy(s, info->list);
	618	p = strchr(s, ' ');
[423]	619	if (p)
[2]	620	*p = 0;
	621	DosError(FERR_DISABLEHARDERR);
[696]	622	if (!DosQueryAppType(s, &apptype) &&
[563]	623	(apptype & FAPPTYP_DOS \|\|
	624	apptype & FAPPTYP_WINDOWSREAL \|\|
	625	apptype & FAPPTYP_WINDOWSPROT \|\|
	626	apptype & FAPPTYP_WINDOWSPROT31)) {
[2]	627	p = GetCmdSpec(TRUE);
	628	runemf2(SEPARATE \| INVISIBLE \| MINIMIZED \| BACKGROUND \| WAIT,
[888]	629	hwndCnr, pszSrcFile, __LINE__, NULL, "DOS_BACKGROUND_EXECUTION=1",
[773]	630	"%s /C %s %s >%s",
	631	p, // shell
	632	info->list, // list command
	633	BldQuotedFileName(s, arcname),
[562]	634	arctemp);
[2]	635	}
	636	else {
[551]	637	fp = xfopen(arctemp, "w", pszSrcFile, __LINE__);
[1082]	638	if (!fp) {
	639	xfree(arctemp, pszSrcFile, __LINE__);
	640	return 0;
	641	}
[358]	642	else {
[551]	643	newstdout = -1;
	644	DosError(FERR_DISABLEHARDERR);
	645	rc = DosDupHandle(fileno(stdout), &newstdout);
	646	if (rc) {
	647	Dos_Error(MB_CANCEL, rc, hwndCnr, pszSrcFile, __LINE__,
[1082]	648	"DosDupHandle");
	649	xfree(arctemp, pszSrcFile, __LINE__);
[551]	650	return 0;
[358]	651	}
	652	else {
[551]	653	oldstdout = fileno(stdout);
	654	DosError(FERR_DISABLEHARDERR);
	655	rc = DosDupHandle(fileno(fp), &oldstdout);
	656	if (rc) {
	657	Dos_Error(MB_CANCEL, rc, hwndCnr, pszSrcFile, __LINE__,
	658	"DosDupHandle");
[1082]	659	xfree(arctemp, pszSrcFile, __LINE__);
	660	return 0;
[358]	661	}
	662	else {
[1268]	663	runemf2(SEPARATE \| INVISIBLE \| MINIMIZED \| BACKGROUND \| WAIT,
[888]	664	hwndCnr, pszSrcFile, __LINE__, NULL, NULL,
[773]	665	"%s %s",
	666	info->list,
	667	BldQuotedFileName(s, arcname));
[551]	668	oldstdout = fileno(stdout);
	669	DosError(FERR_DISABLEHARDERR);
	670	DosDupHandle(newstdout, &oldstdout);
	671	DosClose(newstdout);
	672	fclose(fp);
	673	}
	674	}
[2]	675	}
	676	}
[300]	677
[2]	678	DosError(FERR_DISABLEHARDERR);
[551]	679	fp = _fsopen(arctemp, "r", SH_DENYWR);
[300]	680
[358]	681	if (fp) {
[1298]	682	gotstart = !info->startlist \|\| // If list has no start marker
	683	!*info->startlist \|\|
[1311]	684	(stricmp(info->startlist, NO_START_OF_ARCHIVER_LIST_STRING) == 0);
[300]	685
[551]	686	while (!feof(fp) && !gotend && !*pStopFlag) {
	687	if (!xfgets_bstripcr(s, sizeof(s), fp, pszSrcFile, __LINE__))
	688	break;
	689	if (!gotstart) {
	690	if (!strcmp(s, info->startlist))
	691	gotstart = TRUE;
	692	}
	693	else if (info->endlist && !strcmp(s, info->endlist))
	694	gotend = TRUE;
	695	else {
[300]	696	/* add to container */
[551]	697	fname = NULL;
	698	bstrip(s);
	699	if (info->nameisfirst) {
	700	strncpy(lonename, s, CCHMAXPATH + 2);
	701	lonename[CCHMAXPATH + 1] = 0;
	702	fname = lonename;
	703	if (!xfgets_bstripcr(s, sizeof(s), fp, pszSrcFile, __LINE__))
	704	break;
	705	if (*fname == '\"') {
	706	memmove(fname, fname + 1, strlen(fname) + 1);
	707	p = strchr(fname, '\"');
	708	if (p)
	709	*p = 0;
	710	}
	711	}
	712	nsize = NULL;
	713	osize = fdate = NullStr;
	714	p = s;
[1298]	715	for (fieldnum = 0; fieldnum <= highest; fieldnum++) {
[551]	716	pp = p;
	717	while (pp && (pp == ' ' \|\| pp == '\t')) / skip leading */
	718	pp++;
	719	if (!*pp)
	720	break;
	721	wasquote = FALSE;
	722	p = pp;
	723	while (*p && (wasquote \|\|
[1298]	724	((fieldnum != info->fnpos \|\| !info->nameislast) ?
[551]	725	(p != ' ' && p != '\t') : TRUE))) {
	726	if (*p == '\"') {
	727	if (!wasquote) {
	728	wasquote = TRUE;
	729	memmove(p, p + 1, strlen(p));
	730	while (p == ' ' \|\| p == '\t')
	731	p++;
	732	}
	733	else {
	734	memmove(p, p + 1, strlen(p));
	735	break;
	736	}
	737	}
	738	else if (*p)
	739	p++;
	740	}
	741	if (*p) {
	742	*p = 0;
	743	p++;
	744	}
[1298]	745	if (fieldnum == info->nsizepos)
[551]	746	nsize = pp;
[1298]	747	else if (fieldnum == info->osizepos)
[551]	748	osize = pp;
[1298]	749	else if (fieldnum == info->fdpos) {
[551]	750	fdate = pp;
	751	if (info->fdflds > 1 && info->fdflds < 24) {
	752	INT y;
[2]	753
[551]	754	if (*p) {
	755	p--;
	756	*p = ' ';
	757	for (y = 0; y < info->fdflds - 1; y++) {
	758	while (p && (p == ' ' \|\| *p == '\t'))
	759	p++;
	760	while (p && (p != ' ' && *p != '\t'))
	761	p++;
[1298]	762	fieldnum++;
[551]	763	}
	764	if (*p) {
	765	*p = 0;
	766	p++;
	767	}
	768	}
	769	}
	770	}
[1298]	771	else if (fieldnum == info->fnpos) {
[551]	772	fname = pp;
	773	if (pp && pp == '' && !(pp + 1)) / workaround for LH.EXE */
	774	fname = NULL;
	775	if (info->nameislast)
	776	break;
	777	}
	778	else if ((!p \|\| !*p) && info->fnpos == -1) {
	779	fname = pp;
	780	break;
	781	}
	782	}
	783	if (info->nameisnext) {
	784	if (!xfgets_bstripcr
	785	(lonename, sizeof(lonename), fp, pszSrcFile, __LINE__))
	786	break;
	787	fname = lonename;
	788	}
[423]	789	// fixme to complain?
[551]	790	if (fname && *fname) {
[2]	791
[551]	792	RECORDINSERT ri;
	793	PARCITEM pai;
[2]	794
[551]	795	pai = WinSendMsg(hwndCnr,
	796	CM_ALLOCRECORD,
	797	MPFROMLONG(EXTRA_ARCRECORD_BYTES),
	798	MPFROMLONG(1L));
	799	if (!pai) {
[358]	800	Runtime_Error(pszSrcFile, __LINE__, "CM_ALLOCRECORD");
	801	break;
	802	}
	803	else {
[551]	804	memset(pai, 0, sizeof(ARCITEM));
	805	pai->hwndCnr = hwndCnr;
	806	if (fname == '') {
	807	fname++;
	808	pai->flags = ARCFLAGS_REALDIR;
[358]	809	}
[551]	810	if (fname[strlen(fname) - 1] == '\\' \|\|
	811	fname[strlen(fname) - 1] == '/')
	812	pai->flags = ARCFLAGS_REALDIR;
[730]	813	pai->pszFileName = xstrdup(fname,pszSrcFile, __LINE__);
[762]	814	pai->pszDisplayName = pai->pszFileName;
	815	pai->rc.pszIcon = pai->pszDisplayName;
[551]	816	if (fdate)
	817	strcpy(pai->szDate, fdate);
[730]	818	// pai->pszFileName = pai->pszFileName;
[551]	819	pai->rc.pszIcon = pai->pszFileName;
[562]	820	pai->rc.hptrIcon = (pai->flags & ARCFLAGS_REALDIR) != 0 ?
[551]	821	hptrDir : hptrFile;
	822	pai->pszDate = pai->szDate;
	823	if (osize)
	824	pai->cbFile = atol(osize);
	825	if (nsize)
	826	pai->cbComp = atol(nsize);
	827	if (info->datetype && fdate && *fdate)
	828	ArcDateTime(fdate, info->datetype, &pai->date, &pai->time);
	829	memset(&ri, 0, sizeof(RECORDINSERT));
	830	ri.cb = sizeof(RECORDINSERT);
	831	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	832	ri.pRecordParent = (PRECORDCORE) NULL;
	833	ri.zOrder = (USHORT) CMA_TOP;
	834	ri.cRecordsInsert = 1L;
	835	ri.fInvalidateRecord = FALSE;
	836	if (WinSendMsg(hwndCnr,
	837	CM_INSERTRECORD, MPFROMP(pai), MPFROMP(&ri))) {
	838	*pullTotalBytes += pai->cbFile;
	839	}
	840	numarcfiles++;
	841	if (!(++counter % 50)) {
	842	if (!lastpai)
	843	lastpai = pai;
	844	WinSendMsg(hwndCnr,
	845	CM_INVALIDATERECORD,
	846	lastpai,
	847	MPFROM2SHORT(10, CMA_ERASE \| CMA_REPOSITION));
	848	lastpai = pai;
	849	}
[426]	850	// Avoid hogging system for large archive
	851	if (numarcfiles == 100)
[551]	852	priority_idle();
	853	}
	854	}
	855	}
	856	} // while !eof
[300]	857
[2]	858	fclose(fp);
[300]	859
[426]	860	if (*pStopFlag)
[551]	861	numarcfiles = 0; // Request close
	862	else if (!numarcfiles \|\| !gotstart
[1311]	863	\|\| (!gotend && info->endlist && *info->endlist && (stricmp(info->endlist, NO_END_OF_ARCHIVER_LIST_STRING)))) {
[423]	864	// Oops
[551]	865	ARCDUMP ad;
	866	CHAR errstr[CCHMAXPATH + 256];
[2]	867
[423]	868	// Try for alternate archiver
[551]	869	tinfo = info;
	870	do {
	871	tinfo = tinfo->next;
	872	if (tinfo)
	873	tinfo = find_type(arcname, tinfo);
	874	if (tinfo) {
	875	DosError(FERR_DISABLEHARDERR);
	876	DosForceDelete(arctemp);
	877	info = tinfo;
	878	goto ReTry;
	879	}
	880	} while (tinfo);
	881	DosBeep(750, 50); // wake up user
	882	sprintf(errstr, GetPString(IDS_ARCERRORINFOTEXT),
	883	arcname,
[562]	884	!gotstart ? GetPString(IDS_NOGOTSTARTTEXT) : NullStr,
	885	!numarcfiles ? GetPString(IDS_NOARCFILESFOUNDTEXT) :
[551]	886	NullStr,
[562]	887	!gotend ? GetPString(IDS_NOENDOFLISTTEXT) : NullStr);
[551]	888	memset(&ad, 0, sizeof(ARCDUMP));
	889	ad.info = info;
	890	strcpy(ad.listname, arctemp);
	891	strcpy(ad.arcname, arcname);
	892	ad.errmsg = errstr;
	893	WinDlgBox(HWND_DESKTOP,
	894	hwndCnr,
	895	ArcErrProc, FM3ModHandle, ARCERR_FRAME, MPFROMP(&ad));
[2]	896	}
[249]	897	else if (!nomove && tinfo) {
	898	/* if we got a false hit, move working hit to top */
[551]	899	tinfo = info->next;
	900	info->next = arcsighead;
	901	arcsighead->prev = info;
	902	if (tinfo)
	903	tinfo->next->prev = info->prev;
	904	info->prev->next = tinfo;
	905	info->prev = NULL;
	906	arcsighead = info;
	907	rewrite_archiverbb2(NULL); // Rewrite with warning
[2]	908	}
[551]	909	} // if opened
[426]	910
[2]	911	DosError(FERR_DISABLEHARDERR);
	912	DosForceDelete(arctemp);
[1082]	913	xfree(arctemp, pszSrcFile, __LINE__);
[2]	914	}
	915
[426]	916	if (numarcfiles)
[423]	917	priority_normal();
	918
[2]	919	return numarcfiles;
	920	}
	921
[551]	922	MRESULT EXPENTRY ArcTextProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[172]	923	{
[551]	924	static BOOL emphasized = FALSE;
	925	static HWND hwndButtonPopup = (HWND) 0;
	926	static ULONG timestamp = ULONG_MAX;
	927	static USHORT lastid = 0;
[2]	928
[551]	929	switch (msg) {
	930	case WM_CREATE:
	931	return CommonTextProc(hwnd, msg, mp1, mp2);
[2]	932
[551]	933	case WM_COMMAND:
	934	return WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	935	ARC_CNR), msg, mp1, mp2);
[2]	936
[551]	937	case UM_CONTEXTMENU:
	938	case WM_CONTEXTMENU:
	939	{
	940	USHORT id;
[2]	941
[551]	942	id = WinQueryWindowUShort(hwnd, QWS_ID);
	943	switch (id) {
	944	case DIR_SELECTED:
	945	case DIR_VIEW:
	946	case DIR_SORT:
	947	{
	948	POINTL ptl = { 0, 0 };
	949	SWP swp;
	950	DIRCNRDATA *dcd;
[2]	951
[551]	952	if (hwndButtonPopup)
	953	WinDestroyWindow(hwndButtonPopup);
	954	if (id == DIR_SELECTED)
	955	id = DIR_RESTORE;
	956	if (id == lastid) {
[2]	957
[551]	958	ULONG check;
[2]	959
[551]	960	DosQuerySysInfo(QSV_MS_COUNT, QSV_MS_COUNT, &check,
	961	sizeof(check));
	962	if (check < timestamp + 500) {
	963	lastid = 0;
	964	goto MenuAbort;
	965	}
	966	}
	967	hwndButtonPopup = WinLoadMenu(HWND_DESKTOP, FM3ModHandle, id);
	968	if (hwndButtonPopup) {
	969	WinSetWindowUShort(hwndButtonPopup, QWS_ID, id);
	970	dcd = WinQueryWindowPtr(WinWindowFromID(WinQueryWindow(hwnd,
	971	QW_PARENT),
	972	ARC_CNR), QWL_USER);
	973	if (id == DIR_SORT) {
	974	if (dcd)
	975	SetSortChecks(hwndButtonPopup, dcd->sortFlags);
	976	WinSendMsg(hwndButtonPopup,
	977	MM_DELETEITEM,
	978	MPFROM2SHORT(IDM_SORTNONE, FALSE), MPVOID);
	979	WinSendMsg(hwndButtonPopup,
	980	MM_DELETEITEM,
	981	MPFROM2SHORT(IDM_SORTNAME, FALSE), MPVOID);
	982	WinSendMsg(hwndButtonPopup,
	983	MM_DELETEITEM,
	984	MPFROM2SHORT(IDM_SORTLADATE, FALSE), MPVOID);
	985	WinSendMsg(hwndButtonPopup,
	986	MM_DELETEITEM,
	987	MPFROM2SHORT(IDM_SORTCRDATE, FALSE), MPVOID);
	988	WinSendMsg(hwndButtonPopup,
	989	MM_DELETEITEM,
	990	MPFROM2SHORT(IDM_SORTDIRSFIRST, FALSE), MPVOID);
	991	WinSendMsg(hwndButtonPopup,
	992	MM_DELETEITEM,
	993	MPFROM2SHORT(IDM_SORTDIRSLAST, FALSE), MPVOID);
	994	WinSendMsg(hwndButtonPopup,
	995	MM_DELETEITEM,
	996	MPFROM2SHORT(IDM_SORTSUBJECT, FALSE), MPVOID);
	997	WinSendMsg(hwndButtonPopup,
	998	MM_SETITEMTEXT,
	999	MPFROM2SHORT(IDM_SORTEASIZE, 0),
	1000	MPFROMP(GetPString(IDS_COMPRESSEDSIZEMENUTEXT)));
	1001	WinSendMsg(hwndButtonPopup,
	1002	MM_SETITEMTEXT,
	1003	MPFROM2SHORT(IDM_SORTLWDATE, 0),
	1004	MPFROMP(GetPString(IDS_DATEMENUTEXT)));
	1005	}
	1006	ptl.x = 0;
	1007	if (WinPopupMenu(HWND_OBJECT,
	1008	HWND_OBJECT,
	1009	hwndButtonPopup, -32767, -32767, 0, 0)) {
	1010	WinQueryWindowPos(hwndButtonPopup, &swp);
	1011	ptl.y = -(swp.cy + 2);
	1012	}
	1013	else {
	1014	WinQueryWindowPos(hwnd, &swp);
	1015	ptl.y = swp.cy + 2;
	1016	}
	1017	if (WinPopupMenu(hwnd,
	1018	hwnd,
	1019	hwndButtonPopup,
	1020	ptl.x,
	1021	ptl.y,
	1022	0,
	1023	PU_HCONSTRAIN \| PU_VCONSTRAIN \|
	1024	PU_KEYBOARD \| PU_MOUSEBUTTON1)) {
	1025	CenterOverWindow(hwndButtonPopup);
	1026	PaintRecessedWindow(hwnd, (HPS) 0, FALSE, FALSE);
	1027	}
	1028	}
	1029	}
	1030	break;
	1031	default:
	1032	PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	1033	ARC_CNR),
	1034	WM_CONTROL, MPFROM2SHORT(ARC_CNR, CN_CONTEXTMENU), MPVOID);
	1035	break;
[2]	1036	}
[551]	1037	}
	1038	MenuAbort:
	1039	if (msg == UM_CONTEXTMENU)
	1040	return 0;
	1041	break;
[2]	1042
[551]	1043	case WM_MENUEND:
	1044	if (hwndButtonPopup == (HWND) mp2) {
	1045	lastid = WinQueryWindowUShort((HWND) mp2, QWS_ID);
	1046	WinDestroyWindow(hwndButtonPopup);
	1047	hwndButtonPopup = (HWND) 0;
	1048	DosQuerySysInfo(QSV_MS_COUNT, QSV_MS_COUNT, &timestamp,
	1049	sizeof(timestamp));
	1050	switch (lastid) {
	1051	case DIR_VIEW:
	1052	case DIR_SORT:
	1053	case DIR_RESTORE:
	1054	case DIR_SELECTED:
	1055	PaintRecessedWindow(hwnd, (HPS) 0, TRUE, FALSE);
	1056	break;
[2]	1057	}
[551]	1058	}
	1059	break;
[2]	1060
[551]	1061	case WM_MOUSEMOVE:
	1062	{
	1063	USHORT id = WinQueryWindowUShort(hwnd, QWS_ID);
	1064	char *s = NULL;
[2]	1065
[551]	1066	if (fOtherHelp) {
	1067	if ((!hwndBubble \|\|
	1068	WinQueryWindowULong(hwndBubble, QWL_USER) != hwnd) &&
	1069	!WinQueryCapture(HWND_DESKTOP)) {
	1070	switch (id) {
	1071	case DIR_TOTALS:
	1072	s = GetPString(IDS_ARCCNRTOTALSHELPTEXT);
	1073	break;
	1074	case DIR_SELECTED:
	1075	s = GetPString(IDS_ARCCNRSELECTEDHELPTEXT);
	1076	break;
	1077	case DIR_VIEW:
	1078	s = GetPString(IDS_ARCCNRVIEWHELPTEXT);
	1079	break;
	1080	case DIR_SORT:
	1081	s = GetPString(IDS_DIRCNRSORTHELP);
	1082	break;
	1083	case DIR_FILTER:
	1084	s = GetPString(IDS_DIRCNRFILTERHELP);
	1085	break;
	1086	case DIR_FOLDERICON:
	1087	s = GetPString(IDS_ARCCNRFOLDERHELPTEXT);
	1088	break;
	1089	default:
	1090	break;
	1091	}
	1092	if (s)
	1093	MakeBubble(hwnd, TRUE, s);
	1094	else if (hwndBubble)
	1095	WinDestroyWindow(hwndBubble);
	1096	}
[2]	1097	}
[551]	1098	switch (id) {
	1099	case DIR_FILTER:
	1100	case DIR_SORT:
	1101	case DIR_VIEW:
	1102	case DIR_SELECTED:
	1103	case DIR_FOLDERICON:
	1104	return CommonTextButton(hwnd, msg, mp1, mp2);
	1105	}
	1106	}
	1107	break;
[2]	1108
[551]	1109	case WM_BUTTON3UP:
	1110	case WM_BUTTON1UP:
	1111	case WM_BUTTON1DOWN:
	1112	case WM_BUTTON3DOWN:
	1113	{
	1114	USHORT id;
[2]	1115
[551]	1116	id = WinQueryWindowUShort(hwnd, QWS_ID);
	1117	switch (id) {
	1118	case DIR_FILTER:
	1119	case DIR_SORT:
	1120	case DIR_VIEW:
	1121	case DIR_SELECTED:
	1122	case DIR_FOLDERICON:
	1123	return CommonTextButton(hwnd, msg, mp1, mp2);
[2]	1124	}
[551]	1125	}
	1126	break;
[2]	1127
[551]	1128	case UM_CLICKED:
	1129	case UM_CLICKED3:
	1130	{
	1131	USHORT id, cmd = 0;
[2]	1132
[551]	1133	id = WinQueryWindowUShort(hwnd, QWS_ID);
	1134	switch (id) {
	1135	case DIR_FOLDERICON:
	1136	switch (msg) {
	1137	case WM_BUTTON3CLICK:
	1138	case WM_CHORD:
	1139	cmd = IDM_RESCAN;
	1140	break;
	1141	default:
	1142	if ((SHORT2FROMMP(mp2) & KC_ALT) != 0)
	1143	cmd = IDM_WINDOWDLG;
	1144	else
	1145	cmd = IDM_WALKDIR;
	1146	break;
	1147	}
	1148	break;
	1149	case DIR_VIEW:
	1150	case DIR_SORT:
	1151	case DIR_SELECTED:
	1152	PostMsg(hwnd, UM_CONTEXTMENU, MPVOID, MPVOID);
	1153	break;
	1154	case DIR_FILTER:
	1155	cmd = IDM_FILTER;
	1156	break;
	1157	default:
	1158	break;
[2]	1159	}
[551]	1160	if (cmd)
	1161	PostMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	1162	ARC_CNR),
	1163	WM_COMMAND, MPFROM2SHORT(cmd, 0), MPVOID);
	1164	}
	1165	return 0;
[2]	1166
[551]	1167	case WM_BEGINDRAG:
	1168	case DM_DROP:
	1169	case DM_DRAGOVER:
	1170	case DM_DRAGLEAVE:
	1171	case DM_DROPHELP:
	1172	if (msg == DM_DRAGOVER) {
	1173	if (!emphasized) {
	1174	emphasized = TRUE;
	1175	DrawTargetEmphasis(hwnd, emphasized);
[2]	1176	}
[551]	1177	}
	1178	else if (msg != WM_BEGINDRAG) {
	1179	if (emphasized) {
	1180	emphasized = FALSE;
	1181	DrawTargetEmphasis(hwnd, emphasized);
[2]	1182	}
[551]	1183	}
	1184	switch (WinQueryWindowUShort(hwnd, QWS_ID)) {
	1185	case DIR_FOLDERICON:
	1186	switch (msg) {
	1187	case DM_DRAGOVER:
[618]	1188	if (AcceptOneDrop(hwnd, mp1, mp2))
[551]	1189	return MRFROM2SHORT(DOR_DROP, DO_MOVE);
[562]	1190	return MRFROM2SHORT(DOR_NODROP, 0); /* Drop not valid */
[551]	1191	case DM_DROPHELP:
	1192	DropHelp(mp1, mp2, hwnd, GetPString(IDS_ARCCNRFOLDERDROPHELPTEXT));
	1193	return 0;
	1194	case DM_DROP:
	1195	{
	1196	char szFrom[CCHMAXPATH + 2];
[2]	1197
[551]	1198	if (emphasized) {
	1199	emphasized = FALSE;
	1200	DrawTargetEmphasis(hwnd, emphasized);
	1201	}
[618]	1202	if (GetOneDrop(hwnd, mp1, mp2, szFrom, sizeof(szFrom)))
[551]	1203	WinSendMsg(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	1204	ARC_CNR),
	1205	WM_COMMAND,
	1206	MPFROM2SHORT(IDM_SWITCH, 0), MPFROMP(szFrom));
	1207	}
	1208	return 0;
	1209	default:
	1210	return PFNWPStatic(hwnd, msg, mp1, mp2);
	1211	}
	1212	default:
	1213	{
	1214	CNRDRAGINFO cnd;
	1215	USHORT dcmd;
[2]	1216
[551]	1217	switch (msg) {
	1218	case DM_DROP:
	1219	dcmd = CN_DROP;
	1220	break;
	1221	case DM_DRAGOVER:
	1222	dcmd = CN_DRAGOVER;
	1223	break;
	1224	case DM_DRAGLEAVE:
	1225	dcmd = CN_DRAGLEAVE;
	1226	break;
	1227	case DM_DROPHELP:
	1228	dcmd = CN_DROPHELP;
	1229	break;
	1230	case WM_BEGINDRAG:
	1231	dcmd = CN_INITDRAG;
	1232	break;
	1233	}
	1234	cnd.pDragInfo = (PDRAGINFO) mp1;
	1235	cnd.pRecord = NULL;
	1236	return WinSendMsg(WinQueryWindow(hwnd, QW_PARENT),
	1237	WM_CONTROL,
	1238	MPFROM2SHORT(ARC_CNR, dcmd), MPFROMP(&cnd));
[2]	1239	}
[551]	1240	}
[2]	1241	}
[551]	1242	return PFNWPStatic(hwnd, msg, mp1, mp2);
[2]	1243	}
	1244
[551]	1245	MRESULT EXPENTRY ArcClientWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
	1246	MPARAM mp2)
	1247	{
[2]	1248
[551]	1249	switch (msg) {
	1250	case UM_CONTAINERHWND:
	1251	return MRFROMLONG(WinWindowFromID(hwnd, ARC_CNR));
[2]	1252
[551]	1253	case UM_VIEWSMENU:
	1254	// fixme to disble menu items as needed
[872]	1255	return MRFROMLONG(CheckMenu(hwnd, &ArcCnrMenu, ARCCNR_POPUP));
[2]	1256
[551]	1257	case UM_FILESMENU:
	1258	// fixme to disble menu items as needed
[872]	1259	return MRFROMLONG(CheckMenu(hwnd, &ArcMenu, ARC_POPUP));
[2]	1260
[551]	1261	case MM_PORTHOLEINIT:
	1262	case WM_INITMENU:
	1263	case UM_INITMENU:
	1264	case UM_COMMAND:
	1265	case UM_LOADFILE:
	1266	case UM_UPDATERECORD:
	1267	case UM_UPDATERECORDLIST:
	1268	case WM_COMMAND:
	1269	case WM_CONTROL:
	1270	case WM_CLOSE:
	1271	return WinSendMsg(WinWindowFromID(hwnd, ARC_CNR), msg, mp1, mp2);
[2]	1272
[551]	1273	case WM_PSETFOCUS:
	1274	case WM_SETFOCUS:
	1275	if (mp2)
	1276	PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID);
	1277	break;
[2]	1278
[551]	1279	case UM_FOCUSME:
	1280	WinSetFocus(HWND_DESKTOP, WinWindowFromID(hwnd, ARC_CNR));
	1281	break;
[2]	1282
[551]	1283	case WM_PAINT:
	1284	{
	1285	HPS hps;
	1286	RECTL rcl;
[2]	1287
[551]	1288	hps = WinBeginPaint(hwnd, (HPS) 0, NULL);
	1289	if (hps) {
	1290	WinQueryWindowRect(hwnd, &rcl);
	1291	WinFillRect(hps, &rcl, CLR_PALEGRAY);
	1292	CommonTextPaint(hwnd, hps);
	1293	WinEndPaint(hps);
[2]	1294	}
[551]	1295	}
	1296	break;
[2]	1297
[551]	1298	case UM_SIZE:
	1299	case WM_SIZE:
	1300	if (msg == UM_SIZE) {
[2]	1301
[551]	1302	SWP swp;
[2]	1303
[551]	1304	WinQueryWindowPos(hwnd, &swp);
	1305	mp1 = MPFROM2SHORT(swp.cx, swp.cy);
	1306	mp2 = MPFROM2SHORT(swp.cx, swp.cy);
	1307	}
	1308	{
	1309	USHORT cx, cy, bx;
[2]	1310
[551]	1311	cx = SHORT1FROMMP(mp2);
	1312	cy = SHORT2FROMMP(mp2);
	1313	WinSetWindowPos(WinWindowFromID(hwnd, ARC_CNR), HWND_TOP,
	1314	0,
	1315	22, cx, cy - (24 + 22), SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1316	WinSetWindowPos(WinWindowFromID(hwnd, ARC_EXTRACTDIR), HWND_TOP,
	1317	0, 0, cx, 22, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1318	WinSetWindowPos(WinWindowFromID(hwnd, DIR_FOLDERICON), HWND_TOP,
	1319	2, cy - 22, 24, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1320	WinSetWindowPos(WinWindowFromID(hwnd, DIR_TOTALS), HWND_TOP,
	1321	29,
	1322	cy - 22,
	1323	(cx / 3) - 2, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1324	WinSetWindowPos(WinWindowFromID(hwnd, DIR_SELECTED), HWND_TOP,
	1325	29 + (cx / 3) + 2,
	1326	cy - 22,
	1327	(cx / 3) - 2, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1328	bx = (cx - (29 + (((cx / 3) + 2) * 2))) / 3;
	1329	WinSetWindowPos(WinWindowFromID(hwnd, DIR_VIEW), HWND_TOP,
	1330	29 + (((cx / 3) + 2) * 2),
	1331	cy - 22, bx - 4, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1332	WinSetWindowPos(WinWindowFromID(hwnd, DIR_SORT), HWND_TOP,
	1333	29 + (((cx / 3) + 2) * 2) + bx,
	1334	cy - 22, bx - 4, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1335	WinSetWindowPos(WinWindowFromID(hwnd, DIR_FILTER), HWND_TOP,
	1336	29 + (((cx / 3) + 2) * 2) + (bx * 2),
	1337	cy - 22, bx - 4, 20, SWP_SHOW \| SWP_MOVE \| SWP_SIZE);
	1338	}
	1339	CommonTextPaint(hwnd, (HPS) 0);
	1340	if (msg == UM_SIZE) {
	1341	WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), HWND_TOP, 0, 0, 0, 0,
	1342	SWP_SHOW \| SWP_ZORDER \| SWP_ACTIVATE);
	1343	return 0;
	1344	}
	1345	break;
[2]	1346	}
[551]	1347	return WinDefWindowProc(hwnd, msg, mp1, mp2);
[2]	1348	}
	1349
[551]	1350	MRESULT EXPENTRY ArcObjWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[172]	1351	{
[2]	1352	DIRCNRDATA *dcd;
[358]	1353	PSZ psz;
[773]	1354	CHAR szQuotedArcName[CCHMAXPATH];
	1355	CHAR szQuotedMemberName[CCHMAXPATH];
[2]	1356
[551]	1357	switch (msg) {
[1077]	1358	case WM_CREATE:
	1359	DbgMsg(pszSrcFile, __LINE__, "WM_CREATE mp1 %p mp2 %p", mp1, mp2); // 18 Jul 08 SHL fixme
	1360	break;
	1361
[551]	1362	case DM_PRINTOBJECT:
	1363	case DM_DISCARDOBJECT:
	1364	dcd = INSTDATA(hwnd);
	1365	if (dcd) {
[2]	1366
[551]	1367	LISTINFO *li;
	1368	CNRDRAGINFO cni;
[2]	1369
[551]	1370	cni.pRecord = NULL;
	1371	cni.pDragInfo = (PDRAGINFO) mp1;
	1372	li = DoFileDrop(dcd->hwndCnr,
[762]	1373	dcd->directory, FALSE, MPVOID, MPFROMP(&cni));
[687]	1374	CheckPmDrgLimit(cni.pDragInfo);
[551]	1375	if (li) {
	1376	li->type = (msg == DM_DISCARDOBJECT) ? IDM_DELETE : IDM_PRINT;
	1377	if (!li->list \|\|
	1378	!li->list[0] \|\| !PostMsg(hwnd, UM_ACTION, MPFROMP(li), MPVOID))
	1379	FreeListInfo(li);
	1380	else
	1381	return MRFROMLONG(DRR_SOURCE);
[2]	1382	}
[551]	1383	}
	1384	return MRFROMLONG(DRR_TARGET);
[2]	1385
[551]	1386	case DM_RENDERPREPARE:
	1387	return (MRESULT) TRUE;
[2]	1388
[551]	1389	case DM_RENDER:
	1390	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1391	if (dcd && dcd->info && dcd->info->extract && dcd->arcname) {
[2]	1392
[551]	1393	PDRAGTRANSFER pdt = (PDRAGTRANSFER) mp1;
	1394	CHAR filename[CCHMAXPATH];
	1395	ULONG len;
[2]	1396
[551]	1397	if (pdt->hwndClient && pdt->pditem && pdt->hstrSelectedRMF &&
	1398	pdt->hstrRenderToName) {
	1399	if (pdt->usOperation == DO_COPY \|\| pdt->usOperation == DO_MOVE) {
	1400	*filename = 0;
	1401	len = DrgQueryStrName(pdt->hstrSelectedRMF, CCHMAXPATH, filename);
	1402	filename[len] = 0;
	1403	if (!strnicmp(filename, "OS2FILE,", 8)) {
	1404	// saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"RMF = \"%s\"",filename);
	1405	}
	1406	else {
	1407	*filename = 0;
	1408	len =
	1409	DrgQueryStrName(pdt->hstrRenderToName, CCHMAXPATH, filename);
	1410	filename[len] = 0;
	1411	if (len && *filename) {
	1412	psz = xstrdup(filename, pszSrcFile, __LINE__);
	1413	if (psz) {
	1414	PostMsg(hwnd, UM_RENDER, MPFROMP(pdt), MPFROMP(psz));
	1415	return (MRESULT) TRUE;
	1416	}
	1417	}
[358]	1418	else {
[551]	1419	// saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"No render-to name given.");
[358]	1420	}
	1421	}
[551]	1422	}
	1423	pdt->fsReply = DMFL_RENDERRETRY;
[2]	1424	}
[551]	1425	}
	1426	return (MRESULT) FALSE;
[2]	1427
[551]	1428	case UM_RENDER:
	1429	{
	1430	PDRAGTRANSFER pdt = (PDRAGTRANSFER) mp1;
	1431	USHORT usRes = DMFL_RENDERFAIL;
[2]	1432
[551]	1433	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1434	if (dcd && dcd->info && dcd->info->extract && dcd->arcname) {
[2]	1435
[551]	1436	CHAR filename = (CHAR ) mp2, *p;
	1437	ULONG len;
	1438	CHAR membername[CCHMAXPATH], construct[CCHMAXPATH * 2];
[2]	1439
[551]	1440	*membername = 0;
	1441	len = DrgQueryStrName(pdt->pditem->hstrSourceName,
	1442	CCHMAXPATH, membername);
	1443	membername[len] = 0;
	1444	if (*membername && len && filename) {
	1445	unlinkf("%s", filename);
	1446	strcpy(construct, filename);
	1447	p = strrchr(filename, '\\');
	1448	if (!p)
	1449	*construct = 0;
	1450	else {
	1451	if (p == filename \|\| *(p - 1) == ':')
	1452	p++;
	1453	*p = 0;
	1454	}
	1455	// saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"%s %s %s\r[%s]",dcd->info->extract,dcd->arcname,membername,construct);
[1268]	1456	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \| WAIT \|
[888]	1457	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
	1458	dcd->hwndClient, pszSrcFile, __LINE__, construct, NULL,
[773]	1459	"%s %s %s",
[551]	1460	dcd->info->extract,
[773]	1461	BldQuotedFileName(szQuotedArcName, dcd->arcname),
	1462	BldQuotedFileName(szQuotedMemberName, membername));
	1463	BldFullPathName(construct, construct, membername);
[551]	1464	if (IsFile(construct) != -1) {
	1465	rename(construct, filename);
	1466	unlinkf("%s", construct);
	1467	if (IsFile(filename) != -1)
	1468	usRes = DMFL_RENDEROK;
	1469	}
	1470	}
[2]	1471	}
[1009]	1472	xfree((CHAR *)mp2, pszSrcFile, __LINE__);
[551]	1473	PostMsg(pdt->hwndClient, DM_RENDERCOMPLETE, MPFROMP(pdt),
	1474	MPFROM2SHORT(usRes, 0));
	1475	}
	1476	return 0;
[2]	1477
[551]	1478	case UM_SETUP:
[1077]	1479	# ifdef FORTIFY
	1480	Fortify_EnterScope();
	1481	# endif
[551]	1482	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1483	if (!dcd) {
	1484	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
	1485	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	1486	}
	1487	else {
[1077]	1488	# ifdef FORTIFY
[1078]	1489	Fortify_BecomeOwner(dcd);
[1077]	1490	# endif
[551]	1491	/* set unique id */
	1492	WinSetWindowUShort(hwnd, QWS_ID, ARCOBJ_FRAME + (ARC_FRAME - dcd->id));
	1493	dcd->hwndObject = hwnd; // pass back hwnd
	1494	if (ParentIsDesktop(hwnd, dcd->hwndParent))
[771]	1495	DosSleep(100); //05 Aug 07 GKY 250 // Avoid race?
[551]	1496	}
	1497	return 0;
	1498
	1499	case UM_RESCAN:
	1500	/*
	1501	* populate container
	1502	*/
	1503	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1504	if (dcd) {
	1505	if (mp1)
	1506	strcpy(dcd->arcname, (CHAR *) mp1); // Update name on request
	1507	dcd->ullTotalBytes = dcd->totalfiles =
	1508	dcd->selectedfiles = dcd->selectedbytes = 0;
	1509	WinSetDlgItemText(dcd->hwndClient, DIR_TOTALS, "0");
	1510	WinSetDlgItemText(dcd->hwndClient, DIR_SELECTED, "0 / 0k");
	1511	dcd->totalfiles = FillArcCnr(dcd->hwndCnr,
	1512	dcd->arcname,
	1513	&dcd->info,
	1514	&dcd->ullTotalBytes, &dcd->stopflag);
	1515	if (!dcd->totalfiles)
	1516	PostMsg(dcd->hwndCnr, WM_CLOSE, MPVOID, MPVOID);
[423]	1517	else {
[551]	1518	dcd->arcfilled = TRUE;
	1519	if (!PostMsg(dcd->hwndCnr, UM_RESCAN, MPVOID, MPVOID))
	1520	WinSendMsg(dcd->hwndCnr, UM_RESCAN, MPVOID, MPVOID);
	1521	PostMsg(dcd->hwndCnr, UM_SETUP2, MPVOID, MPVOID);
	1522	WinSendMsg(dcd->hwndCnr,
	1523	CM_INVALIDATERECORD,
	1524	MPVOID, MPFROM2SHORT(0, CMA_ERASE \| CMA_REPOSITION));
[2]	1525	}
[551]	1526	}
	1527	return 0;
[2]	1528
[551]	1529	case UM_SELECT:
	1530	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1531	if (dcd) {
	1532	switch (SHORT1FROMMP(mp1)) {
	1533	case IDM_SELECTALL:
	1534	case IDM_SELECTALLFILES:
	1535	SelectAll(dcd->hwndCnr, TRUE, TRUE, NULL, NULL, TRUE);
	1536	break;
	1537	case IDM_DESELECTALL:
	1538	case IDM_DESELECTALLFILES:
	1539	DeselectAll(dcd->hwndCnr, TRUE, TRUE, NULL, NULL, TRUE);
	1540	break;
	1541	case IDM_DESELECTMASK:
	1542	case IDM_SELECTMASK:
	1543	{
	1544	MASK mask;
	1545	PARCITEM pci = (PARCITEM) mp2;
[2]	1546
[551]	1547	memset(&mask, 0, sizeof(MASK));
	1548	mask.fNoAttribs = TRUE;
	1549	mask.fNoDirs = TRUE;
	1550	strcpy(mask.prompt,
	1551	GetPString((SHORT1FROMMP(mp1) == IDM_SELECTMASK) ?
	1552	IDS_SELECTFILTERTEXT : IDS_DESELECTFILTERTEXT));
	1553	if (pci && (INT) pci != -1)
[730]	1554	strcpy(mask.szMask, pci->pszFileName);
[551]	1555	if (WinDlgBox(HWND_DESKTOP, dcd->hwndCnr, PickMaskDlgProc,
	1556	FM3ModHandle, MSK_FRAME, MPFROMP(&mask))) {
	1557	if (SHORT1FROMMP(mp1) == IDM_SELECTMASK)
	1558	SelectAll(dcd->hwndCnr, TRUE, TRUE, mask.szMask, NULL, FALSE);
	1559	else
	1560	DeselectAll(dcd->hwndCnr, TRUE, TRUE, mask.szMask, NULL, FALSE);
	1561	}
	1562	}
[2]	1563
[551]	1564	case IDM_INVERT:
	1565	InvertAll(dcd->hwndCnr);
	1566	break;
[2]	1567	}
[551]	1568	}
	1569	return 0;
[2]	1570
[551]	1571	case UM_ENTER:
	1572	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1573	if (dcd) {
[2]	1574
[1268]	1575	CHAR s = (CHAR ) mp1, p, pp; // filename[CCHMAXPATH];
	1576	WAITCHILD *WaitChild;
	1577	APIRET rc;
[2]	1578
[1268]	1579	WaitChild = xmallocz(sizeof(WAITCHILD), pszSrcFile, __LINE__);
	1580	if (!WaitChild)
	1581	return 0;
[551]	1582	if (s) {
	1583	if (!dcd->info->extract) {
	1584	Runtime_Error(pszSrcFile, __LINE__, "no extract");
[1039]	1585	free(s);
[551]	1586	return 0;
	1587	}
[1271]	1588	sprintf(WaitChild->CmdLine, "%s %s %s",
	1589	dcd->info->exwdirs ? dcd->info->exwdirs :
	1590	dcd->info->extract,
	1591	BldQuotedFileName(szQuotedArcName, dcd->arcname),
	1592	BldQuotedFileName(szQuotedMemberName, s));
	1593	/*runemf2(SEPARATE \| ASYNCHRONOUS \| WAIT \|
[1268]	1594	(fArcStuffVisible ? 0 : BACKGROUND),
[1271]	1595	, pszSrcFile, __LINE__, dcd->workdir, NULL,
[773]	1596	"%s %s %s",
[562]	1597	dcd->info->exwdirs ? dcd->info->exwdirs :
	1598	dcd->info->extract,
[773]	1599	BldQuotedFileName(szQuotedArcName, dcd->arcname),
[1271]	1600	BldQuotedFileName(szQuotedMemberName, s));*/
[551]	1601	if (!dcd->info->exwdirs) {
	1602	p = s;
	1603	p = strrchr(s, '\\');
	1604	pp = strrchr(s, '/');
	1605	if (p && pp)
	1606	p = max(p, pp);
	1607	else if (!p)
	1608	p = pp;
	1609	if (p)
	1610	memmove(s, p + 1, strlen(p + 1));
	1611	}
[1268]	1612	sprintf(WaitChild->filename, "%s\\%s", dcd->workdir, s);
	1613	p = WaitChild->filename;
[551]	1614	while (*p) {
	1615	if (*p == '/')
	1616	*p = '\\';
	1617	p++;
	1618	}
[1271]	1619	free(s);
	1620	WaitChild->RunFlags = SEPARATE \| ASYNCHRONOUS \| WAIT \|
	1621	(fArcStuffVisible ? 0 : BACKGROUND);
	1622	WaitChild->hwndClient = dcd->hwndClient;
	1623	WaitChild->pszDirectory = xstrdup(dcd->workdir, pszSrcFile, __LINE__);
	1624	WaitChild->pszEnvironment = NULL;
	1625	strcpy(WaitChild->formatstring, "%s");
[1268]	1626	WaitChild->hwndCnr = dcd->hwndCnr;
	1627	rc = _beginthread(WaitChildThread, NULL, 65536, WaitChild);
	1628	if (rc == -1)
	1629	Runtime_Error(pszSrcFile, __LINE__,
	1630	GetPString(IDS_COULDNTSTARTTHREADTEXT));
	1631	//if (IsFile(filename) == 1) {
	1632	#if 0 // 06 Oct 07 SHL fixme to be gone - set to 0 for ticket #58 testing
[570]	1633	if (fViewChild && fArcStuffVisible)
[835]	1634	DosSleep(100); // Allow unzip session to finish closing 14 Mar 07 SHL
[907]	1635	#endif
[1270]	1636	//WinSendMsg(WaitChild->hwndCnr, UM_ENTER, MPFROMP(filename), MPVOID);
[1268]	1637
[2]	1638	}
[551]	1639	}
	1640	return 0;
[2]	1641
[551]	1642	case UM_COMMAND:
	1643	if (mp1) {
	1644	if (PostMsg(hwnd, UM_ACTION, mp1, mp2))
	1645	return (MRESULT) TRUE;
	1646	}
	1647	return 0;
[2]	1648
[551]	1649	case UM_ACTION:
	1650	DosError(FERR_DISABLEHARDERR);
	1651	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	1652	if (dcd) {
[2]	1653
[551]	1654	LISTINFO li = (LISTINFO ) mp1;
	1655	register INT x;
[2]	1656
[551]	1657	if (li && li->list && li->list[0]) {
[1077]	1658	printf("%x/r", li->type); fflush(stdout);
[551]	1659	switch (li->type) {
	1660	case IDM_ARCHIVE:
	1661	case IDM_ARCHIVEM:
	1662	{
	1663	DIRCNRDATA ad;
	1664	CHAR szBuffer[1025], *p;
[2]	1665
[551]	1666	if (!li->list[1] && !stricmp(li->list[0], dcd->arcname)) {
	1667	Runtime_Error(pszSrcFile, __LINE__, "arc to self");
	1668	break;
	1669	}
	1670	ad = *dcd;
	1671	ad.namecanchange = 0;
	1672	ad.fmoving = (li->type == IDM_ARCHIVEM);
	1673	if (!WinDlgBox(HWND_DESKTOP, dcd->hwndClient, ArchiveDlgProc, FM3ModHandle, ARCH_FRAME, (PVOID) & ad) \|\| !ad.arcname \|\| !ad.command) /* we blew it */
	1674	break;
	1675	/* build the sucker */
	1676	strcpy(szBuffer, ad.command);
	1677	strcat(szBuffer, " ");
[773]	1678
	1679	BldQuotedFileName(szBuffer + strlen(szBuffer), ad.arcname);
	1680
	1681	p = &szBuffer[strlen(szBuffer)]; // Remeber where archiver name ends
	1682
[551]	1683	if (ad.mask.szMask) {
	1684	strcat(szBuffer, " ");
[773]	1685
	1686	BldQuotedFileName(szBuffer + strlen(szBuffer), ad.mask.szMask);
[551]	1687	}
	1688	strcat(szBuffer, " ");
	1689	x = 0;
[773]	1690
	1691	// Run commands avoiding command line overflow
[551]	1692	while (li->list[x]) {
[773]	1693
	1694	if (IsFile(li->list[x]))
[907]	1695	BldQuotedFileName(szBuffer + strlen(szBuffer), li->list[x]);
[773]	1696	else
[907]	1697	BldQuotedFullPathName(szBuffer + strlen(szBuffer), li->list[x], "*");
[773]	1698
[551]	1699	x++;
	1700	if (!li->list[x] \|\| strlen(szBuffer) +
[1004]	1701	strlen(li->list[x]) + 5 > MaxComLineStrg) {
[1268]	1702	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \|
	1703	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
	1704	hwnd, pszSrcFile, __LINE__,
[907]	1705	NULL, NULL, "%s", szBuffer);
[551]	1706	*p = 0;
	1707	}
	1708	strcat(szBuffer, " ");
[773]	1709	} // while
	1710
[551]	1711	PostMsg(dcd->hwndCnr, UM_RESCAN, MPFROMSHORT(1), MPVOID);
	1712	Broadcast(WinQueryAnchorBlock(hwnd),
	1713	hwndMain, UM_UPDATERECORD, MPFROMP(ad.arcname), MPVOID);
	1714	Broadcast(WinQueryAnchorBlock(hwnd),
	1715	hwndMain,
	1716	UM_UPDATERECORDLIST, MPFROMP(li->list), MPVOID);
	1717	}
	1718	break;
[2]	1719
[551]	1720	case IDM_REFRESH:
	1721	case IDM_DELETE:
	1722	{
[1077]	1723	CHAR *endofit;
	1724	PSZ pszCmdLine;
[551]	1725	INT z;
	1726	CHECKLIST ck;
	1727	CHAR prompt[CCHMAXPATH + 257];
[2]	1728
[551]	1729	if (!dcd->info->delete)
	1730	break;
	1731	memset(&ck, 0, sizeof(ck));
	1732	ck.size = sizeof(ck);
	1733	ck.list = li->list;
	1734	ck.cmd = li->type;
[1301]	1735	ck.prompt = prompt;
	1736	ck.flags = CHECK_ARCHIVE;
[551]	1737	sprintf(prompt, GetPString(IDS_ARCCNRDELREFTEXT),
	1738	(li->type == IDM_DELETE) ?
	1739	GetPString(IDS_DELETELOWERTEXT) :
	1740	GetPString(IDS_REFRESHLOWERTEXT),
	1741	&"s"[li->list[1] == NULL],
	1742	dcd->arcname,
	1743	(li->type == IDM_DELETE) ?
	1744	GetPString(IDS_DELETELOWERTEXT) :
	1745	GetPString(IDS_REFRESHLOWERTEXT));
	1746	if (!WinDlgBox(HWND_DESKTOP, hwnd, CheckListProc,
	1747	FM3ModHandle, CHECK_FRAME, MPFROMP(&ck)))
	1748	break;
	1749	li->list = ck.list;
	1750	if (!li->list \|\| !li->list[0])
[1077]	1751	break;
	1752	pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	1753	if (!pszCmdLine)
	1754	break;
[1040]	1755	strcpy(pszCmdLine, li->type == IDM_DELETE ?
[773]	1756	dcd->info->delete :
	1757	dcd->info->create);
[1040]	1758	strcat(pszCmdLine, " ");
	1759	BldQuotedFileName(pszCmdLine + strlen(pszCmdLine), dcd->arcname);
	1760	endofit = &pszCmdLine[strlen(pszCmdLine)];
[551]	1761	z = 0;
	1762	do {
	1763	for (x = z; li->list[x] &&
[1040]	1764	strlen(pszCmdLine) + strlen(li->list[x]) < 999; x++) {
	1765	strcat(pszCmdLine, " ");
	1766	BldQuotedFileName(pszCmdLine + strlen(pszCmdLine), li->list[x]);
[551]	1767	}
	1768	z = x;
[1268]	1769	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \| WAIT \|
[888]	1770	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
[1040]	1771	hwnd, pszSrcFile, __LINE__, NullStr, NULL, "%s", pszCmdLine);
[1077]	1772	*endofit = 0;
	1773	free(pszCmdLine);
[551]	1774	} while (li->list[x]);
	1775	PostMsg(dcd->hwndCnr, UM_RESCAN, MPFROMSHORT(1), MPVOID);
	1776	Broadcast(WinQueryAnchorBlock(hwnd),
	1777	hwndMain,
	1778	UM_UPDATERECORD, MPFROMP(dcd->arcname), MPVOID);
	1779	}
	1780	break;
[2]	1781
[551]	1782	case IDM_PRINT:
	1783	case IDM_VIRUSSCAN:
	1784	case IDM_VIEW:
	1785	case IDM_MCIPLAY:
	1786	case IDM_VIEWARCHIVE:
	1787	case IDM_VIEWTEXT:
	1788	case IDM_VIEWBINARY:
	1789	case IDM_EDIT:
	1790	case IDM_EDITTEXT:
	1791	case IDM_EDITBINARY:
	1792	case IDM_EXEC:
	1793	case IDM_EXTRACTWDIRS:
	1794	case IDM_EXTRACT:
[1068]	1795	case IDM_OPENDEFAULT:
	1796	case IDM_OPENSETTINGS:
[551]	1797	{
[1077]	1798	CHAR endofit, ptr;
	1799	PSZ pszCmdLine;
[551]	1800	INT z;
	1801	if ((li->type == IDM_EXTRACT && !li->info->extract) \|\|
	1802	((li->type == IDM_VIEW \|\| li->type == IDM_VIEWTEXT \|\|
	1803	li->type == IDM_VIEWBINARY \|\| li->type == IDM_EDIT \|\|
	1804	li->type == IDM_VIEWARCHIVE \|\| li->type == IDM_EDITTEXT \|\|
	1805	li->type == IDM_EDITBINARY \|\| li->type == IDM_MCIPLAY) &&
	1806	(!li->info->extract && !li->info->exwdirs)) \|\|
	1807	(li->type != IDM_EXTRACT && li->type != IDM_EDIT &&
	1808	li->type != IDM_VIEW && li->type != IDM_VIEWTEXT &&
	1809	li->type != IDM_VIEWBINARY &&
	1810	li->type != IDM_VIEWARCHIVE &&
	1811	li->type != IDM_EDITTEXT &&
	1812	li->type != IDM_EDITBINARY &&
	1813	li->type != IDM_MCIPLAY && !li->info->exwdirs)) {
	1814	Runtime_Error(pszSrcFile, __LINE__, "no cmd for request");
	1815	break;
	1816	}
	1817	if (li->type == IDM_EXTRACT \|\| li->type == IDM_EXTRACTWDIRS) {
[2]	1818
[551]	1819	CHAR fullname[CCHMAXPATH * 2];
	1820	CHAR **exfiles = NULL;
[907]	1821	UINT numfiles = 0, numalloc = 0;
[2]	1822
[1314]	1823	if (li->targetpath && fFileNameCnrPath &&
	1824	stricmp(lastextractpath, li->targetpath)) {
	1825	strcpy(lastextractpath, li->targetpath);
	1826	SetDir(dcd->hwndParent, hwnd, li->targetpath, 1);
	1827	}
[551]	1828	for (x = 0; li->list[x]; x++) {
[1306]	1829	BldFullPathName(fullname, li->targetpath, li->list[x]);
	1830	//Check if file already exists on disk warn if it does.
[551]	1831	if (IsFile(fullname) != -1) {
	1832	AddToList(li->list[x], &exfiles, &numfiles, &numalloc);
	1833	li->list = RemoveFromList(li->list, li->list[x]);
	1834	if (!li->list)
	1835	break;
	1836	x--;
	1837	}
	1838	}
[1301]	1839	if (exfiles && numfiles) {
[2]	1840
[551]	1841	CHECKLIST ckl;
	1842	CHAR prompt[(CCHMAXPATH * 2) + 256];
[2]	1843
[551]	1844	memset(&ckl, 0, sizeof(ckl));
	1845	ckl.size = sizeof(ckl);
	1846	ckl.list = exfiles;
	1847	ckl.prompt = prompt;
[1301]	1848	ckl.cmd = li->type;
	1849	ckl.flags = CHECK_ARCHIVE;
[551]	1850	sprintf(prompt,
	1851	GetPString(IDS_REPLACEWARNTEXT),
	1852	&"s"[numfiles == 1],
	1853	li->arcname, &"s"[numfiles != 1], li->targetpath);
	1854	if (!WinDlgBox(HWND_DESKTOP, hwnd, CheckListProc,
	1855	FM3ModHandle, CHECK_FRAME, MPFROMP(&ckl))) {
	1856	if (ckl.list)
	1857	FreeList(ckl.list);
	1858	break;
	1859	}
	1860	else if (ckl.list)
	1861	li->list = CombineLists(li->list, ckl.list);
[1306]	1862	} // end check and warn
[551]	1863	}
	1864	if (!li->list \|\| !li->list[0])
[1077]	1865	break;
	1866	pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	1867	if (!pszCmdLine)
	1868	break;
[1040]	1869	strcpy(pszCmdLine,
[773]	1870	(li->type == IDM_EXTRACT \|\|
	1871	((li->type == IDM_VIEW \|\|
	1872	li->type == IDM_VIEWTEXT \|\|
	1873	li->type == IDM_VIEWBINARY \|\|
	1874	li->type == IDM_VIEWARCHIVE \|\|
	1875	li->type == IDM_PRINT \|\|
	1876	li->type == IDM_EDIT \|\|
	1877	li->type == IDM_EDITTEXT \|\|
[1068]	1878	li->type == IDM_OPENDEFAULT \|\|
	1879	li->type == IDM_OPENSETTINGS \|\|
	1880	(li->type == IDM_EDITBINARY && // JBS No way for this () to be true??
[773]	1881	li->type == IDM_MCIPLAY)) &&
	1882	!li->info->exwdirs)) ?
	1883	li->info->extract :
	1884	li->info->exwdirs);
[1040]	1885	strcat(pszCmdLine, " ");
	1886	BldQuotedFileName(pszCmdLine + strlen(pszCmdLine), li->arcname);
	1887	endofit = &pszCmdLine[strlen(pszCmdLine)];
[888]	1888	z = 0;
	1889	do {
	1890	for (x = z; li->list[x] &&
[1069]	1891	strlen(pszCmdLine) + strlen(li->list[x]) < MaxComLineStrg - 1 ; x++) {
[1040]	1892	strcat(pszCmdLine, " ");
	1893	BldQuotedFileName(pszCmdLine + strlen(pszCmdLine), li->list[x]);
[551]	1894	ptr = li->list[x];
	1895	while (*ptr) {
	1896	if (*ptr == '/')
	1897	*ptr = '\\';
	1898	ptr++;
	1899	}
	1900	}
	1901	z = x;
[1268]	1902	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \|
	1903	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
	1904	hwnd, pszSrcFile, __LINE__,
[1077]	1905	li->targetpath, NULL, "%s", pszCmdLine);
[551]	1906	*endofit = 0;
	1907	} while (li->list[x]);
	1908	if (li->type == IDM_EXTRACT \|\| li->type == IDM_EXTRACTWDIRS) {
	1909	/* update windows */
	1910	for (x = 0; li->list[x]; x++) {
[2]	1911
[551]	1912	CHAR temp, p;
[2]	1913
[551]	1914	temp = li->list[x];
	1915	p = temp;
	1916	while (*p) {
	1917	if (*p == '/')
	1918	*p = '\\';
	1919	p++;
	1920	}
[1017]	1921	p = xmalloc(strlen(temp) + strlen(li->targetpath) + 2,
	1922	pszSrcFile, __LINE__);
[1077]	1923	if (p) {
	1924	BldFullPathName(p, li->targetpath, temp);
[551]	1925	li->list[x] = p;
[1039]	1926	free(temp);
[551]	1927	}
	1928	}
	1929	if (fFolderAfterExtract) {
[2]	1930
[551]	1931	CHAR objectpath[CCHMAXPATH], *p;
	1932	APIRET rc;
[2]	1933
[551]	1934	GetDesktopName(objectpath, sizeof(objectpath));
	1935	rc = WinDlgBox(HWND_DESKTOP, dcd->hwndParent, ObjCnrDlgProc,
	1936	FM3ModHandle, OBJCNR_FRAME,
	1937	MPFROMP(objectpath));
	1938	if (rc) {
	1939	if (rc > 1)
	1940	strcpy(objectpath, "<WP_DESKTOP>");
	1941	p = NULL;
	1942	if (li->arcname) {
	1943	p = strrchr(li->arcname, '\\');
	1944	if (p)
	1945	p++;
	1946	}
	1947	MakeShadows(dcd->hwndParent, li->list, 2, objectpath, p);
	1948	}
	1949	}
	1950	Broadcast(WinQueryAnchorBlock(hwnd),
	1951	hwndMain,
	1952	UM_UPDATERECORDLIST, MPFROMP(li->list), MPVOID);
	1953	}
	1954	else if (li->type == IDM_EXEC)
	1955	ExecOnList(hwnd,
	1956	li->runfile,
	1957	WINDOWED \| SEPARATEKEEP \| PROMPT,
	1958	li->targetpath,
[907]	1959	NULL, GetPString(IDS_EXECARCFILETITLETEXT),
	1960	pszSrcFile, __LINE__);
[551]	1961	else if (li->type == IDM_VIRUSSCAN)
	1962	ExecOnList(hwnd, virus, PROMPT \| WINDOWED \| SEPARATEKEEP,
	1963	li->targetpath, NULL,
[907]	1964	GetPString(IDS_VIRUSSCANARCHIVETITLETEXT),
	1965	pszSrcFile, __LINE__);
[551]	1966	else if (li->type == IDM_VIEW \|\| li->type == IDM_VIEWTEXT \|\|
	1967	li->type == IDM_VIEWBINARY \|\| li->type == IDM_EDIT \|\|
	1968	li->type == IDM_EDITTEXT \|\|
	1969	li->type == IDM_VIEWARCHIVE \|\|
	1970	li->type == IDM_EDITBINARY \|\|
[1068]	1971	li->type == IDM_OPENDEFAULT \|\|
	1972	li->type == IDM_OPENSETTINGS \|\|
[551]	1973	li->type == IDM_MCIPLAY \|\| li->type == IDM_PRINT) {
[2]	1974
[551]	1975	CHAR temp, p;
	1976	for (x = 0; li->list[x]; x++) {
	1977	if (!li->info->exwdirs) {
	1978	temp = li->list[x];
	1979	p = strrchr(li->list[x], '\\');
	1980	if (p) {
	1981	p++;
	1982	li->list[x] = xstrdup(p, pszSrcFile, __LINE__);
	1983	if (!li->list[x])
	1984	li->list[x] = temp;
	1985	else {
[1032]	1986	xfree(temp, pszSrcFile, __LINE__);
[551]	1987	}
	1988	}
[1077]	1989	}
[1040]	1990	BldFullPathName(pszCmdLine, li->targetpath, li->list[x]);
[551]	1991	temp = li->list[x];
[1077]	1992	li->list[x] = xstrdup(pszCmdLine, pszSrcFile, __LINE__);
[551]	1993	if (!li->list[x])
	1994	li->list[x] = temp;
	1995	else
[1032]	1996	xfree(temp, pszSrcFile, __LINE__);
[1077]	1997	}
	1998	free(pszCmdLine);
[551]	1999	if (li->type == IDM_VIEW \|\| li->type == IDM_EDIT) {
[2]	2000
[551]	2001	BOOL isit = TestBinary(li->list[0]);
[2]	2002
[551]	2003	if (isit) {
	2004	if (li->type == IDM_VIEW)
	2005	li->type = IDM_VIEWBINARY;
	2006	else
	2007	li->type = IDM_EDITBINARY;
	2008	}
	2009	else {
	2010	if (li->type == IDM_VIEW)
	2011	li->type = IDM_VIEWTEXT;
	2012	else
	2013	li->type = IDM_EDITTEXT;
	2014	}
	2015	}
	2016	if (li->type == IDM_MCIPLAY) {
[2]	2017
[1077]	2018	FILE *fp;
	2019	CHAR szTempFile[CCHMAXPATH];
[2]	2020
[1077]	2021	BldFullPathName(szTempFile, pTmpDir, "$FM2PLAY.$$$");
[1073]	2022	fp = xfopen(szTempFile, "w", pszSrcFile, __LINE__);
[551]	2023	if (fp) {
	2024	fprintf(fp, "%s", ";AV/2-built FM2Play listfile\n");
	2025	for (x = 0; li->list[x]; x++)
	2026	fprintf(fp, "%s\n", li->list[x]);
	2027	fprintf(fp, ";end\n");
[1077]	2028	fclose(fp);
	2029	strrev(szTempFile);
	2030	strcat(szTempFile, "@/");
	2031	strrev(szTempFile);
[1073]	2032	RunFM2Util("FM2PLAY.EXE", szTempFile);
[762]	2033	}
[551]	2034	}
	2035	else if (li->type == IDM_PRINT) {
	2036	strcpy(li->targetpath, printer);
	2037	if (_beginthread(PrintListThread, NULL, 65536, (PVOID) li) !=
	2038	-1) {
	2039	Runtime_Error(pszSrcFile, __LINE__,
	2040	GetPString(IDS_COULDNTSTARTTHREADTEXT));
	2041	li = NULL;
	2042	}
	2043	}
	2044	else if (li->type == IDM_VIEWARCHIVE) {
[2]	2045
[551]	2046	ARC_TYPE *info;
[2]	2047
[551]	2048	for (x = 0; li->list[x]; x++) {
	2049	if (IsFile(li->list[x]) == 1) {
	2050	info = NULL; // Do not hide dups - fixme to know why?
	2051	if (WinDlgBox(HWND_DESKTOP, HWND_DESKTOP,
	2052	SBoxDlgProc, FM3ModHandle, ASEL_FRAME,
	2053	(PVOID) & info) && info) {
	2054	StartArcCnr(HWND_DESKTOP,
	2055	HWND_DESKTOP, li->list[x], 4, info);
	2056	}
	2057	}
	2058	}
	2059	}
	2060	else if ((li->type == IDM_VIEWTEXT && *viewer) \|\|
	2061	(li->type == IDM_VIEWBINARY && *binview) \|\|
	2062	(li->type == IDM_EDITTEXT && *editor) \|\|
	2063	(li->type == IDM_EDITBINARY && *bined)) {
[814]	2064	DosSleep(32); //05 Aug 07 GKY 100
[551]	2065	ExecOnList(hwnd, ((li->type == IDM_VIEWTEXT) ? viewer :
	2066	(li->type == IDM_VIEWBINARY) ? binview :
	2067	(li->type == IDM_EDITTEXT) ? editor :
	2068	bined),
	2069	WINDOWED \| SEPARATE, li->targetpath, li->list,
[888]	2070	NULL, pszSrcFile, __LINE__);
[551]	2071	}
[1068]	2072	else if (li->type == IDM_OPENDEFAULT \|\|
	2073	li->type == IDM_OPENSETTINGS) {
	2074	WORKER *wk;
[1077]	2075	# ifdef FORTIFY
	2076	Fortify_EnterScope();
	2077	# endif
[1068]	2078	wk = xmallocz(sizeof(WORKER), pszSrcFile, __LINE__);
	2079	if (!wk)
[1077]	2080	FreeListInfo(li);
[1068]	2081	else {
[1077]	2082	wk->size = sizeof(WORKER);
	2083	wk->hwndCnr = dcd->hwndCnr;
	2084	wk->hwndParent = dcd->hwndParent;
	2085	wk->hwndFrame = dcd->hwndFrame;
	2086	wk->hwndClient = dcd->hwndClient;
	2087	wk->li = li;
	2088	strcpy(wk->directory, dcd->directory);
	2089	if (_beginthread(Action, NULL, 122880, (PVOID) wk) == -1) {
	2090	Runtime_Error(pszSrcFile, __LINE__,
	2091	GetPString(IDS_COULDNTSTARTTHREADTEXT));
	2092	free(wk);
	2093	FreeListInfo((LISTINFO *) mp1);
	2094	}
	2095	}
	2096	# ifdef FORTIFY
	2097	Fortify_LeaveScope();
	2098	# endif
[1068]	2099	}
[551]	2100	else {
	2101	if (li->hwnd) {
[2]	2102
[551]	2103	ULONG viewtype;
[2]	2104
[551]	2105	for (x = 0; li->list[x]; x++) {
	2106	if (x == 0) {
	2107	if (li->type == IDM_VIEWBINARY \|\|
	2108	li->type == IDM_EDITBINARY)
	2109	viewtype = 16;
	2110	else
	2111	viewtype = 8;
	2112	}
	2113	else
	2114	viewtype = 0;
[1077]	2115	# ifdef FORTIFY
	2116	Fortify_EnterScope();
	2117	# endif
[551]	2118	temp = xstrdup(li->list[x], pszSrcFile, __LINE__);
	2119	if (temp) {
	2120	if (!PostMsg(WinQueryWindow(li->hwnd, QW_PARENT),
	2121	UM_LOADFILE,
	2122	MPFROMLONG(4L +
	2123	(li->type == IDM_VIEWTEXT \|\|
	2124	li->type == IDM_VIEWBINARY) +
	2125	viewtype), MPFROMP(temp)))
	2126	free(temp);
	2127	}
[1077]	2128	# ifdef FORTIFY
	2129	DosSleep(1); // Allow MassAction to take ownership
	2130	Fortify_LeaveScope();
	2131	# endif
[551]	2132	}
	2133	}
	2134	}
	2135	}
	2136	}
	2137	break;
[2]	2138
[551]	2139	case IDM_FIND:
	2140	{
[907]	2141	UINT numfiles = 0, numalloced = 0;
[551]	2142	CHAR *list2 = NULL, fullname[CCHMAXPATH 2], *p;
[2]	2143
[551]	2144	for (x = 0; li->list[x]; x++) {
	2145	p = li->list[x];
	2146	while (*p) {
	2147	if (*p == '/')
	2148	*p = '\\';
	2149	p++;
	2150	}
[773]	2151	BldFullPathName(fullname, dcd->directory, li->list[x]);
[551]	2152	if (IsFile(fullname) != -1)
	2153	if (AddToList(fullname, &list2, &numfiles, &numalloced))
	2154	break;
	2155	if (strchr(li->list[x], '\\')) {
	2156	p = strrchr(li->list[x], '\\');
	2157	if (p) {
	2158	p++;
	2159	if (*p) {
[773]	2160	BldFullPathName(fullname, dcd->directory, p);
[551]	2161	if (IsFile(fullname) != -1)
	2162	if (AddToList(fullname, &list2, &numfiles, &numalloced))
	2163	break;
	2164	}
	2165	}
	2166	}
	2167	}
	2168	if (!numfiles \|\| !list2)
	2169	Runtime_Error(pszSrcFile, __LINE__, "no files or list");
	2170	else {
	2171	WinSendMsg(dcd->hwndCnr, WM_COMMAND,
	2172	MPFROM2SHORT(IDM_COLLECTOR, 0), MPVOID);
[814]	2173	DosSleep(10); //05 Aug 07 GKY 128
[551]	2174	if (Collector) {
	2175	if (!PostMsg(Collector, WM_COMMAND,
	2176	MPFROM2SHORT(IDM_COLLECTOR, 0), MPFROMP(list2)))
	2177	FreeList(list2);
	2178	}
	2179	else
	2180	FreeList(list2);
	2181	}
	2182	}
	2183	break;
	2184	}
[2]	2185	}
[1068]	2186	if (li->type != IDM_OPENDEFAULT && li->type != IDM_OPENSETTINGS)
	2187	{
[1077]	2188	FreeListInfo(li);
[1068]	2189	}
[551]	2190	}
	2191	return 0;
[2]	2192
[551]	2193	case WM_CLOSE:
	2194	WinDestroyWindow(hwnd);
	2195	break;
[2]	2196
[551]	2197	case WM_DESTROY:
	2198	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	2199	if (dcd) {
	2200	if (*dcd->workdir) {
[771]	2201	DosSleep(16); //05 Aug 07 GKY 33
[551]	2202	wipeallf("%s\\*", dcd->workdir);
	2203	if (rmdir(dcd->workdir)) {
[771]	2204	DosSleep(100); //05 Aug 07 GKY 256
[551]	2205	wipeallf("%s\\*", dcd->workdir);
	2206	rmdir(dcd->workdir);
	2207	}
[2]	2208	}
[551]	2209	FreeList(dcd->lastselection);
	2210	WinSendMsg(dcd->hwndCnr, UM_CLOSE, MPVOID, MPVOID);
[1039]	2211	free(dcd);
[1063]	2212	# ifdef FORTIFY
[1077]	2213	Fortify_LeaveScope();
	2214	# endif
[551]	2215	WinSetWindowPtr(dcd->hwndCnr, QWL_USER, NULL);
	2216	}
	2217	if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
	2218	WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID);
	2219	break;
	2220	} // switch
	2221	return WinDefWindowProc(hwnd, msg, mp1, mp2);
[2]	2222	}
	2223
[551]	2224	static MRESULT EXPENTRY ArcCnrWndProc(HWND hwnd, ULONG msg, MPARAM mp1,
	2225	MPARAM mp2)
[172]	2226	{
[672]	2227	DIRCNRDATA *dcd = INSTDATA(hwnd);
[773]	2228	CHAR szQuotedArcName[CCHMAXPATH];
[2]	2229
[551]	2230	switch (msg) {
	2231	case DM_PRINTOBJECT:
	2232	case DM_DISCARDOBJECT:
	2233	if (dcd)
	2234	return WinSendMsg(dcd->hwndObject, msg, mp1, mp2);
	2235	else
	2236	return MRFROMLONG(DRR_TARGET);
[2]	2237
[551]	2238	case WM_CHAR:
	2239	shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
	2240	if (SHORT1FROMMP(mp1) & KC_KEYUP)
	2241	return (MRESULT) TRUE;
	2242	if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) {
	2243	switch (SHORT2FROMMP(mp2)) {
	2244	case VK_DELETE:
	2245	PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_DELETE, 0), MPVOID);
	2246	break;
[2]	2247	}
[551]	2248	}
	2249	if (shiftstate \|\| fNoSearch)
	2250	break;
	2251	if (SHORT1FROMMP(mp1) & KC_CHAR) {
[2]	2252
[551]	2253	ULONG thistime, len;
	2254	SEARCHSTRING srch;
	2255	PCNRITEM pci;
[2]	2256
[551]	2257	if (!dcd)
	2258	break;
	2259	switch (SHORT1FROMMP(mp2)) {
	2260	case '\x1b':
	2261	case '\r':
	2262	case '\n':
	2263	dcd->lasttime = 0;
	2264	*dcd->szCommonName = 0;
	2265	break;
	2266	default:
	2267	thistime = WinQueryMsgTime(WinQueryAnchorBlock(hwnd));
	2268	if (thistime > dcd->lasttime + 1250)
	2269	*dcd->szCommonName = 0;
	2270	dcd->lasttime = thistime;
	2271	if (SHORT1FROMMP(mp2) == ' ' && !*dcd->szCommonName)
	2272	break;
	2273	KbdRetry:
	2274	len = strlen(dcd->szCommonName);
	2275	if (len >= CCHMAXPATH - 1) {
	2276	*dcd->szCommonName = 0;
	2277	len = 0;
	2278	}
	2279	dcd->szCommonName[len] = toupper(SHORT1FROMMP(mp2));
	2280	dcd->szCommonName[len + 1] = 0;
	2281	memset(&srch, 0, sizeof(SEARCHSTRING));
	2282	srch.cb = (ULONG) sizeof(SEARCHSTRING);
	2283	srch.pszSearch = dcd->szCommonName;
	2284	srch.fsPrefix = TRUE;
	2285	srch.fsCaseSensitive = FALSE;
	2286	srch.usView = CV_ICON;
	2287	pci = WinSendMsg(hwnd,
	2288	CM_SEARCHSTRING,
	2289	MPFROMP(&srch), MPFROMLONG(CMA_FIRST));
[1120]	2290	if (pci && (INT) pci != -1) {
[2]	2291
[1120]	2292	USHORT attrib = CRA_CURSORED;
[2]	2293
[1120]	2294
[551]	2295	/* make found item current item */
	2296	if (!stricmp(pci->pszFileName, dcd->szCommonName))
	2297	attrib \|= CRA_SELECTED;
	2298	WinSendMsg(hwnd,
	2299	CM_SETRECORDEMPHASIS,
	2300	MPFROMP(pci), MPFROM2SHORT(TRUE, attrib));
	2301	/* make sure that record shows in viewport */
	2302	ShowCnrRecord(hwnd, (PMINIRECORDCORE) pci);
	2303	return (MRESULT) TRUE;
	2304	}
	2305	else {
	2306	if (SHORT1FROMMP(mp2) == ' ') {
	2307	dcd->szCommonName[len] = 0;
	2308	break;
	2309	}
	2310	*dcd->szCommonName = 0;
	2311	dcd->lasttime = 0;
	2312	if (len) // retry as first letter if no match
	2313	goto KbdRetry;
	2314	}
	2315	break;
[2]	2316	}
[551]	2317	}
	2318	break;
[2]	2319
[551]	2320	case WM_MOUSEMOVE:
	2321	case WM_BUTTON1UP:
	2322	case WM_BUTTON2UP:
	2323	case WM_BUTTON3UP:
	2324	case WM_CHORD:
	2325	shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT \| KC_ALT \| KC_CTRL));
	2326	break;
[2]	2327
[551]	2328	case WM_BUTTON1MOTIONEND:
	2329	{
	2330	CNRINFO cnri;
[2]	2331
[551]	2332	memset(&cnri, 0, sizeof(CNRINFO));
	2333	cnri.cb = sizeof(CNRINFO);
	2334	if (WinSendMsg(hwnd,
	2335	CM_QUERYCNRINFO,
	2336	MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO)))) {
	2337	if (cnri.flWindowAttr & CV_DETAIL)
	2338	PrfWriteProfileData(fmprof,
	2339	appname,
	2340	"ArcCnrSplitBar",
	2341	(PVOID) & cnri.xVertSplitbar, sizeof(LONG));
[2]	2342	}
[551]	2343	}
	2344	break;
[2]	2345
[551]	2346	case WM_PRESPARAMCHANGED:
	2347	PresParamChanged(hwnd, "ArcCnr", mp1, mp2);
	2348	break;
[2]	2349
[551]	2350	case UM_UPDATERECORD:
	2351	case UM_UPDATERECORDLIST:
	2352	if (dcd && !IsArcThere(hwnd, dcd->arcname))
	2353	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	2354	return 0;
[2]	2355
[551]	2356	case WM_SETFOCUS:
	2357	/*
	2358	* put name of our window (archive name) on status line
	2359	*/
	2360	if (dcd && hwndStatus && mp2)
	2361	WinSendMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
	2362	break;
[2]	2363
[551]	2364	case UM_SETUP2:
	2365	if (dcd && dcd->info) {
	2366	if (dcd->info->fdpos == -1 \|\| !dcd->info->datetype)
	2367	dcd->sortFlags &= (~SORT_LWDATE);
	2368	if (dcd->info->nsizepos == -1)
	2369	dcd->sortFlags &= (~SORT_EASIZE);
	2370	if (dcd->info->osizepos == -1)
	2371	dcd->sortFlags &= (~SORT_SIZE);
	2372	AdjustCnrColVis(hwnd,
	2373	GetPString(IDS_OLDSIZECOLTEXT),
	2374	dcd->info->osizepos != -1, FALSE);
	2375	AdjustCnrColVis(hwnd,
	2376	GetPString(IDS_NEWSIZECOLTEXT),
	2377	dcd->info->nsizepos != -1, FALSE);
	2378	// Display unsullied date/time string if type 0
	2379	AdjustCnrColVis(hwnd,
	2380	GetPString(IDS_DATETIMECOLTEXT),
	2381	dcd->info->fdpos != -1 && !dcd->info->datetype, FALSE);
	2382	// Display parsed date/time columns if type specified
	2383	AdjustCnrColVis(hwnd,
	2384	GetPString(IDS_TIMECOLTEXT),
	2385	dcd->info->fdpos != -1 && dcd->info->datetype, FALSE);
	2386	AdjustCnrColVis(hwnd,
	2387	GetPString(IDS_DATECOLTEXT),
	2388	dcd->info->fdpos != -1 && dcd->info->datetype, FALSE);
	2389	WinSendMsg(hwnd, CM_INVALIDATEDETAILFIELDINFO, MPVOID, MPVOID);
	2390	}
	2391	return 0;
[2]	2392
[551]	2393	case UM_RESCAN:
	2394	if (dcd) {
	2395	CNRINFO cnri;
	2396	CHAR s[CCHMAXPATH * 2], tb[81], tf[81];
	2397	PARCITEM pci;
[2]	2398
[551]	2399	if (mp1) {
	2400	PostMsg(dcd->hwndObject, UM_RESCAN, MPVOID, MPVOID);
	2401	return 0;
	2402	}
	2403	memset(&cnri, 0, sizeof(CNRINFO));
	2404	cnri.cb = sizeof(CNRINFO);
	2405	WinSendMsg(hwnd,
	2406	CM_QUERYCNRINFO,
	2407	MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO)));
	2408	dcd->totalfiles = cnri.cRecords;
	2409	commafmt(tf, sizeof(tf), dcd->selectedfiles);
	2410	if (dcd->ullTotalBytes)
	2411	CommaFmtULL(tb, sizeof(tb), dcd->selectedbytes, 'K');
	2412	else
	2413	*tb = 0;
	2414	sprintf(s, "%s%s%s", tf, *tb ? " / " : NullStr, tb);
	2415	WinSetDlgItemText(dcd->hwndClient, DIR_SELECTED, s);
	2416	commafmt(tf, sizeof(tf), dcd->totalfiles);
	2417	if (dcd->ullTotalBytes)
	2418	CommaFmtULL(tb, sizeof(tb), dcd->ullTotalBytes, 'K');
	2419	else
	2420	*tb = 0;
	2421	sprintf(s, "%s%s%s", tf, *tb ? " / " : NullStr, tb);
	2422	WinSetDlgItemText(dcd->hwndClient, DIR_TOTALS, s);
	2423	if (hwndStatus &&
	2424	dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) {
	2425	sprintf(s, " [%s%s%s]%s%s%s %s",
	2426	tf,
[156]	2427	*tb ? " / " : NullStr,
[551]	2428	tb,
[562]	2429	*dcd->mask.szMask ? " (" : NullStr,
	2430	*dcd->mask.szMask ? dcd->mask.szMask : NullStr,
	2431	*dcd->mask.szMask ? ")" : NullStr, dcd->arcname);
[551]	2432	WinSetWindowText(hwndStatus, s);
	2433	if (!ParentIsDesktop(hwnd, dcd->hwndParent)) {
	2434	pci = WinSendMsg(hwnd,
	2435	CM_QUERYRECORDEMPHASIS,
	2436	MPFROMLONG(CMA_FIRST), MPFROMSHORT(CRA_CURSORED));
[1120]	2437	if (pci && (INT) pci != -1) {
[551]	2438	if (fSplitStatus && hwndStatus2) {
	2439	if (dcd->ullTotalBytes)
	2440	CommaFmtULL(tb, sizeof(tb), pci->cbFile, ' ');
	2441	else
	2442	*tb = 0;
	2443	sprintf(s, "%s%s%s%s",
	2444	*tb ? " " : NullStr,
[730]	2445	tb, *tb ? " " : NullStr, pci->pszFileName);
[551]	2446	WinSetWindowText(hwndStatus2, s);
	2447	}
	2448	if (fMoreButtons)
[730]	2449	WinSetWindowText(hwndName, pci->pszFileName);
[551]	2450	}
	2451	else {
	2452	WinSetWindowText(hwndStatus2, NullStr);
	2453	WinSetWindowText(hwndName, NullStr);
	2454	}
	2455	WinSetWindowText(hwndDate, NullStr);
	2456	WinSetWindowText(hwndAttr, NullStr);
	2457	}
[2]	2458	}
[563]	2459	if ((dcd->arcfilled && !dcd->totalfiles) \|\|
[762]	2460	!IsArcThere(hwnd, dcd->arcname))
[551]	2461	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	2462	}
	2463	return 0;
	2464
	2465	case UM_SETUP:
	2466	if (!dcd) {
	2467	Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT);
	2468	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
[2]	2469	return 0;
[551]	2470	}
	2471	else {
	2472	if (!dcd->hwndObject) {
	2473	/*
	2474	* first time through -- set things up
	2475	*/
	2476	{
	2477	CHAR p, pp;
	2478	ULONG z, was;
	2479	APIRET rc;
[2]	2480
[551]	2481	rc = DosCreateDir(dcd->workdir, 0);
	2482	if (rc) {
	2483	if (rc == ERROR_ACCESS_DENIED) {
	2484	p = strrchr(dcd->workdir, '.');
	2485	if (p) {
	2486	p++;
	2487	pp = p;
	2488	was = strtoul(p, &pp, 16);
	2489	for (z = 0; z < 99; z++) {
	2490	was++;
	2491	sprintf(p, "%03x");
	2492	rc = DosCreateDir(dcd->workdir, 0);
	2493	if (!rc \|\| rc != ERROR_ACCESS_DENIED)
	2494	break;
	2495	}
	2496	}
	2497	}
	2498	if (rc)
	2499	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	2500	return 0;
	2501	}
	2502	}
	2503	RestorePresParams(hwnd, "ArcCnr");
	2504	dcd->mask.fNoAttribs = TRUE;
	2505	dcd->mask.fNoDirs = TRUE;
	2506	*dcd->mask.prompt = 0;
	2507	{
	2508	PFIELDINFO pfi, pfiLastLeftCol;
	2509	ULONG numcols = CON_COLS;
	2510	CNRINFO cnri;
	2511	ULONG size;
[2]	2512
[551]	2513	pfi = WinSendMsg(hwnd,
	2514	CM_ALLOCDETAILFIELDINFO,
	2515	MPFROMLONG(numcols), NULL);
	2516	if (pfi) {
[2]	2517
[551]	2518	PFIELDINFO pfiFirst;
	2519	FIELDINFOINSERT fii;
[2]	2520
[551]	2521	pfiFirst = pfi;
	2522	pfi->flData = CFA_STRING \| CFA_LEFT \| CFA_FIREADONLY;
	2523	pfi->flTitle = CFA_CENTER;
	2524	pfi->pTitleData = GetPString(IDS_FILENAMECOLTEXT);
[739]	2525	pfi->offStruct = FIELDOFFSET(ARCITEM, pszDisplayName);
[551]	2526	pfiLastLeftCol = pfi;
	2527	pfi = pfi->pNextFieldInfo;
	2528	pfi->flData =
	2529	CFA_ULONG \| CFA_RIGHT \| CFA_SEPARATOR \| CFA_FIREADONLY;
	2530	pfi->flTitle = CFA_CENTER;
	2531	pfi->pTitleData = GetPString(IDS_OLDSIZECOLTEXT);
	2532	pfi->offStruct = FIELDOFFSET(ARCITEM, cbFile);
	2533	pfi = pfi->pNextFieldInfo;
	2534	pfi->flData =
	2535	CFA_ULONG \| CFA_RIGHT \| CFA_SEPARATOR \| CFA_FIREADONLY;
	2536	pfi->flTitle = CFA_CENTER;
	2537	pfi->pTitleData = GetPString(IDS_NEWSIZECOLTEXT);
	2538	pfi->offStruct = FIELDOFFSET(ARCITEM, cbComp);
	2539	pfi = pfi->pNextFieldInfo;
	2540	pfi->flData =
	2541	CFA_STRING \| CFA_CENTER \| CFA_SEPARATOR \| CFA_FIREADONLY;
	2542	pfi->flTitle = CFA_CENTER \| CFA_FITITLEREADONLY;
	2543	pfi->pTitleData = GetPString(IDS_DATETIMECOLTEXT);
	2544	pfi->offStruct = FIELDOFFSET(ARCITEM, pszDate);
	2545	pfi = pfi->pNextFieldInfo;
	2546	pfi->flData = CFA_DATE \| CFA_RIGHT \| CFA_FIREADONLY;
	2547	pfi->flTitle = CFA_CENTER;
	2548	pfi->pTitleData = GetPString(IDS_DATECOLTEXT);
	2549	pfi->offStruct = FIELDOFFSET(ARCITEM, date);
	2550	pfi = pfi->pNextFieldInfo;
	2551	pfi->flData = CFA_TIME \| CFA_RIGHT \| CFA_FIREADONLY;
	2552	pfi->flTitle = CFA_CENTER \| CFA_FITITLEREADONLY;
	2553	pfi->pTitleData = GetPString(IDS_TIMECOLTEXT);
	2554	pfi->offStruct = FIELDOFFSET(ARCITEM, time);
	2555	memset(&fii, 0, sizeof(FIELDINFOINSERT));
	2556	fii.cb = sizeof(FIELDINFOINSERT);
	2557	fii.pFieldInfoOrder = (PFIELDINFO) CMA_FIRST;
	2558	fii.cFieldInfoInsert = (SHORT) numcols;
	2559	fii.fInvalidateFieldInfo = TRUE;
	2560	WinSendMsg(hwnd,
	2561	CM_INSERTDETAILFIELDINFO,
	2562	MPFROMP(pfiFirst), MPFROMP(&fii));
	2563	PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);
[2]	2564
[551]	2565	memset(&cnri, 0, sizeof(cnri));
	2566	cnri.cb = sizeof(CNRINFO);
	2567	cnri.pFieldInfoLast = pfiLastLeftCol;
	2568	cnri.xVertSplitbar = DIR_SPLITBAR_OFFSET + 32;
[2]	2569
[551]	2570	size = sizeof(LONG);
	2571	PrfQueryProfileData(fmprof, appname, "ArcCnrSplitBar",
	2572	&cnri.xVertSplitbar, &size);
	2573	if (cnri.xVertSplitbar <= 0)
	2574	cnri.xVertSplitbar = DIR_SPLITBAR_OFFSET + 32;
[2]	2575
[551]	2576	cnri.flWindowAttr &= (~(CV_ICON \| CV_TREE \| CV_TEXT \| CV_NAME));
	2577	cnri.flWindowAttr \|= (CV_DETAIL \| CA_DETAILSVIEWTITLES \| CV_FLOW);
	2578	cnri.flWindowAttr &= (~(CA_ORDEREDTARGETEMPH \|
	2579	CA_MIXEDTARGETEMPH));
	2580	cnri.pSortRecord = (PVOID) ArcSort;
	2581	WinSendMsg(hwnd,
	2582	CM_SETCNRINFO,
	2583	MPFROMP(&cnri),
	2584	MPFROMLONG(CMA_PFIELDINFOLAST \|
	2585	CMA_XVERTSPLITBAR \|
	2586	CMA_PSORTRECORD \| CMA_FLWINDOWATTR));
	2587	}
	2588	}
	2589	WinSendMsg(hwnd, CM_SORTRECORD, MPFROMP(ArcSort), MPFROMP(dcd));
	2590	if (_beginthread(MakeObjWin, NULL, 245760, (PVOID) dcd) == -1) {
	2591	Runtime_Error(pszSrcFile, __LINE__,
	2592	GetPString(IDS_COULDNTSTARTTHREADTEXT));
	2593	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	2594	return 0;
	2595	}
	2596	else
[766]	2597	DosSleep(1);
[551]	2598	SayFilter(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	2599	DIR_FILTER), &dcd->mask, TRUE);
	2600	SaySort(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	2601	DIR_SORT), dcd->sortFlags, TRUE);
	2602	DefArcSortFlags = dcd->sortFlags; // Remember for new windows
[2]	2603	}
[551]	2604	}
	2605	return 0;
[2]	2606
[551]	2607	case UM_SETDIR:
	2608	if (dcd) {
[2]	2609
[551]	2610	CHAR s[CCHMAXPATH], *p;
	2611	ULONG ret = 0;
[2]	2612
[551]	2613	WinQueryDlgItemText(dcd->hwndClient, ARC_EXTRACTDIR, CCHMAXPATH, s);
	2614	bstrip(s);
	2615	MakeFullName(s);
	2616	if (*s) {
	2617	while ((p = strchr(s, '/')) != NULL)
	2618	*p = '\\';
	2619	while (strlen(s) > 3 && s[strlen(s) - 1] == '\\')
	2620	s[strlen(s) - 1] = 0;
	2621	if (stricmp(s, dcd->directory)) {
	2622	if (IsFullName(s)) {
	2623	if (driveflags[toupper(*s) - 'A'] &
	2624	(DRIVE_NOTWRITEABLE \| DRIVE_IGNORE \| DRIVE_INVALID)) {
	2625	Runtime_Error(pszSrcFile, __LINE__, "drive %s bad", s);
	2626	WinSetDlgItemText(dcd->hwndClient,
	2627	ARC_EXTRACTDIR, dcd->directory);
	2628	return 0;
	2629	}
	2630	}
	2631	if (!SetDir(dcd->hwndParent, hwnd, s, 0)) {
	2632	if (stricmp(dcd->directory, s)) {
[1301]	2633	//DosEnterCritSec(); //GKY 11-29-08
	2634	DosRequestMutexSem(hmtxFM2Globals, SEM_INDEFINITE_WAIT);
	2635	strcpy(lastextractpath, s);
	2636	DosReleaseMutexSem(hmtxFM2Globals);
	2637	//DosExitCritSec();
[551]	2638	}
	2639	strcpy(dcd->directory, s);
	2640	if ((!isalpha(s) \|\| s[1] != ':') && s != '.')
	2641	saymsg(MB_ENTER \| MB_ICONASTERISK,
	2642	hwnd,
	2643	GetPString(IDS_WARNINGTEXT),
	2644	GetPString(IDS_SPECIFYDRIVETEXT));
	2645	}
	2646	else
	2647	ret = 1;
	2648	}
[2]	2649	}
[551]	2650	WinSetDlgItemText(dcd->hwndClient, ARC_EXTRACTDIR, dcd->directory);
	2651	return (MRESULT) ret;
	2652	}
	2653	return 0;
	2654
	2655	case UM_ENTER:
[1268]	2656	if (WinSendMsg(hwnd, UM_SETDIR, MPVOID, MPVOID)) {
	2657	free(mp1);
[2]	2658	return 0;
[1268]	2659	}
[551]	2660	SetShiftState();
	2661	if (dcd && (CHAR *) mp1) {
[2]	2662
[551]	2663	SWP swp;
	2664	CHAR *filename = mp1;
[1268]	2665	printf("%s %d UM_ENTER %s\n",__FILE__, __LINE__, filename); fflush(stdout);
	2666	if (IsFile(filename) != 1) {
	2667	free(mp1);
	2668	return 0;
	2669	}
[551]	2670	WinQueryWindowPos(dcd->hwndFrame, &swp);
	2671	DefaultViewKeys(hwnd, dcd->hwndFrame, dcd->hwndParent, &swp, filename);
	2672	if (fUnHilite)
[672]	2673	UnHilite(hwnd, FALSE, &dcd->lastselection, 0);
[551]	2674	}
[1268]	2675	free(mp1);
[551]	2676	return 0;
[2]	2677
[551]	2678	case WM_MENUEND:
	2679	if (dcd) {
[2]	2680
[551]	2681	HWND hwndMenu = (HWND) mp2;
[2]	2682
[551]	2683	if (hwndMenu == ArcCnrMenu \|\| hwndMenu == ArcMenu) {
	2684	MarkAll(hwnd, TRUE, FALSE, TRUE);
	2685	if (dcd->cnremphasized) {
	2686	WinSendMsg(hwnd,
	2687	CM_SETRECORDEMPHASIS,
	2688	MPVOID, MPFROM2SHORT(FALSE, CRA_SOURCE));
	2689	dcd->cnremphasized = FALSE;
	2690	}
[2]	2691	}
[551]	2692	}
	2693	break;
[2]	2694
[551]	2695	case MM_PORTHOLEINIT:
	2696	if (dcd) {
	2697	switch (SHORT1FROMMP(mp1)) {
	2698	case 0:
	2699	case 1:
	2700	{
	2701	ULONG wmsg;
[2]	2702
[562]	2703	wmsg = SHORT1FROMMP(mp1) == 0 ? UM_FILESMENU : UM_VIEWSMENU;
[551]	2704	PortholeInit((HWND) WinSendMsg(dcd->hwndClient,
	2705	wmsg, MPVOID, MPVOID), mp1, mp2);
	2706	}
	2707	break;
[2]	2708	}
[551]	2709	}
	2710	break;
[2]	2711
[551]	2712	case UM_INITMENU:
	2713	case WM_INITMENU:
	2714	if (dcd) {
	2715	switch (SHORT1FROMMP(mp1)) {
	2716	case IDM_FILESMENU:
	2717	if (dcd->info) {
	2718	WinEnableMenuItem((HWND) mp2,
	2719	IDM_DELETE, dcd->info->delete != NULL);
	2720	WinEnableMenuItem((HWND) mp2, IDM_TEST, dcd->info->test != NULL);
	2721	WinEnableMenuItem((HWND) mp2,
	2722	IDM_EXTRACT, dcd->info->extract != NULL);
	2723	WinEnableMenuItem((HWND) mp2,
	2724	IDM_EXTRACTWDIRS, dcd->info->exwdirs != NULL);
	2725	WinEnableMenuItem((HWND) mp2,
	2726	IDM_ARCEXTRACTWDIRS, dcd->info->exwdirs != NULL);
	2727	WinEnableMenuItem((HWND) mp2,
	2728	IDM_ARCEXTRACTWDIRSEXIT,
	2729	dcd->info->exwdirs != NULL);
	2730	}
	2731	break;
[2]	2732
[551]	2733	case IDM_VIEWSMENU:
	2734	WinCheckMenuItem((HWND) mp2,
[562]	2735	IDM_MINIICONS, (dcd->flWindowAttr & CV_MINI) != 0);
[551]	2736	WinEnableMenuItem((HWND) mp2,
	2737	IDM_RESELECT, (dcd->lastselection != NULL));
	2738	break;
[2]	2739
[551]	2740	case IDM_COMMANDSMENU:
	2741	SetupCommandMenu((HWND) mp2, hwnd);
	2742	break;
[2]	2743
[551]	2744	case IDM_SORTSUBMENU:
	2745	SetSortChecks((HWND) mp2, dcd->sortFlags);
	2746	break;
[2]	2747
[551]	2748	case IDM_WINDOWSMENU:
	2749	/*
	2750	* add switchlist entries to end of pulldown menu
	2751	*/
[562]	2752	SetupWinList((HWND)mp2,
	2753	hwndMain ? hwndMain : (HWND)0, dcd->hwndFrame);
[551]	2754	break;
[2]	2755	}
[551]	2756	dcd->hwndLastMenu = (HWND) mp2;
	2757	}
	2758	if (msg == WM_INITMENU)
	2759	break;
	2760	return 0;
[2]	2761
[551]	2762	case UM_LOADFILE:
	2763	if (dcd && mp2) {
[2]	2764
[1037]	2765	HWND hwnd;
[2]	2766
[1037]	2767	if ((INT)mp1 == 5 \|\| (INT)mp1 == 13 \|\| (INT)mp1 == 21)
[1077]	2768	hwnd = StartViewer(HWND_DESKTOP, (INT)mp1,
	2769	(CHAR *)mp2, dcd->hwndFrame);
[1037]	2770	else
[1077]	2771	hwnd = StartMLEEditor(dcd->hwndParent,
	2772	(INT)mp1, (CHAR *)mp2, dcd->hwndFrame);
[1039]	2773	free((CHAR *)mp2);
[1037]	2774	return MRFROMLONG(hwnd);
[551]	2775	}
	2776	return 0;
	2777
	2778	case UM_COMMAND:
	2779	if (mp1) {
	2780	if (dcd) {
	2781	if (!PostMsg(dcd->hwndObject, UM_COMMAND, mp1, mp2)) {
	2782	Runtime_Error(pszSrcFile, __LINE__, "post");
	2783	FreeListInfo((LISTINFO *) mp1);
	2784	}
	2785	else
	2786	return (MRESULT) TRUE;
[2]	2787	}
[551]	2788	else
	2789	FreeListInfo((LISTINFO *) mp1);
	2790	}
	2791	return 0;
[2]	2792
[551]	2793	case UM_OPENWINDOWFORME:
	2794	if (dcd) {
	2795	if (mp1 && !IsFile((CHAR *) mp1)) {
	2796	OpenDirCnr((HWND) 0, hwndMain, dcd->hwndFrame, FALSE, (char *)mp1);
[2]	2797	}
[1120]	2798	else if (mp1 && IsFile(mp1) == 1 &&
	2799	CheckDriveSpaceAvail(ArcTempRoot, ullDATFileSpaceNeeded, ullTmpSpaceNeeded) != 2) {
[551]	2800	StartArcCnr(HWND_DESKTOP,
	2801	dcd->hwndFrame, (CHAR ) mp1, 4, (ARC_TYPE ) mp2);
	2802	}
	2803	}
	2804	return 0;
[2]	2805
[551]	2806	case WM_COMMAND:
	2807	DosError(FERR_DISABLEHARDERR);
	2808	if (dcd) {
	2809	if (SwitchCommand(dcd->hwndLastMenu, SHORT1FROMMP(mp1)))
	2810	return 0;
	2811	if (WinSendMsg(hwnd, UM_SETDIR, MPVOID, MPVOID))
	2812	return 0;
	2813	if (!IsArcThere(hwnd, dcd->arcname)) {
	2814	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	2815	return 0;
[2]	2816	}
[551]	2817	switch (SHORT1FROMMP(mp1)) {
	2818	case IDM_TREEVIEW:
[2]	2819
[551]	2820	break;
[2]	2821
[551]	2822	case IDM_CONTEXTMENU:
	2823	{
	2824	PCNRITEM pci;
[2]	2825
[551]	2826	pci = (PCNRITEM) CurrentRecord(hwnd);
	2827	PostMsg(hwnd,
	2828	WM_CONTROL,
	2829	MPFROM2SHORT(ARC_CNR, CN_CONTEXTMENU), MPFROMP(pci));
	2830	}
	2831	break;
[2]	2832
[551]	2833	case IDM_NEXTWINDOW:
	2834	case IDM_PREVWINDOW:
	2835	{
	2836	HWND hwndActive;
[2]	2837
[551]	2838	hwndActive = WinQueryFocus(HWND_DESKTOP);
	2839	WinSetFocus(HWND_DESKTOP,
[563]	2840	hwndActive == hwnd ?
[762]	2841	WinWindowFromID(dcd->hwndClient, ARC_EXTRACTDIR) :
	2842	hwnd);
[551]	2843	}
	2844	break;
[2]	2845
[551]	2846	case IDM_FOLDERAFTEREXTRACT:
[562]	2847	fFolderAfterExtract = fFolderAfterExtract ? FALSE : TRUE;
[551]	2848	PrfWriteProfileData(fmprof, appname, "FolderAfterExtract",
	2849	&fFolderAfterExtract, sizeof(BOOL));
	2850	break;
[2]	2851
[551]	2852	case IDM_SHOWSELECT:
[872]	2853	QuickPopup(hwnd, dcd, CheckMenu(hwnd, &ArcCnrMenu, ARCCNR_POPUP),
[551]	2854	IDM_SELECTSUBMENU);
	2855	break;
[2]	2856
[551]	2857	case IDM_SHOWSORT:
[872]	2858	QuickPopup(hwnd, dcd, CheckMenu(hwnd, &ArcCnrMenu, ARCCNR_POPUP),
[551]	2859	IDM_SORTSUBMENU);
	2860	break;
[2]	2861
[953]	2862	case IDM_ARCHIVERSETTINGS:
[551]	2863	if (!ParentIsDesktop(dcd->hwndParent, dcd->hwndParent))
[917]	2864	PostMsg(dcd->hwndParent, msg, MPFROMLONG(IDM_ARCHIVERSETTINGS), mp2);
	2865	else {
[551]	2866	WinDlgBox(HWND_DESKTOP,
	2867	hwnd,
[917]	2868	CfgDlgProc,
	2869	FM3ModHandle,
	2870	CFG_FRAME,
	2871	MPFROMLONG(IDM_ARCHIVERSETTINGS));
	2872	}
[551]	2873	break;
[2]	2874
[551]	2875	case IDM_RESCAN:
	2876	dcd->ullTotalBytes = dcd->totalfiles =
	2877	dcd->selectedfiles = dcd->selectedbytes = 0;
	2878	WinSetDlgItemText(dcd->hwndClient, DIR_TOTALS, "0");
	2879	WinSetDlgItemText(dcd->hwndClient, DIR_SELECTED, "0 / 0k");
	2880	dcd->totalfiles = FillArcCnr(dcd->hwndCnr,
	2881	dcd->arcname,
	2882	&dcd->info,
	2883	&dcd->ullTotalBytes, &dcd->stopflag);
	2884	PostMsg(dcd->hwndCnr, UM_RESCAN, MPVOID, MPVOID);
	2885	PostMsg(dcd->hwndCnr, UM_SETUP2, MPVOID, MPVOID);
	2886	WinSendMsg(dcd->hwndCnr,
	2887	CM_INVALIDATERECORD,
	2888	MPVOID, MPFROM2SHORT(0, CMA_ERASE \| CMA_REPOSITION));
	2889	break;
[2]	2890
[551]	2891	case IDM_RESELECT:
	2892	SelectList(hwnd, TRUE, FALSE, FALSE, NULL, NULL, dcd->lastselection);
	2893	break;
[2]	2894
[551]	2895	case IDM_HELP:
	2896	if (hwndHelp)
	2897	WinSendMsg(hwndHelp,
	2898	HM_DISPLAY_HELP,
	2899	MPFROM2SHORT(HELP_ARCLIST, 0),
	2900	MPFROMSHORT(HM_RESOURCEID));
	2901	break;
[2]	2902
[551]	2903	case IDM_WINDOWDLG:
	2904	if (!ParentIsDesktop(dcd->hwndParent, dcd->hwndFrame))
	2905	PostMsg(dcd->hwndParent,
	2906	UM_COMMAND, MPFROM2SHORT(IDM_WINDOWDLG, 0), MPVOID);
	2907	break;
[2]	2908
[551]	2909	case IDM_SELECTALL:
	2910	case IDM_SELECTALLFILES:
	2911	case IDM_DESELECTALL:
	2912	case IDM_DESELECTALLFILES:
	2913	case IDM_SELECTMASK:
	2914	case IDM_DESELECTMASK:
	2915	case IDM_INVERT:
	2916	{
	2917	PARCITEM pci;
[2]	2918
[551]	2919	pci = (PARCITEM) WinSendMsg(hwnd,
	2920	CM_QUERYRECORDEMPHASIS,
	2921	MPFROMLONG(CMA_FIRST),
	2922	MPFROMSHORT(CRA_CURSORED));
	2923	if ((INT) pci == -1)
	2924	pci = NULL;
	2925	if (SHORT1FROMMP(mp1) == IDM_HIDEALL) {
	2926	if (pci) {
	2927	if (!(pci->rc.flRecordAttr & CRA_SELECTED))
	2928	pci->rc.flRecordAttr \|= CRA_FILTERED;
	2929	WinSendMsg(hwnd,
	2930	CM_INVALIDATERECORD,
	2931	MPFROMP(&pci),
	2932	MPFROM2SHORT(1, CMA_ERASE \| CMA_REPOSITION));
	2933	break;
	2934	}
	2935	}
	2936	PostMsg(dcd->hwndObject, UM_SELECT, mp1, MPFROMP(pci));
	2937	}
	2938	break;
[2]	2939
[551]	2940	case IDM_SORTSMARTNAME:
	2941	case IDM_SORTNAME:
	2942	case IDM_SORTFILENAME:
	2943	case IDM_SORTSIZE:
	2944	case IDM_SORTEASIZE:
	2945	case IDM_SORTFIRST:
	2946	case IDM_SORTLAST:
	2947	case IDM_SORTLWDATE:
	2948	dcd->sortFlags &= SORT_REVERSE;
	2949	/* intentional fallthru */
	2950	case IDM_SORTREVERSE:
	2951	switch (SHORT1FROMMP(mp1)) {
	2952	case IDM_SORTSMARTNAME:
	2953	case IDM_SORTFILENAME:
	2954	dcd->sortFlags \|= SORT_FILENAME;
	2955	break;
	2956	case IDM_SORTSIZE:
	2957	dcd->sortFlags \|= SORT_SIZE;
	2958	break;
	2959	case IDM_SORTEASIZE:
	2960	dcd->sortFlags \|= SORT_EASIZE;
	2961	break;
	2962	case IDM_SORTFIRST:
	2963	dcd->sortFlags \|= SORT_FIRSTEXTENSION;
	2964	break;
	2965	case IDM_SORTLAST:
	2966	dcd->sortFlags \|= SORT_LASTEXTENSION;
	2967	break;
	2968	case IDM_SORTLWDATE:
	2969	dcd->sortFlags \|= SORT_LWDATE;
	2970	break;
	2971	case IDM_SORTREVERSE:
	2972	if (dcd->sortFlags & SORT_REVERSE)
	2973	dcd->sortFlags &= (~SORT_REVERSE);
	2974	else
	2975	dcd->sortFlags \|= SORT_REVERSE;
	2976	break;
	2977	}
	2978	WinSendMsg(hwnd, CM_SORTRECORD, MPFROMP(ArcSort), MPFROMP(dcd));
	2979	SaySort(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	2980	DIR_SORT), dcd->sortFlags, TRUE);
	2981	DefArcSortFlags = dcd->sortFlags; // Remember for new windows
	2982	break;
[2]	2983
[551]	2984	case IDM_COLLECTOR:
	2985	if (!Collector) {
	2986	HWND hwndC;
	2987	SWP swp;
[2]	2988
[551]	2989	if (ParentIsDesktop(hwnd, dcd->hwndParent) && !fAutoTile &&
	2990	(!fExternalCollector && !strcmp(realappname, FM3Str)))
	2991	GetNextWindowPos(dcd->hwndParent, &swp, NULL, NULL);
[563]	2992	hwndC = StartCollector(fExternalCollector \|\|
	2993	strcmp(realappname, FM3Str) ?
	2994	HWND_DESKTOP : dcd->hwndParent, 4);
[551]	2995	if (hwndC) {
	2996	if (!ParentIsDesktop(hwnd, dcd->hwndParent) && !fAutoTile &&
	2997	(!fExternalCollector && !strcmp(realappname, FM3Str)))
	2998	WinSetWindowPos(hwndC,
	2999	HWND_TOP,
	3000	swp.x,
	3001	swp.y,
	3002	swp.cx,
	3003	swp.cy,
	3004	SWP_MOVE \| SWP_SIZE \| SWP_SHOW \| SWP_ZORDER);
	3005	else if (!ParentIsDesktop(hwnd, dcd->hwndParent) &&
	3006	fAutoTile && !strcmp(realappname, FM3Str)) {
	3007	TileChildren(dcd->hwndParent, TRUE);
	3008	}
	3009	WinSetWindowPos(hwndC, HWND_TOP, 0, 0, 0, 0, SWP_ACTIVATE);
[771]	3010	DosSleep(100); //05 Aug 07 GKY 128
[551]	3011	}
	3012	}
	3013	else
	3014	StartCollector(dcd->hwndParent, 4);
	3015	break;
[2]	3016
[551]	3017	case IDM_ARCEXTRACTEXIT:
	3018	case IDM_ARCEXTRACT:
[1314]	3019	if (dcd->directory && fFileNameCnrPath &&
	3020	stricmp(lastextractpath, dcd->directory)) {
	3021	strcpy(lastextractpath, dcd->directory);
	3022	SetDir(dcd->hwndParent, hwnd, dcd->directory, 1);
	3023	}
[551]	3024	if (dcd->info->extract)
[1268]	3025	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \|
[888]	3026	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
[907]	3027	hwnd, pszSrcFile, __LINE__,
	3028	dcd->directory, NULL, "%s %s", dcd->info->extract,
[773]	3029	BldQuotedFileName(szQuotedArcName, dcd->arcname));
[551]	3030	if (SHORT1FROMMP(mp1) == IDM_ARCEXTRACTEXIT)
	3031	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	3032	break;
[2]	3033
[551]	3034	case IDM_ARCEXTRACTWDIRSEXIT:
	3035	case IDM_ARCEXTRACTWDIRS:
[1314]	3036	if (dcd->directory && fFileNameCnrPath &&
	3037	stricmp(lastextractpath, dcd->directory)) {
	3038	strcpy(lastextractpath, dcd->directory);
	3039	SetDir(dcd->hwndParent, hwnd, dcd->directory, 1);
	3040	}
[551]	3041	if (dcd->info->exwdirs)
[1268]	3042	runemf2(SEPARATE \| WINDOWED \| ASYNCHRONOUS \|
[888]	3043	(fArcStuffVisible ? 0 : BACKGROUND \| MINIMIZED),
[907]	3044	hwnd, pszSrcFile, __LINE__,
	3045	dcd->directory, NULL, "%s %s",
[551]	3046	dcd->info->exwdirs,
[773]	3047	BldQuotedFileName(szQuotedArcName, dcd->arcname));
[551]	3048	if (SHORT1FROMMP(mp1) == IDM_ARCEXTRACTWDIRSEXIT)
	3049	PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID);
	3050	break;
[2]	3051
[551]	3052	case IDM_RESORT:
	3053	WinSendMsg(hwnd, CM_SORTRECORD, MPFROMP(ArcSort), MPFROMP(dcd));
	3054	break;
[2]	3055
[551]	3056	case IDM_FILTER:
	3057	{
	3058	BOOL empty = FALSE;
	3059	PARCITEM pci;
[2]	3060
[551]	3061	if (!*dcd->mask.szMask) {
	3062	empty = TRUE;
	3063	pci = (PARCITEM) CurrentRecord(hwnd);
[730]	3064	if (pci && strchr(pci->pszFileName, '.'))
	3065	strcpy(dcd->mask.szMask, pci->pszFileName);
[551]	3066	}
[2]	3067
[551]	3068	if (WinDlgBox(HWND_DESKTOP, hwnd, PickMaskDlgProc,
	3069	FM3ModHandle, MSK_FRAME, MPFROMP(&dcd->mask))) {
	3070	WinSendMsg(hwnd, CM_FILTER, MPFROMP(ArcFilter), MPFROMP(dcd));
	3071	PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
	3072	}
	3073	else if (empty)
	3074	*dcd->mask.szMask = 0;
	3075	SayFilter(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT),
	3076	DIR_FILTER), &dcd->mask, TRUE);
	3077	}
	3078	break;
[2]	3079
[551]	3080	case IDM_SWITCH:
	3081	if (mp2) {
	3082	if (stricmp(dcd->directory, (CHAR *) mp2)) {
[1301]	3083	//DosEnterCritSec(); //GKY 11-29-08
	3084	DosRequestMutexSem(hmtxFM2Globals, SEM_INDEFINITE_WAIT);
[551]	3085	strcpy(lastextractpath, (CHAR *) mp2);
[1301]	3086	MakeValidDir(lastextractpath);
	3087	DosReleaseMutexSem(hmtxFM2Globals);
	3088	//DosExitCritSec();
[551]	3089	}
	3090	strcpy(dcd->directory, (CHAR *) mp2);
	3091	MakeValidDir(dcd->directory);
	3092	WinSetWindowText(dcd->hwndExtract, dcd->directory);
	3093	}
	3094	break;
[2]	3095
[551]	3096	case IDM_WALKDIR:
	3097	{
	3098	CHAR newdir[CCHMAXPATH];
[2]	3099
[551]	3100	strcpy(newdir, dcd->directory);
	3101	if (!WinDlgBox(HWND_DESKTOP, dcd->hwndParent, WalkExtractDlgProc,
	3102	FM3ModHandle, WALK_FRAME,
	3103	MPFROMP(newdir)) \|\| !*newdir)
	3104	break;
	3105	if (stricmp(newdir, dcd->directory)) {
	3106	strcpy(dcd->directory, newdir);
	3107	if (stricmp(lastextractpath, newdir))
	3108	strcpy(lastextractpath, newdir);
	3109	WinSetWindowText(dcd->hwndExtract, dcd->directory);
	3110	}
	3111	}
	3112	break;
[2]	3113
[551]	3114	case IDM_TEST:
	3115	if (dcd->info->test)
	3116	runemf2(SEPARATEKEEP \| WINDOWED \| MAXIMIZED,
[888]	3117	hwnd, pszSrcFile, __LINE__, NULL, NULL,
[773]	3118	"%s %s",dcd->info->test,
	3119	BldQuotedFileName(szQuotedArcName, dcd->arcname));
[551]	3120	break;
[2]	3121
[551]	3122	case IDM_REFRESH:
	3123	case IDM_DELETE:
	3124	case IDM_PRINT:
	3125	case IDM_VIEW:
	3126	case IDM_VIEWTEXT:
	3127	case IDM_VIEWBINARY:
	3128	case IDM_VIEWARCHIVE:
	3129	case IDM_EDIT:
	3130	case IDM_EDITTEXT:
	3131	case IDM_EDITBINARY:
	3132	case IDM_EXTRACT:
	3133	case IDM_EXTRACTWDIRS:
	3134	case IDM_FIND:
	3135	case IDM_EXEC:
	3136	case IDM_VIRUSSCAN:
[1068]	3137	case IDM_OPENDEFAULT:
	3138	case IDM_OPENSETTINGS:
[1069]	3139	case IDM_MCIPLAY:
[551]	3140	{
	3141	LISTINFO *li;
[1077]	3142	# ifdef FORTIFY
	3143	Fortify_EnterScope();
	3144	# endif
[551]	3145	li = xmallocz(sizeof(LISTINFO), pszSrcFile, __LINE__);
	3146	if (li) {
	3147	li->type = SHORT1FROMMP(mp1);
	3148	li->hwnd = hwnd;
	3149	li->list = BuildArcList(hwnd);
	3150	if (li->type == IDM_REFRESH) {
[2]	3151
[551]	3152	CHAR s[CCHMAXPATH], *p;
	3153	INT x, y;
[2]	3154
[551]	3155	for (x = 0; li->list && li->list[x]; x++) {
[773]	3156	BldFullPathName(s, dcd->workdir, li->list[x]);
[551]	3157	if (IsFile(s) != 1) {
[1039]	3158	free(li->list[x]);
[551]	3159	li->list[x] = NULL;
	3160	for (y = x; li->list[y]; y++)
	3161	li->list[y] = li->list[y + 1];
	3162	li->list =
	3163	xrealloc(li->list, y * sizeof(CHAR *), pszSrcFile,
	3164	__LINE__);
	3165	x--;
	3166	}
	3167	else {
	3168	p = xstrdup(s, pszSrcFile, __LINE__);
	3169	if (p) {
[1039]	3170	free(li->list[x]);
[551]	3171	li->list[x] = p;
	3172	}
	3173	}
	3174	} // for
	3175	}
	3176	strcpy(li->arcname, dcd->arcname);
	3177	li->info = dcd->info;
	3178	{
	3179	PARCITEM pai;
[2]	3180
[551]	3181	if (SHORT1FROMMP(mp1) != IDM_EXEC)
	3182	pai = (PARCITEM) CurrentRecord(hwnd);
	3183	else
	3184	pai = (PARCITEM) WinSendMsg(hwnd, CM_QUERYRECORDEMPHASIS,
	3185	MPFROMLONG(CMA_FIRST),
	3186	MPFROMSHORT(CRA_CURSORED));
	3187	if (pai && (INT) pai != -1)
[730]	3188	strcpy(li->runfile, pai->pszFileName);
[551]	3189	else
	3190	strcpy(li->runfile, li->list[0]);
	3191	}
	3192	switch (SHORT1FROMMP(mp1)) {
	3193	case IDM_VIEW:
	3194	case IDM_VIEWTEXT:
	3195	case IDM_VIEWBINARY:
	3196	case IDM_VIEWARCHIVE:
	3197	case IDM_EDIT:
	3198	case IDM_EDITTEXT:
	3199	case IDM_EDITBINARY:
	3200	case IDM_EXEC:
	3201	case IDM_PRINT:
	3202	case IDM_VIRUSSCAN:
[1068]	3203	case IDM_OPENDEFAULT:
[1077]	3204	case IDM_OPENSETTINGS:
	3205	case IDM_MCIPLAY:
[551]	3206	strcpy(li->targetpath, dcd->workdir);
	3207	break;
	3208	default:
	3209	strcpy(li->targetpath, dcd->directory);
	3210	break;
	3211	}
	3212	if (li->list) {
	3213	if (!PostMsg(dcd->hwndObject, UM_ACTION, MPFROMP(li), MPVOID)) {
	3214	Runtime_Error(pszSrcFile, __LINE__, "post");
	3215	FreeListInfo(li);
	3216	}
	3217	else if (fUnHilite && SHORT1FROMMP(mp1) != IDM_EDIT)
[672]	3218	UnHilite(hwnd, TRUE, &dcd->lastselection, 0);
[551]	3219	}
[1077]	3220	else {
[1039]	3221	free(li);
[1077]	3222	}
[551]	3223	}
[1077]	3224	# ifdef FORTIFY
	3225	Fortify_LeaveScope();
	3226	# endif
[551]	3227	}
	3228	break;
[2]	3229	}
[551]	3230	}
	3231	return 0;
[2]	3232
[551]	3233	case WM_CONTROL:
	3234	DosError(FERR_DISABLEHARDERR);
	3235	if (dcd) {
	3236	switch (SHORT2FROMMP(mp1)) {
	3237	case CN_BEGINEDIT:
	3238	PostMsg(hwnd, CM_CLOSEEDIT, MPVOID, MPVOID);
	3239	break;
[2]	3240
[551]	3241	case CN_ENDEDIT:
	3242	if (!((PCNREDITDATA) mp2)->pRecord) {
[2]	3243
[551]	3244	PFIELDINFO pfi = ((PCNREDITDATA) mp2)->pFieldInfo;
	3245	USHORT cmd = 0;
[2]	3246
[739]	3247	if (!pfi \|\| pfi->offStruct == FIELDOFFSET(ARCITEM, pszDisplayName))
[551]	3248	cmd = IDM_SORTSMARTNAME;
	3249	else if (pfi->offStruct == FIELDOFFSET(ARCITEM, cbFile))
	3250	cmd = IDM_SORTSIZE;
	3251	else if (pfi->offStruct == FIELDOFFSET(ARCITEM, cbComp))
	3252	cmd = IDM_SORTEASIZE;
	3253	else if (pfi->offStruct == FIELDOFFSET(ARCITEM, date))
	3254	cmd = IDM_SORTLWDATE;
	3255	else if (pfi->offStruct == FIELDOFFSET(ARCITEM, time))
	3256	cmd = IDM_SORTLWDATE;
	3257	if (cmd)
	3258	PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(cmd, 0), MPVOID);
	3259	}
	3260	break;
[2]	3261
[551]	3262	case CN_DROPHELP:
	3263	saymsg(MB_ENTER, hwnd,
	3264	GetPString(IDS_DROPHELPHDRTEXT),
	3265	GetPString(IDS_ARCCNRDROPHELPTEXT), dcd->arcname);
	3266	return 0;
[2]	3267
[551]	3268	case CN_DRAGLEAVE:
	3269	if (mp2) {
[2]	3270
[551]	3271	PDRAGINFO pDInfo;
[2]	3272
[551]	3273	pDInfo = ((PCNRDRAGINFO) mp2)->pDragInfo;
[562]	3274	DrgAccessDraginfo(pDInfo); /* Access DRAGINFO */
	3275	DrgFreeDraginfo(pDInfo); /* Free DRAGINFO */
[551]	3276	}
	3277	return 0;
[2]	3278
[551]	3279	case CN_DRAGAFTER:
	3280	case CN_DRAGOVER:
	3281	if (mp2) {
[2]	3282
[773]	3283	PDRAGITEM pDItem; /* Pointer to DRAGITEM */
	3284	PDRAGINFO pDInfo; /* Pointer to DRAGINFO */
[551]	3285	PARCITEM pci;
[2]	3286
[551]	3287	pci = (PARCITEM) ((PCNRDRAGINFO) mp2)->pRecord;
	3288	if (SHORT1FROMMP(mp1) == CN_DRAGAFTER)
	3289	pci = NULL;
	3290	pDInfo = ((PCNRDRAGINFO) mp2)->pDragInfo;
[562]	3291	DrgAccessDraginfo(pDInfo); /* Access DRAGINFO */
[551]	3292	if (*dcd->arcname) {
	3293	if ((driveflags[toupper(*dcd->arcname) - 'A'] &
	3294	DRIVE_NOTWRITEABLE) \|\| !dcd->info \|\| !dcd->info->create) {
	3295	DrgFreeDraginfo(pDInfo);
	3296	return MRFROM2SHORT(DOR_NEVERDROP, 0);
	3297	}
	3298	}
	3299	if (pci) {
	3300	DrgFreeDraginfo(pDInfo);
	3301	return MRFROM2SHORT(DOR_NODROP, 0);
	3302	}
[562]	3303	pDItem = DrgQueryDragitemPtr(pDInfo, /* Access DRAGITEM */
	3304	0); /* Index to DRAGITEM */
[551]	3305	if (DrgVerifyRMF(pDItem, /* Check valid rendering */
[562]	3306	DRM_OS2FILE, /* mechanisms and data */
[551]	3307	NULL) && !(pDItem->fsControl & DC_PREPARE)) {
[773]	3308	DrgFreeDraginfo(pDInfo); /* Free DRAGINFO */
[562]	3309	return MRFROM2SHORT(DOR_DROP, /* Return okay to drop */
	3310	fCopyDefault ? DO_COPY : DO_MOVE);
[551]	3311	}
[562]	3312	DrgFreeDraginfo(pDInfo); /* Free DRAGINFO */
[551]	3313	}
[562]	3314	return (MRFROM2SHORT(DOR_NEVERDROP, 0)); /* Drop not valid */
[2]	3315
[551]	3316	case CN_INITDRAG:
	3317	if (mp2) {
[2]	3318
[551]	3319	BOOL wasemphasized = FALSE;
	3320	PCNRDRAGINIT pcd = (PCNRDRAGINIT) mp2;
	3321	PARCITEM pci;
[2]	3322
[551]	3323	if (pcd) {
	3324	pci = (PARCITEM) pcd->pRecord;
	3325	if (pci) {
	3326	if (pci->rc.flRecordAttr & CRA_SELECTED)
	3327	wasemphasized = TRUE;
	3328	if (!ParentIsDesktop(hwnd, dcd->hwndParent) &&
	3329	fSplitStatus && hwndStatus2)
	3330	WinSetWindowText(hwndStatus2, GetPString(IDS_DRAGARCMEMTEXT));
	3331	if (DoFileDrag(hwnd,
	3332	dcd->hwndObject,
	3333	mp2, dcd->arcname, NULL, TRUE)) {
[672]	3334	if ((fUnHilite && wasemphasized) \|\| dcd->ulItemsToUnHilite)
	3335	UnHilite(hwnd, TRUE, &dcd->lastselection, dcd->ulItemsToUnHilite);
[551]	3336	}
	3337	if (!ParentIsDesktop(hwnd, dcd->hwndParent) &&
	3338	fSplitStatus && hwndStatus2) {
	3339	PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
	3340	}
	3341	}
	3342	else {
	3343	if (!ParentIsDesktop(hwnd, dcd->hwndParent) &&
	3344	fSplitStatus && hwndStatus2)
	3345	WinSetWindowText(hwndStatus2,
	3346	GetPString(IDS_DRAGARCFILETEXT));
	3347	DragOne(hwnd, dcd->hwndObject, dcd->arcname, FALSE);
	3348	if (!ParentIsDesktop(hwnd, dcd->hwndParent) &&
	3349	fSplitStatus && hwndStatus2)
	3350	PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID);
	3351	}
	3352	}
	3353	}
	3354	return 0;
[2]	3355
[551]	3356	case CN_DROP:
	3357	if (mp2) {
[2]	3358
[551]	3359	LISTINFO *li;
[2]	3360
[551]	3361	DosBeep(500, 100); // fixme to know why beep?
	3362	li = DoFileDrop(hwnd, dcd->arcname, FALSE, mp1, mp2);
[762]	3363	DosBeep(50, 100); // fixme to know why beep?
	3364	CheckPmDrgLimit(((PCNRDRAGINFO)mp2)->pDragInfo);
[551]	3365	if (li) {
[562]	3366	li->type = li->type == DO_MOVE ? IDM_ARCHIVEM : IDM_ARCHIVE;
[551]	3367	strcpy(li->targetpath, dcd->arcname);
	3368	if (!li->list \|\|
	3369	!li->list[0] \|\|
	3370	!PostMsg(dcd->hwndObject, UM_ACTION, MPFROMP(li), MPVOID))
	3371	FreeListInfo(li);
	3372	}
	3373	}
	3374	return 0;
[2]	3375
[551]	3376	case CN_CONTEXTMENU:
	3377	{
	3378	PARCITEM pci = (PARCITEM) mp2;
[2]	3379
[551]	3380	if (pci) {
	3381	WinSendMsg(hwnd, CM_SETRECORDEMPHASIS, MPFROMP(pci),
	3382	MPFROM2SHORT(TRUE, CRA_CURSORED));
	3383	MarkAll(hwnd, FALSE, FALSE, TRUE);
[872]	3384	dcd->hwndLastMenu = CheckMenu(hwnd, &ArcMenu, ARC_POPUP);
[551]	3385	}
	3386	else {
[872]	3387	dcd->hwndLastMenu = CheckMenu(hwnd, &ArcCnrMenu, ARCCNR_POPUP);
[551]	3388	if (dcd->hwndLastMenu && !dcd->cnremphasized) {
	3389	WinSendMsg(hwnd, CM_SETRECORDEMPHASIS, MPVOID,
	3390	MPFROM2SHORT(TRUE, CRA_SOURCE));
	3391	dcd->cnremphasized = TRUE;
	3392	}
	3393	}
	3394	if (dcd->hwndLastMenu) {
	3395	if (dcd->hwndLastMenu == ArcCnrMenu) {
	3396	if (dcd->flWindowAttr & CV_MINI)
	3397	WinCheckMenuItem(dcd->hwndLastMenu, IDM_MINIICONS, TRUE);
	3398	}
	3399	WinCheckMenuItem(dcd->hwndLastMenu, IDM_FOLDERAFTEREXTRACT,
	3400	fFolderAfterExtract);
	3401	if (!PopupMenu(hwnd, hwnd, dcd->hwndLastMenu)) {
	3402	if (dcd->cnremphasized) {
	3403	WinSendMsg(hwnd, CM_SETRECORDEMPHASIS, MPVOID,
	3404	MPFROM2SHORT(FALSE, CRA_SOURCE));
	3405	dcd->cnremphasized = TRUE;
	3406	}
	3407	MarkAll(hwnd, TRUE, FALSE, TRUE);
	3408	}
	3409	}
	3410	}
	3411	break;
[2]	3412
[551]	3413	case CN_EMPHASIS:
	3414	if (mp2) {
[2]	3415
[551]	3416	PNOTIFYRECORDEMPHASIS pre = mp2;
	3417	PARCITEM pci;
	3418	CHAR s[CCHMAXPATHCOMP + 91], tf[81], tb[81];
[2]	3419
[562]	3420	pci = (PARCITEM)(pre ? pre->pRecord : NULL);
[551]	3421	if (!pci) {
	3422	if (!ParentIsDesktop(hwnd, dcd->hwndParent)) {
	3423	if (hwndStatus2)
	3424	WinSetWindowText(hwndStatus2, NullStr);
	3425	if (fMoreButtons)
	3426	WinSetWindowText(hwndName, NullStr);
	3427	}
	3428	break;
	3429	}
	3430	if (pre->fEmphasisMask & CRA_SELECTED) {
	3431	if (pci->rc.flRecordAttr & CRA_SELECTED) {
	3432	dcd->selectedbytes += pci->cbFile;
	3433	dcd->selectedfiles++;
	3434	}
	3435	else if (dcd->selectedfiles) {
	3436	dcd->selectedbytes -= pci->cbFile;
	3437	dcd->selectedfiles--;
	3438	}
	3439	commafmt(tf, sizeof(tf), dcd->selectedfiles);
	3440	if (dcd->ullTotalBytes)
	3441	CommaFmtULL(tb, sizeof(tb), dcd->selectedbytes, ' ');
	3442	else
	3443	*tb = 0;
	3444	sprintf(s, "%s%s%s", tf, *tb ? " / " : NullStr, tb);
	3445	WinSetDlgItemText(dcd->hwndClient, DIR_SELECTED, s);
	3446	}
	3447	else if (WinQueryActiveWindow(dcd->hwndParent) ==
	3448	dcd->hwndFrame &&
	3449	!ParentIsDesktop(hwnd, dcd->hwndParent)) {
	3450	if (pre->fEmphasisMask & CRA_CURSORED) {
	3451	if (pci->rc.flRecordAttr & CRA_CURSORED) {
	3452	if (fSplitStatus && hwndStatus2) {
	3453	if (dcd->ullTotalBytes)
	3454	CommaFmtULL(tb, sizeof(tb), pci->cbFile, ' ');
	3455	else
	3456	*tb = 0;
	3457	sprintf(s, "%s%s%s%s",
	3458	*tb ? " " : NullStr,
[730]	3459	tb, *tb ? " " : NullStr, pci->pszFileName);
[551]	3460	WinSetWindowText(hwndStatus2, s);
	3461	}
	3462	if (fMoreButtons)
[730]	3463	WinSetWindowText(hwndName, pci->pszFileName);
[551]	3464	}
	3465	}
	3466	}
	3467	}
	3468	break;
[2]	3469
[551]	3470	case CN_ENTER:
	3471	if (mp2) {
[2]	3472
[551]	3473	PARCITEM pci = (PARCITEM) ((PNOTIFYRECORDENTER) mp2)->pRecord;
[2]	3474
[551]	3475	if (pci) {
[2]	3476
[551]	3477	CHAR *s;
[2]	3478
[551]	3479	if ((pci->rc.flRecordAttr & CRA_INUSE) \|\|
	3480	(pci->flags & (ARCFLAGS_REALDIR \| ARCFLAGS_PSEUDODIR)))
	3481	break;
[730]	3482	s = xstrdup(pci->pszFileName, pszSrcFile, __LINE__);
[551]	3483	if (s) {
	3484	if (!PostMsg(dcd->hwndObject, UM_ENTER, MPFROMP(s), MPVOID)) {
	3485	Runtime_Error(pszSrcFile, __LINE__, "post");
[1039]	3486	free(s);
[551]	3487	}
	3488	}
	3489	}
	3490	}
	3491	break;
[2]	3492	}
[551]	3493	}
	3494	return 0;
[2]	3495
[551]	3496	case UM_FOLDUP:
	3497	if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID))
	3498	DosExit(EXIT_PROCESS, 1);
	3499	return 0;
[2]	3500
[551]	3501	case UM_CLOSE:
	3502	WinDestroyWindow(WinQueryWindow(WinQueryWindow(hwnd, QW_PARENT),
	3503	QW_PARENT));
	3504	return 0;
[2]	3505
[551]	3506	case WM_SAVEAPPLICATION:
	3507	if (dcd && ParentIsDesktop(hwnd, dcd->hwndParent)) {
	3508	SWP swp;
[2]	3509
[551]	3510	WinQueryWindowPos(dcd->hwndFrame, &swp);
	3511	if (!(swp.fl & (SWP_HIDE \| SWP_MINIMIZE \| SWP_MAXIMIZE)))
	3512	PrfWriteProfileData(fmprof, appname, "AV2SizePos", &swp, sizeof(swp));
	3513	}
	3514	break;
[2]	3515
[551]	3516	case WM_CLOSE:
	3517	WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID);
	3518	if (dcd)
	3519	dcd->stopflag++;
	3520	if (dcd && dcd->hwndObject) {
	3521	if (!PostMsg(dcd->hwndObject, WM_CLOSE, MPVOID, MPVOID))
	3522	WinSendMsg(dcd->hwndObject, WM_CLOSE, MPVOID, MPVOID);
	3523	}
	3524	// In case object window frees dcd
	3525	dcd = WinQueryWindowPtr(hwnd, QWL_USER);
	3526	if (!dcd \|\|
	3527	(!dcd->dontclose &&
	3528	!dcd->amextracted && ParentIsDesktop(hwnd, dcd->hwndParent))) {
	3529	if (!PostMsg(hwnd, UM_FOLDUP, MPVOID, MPVOID))
	3530	WinSendMsg(hwnd, UM_FOLDUP, MPVOID, MPVOID);
	3531	}
	3532	return 0;
	3533
	3534	case WM_DESTROY:
	3535	if (ArcMenu)
	3536	WinDestroyWindow(ArcMenu);
	3537	if (ArcCnrMenu)
	3538	WinDestroyWindow(ArcCnrMenu);
	3539	ArcMenu = ArcCnrMenu = (HWND) 0;
[751]	3540	EmptyArcCnr(hwnd);
[1120]	3541	# ifdef FORTIFY
	3542	Fortify_LeaveScope();
	3543	# endif
[551]	3544	break;
[2]	3545	}
[705]	3546	if (dcd && dcd->oldproc){
	3547	return dcd->oldproc(hwnd, msg, mp1, mp2);
	3548	}
	3549	else
	3550	return PFNWPCnr(hwnd, msg, mp1, mp2);
[2]	3551	}
	3552
[942]	3553	MRESULT EXPENTRY ArcCnrMenuProc(HWND hwnd, ULONG msg, MPARAM mp1,
	3554	MPARAM mp2)
	3555	{
	3556	PFNWP oldMenuProc = WinQueryWindowPtr(hwnd, QWL_USER);
	3557	static short sLastMenuitem;
	3558
	3559	switch (msg) {
	3560	case WM_MOUSEMOVE: {
	3561	if (fOtherHelp) {
[953]	3562	RECTL rectl;
	3563	SHORT i, sCurrentMenuitem;
	3564	SHORT MenuItems = 10;
	3565	SHORT asMenuIDs[10] = {IDM_VIEW,
	3566	IDM_DELETE,
	3567	IDM_EXEC,
	3568	IDM_EXTRACT,
	3569	IDM_TEST,
	3570	IDM_VIRUSSCAN,
	3571	IDM_RESCAN,
	3572	IDM_WALKDIR,
	3573	IDM_FILTER,
	3574	0};
	3575	char *szHelpString = NULL;
[942]	3576
	3577
[953]	3578	for (i=0; i<MenuItems; i++) {
	3579	sCurrentMenuitem = asMenuIDs[i];
	3580	oldMenuProc(hwnd,MM_QUERYITEMRECT,
	3581	MPFROM2SHORT(asMenuIDs[i], FALSE),
	3582	&rectl);
[942]	3583
[953]	3584	if (MOUSEMSG(&msg)->x > rectl.xLeft &&
	3585	MOUSEMSG(&msg)->x < rectl.xRight &&
	3586	MOUSEMSG(&msg)->y > rectl.yBottom &&
	3587	MOUSEMSG(&msg)->y < rectl.yTop)
	3588	break;
	3589	} // for
[942]	3590
	3591
[953]	3592	switch (sCurrentMenuitem) {
	3593	case 0:
	3594	break;
	3595	case IDM_VIEW:
	3596	szHelpString = GetPString(IDS_ARCCNRVIEWMENUHELP);
	3597	break;
	3598	case IDM_DELETE:
	3599	szHelpString = GetPString(IDS_ARCCNRDELETEMENUHELP);
	3600	break;
	3601	case IDM_EXEC:
	3602	szHelpString = GetPString(IDS_ARCCNREXECMENUHELP);
	3603	break;
	3604	case IDM_EXTRACT:
	3605	szHelpString = GetPString(IDS_ARCCNREXTRACTMENUHELP);
	3606	break;
	3607	case IDM_TEST:
	3608	szHelpString = GetPString(IDS_ARCCNRTESTMENUHELP);
	3609	break;
	3610	case IDM_VIRUSSCAN:
	3611	szHelpString = GetPString(IDS_ARCCNRVIRUSMENUHELP);
	3612	break;
	3613	case IDM_RESCAN:
	3614	szHelpString = GetPString(IDS_ARCCNRRESCANMENUHELP);
	3615	break;
	3616	case IDM_WALKDIR:
	3617	szHelpString = GetPString(IDS_ARCCNRWALKDIRMENUHELP);
	3618	break;
	3619	case IDM_FILTER:
	3620	szHelpString = GetPString(IDS_ARCCNRFILTERMENUHELP);
	3621	break;
	3622	default:
	3623	break;
	3624	}
[942]	3625
[953]	3626	if (sLastMenuitem != sCurrentMenuitem && szHelpString) {
	3627	sLastMenuitem = sCurrentMenuitem;
	3628	MakeBubble(hwnd, TRUE, szHelpString);
	3629	}
	3630	else if (hwndBubble && !sCurrentMenuitem){
	3631	sLastMenuitem = sCurrentMenuitem;
	3632	WinDestroyWindow(hwndBubble);
	3633	}
[942]	3634	}
	3635	}
	3636	}
	3637	return oldMenuProc(hwnd, msg, mp1, mp2);
	3638	}
	3639
[551]	3640	HWND StartArcCnr(HWND hwndParent, HWND hwndCaller, CHAR * arcname, INT flags,
	3641	ARC_TYPE * sinfo)
[212]	3642	{
[2]	3643	/*
	3644	* bitmapped flags:
	3645	* 1 = am extracted from another archive
	3646	* 4 = don't kill proc on close
	3647	*/
	3648
[551]	3649	HWND hwndFrame = (HWND) 0, hwndClient;
	3650	ULONG FrameFlags = FCF_TITLEBAR \| FCF_SYSMENU \|
	3651	FCF_SIZEBORDER \| FCF_MINMAX \| FCF_ICON \| FCF_NOBYTEALIGN \| FCF_ACCELTABLE;
	3652	USHORT id;
	3653	DIRCNRDATA *dcd;
	3654	ARC_TYPE *info = sinfo;
	3655	CHAR title[MAXNAMEL + 1] = "AV/2 - ";
	3656	CHAR fullname[CCHMAXPATH + 8], *p, temp;
[2]	3657	static USHORT idinc = 0;
	3658
[423]	3659	if (!idinc)
[2]	3660	idinc = (rand() % 256);
[551]	3661	if (ParentIsDesktop(hwndParent, hwndParent))
[2]	3662	FrameFlags \|= (FCF_TASKLIST \| FCF_MENU);
[423]	3663	if (arcname) {
[2]	3664	DosError(FERR_DISABLEHARDERR);
[423]	3665	if (DosQueryPathInfo(arcname,
[551]	3666	FIL_QUERYFULLNAME, fullname, sizeof(fullname)))
	3667	strcpy(fullname, arcname);
[2]	3668	p = fullname;
[551]	3669	while (*p) {
[423]	3670	if (*p == '/')
[551]	3671	*p = '\\';
[2]	3672	p++;
	3673	}
[423]	3674	if (!info)
[551]	3675	info = find_type(fullname, arcsighead);
[423]	3676	if (!info)
[2]	3677	return hwndFrame;
[551]	3678	if (strlen(title) + strlen(fullname) > MAXNAMEL) {
	3679	p = title + strlen(title);
	3680	strncpy(p, fullname, MAXNAMEL / 2 - 5);
	3681	strcpy(p + MAXNAMEL / 2 - 5, "...");
	3682	strcat(title, fullname + strlen(fullname) - (MAXNAMEL / 2 - 5));
[460]	3683	}
[551]	3684	else {
	3685	strcat(title, fullname);
[460]	3686	}
[2]	3687	hwndFrame = WinCreateStdWindow(hwndParent,
[551]	3688	WS_VISIBLE,
	3689	&FrameFlags,
[593]	3690	WC_ARCCONTAINER,
[551]	3691	title,
	3692	WS_VISIBLE \| fwsAnimate,
	3693	FM3ModHandle, ARC_FRAME, &hwndClient);
[423]	3694	if (hwndFrame && hwndClient) {
[2]	3695	id = ARC_FRAME + idinc++;
[423]	3696	if (idinc > 512)
[551]	3697	idinc = 0;
	3698	WinSetWindowUShort(hwndFrame, QWS_ID, id);
[1063]	3699	# ifdef FORTIFY
	3700	Fortify_EnterScope();
[1077]	3701	# endif
[551]	3702	dcd = xmallocz(sizeof(DIRCNRDATA), pszSrcFile, __LINE__);
[358]	3703	if (!dcd) {
[551]	3704	PostMsg(hwndClient, WM_CLOSE, MPVOID, MPVOID);
	3705	hwndFrame = (HWND) 0;
[358]	3706	}
	3707	else {
[551]	3708	dcd->size = sizeof(DIRCNRDATA);
	3709	dcd->id = id;
	3710	dcd->type = ARC_FRAME;
[1082]	3711	if (!pTmpDir)
[1104]	3712	strcpy(dcd->workdir, pFM2SaveDirectory);
[1082]	3713	MakeTempName(dcd->workdir, ArcTempRoot, 2);
	3714	/*if (dcd->workdir[strlen(dcd->workdir) - 1] != '\\')
[1077]	3715	strcat(dcd->workdir, "\\");
	3716	sprintf(dcd->workdir + strlen(dcd->workdir), "%s.%03x",
	3717	ArcTempRoot, (clock() & 4095));
	3718	else
	3719	sprintf(dcd->workdir, "%s.%03x",
[1082]	3720	ArcTempRoot, (clock() & 4095));*/
[551]	3721	strcpy(dcd->arcname, fullname);
	3722	if (*extractpath) {
	3723	if (!strcmp(extractpath, "*")) {
	3724	p = strrchr(fullname, '\\');
	3725	if (p) {
	3726	if (p < fullname + 3)
	3727	p++;
	3728	temp = *p;
	3729	*p = 0;
	3730	strcpy(dcd->directory, fullname);
	3731	*p = temp;
	3732	}
	3733	}
	3734	else
	3735	strcpy(dcd->directory, extractpath);
[1306]	3736	}
	3737	if (!*dcd->directory && fFileNameCnrPath && dcd->arcname) {
	3738	strcpy(fullname, dcd->arcname);
	3739	p = strrchr(fullname, '.');
	3740	if (p)
	3741	*p = 0;
	3742	else {
[1307]	3743	p = fullname + strlen(fullname);
[1306]	3744	p--;
	3745	*p = 0;
	3746	}
	3747	strcpy(dcd->directory, fullname);
	3748	}
[551]	3749	if (!dcd->directory && lastextractpath) {
[1301]	3750	//DosEnterCritSec(); //GKY 11-29-08
	3751	DosRequestMutexSem(hmtxFM2Globals, SEM_INDEFINITE_WAIT);
	3752	strcpy(dcd->directory, lastextractpath);
	3753	DosReleaseMutexSem(hmtxFM2Globals);
	3754	//DosExitCritSec();
[551]	3755	}
	3756	if (!*dcd->directory) {
	3757	if (!ParentIsDesktop(hwndParent, hwndParent))
	3758	TopWindowName(hwndParent, hwndCaller, dcd->directory);
	3759	if (!*dcd->directory) {
	3760	p = strrchr(fullname, '\\');
	3761	if (p) {
	3762	if (p < fullname + 3)
	3763	p++;
	3764	*p = 0;
	3765	strcpy(dcd->directory, fullname);
	3766	}
	3767	}
	3768	}
	3769	if (!*dcd->directory \|\|
[1307]	3770	(IsFile(dcd->directory) == 1) \|\|
[551]	3771	(isalpha(*dcd->directory) &&
	3772	(driveflags[toupper(*dcd->directory) - 'A'] &
	3773	DRIVE_NOTWRITEABLE)))
[1104]	3774	strcpy(dcd->directory, pFM2SaveDirectory);
[562]	3775	dcd->hwndParent = hwndParent ? hwndParent : HWND_DESKTOP;
[551]	3776	dcd->hwndFrame = hwndFrame;
	3777	dcd->hwndClient = hwndClient;
[562]	3778	dcd->amextracted = (flags & 1) != 0;
	3779	dcd->dontclose = (flags & 4) != 0;
[551]	3780	dcd->info = info;
[1307]	3781	dcd->sortFlags = DefArcSortFlags;
[551]	3782	{
	3783	PFNWP oldproc;
[2]	3784
[551]	3785	oldproc = WinSubclassWindow(hwndFrame, (PFNWP) ArcFrameWndProc);
	3786	WinSetWindowPtr(hwndFrame, QWL_USER, (PVOID) oldproc);
[358]	3787	}
[551]	3788	dcd->hwndCnr = WinCreateWindow(hwndClient,
	3789	WC_CONTAINER,
	3790	NULL,
	3791	CCS_AUTOPOSITION \| CCS_MINIICONS \|
	3792	CCS_MINIRECORDCORE \| ulCnrType \|
	3793	WS_VISIBLE,
	3794	0,
	3795	0,
	3796	0,
	3797	0,
	3798	hwndClient,
	3799	HWND_TOP, (ULONG) ARC_CNR, NULL, NULL);
	3800	if (!dcd->hwndCnr) {
	3801	Win_Error2(hwndClient, hwndClient, pszSrcFile, __LINE__,
	3802	IDS_WINCREATEWINDOW);
	3803	PostMsg(hwndClient, WM_CLOSE, MPVOID, MPVOID);
[1077]	3804	free(dcd);
[551]	3805	hwndFrame = (HWND) 0;
	3806	}
[358]	3807	else {
[551]	3808	WinSetWindowPtr(dcd->hwndCnr, QWL_USER, (PVOID) dcd);
	3809	dcd->oldproc = WinSubclassWindow(dcd->hwndCnr,
	3810	(PFNWP) ArcCnrWndProc);
	3811	{
	3812	USHORT ids[] = { DIR_TOTALS, DIR_SELECTED, DIR_VIEW, DIR_SORT,
	3813	DIR_FILTER, DIR_FOLDERICON, 0
	3814	};
[2]	3815
[551]	3816	CommonCreateTextChildren(dcd->hwndClient,
[593]	3817	WC_ARCSTATUS, ids);
[551]	3818	}
	3819	WinEnableWindow(WinWindowFromID(dcd->hwndClient, DIR_VIEW), FALSE);
	3820	dcd->hwndExtract = WinCreateWindow(dcd->hwndClient,
	3821	WC_ENTRYFIELD,
	3822	NULL,
	3823	ES_AUTOSCROLL,
	3824	0,
	3825	0,
	3826	0,
	3827	0,
	3828	dcd->hwndClient,
	3829	HWND_TOP,
	3830	ARC_EXTRACTDIR, NULL, NULL);
	3831	WinSendMsg(dcd->hwndExtract,
	3832	EM_SETTEXTLIMIT, MPFROM2SHORT(CCHMAXPATH, 0), MPVOID);
	3833	WinSetWindowText(dcd->hwndExtract, dcd->directory);
	3834	if (!PostMsg(dcd->hwndCnr, UM_SETUP, MPVOID, MPVOID))
	3835	WinSendMsg(dcd->hwndCnr, UM_SETUP, MPVOID, MPVOID);
[953]	3836	if (FrameFlags & FCF_MENU) {
	3837	PFNWP oldmenuproc;
	3838	HWND hwndMenu = WinWindowFromID(hwndFrame, FID_MENU);
[942]	3839
	3840	oldmenuproc = WinSubclassWindow(hwndMenu, (PFNWP) ArcCnrMenuProc);
	3841	WinSetWindowPtr(hwndMenu, QWL_USER, (PVOID) oldmenuproc);
[551]	3842	if (!fToolbar) {
[2]	3843
[551]	3844	if (hwndMenu) {
	3845	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3846	MPFROM2SHORT(IDM_VIEW, FALSE), MPVOID);
	3847	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3848	MPFROM2SHORT(IDM_EXEC, FALSE), MPVOID);
	3849	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3850	MPFROM2SHORT(IDM_RESCAN, FALSE), MPVOID);
	3851	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3852	MPFROM2SHORT(IDM_DELETE, FALSE), MPVOID);
	3853	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3854	MPFROM2SHORT(IDM_EXTRACT, FALSE), MPVOID);
	3855	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3856	MPFROM2SHORT(IDM_TEST, FALSE), MPVOID);
	3857	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3858	MPFROM2SHORT(IDM_VIRUSSCAN, FALSE), MPVOID);
	3859	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3860	MPFROM2SHORT(IDM_WALKDIR, FALSE), MPVOID);
	3861	WinSendMsg(hwndMenu, MM_DELETEITEM,
	3862	MPFROM2SHORT(IDM_FILTER, FALSE), MPVOID);
	3863	}
	3864	}
	3865	}
	3866	if (FrameFlags & FCF_TASKLIST) {
[2]	3867
[551]	3868	SWP swp, swpD;
	3869	ULONG size = sizeof(swp);
	3870	LONG cxScreen, cyScreen;
[2]	3871
[551]	3872	WinQueryTaskSizePos(WinQueryAnchorBlock(hwndFrame), 0, &swp);
	3873	if (PrfQueryProfileData(fmprof,
	3874	appname, "AV2SizePos", &swpD, &size)) {
	3875	cxScreen = WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN);
	3876	cyScreen = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
	3877	if (swp.x + swpD.cx > cxScreen)
	3878	swp.x = cxScreen - swpD.cx;
	3879	if (swp.y + swpD.cy > cyScreen)
	3880	swp.y = cyScreen - swpD.cy;
	3881	swp.cx = swpD.cx;
	3882	swp.cy = swpD.cy;
	3883	}
	3884	WinSetWindowPos(hwndFrame,
	3885	HWND_TOP,
	3886	swp.x,
	3887	swp.y,
	3888	swp.cx,
	3889	swp.cy,
	3890	SWP_SIZE \| SWP_MOVE \| SWP_SHOW \| SWP_ZORDER \|
	3891	SWP_ACTIVATE);
	3892	}
[1307]	3893	}
[2]	3894	}
[1077]	3895	# ifdef FORTIFY
	3896	Fortify_LeaveScope();
	3897	# endif
[2]	3898	}
	3899	}
	3900	return hwndFrame;
	3901	}
[793]	3902
	3903	#pragma alloc_text(ARCCNRS,ArcCnrWndProc,ArcObjWndProc,ArcClientWndProc,BldQuotedFullPathName)
	3904	#pragma alloc_text(ARCCNRS,ArcTextProc,FillArcCnr,ArcFilter,BldQuotedFileName)
	3905	#pragma alloc_text(ARCCNRS,ArcSort,ArcFrameWndProc,IsArcThere,ArcErrProc)
	3906	#pragma alloc_text(STARTUP,StartArcCnr)

Note: See TracBrowser for help on using the repository browser.

Download in other formats: