Context Navigation

source: trunk/dll/filldir.c@ 832

Visit:

Last change on this file since 832 was 783, checked in by Steven Levine, 18 years ago
Rework DosFindFirst/Next loops to optimize memory allocation and code paths Adjust FilesToGet limits Update configuration notebook scanning page Start updating #pragma alloc_text positioning for OpenWatcom compatibility
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 48.1 KB

Rev	Line
[31]	1
	2	/***********************************************************************
	3
	4	$Id: filldir.c 783 2007-08-14 04:09:54Z stevenhl $
	5
	6	Fill Directory Tree Containers
	7
	8	Copyright (c) 1993-98 M. Kimes
[552]	9	Copyright (c) 2001, 2007 Steven H. Levine
[31]	10
[145]	11	10 Jan 04 SHL ProcessDirectory: avoid most large drive failures
	12	24 May 05 SHL Rework Win_Error usage
[167]	13	24 May 05 SHL Rework for CNRITEM.szSubject
	14	25 May 05 SHL Rework for ULONGLONG
	15	25 May 05 SHL Rework FillInRecordFromFFB
	16	25 May 05 SHL Rework FillTreeCnr
[174]	17	28 May 05 SHL Drop stale debug code
[188]	18	05 Jun 05 SHL Comments
[214]	19	09 Jun 05 SHL Rework WinLoadFileIcon enables
	20	09 Jun 05 SHL Rework IDFile
[246]	21	13 Aug 05 SHL Renames
[282]	22	24 Oct 05 SHL FillInRecordFromFFB: correct longname display enable
	23	24 Oct 05 SHL FillInRecordFromFSA: correct longname display enable
	24	24 Oct 05 SHL Drop obsolete code
[359]	25	22 Jul 06 SHL Check more run time errors
[534]	26	20 Oct 06 SHL Sync . .. check code
	27	22 Oct 06 GKY Add NDFS32 support
[552]	28	17 Feb 07 GKY Additional archive and image file tyoes identifed by extension
	29	17 Feb 07 GKY Add more drive types
[557]	30	09 Mar 07 GKY Use SelectDriveIcon
[572]	31	20 Mar 07 GKY Increase extention check to 4 letters for icon selections
[705]	32	23 Jun 07 GKY Fixed ram disk without a directory not appearing on states drive list
[737]	33	23 Jul 07 SHL Sync with CNRITEM updates (ticket#24)
[744]	34	29 Jul 07 SHL Add CNRITEM free and remove support (ticket#24)
[751]	35	02 Aug 07 SHL Add FileAttrToString
[756]	36	03 Aug 07 GKY Enlarged and made setable everywhere Findbuf (speed file loading)
[760]	37	04 Aug 07 SHL Update #pragma alloc_test for new functions
[775]	38	06 Aug 07 GKY Reduce DosSleep times (ticket 148)
[783]	39	13 Aug 07 SHL Sync code with other FilesToGet usage and optimize
	40	13 Aug 07 SHL Move #pragma alloc_text to end for OpenWatcom compat
[31]	41
	42	***********************************************************************/
	43
[2]	44	#define INCL_DOS
	45	#define INCL_WIN
[783]	46	#define INCL_DOSERRORS
[167]	47	#define INCL_LONGLONG
	48	#include <os2.h>
[2]	49
	50	#include <stdarg.h>
	51	#include <stdio.h>
	52	#include <stdlib.h>
	53	#include <string.h>
	54	#include <ctype.h>
	55	#include <time.h>
[763]	56	#include <time.h>
	57
[783]	58	#if 0 // fixme to disable or to be configurable
[751]	59	#include <malloc.h> // _heapchk
[763]	60	#endif
[167]	61
[2]	62	#include "fm3dll.h"
	63	#include "fm3str.h"
	64
[359]	65	static PSZ pszSrcFile = __FILE__;
	66
[751]	67	/**
	68	* Return display string given standard file attribute mask
	69	* @param fileAttr attribute mask in FILEFINDBUF format
	70	* @return fixed length string for display
	71	*/
	72
	73	const PSZ FileAttrToString(ULONG fileAttr)
	74	{
	75	// From os2win.h
	76	// FILE_ATTRIBUTE_READONLY 0x00000001
	77	// FILE_ATTRIBUTE_HIDDEN 0x00000002
	78	// FILE_ATTRIBUTE_SYSTEM 0x00000004
	79	// 0x00000008
	80	// FILE_ATTRIBUTE_DIRECTORY 0x00000010
	81	// FILE_ATTRIBUTE_ARCHIVE 0x00000020
	82
	83	static CHAR *apszAttrString[] = {
	84	// RHSDA
	85	"-----",
	86	"R----",
	87	"-H---",
	88	"RH---",
	89	"--S--",
	90	"R-S--",
	91	"-HS--",
	92	"RHS--",
	93	"---D-",
	94	"R--D-",
	95	"-H-D-",
	96	"RH-D-",
	97	"--SD-",
	98	"R-SD-",
	99	"-HSD-",
	100	"RHSD-",
	101	"----A",
	102	"R---A",
	103	"-H--A",
	104	"RH--A",
	105	"--S-A",
	106	"R-S-A",
	107	"-HS-A",
	108	"RHS-A",
	109	"---DA",
	110	"R--DA",
	111	"-H-DA",
	112	"RH-DA",
	113	"--SDA",
	114	"R-SDA",
	115	"-HSDA",
	116	"RHSDA"
	117	};
	118
	119	fileAttr = ((fileAttr & 0x30) >> 1) \| (fileAttr & 7); // Drop don't care bit from index
	120
	121	return apszAttrString[fileAttr];
	122
	123	}
	124
[214]	125	static HPOINTER IDFile(PSZ p)
[90]	126	{
[2]	127	HPOINTER hptr;
[551]	128	ULONG cmp;
[572]	129	CHAR cmps[5];
[2]	130
[551]	131	p = strrchr(p, '.');
[572]	132	if (p && !p[5]) {
[214]	133	cmps[0] = '.';
	134	cmps[1] = toupper(p[1]);
	135	cmps[2] = toupper(p[2]);
	136	cmps[3] = toupper(p[3]);
[572]	137	cmps[4] = toupper(p[4]);
[214]	138
[551]	139	cmp = (ULONG ) cmps;
[214]	140
[551]	141	if (cmp == (ULONG ) ".EXE" \|\| cmp == (ULONG ) ".CMD" \|\|
	142	cmp == (ULONG ) ".BAT" \|\| cmp == (ULONG ) ".COM")
[214]	143	hptr = hptrApp;
[551]	144	else if (cmp == (ULONG ) ".ZIP" \|\| cmp == (ULONG ) ".LZH" \|\|
	145	cmp == (ULONG ) ".ARJ" \|\| cmp == (ULONG ) ".ARC" \|\|
[552]	146	cmp == (ULONG ) ".ZOO" \|\| cmp == (ULONG ) ".RAR" \|\|
	147	cmp == (ULONG ) ".TAR" \|\| cmp == (ULONG ) ".TGZ" \|\|
	148	cmp == (ULONG ) ".GZ" \|\| cmp == (ULONG ) ".Z" \|\|
	149	cmp == (ULONG ) ".CAB" \|\| cmp == (ULONG ) ".BZ2")
[214]	150	hptr = hptrArc;
[551]	151	else if (cmp == (ULONG ) ".BMP" \|\| cmp == (ULONG ) ".ICO" \|\|
	152	cmp == (ULONG ) ".PTR" \|\| cmp == (ULONG ) ".GIF" \|\|
	153	cmp == (ULONG ) ".TIF" \|\| cmp == (ULONG ) ".PCX" \|\|
[552]	154	cmp == (ULONG ) ".TGA" \|\| cmp == (ULONG ) ".XBM" \|\|
	155	cmp == (ULONG ) ".JPEG" \|\| cmp == (ULONG ) ".JPG" \|\|
	156	cmp == (ULONG ) ".PNG" \|\| cmp == (ULONG ) ".PSD" \|\|
	157	cmp == (ULONG ) ".LGO" \|\| cmp == (ULONG ) ".EPS" \|\|
	158	cmp == (ULONG ) ".RLE" \|\| cmp == (ULONG ) ".RAS" \|\|
	159	cmp == (ULONG ) ".PLC" \|\| cmp == (ULONG ) ".MSP" \|\|
	160	cmp == (ULONG ) ".IFF" \|\| cmp == (ULONG ) ".FIT" \|\|
	161	cmp == (ULONG ) ".DCX" \|\| cmp == (ULONG ) ".MAC" \|\|
	162	cmp == (ULONG ) ".SFF" \|\| cmp == (ULONG ) ".SGI" \|\|
	163	cmp == (ULONG ) ".XWD" \|\| cmp == (ULONG ) ".XPM" \|\|
	164	cmp == (ULONG ) ".WPG" \|\| cmp == (ULONG ) ".CUR" \|\|
	165	cmp == (ULONG ) ".PNM" \|\| cmp == (ULONG ) ".PPM" \|\|
	166	cmp == (ULONG ) ".PGM" \|\| cmp == (ULONG ) ".PBM")
[214]	167	hptr = hptrArt;
	168	else
[551]	169	hptr = (HPOINTER) 0;
[214]	170	}
	171	else
[551]	172	hptr = (HPOINTER) 0;
[214]	173
[2]	174	return hptr;
	175	}
	176
[214]	177	static BOOL IsDefaultIcon(HPOINTER hptr)
	178	{
	179	HPOINTER hptr2;
	180	HPOINTER hptr3;
	181	UINT u;
	182
	183	static HPOINTER hptrPMFile;
	184	static HPOINTER hptrWPSFile;
	185
[551]	186	if (!hptrPMFile) {
	187	hptrPMFile = WinQuerySysPointer(HWND_DESKTOP, SPTR_FILE, FALSE);
[214]	188	}
	189
	190	// try to guess WPS default file icon
[551]	191	hptr2 = (HPOINTER) 0;
	192	for (u = 0; !hptrWPSFile && u < 10; u++) {
[214]	193	char szFileName[CCHMAXPATH];
	194	char *psz;
	195
	196	psz = getenv("TMP");
	197	if (!psz && *psz)
	198	psz = getenv("TEMP");
[551]	199	if (psz && *psz) {
[214]	200	strcpy(szFileName, psz);
	201	psz = szFileName + strlen(szFileName) - 1;
[551]	202	if (*psz != '\\') {
[214]	203	psz++;
	204	*psz++ = '\\';
	205	}
	206	}
	207	else
	208	psz = szFileName;
	209
[551]	210	sprintf(psz, "%08x.%03x", rand() & 0xffffffff, rand() & 0xfff);
	211	if (IsFile(szFileName) != 1) {
	212	FILE *fp = fopen(szFileName, "w");
	213
	214	if (fp) {
[214]	215	fclose(fp);
	216	hptr3 = WinLoadFileIcon(szFileName, FALSE);
	217	unlinkf("%s", szFileName);
	218	if (!hptr2)
	219	hptr2 = hptr3;
[551]	220	else if (hptr3 == hptr3) {
[214]	221	hptrWPSFile = hptr3; // Got same icon twice
	222	break;
	223	}
	224	}
	225	}
	226	DosSleep(rand() % 100);
	227
[731]	228	} // for
[214]	229
	230	return hptr == hptrPMFile \|\| hptr == hptrWPSFile;
	231
[731]	232	} // IsDefaultIcon
[214]	233
[731]	234	ULONGLONG FillInRecordFromFFB(HWND hwndCnr,
	235	PCNRITEM pci,
[551]	236	const PSZ pszDirectory,
[731]	237	const PFILEFINDBUF4 pffb,
	238	const BOOL partial,
[737]	239	DIRCNRDATA *dcd)
[31]	240	{
[783]	241	// fill in a container record from a FILEFINDBUF4 structure
[2]	242
[551]	243	CHAR *p;
	244	HPOINTER hptr;
[2]	245
	246	pci->hwndCnr = hwndCnr;
[731]	247
	248	/* note that we cheat below, and accept the full pathname in pszDirectory
	249	if !*pffb->achName. This speeds up and simplifies processing elsewhere
[167]	250	(like in update.c)
[551]	251	*/
[763]	252	if (!*pffb->achName) {
[773]	253	pci->pszFileName = xstrdup(pszDirectory, pszSrcFile, __LINE__);
[763]	254	strcpy(pci->pszFileName, pszDirectory);
	255	}
[731]	256	else {
	257	INT c = strlen(pszDirectory);
	258	INT c2 = pffb->cchName + 1;
	259	if (pszDirectory[c - 1] != '\\')
	260	c2++;
[773]	261	pci->pszFileName = xmalloc(c + c2, pszSrcFile, __LINE__);
[731]	262	memcpy(pci->pszFileName, pszDirectory, c + 1);
	263	p = pci->pszFileName + c - 1;
[167]	264	if (*p != '\\') {
[2]	265	p++;
	266	*p = '\\';
	267	}
	268	p++;
[551]	269	memcpy(p, pffb->achName, pffb->cchName + 1);
[2]	270	}
[731]	271
[783]	272	// load the object's Subject, if required
[756]	273	pci->pszSubject = NullStr;
[167]	274	if (pffb->cbList > 4L &&
	275	dcd && fLoadSubject &&
[730]	276	(isalpha(*pci->pszFileName) &&
[731]	277	!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADSUBJS)))
	278	{
[551]	279	APIRET rc;
	280	EAOP2 eaop;
[2]	281	PGEA2LIST pgealist;
	282	PFEA2LIST pfealist;
[551]	283	PGEA2 pgea;
	284	PFEA2 pfea;
	285	CHAR *value;
[2]	286
[551]	287	pgealist = xmallocz(sizeof(GEA2LIST) + 32, pszSrcFile, __LINE__);
[359]	288	if (pgealist) {
[2]	289	pgea = &pgealist->list[0];
[551]	290	strcpy(pgea->szName, SUBJECT);
[2]	291	pgea->cbName = strlen(pgea->szName);
[188]	292	pgea->oNextEntryOffset = 0;
[2]	293	pgealist->cbList = (sizeof(GEA2LIST) + pgea->cbName);
[551]	294	pfealist = xmallocz(1532, pszSrcFile, __LINE__);
[359]	295	if (pfealist) {
[214]	296	pfealist->cbList = 1024;
	297	eaop.fpGEA2List = pgealist;
	298	eaop.fpFEA2List = pfealist;
	299	eaop.oError = 0;
[730]	300	rc = DosQueryPathInfo(pci->pszFileName, FIL_QUERYEASFROMLIST,
[551]	301	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
[214]	302	if (!rc) {
	303	pfea = &eaop.fpFEA2List->list[0];
	304	value = pfea->szName + pfea->cbName + 1;
	305	value[pfea->cbValue] = 0;
[551]	306	if ((USHORT ) value == EAT_ASCII)
[730]	307	pci->pszSubject = xstrdup(value + (sizeof(USHORT) * 2), pszSrcFile, __LINE__);
[214]	308	}
	309	free(pfealist);
[2]	310	}
	311	free(pgealist);
	312	}
	313	}
[731]	314	if (!pci->pszSubject)
[751]	315	pci->pszSubject = NullStr;
[731]	316
[783]	317	// load the object's longname
[762]	318	pci->pszLongName = 0;
[282]	319	if (fLoadLongnames &&
	320	dcd &&
	321	pffb->cbList > 4L &&
[730]	322	isalpha(*pci->pszFileName) &&
	323	~driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLONGNAMES &&
[731]	324	~driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADLONGS)
	325	{
[551]	326	APIRET rc;
	327	EAOP2 eaop;
[2]	328	PGEA2LIST pgealist;
	329	PFEA2LIST pfealist;
[551]	330	PGEA2 pgea;
	331	PFEA2 pfea;
	332	CHAR *value;
[2]	333
[551]	334	pgealist = xmallocz(sizeof(GEA2LIST) + 32, pszSrcFile, __LINE__);
[359]	335	if (pgealist) {
[2]	336	pgea = &pgealist->list[0];
[551]	337	strcpy(pgea->szName, LONGNAME);
[2]	338	pgea->cbName = strlen(pgea->szName);
[188]	339	pgea->oNextEntryOffset = 0;
[2]	340	pgealist->cbList = (sizeof(GEA2LIST) + pgea->cbName);
[551]	341	pfealist = xmallocz(1532, pszSrcFile, __LINE__);
[167]	342	if (pfealist) {
[214]	343	pfealist->cbList = 1024;
	344	eaop.fpGEA2List = pgealist;
	345	eaop.fpFEA2List = pfealist;
	346	eaop.oError = 0;
[730]	347	rc = DosQueryPathInfo(pci->pszFileName, FIL_QUERYEASFROMLIST,
[551]	348	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
	349	if (!rc) {
[214]	350	pfea = &eaop.fpFEA2List->list[0];
	351	value = pfea->szName + pfea->cbName + 1;
	352	value[pfea->cbValue] = 0;
[551]	353	if ((USHORT ) value == EAT_ASCII)
[762]	354	pci->pszLongName = xstrdup(value + (sizeof(USHORT) * 2), pszSrcFile, __LINE__);
[214]	355	}
	356	free(pfealist);
[2]	357	}
	358	free(pgealist);
	359	}
	360	}
[762]	361	if (!pci->pszLongName)
	362	pci->pszLongName = NullStr;
[731]	363
[783]	364	// do anything required to case of filename
[167]	365	if (fForceUpper)
[730]	366	strupr(pci->pszFileName);
[167]	367	else if (fForceLower)
[730]	368	strlwr(pci->pszFileName);
[2]	369
[783]	370	// get an icon to use with it
[551]	371	if (pffb->attrFile & FILE_DIRECTORY) {
[214]	372	// is directory
	373	if (fNoIconsDirs \|\|
[730]	374	(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADICONS) \|\|
	375	!isalpha(*pci->pszFileName)) {
[551]	376	hptr = (HPOINTER) 0;
[214]	377	}
	378	else
[730]	379	hptr = WinLoadFileIcon(pci->pszFileName, FALSE);
[2]	380	}
[551]	381	else {
[214]	382	// is file
	383	if (fNoIconsFiles \|\|
[730]	384	(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADICONS) \|\|
	385	!isalpha(*pci->pszFileName)) {
[551]	386	hptr = (HPOINTER) 0;
[167]	387	}
[42]	388	else
[730]	389	hptr = WinLoadFileIcon(pci->pszFileName, FALSE);
[167]	390
[214]	391	if (!hptr \|\| IsDefaultIcon(hptr))
[730]	392	hptr = IDFile(pci->pszFileName);
[2]	393	}
[214]	394
[551]	395	if (!hptr) {
[214]	396	hptr = pffb->attrFile & FILE_DIRECTORY ?
[731]	397	hptrDir : pffb->attrFile & FILE_SYSTEM ?
	398	hptrSystem :
	399	pffb->attrFile & FILE_HIDDEN ?
	400	hptrHidden :
	401	pffb->attrFile & FILE_READONLY ?
	402	hptrReadonly : hptrFile;
[167]	403	}
[2]	404
[737]	405	// Tell container what part of pathname to display
[551]	406	if (partial) {
[730]	407	p = strrchr(pci->pszFileName, '\\');
[551]	408	if (!p) {
[730]	409	p = strrchr(pci->pszFileName, ':');
[167]	410	if (!p)
[730]	411	p = pci->pszFileName;
[2]	412	else
[214]	413	p++;
[2]	414	}
[167]	415	else if ((dcd && dcd->type == TREE_FRAME) \|\|
[551]	416	(!(pffb->attrFile & FILE_DIRECTORY) \|\| !*(p + 1))) {
[2]	417	p++;
[167]	418	}
	419	if (!*p)
[730]	420	p = pci->pszFileName;
[2]	421	}
	422	else
[730]	423	p = pci->pszFileName;
[737]	424	pci->pszDisplayName = p;
	425
[783]	426	// now fill the darned thing in...
[551]	427	pci->date.day = pffb->fdateLastWrite.day;
	428	pci->date.month = pffb->fdateLastWrite.month;
	429	pci->date.year = pffb->fdateLastWrite.year + 1980;
	430	pci->time.seconds = pffb->ftimeLastWrite.twosecs * 2;
	431	pci->time.minutes = pffb->ftimeLastWrite.minutes;
	432	pci->time.hours = pffb->ftimeLastWrite.hours;
	433	pci->ladate.day = pffb->fdateLastAccess.day;
	434	pci->ladate.month = pffb->fdateLastAccess.month;
	435	pci->ladate.year = pffb->fdateLastAccess.year + 1980;
[2]	436	pci->latime.seconds = pffb->ftimeLastAccess.twosecs * 2;
	437	pci->latime.minutes = pffb->ftimeLastAccess.minutes;
[551]	438	pci->latime.hours = pffb->ftimeLastAccess.hours;
	439	pci->crdate.day = pffb->fdateCreation.day;
	440	pci->crdate.month = pffb->fdateCreation.month;
	441	pci->crdate.year = pffb->fdateCreation.year + 1980;
[2]	442	pci->crtime.seconds = pffb->ftimeCreation.twosecs * 2;
	443	pci->crtime.minutes = pffb->ftimeCreation.minutes;
[551]	444	pci->crtime.hours = pffb->ftimeCreation.hours;
	445	pci->easize = CBLIST_TO_EASIZE(pffb->cbList);
	446	pci->cbFile = pffb->cbFile;
	447	pci->attrFile = pffb->attrFile;
[751]	448	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[739]	449	pci->rc.pszIcon = pci->pszDisplayName;
[551]	450	pci->rc.hptrIcon = hptr;
[2]	451
[783]	452	// check to see if record should be visible
[167]	453	if (dcd && (*dcd->mask.szMask \|\| dcd->mask.antiattr \|\|
[551]	454	((dcd->mask.attrFile &
	455	(FILE_HIDDEN \| FILE_SYSTEM \| FILE_READONLY \| FILE_ARCHIVED))
	456	!=
	457	(FILE_HIDDEN \| FILE_SYSTEM \| FILE_READONLY \| FILE_ARCHIVED))))
[167]	458	{
[551]	459	if (*dcd->mask.szMask \|\| dcd->mask.antiattr) {
	460	if (!Filter((PMINIRECORDCORE) pci, (PVOID) & dcd->mask))
[214]	461	pci->rc.flRecordAttr \|= CRA_FILTERED;
[2]	462	}
[551]	463	else if ((!(dcd->mask.attrFile & FILE_HIDDEN) &&
	464	(pci->attrFile & FILE_HIDDEN)) \|\|
	465	(!(dcd->mask.attrFile & FILE_SYSTEM) &&
	466	(pci->attrFile & FILE_SYSTEM)) \|\|
	467	(!(dcd->mask.attrFile & FILE_READONLY) &&
	468	(pci->attrFile & FILE_READONLY)) \|\|
	469	(!(dcd->mask.attrFile & FILE_ARCHIVED) &&
	470	(pci->attrFile & FILE_ARCHIVED))) {
[2]	471	pci->rc.flRecordAttr \|= CRA_FILTERED;
[167]	472	}
[2]	473	}
	474
	475	return pffb->cbFile + pci->easize;
	476
[731]	477	} // FillInRecordFromFFB
[2]	478
[551]	479	ULONGLONG FillInRecordFromFSA(HWND hwndCnr, PCNRITEM pci, const PSZ pszFileName, const PFILESTATUS4 pfsa4, const BOOL partial, DIRCNRDATA * dcd) // Optional
[31]	480	{
[551]	481	HPOINTER hptr;
[731]	482	CHAR *p;
[2]	483
[783]	484	// fill in a container record from a FILESTATUS4 structure
[2]	485
	486	pci->hwndCnr = hwndCnr;
[773]	487	pci->pszFileName = xstrdup(pszFileName, pszSrcFile, __LINE__);
[763]	488	strcpy(pci->pszFileName, pszFileName);
[731]	489
[783]	490	// load the object's Subject, if required
[756]	491	pci->pszSubject = NullStr;
[167]	492	if (pfsa4->cbList > 4L &&
	493	dcd &&
	494	fLoadSubject &&
[730]	495	(!isalpha(*pci->pszFileName) \|\|
[731]	496	!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADSUBJS)))
	497	{
[551]	498	APIRET rc;
	499	EAOP2 eaop;
[2]	500	PGEA2LIST pgealist;
	501	PFEA2LIST pfealist;
[551]	502	PGEA2 pgea;
	503	PFEA2 pfea;
	504	CHAR *value;
[2]	505
[551]	506	pgealist = xmallocz(sizeof(GEA2LIST) + 32, pszSrcFile, __LINE__);
[167]	507	if (pgealist) {
[2]	508	pgea = &pgealist->list[0];
[551]	509	strcpy(pgea->szName, SUBJECT);
[2]	510	pgea->cbName = strlen(pgea->szName);
[188]	511	pgea->oNextEntryOffset = 0;
[2]	512	pgealist->cbList = (sizeof(GEA2LIST) + pgea->cbName);
[551]	513	pfealist = xmallocz(1532, pszSrcFile, __LINE__);
[167]	514	if (pfealist) {
[214]	515	pfealist->cbList = 1024;
	516	eaop.fpGEA2List = pgealist;
	517	eaop.fpFEA2List = pfealist;
	518	eaop.oError = 0;
[730]	519	rc = DosQueryPathInfo(pci->pszFileName, FIL_QUERYEASFROMLIST,
[551]	520	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
[214]	521	if (!rc) {
	522	pfea = &eaop.fpFEA2List->list[0];
	523	value = pfea->szName + pfea->cbName + 1;
	524	value[pfea->cbValue] = 0;
[551]	525	if ((USHORT ) value == EAT_ASCII)
[731]	526	pci->pszSubject = xstrdup(value + (sizeof(USHORT) * 2), pszSrcFile, __LINE__);
[214]	527	}
	528	free(pfealist);
[2]	529	}
	530	free(pgealist);
	531	}
	532	}
[731]	533	if (!pci->pszSubject)
[751]	534	pci->pszSubject = NullStr;
[731]	535
[762]	536	pci->pszLongName = 0;
[282]	537	if (fLoadLongnames &&
[167]	538	dcd &&
[282]	539	pfsa4->cbList > 4L &&
[730]	540	isalpha(*pci->pszFileName) &&
	541	~driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLONGNAMES &&
[731]	542	~driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADLONGS)
	543	{
[551]	544	APIRET rc;
	545	EAOP2 eaop;
[2]	546	PGEA2LIST pgealist;
	547	PFEA2LIST pfealist;
[551]	548	PGEA2 pgea;
	549	PFEA2 pfea;
	550	CHAR *value;
[2]	551
[551]	552	pgealist = xmallocz(sizeof(GEA2LIST) + 32, pszSrcFile, __LINE__);
[167]	553	if (pgealist) {
[2]	554	pgea = &pgealist->list[0];
[551]	555	strcpy(pgea->szName, LONGNAME);
[2]	556	pgea->cbName = strlen(pgea->szName);
[188]	557	pgea->oNextEntryOffset = 0;
[2]	558	pgealist->cbList = (sizeof(GEA2LIST) + pgea->cbName);
[551]	559	pfealist = xmallocz(1532, pszSrcFile, __LINE__);
[167]	560	if (pfealist) {
[214]	561	pfealist->cbList = 1024;
	562	eaop.fpGEA2List = pgealist;
	563	eaop.fpFEA2List = pfealist;
	564	eaop.oError = 0;
[730]	565	rc = DosQueryPathInfo(pci->pszFileName, FIL_QUERYEASFROMLIST,
[551]	566	(PVOID) & eaop, (ULONG) sizeof(EAOP2));
[214]	567	if (!rc) {
	568	pfea = &eaop.fpFEA2List->list[0];
[731]	569	value = pfea->szName + pfea->cbName + 1; // Point at EA value
	570	value[pfea->cbValue] = 0; // Terminate
	571	if ((USHORT ) value == EAT_ASCII) {
	572	p = value + sizeof(USHORT) * 2; // Point at value string
[762]	573	pci->pszLongName = xstrdup(p, pszSrcFile, __LINE__);
[731]	574	}
[214]	575	}
	576	free(pfealist);
[2]	577	}
	578	free(pgealist);
	579	}
	580	}
[762]	581	if (!pci->pszLongName)
	582	pci->pszLongName = NullStr;
[731]	583
[167]	584	if (fForceUpper)
[730]	585	strupr(pci->pszFileName);
[167]	586	else if (fForceLower)
[730]	587	strlwr(pci->pszFileName);
[2]	588
[551]	589	if (pfsa4->attrFile & FILE_DIRECTORY) {
[214]	590	if (fNoIconsDirs \|\|
[730]	591	(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADICONS) \|\|
	592	!isalpha(*pci->pszFileName)) {
[551]	593	hptr = (HPOINTER) 0;
[214]	594	}
	595	else
[730]	596	hptr = WinLoadFileIcon(pci->pszFileName, FALSE);
[2]	597	}
[551]	598	else {
[214]	599	if (fNoIconsFiles \|\|
[730]	600	(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOLOADICONS) \|\|
	601	!isalpha(*pci->pszFileName)) {
	602	hptr = IDFile(pci->pszFileName);
[2]	603	}
[214]	604	else
[730]	605	hptr = WinLoadFileIcon(pci->pszFileName, FALSE);
[2]	606	}
[551]	607	if (!hptr) {
[214]	608	hptr = pfsa4->attrFile & FILE_DIRECTORY ?
[551]	609	hptrDir :
	610	pfsa4->attrFile & FILE_SYSTEM ?
	611	hptrSystem :
	612	pfsa4->attrFile & FILE_HIDDEN ?
	613	hptrHidden : pfsa4->attrFile & FILE_READONLY ? hptrReadonly : hptrFile;
[214]	614	}
[2]	615
[737]	616	// Tell container what part of pathname to display
[551]	617	if (partial) {
[730]	618	p = strrchr(pci->pszFileName, '\\');
[167]	619	if (!p) {
[730]	620	p = strrchr(pci->pszFileName, ':');
[167]	621	if (!p)
[730]	622	p = pci->pszFileName;
[2]	623	else
[214]	624	p++;
[2]	625	}
[167]	626	else if ((dcd && dcd->type == TREE_FRAME) \|\|
[551]	627	!(pfsa4->attrFile & FILE_DIRECTORY) \|\| !*(p + 1))
[2]	628	p++;
[167]	629	if (!*p)
[730]	630	p = pci->pszFileName;
[2]	631	}
	632	else
[730]	633	p = pci->pszFileName;
[737]	634	pci->pszDisplayName = p;
	635
[551]	636	pci->date.day = pfsa4->fdateLastWrite.day;
	637	pci->date.month = pfsa4->fdateLastWrite.month;
	638	pci->date.year = pfsa4->fdateLastWrite.year + 1980;
	639	pci->time.seconds = pfsa4->ftimeLastWrite.twosecs * 2;
	640	pci->time.minutes = pfsa4->ftimeLastWrite.minutes;
	641	pci->time.hours = pfsa4->ftimeLastWrite.hours;
	642	pci->ladate.day = pfsa4->fdateLastAccess.day;
	643	pci->ladate.month = pfsa4->fdateLastAccess.month;
	644	pci->ladate.year = pfsa4->fdateLastAccess.year + 1980;
[2]	645	pci->latime.seconds = pfsa4->ftimeLastAccess.twosecs * 2;
	646	pci->latime.minutes = pfsa4->ftimeLastAccess.minutes;
[551]	647	pci->latime.hours = pfsa4->ftimeLastAccess.hours;
	648	pci->crdate.day = pfsa4->fdateCreation.day;
	649	pci->crdate.month = pfsa4->fdateCreation.month;
	650	pci->crdate.year = pfsa4->fdateCreation.year + 1980;
[2]	651	pci->crtime.seconds = pfsa4->ftimeCreation.twosecs * 2;
	652	pci->crtime.minutes = pfsa4->ftimeCreation.minutes;
[551]	653	pci->crtime.hours = pfsa4->ftimeCreation.hours;
	654	pci->easize = CBLIST_TO_EASIZE(pfsa4->cbList);
	655	pci->cbFile = pfsa4->cbFile;
	656	pci->attrFile = pfsa4->attrFile;
[751]	657	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[739]	658	pci->rc.pszIcon = pci->pszDisplayName;
[551]	659	pci->rc.hptrIcon = hptr;
[2]	660
[167]	661	if (dcd &&
	662	(*dcd->mask.szMask \|\| dcd->mask.antiattr \|\|
	663	((dcd->mask.attrFile &
[551]	664	(FILE_HIDDEN \| FILE_SYSTEM \| FILE_READONLY \| FILE_ARCHIVED)) !=
	665	(FILE_HIDDEN \| FILE_SYSTEM \| FILE_READONLY \| FILE_ARCHIVED)))) {
	666	if (*dcd->mask.szMask \|\| dcd->mask.antiattr) {
	667	if (!Filter((PMINIRECORDCORE) pci, (PVOID) & dcd->mask))
[214]	668	pci->rc.flRecordAttr \|= CRA_FILTERED;
[2]	669	}
[167]	670	else if ((!(dcd->mask.attrFile & FILE_HIDDEN) &&
[214]	671	(pci->attrFile & FILE_HIDDEN)) \|\|
	672	(!(dcd->mask.attrFile & FILE_SYSTEM) &&
	673	(pci->attrFile & FILE_SYSTEM)) \|\|
	674	(!(dcd->mask.attrFile & FILE_READONLY) &&
	675	(pci->attrFile & FILE_READONLY)) \|\|
	676	(!(dcd->mask.attrFile & FILE_ARCHIVED) &&
	677	(pci->attrFile & FILE_ARCHIVED)))
[2]	678	pci->rc.flRecordAttr \|= CRA_FILTERED;
	679	}
	680
	681	return pfsa4->cbFile + pci->easize;
	682
[731]	683	} // FillInRecordFromFSA
[2]	684
[737]	685	VOID ProcessDirectory(const HWND hwndCnr,
	686	const PCNRITEM pciParent,
	687	const CHAR *szDirBase,
	688	const BOOL filestoo,
	689	const BOOL recurse,
	690	const BOOL partial,
	691	CHAR *stopflag,
	692	DIRCNRDATA *dcd, // Optional
	693	ULONG *pulTotalFiles, // Optional
[167]	694	PULONGLONG pullTotalBytes) // Optional
[31]	695	{
[2]	696	/* put all the directories (and files if filestoo is TRUE) from a
	697	* directory into the container. recurse through subdirectories if
	698	* recurse is TRUE.
	699	*/
	700
[551]	701	PSZ pszFileSpec;
	702	INT t;
	703	PFILEFINDBUF4 paffbFound;
	704	PFILEFINDBUF4 *papffbSelected;
	705	PFILEFINDBUF4 pffbFile;
	706	PFILEFINDBUF4 paffbTotal = NULL;
	707	PFILEFINDBUF4 paffbTemp;
	708	HDIR hdir = HDIR_CREATE;
[783]	709	ULONG ulFindCnt;
	710	ULONG ulFindMax;
	711	ULONG ulSelCnt;
[551]	712	ULONG ulTotal = 0;
	713	ULONGLONG ullBytes;
	714	ULONGLONG ullTotalBytes;
	715	ULONG ulReturnFiles = 0;
	716	ULONGLONG ullReturnBytes = 0;
	717	PCH pchEndPath;
	718	APIRET rc;
	719	PCNRITEM pci;
	720	PCNRITEM pciFirst;
	721	RECORDINSERT ri;
	722	BOOL ok = TRUE;
[783]	723	ULONG ulBufBytes;
	724	ULONG x;
[2]	725
[551]	726	if (isalpha(*szDirBase) && szDirBase[1] == ':' && szDirBase[2] == '\\') {
[167]	727	if ((driveflags[toupper(*szDirBase) - 'A'] & DRIVE_REMOTE) && fRemoteBug)
[783]	728	ulFindMax = 1; // file system gets confused
[167]	729	else if (driveflags[toupper(*szDirBase) - 'A'] & DRIVE_ZIPSTREAM)
[783]	730	ulFindMax = min(FilesToGet, 225); // anything more is wasted
[2]	731	else
[783]	732	ulFindMax = FilesToGet; // full-out
[2]	733	}
[551]	734	else {
[783]	735	ulFindMax = FilesToGet;
[2]	736	}
[167]	737	if (OS2ver[0] == 20 && OS2ver[1] < 30)
[783]	738	ulFindMax = min(ulFindMax, (65535 / sizeof(FILEFINDBUF4)));
[2]	739
[783]	740	ulBufBytes = ulFindMax * sizeof(FILEFINDBUF4);
	741
[551]	742	pszFileSpec = xmalloc(CCHMAXPATH + 2, pszSrcFile, __LINE__);
[783]	743	paffbFound = xmalloc(ulBufBytes, pszSrcFile, __LINE__);
	744	papffbSelected = xmalloc(sizeof(PFILEFINDBUF4) * ulFindMax, pszSrcFile, __LINE__);
	745
[167]	746	if (paffbFound && papffbSelected && pszFileSpec) {
[2]	747	t = strlen(szDirBase);
[551]	748	memcpy(pszFileSpec, szDirBase, t + 1);
[42]	749	pchEndPath = pszFileSpec + t;
[167]	750	if (*(pchEndPath - 1) != '\\') {
[551]	751	memcpy(pchEndPath, "\\", 2);
[2]	752	pchEndPath++;
	753	}
[551]	754	memcpy(pchEndPath, "*", 2);
[2]	755	DosError(FERR_DISABLEHARDERR);
[783]	756	ulFindCnt = ulFindMax;
	757	rc = DosFindFirst(pszFileSpec,
	758	&hdir,
	759	FILE_NORMAL \| FILE_READONLY \| FILE_ARCHIVED \|
	760	FILE_SYSTEM \| FILE_HIDDEN \|
	761	(filestoo ? FILE_DIRECTORY : MUST_HAVE_DIRECTORY),
	762	paffbFound,
	763	ulBufBytes,
	764	&ulFindCnt,
	765	FIL_QUERYEASIZE);
[2]	766	priority_normal();
	767	*pchEndPath = 0;
[551]	768	if (!rc) {
[783]	769	do {
[214]	770	/*
	771	* remove . and .. from list if present
	772	* also counter file system bugs that sometimes
	773	* allows normal files to slip through when
	774	* only directories should appear (only a few
	775	* network file systems exhibit such a problem).
	776	*/
[783]	777	#if 0 // 13 Aug 07 SHL fixme to be gone
	778	{
	779	static ULONG ulMaxCnt = 1;
	780	if (ulFindCnt > ulMaxCnt) {
	781	ulMaxCnt = ulFindCnt;
	782	DbgMsg(pszSrcFile, __LINE__, "ulMaxCnt %u/%u", ulMaxCnt, ulFindMax);
	783	}
	784	}
	785	#endif // fixme to be gone
[2]	786
[214]	787	if (stopflag && *stopflag)
	788	goto Abort;
[783]	789	pffbFile = paffbFound;
	790	ulSelCnt = 0;
	791	for (;;) {
[214]	792	if (!*pffbFile->achName \|\|
[783]	793	(!filestoo && ~pffbFile->attrFile & FILE_DIRECTORY) \|\|
	794	(pffbFile->attrFile & FILE_DIRECTORY &&
[534]	795	pffbFile->achName[0] == '.' &&
	796	(!pffbFile->achName[1] \|\|
[551]	797	(pffbFile->achName[1] == '.' && !pffbFile->achName[2])))) {
[783]	798	// ulFindCnt--; // Got . or .. or file to be skipped
[174]	799	}
[214]	800	else
[783]	801	papffbSelected[ulSelCnt++] = pffbFile; // Remember selected file
[551]	802	if (!pffbFile->oNextEntryOffset) {
[783]	803	// ulFindCnt = ulSelCnt; // Remember number selected
[214]	804	break;
	805	}
[783]	806	pffbFile = (PFILEFINDBUF4)((PBYTE)pffbFile + pffbFile->oNextEntryOffset);
[763]	807	} // for
[783]	808	if (ulSelCnt) {
	809	// One or more entries selected
[214]	810	if (stopflag && *stopflag)
	811	goto Abort;
[551]	812	if (fSyncUpdates) {
[214]	813	pciFirst = WinSendMsg(hwndCnr, CM_ALLOCRECORD,
[783]	814	MPFROMLONG(EXTRA_RECORD_BYTES),
	815	MPFROMLONG(ulSelCnt));
[359]	816	if (!pciFirst) {
[551]	817	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
	818	IDS_CMALLOCRECERRTEXT);
[359]	819	ok = FALSE;
	820	ullTotalBytes = 0;
	821	}
	822	else {
[214]	823	pci = pciFirst;
	824	ullTotalBytes = 0;
[783]	825	// Insert selected in container
	826	for (x = 0; x < ulSelCnt; x++) {
	827	pffbFile = papffbSelected[x];
[551]	828	ullBytes = FillInRecordFromFFB(hwndCnr, pci, pszFileSpec,
	829	pffbFile, partial, dcd);
	830	pci = (PCNRITEM) pci->rc.preccNextRecord;
[214]	831	ullTotalBytes += ullBytes;
[731]	832	} // for
[783]	833	// 13 Aug 07 SHL ulSelCnt checked already?
	834	// if (ulSelCnt) {
	835	memset(&ri, 0, sizeof(RECORDINSERT));
	836	ri.cb = sizeof(RECORDINSERT);
	837	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	838	ri.pRecordParent = (PRECORDCORE) pciParent;
	839	ri.zOrder = (ULONG) CMA_TOP;
	840	ri.cRecordsInsert = ulSelCnt;
	841	ri.fInvalidateRecord =
	842	!fSyncUpdates && dcd && dcd->type == DIR_FRAME ?
[551]	843	FALSE : TRUE;
[783]	844	if (!WinSendMsg(hwndCnr,
	845	CM_INSERTRECORD,
	846	MPFROMP(pciFirst), MPFROMP(&ri))) {
	847	DosSleep(10); // Give GUI time to work
	848	WinSetFocus(HWND_DESKTOP, hwndCnr);
[214]	849	if (!WinSendMsg(hwndCnr,
	850	CM_INSERTRECORD,
[551]	851	MPFROMP(pciFirst), MPFROMP(&ri))) {
[783]	852	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
	853	IDS_CMINSERTERRTEXT);
	854	ok = FALSE;
	855	ullTotalBytes = 0;
	856	if (WinIsWindow((HAB) 0, hwndCnr))
	857	FreeCnrItemList(hwndCnr, pciFirst);
[214]	858	}
[783]	859	// }
[214]	860	}
	861	}
[551]	862	if (ok) {
[214]	863	ullReturnBytes += ullTotalBytes;
[783]	864	ulReturnFiles += ulSelCnt;
[214]	865	}
[783]	866	} // if sync updates
[551]	867	else {
[783]	868	// Append newly selected entries to aggregate list
[359]	869	paffbTemp = xrealloc(paffbTotal,
[783]	870	sizeof(FILEFINDBUF4) * (ulSelCnt + ulTotal),
[551]	871	pszSrcFile, __LINE__);
	872	if (paffbTemp) {
[783]	873	// 13 Aug 07 SHL fixme to optimize copy
[214]	874	paffbTotal = paffbTemp;
[783]	875	for (x = 0; x < ulSelCnt; x++)
[214]	876	paffbTotal[x + ulTotal] = *papffbSelected[x];
[783]	877	ulTotal += ulSelCnt;
[214]	878	}
[551]	879	else {
[214]	880	saymsg(MB_ENTER,
	881	HWND_DESKTOP,
[551]	882	GetPString(IDS_ERRORTEXT), GetPString(IDS_OUTOFMEMORY));
[214]	883	break;
	884	}
	885	}
[783]	886	} // if entries selected
[214]	887	if (stopflag && *stopflag)
[551]	888	goto Abort;
[214]	889	DosError(FERR_DISABLEHARDERR);
[783]	890	ulFindCnt = ulFindMax;
	891	rc = DosFindNext(hdir, paffbFound, ulBufBytes, &ulFindCnt);
[214]	892	priority_normal();
	893	if (rc)
	894	DosError(FERR_DISABLEHARDERR);
[783]	895	} while (!rc);
	896
[2]	897	DosFindClose(hdir);
	898
[783]	899	if (paffbFound) {
	900	free(paffbFound);
[214]	901	paffbFound = NULL;
[2]	902	}
[783]	903	if (papffbSelected) {
	904	free(papffbSelected);
	905	papffbSelected = NULL;
	906	}
[2]	907
[551]	908	if (ulTotal && paffbTotal) {
[167]	909
[214]	910	if (stopflag && *stopflag)
	911	goto Abort;
[167]	912
[214]	913	pciFirst = WinSendMsg(hwndCnr, CM_ALLOCRECORD,
[783]	914	MPFROMLONG(EXTRA_RECORD_BYTES), MPFROMLONG(ulTotal));
[359]	915	if (!pciFirst) {
[551]	916	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
	917	IDS_CMALLOCRECERRTEXT);
[359]	918	ok = FALSE;
	919	ullTotalBytes = 0;
	920	}
	921	else {
[214]	922	pci = pciFirst;
	923	ullTotalBytes = 0;
[783]	924	pffbFile = paffbTotal;
	925	for (x = 0; x < ulTotal; x++) {
[551]	926	ullBytes = FillInRecordFromFFB(hwndCnr, pci, pszFileSpec,
	927	pffbFile, partial, dcd);
	928	pci = (PCNRITEM) pci->rc.preccNextRecord;
[214]	929	ullTotalBytes += ullBytes;
[783]	930	// Can not use offset since we have merged lists - this should be equivalent
	931	pffbFile = (PFILEFINDBUF4)((PBYTE)pffbFile + sizeof(FILEFINDBUF4));
[214]	932	}
[551]	933	if (ulTotal) {
	934	memset(&ri, 0, sizeof(RECORDINSERT));
	935	ri.cb = sizeof(RECORDINSERT);
	936	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	937	ri.pRecordParent = (PRECORDCORE) pciParent;
	938	ri.zOrder = (ULONG) CMA_TOP;
	939	ri.cRecordsInsert = ulTotal;
	940	ri.fInvalidateRecord = (!fSyncUpdates && dcd &&
	941	dcd->type == DIR_FRAME) ? FALSE : TRUE;
	942	if (!WinSendMsg(hwndCnr, CM_INSERTRECORD,
	943	MPFROMP(pciFirst), MPFROMP(&ri))) {
[783]	944	DosSleep(10); // Give GUI time to work
[551]	945	WinSetFocus(HWND_DESKTOP, hwndCnr);
	946	if (!WinSendMsg(hwndCnr, CM_INSERTRECORD,
	947	MPFROMP(pciFirst), MPFROMP(&ri))) {
	948	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
	949	IDS_CMINSERTERRTEXT);
[214]	950	ok = FALSE;
	951	ullTotalBytes = 0;
[751]	952	if (WinIsWindow((HAB) 0, hwndCnr))
	953	FreeCnrItemList(hwndCnr, pciFirst);
[214]	954	}
	955	}
	956	}
	957	}
[551]	958	if (ok) {
[214]	959	ullReturnBytes += ullTotalBytes;
[783]	960	ulReturnFiles += ulFindCnt;
[214]	961	}
[2]	962	}
	963	}
	964
[783]	965	if (rc && rc != ERROR_NO_MORE_FILES) {
	966	Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__,
	967	GetPString(IDS_CANTFINDDIRTEXT), pszFileSpec);
	968	}
	969
[167]	970	if (!fSyncUpdates && dcd && dcd->type == DIR_FRAME)
[551]	971	WinSendMsg(hwndCnr, CM_INVALIDATERECORD, MPVOID,
	972	MPFROM2SHORT(0, CMA_ERASE));
[2]	973	}
	974	Abort:
[783]	975	if (paffbTotal)
	976	free(paffbTotal);
	977	if (pszFileSpec)
	978	free(pszFileSpec);
	979	if (paffbFound)
	980	free(paffbFound);
	981	if (papffbSelected)
	982	free(papffbSelected);
	983
[551]	984	if (recurse) {
[2]	985	pci = WinSendMsg(hwndCnr, CM_QUERYRECORD, MPFROMP(pciParent),
[214]	986	MPFROM2SHORT(CMA_FIRSTCHILD, CMA_ITEMORDER));
[762]	987	while (pci && (INT)pci != -1) {
[167]	988	if (pci->attrFile & FILE_DIRECTORY)
[551]	989	Stubby(hwndCnr, pci);
[2]	990	pci = WinSendMsg(hwndCnr, CM_QUERYRECORD, MPFROMP(pci),
[214]	991	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
[2]	992	}
	993	}
	994
[167]	995	if (pulTotalFiles)
	996	*pulTotalFiles = ulReturnFiles;
[2]	997
[167]	998	if (pullTotalBytes)
	999	*pullTotalBytes = ullReturnBytes;
[2]	1000
[731]	1001	} // ProcessDirectory
[167]	1002
	1003	VOID FillDirCnr(HWND hwndCnr,
[551]	1004	CHAR * pszDirectory,
	1005	DIRCNRDATA * dcd, PULONGLONG pullTotalBytes)
[90]	1006	{
[167]	1007	ProcessDirectory(hwndCnr,
[551]	1008	(PCNRITEM) NULL,
[167]	1009	pszDirectory,
[737]	1010	TRUE, // filestoo
	1011	FALSE, // recurse
	1012	TRUE, // partial
	1013	dcd ? &dcd->stopflag : NULL,
	1014	dcd,
	1015	NULL,
	1016	pullTotalBytes);
[2]	1017	DosPostEventSem(CompactSem);
	1018
[762]	1019	#if 0 // fixme to be gone or to be configurable
[751]	1020	{
	1021	int state = _heapchk();
	1022	if (state != _HEAPOK)
	1023	Runtime_Error(pszSrcFile, __LINE__, "heap corrupted %d", state);
[763]	1024	else
	1025	DbgMsg(pszSrcFile, __LINE__, "_memavl %u", _memavl());
[751]	1026	}
	1027	#endif
	1028
[731]	1029	} // FillDirCnr
[2]	1030
[551]	1031	VOID FillTreeCnr(HWND hwndCnr, HWND hwndParent)
[90]	1032	{
[731]	1033	ULONG ulCurDriveNum, ulDriveMap, numtoinsert = 0, drvtype;
[551]	1034	PCNRITEM pci, pciFirst = NULL, pciNext, pciParent = NULL;
	1035	INT x, removable;
[731]	1036	CHAR suggest[32];
[739]	1037	CHAR szDrive[] = " :\\";
	1038	CHAR szFileSystem[CCHMAXPATH];
[2]	1039	FILESTATUS4 fsa4;
[551]	1040	APIRET rc;
	1041	BOOL drivesbuilt = FALSE;
[739]	1042	ULONG startdrive = 3;
	1043
[2]	1044	static BOOL didonce = FALSE;
	1045
	1046	fDummy = TRUE;
	1047	*suggest = 0;
[689]	1048	for (x = 0; x < 26; x++) {
[2]	1049	driveflags[x] &= (DRIVE_IGNORE \| DRIVE_NOPRESCAN \| DRIVE_NOLOADICONS \|
[214]	1050	DRIVE_NOLOADSUBJS \| DRIVE_NOLOADLONGS \|
[552]	1051	DRIVE_INCLUDEFILES \| DRIVE_SLOW \| DRIVE_NOSTATS);
[689]	1052	}
[551]	1053	memset(driveserial, -1, sizeof(driveserial));
[739]	1054
	1055	DosError(FERR_DISABLEHARDERR);
	1056	if (!DosQuerySysInfo(QSV_BOOT_DRIVE,
	1057	QSV_BOOT_DRIVE,
	1058	(PVOID) &startdrive,
	1059	(ULONG) sizeof(ULONG)) &&
	1060	startdrive)
[2]	1061	{
[739]	1062	driveflags[startdrive - 1] \|= DRIVE_BOOT;
	1063	}
[2]	1064
	1065	DosError(FERR_DISABLEHARDERR);
[731]	1066	rc = DosQCurDisk(&ulCurDriveNum, &ulDriveMap);
[551]	1067	if (rc) {
[2]	1068	Dos_Error(MB_CANCEL,
[214]	1069	rc,
	1070	HWND_DESKTOP,
[551]	1071	pszSrcFile, __LINE__, GetPString(IDS_FILLDIRQCURERRTEXT));
[2]	1072	exit(0);
	1073	}
[739]	1074
[731]	1075	// Calc number of drive items to create
[689]	1076	for (x = 0; x < 26; x++) {
[167]	1077	if ((ulDriveMap & (1L << x)) && !(driveflags[x] & DRIVE_IGNORE))
[2]	1078	numtoinsert++;
[689]	1079	}
[739]	1080
[689]	1081	if (numtoinsert) {
[2]	1082	pciFirst = WinSendMsg(hwndCnr,
[214]	1083	CM_ALLOCRECORD,
[751]	1084	MPFROMLONG(EXTRA_RECORD_BYTES),
[551]	1085	MPFROMLONG((ULONG) numtoinsert));
[689]	1086	}
[739]	1087
[359]	1088	if (!pciFirst) {
[744]	1089	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__, IDS_CMALLOCRECERRTEXT);
[359]	1090	exit(0);
	1091	}
[689]	1092
[739]	1093	pci = pciFirst;
	1094	for (x = 0; x < 26; x++) {
	1095	if ((ulDriveMap & (1L << x)) && !(driveflags[x] & DRIVE_IGNORE)) {
[2]	1096
[739]	1097	CHAR s[80];
	1098	ULONG flags = 0;
	1099	ULONG size = sizeof(ULONG);
[2]	1100
[739]	1101	*szDrive = (CHAR)x + 'A'; // Build path spec
[731]	1102
[739]	1103	sprintf(s, "%c.DriveFlags", toupper(*szDrive));
	1104	if (PrfQueryProfileData(fmprof, appname, s, &flags, &size) &&
	1105	size == sizeof(ULONG)) {
	1106	driveflags[toupper(*szDrive) - 'A'] \|= flags;
	1107	}
[2]	1108
[739]	1109	if (x > 1) {
	1110	// Hard drive (2..N)
	1111	if (!(driveflags[x] & DRIVE_NOPRESCAN)) {
	1112	*szFileSystem = 0;
	1113	drvtype = 0;
	1114	removable = CheckDrive(*szDrive, szFileSystem, &drvtype);
	1115	driveserial[x] = -1;
	1116	if (removable != -1) {
	1117	struct {
	1118	ULONG serial;
	1119	CHAR volumelength;
	1120	CHAR volumelabel[CCHMAXPATH];
	1121	} volser;
[2]	1122
[739]	1123	DosError(FERR_DISABLEHARDERR);
	1124	if (!DosQueryFSInfo((ULONG) x,
	1125	FSIL_VOLSER, &volser, sizeof(volser))) {
	1126	driveserial[x] = volser.serial;
[731]	1127	}
[739]	1128	}
	1129	else
	1130	driveflags[x] \|= DRIVE_INVALID;
[731]	1131
[739]	1132	memset(&fsa4, 0, sizeof(FILESTATUS4));
	1133	driveflags[x] \|= removable == -1 \|\| removable == 1 ?
	1134	DRIVE_REMOVABLE : 0;
	1135	if (drvtype & DRIVE_REMOTE)
	1136	driveflags[x] \|= DRIVE_REMOTE;
	1137	if (!stricmp(szFileSystem,RAMFS)) {
	1138	driveflags[x] \|= DRIVE_RAMDISK;
	1139	driveflags[x] &= ~DRIVE_REMOTE;
	1140	}
	1141	if (!stricmp(szFileSystem,NDFS32)) {
	1142	driveflags[x] \|= DRIVE_VIRTUAL;
	1143	driveflags[x] &= ~DRIVE_REMOTE;
	1144	}
	1145	if (!stricmp(szFileSystem,NTFS))
	1146	driveflags[x] \|= DRIVE_NOTWRITEABLE;
	1147	if (strcmp(szFileSystem, HPFS) &&
	1148	strcmp(szFileSystem, JFS) &&
	1149	strcmp(szFileSystem, ISOFS) &&
	1150	strcmp(szFileSystem, CDFS) &&
	1151	strcmp(szFileSystem, FAT32) &&
	1152	strcmp(szFileSystem, NDFS32) &&
	1153	strcmp(szFileSystem, RAMFS) &&
	1154	strcmp(szFileSystem, NTFS) &&
	1155	strcmp(szFileSystem, HPFS386)) {
	1156	driveflags[x] \|= DRIVE_NOLONGNAMES;
	1157	}
[534]	1158
[739]	1159	if (!strcmp(szFileSystem, CDFS) \|\| !strcmp(szFileSystem,ISOFS)) {
	1160	removable = 1;
	1161	driveflags[x] \|= DRIVE_REMOVABLE \| DRIVE_NOTWRITEABLE \|
	1162	DRIVE_CDROM;
	1163	}
	1164	else if (!stricmp(szFileSystem, CBSIFS)) {
	1165	driveflags[x] \|= DRIVE_ZIPSTREAM;
	1166	driveflags[x] &= ~DRIVE_REMOTE;
	1167	if (drvtype & DRIVE_REMOVABLE)
	1168	driveflags[x] \|= DRIVE_REMOVABLE;
	1169	if (!(drvtype & DRIVE_NOLONGNAMES))
	1170	driveflags[x] &= ~DRIVE_NOLONGNAMES;
	1171	}
[2]	1172
[739]	1173	pci->rc.flRecordAttr \|= CRA_RECORDREADONLY;
	1174	// if ((ULONG) (toupper(*pci->pszFileName) - '@') == ulCurDriveNum) // 23 Jul 07 SHL
	1175	if ((ULONG)(toupper(*szDrive) - '@') == ulCurDriveNum)
	1176	pci->rc.flRecordAttr \|= (CRA_CURSORED \| CRA_SELECTED);
[2]	1177
[739]	1178	if (removable == 0) {
	1179	// Fixed volume
	1180	pci->attrFile \|= FILE_DIRECTORY;
	1181	DosError(FERR_DISABLEHARDERR);
	1182	rc = DosQueryPathInfo(szDrive,
	1183	FIL_QUERYEASIZE,
	1184	&fsa4, (ULONG) sizeof(FILESTATUS4));
	1185	// ERROR_BAD_NET_RSP = 58
	1186	if (rc == 58) {
[214]	1187	DosError(FERR_DISABLEHARDERR);
	1188	rc = DosQueryPathInfo(szDrive,
[739]	1189	FIL_STANDARD,
	1190	&fsa4, (ULONG) sizeof(FILESTATUS3));
	1191	fsa4.cbList = 0;
	1192	}
	1193	if (rc && !didonce) {
	1194	// Guess drive letter
	1195	if (!*suggest) {
	1196	*suggest = '/';
	1197	suggest[1] = 0;
[214]	1198	}
[739]	1199	sprintf(suggest + strlen(suggest), "%c" , toupper(*szDrive));
[773]	1200	pci->pszFileName = xstrdup(szDrive, pszSrcFile, __LINE__);
[763]	1201	strcpy(pci->pszFileName, szDrive);
[739]	1202	pci->pszDisplayName = pci->pszFileName;
	1203	pci->rc.pszIcon = pci->pszDisplayName;
[214]	1204	pci->attrFile = FILE_DIRECTORY;
[751]	1205	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[739]	1206	driveserial[x] = -1;
[731]	1207	}
[739]	1208	else
	1209	FillInRecordFromFSA(hwndCnr, pci, szDrive, &fsa4, TRUE, NULL);
[214]	1210	}
[551]	1211	else {
[739]	1212	// Removable volume
[773]	1213	pci->pszFileName = xstrdup(szDrive, pszSrcFile, __LINE__);
[763]	1214	strcpy(pci->pszFileName, szDrive);
[739]	1215	pci->pszDisplayName = pci->pszFileName;
	1216	pci->rc.pszIcon = pci->pszDisplayName;
[214]	1217	pci->attrFile = FILE_DIRECTORY;
[751]	1218	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[214]	1219	}
[739]	1220	SelectDriveIcon(pci);
[214]	1221	}
[551]	1222	else {
[739]	1223	pci->rc.hptrIcon = hptrDunno;
[773]	1224	pci->pszFileName = xstrdup(szDrive, pszSrcFile, __LINE__);
[763]	1225	strcpy(pci->pszFileName, szDrive);
[739]	1226	pci->pszDisplayName = pci->pszFileName;
[214]	1227	pci->rc.pszIcon = pci->pszFileName;
	1228	pci->attrFile = FILE_DIRECTORY;
[751]	1229	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[214]	1230	driveserial[x] = -1;
	1231	}
[2]	1232	}
[739]	1233	else {
	1234	// diskette drive (A or B)
	1235	pci->rc.hptrIcon = hptrFloppy;
[773]	1236	pci->pszFileName = xstrdup(szDrive, pszSrcFile, __LINE__);
[763]	1237	strcpy(pci->pszFileName, szDrive);
[739]	1238	pci->pszDisplayName = pci->pszFileName;
	1239	pci->rc.pszIcon = pci->pszDisplayName;
	1240	pci->attrFile = FILE_DIRECTORY;
[751]	1241	pci->pszDispAttr = FileAttrToString(pci->attrFile);
[739]	1242	driveflags[x] \|= (DRIVE_REMOVABLE \| DRIVE_NOLONGNAMES);
	1243	driveserial[x] = -1;
	1244	}
	1245	pci->rc.flRecordAttr \|= CRA_RECORDREADONLY;
[783]	1246	pci = (PCNRITEM) pci->rc.preccNextRecord; // next rec
[739]	1247	}
	1248	else if (!(ulDriveMap & (1L << x)))
	1249	driveflags[x] \|= DRIVE_INVALID;
	1250	} // for drives
[689]	1251
[739]	1252	PostMsg(hwndMain, UM_BUILDDRIVEBAR, MPVOID, MPVOID);
	1253	drivesbuilt = TRUE;
[2]	1254
[783]	1255	// insert the drives
[739]	1256	if (numtoinsert && pciFirst) {
	1257	RECORDINSERT ri;
	1258
	1259	memset(&ri, 0, sizeof(RECORDINSERT));
	1260	ri.cb = sizeof(RECORDINSERT);
	1261	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	1262	ri.pRecordParent = (PRECORDCORE) NULL;
	1263	ri.zOrder = (ULONG) CMA_TOP;
	1264	ri.cRecordsInsert = numtoinsert;
	1265	ri.fInvalidateRecord = FALSE;
	1266	if (!WinSendMsg(hwndCnr,
	1267	CM_INSERTRECORD, MPFROMP(pciFirst), MPFROMP(&ri)))
	1268	{
[744]	1269	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
[739]	1270	IDS_CMINSERTERRTEXT);
[2]	1271	}
[739]	1272	}
[689]	1273
[783]	1274	// move cursor onto the default drive rather than the first drive
[739]	1275	if (!fSwitchTree) {
	1276	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1277	CM_QUERYRECORD,
	1278	MPVOID,
	1279	MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER));
[762]	1280	while (pci && (INT)pci != -1) {
[739]	1281	if ((ULONG) (toupper(*pci->pszFileName) - '@') == ulCurDriveNum) {
	1282	WinSendMsg(hwndCnr,
	1283	CM_SETRECORDEMPHASIS,
	1284	MPFROMP(pci), MPFROM2SHORT(TRUE, CRA_CURSORED));
	1285	break;
	1286	}
[551]	1287	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1288	CM_QUERYRECORD,
[739]	1289	MPFROMP(pci),
	1290	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
[2]	1291	}
[739]	1292	}
[2]	1293
[739]	1294	if (hwndParent) {
	1295	WinSendMsg(WinWindowFromID(WinQueryWindow(hwndParent, QW_PARENT),
	1296	MAIN_DRIVELIST),
	1297	LM_DELETEALL, MPVOID, MPVOID);
	1298	}
[2]	1299
[739]	1300	if (fShowEnv) {
	1301	RECORDINSERT ri;
[2]	1302
[739]	1303	pciParent = WinSendMsg(hwndCnr,
	1304	CM_ALLOCRECORD,
[751]	1305	MPFROMLONG(EXTRA_RECORD_BYTES), MPFROMLONG(1));
[739]	1306	if (pciParent) {
	1307	pciParent->flags \|= RECFLAGS_ENV;
[773]	1308	pciParent->pszFileName = xstrdup(GetPString(IDS_ENVVARSTEXT), pszSrcFile, __LINE__);
[763]	1309	strcpy(pciParent->pszFileName, GetPString(IDS_ENVVARSTEXT));
	1310	pciParent->pszDisplayName = pciParent->pszFileName; // 03 Aug 07 SHL
[739]	1311	pciParent->rc.hptrIcon = hptrEnv;
	1312	pciParent->rc.pszIcon = pciParent->pszFileName;
[751]	1313	pciParent->pszDispAttr = FileAttrToString(0);
[739]	1314	memset(&ri, 0, sizeof(RECORDINSERT));
	1315	ri.cb = sizeof(RECORDINSERT);
	1316	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	1317	ri.pRecordParent = (PRECORDCORE) NULL;
	1318	ri.zOrder = (ULONG) CMA_TOP;
	1319	ri.cRecordsInsert = 1;
	1320	ri.fInvalidateRecord = FALSE;
	1321	if (WinSendMsg(hwndCnr,
	1322	CM_INSERTRECORD, MPFROMP(pciParent), MPFROMP(&ri))) {
[2]	1323
[739]	1324	char p, pp;
[2]	1325
[739]	1326	p = GetPString(IDS_ENVVARNAMES);
	1327	while (*p == ' ')
	1328	p++;
	1329	while (*p) {
	1330	*szFileSystem = 0;
	1331	pp = szFileSystem;
	1332	while (p && p != ' ')
	1333	pp++ = p++;
	1334	*pp = 0;
[551]	1335	while (*p == ' ')
[214]	1336	p++;
[739]	1337	if (*szFileSystem &&
	1338	(!stricmp(szFileSystem, "LIBPATH") \|\| getenv(szFileSystem))) {
	1339	pci = WinSendMsg(hwndCnr,
	1340	CM_ALLOCRECORD,
[751]	1341	MPFROMLONG(EXTRA_RECORD_BYTES),
[739]	1342	MPFROMLONG(1));
	1343	if (pci) {
	1344	CHAR fname[CCHMAXPATH];
	1345	pci->flags \|= RECFLAGS_ENV;
	1346	sprintf(fname, "%%%s%%", szFileSystem);
	1347	pci->pszFileName = xstrdup(fname, pszSrcFile, __LINE__);
	1348	pci->rc.hptrIcon = hptrEnv;
	1349	pci->rc.pszIcon = pci->pszFileName;
[751]	1350	pci->pszDispAttr = FileAttrToString(0);
[739]	1351	memset(&ri, 0, sizeof(RECORDINSERT));
	1352	ri.cb = sizeof(RECORDINSERT);
	1353	ri.pRecordOrder = (PRECORDCORE) CMA_END;
	1354	ri.pRecordParent = (PRECORDCORE) pciParent;
	1355	ri.zOrder = (ULONG) CMA_TOP;
	1356	ri.cRecordsInsert = 1;
	1357	ri.fInvalidateRecord = FALSE;
	1358	if (!WinSendMsg(hwndCnr,
	1359	CM_INSERTRECORD,
	1360	MPFROMP(pci), MPFROMP(&ri))) {
[744]	1361	Win_Error2(hwndCnr, HWND_DESKTOP, pszSrcFile, __LINE__,
[739]	1362	IDS_CMINSERTERRTEXT);
[751]	1363	FreeCnrItem(hwndCnr, pci);
[214]	1364	}
	1365	}
	1366	}
	1367	}
[739]	1368	WinSendMsg(hwndCnr,
	1369	CM_INVALIDATERECORD,
	1370	MPFROMP(&pciParent),
	1371	MPFROM2SHORT(1, CMA_ERASE \| CMA_REPOSITION));
[2]	1372	}
[739]	1373	else
[751]	1374	FreeCnrItem(hwndCnr, pciParent);
[739]	1375	}
	1376	} // if show env
[2]	1377
[739]	1378	x = 0;
	1379	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1380	CM_QUERYRECORD,
	1381	MPVOID,
	1382	MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER));
[762]	1383	while (pci && (INT)pci != -1) {
[739]	1384	pciNext = (PCNRITEM) WinSendMsg(hwndCnr,
	1385	CM_QUERYRECORD,
	1386	MPFROMP(pci),
	1387	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
	1388	if (!(pci->flags & RECFLAGS_ENV)) {
	1389	if ((ULONG) (toupper(*pci->pszFileName) - '@') == ulCurDriveNum \|\|
	1390	toupper(*pci->pszFileName) > 'B')
	1391	{
	1392	if (!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_INVALID) &&
	1393	!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_NOPRESCAN) &&
	1394	(!fNoRemovableScan \|\|
	1395	!(driveflags[toupper(*pci->pszFileName) - 'A'] & DRIVE_REMOVABLE)))
	1396	{
	1397	if (!Stubby(hwndCnr, pci) && !DRIVE_RAMDISK) {
	1398	WinSendMsg(hwndCnr,
	1399	CM_INVALIDATERECORD,
	1400	MPFROMP(&pci),
	1401	MPFROM2SHORT(1, CMA_ERASE \| CMA_REPOSITION));
	1402	goto SkipBadRec;
[214]	1403	}
	1404	}
[739]	1405	}
	1406	else {
	1407	WinSendMsg(hwndCnr,
	1408	CM_INVALIDATERECORD,
	1409	MPFROMP(&pci),
	1410	MPFROM2SHORT(1, CMA_ERASE \| CMA_REPOSITION));
	1411	}
[167]	1412
[739]	1413	WinSendMsg(WinWindowFromID(WinQueryWindow(hwndParent, QW_PARENT),
	1414	MAIN_DRIVELIST),
	1415	LM_INSERTITEM,
	1416	MPFROM2SHORT(LIT_SORTASCENDING, 0),
	1417	MPFROMP(pci->pszFileName));
[2]	1418	}
[739]	1419	SkipBadRec:
	1420	x++;
	1421	pci = pciNext;
	1422	}
	1423	if (hwndParent)
	1424	WinSendMsg(WinWindowFromID(WinQueryWindow(hwndParent, QW_PARENT),
	1425	MAIN_DRIVELIST), LM_SELECTITEM,
	1426	MPFROM2SHORT(0, 0), MPFROMLONG(TRUE));
[2]	1427
[739]	1428	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1429	CM_QUERYRECORD,
	1430	MPVOID,
	1431	MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER));
[762]	1432	while (pci && (INT)pci != -1) {
[739]	1433	pciNext = (PCNRITEM) WinSendMsg(hwndCnr,
[551]	1434	CM_QUERYRECORD,
	1435	MPFROMP(pci),
[739]	1436	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
	1437	if (pci->flags & RECFLAGS_ENV) {
[551]	1438	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1439	CM_QUERYRECORD,
	1440	MPFROMP(pci),
[739]	1441	MPFROM2SHORT(CMA_FIRSTCHILD,
	1442	CMA_ITEMORDER));
[762]	1443	while (pci && (INT)pci != -1) {
[739]	1444	if (pci->flags & RECFLAGS_ENV)
	1445	FleshEnv(hwndCnr, pci);
	1446	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1447	CM_QUERYRECORD,
	1448	MPFROMP(pci),
	1449	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
	1450	}
	1451	break;
[2]	1452	}
[739]	1453	pci = (PCNRITEM) WinSendMsg(hwndCnr,
	1454	CM_QUERYRECORD,
	1455	MPFROMP(pci),
	1456	MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER));
	1457	}
[2]	1458
[167]	1459	if (!drivesbuilt && hwndMain)
[551]	1460	PostMsg(hwndMain, UM_BUILDDRIVEBAR, MPVOID, MPVOID);
[783]	1461	DosSleep(16); // 05 Aug 07 GKY 33
[2]	1462	fDummy = FALSE;
	1463	DosPostEventSem(CompactSem);
[739]	1464
[2]	1465	{
	1466	BYTE info;
	1467	BOOL includesyours = FALSE;
	1468
[551]	1469	if (*suggest \|\| (!(driveflags[1] & DRIVE_IGNORE) && fFirstTime)) {
	1470	if (!DosDevConfig(&info, DEVINFO_FLOPPY) && info == 1) {
	1471	if (!*suggest) {
[214]	1472	*suggest = '/';
	1473	suggest[1] = 0;
	1474	}
	1475	else
[551]	1476	memmove(suggest + 2, suggest + 1, strlen(suggest));
[214]	1477	suggest[1] = 'B';
[2]	1478	}
	1479	}
[551]	1480	if (*suggest) {
	1481	for (x = 2; x < 26; x++) {
	1482	if (driveflags[x] & DRIVE_IGNORE) {
[214]	1483	includesyours = TRUE;
[551]	1484	sprintf(suggest + strlen(suggest), "%c", (char)(x + 'A'));
[214]	1485	}
[2]	1486	}
[551]	1487	strcat(suggest, " %*");
[167]	1488	if (saymsg(MB_YESNO \| MB_ICONEXCLAMATION,
[214]	1489	(hwndParent) ? hwndParent : hwndCnr,
	1490	GetPString(IDS_SUGGESTTITLETEXT),
	1491	GetPString(IDS_SUGGEST1TEXT),
	1492	(includesyours) ? GetPString(IDS_SUGGEST2TEXT) : NullStr,
[551]	1493	suggest) == MBID_YES) {
[214]	1494	char s[64];
[2]	1495
[214]	1496	sprintf(s, "PARAMETERS=%s", suggest);
[551]	1497	WinCreateObject(WPProgram, "FM/2", s, FM3Folder, CO_UPDATEIFEXISTS);
[214]	1498	WinCreateObject(WPProgram,
[551]	1499	"FM/2 Lite", s, FM3Folder, CO_UPDATEIFEXISTS);
[214]	1500	WinCreateObject(WPProgram,
[551]	1501	"Archive Viewer/2", s, FM3Tools, CO_UPDATEIFEXISTS);
[214]	1502	WinCreateObject(WPProgram,
[551]	1503	"Dir Sizes", s, FM3Tools, CO_UPDATEIFEXISTS);
[214]	1504	WinCreateObject(WPProgram,
[551]	1505	"Visual Tree", s, FM3Tools, CO_UPDATEIFEXISTS);
[214]	1506	WinCreateObject(WPProgram,
[551]	1507	"Visual Directory", s, FM3Tools, CO_UPDATEIFEXISTS);
[214]	1508	WinCreateObject(WPProgram,
[551]	1509	"Global File Viewer", s, FM3Tools, CO_UPDATEIFEXISTS);
	1510	WinCreateObject(WPProgram, "Databar", s, FM3Tools, CO_UPDATEIFEXISTS);
[2]	1511	}
	1512	}
	1513	}
[739]	1514
[2]	1515	didonce = TRUE;
	1516
[731]	1517	} // FillTreeCnr
[743]	1518
	1519
	1520	/**
	1521	* Empty all records from a container and free associated storage and
	1522	* Free up field infos
	1523	*/
	1524
	1525	VOID EmptyCnr(HWND hwnd)
	1526	{
	1527	PFIELDINFO pfi;
	1528
[762]	1529	#if 0 // fixme to be gone or to be configurable
[751]	1530	{
	1531	int state = _heapchk();
	1532	if (state != _HEAPOK)
	1533	Runtime_Error(pszSrcFile, __LINE__, "heap corrupted %d", state);
	1534	}
	1535	#endif
	1536
[743]	1537	// Remove all records
	1538	RemoveCnrItems(hwnd, NULL, 0, CMA_FREE);
	1539
	1540	// Remove field info descriptors
	1541	pfi = (PFIELDINFO) WinSendMsg(hwnd, CM_QUERYDETAILFIELDINFO, MPVOID,
	1542	MPFROMSHORT(CMA_FIRST));
[745]	1543	if (pfi &&
	1544	(INT)WinSendMsg(hwnd, CM_REMOVEDETAILFIELDINFO, MPVOID,
	1545	MPFROM2SHORT(0, CMA_FREE)) == -1) {
	1546	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_REMOVEDETAILFIELDINFO hwnd %x", hwnd);
	1547	}
[743]	1548	}
	1549
	1550	/**
	1551	* Free storage associated with container item
	1552	*/
	1553
[751]	1554	VOID FreeCnrItemData(PCNRITEM pci)
[743]	1555	{
[762]	1556	PSZ psz;
[745]	1557	// DbgMsg(pszSrcFile, __LINE__, "FreeCnrItemData %p", pci);
	1558
[762]	1559	if (pci->pszSubject && pci->pszSubject != NullStr) {
[743]	1560
[762]	1561	psz = pci->pszSubject;
	1562	pci->pszSubject = NullStr;
	1563	free(psz);
	1564	}
[743]	1565
[762]	1566	// +1 in case long name pointing after last backslash
	1567	if (pci->pszLongName &&
	1568	pci->pszLongName != NullStr &&
	1569	pci->pszLongName != pci->pszFileName &&
	1570	pci->pszLongName != pci->pszDisplayName &&
	1571	pci->pszLongName != pci->pszDisplayName + 1) {
	1572	psz = pci->pszLongName;
	1573	pci->pszLongName = NullStr;
	1574	free(psz);
	1575	}
	1576
	1577	if (pci->pszFileName && pci->pszFileName != NullStr) {
	1578	psz = pci->pszFileName;
	1579	pci->pszFileName = NullStr;
	1580	free(psz);
	1581	}
[743]	1582	}
	1583
	1584	/**
[762]	1585	* Free single container item and associated storage
[743]	1586	*/
	1587
[762]	1588	VOID FreeCnrItem(HWND hwnd, PCNRITEM pci)
[743]	1589	{
[745]	1590	// DbgMsg(pszSrcFile, __LINE__, "FreeCnrItem hwnd %x pci %p", hwnd, pci);
	1591
[743]	1592	FreeCnrItemData(pci);
	1593
[762]	1594	if (!WinSendMsg(hwnd, CM_FREERECORD, MPFROMP(&pci), MPFROMSHORT(1))) {
[744]	1595	// Win_Error2(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,IDS_CMFREEERRTEXT);
[773]	1596	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,
	1597	"CM_FREERECORD hwnd %x pci %p file %s",
[783]	1598	hwnd, pci,
[773]	1599	pci && pci->pszFileName ? pci->pszFileName : "n/a");
[743]	1600	}
	1601	}
	1602
	1603	/**
[751]	1604	* Free container item list and associated storage
[743]	1605	*/
	1606
[751]	1607	VOID FreeCnrItemList(HWND hwnd, PCNRITEM pciFirst)
[743]	1608	{
[751]	1609	PCNRITEM pci = pciFirst;
	1610	PCNRITEM pciNext;
[762]	1611	USHORT usCount;
[751]	1612
[762]	1613	for (usCount = 0; pci; usCount++) {
[751]	1614	pciNext = (PCNRITEM) pci->rc.preccNextRecord;
[762]	1615	FreeCnrItemData(pci);
[751]	1616	pci = pciNext;
	1617	}
[762]	1618
	1619	if (usCount) {
	1620	if (!WinSendMsg(hwnd, CM_FREERECORD, MPFROMP(&pci), MPFROMSHORT(usCount))) {
	1621	// Win_Error2(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,IDS_CMFREEERRTEXT);
	1622	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_FREERECORD hwnd %x pci %p cnt %u", hwnd, pci, usCount);
	1623	}
	1624	}
[751]	1625	}
	1626
	1627	/**
	1628	* Remove item(s) from container and free associated storage if requested
[762]	1629	* @param pciFirst points to first item to remove or NULL to remove all
	1630	* @param usCnt is remove count or 0 to remove all
[751]	1631	* @returns count of items remaining in container or -1 if error
	1632	*/
	1633
[762]	1634	INT RemoveCnrItems(HWND hwnd, PCNRITEM pciFirst, USHORT usCnt, USHORT usFlags)
[751]	1635	{
[762]	1636	INT remaining = usCnt;
	1637	PCNRITEM pci;
[751]	1638
[762]	1639	if ((usCnt && !pciFirst) \|\| (!usCnt && pciFirst)) {
	1640	Runtime_Error(pszSrcFile, __LINE__, "pciFirst %p usCnt %u mismatch", pciFirst, usCnt);
[751]	1641	remaining = -1;
[762]	1642	}
	1643	else {
	1644	// Free our buffers if free requested
	1645	if (usFlags & CMA_FREE) {
	1646	if (pciFirst)
	1647	pci = pciFirst;
	1648	else {
[743]	1649	pci = (PCNRITEM)WinSendMsg(hwnd, CM_QUERYRECORD, MPVOID,
[744]	1650	MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER));
[762]	1651	if ((INT)pci == -1) {
[744]	1652	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_QUERYRECORD");
[751]	1653	remaining = -1;
[762]	1654	pci = NULL;
	1655	}
	1656	}
	1657	while (pci) {
	1658	FreeCnrItemData(pci);
	1659	pci = (PCNRITEM)pci->rc.preccNextRecord;
	1660	if (remaining && --remaining == 0)
[744]	1661	break;
[762]	1662	}
[743]	1663	}
	1664	}
[745]	1665
[762]	1666	// DbgMsg(pszSrcFile, __LINE__, "RemoveCnrItems %p %u %s", pci, usCnt, pci->pszFileName);
[743]	1667
[762]	1668	if (remaining != - 1) {
	1669	remaining = (INT)WinSendMsg(hwnd, CM_REMOVERECORD, MPFROMP(&pciFirst), MPFROM2SHORT(usCnt, usFlags));
[751]	1670	if (remaining == -1) {
[744]	1671	// Win_Error2(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,IDS_CMREMOVEERRTEXT);
[762]	1672	Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__,"CM_REMOVERECORD hwnd %x pci %p cnt %u", hwnd, pciFirst, usCnt);
[743]	1673	}
	1674	}
[762]	1675
[751]	1676	return remaining;
[743]	1677	}
	1678
[783]	1679	#pragma alloc_text(FILLDIR,FillInRecordFromFFB,FillInRecordFromFSA,IDFile)
	1680	#pragma alloc_text(FILLDIR1,ProcessDirectory,FillDirCnr,FillTreeCnr,FileAttrToString)
	1681	#pragma alloc_text(EMPTYCNR,EmptyCnr,FreeCnrItemData,FreeCnrItem,FreeCnrItemList,RemoveCnrItems)
	1682

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

Download in other formats: