| [36] | 1 |  | 
|---|
|  | 2 | /*********************************************************************** | 
|---|
|  | 3 |  | 
|---|
|  | 4 | $Id: seeall.c 551 2007-02-28 01:33:51Z gyoung $ | 
|---|
|  | 5 |  | 
|---|
|  | 6 | See all matching files | 
|---|
|  | 7 |  | 
|---|
|  | 8 | Copyright (c) 1993-98 M. Kimes | 
|---|
| [302] | 9 | Copyright (c) 2001, 2006 Steven H. Levine | 
|---|
| [36] | 10 |  | 
|---|
| [130] | 11 | 16 Oct 02 SHL Handle large partitions | 
|---|
|  | 12 | 25 Nov 03 SHL StartSeeAll: avoid forgetting startpath | 
|---|
|  | 13 | 06 Dec 03 SHL StartSeeAll: correct malloc arg oops | 
|---|
|  | 14 | 23 May 05 SHL Use QWL_USER | 
|---|
| [162] | 15 | 25 May 05 SHL Use ULONGLONG and CommaFmtULL | 
|---|
| [186] | 16 | 05 Jun 05 SHL Use QWL_USER | 
|---|
| [204] | 17 | 06 Jun 05 SHL Drop unused code | 
|---|
| [302] | 18 | 29 May 06 SHL Comments | 
|---|
| [335] | 19 | 17 Jul 06 SHL Use Runtime_Error | 
|---|
| [517] | 20 | 19 Oct 06 SHL Correct . and .. detect | 
|---|
| [533] | 21 | 03 Nov 06 SHL Renames | 
|---|
|  | 22 | 03 Nov 06 SHL Count thread usage | 
|---|
| [36] | 23 |  | 
|---|
|  | 24 | ***********************************************************************/ | 
|---|
|  | 25 |  | 
|---|
| [2] | 26 | #define INCL_DOS | 
|---|
|  | 27 | #define INCL_DOSERRORS | 
|---|
|  | 28 | #define INCL_WIN | 
|---|
|  | 29 | #define INCL_GPI | 
|---|
| [162] | 30 | #define INCL_LONGLONG | 
|---|
|  | 31 | #include <os2.h> | 
|---|
| [2] | 32 |  | 
|---|
|  | 33 | #include <stdlib.h> | 
|---|
|  | 34 | #include <stdio.h> | 
|---|
|  | 35 | #include <string.h> | 
|---|
|  | 36 | #include <ctype.h> | 
|---|
|  | 37 | #include <process.h> | 
|---|
| [162] | 38 |  | 
|---|
| [2] | 39 | #include "fm3dll.h" | 
|---|
|  | 40 | #include "fm3dlg.h" | 
|---|
|  | 41 | #include "fm3str.h" | 
|---|
|  | 42 |  | 
|---|
|  | 43 | #pragma data_seg(DATA2) | 
|---|
| [335] | 44 |  | 
|---|
|  | 45 | static PSZ pszSrcFile = __FILE__; | 
|---|
|  | 46 |  | 
|---|
| [2] | 47 | #pragma alloc_text(SEEALL,comparefullnames,comparenames,comparesizes) | 
|---|
|  | 48 | #pragma alloc_text(SEEALL,comparedates,compareexts,SeeStatusProc) | 
|---|
|  | 49 | #pragma alloc_text(SEEALL,InitWindow,PaintLine,SeeAllWndProc) | 
|---|
| [204] | 50 | #pragma alloc_text(SEEALL,UpdateList,CollectList,ReSort,Mark) | 
|---|
| [2] | 51 | #pragma alloc_text(SEEALL,BuildAList,RemoveDeleted,SeeFrameWndProc,FilterList) | 
|---|
| [533] | 52 | #pragma alloc_text(SEEALL2,SeeObjWndProc,MakeSeeObjWinThread,FindDupes,DupeDlgProc) | 
|---|
| [162] | 53 | #pragma alloc_text(SEEALL3,FreeAllFilesList,DoADir,FindAllThread,AFDrvsWndProc) | 
|---|
| [2] | 54 | #pragma alloc_text(SEEALL3,StartSeeAll) | 
|---|
|  | 55 |  | 
|---|
| [551] | 56 | typedef struct | 
|---|
|  | 57 | { | 
|---|
|  | 58 | CHAR *fullname, *filename; | 
|---|
|  | 59 | USHORT attrFile, flags; | 
|---|
|  | 60 | FDATE date; | 
|---|
|  | 61 | FTIME time; | 
|---|
|  | 62 | ULONG cbFile, CRC; | 
|---|
|  | 63 | } | 
|---|
|  | 64 | ALLFILES; | 
|---|
| [2] | 65 |  | 
|---|
|  | 66 | #define AF_SELECTED     0x0001 | 
|---|
|  | 67 | #define AF_DELETED      0x0002 | 
|---|
|  | 68 | #define AF_FILTERED     0x0004 | 
|---|
|  | 69 | #define AF_DUPE         0x0008 | 
|---|
|  | 70 | #define AF_CRCED        0x0010 | 
|---|
|  | 71 |  | 
|---|
|  | 72 | #define AFM_MARK        0 | 
|---|
|  | 73 | #define AFM_UNMARK      1 | 
|---|
|  | 74 | #define AFM_INVERT      2 | 
|---|
|  | 75 | #define AFM_MARKDELETED 3 | 
|---|
|  | 76 | #define AFM_FILTER      4 | 
|---|
|  | 77 |  | 
|---|
|  | 78 | #define DP_NAMES        0x0001 | 
|---|
|  | 79 | #define DP_DATES        0x0002 | 
|---|
|  | 80 | #define DP_SIZES        0x0004 | 
|---|
|  | 81 | #define DP_CRCS         0x0008 | 
|---|
|  | 82 | #define DP_EXTS         0x0010 | 
|---|
|  | 83 |  | 
|---|
|  | 84 | #define FIXED_FONT_LCID 5 | 
|---|
|  | 85 |  | 
|---|
|  | 86 | #define COLORS_MAX                   8 | 
|---|
|  | 87 |  | 
|---|
|  | 88 | #define COLORS_CURSOREDNORMALBACK    0 | 
|---|
|  | 89 | #define COLORS_CURSOREDSELECTEDBACK  1 | 
|---|
|  | 90 | #define COLORS_NORMALBACK            2 | 
|---|
|  | 91 | #define COLORS_SELECTEDBACK          3 | 
|---|
|  | 92 | #define COLORS_SELECTEDNORMALFORE    4 | 
|---|
|  | 93 | #define COLORS_NORMALFORE            5 | 
|---|
|  | 94 | #define COLORS_READONLYFORE          6 | 
|---|
|  | 95 | #define COLORS_SYSTEMFORE            7 | 
|---|
|  | 96 |  | 
|---|
| [551] | 97 | static LONG Colors[COLORS_MAX] = { COLR_WHITE, COLR_DARKGRAY, COLR_PALEGRAY, | 
|---|
|  | 98 | COLR_BLACK, COLR_WHITE, COLR_BLACK, | 
|---|
|  | 99 | COLR_DARKBLUE, COLR_DARKRED | 
|---|
|  | 100 | }; | 
|---|
| [2] | 101 |  | 
|---|
| [551] | 102 | typedef int (FNSORT) (const void *, const void *); | 
|---|
| [2] | 103 | typedef FNSORT *PFNSORT; | 
|---|
|  | 104 |  | 
|---|
| [551] | 105 | typedef struct | 
|---|
|  | 106 | { | 
|---|
|  | 107 | USHORT size; | 
|---|
|  | 108 | USHORT dupeflags; | 
|---|
|  | 109 | ALLFILES *afhead; | 
|---|
|  | 110 | ALLFILES **afindex; | 
|---|
|  | 111 | ULONG affiles; | 
|---|
|  | 112 | ULONG afalloc; | 
|---|
|  | 113 | ULONG afFilesToGet; | 
|---|
|  | 114 | ULONG longest; | 
|---|
|  | 115 | ULONG longestw; | 
|---|
|  | 116 | ULONG topfile; | 
|---|
|  | 117 | ULONG cursored; | 
|---|
|  | 118 | ULONG selected; | 
|---|
|  | 119 | ULONGLONG ullSelectedBytes; | 
|---|
|  | 120 | ULONG afifiles; | 
|---|
|  | 121 | ULONG lastselected; | 
|---|
|  | 122 | ULONG lastdirection; | 
|---|
|  | 123 | ULONG multiplier; | 
|---|
|  | 124 | ULONG lasttime; | 
|---|
|  | 125 | CHAR stopflag; | 
|---|
|  | 126 | CHAR abDrvFlags[26]; | 
|---|
|  | 127 | CHAR szCommonName[CCHMAXPATH]; | 
|---|
|  | 128 | CHAR szFindPath[CCHMAXPATH]; | 
|---|
|  | 129 | LONG lMaxAscender; | 
|---|
|  | 130 | LONG lMaxDescender; | 
|---|
|  | 131 | LONG lMaxHeight; | 
|---|
|  | 132 | LONG maxx; | 
|---|
|  | 133 | LONG horzscroll; | 
|---|
|  | 134 | BOOL fullnames; | 
|---|
|  | 135 | BOOL invertsort; | 
|---|
|  | 136 | BOOL mousecaptured; | 
|---|
|  | 137 | HMTX hmtxScan; | 
|---|
|  | 138 | HWND hvscroll; | 
|---|
|  | 139 | HWND hhscroll; | 
|---|
|  | 140 | HWND hwndMenu; | 
|---|
|  | 141 | HWND hwndObj; | 
|---|
|  | 142 | HWND hwndClient; | 
|---|
|  | 143 | HWND hwndPopup; | 
|---|
|  | 144 | HWND hwndStatus; | 
|---|
|  | 145 | HWND hwndFrame; | 
|---|
|  | 146 | HPS hps; | 
|---|
|  | 147 | PFNSORT pfnCompare; | 
|---|
|  | 148 | MASK mask; | 
|---|
|  | 149 | FATTRS fattrs; | 
|---|
|  | 150 | LONG aulColors[8]; | 
|---|
|  | 151 | BOOL killme; | 
|---|
|  | 152 | } | 
|---|
|  | 153 | ALLDATA; | 
|---|
| [2] | 154 |  | 
|---|
| [551] | 155 | static BOOL Fullnames = FALSE; | 
|---|
|  | 156 | static BOOL Firsttime = TRUE; | 
|---|
|  | 157 | static BOOL SortReverse; | 
|---|
|  | 158 | static USHORT Codepage, SortType; | 
|---|
| [2] | 159 | static FATTRS Fattrs; | 
|---|
|  | 160 |  | 
|---|
| [551] | 161 | extern LONG CRCFile(CHAR * filename, INT * error); | 
|---|
| [2] | 162 |  | 
|---|
| [551] | 163 | MRESULT EXPENTRY DupeDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [162] | 164 | { | 
|---|
| [551] | 165 | switch (msg) { | 
|---|
|  | 166 | case WM_INITDLG: | 
|---|
|  | 167 | { | 
|---|
|  | 168 | USHORT flags = SHORT1FROMMP(mp2); | 
|---|
| [2] | 169 |  | 
|---|
| [551] | 170 | WinCheckButton(hwnd, DUPE_NAMES, ((flags & DP_NAMES) != 0)); | 
|---|
|  | 171 | WinCheckButton(hwnd, DUPE_DATES, ((flags & DP_NAMES) != 0)); | 
|---|
|  | 172 | WinCheckButton(hwnd, DUPE_SIZES, ((flags & DP_NAMES) != 0)); | 
|---|
|  | 173 | WinCheckButton(hwnd, DUPE_CRCS, ((flags & DP_NAMES) != 0)); | 
|---|
|  | 174 | if (!(flags & DP_NAMES)) | 
|---|
|  | 175 | WinEnableWindow(WinWindowFromID(hwnd, DUPE_EXTS), FALSE); | 
|---|
|  | 176 | } | 
|---|
|  | 177 | break; | 
|---|
|  | 178 |  | 
|---|
|  | 179 | case WM_CONTROL: | 
|---|
|  | 180 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 181 | case DUPE_NAMES: | 
|---|
|  | 182 | if (WinQueryButtonCheckstate(hwnd, DUPE_NAMES)) | 
|---|
|  | 183 | WinEnableWindow(WinWindowFromID(hwnd, DUPE_EXTS), TRUE); | 
|---|
|  | 184 | else { | 
|---|
|  | 185 | WinCheckButton(hwnd, DUPE_EXTS, FALSE); | 
|---|
|  | 186 | WinEnableWindow(WinWindowFromID(hwnd, DUPE_EXTS), FALSE); | 
|---|
| [2] | 187 | } | 
|---|
|  | 188 | break; | 
|---|
| [551] | 189 | case DUPE_SIZES: | 
|---|
|  | 190 | if (!WinQueryButtonCheckstate(hwnd, DUPE_SIZES)) | 
|---|
|  | 191 | WinCheckButton(hwnd, DUPE_CRCS, FALSE); | 
|---|
|  | 192 | break; | 
|---|
|  | 193 | case DUPE_CRCS: | 
|---|
|  | 194 | if (WinQueryButtonCheckstate(hwnd, DUPE_CRCS)) | 
|---|
|  | 195 | WinCheckButton(hwnd, DUPE_SIZES, TRUE); | 
|---|
|  | 196 | break; | 
|---|
|  | 197 | } | 
|---|
|  | 198 | return 0; | 
|---|
| [2] | 199 |  | 
|---|
| [551] | 200 | case WM_COMMAND: | 
|---|
|  | 201 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 202 | case DID_OK: | 
|---|
|  | 203 | { | 
|---|
|  | 204 | USHORT flags = 0; | 
|---|
|  | 205 |  | 
|---|
|  | 206 | if (WinQueryButtonCheckstate(hwnd, DUPE_NAMES)) { | 
|---|
|  | 207 | flags |= DP_NAMES; | 
|---|
|  | 208 | if (WinQueryButtonCheckstate(hwnd, DUPE_EXTS)) | 
|---|
|  | 209 | flags |= DP_EXTS; | 
|---|
|  | 210 | } | 
|---|
|  | 211 | if (WinQueryButtonCheckstate(hwnd, DUPE_DATES)) | 
|---|
|  | 212 | flags |= DP_DATES; | 
|---|
|  | 213 | if (WinQueryButtonCheckstate(hwnd, DUPE_SIZES)) { | 
|---|
|  | 214 | flags |= DP_SIZES; | 
|---|
|  | 215 | if (WinQueryButtonCheckstate(hwnd, DUPE_CRCS)) | 
|---|
|  | 216 | flags |= (DP_CRCS | DP_SIZES); | 
|---|
|  | 217 | } | 
|---|
|  | 218 | if (!flags) | 
|---|
|  | 219 | saymsg(MB_ENTER, | 
|---|
|  | 220 | hwnd, | 
|---|
|  | 221 | GetPString(IDS_ERRORTEXT), | 
|---|
|  | 222 | "%s", GetPString(IDS_CHECKONETEXT)); | 
|---|
|  | 223 | else | 
|---|
|  | 224 | WinDismissDlg(hwnd, flags); | 
|---|
| [2] | 225 | } | 
|---|
| [551] | 226 | break; | 
|---|
| [2] | 227 |  | 
|---|
| [551] | 228 | case DID_CANCEL: | 
|---|
|  | 229 | WinDismissDlg(hwnd, 0); | 
|---|
|  | 230 | break; | 
|---|
| [2] | 231 |  | 
|---|
| [551] | 232 | case IDM_HELP: | 
|---|
|  | 233 | if (hwndHelp) | 
|---|
|  | 234 | WinSendMsg(hwndHelp, HM_DISPLAY_HELP, | 
|---|
|  | 235 | MPFROM2SHORT(HELP_DUPES, 0), MPFROMSHORT(HM_RESOURCEID)); | 
|---|
|  | 236 | break; | 
|---|
|  | 237 | } | 
|---|
|  | 238 | return 0; | 
|---|
| [2] | 239 | } | 
|---|
| [551] | 240 | return WinDefDlgProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 241 | } | 
|---|
|  | 242 |  | 
|---|
| [551] | 243 | static ULONG NumLines(RECTL * rcl, ALLDATA * ad) | 
|---|
| [162] | 244 | { | 
|---|
| [2] | 245 | ULONG numlines; | 
|---|
|  | 246 |  | 
|---|
|  | 247 | numlines = (rcl->yTop - rcl->yBottom) / ad->lMaxHeight; | 
|---|
| [551] | 248 | if (ad->lMaxDescender && numlines && | 
|---|
|  | 249 | ((rcl->yTop - rcl->yBottom) - | 
|---|
|  | 250 | (numlines * ad->lMaxHeight) <= ad->lMaxDescender)) | 
|---|
| [2] | 251 | numlines--; | 
|---|
|  | 252 | return numlines; | 
|---|
|  | 253 | } | 
|---|
|  | 254 |  | 
|---|
| [551] | 255 | MRESULT EXPENTRY SeeObjWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [50] | 256 | { | 
|---|
| [551] | 257 | switch (msg) { | 
|---|
|  | 258 | case UM_MASSACTION: | 
|---|
|  | 259 | { | 
|---|
|  | 260 | CHAR **files = NULL, **list = (CHAR **) mp2, path[CCHMAXPATH]; | 
|---|
|  | 261 | INT numfiles = 0, numalloc = 0, plen = 0; | 
|---|
|  | 262 | HWND hwndFrame = WinQueryWindowULong(hwnd, QWL_USER); | 
|---|
|  | 263 | CHAR message[CCHMAXPATH * 2], wildname[CCHMAXPATH]; | 
|---|
|  | 264 | register INT x; | 
|---|
|  | 265 | register CHAR *p, *pp; | 
|---|
|  | 266 | BOOL dontask = FALSE, wildcarding = FALSE, | 
|---|
|  | 267 | overold = FALSE, overnew = FALSE; | 
|---|
| [2] | 268 |  | 
|---|
| [551] | 269 | if (!list || !list[0]) | 
|---|
|  | 270 | goto Abort; | 
|---|
|  | 271 | *path = *wildname = 0; | 
|---|
| [2] | 272 |  | 
|---|
| [551] | 273 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 274 | case IDM_MOVEPRESERVE: | 
|---|
|  | 275 | { | 
|---|
|  | 276 | CHAR preserve[CCHMAXPATH], *end; | 
|---|
| [2] | 277 |  | 
|---|
| [551] | 278 | mp1 = MPFROM2SHORT(IDM_MOVE, SHORT2FROMMP(mp1)); | 
|---|
|  | 279 | strcpy(preserve, list[0] + 2); | 
|---|
|  | 280 | end = strrchr(preserve, '\\'); | 
|---|
|  | 281 | if (end) { | 
|---|
|  | 282 | end++; | 
|---|
|  | 283 | for (x = 1; list[x]; x++) { | 
|---|
|  | 284 | p = preserve; | 
|---|
|  | 285 | pp = list[x] + 2; | 
|---|
|  | 286 | while (p < end && toupper(*p) == toupper(*pp)) { | 
|---|
|  | 287 | p++; | 
|---|
|  | 288 | pp++; | 
|---|
| [84] | 289 | } | 
|---|
| [551] | 290 | if (*p == '\\') | 
|---|
|  | 291 | p++; | 
|---|
|  | 292 | if (p < end) | 
|---|
|  | 293 | end = p; | 
|---|
| [84] | 294 | } | 
|---|
| [551] | 295 | *end = 0; | 
|---|
|  | 296 | } | 
|---|
|  | 297 | else | 
|---|
|  | 298 | *preserve = 0; | 
|---|
|  | 299 | plen = strlen(preserve); | 
|---|
|  | 300 | if (plen) | 
|---|
|  | 301 | plen += 2; | 
|---|
|  | 302 | } | 
|---|
|  | 303 | break; | 
|---|
|  | 304 | case IDM_COPYPRESERVE: | 
|---|
|  | 305 | { | 
|---|
|  | 306 | CHAR preserve[CCHMAXPATH], *end; | 
|---|
| [2] | 307 |  | 
|---|
| [551] | 308 | mp1 = MPFROM2SHORT(IDM_COPY, SHORT2FROMMP(mp1)); | 
|---|
|  | 309 | strcpy(preserve, list[0] + 2); | 
|---|
|  | 310 | end = strrchr(preserve, '\\'); | 
|---|
|  | 311 | if (end) { | 
|---|
|  | 312 | end++; | 
|---|
|  | 313 | for (x = 1; list[x]; x++) { | 
|---|
|  | 314 | p = preserve; | 
|---|
|  | 315 | pp = list[x] + 2; | 
|---|
|  | 316 | while (p < end && toupper(*p) == toupper(*pp)) { | 
|---|
|  | 317 | p++; | 
|---|
|  | 318 | pp++; | 
|---|
| [84] | 319 | } | 
|---|
| [551] | 320 | if (*p == '\\') | 
|---|
|  | 321 | p++; | 
|---|
|  | 322 | if (p < end) | 
|---|
|  | 323 | end = p; | 
|---|
| [84] | 324 | } | 
|---|
| [551] | 325 | *end = 0; | 
|---|
|  | 326 | } | 
|---|
|  | 327 | else | 
|---|
|  | 328 | *preserve = 0; | 
|---|
|  | 329 | plen = strlen(preserve); | 
|---|
|  | 330 | if (plen) | 
|---|
|  | 331 | plen += 2; | 
|---|
| [84] | 332 | } | 
|---|
| [551] | 333 | break; | 
|---|
|  | 334 | case IDM_WILDMOVE: | 
|---|
|  | 335 | wildcarding = TRUE; | 
|---|
|  | 336 | mp1 = MPFROM2SHORT(IDM_MOVE, SHORT2FROMMP(mp1)); | 
|---|
|  | 337 | break; | 
|---|
|  | 338 | case IDM_WILDRENAME: | 
|---|
|  | 339 | wildcarding = TRUE; | 
|---|
|  | 340 | mp1 = MPFROM2SHORT(IDM_RENAME, SHORT2FROMMP(mp1)); | 
|---|
|  | 341 | break; | 
|---|
|  | 342 | case IDM_WILDCOPY: | 
|---|
|  | 343 | wildcarding = TRUE; | 
|---|
|  | 344 | mp1 = MPFROM2SHORT(IDM_COPY, SHORT2FROMMP(mp1)); | 
|---|
|  | 345 | break; | 
|---|
|  | 346 | } | 
|---|
| [2] | 347 |  | 
|---|
| [551] | 348 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 349 | case IDM_OBJECT: | 
|---|
|  | 350 | case IDM_SHADOW: | 
|---|
|  | 351 | { | 
|---|
|  | 352 | APIRET rc; | 
|---|
| [2] | 353 |  | 
|---|
| [551] | 354 | GetDesktopName(path, sizeof(path)); | 
|---|
|  | 355 | rc = WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 356 | hwndFrame, | 
|---|
|  | 357 | ObjCnrDlgProc, | 
|---|
|  | 358 | FM3ModHandle, OBJCNR_FRAME, MPFROMP(path)); | 
|---|
|  | 359 | if (rc) { | 
|---|
|  | 360 | if (rc > 1) | 
|---|
|  | 361 | strcpy(path, "<WP_DESKTOP>"); | 
|---|
|  | 362 | } | 
|---|
|  | 363 | else { | 
|---|
| [84] | 364 | FreeList(list); | 
|---|
|  | 365 | break; | 
|---|
| [551] | 366 | } | 
|---|
|  | 367 | MakeShadows(hwndFrame, | 
|---|
|  | 368 | list, (SHORT1FROMMP(mp1) == IDM_SHADOW), path, NULL); | 
|---|
|  | 369 | } | 
|---|
|  | 370 | FreeList(list); | 
|---|
|  | 371 | break; | 
|---|
| [2] | 372 |  | 
|---|
| [551] | 373 | case IDM_PRINT: | 
|---|
|  | 374 | { | 
|---|
|  | 375 | LISTINFO *li; | 
|---|
| [2] | 376 |  | 
|---|
| [551] | 377 | li = xmallocz(sizeof(LISTINFO), pszSrcFile, __LINE__); | 
|---|
|  | 378 | if (li) { | 
|---|
|  | 379 | li->hwndS = WinWindowFromID(hwndFrame, FID_CLIENT); | 
|---|
|  | 380 | li->type = IDM_PRINT; | 
|---|
|  | 381 | li->list = list; | 
|---|
|  | 382 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 383 | li->hwndS, | 
|---|
|  | 384 | PrintDlgProc, | 
|---|
|  | 385 | FM3ModHandle, PRN_FRAME, MPFROMP(li))) { | 
|---|
|  | 386 | if (li && li->list && li->list[0]) { | 
|---|
|  | 387 | strcpy(li->targetpath, printer); | 
|---|
|  | 388 | if (_beginthread(PrintListThread, NULL, 65536, (PVOID) li) == | 
|---|
|  | 389 | -1) { | 
|---|
|  | 390 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 391 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 392 | FreeListInfo(li); | 
|---|
| [84] | 393 | } | 
|---|
|  | 394 | } | 
|---|
|  | 395 | } | 
|---|
| [551] | 396 | } | 
|---|
|  | 397 | } | 
|---|
|  | 398 | break; | 
|---|
| [2] | 399 |  | 
|---|
| [551] | 400 | case IDM_EAS: | 
|---|
|  | 401 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 402 | hwndFrame, | 
|---|
|  | 403 | DisplayEAsProc, FM3ModHandle, EA_FRAME, (PVOID) list)) { | 
|---|
|  | 404 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 405 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 406 | FreeList(list); | 
|---|
|  | 407 | } | 
|---|
|  | 408 | else | 
|---|
|  | 409 | FreeList(list); | 
|---|
|  | 410 | break; | 
|---|
|  | 411 |  | 
|---|
|  | 412 | case IDM_INFO: | 
|---|
|  | 413 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 414 | hwndFrame, | 
|---|
|  | 415 | FileInfoProc, | 
|---|
|  | 416 | FM3ModHandle, FLE_FRAME, (PVOID) list) == 2) { | 
|---|
|  | 417 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 418 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 419 | FreeList(list); | 
|---|
|  | 420 | } | 
|---|
|  | 421 | else | 
|---|
|  | 422 | FreeList(list); | 
|---|
|  | 423 | break; | 
|---|
|  | 424 |  | 
|---|
|  | 425 | case IDM_ARCHIVE: | 
|---|
|  | 426 | { | 
|---|
|  | 427 | DIRCNRDATA ad; | 
|---|
|  | 428 | CHAR szBuffer[1025]; | 
|---|
|  | 429 |  | 
|---|
|  | 430 | memset(&ad, 0, sizeof(ad)); | 
|---|
|  | 431 | ad.namecanchange = 1; | 
|---|
|  | 432 | ad.info = arcsighead;         // Hide dups | 
|---|
|  | 433 | if (!WinDlgBox(HWND_DESKTOP, | 
|---|
| [84] | 434 | hwndFrame, | 
|---|
| [551] | 435 | SBoxDlgProc, | 
|---|
| [84] | 436 | FM3ModHandle, | 
|---|
| [551] | 437 | ASEL_FRAME, (PVOID) & ad.info) || !ad.info) { | 
|---|
|  | 438 | /* we blew it */ | 
|---|
|  | 439 | FreeList(list); | 
|---|
| [84] | 440 | break; | 
|---|
| [551] | 441 | } | 
|---|
|  | 442 | if (!ad.info->create && | 
|---|
|  | 443 | !ad.info->move && | 
|---|
|  | 444 | !ad.info->createwdirs && | 
|---|
|  | 445 | !ad.info->movewdirs && !ad.info->createrecurse) { | 
|---|
|  | 446 | FreeList(list); | 
|---|
|  | 447 | break; | 
|---|
|  | 448 | } | 
|---|
|  | 449 | if (!WinDlgBox(HWND_DESKTOP, hwndFrame, ArchiveDlgProc, FM3ModHandle, ARCH_FRAME, (PVOID) & ad) || !*ad.arcname || !*ad.command) {    /* we blew it */ | 
|---|
|  | 450 | FreeList(list); | 
|---|
|  | 451 | break; | 
|---|
|  | 452 | } | 
|---|
|  | 453 | /* build the sucker */ | 
|---|
|  | 454 | strcpy(szBuffer, ad.command); | 
|---|
|  | 455 | strcat(szBuffer, " "); | 
|---|
|  | 456 | strcat(szBuffer, ad.arcname); | 
|---|
|  | 457 | p = &szBuffer[strlen(szBuffer)]; | 
|---|
|  | 458 | if (ad.mask.szMask) { | 
|---|
|  | 459 | strcat(szBuffer, " "); | 
|---|
|  | 460 | strcat(szBuffer, ad.mask.szMask); | 
|---|
|  | 461 | } | 
|---|
|  | 462 | strcat(szBuffer, " "); | 
|---|
|  | 463 | x = 0; | 
|---|
|  | 464 | while (list[x]) { | 
|---|
| [2] | 465 |  | 
|---|
| [551] | 466 | FILESTATUS3 fsa; | 
|---|
|  | 467 | BOOL spaces; | 
|---|
|  | 468 |  | 
|---|
|  | 469 | if (needs_quoting(list[x])) { | 
|---|
|  | 470 | spaces = TRUE; | 
|---|
|  | 471 | strcat(szBuffer, "\""); | 
|---|
| [84] | 472 | } | 
|---|
|  | 473 | else | 
|---|
| [551] | 474 | spaces = FALSE; | 
|---|
|  | 475 | strcat(szBuffer, list[x]); | 
|---|
|  | 476 | memset(&fsa, 0, sizeof(fsa)); | 
|---|
|  | 477 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 478 | DosQueryPathInfo(list[x], FIL_STANDARD, | 
|---|
|  | 479 | &fsa, (ULONG) sizeof(fsa)); | 
|---|
|  | 480 | if (fsa.attrFile & FILE_DIRECTORY) { | 
|---|
|  | 481 | if (szBuffer[strlen(szBuffer) - 1] != '\\') | 
|---|
|  | 482 | strcat(szBuffer, "\\"); | 
|---|
|  | 483 | strcat(szBuffer, "*"); | 
|---|
|  | 484 | } | 
|---|
|  | 485 | if (spaces) | 
|---|
|  | 486 | strcat(szBuffer, "\""); | 
|---|
|  | 487 | x++; | 
|---|
|  | 488 | if (!list[x] || strlen(szBuffer) + strlen(list[x]) + 5 > 1024) { | 
|---|
|  | 489 | runemf2(SEPARATE | WINDOWED | | 
|---|
|  | 490 | ((fArcStuffVisible) ? 0 : | 
|---|
|  | 491 | (BACKGROUND | MINIMIZED)) | | 
|---|
|  | 492 | WAIT, HWND_DESKTOP, NULL, NULL, "%s", szBuffer); | 
|---|
|  | 493 | DosSleep(1L); | 
|---|
|  | 494 | *p = 0; | 
|---|
|  | 495 | } | 
|---|
|  | 496 | strcat(szBuffer, " "); | 
|---|
|  | 497 | } | 
|---|
|  | 498 | AddToList(ad.arcname, &files, &numfiles, &numalloc); | 
|---|
|  | 499 | } | 
|---|
|  | 500 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 501 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 502 | FreeList(list); | 
|---|
|  | 503 | break; | 
|---|
| [2] | 504 |  | 
|---|
| [551] | 505 | case IDM_ATTRS: | 
|---|
|  | 506 | { | 
|---|
|  | 507 | LISTINFO li; | 
|---|
| [2] | 508 |  | 
|---|
| [551] | 509 | memset(&li, 0, sizeof(li)); | 
|---|
|  | 510 | li.list = list; | 
|---|
|  | 511 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 512 | hwndFrame, | 
|---|
|  | 513 | AttrListDlgProc, | 
|---|
|  | 514 | FM3ModHandle, ATR_FRAME, MPFROMP(&li))) { | 
|---|
|  | 515 | if (li.list && li.list[0]) { | 
|---|
|  | 516 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 517 | UM_UPDATERECORDLIST, MPFROMP(li.list), MPVOID)) | 
|---|
|  | 518 | FreeList(li.list); | 
|---|
|  | 519 | } | 
|---|
|  | 520 | } | 
|---|
|  | 521 | else | 
|---|
|  | 522 | FreeList(list); | 
|---|
|  | 523 | } | 
|---|
|  | 524 | break; | 
|---|
| [2] | 525 |  | 
|---|
| [551] | 526 | case IDM_MOVE: | 
|---|
|  | 527 | case IDM_COPY: | 
|---|
|  | 528 | if (!*path) | 
|---|
|  | 529 | strcpy(path, targetdir); | 
|---|
|  | 530 | if (!*path) | 
|---|
|  | 531 | strcpy(path, list[0]); | 
|---|
|  | 532 | MakeValidDir(path); | 
|---|
|  | 533 | RetryPath: | 
|---|
|  | 534 | if (SHORT1FROMMP(mp1) == IDM_MOVE) { | 
|---|
|  | 535 | if (!WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 536 | hwndFrame, | 
|---|
|  | 537 | WalkMoveDlgProc, | 
|---|
|  | 538 | FM3ModHandle, WALK_FRAME, MPFROMP(path)) || !*path) { | 
|---|
|  | 539 | FreeList(list); | 
|---|
|  | 540 | goto Abort; | 
|---|
|  | 541 | } | 
|---|
|  | 542 | } | 
|---|
|  | 543 | else { | 
|---|
|  | 544 | if (!WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 545 | hwndFrame, | 
|---|
|  | 546 | WalkCopyDlgProc, | 
|---|
|  | 547 | FM3ModHandle, WALK_FRAME, MPFROMP(path)) || !*path) { | 
|---|
|  | 548 | FreeList(list); | 
|---|
|  | 549 | goto Abort; | 
|---|
|  | 550 | } | 
|---|
|  | 551 | } | 
|---|
|  | 552 | if (driveflags[toupper(*path) - 'A'] & DRIVE_NOTWRITEABLE) { | 
|---|
|  | 553 | saymsg(MB_CANCEL, | 
|---|
|  | 554 | hwndFrame, | 
|---|
|  | 555 | GetPString(IDS_ERRORTEXT), | 
|---|
|  | 556 | "%s", GetPString(IDS_NOTWRITENOTARGETTEXT)); | 
|---|
|  | 557 | goto RetryPath; | 
|---|
|  | 558 | } | 
|---|
|  | 559 | /* intentional fallthru */ | 
|---|
|  | 560 | case IDM_RENAME: | 
|---|
|  | 561 | { | 
|---|
|  | 562 | CHAR newname[CCHMAXPATH], *moving, *move, *moved; | 
|---|
|  | 563 | APIRET rc; | 
|---|
|  | 564 | INT type; | 
|---|
|  | 565 | FILESTATUS4 fs4; | 
|---|
|  | 566 | BOOL isnewer, existed; | 
|---|
| [2] | 567 |  | 
|---|
| [551] | 568 | for (x = 0; list[x]; x++) { | 
|---|
|  | 569 | Retry: | 
|---|
|  | 570 | type = (SHORT1FROMMP(mp1) == IDM_RENAME) ? MOVE : | 
|---|
|  | 571 | (SHORT1FROMMP(mp1) == IDM_MOVE) ? MOVE : | 
|---|
|  | 572 | (SHORT1FROMMP(mp1) == IDM_WPSMOVE) ? WPSMOVE : | 
|---|
|  | 573 | (SHORT1FROMMP(mp1) == IDM_WPSCOPY) ? WPSCOPY : COPY; | 
|---|
|  | 574 | moving = (SHORT1FROMMP(mp1) == IDM_RENAME) ? | 
|---|
|  | 575 | GetPString(IDS_RENAMINGTEXT) : | 
|---|
|  | 576 | (SHORT1FROMMP(mp1) == IDM_MOVE || | 
|---|
|  | 577 | SHORT1FROMMP(mp1) == IDM_WPSMOVE) ? | 
|---|
|  | 578 | GetPString(IDS_MOVINGTEXT) : GetPString(IDS_COPYINGTEXT); | 
|---|
|  | 579 | move = (SHORT1FROMMP(mp1) == IDM_RENAME) ? | 
|---|
|  | 580 | GetPString(IDS_RENAMETEXT) : | 
|---|
|  | 581 | (SHORT1FROMMP(mp1) == IDM_MOVE || | 
|---|
|  | 582 | SHORT1FROMMP(mp1) == IDM_WPSMOVE) ? | 
|---|
|  | 583 | GetPString(IDS_MOVETEXT) : GetPString(IDS_COPYTEXT); | 
|---|
|  | 584 | moved = (SHORT1FROMMP(mp1) == IDM_RENAME) ? | 
|---|
|  | 585 | GetPString(IDS_RENAMEDTEXT) : | 
|---|
|  | 586 | (SHORT1FROMMP(mp1) == IDM_MOVE || | 
|---|
|  | 587 | SHORT1FROMMP(mp1) == IDM_WPSMOVE) ? | 
|---|
|  | 588 | GetPString(IDS_MOVEDTEXT) : GetPString(IDS_COPIEDTEXT); | 
|---|
|  | 589 | if (*path) { | 
|---|
|  | 590 | strcpy(newname, path); | 
|---|
|  | 591 | if (newname[strlen(newname) - 1] != '\\') | 
|---|
|  | 592 | strcat(newname, "\\"); | 
|---|
|  | 593 | if (plen) | 
|---|
|  | 594 | p = list[x] + plen; | 
|---|
|  | 595 | else { | 
|---|
|  | 596 | p = strrchr(list[x], '\\'); | 
|---|
|  | 597 | if (p) | 
|---|
|  | 598 | p++; | 
|---|
| [84] | 599 | else | 
|---|
| [551] | 600 | p = list[x]; | 
|---|
| [84] | 601 | } | 
|---|
| [551] | 602 | strcat(newname, p); | 
|---|
| [84] | 603 | } | 
|---|
| [551] | 604 | else | 
|---|
|  | 605 | strcpy(newname, list[x]); | 
|---|
|  | 606 | if ((wildcarding || SHORT1FROMMP(mp1) == IDM_RENAME) && *wildname) { | 
|---|
| [2] | 607 |  | 
|---|
| [551] | 608 | CHAR testname[CCHMAXPATH]; | 
|---|
| [2] | 609 |  | 
|---|
| [551] | 610 | strcpy(testname, wildname); | 
|---|
|  | 611 | if (AdjustWildcardName(newname, testname)) | 
|---|
|  | 612 | strcpy(newname, testname); | 
|---|
| [84] | 613 | } | 
|---|
| [551] | 614 | existed = (IsFile(newname) != -1); | 
|---|
|  | 615 | isnewer = IsNewer(list[x], newname); | 
|---|
|  | 616 | if (existed && SHORT1FROMMP(mp1) != IDM_RENAME && dontask) { | 
|---|
|  | 617 | if (!overold && !overnew) | 
|---|
|  | 618 | break; | 
|---|
|  | 619 | if (!overold && !isnewer) | 
|---|
|  | 620 | break; | 
|---|
|  | 621 | if (!overnew && isnewer) | 
|---|
|  | 622 | break; | 
|---|
|  | 623 | } | 
|---|
|  | 624 | if ((SHORT1FROMMP(mp1) == IDM_RENAME && | 
|---|
|  | 625 | (!dontask || !*wildname)) || | 
|---|
|  | 626 | (!dontask && existed) || | 
|---|
|  | 627 | (!dontask && wildcarding) || | 
|---|
|  | 628 | (IsFile(newname) == 0 && IsFile(list[x]) == 1)) { | 
|---|
| [2] | 629 |  | 
|---|
| [551] | 630 | MOVEIT mv; | 
|---|
|  | 631 |  | 
|---|
|  | 632 | memset(&mv, 0, sizeof(mv)); | 
|---|
|  | 633 | mv.rename = (SHORT1FROMMP(mp1) == IDM_RENAME); | 
|---|
|  | 634 | mv.source = list[x]; | 
|---|
|  | 635 | strcpy(mv.target, newname); | 
|---|
|  | 636 | rc = WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 637 | hwndFrame, | 
|---|
|  | 638 | RenameProc, | 
|---|
|  | 639 | FM3ModHandle, REN_FRAME, (PVOID) & mv); | 
|---|
|  | 640 | if (!rc) { | 
|---|
| [84] | 641 | FreeList(list); | 
|---|
|  | 642 | goto Abort; | 
|---|
|  | 643 | } | 
|---|
| [551] | 644 | DosSleep(1L); | 
|---|
|  | 645 | if (mv.skip || !*mv.target) | 
|---|
|  | 646 | break; | 
|---|
|  | 647 | if (mv.dontask) | 
|---|
|  | 648 | dontask = TRUE; | 
|---|
|  | 649 | if (mv.overold) | 
|---|
|  | 650 | overold = TRUE; | 
|---|
|  | 651 | if (mv.overnew) | 
|---|
|  | 652 | overnew = TRUE; | 
|---|
|  | 653 | if (wildcarding || SHORT1FROMMP(mp1) == IDM_RENAME) { | 
|---|
|  | 654 | p = strrchr(mv.target, '\\'); | 
|---|
|  | 655 | if (p && (strchr(p, '*') || strchr(p, '?'))) { | 
|---|
|  | 656 | strcpy(wildname, mv.target); | 
|---|
|  | 657 | AdjustWildcardName(list[x], mv.target); | 
|---|
| [84] | 658 | } | 
|---|
|  | 659 | else | 
|---|
| [551] | 660 | *wildname = 0; | 
|---|
|  | 661 | } | 
|---|
|  | 662 | strcpy(newname, mv.target); | 
|---|
|  | 663 | existed = (IsFile(newname) != -1); | 
|---|
|  | 664 | isnewer = IsNewer(list[x], newname); | 
|---|
|  | 665 | if (!mv.overwrite) { | 
|---|
|  | 666 | if (existed && SHORT1FROMMP(mp1) != IDM_RENAME && dontask) { | 
|---|
|  | 667 | if (!overold && !overnew) | 
|---|
| [84] | 668 | break; | 
|---|
| [551] | 669 | if (!overold && !isnewer) | 
|---|
| [84] | 670 | break; | 
|---|
| [551] | 671 | if (!overnew && isnewer) | 
|---|
| [84] | 672 | break; | 
|---|
|  | 673 | } | 
|---|
| [551] | 674 | } | 
|---|
|  | 675 | } | 
|---|
|  | 676 | if (!stricmp(list[x], newname)) | 
|---|
|  | 677 | break; | 
|---|
|  | 678 | sprintf(message, | 
|---|
|  | 679 | " %s \"%s\" %s \"%s\"", | 
|---|
|  | 680 | moving, list[x], GetPString(IDS_TOTEXT), newname); | 
|---|
|  | 681 | WinSetWindowText(WinWindowFromID(hwndFrame, SEEALL_STATUS), | 
|---|
|  | 682 | message); | 
|---|
|  | 683 | if (fRealIdle) | 
|---|
|  | 684 | priority_idle(); | 
|---|
|  | 685 | if (plen) { | 
|---|
|  | 686 | /* make directory/ies, if required */ | 
|---|
| [2] | 687 |  | 
|---|
| [551] | 688 | CHAR dirpart[CCHMAXPATH]; | 
|---|
| [2] | 689 |  | 
|---|
| [551] | 690 | strcpy(dirpart, newname); | 
|---|
|  | 691 | p = strrchr(dirpart, '\\'); | 
|---|
|  | 692 | if (p) { | 
|---|
|  | 693 | *p = 0; | 
|---|
|  | 694 | if (p > dirpart + 3) | 
|---|
|  | 695 | MassMkdir((hwndMain) ? hwndMain : (HWND) 0, dirpart); | 
|---|
|  | 696 | } | 
|---|
|  | 697 | } | 
|---|
|  | 698 | rc = docopyf(type, list[x], "%s", newname); | 
|---|
|  | 699 | priority_normal(); | 
|---|
|  | 700 | if (rc) { | 
|---|
|  | 701 | if ((rc == ERROR_DISK_FULL || | 
|---|
|  | 702 | rc == ERROR_HANDLE_DISK_FULL) && | 
|---|
|  | 703 | isalpha(*newname) && | 
|---|
|  | 704 | (driveflags[toupper(*newname) - 'A'] & DRIVE_REMOVABLE) && | 
|---|
|  | 705 | !(driveflags[toupper(*newname) - 'A'] & DRIVE_NOTWRITEABLE) | 
|---|
|  | 706 | && toupper(*newname) != toupper(*list[x]) | 
|---|
|  | 707 | && !DosQueryPathInfo(list[x], FIL_QUERYEASIZE, &fs4, | 
|---|
|  | 708 | sizeof(fs4)) | 
|---|
|  | 709 | && !(fs4.attrFile & FILE_DIRECTORY)) { | 
|---|
| [2] | 710 |  | 
|---|
| [551] | 711 | FSALLOCATE fsa; | 
|---|
|  | 712 | ULONG clFreeBytes; | 
|---|
|  | 713 | CHAR *ptr; | 
|---|
|  | 714 | INT cntr; | 
|---|
| [2] | 715 |  | 
|---|
| [551] | 716 | WinSetWindowText(WinWindowFromID(hwndFrame, SEEALL_STATUS), | 
|---|
|  | 717 | GetPString(IDS_FITTINGTEXT)); | 
|---|
|  | 718 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 719 | if (!DosQueryFSInfo(toupper(*newname) - '@', | 
|---|
|  | 720 | FSIL_ALLOC, &fsa, sizeof(fsa))) { | 
|---|
|  | 721 | // Assume <2GB since file did not fit | 
|---|
|  | 722 | clFreeBytes = fsa.cUnitAvail * fsa.cSectorUnit * | 
|---|
|  | 723 | fsa.cbSector; | 
|---|
|  | 724 | if (clFreeBytes) { | 
|---|
|  | 725 | // Find item that will fit in available space | 
|---|
|  | 726 | for (cntr = x + 1; list[cntr]; cntr++) { | 
|---|
|  | 727 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 728 | if (!DosQueryPathInfo(list[cntr], | 
|---|
|  | 729 | FIL_QUERYEASIZE, | 
|---|
|  | 730 | &fs4, sizeof(fs4)) && | 
|---|
|  | 731 | !(fs4.attrFile & FILE_DIRECTORY) && | 
|---|
|  | 732 | // fixme to use CBLIST_TO_EASIZE? | 
|---|
|  | 733 | fs4.cbFile + fs4.cbList <= clFreeBytes) { | 
|---|
|  | 734 | // Swap with failing item | 
|---|
|  | 735 | ptr = list[x]; | 
|---|
|  | 736 | list[x] = list[cntr]; | 
|---|
|  | 737 | list[cntr] = ptr; | 
|---|
|  | 738 | goto Retry; | 
|---|
| [84] | 739 | } | 
|---|
|  | 740 | } | 
|---|
| [551] | 741 | WinSetWindowText(WinWindowFromID(hwndFrame, | 
|---|
|  | 742 | SEEALL_STATUS), | 
|---|
|  | 743 | GetPString(IDS_COULDNTFITTEXT)); | 
|---|
| [84] | 744 | } | 
|---|
|  | 745 | } | 
|---|
| [551] | 746 | rc = saymsg(MB_ABORTRETRYIGNORE | MB_ICONEXCLAMATION, | 
|---|
|  | 747 | hwndFrame, | 
|---|
|  | 748 | GetPString(IDS_DISKFULLTEXT), | 
|---|
|  | 749 | "%s", GetPString(IDS_ANOTHERDISKTEXT)); | 
|---|
|  | 750 | if (rc == MBID_RETRY) | 
|---|
|  | 751 | goto Retry; | 
|---|
|  | 752 | if (rc == MBID_ABORT) { | 
|---|
|  | 753 | FreeList(list); | 
|---|
|  | 754 | goto Abort; | 
|---|
| [84] | 755 | } | 
|---|
|  | 756 | } | 
|---|
| [551] | 757 | else { | 
|---|
|  | 758 | if (LogFileHandle) | 
|---|
|  | 759 | fprintf(LogFileHandle, | 
|---|
|  | 760 | GetPString(IDS_LOGTOFAILEDTEXT), | 
|---|
|  | 761 | move, list[x], newname, rc); | 
|---|
|  | 762 | rc = Dos_Error(MB_ENTERCANCEL, | 
|---|
|  | 763 | rc, | 
|---|
|  | 764 | hwndFrame, | 
|---|
|  | 765 | pszSrcFile, | 
|---|
|  | 766 | __LINE__, | 
|---|
|  | 767 | "%s %s \"%s\" %s\"%s\" %s.", | 
|---|
|  | 768 | move, | 
|---|
|  | 769 | GetPString(IDS_OFTEXT), | 
|---|
|  | 770 | list[x], | 
|---|
|  | 771 | GetPString(IDS_TOTEXT), | 
|---|
|  | 772 | newname, GetPString(IDS_FAILEDTEXT)); | 
|---|
|  | 773 | if (rc == MBID_CANCEL) { | 
|---|
|  | 774 | FreeList(list); | 
|---|
|  | 775 | goto Abort; | 
|---|
|  | 776 | } | 
|---|
|  | 777 | } | 
|---|
| [84] | 778 | } | 
|---|
| [551] | 779 | else { | 
|---|
|  | 780 | if (LogFileHandle) | 
|---|
|  | 781 | fprintf(LogFileHandle, | 
|---|
|  | 782 | "%s \"%s\" %s \"%s\"\n", | 
|---|
|  | 783 | moved, list[x], GetPString(IDS_TOTEXT), newname); | 
|---|
|  | 784 | AddToList(newname, &files, &numfiles, &numalloc); | 
|---|
| [84] | 785 | } | 
|---|
| [551] | 786 | } | 
|---|
|  | 787 | } | 
|---|
|  | 788 | if (SHORT1FROMMP(mp1) != IDM_COPY) { | 
|---|
|  | 789 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 790 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 791 | FreeList(list); | 
|---|
|  | 792 | } | 
|---|
|  | 793 | else | 
|---|
|  | 794 | FreeList(list); | 
|---|
|  | 795 | break; | 
|---|
| [2] | 796 |  | 
|---|
| [551] | 797 | case IDM_UUDECODE: | 
|---|
|  | 798 | for (x = 0; list[x]; x++) | 
|---|
|  | 799 | UUD(list[x], NULL); | 
|---|
|  | 800 | break; | 
|---|
| [2] | 801 |  | 
|---|
| [551] | 802 | case IDM_EXTRACT: | 
|---|
|  | 803 | for (x = 0; list[x]; x++) { | 
|---|
| [2] | 804 |  | 
|---|
| [551] | 805 | EXTRDATA ex; | 
|---|
|  | 806 | BOOL maskspaces = FALSE; | 
|---|
| [2] | 807 |  | 
|---|
| [551] | 808 | memset(&ex, 0, sizeof(ex)); | 
|---|
|  | 809 | ex.info = find_type(list[x], NULL); | 
|---|
|  | 810 | if (!ex.info || (!ex.info->extract && !ex.info->exwdirs)) | 
|---|
| [84] | 811 | break; | 
|---|
| [551] | 812 | ex.size = sizeof(ex); | 
|---|
|  | 813 | ex.arcname = list[x]; | 
|---|
|  | 814 | strcpy(ex.masks, "*"); | 
|---|
|  | 815 | if (!WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 816 | hwndFrame, | 
|---|
|  | 817 | ExtractDlgProc, | 
|---|
|  | 818 | FM3ModHandle, | 
|---|
|  | 819 | EXT_FRAME, | 
|---|
|  | 820 | (PVOID) & ex) || | 
|---|
|  | 821 | !ex.ret || !*ex.command || !*ex.arcname || !*ex.extractdir) | 
|---|
|  | 822 | break; | 
|---|
|  | 823 | if (IsFile(ex.extractdir) != 0) | 
|---|
|  | 824 | Runtime_Error(pszSrcFile, __LINE__, "directory expected"); | 
|---|
|  | 825 | else { | 
|---|
|  | 826 | if (needs_quoting(ex.masks) && !strchr(ex.masks, '\"')) | 
|---|
|  | 827 | maskspaces = TRUE; | 
|---|
|  | 828 | runemf2(SEPARATE | WINDOWED | | 
|---|
|  | 829 | ((fArcStuffVisible) ? 0 : | 
|---|
|  | 830 | (BACKGROUND | MINIMIZED)), | 
|---|
|  | 831 | HWND_DESKTOP, | 
|---|
|  | 832 | ex.extractdir, | 
|---|
|  | 833 | NULL, | 
|---|
|  | 834 | "%s %s %s%s%s", | 
|---|
|  | 835 | ex.command, | 
|---|
|  | 836 | ex.arcname, | 
|---|
|  | 837 | (maskspaces) ? "\"" : NullStr, | 
|---|
|  | 838 | (*ex.masks) ? ex.masks : "*", | 
|---|
|  | 839 | (maskspaces) ? "\"" : NullStr); | 
|---|
|  | 840 | } | 
|---|
|  | 841 | } | 
|---|
|  | 842 | // fixme to not leak? | 
|---|
|  | 843 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 844 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 845 | FreeList(list); | 
|---|
|  | 846 | break; | 
|---|
| [2] | 847 |  | 
|---|
| [551] | 848 | case IDM_SUBJECT: | 
|---|
|  | 849 | for (x = 0; list[x]; x++) { | 
|---|
| [2] | 850 |  | 
|---|
| [551] | 851 | INT ret; | 
|---|
| [2] | 852 |  | 
|---|
| [551] | 853 | if (IsFile(list[x]) == 1) { | 
|---|
|  | 854 | ret = Subject(hwndFrame, list[x]); | 
|---|
|  | 855 | if (!ret) | 
|---|
|  | 856 | break; | 
|---|
|  | 857 | } | 
|---|
|  | 858 | } | 
|---|
|  | 859 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 860 | UM_UPDATERECORDLIST, MPFROMP(list), MPVOID)) | 
|---|
|  | 861 | FreeList(list); | 
|---|
|  | 862 | break; | 
|---|
| [2] | 863 |  | 
|---|
| [551] | 864 | case IDM_OPENDEFAULT: | 
|---|
|  | 865 | case IDM_OPENSETTINGS: | 
|---|
|  | 866 | for (x = 0; list[x]; x++) { | 
|---|
|  | 867 | if (IsFile(list[x]) != -1) { | 
|---|
| [2] | 868 |  | 
|---|
| [551] | 869 | CHAR *s; | 
|---|
| [2] | 870 |  | 
|---|
| [551] | 871 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 872 | case IDM_OPENSETTINGS: | 
|---|
|  | 873 | s = Settings; | 
|---|
|  | 874 | break; | 
|---|
|  | 875 | default: | 
|---|
|  | 876 | s = Default; | 
|---|
|  | 877 | break; | 
|---|
| [84] | 878 | } | 
|---|
| [551] | 879 | OpenObject(list[x], s, hwndFrame); | 
|---|
|  | 880 | } | 
|---|
|  | 881 | } | 
|---|
|  | 882 | FreeList(list); | 
|---|
|  | 883 | break; | 
|---|
| [2] | 884 |  | 
|---|
| [551] | 885 | case IDM_DELETE: | 
|---|
|  | 886 | case IDM_PERMDELETE: | 
|---|
|  | 887 | { | 
|---|
|  | 888 | CHECKLIST cl; | 
|---|
|  | 889 | INT isdir = 0, sysdir = 0, ro = 0, hs = 0; | 
|---|
|  | 890 | FILESTATUS3 fsa; | 
|---|
|  | 891 | CHAR prompt[CCHMAXPATH * 3]; | 
|---|
|  | 892 | APIRET error; | 
|---|
| [2] | 893 |  | 
|---|
| [551] | 894 | for (x = 0; list[x]; x++) { | 
|---|
|  | 895 | if (IsRoot(list[x])) { | 
|---|
|  | 896 | list = RemoveFromList(list, list[x]); | 
|---|
|  | 897 | if (!list) | 
|---|
| [84] | 898 | break; | 
|---|
| [551] | 899 | x--; | 
|---|
|  | 900 | continue; | 
|---|
|  | 901 | } | 
|---|
|  | 902 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 903 | if (DosQueryPathInfo(list[x], FIL_STANDARD, &fsa, sizeof(fsa))) { | 
|---|
|  | 904 | list = RemoveFromList(list, list[x]); | 
|---|
|  | 905 | if (!list) | 
|---|
|  | 906 | break; | 
|---|
|  | 907 | x--; | 
|---|
|  | 908 | continue; | 
|---|
|  | 909 | } | 
|---|
|  | 910 | if (fsa.attrFile & FILE_DIRECTORY) { | 
|---|
|  | 911 | isdir++; | 
|---|
|  | 912 | if (stristr(list[x], ":\\OS2\\") || | 
|---|
|  | 913 | !stricmp(list[x] + 1, ":\\OS2")) | 
|---|
|  | 914 | sysdir++; | 
|---|
|  | 915 | } | 
|---|
|  | 916 | else { | 
|---|
|  | 917 | if (fsa.attrFile & (FILE_HIDDEN | FILE_SYSTEM)) | 
|---|
|  | 918 | hs++; | 
|---|
|  | 919 | if (fsa.attrFile & FILE_READONLY) | 
|---|
|  | 920 | ro++; | 
|---|
|  | 921 | } | 
|---|
|  | 922 | } | 
|---|
|  | 923 | if (!list) | 
|---|
|  | 924 | break; | 
|---|
|  | 925 | if (fConfirmDelete || isdir) { | 
|---|
|  | 926 | memset(&cl, 0, sizeof(cl)); | 
|---|
|  | 927 | cl.size = sizeof(cl); | 
|---|
|  | 928 | cl.list = list; | 
|---|
|  | 929 | cl.prompt = prompt; | 
|---|
|  | 930 | cl.flags |= CHECK_FILES; | 
|---|
|  | 931 | cl.cmd = SHORT1FROMMP(mp1); | 
|---|
|  | 932 | sprintf(prompt, | 
|---|
|  | 933 | GetPString(IDS_DELPROMPT1TEXT), | 
|---|
|  | 934 | (SHORT1FROMMP(mp1) == IDM_DELETE) ? | 
|---|
|  | 935 | NullStr : | 
|---|
|  | 936 | GetPString(IDS_PERMANENTLYTEXT), &"s"[list[1] == NULL]); | 
|---|
|  | 937 | if (isdir) { | 
|---|
|  | 938 | sprintf(&prompt[strlen(prompt)], | 
|---|
|  | 939 | GetPString(IDS_DELPROMPT2TEXT), | 
|---|
|  | 940 | isdir, | 
|---|
|  | 941 | (isdir > 1) ? | 
|---|
|  | 942 | GetPString(IDS_ARETEXT) : | 
|---|
|  | 943 | GetPString(IDS_ISTEXT), | 
|---|
|  | 944 | (isdir == 1) ? | 
|---|
|  | 945 | GetPString(IDS_ATEXT) : | 
|---|
|  | 946 | NullStr, | 
|---|
|  | 947 | (isdir > 1) ? | 
|---|
|  | 948 | GetPString(IDS_IESTEXT) : GetPString(IDS_YTEXT)); | 
|---|
|  | 949 | if (sysdir) | 
|---|
|  | 950 | sprintf(&prompt[strlen(prompt)], | 
|---|
|  | 951 | GetPString(IDS_DELPROMPT3TEXT), | 
|---|
|  | 952 | sysdir, | 
|---|
|  | 953 | (sysdir == 1) ? | 
|---|
|  | 954 | GetPString(IDS_YTEXT) : GetPString(IDS_IESTEXT)); | 
|---|
|  | 955 | } | 
|---|
|  | 956 | if (ro) | 
|---|
|  | 957 | sprintf(&prompt[strlen(prompt)], | 
|---|
|  | 958 | GetPString(IDS_DELPROMPT4TEXT), | 
|---|
|  | 959 | ro, | 
|---|
|  | 960 | &"s"[ro == 1], | 
|---|
|  | 961 | (ro > 1) ? | 
|---|
|  | 962 | GetPString(IDS_ARETEXT) : GetPString(IDS_ISTEXT)); | 
|---|
|  | 963 | if (hs) | 
|---|
|  | 964 | sprintf(&prompt[strlen(prompt)], | 
|---|
|  | 965 | GetPString(IDS_DELPROMPT5TEXT), | 
|---|
|  | 966 | hs, | 
|---|
|  | 967 | &"s"[hs == 1], | 
|---|
|  | 968 | (hs > 1) ? | 
|---|
|  | 969 | GetPString(IDS_ARETEXT) : GetPString(IDS_ISTEXT)); | 
|---|
|  | 970 | if (ro || hs || sysdir) | 
|---|
|  | 971 | DosBeep(300, 100); | 
|---|
|  | 972 | strcat(prompt, GetPString(IDS_DELPROMPT6TEXT)); | 
|---|
|  | 973 | if (!WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 974 | WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 975 | CheckListProc, | 
|---|
|  | 976 | FM3ModHandle, CHECK_FRAME, MPFROMP(&cl))) | 
|---|
|  | 977 | break; | 
|---|
|  | 978 | list = cl.list; | 
|---|
|  | 979 | if (!list || !list[0]) | 
|---|
|  | 980 | break; | 
|---|
|  | 981 | } | 
|---|
|  | 982 | for (x = 0; list[x]; x++) { | 
|---|
|  | 983 | fsa.attrFile = 0; | 
|---|
|  | 984 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 985 | DosQueryPathInfo(list[x], FIL_STANDARD, &fsa, sizeof(fsa)); | 
|---|
|  | 986 | if (fsa.attrFile & FILE_DIRECTORY) { | 
|---|
|  | 987 | sprintf(prompt, GetPString(IDS_DELETINGTEXT), list[x]); | 
|---|
|  | 988 | WinSetWindowText(WinWindowFromID(hwndFrame, SEEALL_STATUS), | 
|---|
|  | 989 | prompt); | 
|---|
|  | 990 | error = (APIRET) wipeallf("%s%s*", | 
|---|
|  | 991 | list[x], | 
|---|
|  | 992 | (*list[x] && | 
|---|
|  | 993 | list[x][strlen(list[x]) - 1] != | 
|---|
|  | 994 | '\\') ? "\\" : NullStr); | 
|---|
|  | 995 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 996 | if (!error) | 
|---|
|  | 997 | error = DosDeleteDir(list[x]); | 
|---|
|  | 998 | else | 
|---|
|  | 999 | DosDeleteDir(list[x]); | 
|---|
|  | 1000 | } | 
|---|
|  | 1001 | else { | 
|---|
|  | 1002 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1003 | if (SHORT1FROMMP(mp1) == IDM_DELETE) | 
|---|
|  | 1004 | error = DosDelete(list[x]); | 
|---|
|  | 1005 | else | 
|---|
|  | 1006 | error = DosForceDelete(list[x]); | 
|---|
|  | 1007 | if (error) { | 
|---|
| [84] | 1008 | DosError(FERR_DISABLEHARDERR); | 
|---|
| [551] | 1009 | make_deleteable(list[x]); | 
|---|
|  | 1010 | if (SHORT1FROMMP(mp1) == IDM_DELETE) | 
|---|
|  | 1011 | error = DosDelete(list[x]); | 
|---|
| [84] | 1012 | else | 
|---|
| [551] | 1013 | error = DosForceDelete(list[x]); | 
|---|
| [84] | 1014 | } | 
|---|
|  | 1015 | } | 
|---|
| [551] | 1016 | if (error) { | 
|---|
|  | 1017 | if (LogFileHandle) | 
|---|
|  | 1018 | fprintf(LogFileHandle, | 
|---|
|  | 1019 | GetPString(IDS_DELETEFAILED1TEXT), list[x], error); | 
|---|
|  | 1020 | if (Dos_Error(MB_ENTERCANCEL, | 
|---|
|  | 1021 | error, | 
|---|
|  | 1022 | hwndFrame, | 
|---|
|  | 1023 | pszSrcFile, | 
|---|
|  | 1024 | __LINE__, | 
|---|
|  | 1025 | GetPString(IDS_DELETEFAILED2TEXT), | 
|---|
|  | 1026 | list[x]) == MBID_CANCEL) | 
|---|
|  | 1027 | break; | 
|---|
| [84] | 1028 | } | 
|---|
| [551] | 1029 | else if (LogFileHandle) | 
|---|
|  | 1030 | fprintf(LogFileHandle, | 
|---|
|  | 1031 | "%s\n", GetPString(IDS_DELETEDTEXT), list[x]); | 
|---|
|  | 1032 | AddToList(list[x], &files, &numfiles, &numalloc); | 
|---|
|  | 1033 | } | 
|---|
|  | 1034 | } | 
|---|
|  | 1035 | FreeList(list); | 
|---|
|  | 1036 | break; | 
|---|
| [2] | 1037 |  | 
|---|
| [551] | 1038 | case IDM_SAVETOLIST: | 
|---|
|  | 1039 | if (list) { | 
|---|
|  | 1040 | WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 1041 | WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 1042 | SaveAllListDlgProc, | 
|---|
|  | 1043 | FM3ModHandle, SAV_FRAME, MPFROMP(list)); | 
|---|
|  | 1044 | FreeList(list); | 
|---|
|  | 1045 | } | 
|---|
|  | 1046 | break; | 
|---|
| [2] | 1047 |  | 
|---|
| [551] | 1048 | case IDM_SAVETOCLIP: | 
|---|
|  | 1049 | case IDM_APPENDTOCLIP: | 
|---|
|  | 1050 | if (list) { | 
|---|
|  | 1051 | ListToClipboardHab(WinQueryAnchorBlock(hwnd), | 
|---|
|  | 1052 | list, (SHORT1FROMMP(mp1) == IDM_APPENDTOCLIP)); | 
|---|
|  | 1053 | FreeList(list); | 
|---|
| [84] | 1054 | } | 
|---|
| [551] | 1055 | break; | 
|---|
| [2] | 1056 |  | 
|---|
| [551] | 1057 | default: | 
|---|
|  | 1058 | if (list) | 
|---|
|  | 1059 | FreeList(list); | 
|---|
|  | 1060 | break; | 
|---|
|  | 1061 | } | 
|---|
| [2] | 1062 |  | 
|---|
| [551] | 1063 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 1064 | case IDM_MOVE: | 
|---|
|  | 1065 | case IDM_COPY: | 
|---|
|  | 1066 | case IDM_RENAME: | 
|---|
|  | 1067 | sprintf(message, | 
|---|
|  | 1068 | GetPString(IDS_OPSCOMPLETETEXT), | 
|---|
|  | 1069 | (SHORT1FROMMP(mp1) == IDM_MOVE) ? | 
|---|
|  | 1070 | GetPString(IDS_MOVETEXT) : | 
|---|
|  | 1071 | (SHORT1FROMMP(mp1) == IDM_COPY) ? | 
|---|
|  | 1072 | GetPString(IDS_COPYTEXT) : | 
|---|
|  | 1073 | (SHORT1FROMMP(mp1) == IDM_WPSMOVE) ? | 
|---|
|  | 1074 | GetPString(IDS_WPSMOVETEXT) : | 
|---|
|  | 1075 | (SHORT1FROMMP(mp1) == IDM_WPSCOPY) ? | 
|---|
|  | 1076 | GetPString(IDS_WPSCOPYTEXT) : | 
|---|
|  | 1077 | GetPString(IDS_RENAMETEXT), | 
|---|
|  | 1078 | &"s"[x == 1], | 
|---|
|  | 1079 | (SHORT1FROMMP(mp1) == IDM_MOVE || | 
|---|
|  | 1080 | SHORT1FROMMP(mp1) == IDM_COPY || | 
|---|
|  | 1081 | SHORT1FROMMP(mp1) == IDM_WPSMOVE || | 
|---|
|  | 1082 | SHORT1FROMMP(mp1) == IDM_WPSCOPY) ? | 
|---|
|  | 1083 | GetPString(IDS_TOTEXT) : | 
|---|
|  | 1084 | NullStr, | 
|---|
|  | 1085 | (SHORT1FROMMP(mp1) == IDM_MOVE || | 
|---|
|  | 1086 | SHORT1FROMMP(mp1) == IDM_COPY || | 
|---|
|  | 1087 | SHORT1FROMMP(mp1) == IDM_WPSMOVE || | 
|---|
|  | 1088 | SHORT1FROMMP(mp1) == IDM_WPSCOPY) ? | 
|---|
|  | 1089 | path : | 
|---|
|  | 1090 | NullStr, | 
|---|
|  | 1091 | (x != 1) ? GetPString(IDS_ARETEXT) : GetPString(IDS_ISTEXT)); | 
|---|
|  | 1092 | WinSetWindowText(WinWindowFromID(hwndFrame, SEEALL_STATUS), message); | 
|---|
|  | 1093 | if (toupper(*path) < 'C') | 
|---|
|  | 1094 | DosBeep(1000, 25); | 
|---|
|  | 1095 | DosSleep(33L); | 
|---|
|  | 1096 | break; | 
|---|
|  | 1097 |  | 
|---|
|  | 1098 | default: | 
|---|
|  | 1099 | break; | 
|---|
| [2] | 1100 | } | 
|---|
| [551] | 1101 | Abort: | 
|---|
|  | 1102 | if (files) { | 
|---|
|  | 1103 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 1104 | UM_UPDATERECORDLIST, MPFROMP(files), MPVOID)) | 
|---|
|  | 1105 | FreeList(files); | 
|---|
|  | 1106 | } | 
|---|
|  | 1107 | PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 1108 | UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1109 | } | 
|---|
|  | 1110 | return 0; | 
|---|
| [2] | 1111 |  | 
|---|
| [551] | 1112 | case WM_CLOSE: | 
|---|
|  | 1113 | WinDestroyWindow(hwnd); | 
|---|
|  | 1114 | break; | 
|---|
| [2] | 1115 |  | 
|---|
| [551] | 1116 | case WM_DESTROY: | 
|---|
|  | 1117 | if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID)) | 
|---|
|  | 1118 | WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 1119 | break; | 
|---|
| [2] | 1120 | } | 
|---|
| [551] | 1121 | return WinDefWindowProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 1122 | } | 
|---|
|  | 1123 |  | 
|---|
| [551] | 1124 | static VOID MakeSeeObjWinThread(VOID * args) | 
|---|
| [162] | 1125 | { | 
|---|
| [551] | 1126 | HAB hab2; | 
|---|
|  | 1127 | HMQ hmq2; | 
|---|
|  | 1128 | HWND hwndObj; | 
|---|
|  | 1129 | ALLDATA *ad = (ALLDATA *) args; | 
|---|
|  | 1130 | QMSG qmsg2; | 
|---|
| [2] | 1131 |  | 
|---|
| [551] | 1132 | if (ad) { | 
|---|
| [2] | 1133 | hab2 = WinInitialize(0); | 
|---|
| [551] | 1134 | if (hab2) { | 
|---|
|  | 1135 | hmq2 = WinCreateMsgQueue(hab2, 256); | 
|---|
|  | 1136 | if (hmq2) { | 
|---|
| [84] | 1137 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1138 | WinRegisterClass(hab2, | 
|---|
|  | 1139 | GetPString(IDS_WCOBJECTWINDOW), | 
|---|
| [551] | 1140 | SeeObjWndProc, 0, sizeof(PVOID)); | 
|---|
| [84] | 1141 | hwndObj = WinCreateWindow(HWND_OBJECT, | 
|---|
|  | 1142 | GetPString(IDS_WCOBJECTWINDOW), | 
|---|
| [551] | 1143 | (PSZ) NULL, | 
|---|
| [84] | 1144 | 0, | 
|---|
|  | 1145 | 0L, | 
|---|
|  | 1146 | 0L, | 
|---|
|  | 1147 | 0L, | 
|---|
| [551] | 1148 | 0L, 0L, HWND_TOP, SEEALL_OBJ, NULL, NULL); | 
|---|
| [377] | 1149 | if (!hwndObj) { | 
|---|
| [551] | 1150 | Win_Error2(HWND_OBJECT, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 1151 | IDS_WINCREATEWINDOW); | 
|---|
|  | 1152 | if (!PostMsg(ad->hwndClient, WM_CLOSE, MPVOID, MPVOID)) | 
|---|
|  | 1153 | WinSendMsg(ad->hwndClient, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [377] | 1154 | } | 
|---|
|  | 1155 | else { | 
|---|
| [84] | 1156 | ad->hwndObj = hwndObj; | 
|---|
| [551] | 1157 | WinSetWindowULong(hwndObj, QWL_USER, ad->hwndFrame); | 
|---|
| [84] | 1158 | priority_normal(); | 
|---|
| [551] | 1159 | while (WinGetMsg(hab2, &qmsg2, (HWND) 0, 0, 0)) | 
|---|
|  | 1160 | WinDispatchMsg(hab2, &qmsg2); | 
|---|
| [84] | 1161 | WinDestroyWindow(hwndObj); | 
|---|
|  | 1162 | } | 
|---|
|  | 1163 | WinDestroyMsgQueue(hmq2); | 
|---|
| [2] | 1164 | } | 
|---|
|  | 1165 | else | 
|---|
| [84] | 1166 | WinTerminate(hab2); | 
|---|
| [2] | 1167 | } | 
|---|
|  | 1168 | } | 
|---|
|  | 1169 | } | 
|---|
|  | 1170 |  | 
|---|
| [551] | 1171 | static VOID SelectMask(HWND hwnd, BOOL deselect) | 
|---|
| [84] | 1172 | { | 
|---|
| [551] | 1173 | MASK mask; | 
|---|
|  | 1174 | register ULONG x, y, z; | 
|---|
|  | 1175 | BOOL ret; | 
|---|
|  | 1176 | ALLDATA *pAD = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 1177 |  | 
|---|
| [551] | 1178 | memset(&mask, 0, sizeof(mask)); | 
|---|
| [2] | 1179 | mask.fNoAttribs = FALSE; | 
|---|
|  | 1180 | mask.fNoDirs = TRUE; | 
|---|
| [84] | 1181 | mask.attrFile = pAD->mask.attrFile; | 
|---|
|  | 1182 | mask.antiattr = pAD->mask.antiattr; | 
|---|
| [2] | 1183 | mask.fIsSeeAll = TRUE; | 
|---|
|  | 1184 | strcpy(mask.prompt, | 
|---|
| [84] | 1185 | GetPString((!deselect) ? | 
|---|
| [551] | 1186 | IDS_SELECTFILTERTEXT : IDS_DESELECTFILTERTEXT)); | 
|---|
| [84] | 1187 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 1188 | hwnd, | 
|---|
|  | 1189 | PickMaskDlgProc, | 
|---|
|  | 1190 | FM3ModHandle, | 
|---|
|  | 1191 | MSK_FRAME, | 
|---|
|  | 1192 | MPFROMP(&mask)) && | 
|---|
| [551] | 1193 | (*mask.szMask || | 
|---|
|  | 1194 | mask.attrFile != pAD->mask.attrFile || | 
|---|
|  | 1195 | mask.antiattr != pAD->mask.antiattr)) { | 
|---|
|  | 1196 | for (x = 0; x < pAD->afifiles; x++) { | 
|---|
| [84] | 1197 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
| [2] | 1198 | ret = FALSE; | 
|---|
| [84] | 1199 | if (mask.pszMasks[1]) { | 
|---|
| [551] | 1200 | for (z = 0; mask.pszMasks[z]; z++) { | 
|---|
| [84] | 1201 | if (*mask.pszMasks[z]) { | 
|---|
|  | 1202 | if (*mask.pszMasks[z] != '/') { | 
|---|
| [551] | 1203 | if (wildcard((strchr(mask.pszMasks[z], '\\') || | 
|---|
|  | 1204 | strchr(mask.pszMasks[z], ':')) ? | 
|---|
|  | 1205 | pAD->afindex[y]->fullname : pAD->afindex[y]-> | 
|---|
|  | 1206 | filename, mask.pszMasks[z], FALSE)) | 
|---|
| [84] | 1207 | ret = TRUE; | 
|---|
|  | 1208 | } | 
|---|
|  | 1209 | else { | 
|---|
| [551] | 1210 | if (wildcard((strchr(mask.pszMasks[z], '\\') || | 
|---|
|  | 1211 | strchr(mask.pszMasks[z], ':')) ? | 
|---|
|  | 1212 | pAD->afindex[y]->fullname : pAD->afindex[y]-> | 
|---|
|  | 1213 | filename, mask.pszMasks[y] + 1, FALSE)) { | 
|---|
| [84] | 1214 | ret = FALSE; | 
|---|
|  | 1215 | break; | 
|---|
|  | 1216 | } | 
|---|
|  | 1217 | } | 
|---|
|  | 1218 | } | 
|---|
|  | 1219 | } | 
|---|
| [2] | 1220 | } | 
|---|
| [84] | 1221 | else if (*mask.szMask) { | 
|---|
| [551] | 1222 | if (wildcard((strchr(mask.szMask, '\\') || | 
|---|
|  | 1223 | strchr(mask.szMask, ':')) ? | 
|---|
|  | 1224 | pAD->afindex[y]->fullname : pAD->afindex[y]->filename, | 
|---|
|  | 1225 | mask.szMask, FALSE)) | 
|---|
| [84] | 1226 | ret = TRUE; | 
|---|
| [2] | 1227 | } | 
|---|
|  | 1228 | else | 
|---|
| [84] | 1229 | ret = TRUE; | 
|---|
|  | 1230 | if (ret) { | 
|---|
| [551] | 1231 | if ((!(mask.attrFile & FILE_HIDDEN) | 
|---|
|  | 1232 | && (pAD->afindex[y]->attrFile & FILE_HIDDEN)) | 
|---|
|  | 1233 | || (!(mask.attrFile & FILE_SYSTEM) | 
|---|
|  | 1234 | && (pAD->afindex[y]->attrFile & FILE_SYSTEM)) | 
|---|
|  | 1235 | || (!(mask.attrFile & FILE_READONLY) | 
|---|
|  | 1236 | && (pAD->afindex[y]->attrFile & FILE_READONLY)) | 
|---|
|  | 1237 | || (!(mask.attrFile & FILE_ARCHIVED) | 
|---|
|  | 1238 | && (pAD->afindex[y]->attrFile & FILE_ARCHIVED))) | 
|---|
| [84] | 1239 | ret = FALSE; | 
|---|
| [551] | 1240 | else | 
|---|
|  | 1241 | if (((mask.antiattr & FILE_HIDDEN) | 
|---|
|  | 1242 | && !(pAD->afindex[y]->attrFile & FILE_HIDDEN)) | 
|---|
|  | 1243 | || ((mask.antiattr & FILE_SYSTEM) | 
|---|
|  | 1244 | && !(pAD->afindex[y]->attrFile & FILE_SYSTEM)) | 
|---|
|  | 1245 | || ((mask.antiattr & FILE_READONLY) | 
|---|
|  | 1246 | && !(pAD->afindex[y]->attrFile & FILE_READONLY)) | 
|---|
|  | 1247 | || ((mask.antiattr & FILE_ARCHIVED) | 
|---|
|  | 1248 | && !(pAD->afindex[y]->attrFile & FILE_ARCHIVED))) | 
|---|
|  | 1249 | ret = FALSE; | 
|---|
| [2] | 1250 | } | 
|---|
| [84] | 1251 | if (ret) { | 
|---|
|  | 1252 | if (deselect) { | 
|---|
|  | 1253 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1254 | pAD->selected--; | 
|---|
| [162] | 1255 | pAD->ullSelectedBytes -= pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1256 | pAD->afindex[y]->flags &= ~AF_SELECTED; | 
|---|
|  | 1257 | } | 
|---|
|  | 1258 | } | 
|---|
|  | 1259 | else { | 
|---|
|  | 1260 | if (~pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1261 | pAD->selected++; | 
|---|
| [162] | 1262 | pAD->ullSelectedBytes += pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1263 | pAD->afindex[y]->flags |= AF_SELECTED; | 
|---|
|  | 1264 | } | 
|---|
|  | 1265 | } | 
|---|
| [2] | 1266 | } | 
|---|
| [551] | 1267 | }                                   // for | 
|---|
| [2] | 1268 | } | 
|---|
|  | 1269 | } | 
|---|
|  | 1270 |  | 
|---|
| [551] | 1271 | static VOID CollectList(HWND hwnd, CHAR ** list) | 
|---|
| [162] | 1272 | { | 
|---|
| [551] | 1273 | if (!Collector) { | 
|---|
|  | 1274 | if (hwndMain && !fExternalCollector && !strcmp(realappname, FM3Str)) { | 
|---|
| [2] | 1275 |  | 
|---|
|  | 1276 | HWND hwndC; | 
|---|
| [551] | 1277 | SWP swp; | 
|---|
| [2] | 1278 |  | 
|---|
| [551] | 1279 | if (!fAutoTile) | 
|---|
|  | 1280 | GetNextWindowPos(hwndMain, &swp, NULL, NULL); | 
|---|
|  | 1281 | hwndC = StartCollector(hwndMain, 4); | 
|---|
|  | 1282 | if (hwndC) { | 
|---|
|  | 1283 | if (!fAutoTile) | 
|---|
|  | 1284 | WinSetWindowPos(hwndC, HWND_TOP, swp.x, swp.y, | 
|---|
|  | 1285 | swp.cx, swp.cy, SWP_MOVE | SWP_SIZE | | 
|---|
| [84] | 1286 | SWP_SHOW | SWP_ZORDER); | 
|---|
|  | 1287 | else | 
|---|
| [551] | 1288 | TileChildren(hwndMain, TRUE); | 
|---|
|  | 1289 | WinSetWindowPos(hwndC, HWND_TOP, 0, 0, 0, 0, SWP_ACTIVATE); | 
|---|
| [84] | 1290 | DosSleep(250L); | 
|---|
| [2] | 1291 | } | 
|---|
|  | 1292 | } | 
|---|
|  | 1293 | else { | 
|---|
| [551] | 1294 | StartCollector(HWND_DESKTOP, 4); | 
|---|
| [2] | 1295 | DosSleep(250L); | 
|---|
|  | 1296 | } | 
|---|
|  | 1297 | } | 
|---|
| [551] | 1298 | if (!PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_COLLECTOR, 0), | 
|---|
|  | 1299 | MPFROMP(list))) | 
|---|
| [2] | 1300 | FreeList(list); | 
|---|
|  | 1301 | } | 
|---|
|  | 1302 |  | 
|---|
| [551] | 1303 | static VOID FreeAllFilesList(HWND hwnd) | 
|---|
| [162] | 1304 | { | 
|---|
| [551] | 1305 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 1306 | register ULONG x; | 
|---|
|  | 1307 |  | 
|---|
| [551] | 1308 | if (ad->afhead && ad->affiles) { | 
|---|
|  | 1309 | for (x = 0L; x < ad->affiles; x++) { | 
|---|
|  | 1310 | if (ad->afhead[x].fullname) | 
|---|
| [84] | 1311 | free(ad->afhead[x].fullname); | 
|---|
| [2] | 1312 | } | 
|---|
|  | 1313 | free(ad->afhead); | 
|---|
|  | 1314 | ad->afhead = NULL; | 
|---|
| [551] | 1315 | if (ad->afindex) | 
|---|
| [2] | 1316 | free(ad->afindex); | 
|---|
|  | 1317 | ad->afindex = NULL; | 
|---|
|  | 1318 | } | 
|---|
|  | 1319 | DosPostEventSem(CompactSem); | 
|---|
|  | 1320 | ad->afalloc = ad->afifiles = ad->affiles = ad->longest = ad->longestw = | 
|---|
|  | 1321 | ad->maxx = ad->horzscroll = 0; | 
|---|
|  | 1322 | } | 
|---|
|  | 1323 |  | 
|---|
| [551] | 1324 | static CHAR **BuildAList(HWND hwnd) | 
|---|
| [162] | 1325 | { | 
|---|
| [551] | 1326 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1327 | ULONG x; | 
|---|
|  | 1328 | ULONG y; | 
|---|
|  | 1329 | ULONG z = 0; | 
|---|
|  | 1330 | CHAR **list = NULL; | 
|---|
|  | 1331 | INT numfiles = 0; | 
|---|
|  | 1332 | INT numalloc = 0; | 
|---|
|  | 1333 | INT error; | 
|---|
| [2] | 1334 |  | 
|---|
| [551] | 1335 | if (ad->selected) { | 
|---|
|  | 1336 | for (x = 0; x < ad->afifiles; x++) { | 
|---|
| [2] | 1337 | y = (ad->invertsort) ? (ad->afifiles - 1) - x : x; | 
|---|
| [551] | 1338 | if (ad->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1339 | error = AddToList(ad->afindex[y]->fullname, &list, | 
|---|
|  | 1340 | &numfiles, &numalloc); | 
|---|
|  | 1341 | if (error) | 
|---|
| [84] | 1342 | break; | 
|---|
|  | 1343 | z++; | 
|---|
| [551] | 1344 | if (z >= ad->selected) | 
|---|
| [84] | 1345 | break; | 
|---|
| [2] | 1346 | } | 
|---|
|  | 1347 | } | 
|---|
|  | 1348 | } | 
|---|
|  | 1349 | return list; | 
|---|
|  | 1350 | } | 
|---|
|  | 1351 |  | 
|---|
| [551] | 1352 | static BOOL Mark(HWND hwnd, INT command, CHAR ** list) | 
|---|
| [84] | 1353 | { | 
|---|
| [2] | 1354 | /* Marks only unfiltered files */ | 
|---|
|  | 1355 |  | 
|---|
| [551] | 1356 | ALLDATA *pAD = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1357 | register ULONG x, y, z; | 
|---|
|  | 1358 | BOOL ret = TRUE; | 
|---|
|  | 1359 | BOOL didone = FALSE; | 
|---|
| [2] | 1360 |  | 
|---|
| [551] | 1361 | for (x = 0; x < pAD->afifiles; x++) { | 
|---|
| [84] | 1362 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
| [551] | 1363 | if (list) { | 
|---|
| [2] | 1364 | ret = FALSE; | 
|---|
| [551] | 1365 | for (z = 0; list[z]; z++) { | 
|---|
|  | 1366 | if (!stricmp(list[z], pAD->afindex[y]->fullname)) { | 
|---|
| [84] | 1367 | ret = TRUE; | 
|---|
|  | 1368 | break; | 
|---|
|  | 1369 | } | 
|---|
| [2] | 1370 | } | 
|---|
|  | 1371 | } | 
|---|
| [551] | 1372 | if (ret) { | 
|---|
| [2] | 1373 | didone = TRUE; | 
|---|
| [84] | 1374 | if (command == AFM_UNMARK) { | 
|---|
|  | 1375 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1376 | pAD->selected--; | 
|---|
| [162] | 1377 | pAD->ullSelectedBytes -= pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1378 | pAD->afindex[y]->flags &= ~AF_SELECTED; | 
|---|
|  | 1379 | } | 
|---|
| [2] | 1380 | } | 
|---|
| [84] | 1381 | else if (command == AFM_MARK) { | 
|---|
|  | 1382 | if (~pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1383 | pAD->selected++; | 
|---|
| [162] | 1384 | pAD->ullSelectedBytes += pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1385 | pAD->afindex[y]->flags |= AF_SELECTED; | 
|---|
|  | 1386 | } | 
|---|
| [2] | 1387 | } | 
|---|
| [84] | 1388 | else if (command == AFM_INVERT) { | 
|---|
|  | 1389 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 1390 | pAD->selected--; | 
|---|
| [162] | 1391 | pAD->ullSelectedBytes -= pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1392 | pAD->afindex[y]->flags &= ~AF_SELECTED; | 
|---|
|  | 1393 | } | 
|---|
|  | 1394 | else { | 
|---|
|  | 1395 | pAD->selected++; | 
|---|
| [162] | 1396 | pAD->ullSelectedBytes += pAD->afindex[y]->cbFile; | 
|---|
| [84] | 1397 | pAD->afindex[y]->flags |= AF_SELECTED; | 
|---|
|  | 1398 | } | 
|---|
| [2] | 1399 | } | 
|---|
| [84] | 1400 | else if (command == AFM_MARKDELETED) { | 
|---|
| [551] | 1401 | if (pAD->afindex[y]->flags & AF_SELECTED) | 
|---|
| [84] | 1402 | pAD->afindex[y]->flags |= AF_DELETED; | 
|---|
| [2] | 1403 | } | 
|---|
| [551] | 1404 | else if (command == AFM_FILTER) { | 
|---|
| [84] | 1405 | if (pAD->afindex[y]->flags & AF_SELECTED) | 
|---|
|  | 1406 | pAD->afindex[y]->flags |= AF_FILTERED; | 
|---|
| [2] | 1407 | } | 
|---|
|  | 1408 | } | 
|---|
| [551] | 1409 | }                                     // for x | 
|---|
| [2] | 1410 | return didone; | 
|---|
|  | 1411 | } | 
|---|
|  | 1412 |  | 
|---|
| [551] | 1413 | static BOOL UpdateList(HWND hwnd, CHAR ** list) | 
|---|
| [162] | 1414 | { | 
|---|
| [2] | 1415 | /* Updates files in the list */ | 
|---|
|  | 1416 |  | 
|---|
| [551] | 1417 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1418 | register ULONG x, z; | 
|---|
|  | 1419 | BOOL ret, didone = FALSE; | 
|---|
|  | 1420 | FILEFINDBUF3 ffb; | 
|---|
|  | 1421 | ULONG nm; | 
|---|
|  | 1422 | HDIR hdir; | 
|---|
|  | 1423 | CHAR *p; | 
|---|
| [2] | 1424 |  | 
|---|
| [551] | 1425 | if (list) { | 
|---|
|  | 1426 | for (z = 0; list[z] && !ad->stopflag; z++) { | 
|---|
| [2] | 1427 | ret = FALSE; | 
|---|
| [551] | 1428 | for (x = 0; x < ad->affiles; x++) { | 
|---|
|  | 1429 | if (!stricmp(list[z], ad->afhead[x].fullname)) { | 
|---|
| [84] | 1430 | ret = TRUE; | 
|---|
|  | 1431 | break; | 
|---|
|  | 1432 | } | 
|---|
| [2] | 1433 | } | 
|---|
| [551] | 1434 | if (ret) { | 
|---|
| [84] | 1435 | didone = TRUE; | 
|---|
|  | 1436 | hdir = HDIR_CREATE; | 
|---|
|  | 1437 | nm = 1L; | 
|---|
| [551] | 1438 | if (!DosFindFirst(list[z], &hdir, FILE_NORMAL | FILE_ARCHIVED | | 
|---|
|  | 1439 | FILE_DIRECTORY | FILE_READONLY | FILE_SYSTEM | | 
|---|
|  | 1440 | FILE_HIDDEN, &ffb, sizeof(ffb), &nm, | 
|---|
|  | 1441 | FIL_STANDARD)) { | 
|---|
| [84] | 1442 | DosFindClose(hdir); | 
|---|
| [551] | 1443 | if (!(ffb.attrFile & FILE_DIRECTORY)) { | 
|---|
|  | 1444 | ad->afhead[x].attrFile = (USHORT) ffb.attrFile; | 
|---|
| [84] | 1445 | ad->afhead[x].cbFile = ffb.cbFile; | 
|---|
|  | 1446 | ad->afhead[x].date = ffb.fdateLastWrite; | 
|---|
|  | 1447 | ad->afhead[x].time = ffb.ftimeLastWrite; | 
|---|
|  | 1448 | } | 
|---|
|  | 1449 | else | 
|---|
|  | 1450 | ad->afhead[x].flags |= AF_DELETED; | 
|---|
|  | 1451 | } | 
|---|
|  | 1452 | else | 
|---|
|  | 1453 | ad->afhead[x].flags |= AF_DELETED; | 
|---|
| [2] | 1454 | } | 
|---|
| [551] | 1455 | else if (isalpha(*list[z]) && ad->abDrvFlags[toupper(*list[z]) - 'A']) { | 
|---|
| [84] | 1456 | didone = TRUE; | 
|---|
|  | 1457 | hdir = HDIR_CREATE; | 
|---|
|  | 1458 | nm = 1L; | 
|---|
| [551] | 1459 | if (!DosFindFirst(list[z], &hdir, FILE_NORMAL | FILE_ARCHIVED | | 
|---|
|  | 1460 | FILE_DIRECTORY | FILE_READONLY | FILE_SYSTEM | | 
|---|
|  | 1461 | FILE_HIDDEN, &ffb, sizeof(ffb), &nm, | 
|---|
|  | 1462 | FIL_STANDARD)) { | 
|---|
| [84] | 1463 | DosFindClose(hdir); | 
|---|
| [551] | 1464 | if (!(ffb.attrFile & FILE_DIRECTORY)) { | 
|---|
|  | 1465 | if (!ad->afalloc || ad->affiles > ad->afalloc - 1) { | 
|---|
| [2] | 1466 |  | 
|---|
| [551] | 1467 | ALLFILES *temp, **templ; | 
|---|
| [2] | 1468 |  | 
|---|
| [551] | 1469 | temp = | 
|---|
|  | 1470 | xrealloc(ad->afhead, (ad->afalloc + 1) * sizeof(ALLFILES), | 
|---|
|  | 1471 | pszSrcFile, __LINE__); | 
|---|
| [335] | 1472 | if (!temp) { | 
|---|
|  | 1473 | ad->stopflag = 1; | 
|---|
|  | 1474 | break; | 
|---|
|  | 1475 | } | 
|---|
|  | 1476 | else { | 
|---|
| [84] | 1477 | ad->afhead = temp; | 
|---|
| [551] | 1478 | templ = | 
|---|
|  | 1479 | xrealloc(ad->afindex, | 
|---|
|  | 1480 | (ad->afalloc + 1) * sizeof(ALLFILES *), pszSrcFile, | 
|---|
|  | 1481 | __LINE__); | 
|---|
| [335] | 1482 | if (!templ) { | 
|---|
| [84] | 1483 | ad->stopflag = 1; | 
|---|
|  | 1484 | break; | 
|---|
|  | 1485 | } | 
|---|
| [335] | 1486 | else | 
|---|
|  | 1487 | ad->afindex = templ; | 
|---|
| [84] | 1488 | ad->afalloc++; | 
|---|
|  | 1489 | } | 
|---|
|  | 1490 | } | 
|---|
| [551] | 1491 | ad->afhead[ad->affiles].fullname = | 
|---|
|  | 1492 | xstrdup(list[z], pszSrcFile, __LINE__); | 
|---|
|  | 1493 | if (ad->afhead[ad->affiles].fullname) { | 
|---|
|  | 1494 | p = strrchr(ad->afhead[ad->affiles].fullname, '\\'); | 
|---|
|  | 1495 | if (!p) | 
|---|
| [84] | 1496 | p = ad->afhead[ad->affiles].fullname; | 
|---|
|  | 1497 | else | 
|---|
|  | 1498 | p++; | 
|---|
|  | 1499 | ad->afhead[ad->affiles].filename = p; | 
|---|
| [551] | 1500 | ad->afhead[ad->affiles].cbFile = ffb.cbFile; | 
|---|
|  | 1501 | ad->afhead[ad->affiles].date = ffb.fdateLastWrite; | 
|---|
|  | 1502 | ad->afhead[ad->affiles].time = ffb.ftimeLastWrite; | 
|---|
|  | 1503 | ad->afhead[ad->affiles].attrFile = (USHORT) ffb.attrFile; | 
|---|
|  | 1504 | ad->afhead[ad->affiles].flags = 0; | 
|---|
|  | 1505 | if (ad->longest < strlen(ad->afhead[ad->affiles].filename)) | 
|---|
| [84] | 1506 | ad->longest = strlen(ad->afhead[ad->affiles].filename); | 
|---|
| [551] | 1507 | if (ad->longestw < strlen(ad->afhead[ad->affiles].fullname)) | 
|---|
| [84] | 1508 | ad->longestw = strlen(ad->afhead[ad->affiles].fullname); | 
|---|
| [2] | 1509 |  | 
|---|
| [84] | 1510 | ad->affiles++; | 
|---|
|  | 1511 | } | 
|---|
|  | 1512 | else { | 
|---|
| [551] | 1513 | // saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"Strdup failed."); | 
|---|
| [84] | 1514 | ad->stopflag = 1; | 
|---|
|  | 1515 | break; | 
|---|
|  | 1516 | } | 
|---|
|  | 1517 | } | 
|---|
|  | 1518 | } | 
|---|
| [2] | 1519 | } | 
|---|
|  | 1520 | } | 
|---|
|  | 1521 | } | 
|---|
|  | 1522 | return didone; | 
|---|
|  | 1523 | } | 
|---|
|  | 1524 |  | 
|---|
| [551] | 1525 | static int comparefullnames(const void *v1, const void *v2) | 
|---|
| [162] | 1526 | { | 
|---|
| [551] | 1527 | ALLFILES *d1 = *(ALLFILES **) v1; | 
|---|
|  | 1528 | ALLFILES *d2 = *(ALLFILES **) v2; | 
|---|
|  | 1529 | int ret; | 
|---|
| [2] | 1530 |  | 
|---|
| [551] | 1531 | ret = stricmp(d1->fullname, d2->fullname); | 
|---|
| [2] | 1532 | return ret; | 
|---|
|  | 1533 | } | 
|---|
|  | 1534 |  | 
|---|
| [551] | 1535 | static int comparenames(const void *v1, const void *v2) | 
|---|
| [162] | 1536 | { | 
|---|
| [551] | 1537 | ALLFILES *d1 = *(ALLFILES **) v1; | 
|---|
|  | 1538 | ALLFILES *d2 = *(ALLFILES **) v2; | 
|---|
|  | 1539 | int ret; | 
|---|
| [2] | 1540 |  | 
|---|
| [551] | 1541 | ret = stricmp(d1->filename, d2->filename); | 
|---|
|  | 1542 | if (!ret) | 
|---|
|  | 1543 | ret = comparefullnames(v1, v2); | 
|---|
| [2] | 1544 | return ret; | 
|---|
|  | 1545 | } | 
|---|
|  | 1546 |  | 
|---|
| [551] | 1547 | static int compareexts(const void *v1, const void *v2) | 
|---|
| [162] | 1548 | { | 
|---|
| [551] | 1549 | ALLFILES *d1 = *(ALLFILES **) v1; | 
|---|
|  | 1550 | ALLFILES *d2 = *(ALLFILES **) v2; | 
|---|
|  | 1551 | register CHAR *p1, *p2; | 
|---|
|  | 1552 | int ret; | 
|---|
| [2] | 1553 |  | 
|---|
| [551] | 1554 | p1 = strrchr(d1->filename, '.'); | 
|---|
|  | 1555 | p2 = strrchr(d2->filename, '.'); | 
|---|
|  | 1556 | if (!p1) | 
|---|
| [2] | 1557 | p1 = NullStr; | 
|---|
|  | 1558 | else | 
|---|
|  | 1559 | p1++; | 
|---|
| [551] | 1560 | if (!p2) | 
|---|
| [2] | 1561 | p2 = NullStr; | 
|---|
|  | 1562 | else | 
|---|
|  | 1563 | p2++; | 
|---|
| [551] | 1564 | ret = stricmp(p1, p2); | 
|---|
|  | 1565 | if (!ret) | 
|---|
|  | 1566 | ret = comparenames(v1, v2); | 
|---|
| [2] | 1567 | return ret; | 
|---|
|  | 1568 | } | 
|---|
|  | 1569 |  | 
|---|
| [551] | 1570 | static int comparesizes(const void *v1, const void *v2) | 
|---|
| [162] | 1571 | { | 
|---|
| [551] | 1572 | ALLFILES *d1 = *(ALLFILES **) v1; | 
|---|
|  | 1573 | ALLFILES *d2 = *(ALLFILES **) v2; | 
|---|
|  | 1574 | int ret; | 
|---|
| [2] | 1575 |  | 
|---|
|  | 1576 | ret = (d1->cbFile > d2->cbFile) ? 1 : (d1->cbFile == d2->cbFile) ? 0 : -1; | 
|---|
| [551] | 1577 | if (!ret) | 
|---|
|  | 1578 | ret = comparenames(v1, v2); | 
|---|
| [2] | 1579 | return ret; | 
|---|
|  | 1580 | } | 
|---|
|  | 1581 |  | 
|---|
| [551] | 1582 | static int comparedates(const void *v1, const void *v2) | 
|---|
| [162] | 1583 | { | 
|---|
| [551] | 1584 | ALLFILES *d1 = *(ALLFILES **) v1; | 
|---|
|  | 1585 | ALLFILES *d2 = *(ALLFILES **) v2; | 
|---|
| [2] | 1586 | int ret; | 
|---|
|  | 1587 |  | 
|---|
|  | 1588 | ret = (d1->date.year > d2->date.year) ? 1 : | 
|---|
| [551] | 1589 | (d1->date.year < d2->date.year) ? -1 : | 
|---|
|  | 1590 | (d1->date.month > d2->date.month) ? 1 : | 
|---|
|  | 1591 | (d1->date.month < d2->date.month) ? -1 : | 
|---|
|  | 1592 | (d1->date.day > d2->date.day) ? 1 : | 
|---|
|  | 1593 | (d1->date.day < d2->date.day) ? -1 : | 
|---|
|  | 1594 | (d1->time.hours > d2->time.hours) ? 1 : | 
|---|
|  | 1595 | (d1->time.hours < d2->time.hours) ? -1 : | 
|---|
|  | 1596 | (d1->time.minutes > d2->time.minutes) ? 1 : | 
|---|
|  | 1597 | (d1->time.minutes < d2->time.minutes) ? -1 : | 
|---|
|  | 1598 | (d1->time.twosecs > d2->time.twosecs) ? 1 : | 
|---|
|  | 1599 | (d1->time.twosecs < d2->time.twosecs) ? -1 : 0; | 
|---|
| [2] | 1600 |  | 
|---|
| [551] | 1601 | if (!ret) | 
|---|
|  | 1602 | ret = comparenames(v1, v2); | 
|---|
| [2] | 1603 | return ret; | 
|---|
|  | 1604 | } | 
|---|
|  | 1605 |  | 
|---|
| [551] | 1606 | static VOID ReSort(HWND hwnd) | 
|---|
| [162] | 1607 | { | 
|---|
| [551] | 1608 | ALLDATA *pAD = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1609 | register ULONG x, y; | 
|---|
| [2] | 1610 |  | 
|---|
| [84] | 1611 | pAD->selected = 0; | 
|---|
| [162] | 1612 | pAD->ullSelectedBytes = 0; | 
|---|
| [551] | 1613 | for (x = 0, y = 0; x < pAD->affiles; x++) { | 
|---|
|  | 1614 | if (!(pAD->afhead[x].flags & (AF_DELETED | AF_FILTERED))) { | 
|---|
| [84] | 1615 | if (pAD->afhead[x].flags & AF_SELECTED) { | 
|---|
|  | 1616 | pAD->selected++; | 
|---|
| [162] | 1617 | pAD->ullSelectedBytes += pAD->afhead[x].cbFile; | 
|---|
| [2] | 1618 | } | 
|---|
| [84] | 1619 | pAD->afindex[y++] = &(pAD->afhead[x]); | 
|---|
| [2] | 1620 | } | 
|---|
| [551] | 1621 | }                                     // for x | 
|---|
| [84] | 1622 | pAD->afifiles = y; | 
|---|
| [551] | 1623 | PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID); | 
|---|
|  | 1624 | if (!pAD->stopflag && pAD->pfnCompare && pAD->afifiles) { | 
|---|
|  | 1625 | WinSendMsg(hwnd, UM_RESCAN, MPFROMLONG(1L), MPVOID); | 
|---|
|  | 1626 | qsort(pAD->afindex, pAD->afifiles, sizeof(ALLFILES *), pAD->pfnCompare); | 
|---|
| [2] | 1627 | } | 
|---|
|  | 1628 | } | 
|---|
|  | 1629 |  | 
|---|
| [551] | 1630 | VOID FindDupes(VOID * args) | 
|---|
| [162] | 1631 | { | 
|---|
| [551] | 1632 | register ULONG x, z; | 
|---|
|  | 1633 | register CHAR *px, *pz; | 
|---|
|  | 1634 | CHAR s[80]; | 
|---|
|  | 1635 | INT error; | 
|---|
|  | 1636 | HWND hwnd = (HWND) args; | 
|---|
|  | 1637 | HAB hab2 = (HAB) 0; | 
|---|
|  | 1638 | HMQ hmq2 = (HMQ) 0; | 
|---|
|  | 1639 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 1640 |  | 
|---|
| [551] | 1641 | if (!DosRequestMutexSem(ad->hmtxScan, SEM_INDEFINITE_WAIT)) { | 
|---|
| [2] | 1642 | priority_normal(); | 
|---|
|  | 1643 | hab2 = WinInitialize(0); | 
|---|
| [551] | 1644 | if (hab2) { | 
|---|
|  | 1645 | hmq2 = WinCreateMsgQueue(hab2, 0); | 
|---|
|  | 1646 | if (hmq2) { | 
|---|
|  | 1647 | WinCancelShutdown(hmq2, TRUE); | 
|---|
| [533] | 1648 | IncrThreadUsage(); | 
|---|
| [551] | 1649 | if (ad->cursored <= ad->afifiles) { | 
|---|
|  | 1650 | for (x = 0; x < ad->affiles; x++) | 
|---|
| [84] | 1651 | ad->afhead[x].flags &= (~(AF_DUPE | AF_SELECTED)); | 
|---|
|  | 1652 | DosSleep(1L); | 
|---|
| [551] | 1653 | for (x = 0; x < ad->affiles && !ad->stopflag; x++) { | 
|---|
|  | 1654 | if (!(ad->afhead[x].flags & (AF_DUPE | AF_FILTERED))) { | 
|---|
|  | 1655 | if (!(x % 50)) { | 
|---|
| [84] | 1656 | sprintf(s, | 
|---|
| [551] | 1657 | GetPString(IDS_DUPECHECKINGOFTEXT), x, ad->affiles); | 
|---|
|  | 1658 | WinSetWindowText(ad->hwndStatus, s); | 
|---|
| [84] | 1659 | } | 
|---|
| [551] | 1660 | for (z = 0; z < ad->affiles && !ad->stopflag; z++) { | 
|---|
|  | 1661 | if (x != z | 
|---|
|  | 1662 | && !(ad->afhead[z].flags & (AF_DUPE | AF_FILTERED))) { | 
|---|
|  | 1663 | if (ad->dupeflags & DP_SIZES) { | 
|---|
|  | 1664 | if (ad->afhead[x].cbFile != ad->afhead[z].cbFile) | 
|---|
| [84] | 1665 | goto SkipNonDupe; | 
|---|
|  | 1666 | } | 
|---|
| [551] | 1667 | if (ad->dupeflags & DP_DATES) { | 
|---|
|  | 1668 | if (*(INT *) & ad->afhead[x].date != | 
|---|
|  | 1669 | *(INT *) & ad->afhead[z].date || | 
|---|
|  | 1670 | *(INT *) & ad->afhead[x].time != | 
|---|
|  | 1671 | *(INT *) & ad->afhead[z].time) | 
|---|
| [84] | 1672 | goto SkipNonDupe; | 
|---|
|  | 1673 | } | 
|---|
| [551] | 1674 | if (ad->dupeflags & DP_NAMES) { | 
|---|
|  | 1675 | if (ad->dupeflags & DP_EXTS) { | 
|---|
|  | 1676 | px = strrchr(ad->afhead[x].filename, '.'); | 
|---|
|  | 1677 | pz = strrchr(ad->afhead[z].filename, '.'); | 
|---|
|  | 1678 | if ((px || pz) && (!px || !pz)) | 
|---|
| [84] | 1679 | goto SkipNonDupe; | 
|---|
| [551] | 1680 | if (px) { | 
|---|
| [84] | 1681 | *px = 0; | 
|---|
|  | 1682 | *pz = 0; | 
|---|
|  | 1683 | } | 
|---|
|  | 1684 | } | 
|---|
| [551] | 1685 | if (stricmp(ad->afhead[x].filename, | 
|---|
|  | 1686 | ad->afhead[z].filename)) { | 
|---|
|  | 1687 | if (ad->dupeflags & DP_EXTS) { | 
|---|
|  | 1688 | if (px) { | 
|---|
| [84] | 1689 | *px = '.'; | 
|---|
|  | 1690 | *pz = '.'; | 
|---|
|  | 1691 | } | 
|---|
|  | 1692 | } | 
|---|
|  | 1693 | goto SkipNonDupe; | 
|---|
|  | 1694 | } | 
|---|
| [551] | 1695 | if (ad->dupeflags & DP_EXTS) { | 
|---|
|  | 1696 | if (px) { | 
|---|
| [84] | 1697 | *px = '.'; | 
|---|
|  | 1698 | *pz = '.'; | 
|---|
|  | 1699 | } | 
|---|
|  | 1700 | } | 
|---|
|  | 1701 | } | 
|---|
| [551] | 1702 | if (ad->dupeflags & DP_CRCS) { | 
|---|
|  | 1703 | if (!(ad->afhead[x].flags & AF_CRCED)) { | 
|---|
| [84] | 1704 | ad->afhead[x].CRC = CRCFile(ad->afhead[x].fullname, | 
|---|
|  | 1705 | &error); | 
|---|
| [551] | 1706 | if (!error) | 
|---|
| [84] | 1707 | ad->afhead[x].flags |= AF_CRCED; | 
|---|
|  | 1708 | } | 
|---|
| [551] | 1709 | if (!(ad->afhead[z].flags & AF_CRCED)) { | 
|---|
| [84] | 1710 | ad->afhead[z].CRC = CRCFile(ad->afhead[z].fullname, | 
|---|
|  | 1711 | &error); | 
|---|
| [551] | 1712 | if (!error) | 
|---|
| [84] | 1713 | ad->afhead[z].flags |= AF_CRCED; | 
|---|
|  | 1714 | } | 
|---|
| [551] | 1715 | if ((ad->afhead[x].flags & AF_CRCED) && | 
|---|
|  | 1716 | (ad->afhead[z].flags & AF_CRCED)) { | 
|---|
|  | 1717 | if (ad->afhead[x].CRC != ad->afhead[z].CRC) | 
|---|
| [84] | 1718 | goto SkipNonDupe; | 
|---|
|  | 1719 | } | 
|---|
|  | 1720 | DosSleep(0); | 
|---|
|  | 1721 | } | 
|---|
|  | 1722 | ad->afhead[x].flags |= AF_DUPE; | 
|---|
|  | 1723 | ad->afhead[z].flags |= AF_DUPE; | 
|---|
| [551] | 1724 | SkipNonDupe: | 
|---|
|  | 1725 | ; | 
|---|
| [84] | 1726 | } | 
|---|
|  | 1727 | } | 
|---|
|  | 1728 | DosSleep(1L); | 
|---|
|  | 1729 | } | 
|---|
|  | 1730 | } | 
|---|
| [551] | 1731 | for (x = 0; x < ad->affiles && !ad->stopflag; x++) { | 
|---|
|  | 1732 | if (!(ad->afhead[x].flags & AF_DUPE)) | 
|---|
| [84] | 1733 | ad->afhead[x].flags |= AF_FILTERED; | 
|---|
|  | 1734 | } | 
|---|
|  | 1735 | ReSort(hwnd); | 
|---|
| [551] | 1736 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 1737 | } | 
|---|
| [2] | 1738 | } | 
|---|
|  | 1739 | } | 
|---|
| [551] | 1740 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [162] | 1741 | DosReleaseMutexSem(ad->hmtxScan); | 
|---|
| [551] | 1742 | }                                     // if got sem | 
|---|
|  | 1743 | if (hmq2) { | 
|---|
|  | 1744 | PostMsg(hwnd, UM_CONTAINER_FILLED, MPVOID, MPVOID); | 
|---|
| [533] | 1745 | WinDestroyMsgQueue(hmq2); | 
|---|
| [2] | 1746 | } | 
|---|
| [551] | 1747 | if (hab2) { | 
|---|
| [533] | 1748 | DecrThreadUsage(); | 
|---|
| [2] | 1749 | WinTerminate(hab2); | 
|---|
| [533] | 1750 | } | 
|---|
| [2] | 1751 | } | 
|---|
|  | 1752 |  | 
|---|
| [551] | 1753 | static VOID FilterList(HWND hwnd) | 
|---|
| [162] | 1754 | { | 
|---|
| [551] | 1755 | register ULONG x, z; | 
|---|
|  | 1756 | BOOL ret; | 
|---|
|  | 1757 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1758 | CHAR *p; | 
|---|
| [2] | 1759 |  | 
|---|
| [551] | 1760 | if (ad->cursored <= ad->afifiles) { | 
|---|
| [2] | 1761 | x = ad->cursored - 1; | 
|---|
|  | 1762 | x = (ad->invertsort) ? (ad->afifiles - 1) - x : x; | 
|---|
| [551] | 1763 | p = strrchr(ad->afindex[x]->filename, '.'); | 
|---|
|  | 1764 | if (p) { | 
|---|
|  | 1765 | strcpy(ad->mask.szMask, "*"); | 
|---|
|  | 1766 | strcat(ad->mask.szMask, p); | 
|---|
| [2] | 1767 | } | 
|---|
|  | 1768 | } | 
|---|
|  | 1769 | *(ad->mask.prompt) = 0; | 
|---|
|  | 1770 | ad->mask.fIsSeeAll = TRUE; | 
|---|
| [551] | 1771 | if (WinDlgBox(HWND_DESKTOP, hwnd, PickMaskDlgProc, | 
|---|
|  | 1772 | FM3ModHandle, MSK_FRAME, MPFROMP(&ad->mask))) { | 
|---|
|  | 1773 | for (x = 0; x < ad->affiles; x++) { | 
|---|
| [2] | 1774 | ret = FALSE; | 
|---|
| [551] | 1775 | if (ad->mask.pszMasks[1]) { | 
|---|
|  | 1776 | for (z = 0; ad->mask.pszMasks[z]; z++) { | 
|---|
|  | 1777 | if (*ad->mask.pszMasks[z]) { | 
|---|
|  | 1778 | if (*ad->mask.pszMasks[z] != '/') { | 
|---|
|  | 1779 | if (wildcard((strchr(ad->mask.pszMasks[z], '\\') || | 
|---|
|  | 1780 | strchr(ad->mask.pszMasks[z], ':')) ? | 
|---|
| [84] | 1781 | ad->afhead[x].fullname : ad->afhead[x].filename, | 
|---|
| [551] | 1782 | ad->mask.pszMasks[z], FALSE)) | 
|---|
| [84] | 1783 | ret = TRUE; | 
|---|
|  | 1784 | } | 
|---|
|  | 1785 | else { | 
|---|
| [551] | 1786 | if (wildcard((strchr(ad->mask.pszMasks[z], '\\') || | 
|---|
|  | 1787 | strchr(ad->mask.pszMasks[z], ':')) ? | 
|---|
| [84] | 1788 | ad->afhead[x].fullname : ad->afhead[x].filename, | 
|---|
| [551] | 1789 | ad->mask.pszMasks[z] + 1, FALSE)) { | 
|---|
| [84] | 1790 | ret = FALSE; | 
|---|
|  | 1791 | break; | 
|---|
|  | 1792 | } | 
|---|
|  | 1793 | } | 
|---|
|  | 1794 | } | 
|---|
|  | 1795 | } | 
|---|
| [2] | 1796 | } | 
|---|
| [551] | 1797 | else if (*ad->mask.szMask) { | 
|---|
|  | 1798 | if (wildcard((strchr(ad->mask.szMask, '\\') || | 
|---|
|  | 1799 | strchr(ad->mask.szMask, ':')) ? | 
|---|
| [84] | 1800 | ad->afhead[x].fullname : ad->afhead[x].filename, | 
|---|
| [551] | 1801 | ad->mask.szMask, FALSE)) | 
|---|
| [84] | 1802 | ret = TRUE; | 
|---|
| [2] | 1803 | } | 
|---|
|  | 1804 | else | 
|---|
| [84] | 1805 | ret = TRUE; | 
|---|
| [2] | 1806 |  | 
|---|
| [551] | 1807 | if (ret) { | 
|---|
|  | 1808 | if ((!(ad->mask.attrFile & FILE_HIDDEN) | 
|---|
|  | 1809 | && (ad->afhead[x].attrFile & FILE_HIDDEN)) | 
|---|
|  | 1810 | || (!(ad->mask.attrFile & FILE_SYSTEM) | 
|---|
|  | 1811 | && (ad->afhead[x].attrFile & FILE_SYSTEM)) | 
|---|
|  | 1812 | || (!(ad->mask.attrFile & FILE_READONLY) | 
|---|
|  | 1813 | && (ad->afhead[x].attrFile & FILE_READONLY)) | 
|---|
|  | 1814 | || (!(ad->mask.attrFile & FILE_ARCHIVED) | 
|---|
|  | 1815 | && (ad->afhead[x].attrFile & FILE_ARCHIVED))) | 
|---|
| [84] | 1816 | ret = FALSE; | 
|---|
| [551] | 1817 | else | 
|---|
|  | 1818 | if (((ad->mask.antiattr & FILE_HIDDEN) | 
|---|
|  | 1819 | && !(ad->afhead[x].attrFile & FILE_HIDDEN)) | 
|---|
|  | 1820 | || ((ad->mask.antiattr & FILE_SYSTEM) | 
|---|
|  | 1821 | && !(ad->afhead[x].attrFile & FILE_SYSTEM)) | 
|---|
|  | 1822 | || ((ad->mask.antiattr & FILE_READONLY) | 
|---|
|  | 1823 | && !(ad->afhead[x].attrFile & FILE_READONLY)) | 
|---|
|  | 1824 | || ((ad->mask.antiattr & FILE_ARCHIVED) | 
|---|
|  | 1825 | && !(ad->afhead[x].attrFile & FILE_ARCHIVED))) | 
|---|
|  | 1826 | ret = FALSE; | 
|---|
| [2] | 1827 | } | 
|---|
|  | 1828 |  | 
|---|
| [551] | 1829 | if (!ret) | 
|---|
| [84] | 1830 | ad->afhead[x].flags |= AF_FILTERED; | 
|---|
| [2] | 1831 | else | 
|---|
| [84] | 1832 | ad->afhead[x].flags &= (~AF_FILTERED); | 
|---|
| [2] | 1833 | } | 
|---|
|  | 1834 | ReSort(hwnd); | 
|---|
| [551] | 1835 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1836 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [2] | 1837 | } | 
|---|
|  | 1838 | } | 
|---|
|  | 1839 |  | 
|---|
| [551] | 1840 | static ULONG RemoveDeleted(HWND hwnd) | 
|---|
| [162] | 1841 | { | 
|---|
| [551] | 1842 | ALLDATA *pAD = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1843 | ULONG oldaffiles = pAD->affiles; | 
|---|
|  | 1844 | register ULONG x, y; | 
|---|
| [2] | 1845 |  | 
|---|
| [551] | 1846 | for (x = 0; x < pAD->affiles; x++) { | 
|---|
| [84] | 1847 | if (pAD->afhead[x].flags & AF_DELETED) { | 
|---|
| [551] | 1848 | for (y = x; y < pAD->affiles; y++) { | 
|---|
| [84] | 1849 | if (~pAD->afhead[y].flags & AF_DELETED) | 
|---|
|  | 1850 | break; | 
|---|
|  | 1851 | if (pAD->afhead[y].flags & AF_SELECTED && | 
|---|
|  | 1852 | ~pAD->afhead[y].flags & AF_FILTERED) { | 
|---|
|  | 1853 | pAD->selected--; | 
|---|
| [162] | 1854 | pAD->ullSelectedBytes -= pAD->afhead[y].cbFile; | 
|---|
| [84] | 1855 | } | 
|---|
|  | 1856 | free(pAD->afhead[y].fullname); | 
|---|
| [2] | 1857 | } | 
|---|
| [551] | 1858 | memmove(&(pAD->afhead[x]), &(pAD->afhead[y]), | 
|---|
| [84] | 1859 | (pAD->affiles - y) * sizeof(ALLFILES)); | 
|---|
|  | 1860 | pAD->affiles -= (y - x); | 
|---|
| [2] | 1861 | } | 
|---|
| [551] | 1862 | }                                     // for x | 
|---|
|  | 1863 | if (pAD->affiles != oldaffiles) { | 
|---|
| [2] | 1864 |  | 
|---|
| [551] | 1865 | ALLFILES *tempa, **templ; | 
|---|
| [2] | 1866 |  | 
|---|
| [551] | 1867 | if (!pAD->affiles) | 
|---|
| [2] | 1868 | FreeAllFilesList(hwnd); | 
|---|
|  | 1869 | else { | 
|---|
| [551] | 1870 | tempa = | 
|---|
|  | 1871 | xrealloc(pAD->afhead, pAD->affiles * sizeof(ALLFILES), pszSrcFile, | 
|---|
|  | 1872 | __LINE__); | 
|---|
| [335] | 1873 | if (tempa) { | 
|---|
| [84] | 1874 | pAD->afhead = tempa; | 
|---|
|  | 1875 | pAD->afalloc = pAD->affiles; | 
|---|
| [2] | 1876 | } | 
|---|
| [551] | 1877 | templ = | 
|---|
|  | 1878 | xrealloc(pAD->afindex, pAD->affiles * sizeof(ALLFILES *), pszSrcFile, | 
|---|
|  | 1879 | __LINE__); | 
|---|
| [335] | 1880 | if (templ) | 
|---|
| [84] | 1881 | pAD->afindex = templ; | 
|---|
| [2] | 1882 | DosPostEventSem(CompactSem); | 
|---|
|  | 1883 | ReSort(hwnd); | 
|---|
|  | 1884 | } | 
|---|
|  | 1885 | } | 
|---|
| [84] | 1886 | return pAD->affiles; | 
|---|
| [2] | 1887 | } | 
|---|
|  | 1888 |  | 
|---|
| [551] | 1889 | static VOID DoADir(HWND hwnd, CHAR * pathname) | 
|---|
| [162] | 1890 | { | 
|---|
| [551] | 1891 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 1892 | CHAR *filename, *enddir; | 
|---|
|  | 1893 | FILEFINDBUF3 *pffb, *ffb; | 
|---|
|  | 1894 | HDIR hdir = HDIR_CREATE; | 
|---|
|  | 1895 | ULONG nm, uL; | 
|---|
| [2] | 1896 | register ULONG x; | 
|---|
|  | 1897 | register PBYTE fb; | 
|---|
|  | 1898 |  | 
|---|
| [551] | 1899 | filename = xmalloc(CCHMAXPATH, pszSrcFile, __LINE__); | 
|---|
|  | 1900 | if (!filename) | 
|---|
| [2] | 1901 | return; | 
|---|
| [335] | 1902 |  | 
|---|
| [2] | 1903 | uL = ad->afFilesToGet; | 
|---|
| [551] | 1904 | if (fRemoteBug && isalpha(*pathname) && pathname[1] == ':' && | 
|---|
|  | 1905 | pathname[2] == '\\' && | 
|---|
|  | 1906 | (driveflags[toupper(*pathname) - 'A'] & DRIVE_REMOTE)) | 
|---|
| [2] | 1907 | uL = 1L; | 
|---|
| [551] | 1908 | pffb = xmalloc(sizeof(FILEFINDBUF3) * uL, pszSrcFile, __LINE__); | 
|---|
|  | 1909 | if (!pffb) { | 
|---|
| [2] | 1910 | free(filename); | 
|---|
|  | 1911 | return; | 
|---|
|  | 1912 | } | 
|---|
|  | 1913 | nm = uL; | 
|---|
| [551] | 1914 | strcpy(filename, pathname); | 
|---|
| [2] | 1915 | enddir = &filename[strlen(filename) - 1]; | 
|---|
| [551] | 1916 | if (*enddir != '\\') { | 
|---|
| [2] | 1917 | enddir++; | 
|---|
|  | 1918 | *enddir = '\\'; | 
|---|
|  | 1919 | } | 
|---|
|  | 1920 | enddir++; | 
|---|
| [551] | 1921 | strcpy(enddir, "*"); | 
|---|
| [2] | 1922 | DosError(FERR_DISABLEHARDERR); | 
|---|
| [551] | 1923 | if (!DosFindFirst(filename, &hdir, FILE_NORMAL | FILE_ARCHIVED | | 
|---|
|  | 1924 | FILE_READONLY | FILE_DIRECTORY | FILE_SYSTEM | | 
|---|
|  | 1925 | FILE_HIDDEN, pffb, sizeof(FILEFINDBUF3) * nm, &nm, | 
|---|
|  | 1926 | FIL_STANDARD)) { | 
|---|
| [2] | 1927 | do { | 
|---|
|  | 1928 | priority_normal(); | 
|---|
| [551] | 1929 | fb = (PBYTE) pffb; | 
|---|
|  | 1930 | for (x = 0; x < nm; x++) { | 
|---|
|  | 1931 | ffb = (FILEFINDBUF3 *) fb; | 
|---|
| [517] | 1932 | if (ffb->attrFile & FILE_DIRECTORY) { | 
|---|
|  | 1933 | // Skip . and .. | 
|---|
|  | 1934 | if (ffb->achName[0] != '.' || | 
|---|
|  | 1935 | (ffb->achName[1] && | 
|---|
|  | 1936 | (ffb->achName[1] != '.' || ffb->achName[2]))) { | 
|---|
| [551] | 1937 | strcpy(enddir, ffb->achName); | 
|---|
|  | 1938 | DoADir(hwnd, filename); | 
|---|
| [84] | 1939 | } | 
|---|
|  | 1940 | } | 
|---|
|  | 1941 | else { | 
|---|
|  | 1942 | *enddir = 0; | 
|---|
| [551] | 1943 | strcpy(enddir, ffb->achName); | 
|---|
|  | 1944 | if (!ad->afalloc || ad->affiles > ad->afalloc - 1) { | 
|---|
| [2] | 1945 |  | 
|---|
| [84] | 1946 | ALLFILES *temp; | 
|---|
| [2] | 1947 |  | 
|---|
| [551] | 1948 | temp = xrealloc(ad->afhead, (ad->afalloc + 1000) * | 
|---|
|  | 1949 | sizeof(ALLFILES), pszSrcFile, __LINE__); | 
|---|
| [335] | 1950 | if (!temp) { | 
|---|
|  | 1951 | ad->stopflag = 1; | 
|---|
|  | 1952 | break; | 
|---|
|  | 1953 | } | 
|---|
|  | 1954 | else { | 
|---|
| [84] | 1955 | ad->afhead = temp; | 
|---|
| [551] | 1956 | if (ad->stopflag) | 
|---|
| [84] | 1957 | break; | 
|---|
|  | 1958 | ad->afalloc += 1000; | 
|---|
|  | 1959 | } | 
|---|
|  | 1960 | } | 
|---|
| [551] | 1961 | ad->afhead[ad->affiles].fullname = | 
|---|
|  | 1962 | xstrdup(filename, pszSrcFile, __LINE__); | 
|---|
| [335] | 1963 | if (!ad->afhead[ad->affiles].fullname) { | 
|---|
|  | 1964 | ad->stopflag = 1; | 
|---|
|  | 1965 | break; | 
|---|
|  | 1966 | } | 
|---|
|  | 1967 | else { | 
|---|
| [84] | 1968 | ad->afhead[ad->affiles].filename = | 
|---|
|  | 1969 | ad->afhead[ad->affiles].fullname + (enddir - filename); | 
|---|
| [551] | 1970 | ad->afhead[ad->affiles].cbFile = ffb->cbFile; | 
|---|
|  | 1971 | ad->afhead[ad->affiles].date = ffb->fdateLastWrite; | 
|---|
|  | 1972 | ad->afhead[ad->affiles].time = ffb->ftimeLastWrite; | 
|---|
|  | 1973 | ad->afhead[ad->affiles].attrFile = (USHORT) ffb->attrFile; | 
|---|
|  | 1974 | ad->afhead[ad->affiles].flags = 0; | 
|---|
| [84] | 1975 | ad->affiles++; | 
|---|
| [551] | 1976 | if (ad->longest < ffb->cchName) | 
|---|
| [84] | 1977 | ad->longest = ffb->cchName; | 
|---|
| [551] | 1978 | if (ad->longestw < ffb->cchName + (enddir - filename)) | 
|---|
| [84] | 1979 | ad->longestw = ffb->cchName + (enddir - filename); | 
|---|
|  | 1980 | } | 
|---|
|  | 1981 | } | 
|---|
|  | 1982 | fb += ffb->oNextEntryOffset; | 
|---|
| [2] | 1983 | } | 
|---|
|  | 1984 | nm = uL; | 
|---|
| [551] | 1985 | } while (!ad->stopflag && | 
|---|
|  | 1986 | !DosFindNext(hdir, pffb, sizeof(FILEFINDBUF3) * nm, &nm)); | 
|---|
| [2] | 1987 | DosFindClose(hdir); | 
|---|
|  | 1988 | } | 
|---|
|  | 1989 | free(pffb); | 
|---|
|  | 1990 | free(filename); | 
|---|
|  | 1991 | } | 
|---|
|  | 1992 |  | 
|---|
| [551] | 1993 | static VOID FindAllThread(VOID * args) | 
|---|
| [162] | 1994 | { | 
|---|
| [551] | 1995 | ULONG ulDriveNum, ulDriveMap, x; | 
|---|
|  | 1996 | CHAR startname[] = " :\\"; | 
|---|
|  | 1997 | HWND hwnd = (HWND) args; | 
|---|
|  | 1998 | HAB hab2 = (HAB) 0; | 
|---|
|  | 1999 | HMQ hmq2 = (HMQ) 0; | 
|---|
|  | 2000 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 2001 |  | 
|---|
| [551] | 2002 | if (!DosRequestMutexSem(ad->hmtxScan, SEM_INDEFINITE_WAIT)) { | 
|---|
| [2] | 2003 | priority_normal(); | 
|---|
|  | 2004 | hab2 = WinInitialize(0); | 
|---|
| [551] | 2005 | if (hab2) { | 
|---|
|  | 2006 | hmq2 = WinCreateMsgQueue(hab2, 0); | 
|---|
|  | 2007 | if (hmq2) { | 
|---|
|  | 2008 | WinCancelShutdown(hmq2, TRUE); | 
|---|
|  | 2009 | IncrThreadUsage(); | 
|---|
|  | 2010 | ad->afFilesToGet = min(FilesToGet, 128); | 
|---|
|  | 2011 | if (!*ad->szFindPath) { | 
|---|
| [84] | 2012 | DosError(FERR_DISABLEHARDERR); | 
|---|
| [551] | 2013 | if (!DosQCurDisk(&ulDriveNum, &ulDriveMap)) { | 
|---|
|  | 2014 | for (x = 2L; x < 26L && !ad->stopflag; x++) { | 
|---|
|  | 2015 | if ((ulDriveMap & (1L << x)) && ad->abDrvFlags[x]) { | 
|---|
|  | 2016 | *startname = (CHAR) (x + 'A'); | 
|---|
|  | 2017 | DoADir(hwnd, startname); | 
|---|
|  | 2018 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [84] | 2019 | DosSleep(1L); | 
|---|
|  | 2020 | } | 
|---|
|  | 2021 | } | 
|---|
|  | 2022 | } | 
|---|
|  | 2023 | } | 
|---|
|  | 2024 | else | 
|---|
| [551] | 2025 | DoADir(hwnd, ad->szFindPath); | 
|---|
| [84] | 2026 | DosPostEventSem(CompactSem); | 
|---|
| [2] | 2027 | } | 
|---|
|  | 2028 | } | 
|---|
| [551] | 2029 | if (ad->afalloc != ad->affiles) { | 
|---|
| [2] | 2030 |  | 
|---|
| [551] | 2031 | ALLFILES *tempa, **templ; | 
|---|
| [2] | 2032 |  | 
|---|
| [551] | 2033 | tempa = | 
|---|
|  | 2034 | xrealloc(ad->afhead, sizeof(ALLFILES) * ad->affiles, pszSrcFile, | 
|---|
|  | 2035 | __LINE__); | 
|---|
| [335] | 2036 | if (tempa) { | 
|---|
| [84] | 2037 | ad->afhead = tempa; | 
|---|
|  | 2038 | ad->afalloc = ad->affiles; | 
|---|
| [2] | 2039 | } | 
|---|
| [551] | 2040 | templ = | 
|---|
|  | 2041 | xrealloc(ad->afindex, sizeof(ALLFILES *) * ad->affiles, pszSrcFile, | 
|---|
|  | 2042 | __LINE__); | 
|---|
| [335] | 2043 | if (templ) | 
|---|
| [84] | 2044 | ad->afindex = templ; | 
|---|
| [2] | 2045 | DosPostEventSem(CompactSem); | 
|---|
|  | 2046 | } | 
|---|
|  | 2047 |  | 
|---|
| [335] | 2048 | if (!ad->stopflag) { | 
|---|
| [551] | 2049 | PostMsg(hwnd, UM_RESCAN, MPFROMLONG(1L), MPVOID); | 
|---|
| [2] | 2050 | ReSort(hwnd); | 
|---|
|  | 2051 | } | 
|---|
| [162] | 2052 | DosReleaseMutexSem(ad->hmtxScan); | 
|---|
| [2] | 2053 | } | 
|---|
| [551] | 2054 | if (hmq2) { | 
|---|
|  | 2055 | PostMsg(hwnd, UM_CONTAINER_FILLED, MPVOID, MPVOID); | 
|---|
| [2] | 2056 | WinDestroyMsgQueue(hmq2); | 
|---|
| [533] | 2057 | } | 
|---|
| [551] | 2058 | if (hab2) { | 
|---|
| [533] | 2059 | DecrThreadUsage(); | 
|---|
| [2] | 2060 | WinTerminate(hab2); | 
|---|
| [533] | 2061 | } | 
|---|
| [2] | 2062 | } | 
|---|
|  | 2063 |  | 
|---|
| [551] | 2064 | MRESULT EXPENTRY AFDrvsWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [162] | 2065 | { | 
|---|
| [551] | 2066 | switch (msg) { | 
|---|
|  | 2067 | case WM_INITDLG: | 
|---|
|  | 2068 | if (mp2) { | 
|---|
| [2] | 2069 |  | 
|---|
| [551] | 2070 | ULONG ulDriveNum, ulDriveMap, x; | 
|---|
|  | 2071 | CHAR startname[] = " :"; | 
|---|
|  | 2072 | SHORT sSelect; | 
|---|
|  | 2073 | ALLDATA *ad; | 
|---|
| [2] | 2074 |  | 
|---|
| [551] | 2075 | ad = (ALLDATA *) mp2; | 
|---|
|  | 2076 | WinSetWindowPtr(hwnd, QWL_USER, mp2); | 
|---|
|  | 2077 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 2078 | if (!DosQCurDisk(&ulDriveNum, &ulDriveMap)) { | 
|---|
|  | 2079 | for (x = 2L; x < 26L && !ad->stopflag; x++) { | 
|---|
|  | 2080 | if (!(driveflags[x] & (DRIVE_IGNORE | DRIVE_INVALID))) { | 
|---|
|  | 2081 | if (ulDriveMap & (1L << x)) { | 
|---|
|  | 2082 | *startname = (CHAR) (x + 'A'); | 
|---|
|  | 2083 | sSelect = (SHORT) WinSendDlgItemMsg(hwnd, DRVS_LISTBOX, | 
|---|
|  | 2084 | LM_INSERTITEM, | 
|---|
|  | 2085 | MPFROM2SHORT(LIT_END, 0), | 
|---|
|  | 2086 | MPFROMP(startname)); | 
|---|
|  | 2087 | if (sSelect >= 0 && ad->abDrvFlags[x]) | 
|---|
|  | 2088 | WinSendDlgItemMsg(hwnd, DRVS_LISTBOX, LM_SELECTITEM, | 
|---|
|  | 2089 | MPFROM2SHORT(sSelect, 0), MPFROMLONG(TRUE)); | 
|---|
| [84] | 2090 | } | 
|---|
|  | 2091 | } | 
|---|
|  | 2092 | } | 
|---|
| [2] | 2093 | } | 
|---|
| [551] | 2094 | } | 
|---|
|  | 2095 | else | 
|---|
|  | 2096 | WinDismissDlg(hwnd, 0); | 
|---|
|  | 2097 | break; | 
|---|
| [2] | 2098 |  | 
|---|
| [551] | 2099 | case WM_CONTROL: | 
|---|
|  | 2100 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2101 | case DRVS_LISTBOX: | 
|---|
|  | 2102 | switch (SHORT2FROMMP(mp1)) { | 
|---|
|  | 2103 | case LN_ENTER: | 
|---|
|  | 2104 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(DID_OK, 0), MPVOID); | 
|---|
|  | 2105 | break; | 
|---|
| [2] | 2106 | } | 
|---|
| [551] | 2107 | break; | 
|---|
|  | 2108 | } | 
|---|
|  | 2109 | return 0; | 
|---|
| [2] | 2110 |  | 
|---|
| [551] | 2111 | case WM_COMMAND: | 
|---|
|  | 2112 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2113 | case DID_OK: | 
|---|
|  | 2114 | { | 
|---|
|  | 2115 | INT x; | 
|---|
|  | 2116 | SHORT sSelect; | 
|---|
|  | 2117 | CHAR filename[3]; | 
|---|
|  | 2118 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 2119 |  | 
|---|
| [551] | 2120 | memset(ad->abDrvFlags, 0, sizeof(ad->abDrvFlags)); | 
|---|
|  | 2121 | sSelect = (SHORT) WinSendDlgItemMsg(hwnd, DRVS_LISTBOX, | 
|---|
|  | 2122 | LM_QUERYSELECTION, | 
|---|
|  | 2123 | MPFROM2SHORT(LIT_FIRST, 0), | 
|---|
|  | 2124 | MPVOID); | 
|---|
|  | 2125 | while (sSelect >= 0) { | 
|---|
|  | 2126 | *filename = 0; | 
|---|
|  | 2127 | if (WinSendDlgItemMsg(hwnd, DRVS_LISTBOX, LM_QUERYITEMTEXT, | 
|---|
|  | 2128 | MPFROM2SHORT(sSelect, 2), | 
|---|
|  | 2129 | MPFROMP(filename)) && *filename) | 
|---|
|  | 2130 | ad->abDrvFlags[*filename - 'A'] = 1; | 
|---|
|  | 2131 | sSelect = (SHORT) WinSendDlgItemMsg(hwnd, DRVS_LISTBOX, | 
|---|
|  | 2132 | LM_QUERYSELECTION, | 
|---|
|  | 2133 | MPFROM2SHORT(sSelect, 0), | 
|---|
|  | 2134 | MPVOID); | 
|---|
|  | 2135 | } | 
|---|
|  | 2136 | for (x = 2L; x < 26L; x++) { | 
|---|
|  | 2137 | if (ad->abDrvFlags[x]) { | 
|---|
|  | 2138 | WinDismissDlg(hwnd, 1); | 
|---|
|  | 2139 | return 0; | 
|---|
| [84] | 2140 | } | 
|---|
| [551] | 2141 | } | 
|---|
|  | 2142 | } | 
|---|
|  | 2143 | WinDismissDlg(hwnd, 0); | 
|---|
|  | 2144 | break; | 
|---|
| [2] | 2145 |  | 
|---|
| [551] | 2146 | case IDM_HELP: | 
|---|
|  | 2147 | if (hwndHelp) | 
|---|
|  | 2148 | WinSendMsg(hwndHelp, HM_DISPLAY_HELP, | 
|---|
|  | 2149 | MPFROM2SHORT(HELP_DRVSWND, 0), MPFROMSHORT(HM_RESOURCEID)); | 
|---|
|  | 2150 | break; | 
|---|
| [2] | 2151 |  | 
|---|
| [551] | 2152 | case DID_CANCEL: | 
|---|
|  | 2153 | WinDismissDlg(hwnd, 0); | 
|---|
|  | 2154 | break; | 
|---|
|  | 2155 | } | 
|---|
|  | 2156 | return 0; | 
|---|
| [2] | 2157 | } | 
|---|
| [551] | 2158 | return WinDefDlgProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2159 | } | 
|---|
|  | 2160 |  | 
|---|
| [551] | 2161 | static HPS InitWindow(HWND hwnd) | 
|---|
| [162] | 2162 | { | 
|---|
| [551] | 2163 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 2164 | HPS hps = (HPS) 0; | 
|---|
|  | 2165 | SIZEL sizel; | 
|---|
|  | 2166 | FONTMETRICS FontMetrics; | 
|---|
| [2] | 2167 |  | 
|---|
| [551] | 2168 | if (ad) { | 
|---|
| [2] | 2169 | sizel.cx = sizel.cy = 0; | 
|---|
| [551] | 2170 | hps = GpiCreatePS(WinQueryAnchorBlock(hwnd), WinOpenWindowDC(hwnd), | 
|---|
|  | 2171 | (PSIZEL) & sizel, PU_PELS | GPIF_DEFAULT | GPIT_MICRO | | 
|---|
|  | 2172 | GPIA_ASSOC); | 
|---|
|  | 2173 | if (hps) { | 
|---|
|  | 2174 | GpiSetCp(hps, (ULONG) ad->fattrs.usCodePage); | 
|---|
|  | 2175 | GpiCreateLogFont(hps, NULL, FIXED_FONT_LCID, &ad->fattrs); | 
|---|
|  | 2176 | GpiSetCharSet(hps, FIXED_FONT_LCID); | 
|---|
|  | 2177 | GpiQueryFontMetrics(hps, sizeof(FontMetrics), &FontMetrics); | 
|---|
|  | 2178 | ad->fattrs.lAveCharWidth = FontMetrics.lAveCharWidth; | 
|---|
| [2] | 2179 | ad->fattrs.lMaxBaselineExt = FontMetrics.lMaxBaselineExt; | 
|---|
| [551] | 2180 | ad->lMaxAscender = max(FontMetrics.lMaxAscender, 0); | 
|---|
|  | 2181 | ad->lMaxDescender = max(FontMetrics.lMaxDescender, 0); | 
|---|
| [2] | 2182 | ad->lMaxHeight = ad->lMaxDescender + ad->lMaxAscender; | 
|---|
| [551] | 2183 | if (ad->fattrs.usCodePage != FontMetrics.usCodePage) { | 
|---|
| [84] | 2184 | ad->fattrs.usCodePage = FontMetrics.usCodePage; | 
|---|
|  | 2185 | Codepage = ad->fattrs.usCodePage; | 
|---|
|  | 2186 | PrfWriteProfileData(fmprof, | 
|---|
|  | 2187 | appname, | 
|---|
|  | 2188 | "Seeall.Codepage", | 
|---|
| [551] | 2189 | &ad->fattrs.usCodePage, sizeof(USHORT)); | 
|---|
| [2] | 2190 | } | 
|---|
| [551] | 2191 | else if (ad->fattrs.usCodePage) { | 
|---|
| [2] | 2192 |  | 
|---|
| [84] | 2193 | HMQ hmq; | 
|---|
| [551] | 2194 | ULONG cps[50], len, x; | 
|---|
| [2] | 2195 |  | 
|---|
| [551] | 2196 | if (!DosQueryCp(sizeof(cps), cps, &len)) { | 
|---|
|  | 2197 | for (x = 0; x < len / sizeof(ULONG); x++) { | 
|---|
|  | 2198 | if (cps[x] == (ULONG) ad->fattrs.usCodePage) { | 
|---|
|  | 2199 | hmq = WinQueryWindowULong(hwnd, QWL_HMQ); | 
|---|
|  | 2200 | WinSetCp(hmq, ad->fattrs.usCodePage); | 
|---|
| [84] | 2201 | break; | 
|---|
|  | 2202 | } | 
|---|
|  | 2203 | } | 
|---|
|  | 2204 | } | 
|---|
| [551] | 2205 | DosSetProcessCp((ULONG) ad->fattrs.usCodePage); | 
|---|
| [2] | 2206 | } | 
|---|
| [551] | 2207 | GpiSetBackMix(hps, BM_OVERPAINT); | 
|---|
| [2] | 2208 | } | 
|---|
|  | 2209 | } | 
|---|
|  | 2210 | return (hps); | 
|---|
|  | 2211 | } | 
|---|
|  | 2212 |  | 
|---|
| [551] | 2213 | static VOID PaintLine(HWND hwnd, HPS hps, ULONG whichfile, ULONG topfile, | 
|---|
|  | 2214 | RECTL * Rectl) | 
|---|
|  | 2215 | { | 
|---|
| [2] | 2216 |  | 
|---|
| [551] | 2217 | ALLDATA *ad = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 2218 | POINTL ptl; | 
|---|
|  | 2219 | CHAR szBuff[CCHMAXPATH + 80]; | 
|---|
|  | 2220 | ULONG len, y; | 
|---|
| [2] | 2221 |  | 
|---|
|  | 2222 | y = (ad->invertsort) ? (ad->afifiles - 1) - whichfile : whichfile; | 
|---|
|  | 2223 | ptl.y = (Rectl->yTop - | 
|---|
| [84] | 2224 | (ad->lMaxHeight * (((whichfile + 1) - topfile) + 1))); | 
|---|
| [2] | 2225 | ptl.x = ad->horzscroll; | 
|---|
| [551] | 2226 | if (ptl.y < Rectl->yBottom || ptl.y > Rectl->yTop || y > ad->afifiles) | 
|---|
| [2] | 2227 | return; | 
|---|
| [551] | 2228 | GpiSetBackMix(hps, BM_OVERPAINT); | 
|---|
|  | 2229 | if (ad->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 2230 | GpiSetColor(hps, standardcolors[Colors[COLORS_SELECTEDNORMALFORE]]); | 
|---|
|  | 2231 | GpiSetBackColor(hps, (whichfile == ad->cursored - 1) ? | 
|---|
| [84] | 2232 | standardcolors[Colors[COLORS_CURSOREDSELECTEDBACK]] : | 
|---|
|  | 2233 | standardcolors[Colors[COLORS_SELECTEDBACK]]); | 
|---|
| [2] | 2234 | } | 
|---|
|  | 2235 | else { | 
|---|
|  | 2236 | GpiSetColor(hps, | 
|---|
| [551] | 2237 | ((ad->afindex[y]->attrFile & (FILE_SYSTEM | FILE_HIDDEN)) != | 
|---|
|  | 2238 | 0) ? standardcolors[Colors[COLORS_SYSTEMFORE]] : ((ad-> | 
|---|
|  | 2239 | afindex | 
|---|
|  | 2240 | [y]-> | 
|---|
|  | 2241 | attrFile & | 
|---|
|  | 2242 | FILE_READONLY) | 
|---|
|  | 2243 | != | 
|---|
|  | 2244 | 0) ? | 
|---|
|  | 2245 | standardcolors[Colors[COLORS_READONLYFORE]] : | 
|---|
|  | 2246 | standardcolors[Colors[COLORS_NORMALFORE]]); | 
|---|
|  | 2247 | GpiSetBackColor(hps, | 
|---|
|  | 2248 | (whichfile == | 
|---|
|  | 2249 | ad->cursored - | 
|---|
|  | 2250 | 1) ? standardcolors[Colors[COLORS_CURSOREDNORMALBACK]] : | 
|---|
| [84] | 2251 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
| [2] | 2252 | } | 
|---|
|  | 2253 | len = sprintf(szBuff, | 
|---|
| [84] | 2254 | "%c%-*.*s  %-12lu  %c%c%c%c%c  %04u/%02u/%02u %02u:%02u:%02u ", | 
|---|
|  | 2255 | (whichfile == ad->cursored - 1) ? '>' : ' ', | 
|---|
|  | 2256 | (ad->fullnames) ? ad->longestw : ad->longest, | 
|---|
|  | 2257 | (ad->fullnames) ? ad->longestw : ad->longest, | 
|---|
|  | 2258 | (ad->fullnames) ? ad->afindex[y]->fullname : | 
|---|
| [551] | 2259 | ad->afindex[y]->filename, | 
|---|
| [84] | 2260 | ad->afindex[y]->cbFile, | 
|---|
|  | 2261 | "-A"[((ad->afindex[y]->attrFile & FILE_ARCHIVED) != 0)], | 
|---|
|  | 2262 | "-R"[((ad->afindex[y]->attrFile & FILE_READONLY) != 0)], | 
|---|
|  | 2263 | "-H"[((ad->afindex[y]->attrFile & FILE_HIDDEN) != 0)], | 
|---|
|  | 2264 | "-S"[((ad->afindex[y]->attrFile & FILE_SYSTEM) != 0)], | 
|---|
|  | 2265 | "-D"[((ad->afindex[y]->attrFile & FILE_DIRECTORY) != 0)], | 
|---|
|  | 2266 | ad->afindex[y]->date.year + 1980, | 
|---|
|  | 2267 | ad->afindex[y]->date.month, | 
|---|
|  | 2268 | ad->afindex[y]->date.day, | 
|---|
|  | 2269 | ad->afindex[y]->time.hours, | 
|---|
|  | 2270 | ad->afindex[y]->time.minutes, | 
|---|
|  | 2271 | ad->afindex[y]->time.twosecs * 2); | 
|---|
| [551] | 2272 | GpiCharStringAt(hps, &ptl, len, szBuff); | 
|---|
|  | 2273 | GpiQueryCurrentPosition(hps, &ptl); | 
|---|
|  | 2274 | if (ptl.x + abs(ad->horzscroll) > ad->maxx) { | 
|---|
| [2] | 2275 | ad->maxx = ptl.x + abs(ad->horzscroll); | 
|---|
| [551] | 2276 | WinSendMsg(ad->hhscroll, SBM_SETTHUMBSIZE, | 
|---|
|  | 2277 | MPFROM2SHORT((SHORT) Rectl->xRight, (SHORT) ad->maxx), MPVOID); | 
|---|
| [2] | 2278 | } | 
|---|
|  | 2279 | } | 
|---|
|  | 2280 |  | 
|---|
| [551] | 2281 | MRESULT EXPENTRY SeeStatusProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [162] | 2282 | { | 
|---|
| [551] | 2283 | switch (msg) { | 
|---|
|  | 2284 | case WM_CREATE: | 
|---|
|  | 2285 | return CommonTextProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2286 |  | 
|---|
| [551] | 2287 | case WM_SETFOCUS: | 
|---|
|  | 2288 | if (mp2) | 
|---|
|  | 2289 | PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID); | 
|---|
|  | 2290 | break; | 
|---|
| [2] | 2291 |  | 
|---|
| [551] | 2292 | case WM_PAINT: | 
|---|
|  | 2293 | { | 
|---|
|  | 2294 | SWP swp; | 
|---|
|  | 2295 | POINTL ptl; | 
|---|
|  | 2296 | HPS hps; | 
|---|
| [2] | 2297 |  | 
|---|
| [551] | 2298 | PaintRecessedWindow(hwnd, (HPS) 0, FALSE, FALSE); | 
|---|
|  | 2299 | hps = WinGetPS(WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 2300 | if (hps) { | 
|---|
|  | 2301 | WinQueryWindowPos(hwnd, &swp); | 
|---|
|  | 2302 | ptl.x = swp.x - 1; | 
|---|
|  | 2303 | ptl.y = swp.y + swp.cy + 2; | 
|---|
|  | 2304 | GpiMove(hps, &ptl); | 
|---|
|  | 2305 | GpiSetColor(hps, CLR_WHITE); | 
|---|
|  | 2306 | ptl.x = swp.x + swp.cx; | 
|---|
|  | 2307 | GpiLine(hps, &ptl); | 
|---|
|  | 2308 | WinReleasePS(hps); | 
|---|
| [2] | 2309 | } | 
|---|
| [551] | 2310 | } | 
|---|
|  | 2311 | break; | 
|---|
| [2] | 2312 |  | 
|---|
| [551] | 2313 | case UM_FOCUSME: | 
|---|
|  | 2314 | WinSetFocus(HWND_DESKTOP, WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 2315 | FID_CLIENT)); | 
|---|
|  | 2316 | return 0; | 
|---|
| [2] | 2317 | } | 
|---|
| [551] | 2318 | return PFNWPStatic(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2319 | } | 
|---|
|  | 2320 |  | 
|---|
| [551] | 2321 | MRESULT EXPENTRY SeeFrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [162] | 2322 | { | 
|---|
| [551] | 2323 | PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 2324 |  | 
|---|
| [551] | 2325 | switch (msg) { | 
|---|
|  | 2326 | case WM_BUTTON1UP: | 
|---|
|  | 2327 | case WM_BUTTON2UP: | 
|---|
|  | 2328 | case WM_BUTTON3UP: | 
|---|
|  | 2329 | case WM_MOUSEMOVE: | 
|---|
|  | 2330 | case WM_CHORD: | 
|---|
|  | 2331 | shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 2332 | break; | 
|---|
| [2] | 2333 |  | 
|---|
| [551] | 2334 | case WM_CHAR: | 
|---|
|  | 2335 | shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 2336 | break; | 
|---|
| [2] | 2337 |  | 
|---|
| [551] | 2338 | case WM_CALCFRAMERECT: | 
|---|
|  | 2339 | { | 
|---|
|  | 2340 | MRESULT mr; | 
|---|
|  | 2341 | PRECTL prectl; | 
|---|
| [2] | 2342 |  | 
|---|
| [551] | 2343 | mr = oldproc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2344 |  | 
|---|
| [551] | 2345 | /* | 
|---|
|  | 2346 | * Calculate the position of the client rectangle. | 
|---|
|  | 2347 | * Otherwise,  we'll see a lot of redraw when we move the | 
|---|
|  | 2348 | * client during WM_FORMATFRAME. | 
|---|
|  | 2349 | */ | 
|---|
| [2] | 2350 |  | 
|---|
| [551] | 2351 | if (mr && mp2) { | 
|---|
|  | 2352 | prectl = (PRECTL) mp1; | 
|---|
|  | 2353 | prectl->yBottom += 22; | 
|---|
|  | 2354 | prectl->yTop -= 24; | 
|---|
| [2] | 2355 | } | 
|---|
| [551] | 2356 | return mr; | 
|---|
|  | 2357 | } | 
|---|
| [2] | 2358 |  | 
|---|
| [551] | 2359 | case WM_FORMATFRAME: | 
|---|
|  | 2360 | { | 
|---|
|  | 2361 | SHORT sCount; | 
|---|
|  | 2362 | PSWP pswp, pswpClient, pswpNew; | 
|---|
| [2] | 2363 |  | 
|---|
| [551] | 2364 | sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2365 |  | 
|---|
| [551] | 2366 | /* | 
|---|
|  | 2367 | * Reformat the frame to "squeeze" the client | 
|---|
|  | 2368 | * and make room for status window sibling beneath | 
|---|
|  | 2369 | */ | 
|---|
| [2] | 2370 |  | 
|---|
| [551] | 2371 | pswp = (PSWP) mp1; | 
|---|
|  | 2372 | { | 
|---|
|  | 2373 | SHORT x; | 
|---|
| [2] | 2374 |  | 
|---|
| [551] | 2375 | for (x = 0; x < sCount; x++) { | 
|---|
|  | 2376 | if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_CLIENT) { | 
|---|
|  | 2377 | pswpClient = pswp; | 
|---|
|  | 2378 | break; | 
|---|
| [84] | 2379 | } | 
|---|
| [551] | 2380 | pswp++; | 
|---|
| [84] | 2381 | } | 
|---|
| [2] | 2382 | } | 
|---|
| [551] | 2383 | pswpNew = (PSWP) mp1 + sCount; | 
|---|
|  | 2384 | *pswpNew = *pswpClient; | 
|---|
|  | 2385 | pswpNew->hwnd = WinWindowFromID(hwnd, SEEALL_STATUS); | 
|---|
|  | 2386 | pswpNew->x = pswpClient->x + 2; | 
|---|
|  | 2387 | pswpNew->y = pswpClient->y + 2; | 
|---|
|  | 2388 | pswpNew->cx = pswpClient->cx - 3; | 
|---|
|  | 2389 | pswpNew->cy = 20; | 
|---|
|  | 2390 | pswpClient->y = pswpNew->y + pswpNew->cy + 3; | 
|---|
|  | 2391 | pswpClient->cy = (pswpClient->cy - pswpNew->cy) - 5; | 
|---|
|  | 2392 | sCount++; | 
|---|
|  | 2393 | return MRFROMSHORT(sCount); | 
|---|
|  | 2394 | } | 
|---|
| [2] | 2395 |  | 
|---|
| [551] | 2396 | case WM_QUERYFRAMECTLCOUNT: | 
|---|
|  | 2397 | { | 
|---|
|  | 2398 | SHORT sCount; | 
|---|
| [2] | 2399 |  | 
|---|
| [551] | 2400 | sCount = (SHORT) oldproc(hwnd, msg, mp1, mp2); | 
|---|
|  | 2401 | sCount++; | 
|---|
|  | 2402 | return MRFROMSHORT(sCount); | 
|---|
|  | 2403 | } | 
|---|
| [2] | 2404 | } | 
|---|
| [551] | 2405 | return oldproc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2406 | } | 
|---|
|  | 2407 |  | 
|---|
| [551] | 2408 | MRESULT EXPENTRY SeeAllWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [162] | 2409 | { | 
|---|
| [551] | 2410 | ALLDATA *pAD = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 2411 |  | 
|---|
|  | 2412 | switch (msg) { | 
|---|
| [551] | 2413 | case WM_CREATE: | 
|---|
|  | 2414 | // fprintf(stderr,"Seeall: WM_CREATE\n"); | 
|---|
|  | 2415 | WinSetWindowPtr(hwnd, QWL_USER, NULL); | 
|---|
|  | 2416 | pAD = xmallocz(sizeof(ALLDATA), pszSrcFile, __LINE__); | 
|---|
|  | 2417 | if (pAD) { | 
|---|
|  | 2418 | HWND hwndFrame; | 
|---|
|  | 2419 |  | 
|---|
|  | 2420 | pAD->size = sizeof(ALLDATA); | 
|---|
|  | 2421 | hwndFrame = WinQueryWindow(hwnd, QW_PARENT); | 
|---|
|  | 2422 | pAD->hwndFrame = hwndFrame; | 
|---|
|  | 2423 | pAD->mask.attrFile = FILE_READONLY | FILE_HIDDEN | | 
|---|
|  | 2424 | FILE_SYSTEM | FILE_ARCHIVED; | 
|---|
|  | 2425 | pAD->mask.fNoDirs = TRUE; | 
|---|
|  | 2426 | *(pAD->mask.prompt) = 0; | 
|---|
|  | 2427 | WinSetWindowPtr(hwnd, QWL_USER, (PVOID) pAD); | 
|---|
|  | 2428 | pAD->pfnCompare = comparenames; | 
|---|
|  | 2429 | if (Firsttime) { | 
|---|
|  | 2430 |  | 
|---|
|  | 2431 | ULONG size; | 
|---|
|  | 2432 |  | 
|---|
|  | 2433 | size = sizeof(USHORT); | 
|---|
|  | 2434 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2435 | appname, | 
|---|
|  | 2436 | "Seeall.Codepage", (PVOID) & Codepage, &size); | 
|---|
|  | 2437 | size = sizeof(BOOL); | 
|---|
|  | 2438 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2439 | appname, | 
|---|
|  | 2440 | "Seeall.Fullnames", (PVOID) & Fullnames, &size); | 
|---|
|  | 2441 | size = sizeof(USHORT); | 
|---|
|  | 2442 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2443 | appname, | 
|---|
|  | 2444 | "Seeall.Sort", (PVOID) & SortType, &size); | 
|---|
|  | 2445 | size = sizeof(BOOL); | 
|---|
|  | 2446 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2447 | appname, | 
|---|
|  | 2448 | "Seeall.SortReverse", | 
|---|
|  | 2449 | (PVOID) & SortReverse, &size); | 
|---|
|  | 2450 | memset(&Fattrs, 0, sizeof(Fattrs)); | 
|---|
|  | 2451 | size = sizeof(Fattrs); | 
|---|
|  | 2452 | Fattrs.usRecordLength = sizeof(Fattrs); | 
|---|
|  | 2453 | Fattrs.lMaxBaselineExt = 16; | 
|---|
|  | 2454 | Fattrs.lAveCharWidth = 8; | 
|---|
|  | 2455 | Fattrs.usCodePage = Codepage; | 
|---|
|  | 2456 | strcpy(Fattrs.szFacename, GetPString(IDS_SYSMONOTEXT)); | 
|---|
|  | 2457 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2458 | appname, | 
|---|
|  | 2459 | "Seeall.Fattrs", (PVOID) & Fattrs, &size); | 
|---|
|  | 2460 | size = sizeof(LONG) * COLORS_MAX; | 
|---|
|  | 2461 | PrfQueryProfileData(fmprof, | 
|---|
|  | 2462 | appname, "Seeall.Colors", (PVOID) Colors, &size); | 
|---|
|  | 2463 | Firsttime = FALSE; | 
|---|
|  | 2464 | } | 
|---|
|  | 2465 | switch (SortType) { | 
|---|
|  | 2466 | case IDM_SORTEASIZE: | 
|---|
|  | 2467 | pAD->pfnCompare = (PFNSORT) NULL; | 
|---|
|  | 2468 | break; | 
|---|
|  | 2469 | case IDM_SORTNAME: | 
|---|
|  | 2470 | pAD->pfnCompare = comparefullnames; | 
|---|
|  | 2471 | break; | 
|---|
|  | 2472 | case IDM_SORTFILENAME: | 
|---|
| [162] | 2473 | pAD->pfnCompare = comparenames; | 
|---|
| [551] | 2474 | break; | 
|---|
|  | 2475 | case IDM_SORTSIZE: | 
|---|
|  | 2476 | pAD->pfnCompare = comparesizes; | 
|---|
|  | 2477 | break; | 
|---|
|  | 2478 | case IDM_SORTLWDATE: | 
|---|
|  | 2479 | pAD->pfnCompare = comparedates; | 
|---|
|  | 2480 | break; | 
|---|
|  | 2481 | case IDM_SORTFIRST: | 
|---|
|  | 2482 | pAD->pfnCompare = compareexts; | 
|---|
|  | 2483 | break; | 
|---|
|  | 2484 | } | 
|---|
|  | 2485 | pAD->invertsort = SortReverse; | 
|---|
|  | 2486 | pAD->fattrs = Fattrs; | 
|---|
|  | 2487 | pAD->fullnames = Fullnames; | 
|---|
|  | 2488 | pAD->stopflag = 0; | 
|---|
|  | 2489 | pAD->cursored = pAD->topfile = 1; | 
|---|
|  | 2490 | pAD->fattrs.usCodePage = Codepage; | 
|---|
|  | 2491 | memcpy(pAD->aulColors, Colors, sizeof(LONG) * COLORS_MAX); | 
|---|
|  | 2492 | pAD->hwndMenu = WinWindowFromID(hwndFrame, FID_MENU); | 
|---|
|  | 2493 | SetConditionalCascade(pAD->hwndMenu, IDM_DELETESUBMENU, | 
|---|
|  | 2494 | (fDefaultDeletePerm) ? | 
|---|
|  | 2495 | IDM_PERMDELETE : IDM_DELETE); | 
|---|
|  | 2496 | SetConditionalCascade(pAD->hwndMenu, IDM_MOVEMENU, IDM_MOVE); | 
|---|
|  | 2497 | SetConditionalCascade(pAD->hwndMenu, IDM_COPYMENU, IDM_COPY); | 
|---|
|  | 2498 | SetConditionalCascade(pAD->hwndMenu, IDM_OPENSUBMENU, IDM_OPENDEFAULT); | 
|---|
|  | 2499 | SetConditionalCascade(pAD->hwndMenu, IDM_OBJECTSUBMENU, IDM_SHADOW); | 
|---|
|  | 2500 | if (fWorkPlace) { | 
|---|
|  | 2501 | WinSendMsg(pAD->hwndMenu, MM_DELETEITEM, | 
|---|
|  | 2502 | MPFROM2SHORT(IDM_OPENSUBMENU, TRUE), MPVOID); | 
|---|
|  | 2503 | WinSendMsg(pAD->hwndMenu, MM_DELETEITEM, | 
|---|
|  | 2504 | MPFROM2SHORT(IDM_OBJECTSUBMENU, TRUE), MPVOID); | 
|---|
|  | 2505 | } | 
|---|
|  | 2506 | pAD->hwndClient = hwnd; | 
|---|
|  | 2507 | pAD->hps = InitWindow(hwnd); | 
|---|
|  | 2508 | pAD->hvscroll = WinWindowFromID(hwndFrame, FID_VERTSCROLL); | 
|---|
|  | 2509 | pAD->hhscroll = WinWindowFromID(hwndFrame, FID_HORZSCROLL); | 
|---|
|  | 2510 | pAD->multiplier = 1; | 
|---|
|  | 2511 | if (_beginthread(MakeSeeObjWinThread, NULL, 122880, (PVOID) pAD) == -1) | 
|---|
|  | 2512 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 2513 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 2514 | else { | 
|---|
|  | 2515 | if (!DosCreateMutexSem(NULL, &pAD->hmtxScan, 0L, FALSE)) { | 
|---|
|  | 2516 | pAD->hwndStatus = WinCreateWindow(hwndFrame, | 
|---|
|  | 2517 | GetPString(IDS_WCSEESTATUS), | 
|---|
|  | 2518 | NullStr, | 
|---|
|  | 2519 | WS_VISIBLE | SS_TEXT | | 
|---|
|  | 2520 | DT_LEFT | DT_VCENTER, | 
|---|
|  | 2521 | 0, | 
|---|
|  | 2522 | 0, | 
|---|
|  | 2523 | 0, | 
|---|
|  | 2524 | 0, | 
|---|
|  | 2525 | hwndFrame, | 
|---|
|  | 2526 | HWND_TOP, | 
|---|
|  | 2527 | SEEALL_STATUS, NULL, NULL); | 
|---|
|  | 2528 | if (!pAD->hwndStatus) | 
|---|
|  | 2529 | Win_Error2(hwndFrame, hwnd, pszSrcFile, __LINE__, | 
|---|
|  | 2530 | IDS_WINCREATEWINDOW); | 
|---|
|  | 2531 | else { | 
|---|
|  | 2532 | PFNWP oldproc; | 
|---|
| [2] | 2533 |  | 
|---|
| [551] | 2534 | oldproc = WinSubclassWindow(hwndFrame, SeeFrameWndProc); | 
|---|
|  | 2535 | WinSetWindowPtr(hwndFrame, QWL_USER, (PVOID) oldproc); | 
|---|
| [84] | 2536 | } | 
|---|
| [551] | 2537 | break; | 
|---|
| [84] | 2538 | } | 
|---|
| [2] | 2539 | } | 
|---|
| [551] | 2540 | } | 
|---|
|  | 2541 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2542 | break; | 
|---|
| [2] | 2543 |  | 
|---|
| [551] | 2544 | case UM_SETUP5: | 
|---|
|  | 2545 | // fprintf(stderr,"Seeall: UM_SETUP5\n"); | 
|---|
|  | 2546 | if (pAD) { | 
|---|
|  | 2547 | if (mp1 && *((CHAR *) mp1)) | 
|---|
|  | 2548 | strcpy(pAD->szFindPath, (CHAR *) mp1); | 
|---|
|  | 2549 | else { | 
|---|
|  | 2550 | if (!WinDlgBox(HWND_DESKTOP, hwnd, AFDrvsWndProc, | 
|---|
|  | 2551 | FM3ModHandle, DRVS_FRAME, (PVOID) pAD)) { | 
|---|
|  | 2552 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2553 | return 0; | 
|---|
| [84] | 2554 | } | 
|---|
| [2] | 2555 | } | 
|---|
| [551] | 2556 | if (_beginthread(FindAllThread, NULL, 524288, (PVOID) hwnd) == -1) { | 
|---|
|  | 2557 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 2558 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 2559 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2560 | } | 
|---|
|  | 2561 | else { | 
|---|
|  | 2562 | DosSleep(100L); | 
|---|
|  | 2563 | PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID); | 
|---|
|  | 2564 | PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID); | 
|---|
|  | 2565 | } | 
|---|
|  | 2566 | } | 
|---|
|  | 2567 | else | 
|---|
|  | 2568 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2569 | return 0; | 
|---|
| [2] | 2570 |  | 
|---|
| [551] | 2571 | case UM_UPDATERECORDLIST: | 
|---|
|  | 2572 | if (mp1) { | 
|---|
| [2] | 2573 |  | 
|---|
| [551] | 2574 | APIRET rc; | 
|---|
| [2] | 2575 |  | 
|---|
| [551] | 2576 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 2577 | if (!rc) { | 
|---|
|  | 2578 | WinSetPointer(HWND_DESKTOP, hptrBusy); | 
|---|
|  | 2579 | if (UpdateList(hwnd, mp1)) { | 
|---|
|  | 2580 | FreeList(mp1); | 
|---|
|  | 2581 | RemoveDeleted(hwnd); | 
|---|
|  | 2582 | ReSort(hwnd); | 
|---|
|  | 2583 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 2584 | } | 
|---|
| [551] | 2585 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 2586 | WinSetPointer(HWND_DESKTOP, hptrArrow); | 
|---|
| [2] | 2587 | } | 
|---|
| [551] | 2588 | } | 
|---|
|  | 2589 | return 0; | 
|---|
| [2] | 2590 |  | 
|---|
| [551] | 2591 | case UM_SETUP2: | 
|---|
| [2] | 2592 | // fprintf(stderr,"Seeall: UM_SETUP2\n"); | 
|---|
| [551] | 2593 | if (pAD) { | 
|---|
| [2] | 2594 |  | 
|---|
| [551] | 2595 | CHAR s[256]; | 
|---|
|  | 2596 | BOOL once = FALSE; | 
|---|
|  | 2597 | ULONG x, ulDriveNum, ulDriveMap; | 
|---|
| [2] | 2598 |  | 
|---|
| [551] | 2599 | strcpy(s, GetPString(IDS_SEEALLTITLETEXT)); | 
|---|
|  | 2600 | if (!*pAD->szFindPath) { | 
|---|
|  | 2601 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 2602 | if (!DosQCurDisk(&ulDriveNum, &ulDriveMap)) { | 
|---|
|  | 2603 | for (x = 2L; x < 26L && !pAD->stopflag; x++) { | 
|---|
|  | 2604 | if ((ulDriveMap & (1L << x)) && pAD->abDrvFlags[x]) { | 
|---|
|  | 2605 | sprintf(&s[strlen(s)], "%s%c:", (once) ? ", " : " (", x + 'A'); | 
|---|
|  | 2606 | once = TRUE; | 
|---|
| [84] | 2607 | } | 
|---|
|  | 2608 | } | 
|---|
| [551] | 2609 | if (once) | 
|---|
|  | 2610 | strcat(s, ")"); | 
|---|
| [84] | 2611 | } | 
|---|
| [2] | 2612 | } | 
|---|
| [551] | 2613 | else { | 
|---|
|  | 2614 | strcat(s, " ("); | 
|---|
|  | 2615 | strcat(s, pAD->szFindPath); | 
|---|
|  | 2616 | strcat(s, ")"); | 
|---|
|  | 2617 | } | 
|---|
|  | 2618 | WinSetWindowText(WinQueryWindow(hwnd, QW_PARENT), s); | 
|---|
|  | 2619 | } | 
|---|
|  | 2620 | return 0; | 
|---|
| [2] | 2621 |  | 
|---|
| [551] | 2622 | case UM_SETUP3: | 
|---|
| [2] | 2623 | // fprintf(stderr,"Seeall: UM_SETUP3\n"); | 
|---|
| [551] | 2624 | if (pAD) { | 
|---|
|  | 2625 | pAD->multiplier = pAD->afifiles / 32767; | 
|---|
|  | 2626 | if (pAD->multiplier * 32767 != pAD->afifiles) | 
|---|
|  | 2627 | pAD->multiplier++; | 
|---|
|  | 2628 | if (!pAD->multiplier) | 
|---|
|  | 2629 | pAD->multiplier++; | 
|---|
|  | 2630 | { | 
|---|
|  | 2631 | RECTL Rectl; | 
|---|
|  | 2632 | ULONG numlines; | 
|---|
| [2] | 2633 |  | 
|---|
| [551] | 2634 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 2635 | numlines = NumLines(&Rectl, pAD); | 
|---|
|  | 2636 | if (numlines) { | 
|---|
|  | 2637 | WinSendMsg(pAD->hhscroll, SBM_SETTHUMBSIZE, | 
|---|
|  | 2638 | MPFROM2SHORT((SHORT) Rectl.xRight, (SHORT) pAD->maxx), | 
|---|
|  | 2639 | MPVOID); | 
|---|
|  | 2640 | WinSendMsg(pAD->hvscroll, SBM_SETTHUMBSIZE, | 
|---|
|  | 2641 | MPFROM2SHORT((SHORT) numlines, | 
|---|
|  | 2642 | (SHORT) min(pAD->afifiles, 32767)), | 
|---|
|  | 2643 | MPFROM2SHORT(1, pAD->afifiles + 1)); | 
|---|
|  | 2644 | WinSendMsg(pAD->hhscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 2645 | MPFROMSHORT((SHORT) abs(pAD->horzscroll)), | 
|---|
|  | 2646 | MPFROM2SHORT(0, (SHORT) (pAD->maxx - Rectl.xRight))); | 
|---|
|  | 2647 | WinSendMsg(pAD->hvscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 2648 | MPFROMSHORT((SHORT) (pAD->topfile / pAD->multiplier)), | 
|---|
|  | 2649 | MPFROM2SHORT(1, | 
|---|
|  | 2650 | (SHORT) (pAD->afifiles / pAD->multiplier) - | 
|---|
|  | 2651 | (numlines - 1))); | 
|---|
|  | 2652 | if (pAD->afifiles - pAD->topfile < numlines) { | 
|---|
|  | 2653 | pAD->topfile = ((pAD->afifiles - pAD->topfile) - numlines); | 
|---|
|  | 2654 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 2655 | } | 
|---|
|  | 2656 | } | 
|---|
| [2] | 2657 | } | 
|---|
| [551] | 2658 | } | 
|---|
|  | 2659 | return 0; | 
|---|
| [2] | 2660 |  | 
|---|
| [551] | 2661 | case UM_SETUP4: | 
|---|
|  | 2662 | // fprintf(stderr,"Seeall: UM_SETUP4\n"); | 
|---|
|  | 2663 | if (pAD) | 
|---|
|  | 2664 | pAD->killme = TRUE; | 
|---|
|  | 2665 | else | 
|---|
|  | 2666 | PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 2667 | return 0; | 
|---|
| [2] | 2668 |  | 
|---|
| [551] | 2669 | case UM_RESCAN: | 
|---|
|  | 2670 | // fprintf(stderr,"Seeall: UM_RESCAN\n"); | 
|---|
|  | 2671 | if (pAD && !pAD->stopflag) { | 
|---|
|  | 2672 | if (DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 2673 | CHAR s[CCHMAXPATH + 80], tm[34]; | 
|---|
| [2] | 2674 |  | 
|---|
| [551] | 2675 | if (mp1) { | 
|---|
|  | 2676 | strcpy(s, GetPString(IDS_SORTINGTEXT)); | 
|---|
|  | 2677 | if (pAD->afifiles) { | 
|---|
|  | 2678 | commafmt(tm, sizeof(tm), pAD->afifiles); | 
|---|
|  | 2679 | strcat(s, tm); | 
|---|
| [84] | 2680 | } | 
|---|
| [551] | 2681 | } | 
|---|
|  | 2682 | else { | 
|---|
|  | 2683 | strcpy(s, GetPString(IDS_WORKINGTEXT)); | 
|---|
|  | 2684 | if (pAD->affiles) { | 
|---|
|  | 2685 | commafmt(tm, sizeof(tm), pAD->affiles); | 
|---|
|  | 2686 | strcat(s, tm); | 
|---|
| [84] | 2687 | } | 
|---|
|  | 2688 | } | 
|---|
| [551] | 2689 | if (mp2) { | 
|---|
|  | 2690 | strcat(s, " "); | 
|---|
|  | 2691 | strcat(s, (CHAR *) mp2); | 
|---|
|  | 2692 | } | 
|---|
|  | 2693 | WinSetWindowText(pAD->hwndStatus, s); | 
|---|
|  | 2694 | } | 
|---|
|  | 2695 | else { | 
|---|
|  | 2696 | CHAR s[(CCHMAXPATH * 2) + 80], tm[34], ts[34], tb[34]; | 
|---|
|  | 2697 | ULONG y; | 
|---|
| [2] | 2698 |  | 
|---|
| [551] | 2699 | if (mp1) { | 
|---|
|  | 2700 | strcpy(s, GetPString(IDS_SORTINGTEXT)); | 
|---|
|  | 2701 | if (pAD->afifiles) { | 
|---|
|  | 2702 | commafmt(tm, sizeof(tm), pAD->afifiles); | 
|---|
|  | 2703 | strcat(s, tm); | 
|---|
| [84] | 2704 | } | 
|---|
| [551] | 2705 | if (mp2) { | 
|---|
|  | 2706 | strcat(s, " "); | 
|---|
|  | 2707 | strcat(s, (CHAR *) mp2); | 
|---|
| [84] | 2708 | } | 
|---|
|  | 2709 | } | 
|---|
| [551] | 2710 | else if (pAD->afifiles) { | 
|---|
|  | 2711 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - (pAD->cursored - 1) : | 
|---|
|  | 2712 | pAD->cursored - 1; | 
|---|
|  | 2713 | commafmt(tm, sizeof(tm), pAD->afifiles); | 
|---|
|  | 2714 | commafmt(ts, sizeof(ts), pAD->selected); | 
|---|
|  | 2715 | CommaFmtULL(tb, sizeof(tb), pAD->ullSelectedBytes, ' '); | 
|---|
|  | 2716 | sprintf(s, | 
|---|
|  | 2717 | " %s %s%s%s  %s %s (%s)  %s %s", | 
|---|
|  | 2718 | tm, | 
|---|
|  | 2719 | GetPString(IDS_FILETEXT), | 
|---|
|  | 2720 | &"s"[pAD->afifiles == 1], | 
|---|
|  | 2721 | (*pAD->mask.szMask || | 
|---|
|  | 2722 | (pAD->mask.attrFile & (~FILE_DIRECTORY)) != | 
|---|
|  | 2723 | (ALLATTRS & (~FILE_DIRECTORY)) || | 
|---|
|  | 2724 | pAD->mask.antiattr) ? | 
|---|
|  | 2725 | GetPString(IDS_FILTEREDTEXT) : | 
|---|
|  | 2726 | NullStr, | 
|---|
|  | 2727 | ts, | 
|---|
|  | 2728 | GetPString(IDS_SELECTEDTEXT), | 
|---|
|  | 2729 | tb, GetPString(IDS_CURRTEXT), pAD->afindex[y]->fullname); | 
|---|
|  | 2730 | } | 
|---|
|  | 2731 | else | 
|---|
|  | 2732 | sprintf(s, | 
|---|
|  | 2733 | GetPString(IDS_NOFILESPSTEXT), | 
|---|
|  | 2734 | (*pAD->mask.szMask || | 
|---|
|  | 2735 | (pAD->mask.attrFile & (~FILE_DIRECTORY)) != | 
|---|
|  | 2736 | (ALLATTRS & (~FILE_DIRECTORY)) || | 
|---|
|  | 2737 | pAD->mask.antiattr) ? | 
|---|
|  | 2738 | GetPString(IDS_FILTEREDTEXT) : NullStr); | 
|---|
|  | 2739 | WinSetWindowText(pAD->hwndStatus, s); | 
|---|
|  | 2740 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
| [2] | 2741 | } | 
|---|
| [551] | 2742 | } | 
|---|
|  | 2743 | return 0; | 
|---|
| [2] | 2744 |  | 
|---|
| [551] | 2745 | case UM_SETUP: | 
|---|
|  | 2746 | // fprintf(stderr,"Seeall: UM_SETUP\n"); | 
|---|
|  | 2747 | if (pAD) { | 
|---|
|  | 2748 | WinSendMsg(pAD->hvscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), MPVOID); | 
|---|
|  | 2749 | WinSendMsg(pAD->hhscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), MPVOID); | 
|---|
|  | 2750 | WinSetActiveWindow(HWND_DESKTOP, WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 2751 | } | 
|---|
|  | 2752 | return 0; | 
|---|
| [2] | 2753 |  | 
|---|
| [551] | 2754 | case WM_CHAR: | 
|---|
|  | 2755 | shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 2756 | if (pAD && !(SHORT1FROMMP(mp1) & KC_KEYUP)) { | 
|---|
| [2] | 2757 |  | 
|---|
| [551] | 2758 | register ULONG x; | 
|---|
|  | 2759 | ULONG numlines, y, wascursored = pAD->cursored, thistime, len; | 
|---|
|  | 2760 | BOOL found = FALSE; | 
|---|
|  | 2761 | RECTL rcl; | 
|---|
| [2] | 2762 |  | 
|---|
| [551] | 2763 | WinQueryWindowRect(hwnd, &rcl); | 
|---|
|  | 2764 | numlines = NumLines(&rcl, pAD); | 
|---|
|  | 2765 | if (numlines) { | 
|---|
|  | 2766 | if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) { | 
|---|
|  | 2767 | pAD->lasttime = 0; | 
|---|
|  | 2768 | *pAD->szCommonName = 0; | 
|---|
|  | 2769 | switch (SHORT2FROMMP(mp2)) { | 
|---|
|  | 2770 | case VK_DELETE: | 
|---|
|  | 2771 | if ((shiftstate & KC_CTRL) == KC_CTRL) | 
|---|
|  | 2772 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_PERMDELETE, 0), | 
|---|
|  | 2773 | MPVOID); | 
|---|
|  | 2774 | else if ((shiftstate & KC_SHIFT) == KC_SHIFT) | 
|---|
|  | 2775 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_SAVETOCLIP, 0), | 
|---|
|  | 2776 | MPVOID); | 
|---|
|  | 2777 | else | 
|---|
|  | 2778 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_DELETE, 0), MPVOID); | 
|---|
|  | 2779 | break; | 
|---|
|  | 2780 | case VK_LEFT: | 
|---|
|  | 2781 | WinSendMsg(hwnd, WM_HSCROLL, MPFROM2SHORT(FID_HORZSCROLL, 0), | 
|---|
|  | 2782 | MPFROM2SHORT(0, SB_LINELEFT)); | 
|---|
|  | 2783 | break; | 
|---|
|  | 2784 | case VK_RIGHT: | 
|---|
|  | 2785 | WinSendMsg(hwnd, WM_HSCROLL, MPFROM2SHORT(FID_HORZSCROLL, 0), | 
|---|
|  | 2786 | MPFROM2SHORT(0, SB_LINERIGHT)); | 
|---|
|  | 2787 | break; | 
|---|
|  | 2788 | case VK_PAGEUP: | 
|---|
|  | 2789 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 2790 | MPFROM2SHORT(0, SB_PAGEUP)); | 
|---|
|  | 2791 | break; | 
|---|
|  | 2792 | case VK_PAGEDOWN: | 
|---|
|  | 2793 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 2794 | MPFROM2SHORT(0, SB_PAGEDOWN)); | 
|---|
|  | 2795 | break; | 
|---|
|  | 2796 | case VK_UP: | 
|---|
|  | 2797 | if (pAD->cursored > 1) { | 
|---|
|  | 2798 | if (shiftstate & KC_SHIFT) | 
|---|
|  | 2799 | WinSendMsg(hwnd, WM_BUTTON1CLICK, | 
|---|
| [84] | 2800 | MPFROM2SHORT(pAD->fattrs.lAveCharWidth + 2, | 
|---|
|  | 2801 | ((rcl.yTop - (pAD->lMaxHeight * | 
|---|
| [551] | 2802 | ((pAD->cursored) - | 
|---|
|  | 2803 | pAD->topfile))) - | 
|---|
|  | 2804 | pAD->lMaxDescender) - 1), | 
|---|
|  | 2805 | MPFROM2SHORT(TRUE, 0)); | 
|---|
|  | 2806 | pAD->cursored--; | 
|---|
|  | 2807 | if (pAD->cursored < pAD->topfile) { | 
|---|
|  | 2808 | PaintLine(hwnd, pAD->hps, pAD->cursored, pAD->topfile, &rcl); | 
|---|
|  | 2809 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 2810 | MPFROM2SHORT(0, SB_LINEUP)); | 
|---|
|  | 2811 | } | 
|---|
|  | 2812 | else { | 
|---|
|  | 2813 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 2814 | &rcl); | 
|---|
|  | 2815 | PaintLine(hwnd, pAD->hps, pAD->cursored, pAD->topfile, &rcl); | 
|---|
|  | 2816 | } | 
|---|
|  | 2817 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 2818 | } | 
|---|
|  | 2819 | break; | 
|---|
|  | 2820 | case VK_DOWN: | 
|---|
|  | 2821 | if (pAD->cursored < pAD->afifiles | 
|---|
|  | 2822 | && pAD->cursored < pAD->topfile + numlines) { | 
|---|
|  | 2823 | if (shiftstate & KC_SHIFT) | 
|---|
|  | 2824 | WinSendMsg(hwnd, WM_BUTTON1CLICK, | 
|---|
| [84] | 2825 | MPFROM2SHORT(pAD->fattrs.lAveCharWidth + 2, | 
|---|
|  | 2826 | ((rcl.yTop - (pAD->lMaxHeight * | 
|---|
| [551] | 2827 | ((pAD->cursored) - | 
|---|
|  | 2828 | pAD->topfile))) - | 
|---|
|  | 2829 | pAD->lMaxDescender) - 1), | 
|---|
|  | 2830 | MPFROM2SHORT(TRUE, 0)); | 
|---|
|  | 2831 | pAD->cursored++; | 
|---|
|  | 2832 | if (pAD->cursored >= pAD->topfile + numlines) { | 
|---|
|  | 2833 | PaintLine(hwnd, pAD->hps, pAD->cursored - 2, pAD->topfile, | 
|---|
|  | 2834 | &rcl); | 
|---|
|  | 2835 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 2836 | MPFROM2SHORT(0, SB_LINEDOWN)); | 
|---|
|  | 2837 | } | 
|---|
|  | 2838 | else { | 
|---|
|  | 2839 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 2840 | &rcl); | 
|---|
|  | 2841 | PaintLine(hwnd, pAD->hps, pAD->cursored - 2, pAD->topfile, | 
|---|
|  | 2842 | &rcl); | 
|---|
|  | 2843 | } | 
|---|
|  | 2844 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [84] | 2845 | } | 
|---|
| [551] | 2846 | break; | 
|---|
|  | 2847 | case VK_END: | 
|---|
|  | 2848 | if ((shiftstate & KC_CTRL) || | 
|---|
|  | 2849 | pAD->cursored == (pAD->topfile - 1) + numlines) { | 
|---|
|  | 2850 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 2851 | pAD->topfile = (pAD->afifiles + 1) - numlines; | 
|---|
|  | 2852 | if (pAD->topfile > pAD->afifiles) | 
|---|
|  | 2853 | pAD->topfile = 1; | 
|---|
|  | 2854 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 2855 | } | 
|---|
|  | 2856 | else { | 
|---|
|  | 2857 | pAD->cursored = (pAD->topfile - 1) + numlines; | 
|---|
|  | 2858 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 2859 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 2860 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 2861 | &rcl); | 
|---|
|  | 2862 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, &rcl); | 
|---|
|  | 2863 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 2864 | } | 
|---|
|  | 2865 | break; | 
|---|
|  | 2866 | case VK_HOME: | 
|---|
|  | 2867 | if ((shiftstate & KC_CTRL) || pAD->cursored == pAD->topfile) { | 
|---|
|  | 2868 | pAD->topfile = 1; | 
|---|
|  | 2869 | pAD->cursored = 1; | 
|---|
|  | 2870 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 2871 | } | 
|---|
|  | 2872 | else { | 
|---|
|  | 2873 | pAD->cursored = pAD->topfile; | 
|---|
|  | 2874 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 2875 | &rcl); | 
|---|
|  | 2876 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, &rcl); | 
|---|
|  | 2877 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 2878 | } | 
|---|
|  | 2879 | break; | 
|---|
|  | 2880 | case VK_SPACE: | 
|---|
|  | 2881 | WinSendMsg(hwnd, WM_BUTTON1CLICK, | 
|---|
|  | 2882 | MPFROM2SHORT(pAD->fattrs.lAveCharWidth + 2, | 
|---|
|  | 2883 | ((rcl.yTop - (pAD->lMaxHeight * | 
|---|
|  | 2884 | ((pAD->cursored) - | 
|---|
|  | 2885 | pAD->topfile))) - | 
|---|
|  | 2886 | pAD->lMaxDescender) - 1), | 
|---|
|  | 2887 | MPFROM2SHORT(TRUE, 0)); | 
|---|
|  | 2888 | break; | 
|---|
|  | 2889 | case VK_NEWLINE: | 
|---|
|  | 2890 | case VK_ENTER: | 
|---|
|  | 2891 | WinSendMsg(hwnd, WM_BUTTON1DBLCLK, | 
|---|
|  | 2892 | MPFROM2SHORT(pAD->fattrs.lAveCharWidth + 2, | 
|---|
|  | 2893 | ((rcl.yTop - (pAD->lMaxHeight * | 
|---|
|  | 2894 | ((pAD->cursored) - | 
|---|
|  | 2895 | pAD->topfile))) - | 
|---|
|  | 2896 | pAD->lMaxDescender) - 1), MPFROM2SHORT(0, | 
|---|
|  | 2897 | 0)); | 
|---|
|  | 2898 | break; | 
|---|
| [84] | 2899 | } | 
|---|
| [551] | 2900 | } | 
|---|
|  | 2901 | else if (SHORT1FROMMP(mp1) & KC_CHAR) { | 
|---|
|  | 2902 | switch (SHORT1FROMMP(mp2)) { | 
|---|
|  | 2903 | case '\x1b': | 
|---|
|  | 2904 | case '\r': | 
|---|
|  | 2905 | case '\n': | 
|---|
|  | 2906 | WinSendMsg(hwnd, WM_BUTTON1DBLCLK, | 
|---|
|  | 2907 | MPFROM2SHORT(pAD->fattrs.lAveCharWidth + 2, | 
|---|
|  | 2908 | (rcl.yTop - (pAD->lMaxHeight * | 
|---|
|  | 2909 | ((pAD->cursored) - | 
|---|
|  | 2910 | pAD->topfile))) - 1), | 
|---|
|  | 2911 | MPFROM2SHORT(0, 0)); | 
|---|
|  | 2912 | pAD->lasttime = 0; | 
|---|
|  | 2913 | *pAD->szCommonName = 0; | 
|---|
|  | 2914 | break; | 
|---|
|  | 2915 | default: | 
|---|
|  | 2916 | thistime = WinQueryMsgTime(WinQueryAnchorBlock(hwnd)); | 
|---|
|  | 2917 | if (thistime > pAD->lasttime + 1000) | 
|---|
|  | 2918 | *pAD->szCommonName = 0; | 
|---|
|  | 2919 | pAD->lasttime = thistime; | 
|---|
|  | 2920 | KbdRetry: | 
|---|
|  | 2921 | len = strlen(pAD->szCommonName); | 
|---|
|  | 2922 | if (len >= CCHMAXPATH - 1) { | 
|---|
|  | 2923 | *pAD->szCommonName = 0; | 
|---|
|  | 2924 | len = 0; | 
|---|
|  | 2925 | } | 
|---|
|  | 2926 | pAD->szCommonName[len] = toupper(SHORT1FROMMP(mp2)); | 
|---|
|  | 2927 | pAD->szCommonName[len + 1] = 0; | 
|---|
|  | 2928 | for (x = pAD->cursored - (len > 0); x < pAD->afifiles; x++) { | 
|---|
|  | 2929 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
|  | 2930 | if (pAD->fullnames) { | 
|---|
|  | 2931 | if (!strnicmp(pAD->afindex[y]->fullname, pAD->szCommonName, | 
|---|
|  | 2932 | len + 1)) { | 
|---|
|  | 2933 | found = TRUE; | 
|---|
|  | 2934 | break; | 
|---|
| [84] | 2935 | } | 
|---|
| [551] | 2936 | } | 
|---|
|  | 2937 | else { | 
|---|
|  | 2938 | if (!strnicmp(pAD->afindex[y]->filename, pAD->szCommonName, | 
|---|
|  | 2939 | len + 1)) { | 
|---|
|  | 2940 | found = TRUE; | 
|---|
|  | 2941 | break; | 
|---|
| [84] | 2942 | } | 
|---|
| [551] | 2943 | } | 
|---|
|  | 2944 | } | 
|---|
|  | 2945 | if (!found) { | 
|---|
|  | 2946 | for (x = 0; x < pAD->cursored - (len > 0); x++) { | 
|---|
|  | 2947 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
|  | 2948 | if (pAD->fullnames) { | 
|---|
|  | 2949 | if (!strnicmp(pAD->afindex[y]->fullname, pAD->szCommonName, | 
|---|
|  | 2950 | len + 1)) { | 
|---|
|  | 2951 | found = TRUE; | 
|---|
|  | 2952 | break; | 
|---|
| [84] | 2953 | } | 
|---|
|  | 2954 | } | 
|---|
| [551] | 2955 | else { | 
|---|
|  | 2956 | if (!strnicmp(pAD->afindex[y]->filename, pAD->szCommonName, | 
|---|
|  | 2957 | len + 1)) { | 
|---|
|  | 2958 | found = TRUE; | 
|---|
|  | 2959 | break; | 
|---|
| [84] | 2960 | } | 
|---|
|  | 2961 | } | 
|---|
| [551] | 2962 | } | 
|---|
|  | 2963 | } | 
|---|
|  | 2964 | if (found) { | 
|---|
|  | 2965 | if (x + 1 != pAD->cursored) { | 
|---|
|  | 2966 | pAD->cursored = x + 1; | 
|---|
|  | 2967 | if (pAD->cursored >= pAD->topfile && | 
|---|
|  | 2968 | pAD->cursored < pAD->topfile + numlines && | 
|---|
|  | 2969 | wascursored != pAD->cursored) { | 
|---|
|  | 2970 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 2971 | &rcl); | 
|---|
|  | 2972 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, | 
|---|
|  | 2973 | &rcl); | 
|---|
|  | 2974 | } | 
|---|
| [84] | 2975 | else { | 
|---|
| [551] | 2976 | if (pAD->cursored < numlines) | 
|---|
|  | 2977 | pAD->topfile = 1; | 
|---|
|  | 2978 | else if (pAD->cursored > | 
|---|
|  | 2979 | (pAD->afifiles + 1) - (numlines / 2)) | 
|---|
|  | 2980 | pAD->topfile = (pAD->afifiles + 1) - numlines; | 
|---|
|  | 2981 | else | 
|---|
|  | 2982 | pAD->topfile = pAD->cursored - (numlines / 2); | 
|---|
|  | 2983 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 2984 | } | 
|---|
| [551] | 2985 | } | 
|---|
| [84] | 2986 | } | 
|---|
| [551] | 2987 | else { | 
|---|
|  | 2988 | *pAD->szCommonName = 0; | 
|---|
|  | 2989 | pAD->lasttime = 0; | 
|---|
|  | 2990 | if (len)                  // retry as first letter if no match | 
|---|
|  | 2991 | goto KbdRetry; | 
|---|
|  | 2992 | } | 
|---|
|  | 2993 | break; | 
|---|
| [84] | 2994 | } | 
|---|
|  | 2995 | } | 
|---|
| [2] | 2996 | } | 
|---|
| [551] | 2997 | } | 
|---|
|  | 2998 | break; | 
|---|
| [2] | 2999 |  | 
|---|
| [551] | 3000 | case DM_PRINTOBJECT: | 
|---|
|  | 3001 | return MRFROMLONG(DRR_TARGET); | 
|---|
| [2] | 3002 |  | 
|---|
| [551] | 3003 | case DM_DISCARDOBJECT: | 
|---|
|  | 3004 | return MRFROMLONG(DRR_TARGET); | 
|---|
| [2] | 3005 |  | 
|---|
| [551] | 3006 | case WM_BEGINDRAG: | 
|---|
|  | 3007 | { | 
|---|
|  | 3008 | CHAR **list; | 
|---|
| [2] | 3009 |  | 
|---|
| [551] | 3010 | list = BuildAList(hwnd); | 
|---|
|  | 3011 | if (!list) | 
|---|
|  | 3012 | Runtime_Error(pszSrcFile, __LINE__, "no data"); | 
|---|
|  | 3013 | else { | 
|---|
|  | 3014 | WinSetWindowText(pAD->hwndStatus, GetPString(IDS_DRAGGINGFILESTEXT)); | 
|---|
|  | 3015 | DragList(hwnd, (HWND) 0, list, TRUE); | 
|---|
|  | 3016 | FreeList(list); | 
|---|
|  | 3017 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [2] | 3018 | } | 
|---|
| [551] | 3019 | } | 
|---|
|  | 3020 | break; | 
|---|
| [2] | 3021 |  | 
|---|
| [551] | 3022 | case WM_BUTTON1MOTIONSTART: | 
|---|
|  | 3023 | if (pAD && !pAD->stopflag && | 
|---|
|  | 3024 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 3025 | pAD->mousecaptured = TRUE; | 
|---|
|  | 3026 | pAD->lastselected = (ULONG) - 1; | 
|---|
|  | 3027 | pAD->lastdirection = 0; | 
|---|
|  | 3028 | WinSetCapture(HWND_DESKTOP, hwnd); | 
|---|
|  | 3029 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3030 | WinSendMsg(hwnd, WM_BUTTON1CLICK, mp1, MPFROM2SHORT(TRUE, 0)); | 
|---|
|  | 3031 | } | 
|---|
|  | 3032 | break; | 
|---|
| [2] | 3033 |  | 
|---|
| [551] | 3034 | case WM_MOUSEMOVE: | 
|---|
|  | 3035 | shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 3036 | if (pAD && pAD->mousecaptured) { | 
|---|
| [2] | 3037 |  | 
|---|
| [551] | 3038 | ULONG numlines, whichfile, y, x; | 
|---|
|  | 3039 | LONG inc; | 
|---|
|  | 3040 | RECTL Rectl; | 
|---|
|  | 3041 | POINTS pts; | 
|---|
|  | 3042 | BOOL outofwindow = FALSE; | 
|---|
| [2] | 3043 |  | 
|---|
| [551] | 3044 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3045 | numlines = NumLines(&Rectl, pAD); | 
|---|
|  | 3046 | if (numlines) { | 
|---|
|  | 3047 | pts.x = SHORT1FROMMP(mp1); | 
|---|
|  | 3048 | pts.y = SHORT2FROMMP(mp1); | 
|---|
|  | 3049 | if (pts.y < 0) { | 
|---|
|  | 3050 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 3051 | MPFROM2SHORT(0, SB_LINEDOWN)); | 
|---|
|  | 3052 | pts.y = 1; | 
|---|
|  | 3053 | outofwindow = TRUE; | 
|---|
|  | 3054 | } | 
|---|
|  | 3055 | else if (pts.y > Rectl.yTop - Rectl.yBottom) { | 
|---|
|  | 3056 | WinSendMsg(hwnd, WM_VSCROLL, MPFROM2SHORT(FID_VERTSCROLL, 0), | 
|---|
|  | 3057 | MPFROM2SHORT(0, SB_LINEUP)); | 
|---|
|  | 3058 | pts.y = (Rectl.yTop - Rectl.yBottom) - 1; | 
|---|
|  | 3059 | outofwindow = TRUE; | 
|---|
|  | 3060 | } | 
|---|
|  | 3061 | whichfile = ((Rectl.yTop - Rectl.yBottom) - | 
|---|
|  | 3062 | ((LONG) pts.y + pAD->lMaxDescender)) / pAD->lMaxHeight; | 
|---|
|  | 3063 | if (whichfile > numlines - 1) | 
|---|
|  | 3064 | whichfile = numlines - 1; | 
|---|
|  | 3065 | whichfile += (pAD->topfile - 1); | 
|---|
|  | 3066 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - whichfile : whichfile; | 
|---|
|  | 3067 | if (y < pAD->afifiles && pAD->lastselected != whichfile) { | 
|---|
|  | 3068 | if (pAD->lastselected != (ULONG) - 1) { | 
|---|
|  | 3069 | inc = (pAD->lastselected < whichfile) ? 1 : -1; | 
|---|
|  | 3070 | for (x = pAD->lastselected + inc; | 
|---|
|  | 3071 | x != whichfile && x < pAD->afifiles; | 
|---|
|  | 3072 | (pAD->lastselected < whichfile) ? x++ : x--) { | 
|---|
|  | 3073 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
|  | 3074 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 3075 | pAD->afindex[y]->flags &= ~AF_SELECTED; | 
|---|
|  | 3076 | pAD->selected--; | 
|---|
|  | 3077 | pAD->ullSelectedBytes -= pAD->afindex[y]->cbFile; | 
|---|
| [84] | 3078 | } | 
|---|
| [551] | 3079 | else { | 
|---|
|  | 3080 | pAD->afindex[y]->flags |= AF_SELECTED; | 
|---|
|  | 3081 | pAD->selected++; | 
|---|
|  | 3082 | pAD->ullSelectedBytes += pAD->afindex[y]->cbFile; | 
|---|
|  | 3083 | } | 
|---|
|  | 3084 | PaintLine(hwnd, pAD->hps, x, pAD->topfile, &Rectl); | 
|---|
| [84] | 3085 | } | 
|---|
|  | 3086 | } | 
|---|
| [551] | 3087 | WinSendMsg(hwnd, WM_BUTTON1CLICK, MPFROM2SHORT(pts.x, pts.y), | 
|---|
|  | 3088 | MPFROM2SHORT(TRUE, 0)); | 
|---|
| [84] | 3089 | } | 
|---|
| [2] | 3090 | } | 
|---|
| [551] | 3091 | if (outofwindow) { | 
|---|
| [2] | 3092 |  | 
|---|
| [84] | 3093 | POINTL ptl; | 
|---|
| [2] | 3094 |  | 
|---|
| [551] | 3095 | WinQueryPointerPos(HWND_DESKTOP, &ptl); | 
|---|
|  | 3096 | WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1L); | 
|---|
|  | 3097 | if ((SHORT) ptl.y == (SHORT) SHORT2FROMMP(mp1) && | 
|---|
|  | 3098 | (SHORT) ptl.x == (SHORT) SHORT1FROMMP(mp1) && | 
|---|
|  | 3099 | ((SHORT) ptl.y < 0 || ptl.y > (Rectl.yTop - Rectl.yBottom))) { | 
|---|
|  | 3100 | PostMsg(hwnd, UM_MOUSEMOVE, mp1, MPVOID); | 
|---|
| [84] | 3101 | DosSleep(1L); | 
|---|
|  | 3102 | } | 
|---|
| [2] | 3103 | } | 
|---|
| [551] | 3104 | } | 
|---|
|  | 3105 | break; | 
|---|
| [2] | 3106 |  | 
|---|
| [551] | 3107 | case UM_MOUSEMOVE: | 
|---|
|  | 3108 | if (pAD && pAD->mousecaptured) { | 
|---|
|  | 3109 |  | 
|---|
|  | 3110 | POINTL ptl; | 
|---|
|  | 3111 | RECTL Rectl; | 
|---|
|  | 3112 |  | 
|---|
|  | 3113 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3114 | WinQueryPointerPos(HWND_DESKTOP, &ptl); | 
|---|
|  | 3115 | WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1L); | 
|---|
|  | 3116 | if ((SHORT) ptl.y == (SHORT) SHORT2FROMMP(mp1) && | 
|---|
|  | 3117 | (SHORT) ptl.x == (SHORT) SHORT1FROMMP(mp1) && | 
|---|
|  | 3118 | ((SHORT) ptl.y < 0 || ptl.y > (Rectl.yTop - Rectl.yBottom))) { | 
|---|
|  | 3119 | DosSleep(1L); | 
|---|
|  | 3120 | PostMsg(hwnd, WM_MOUSEMOVE, mp1, MPFROM2SHORT(TRUE, 0)); | 
|---|
| [2] | 3121 | } | 
|---|
| [551] | 3122 | } | 
|---|
|  | 3123 | return 0; | 
|---|
| [2] | 3124 |  | 
|---|
| [551] | 3125 | case WM_BUTTON1UP: | 
|---|
|  | 3126 | case WM_BUTTON1MOTIONEND: | 
|---|
|  | 3127 | if (pAD) { | 
|---|
|  | 3128 | pAD->mousecaptured = FALSE; | 
|---|
|  | 3129 | pAD->lastselected = (ULONG) - 1; | 
|---|
|  | 3130 | pAD->lastdirection = 0; | 
|---|
|  | 3131 | WinSetCapture(HWND_DESKTOP, NULLHANDLE); | 
|---|
|  | 3132 | } | 
|---|
|  | 3133 | break; | 
|---|
| [2] | 3134 |  | 
|---|
| [551] | 3135 | case WM_BUTTON1CLICK: | 
|---|
|  | 3136 | case WM_BUTTON1DBLCLK: | 
|---|
|  | 3137 | shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 3138 | if (pAD && !pAD->stopflag && | 
|---|
|  | 3139 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
| [2] | 3140 |  | 
|---|
| [551] | 3141 | ULONG numlines, whichfile, y, wascursored; | 
|---|
|  | 3142 | RECTL Rectl; | 
|---|
|  | 3143 | POINTS pts; | 
|---|
|  | 3144 |  | 
|---|
|  | 3145 | if (pAD->afifiles) { | 
|---|
|  | 3146 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3147 | numlines = NumLines(&Rectl, pAD); | 
|---|
|  | 3148 | if (numlines) { | 
|---|
|  | 3149 | pts.x = SHORT1FROMMP(mp1); | 
|---|
|  | 3150 | pts.y = SHORT2FROMMP(mp1); | 
|---|
|  | 3151 | whichfile = ((Rectl.yTop - Rectl.yBottom) - | 
|---|
|  | 3152 | ((LONG) pts.y + pAD->lMaxDescender)) / pAD->lMaxHeight; | 
|---|
|  | 3153 | if (whichfile > numlines - 1) | 
|---|
|  | 3154 | whichfile = numlines - 1; | 
|---|
|  | 3155 | whichfile += (pAD->topfile - 1); | 
|---|
|  | 3156 | if (whichfile + 1 > pAD->afifiles) | 
|---|
|  | 3157 | break; | 
|---|
|  | 3158 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - whichfile : whichfile; | 
|---|
|  | 3159 | wascursored = pAD->cursored; | 
|---|
|  | 3160 | pAD->cursored = whichfile + 1; | 
|---|
|  | 3161 | if (pAD->cursored != wascursored) | 
|---|
|  | 3162 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, &Rectl); | 
|---|
|  | 3163 | if (y < pAD->afifiles) { | 
|---|
|  | 3164 | if (msg == WM_BUTTON1CLICK || fUnHilite) { | 
|---|
|  | 3165 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 3166 | pAD->afindex[y]->flags &= ~AF_SELECTED; | 
|---|
|  | 3167 | pAD->selected--; | 
|---|
|  | 3168 | pAD->ullSelectedBytes -= pAD->afindex[y]->cbFile; | 
|---|
| [84] | 3169 | } | 
|---|
| [551] | 3170 | else { | 
|---|
|  | 3171 | pAD->afindex[y]->flags |= AF_SELECTED; | 
|---|
|  | 3172 | pAD->selected++; | 
|---|
|  | 3173 | pAD->ullSelectedBytes += pAD->afindex[y]->cbFile; | 
|---|
|  | 3174 | } | 
|---|
|  | 3175 | PaintLine(hwnd, pAD->hps, whichfile, pAD->topfile, &Rectl); | 
|---|
|  | 3176 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [84] | 3177 | } | 
|---|
| [551] | 3178 | } | 
|---|
|  | 3179 | if (msg == WM_BUTTON1CLICK) { | 
|---|
|  | 3180 | if (pAD->lastselected != (ULONG) - 1) { | 
|---|
|  | 3181 | if (whichfile > pAD->lastselected) | 
|---|
|  | 3182 | pAD->lastdirection = 1; | 
|---|
| [84] | 3183 | else | 
|---|
| [551] | 3184 | pAD->lastdirection = 2; | 
|---|
| [84] | 3185 | } | 
|---|
|  | 3186 | else | 
|---|
| [551] | 3187 | pAD->lastdirection = 0; | 
|---|
|  | 3188 | pAD->lastselected = whichfile; | 
|---|
| [84] | 3189 | } | 
|---|
| [551] | 3190 | else | 
|---|
|  | 3191 | DefaultViewKeys(hwnd, pAD->hwndFrame, HWND_DESKTOP, NULL, | 
|---|
|  | 3192 | pAD->afindex[y]->fullname); | 
|---|
| [84] | 3193 | } | 
|---|
| [2] | 3194 | } | 
|---|
| [551] | 3195 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3196 | } | 
|---|
|  | 3197 | break; | 
|---|
| [2] | 3198 |  | 
|---|
| [551] | 3199 | case WM_MENUEND: | 
|---|
|  | 3200 | if (pAD && (HWND) mp2 == pAD->hwndPopup) { | 
|---|
|  | 3201 | WinDestroyWindow(pAD->hwndPopup); | 
|---|
|  | 3202 | pAD->hwndPopup = (HWND) 0; | 
|---|
|  | 3203 | } | 
|---|
|  | 3204 | break; | 
|---|
| [2] | 3205 |  | 
|---|
| [551] | 3206 | case WM_CONTEXTMENU: | 
|---|
|  | 3207 | if (pAD) { | 
|---|
|  | 3208 | if (!pAD->hwndPopup) { | 
|---|
|  | 3209 | pAD->hwndPopup = | 
|---|
|  | 3210 | WinLoadMenu(HWND_DESKTOP, FM3ModHandle, SEEALL_POPUP); | 
|---|
|  | 3211 | if (pAD->hwndPopup) { | 
|---|
|  | 3212 | WinSetPresParam(pAD->hwndPopup, PP_FONTNAMESIZE, | 
|---|
|  | 3213 | (ULONG) strlen(GetPString(IDS_8HELVTEXT)) + 1, | 
|---|
|  | 3214 | (PVOID) GetPString(IDS_8HELVTEXT)); | 
|---|
|  | 3215 | SetConditionalCascade(pAD->hwndPopup, | 
|---|
|  | 3216 | IDM_DELETESUBMENU, | 
|---|
|  | 3217 | (fDefaultDeletePerm) ? | 
|---|
|  | 3218 | IDM_PERMDELETE : IDM_DELETE); | 
|---|
|  | 3219 | SetConditionalCascade(pAD->hwndPopup, IDM_MOVEMENU, IDM_MOVE); | 
|---|
|  | 3220 | SetConditionalCascade(pAD->hwndPopup, IDM_COPYMENU, IDM_COPY); | 
|---|
|  | 3221 | SetConditionalCascade(pAD->hwndPopup, IDM_OPENSUBMENU, | 
|---|
|  | 3222 | IDM_OPENDEFAULT); | 
|---|
|  | 3223 | SetConditionalCascade(pAD->hwndMenu, IDM_OBJECTSUBMENU, IDM_SHADOW); | 
|---|
|  | 3224 | if (fWorkPlace) { | 
|---|
|  | 3225 | WinSendMsg(pAD->hwndPopup, MM_DELETEITEM, | 
|---|
|  | 3226 | MPFROM2SHORT(IDM_OPENSUBMENU, TRUE), MPVOID); | 
|---|
|  | 3227 | WinSendMsg(pAD->hwndPopup, MM_DELETEITEM, | 
|---|
|  | 3228 | MPFROM2SHORT(IDM_OBJECTSUBMENU, TRUE), MPVOID); | 
|---|
| [84] | 3229 | } | 
|---|
|  | 3230 | } | 
|---|
| [551] | 3231 | } | 
|---|
|  | 3232 | if (pAD->hwndPopup) { | 
|---|
| [2] | 3233 |  | 
|---|
| [551] | 3234 | APIRET rc; | 
|---|
| [2] | 3235 |  | 
|---|
| [551] | 3236 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 3237 | WinEnableMenuItem(pAD->hwndPopup, IDM_EAS, (rc == 0 && | 
|---|
|  | 3238 | pAD->selected != 0)); | 
|---|
|  | 3239 | WinEnableMenuItem(pAD->hwndPopup, IDM_UUDECODE, (rc == 0 && | 
|---|
|  | 3240 | pAD->selected != 0)); | 
|---|
|  | 3241 | WinEnableMenuItem(pAD->hwndPopup, IDM_EXTRACT, (rc == 0 && | 
|---|
| [84] | 3242 | pAD->selected != 0)); | 
|---|
| [551] | 3243 | WinEnableMenuItem(pAD->hwndPopup, IDM_ARCHIVE, (rc == 0 && | 
|---|
| [84] | 3244 | pAD->selected != 0)); | 
|---|
| [551] | 3245 | WinEnableMenuItem(pAD->hwndPopup, IDM_MOVEMENU, (rc == 0 && | 
|---|
|  | 3246 | pAD->selected != 0)); | 
|---|
|  | 3247 | WinEnableMenuItem(pAD->hwndPopup, IDM_COPYMENU, (rc == 0 && | 
|---|
|  | 3248 | pAD->selected != 0)); | 
|---|
|  | 3249 | WinEnableMenuItem(pAD->hwndPopup, IDM_RENAME, (rc == 0 && | 
|---|
| [84] | 3250 | pAD->selected != 0)); | 
|---|
| [551] | 3251 | WinEnableMenuItem(pAD->hwndPopup, IDM_PRINT, (rc == 0 && | 
|---|
| [84] | 3252 | pAD->selected != 0)); | 
|---|
| [551] | 3253 | WinEnableMenuItem(pAD->hwndPopup, IDM_SUBJECT, (rc == 0 && | 
|---|
|  | 3254 | pAD->selected != 0)); | 
|---|
|  | 3255 | WinEnableMenuItem(pAD->hwndPopup, IDM_OPENSUBMENU, (rc == 0 && | 
|---|
|  | 3256 | pAD->selected != | 
|---|
|  | 3257 | 0)); | 
|---|
|  | 3258 | WinEnableMenuItem(pAD->hwndPopup, IDM_OBJECTSUBMENU, | 
|---|
|  | 3259 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3260 | WinEnableMenuItem(pAD->hwndPopup, IDM_DELETESUBMENU, | 
|---|
|  | 3261 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3262 | WinEnableMenuItem(pAD->hwndPopup, IDM_INFO, | 
|---|
|  | 3263 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3264 | WinEnableMenuItem(pAD->hwndPopup, IDM_ATTRS, | 
|---|
|  | 3265 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3266 | WinEnableMenuItem(pAD->hwndPopup, IDM_COLLECT, | 
|---|
|  | 3267 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3268 | WinEnableMenuItem(pAD->hwndPopup, IDM_SAVETOCLIP, | 
|---|
|  | 3269 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3270 | WinEnableMenuItem(pAD->hwndPopup, IDM_APPENDTOCLIP, | 
|---|
|  | 3271 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3272 | WinEnableMenuItem(pAD->hwndPopup, IDM_SAVETOLIST, | 
|---|
|  | 3273 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3274 | WinEnableMenuItem(pAD->hwndPopup, IDM_REMOVE, | 
|---|
|  | 3275 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3276 | WinEnableMenuItem(pAD->hwndPopup, IDM_HIDEALL, | 
|---|
|  | 3277 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3278 | WinEnableMenuItem(pAD->hwndPopup, IDM_SELECTALL, | 
|---|
|  | 3279 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3280 | WinEnableMenuItem(pAD->hwndPopup, IDM_SELECTMASK, | 
|---|
|  | 3281 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3282 | WinEnableMenuItem(pAD->hwndPopup, IDM_DESELECTALL, | 
|---|
|  | 3283 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3284 | WinEnableMenuItem(pAD->hwndPopup, IDM_DESELECTMASK, | 
|---|
|  | 3285 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3286 | WinEnableMenuItem(pAD->hwndPopup, IDM_INVERT, | 
|---|
|  | 3287 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3288 | WinEnableMenuItem(pAD->hwndPopup, IDM_FILTER, | 
|---|
|  | 3289 | (rc == 0 && pAD->affiles != 0)); | 
|---|
|  | 3290 | if (!rc) | 
|---|
|  | 3291 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3292 | if (WinPopupMenu(hwnd, hwnd, pAD->hwndPopup, SHORT1FROMMP(mp1), | 
|---|
|  | 3293 | SHORT2FROMMP(mp1), 0, | 
|---|
|  | 3294 | PU_HCONSTRAIN | PU_VCONSTRAIN | | 
|---|
|  | 3295 | PU_KEYBOARD | PU_MOUSEBUTTON1)) | 
|---|
|  | 3296 | CenterOverWindow(pAD->hwndPopup); | 
|---|
| [2] | 3297 | } | 
|---|
| [551] | 3298 | } | 
|---|
|  | 3299 | break; | 
|---|
| [2] | 3300 |  | 
|---|
| [551] | 3301 | case UM_CONTAINER_FILLED: | 
|---|
|  | 3302 | if (pAD) { | 
|---|
|  | 3303 | pAD->stopflag = 0; | 
|---|
|  | 3304 | pAD->topfile = 1; | 
|---|
|  | 3305 | pAD->cursored = 1; | 
|---|
|  | 3306 | pAD->multiplier = 1; | 
|---|
|  | 3307 | if (!pAD->afifiles) { | 
|---|
|  | 3308 | DosBeep(250, 50); | 
|---|
|  | 3309 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
| [2] | 3310 | } | 
|---|
| [551] | 3311 | else { | 
|---|
|  | 3312 | DosBeep(1000, 25); | 
|---|
|  | 3313 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3314 | PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID); | 
|---|
|  | 3315 | } | 
|---|
|  | 3316 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), HWND_TOP, 0, 0, 0, 0, | 
|---|
|  | 3317 | SWP_SHOW | SWP_RESTORE | SWP_ACTIVATE | SWP_ZORDER); | 
|---|
|  | 3318 | } | 
|---|
|  | 3319 | return 0; | 
|---|
| [2] | 3320 |  | 
|---|
| [551] | 3321 | case WM_ERASEBACKGROUND: | 
|---|
|  | 3322 | WinFillRect((HPS) mp1, (PRECTL) mp2, | 
|---|
|  | 3323 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3324 | return 0; | 
|---|
| [2] | 3325 |  | 
|---|
| [551] | 3326 | case WM_PAINT: | 
|---|
|  | 3327 | // fprintf(stderr,"Seeall: WM_PAINT\n"); | 
|---|
|  | 3328 | if (pAD) { | 
|---|
| [2] | 3329 |  | 
|---|
| [551] | 3330 | HPS hpsp; | 
|---|
|  | 3331 | RECTL Rectl; | 
|---|
|  | 3332 | POINTL ptl; | 
|---|
|  | 3333 | register ULONG x; | 
|---|
|  | 3334 | ULONG y, len, numlines; | 
|---|
|  | 3335 | CHAR szBuff[CCHMAXPATH + 80]; | 
|---|
|  | 3336 | BOOL inverted, hidsys, reado, wascursored; | 
|---|
| [2] | 3337 |  | 
|---|
| [551] | 3338 | hpsp = WinBeginPaint(hwnd, pAD->hps, &Rectl); | 
|---|
|  | 3339 | WinFillRect(hpsp, &Rectl, standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3340 | if (!pAD->stopflag && | 
|---|
|  | 3341 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 3342 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3343 | numlines = NumLines(&Rectl, pAD); | 
|---|
|  | 3344 | if (pAD->afifiles && numlines) { | 
|---|
|  | 3345 | if (pAD->topfile > (pAD->afifiles + 1) - numlines) | 
|---|
|  | 3346 | pAD->topfile = (pAD->afifiles + 1) - numlines; | 
|---|
|  | 3347 | if (pAD->topfile > pAD->afifiles) | 
|---|
|  | 3348 | pAD->topfile = 1; | 
|---|
|  | 3349 | if (!pAD->topfile) | 
|---|
|  | 3350 | pAD->topfile = 1; | 
|---|
|  | 3351 | if (pAD->cursored < pAD->topfile) | 
|---|
|  | 3352 | pAD->cursored = pAD->topfile; | 
|---|
|  | 3353 | else if (pAD->cursored > (pAD->topfile + numlines) - 1) | 
|---|
|  | 3354 | pAD->cursored = (pAD->topfile + numlines) - 1; | 
|---|
|  | 3355 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3356 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3357 | } | 
|---|
|  | 3358 | else | 
|---|
|  | 3359 | pAD->topfile = pAD->cursored = 1; | 
|---|
|  | 3360 | if (numlines && pAD->afifiles) { | 
|---|
|  | 3361 | GpiSetBackMix(hpsp, BM_OVERPAINT); | 
|---|
|  | 3362 | wascursored = TRUE; | 
|---|
|  | 3363 | for (x = pAD->topfile - 1; x < pAD->afifiles; x++) { | 
|---|
|  | 3364 | ptl.x = pAD->horzscroll; | 
|---|
|  | 3365 | if (wascursored) {          /* reestablish normal colors */ | 
|---|
|  | 3366 | GpiSetColor(pAD->hps, | 
|---|
|  | 3367 | standardcolors[Colors[COLORS_NORMALFORE]]); | 
|---|
|  | 3368 | GpiSetBackColor(pAD->hps, | 
|---|
|  | 3369 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3370 | wascursored = inverted = hidsys = reado = FALSE; | 
|---|
|  | 3371 | } | 
|---|
|  | 3372 | if (x == pAD->cursored - 1) | 
|---|
|  | 3373 | wascursored = TRUE; | 
|---|
|  | 3374 | y = (pAD->invertsort) ? (pAD->afifiles - 1) - x : x; | 
|---|
|  | 3375 | ptl.y = (Rectl.yTop - | 
|---|
|  | 3376 | (pAD->lMaxHeight * (((x + 1) - pAD->topfile) + 1))); | 
|---|
|  | 3377 | if (ptl.y - pAD->lMaxDescender <= 0) | 
|---|
|  | 3378 | break; | 
|---|
|  | 3379 | if (pAD->afindex[y]->flags & AF_SELECTED) { | 
|---|
|  | 3380 | if (!inverted) { | 
|---|
| [84] | 3381 | GpiSetColor(pAD->hps, | 
|---|
| [551] | 3382 | standardcolors[Colors | 
|---|
|  | 3383 | [COLORS_SELECTEDNORMALFORE]]); | 
|---|
| [84] | 3384 | GpiSetBackColor(pAD->hps, | 
|---|
| [551] | 3385 | (wascursored) ? | 
|---|
|  | 3386 | standardcolors[Colors | 
|---|
|  | 3387 | [COLORS_CURSOREDSELECTEDBACK]] | 
|---|
|  | 3388 | : | 
|---|
|  | 3389 | standardcolors[Colors[COLORS_SELECTEDBACK]]); | 
|---|
|  | 3390 | inverted = TRUE; | 
|---|
| [84] | 3391 | } | 
|---|
| [551] | 3392 | } | 
|---|
|  | 3393 | else if (inverted || | 
|---|
|  | 3394 | ((pAD->afindex[y]->attrFile & | 
|---|
| [84] | 3395 | (FILE_SYSTEM | FILE_HIDDEN)) != 0) != hidsys || | 
|---|
| [551] | 3396 | ((pAD->afindex[y]->attrFile & FILE_READONLY) != 0) != | 
|---|
|  | 3397 | reado) { | 
|---|
|  | 3398 | if (pAD->afindex[y]->attrFile & (FILE_SYSTEM | FILE_HIDDEN)) { | 
|---|
|  | 3399 | GpiSetColor(pAD->hps, | 
|---|
|  | 3400 | standardcolors[Colors[COLORS_SYSTEMFORE]]); | 
|---|
|  | 3401 | hidsys = TRUE; | 
|---|
| [84] | 3402 | } | 
|---|
| [551] | 3403 | else if ((pAD->afindex[y]->attrFile & FILE_READONLY) != 0) { | 
|---|
|  | 3404 | GpiSetColor(pAD->hps, | 
|---|
|  | 3405 | standardcolors[Colors[COLORS_READONLYFORE]]); | 
|---|
|  | 3406 | reado = TRUE; | 
|---|
| [84] | 3407 | } | 
|---|
| [551] | 3408 | else | 
|---|
|  | 3409 | GpiSetColor(pAD->hps, | 
|---|
|  | 3410 | standardcolors[Colors[COLORS_NORMALFORE]]); | 
|---|
|  | 3411 | GpiSetBackColor(pAD->hps, | 
|---|
|  | 3412 | (wascursored) ? | 
|---|
|  | 3413 | standardcolors[Colors | 
|---|
|  | 3414 | [COLORS_CURSOREDNORMALBACK]] : | 
|---|
|  | 3415 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3416 | inverted = FALSE; | 
|---|
| [84] | 3417 | } | 
|---|
| [551] | 3418 | else if (wascursored) | 
|---|
|  | 3419 | GpiSetBackColor(pAD->hps, | 
|---|
|  | 3420 | standardcolors[Colors | 
|---|
|  | 3421 | [COLORS_CURSOREDNORMALBACK]]); | 
|---|
|  | 3422 | len = | 
|---|
|  | 3423 | sprintf(szBuff, | 
|---|
|  | 3424 | "%c%-*.*s  %-12lu  %c%c%c%c%c  %04u/%02u/%02u %02u:%02u:%02u ", | 
|---|
|  | 3425 | (wascursored) ? '>' : ' ', | 
|---|
|  | 3426 | (pAD->fullnames) ? pAD->longestw : pAD->longest, | 
|---|
|  | 3427 | (pAD->fullnames) ? pAD->longestw : pAD->longest, | 
|---|
|  | 3428 | (pAD->fullnames) ? pAD->afindex[y]->fullname : pAD-> | 
|---|
|  | 3429 | afindex[y]->filename, pAD->afindex[y]->cbFile, | 
|---|
|  | 3430 | "-A"[((pAD->afindex[y]->attrFile & FILE_ARCHIVED) != | 
|---|
|  | 3431 | 0)], | 
|---|
|  | 3432 | "-R"[((pAD->afindex[y]->attrFile & FILE_READONLY) != | 
|---|
|  | 3433 | 0)], | 
|---|
|  | 3434 | "-H"[((pAD->afindex[y]->attrFile & FILE_HIDDEN) != 0)], | 
|---|
|  | 3435 | "-S"[((pAD->afindex[y]->attrFile & FILE_SYSTEM) != 0)], | 
|---|
|  | 3436 | "-D"[((pAD->afindex[y]->attrFile & FILE_DIRECTORY) != | 
|---|
|  | 3437 | 0)], pAD->afindex[y]->date.year + 1980, | 
|---|
|  | 3438 | pAD->afindex[y]->date.month, pAD->afindex[y]->date.day, | 
|---|
|  | 3439 | pAD->afindex[y]->time.hours, | 
|---|
|  | 3440 | pAD->afindex[y]->time.minutes, | 
|---|
|  | 3441 | pAD->afindex[y]->time.twosecs * 2); | 
|---|
|  | 3442 | GpiCharStringAt(hpsp, &ptl, len, szBuff); | 
|---|
|  | 3443 | GpiQueryCurrentPosition(hpsp, &ptl); | 
|---|
|  | 3444 | if (ptl.x + abs(pAD->horzscroll) > pAD->maxx) { | 
|---|
|  | 3445 | pAD->maxx = ptl.x + abs(pAD->horzscroll); | 
|---|
|  | 3446 | WinSendMsg(pAD->hhscroll, SBM_SETTHUMBSIZE, | 
|---|
|  | 3447 | MPFROM2SHORT((SHORT) Rectl.xRight, | 
|---|
|  | 3448 | (SHORT) pAD->maxx), MPVOID); | 
|---|
|  | 3449 | } | 
|---|
| [84] | 3450 | } | 
|---|
|  | 3451 | } | 
|---|
| [551] | 3452 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
| [2] | 3453 | } | 
|---|
| [551] | 3454 | WinEndPaint(hpsp); | 
|---|
|  | 3455 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 3456 | if (!pAD->stopflag) | 
|---|
|  | 3457 | WinSendMsg(pAD->hvscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3458 | MPFROMSHORT((SHORT) (pAD->topfile / pAD->multiplier)), | 
|---|
|  | 3459 | MPFROM2SHORT(1, | 
|---|
|  | 3460 | (SHORT) (pAD->afifiles / pAD->multiplier) - | 
|---|
|  | 3461 | (numlines - 1))); | 
|---|
|  | 3462 | WinSendMsg(pAD->hhscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3463 | MPFROMSHORT((SHORT) abs(pAD->horzscroll)), | 
|---|
|  | 3464 | MPFROM2SHORT(0, (SHORT) (pAD->maxx - Rectl.xRight))); | 
|---|
|  | 3465 | WinSendMsg(pAD->hhscroll, SBM_SETTHUMBSIZE, | 
|---|
|  | 3466 | MPFROM2SHORT((SHORT) Rectl.xRight, (SHORT) pAD->maxx), | 
|---|
|  | 3467 | MPVOID); | 
|---|
|  | 3468 | } | 
|---|
|  | 3469 | break; | 
|---|
| [2] | 3470 |  | 
|---|
| [551] | 3471 | case WM_HSCROLL: | 
|---|
|  | 3472 | { | 
|---|
|  | 3473 | RECTL rectl; | 
|---|
|  | 3474 | BOOL invalidate = TRUE; | 
|---|
| [2] | 3475 |  | 
|---|
| [551] | 3476 | WinQueryWindowRect(hwnd, &rectl); | 
|---|
|  | 3477 | switch (SHORT2FROMMP(mp2)) { | 
|---|
|  | 3478 | case SB_PAGERIGHT: | 
|---|
|  | 3479 | if (abs(pAD->horzscroll) < pAD->maxx - rectl.xRight) { | 
|---|
|  | 3480 | pAD->horzscroll -= rectl.xRight; | 
|---|
|  | 3481 | if (abs(pAD->horzscroll) > pAD->maxx - rectl.xRight) | 
|---|
|  | 3482 | pAD->horzscroll = -(pAD->maxx - rectl.xRight); | 
|---|
|  | 3483 | } | 
|---|
|  | 3484 | break; | 
|---|
| [2] | 3485 |  | 
|---|
| [551] | 3486 | case SB_PAGELEFT: | 
|---|
|  | 3487 | if (pAD->horzscroll < 0) { | 
|---|
|  | 3488 | pAD->horzscroll += rectl.xRight; | 
|---|
|  | 3489 | if (pAD->horzscroll > 0) | 
|---|
|  | 3490 | pAD->horzscroll = 0; | 
|---|
|  | 3491 | } | 
|---|
|  | 3492 | break; | 
|---|
| [2] | 3493 |  | 
|---|
| [551] | 3494 | case SB_LINERIGHT: | 
|---|
|  | 3495 | if (abs(pAD->horzscroll) < pAD->maxx - rectl.xRight) | 
|---|
|  | 3496 | pAD->horzscroll -= pAD->fattrs.lAveCharWidth; | 
|---|
|  | 3497 | break; | 
|---|
| [2] | 3498 |  | 
|---|
| [551] | 3499 | case SB_LINELEFT: | 
|---|
|  | 3500 | if (pAD->horzscroll < 0) | 
|---|
|  | 3501 | pAD->horzscroll += pAD->fattrs.lAveCharWidth; | 
|---|
|  | 3502 | break; | 
|---|
| [2] | 3503 |  | 
|---|
| [551] | 3504 | case SB_SLIDERTRACK: | 
|---|
|  | 3505 | pAD->horzscroll = SHORT1FROMMP(mp2); | 
|---|
|  | 3506 | pAD->horzscroll = -(pAD->horzscroll); | 
|---|
|  | 3507 | if (pAD->horzscroll > 0) | 
|---|
|  | 3508 | pAD->horzscroll = 0; | 
|---|
|  | 3509 | if (abs(pAD->horzscroll) > pAD->maxx - rectl.xRight) | 
|---|
|  | 3510 | pAD->horzscroll = -(pAD->maxx - rectl.xRight); | 
|---|
|  | 3511 | break; | 
|---|
| [2] | 3512 |  | 
|---|
| [551] | 3513 | default: | 
|---|
|  | 3514 | invalidate = FALSE; | 
|---|
|  | 3515 | break; | 
|---|
| [2] | 3516 | } | 
|---|
| [551] | 3517 | if (invalidate) | 
|---|
|  | 3518 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3519 | } | 
|---|
|  | 3520 | break; | 
|---|
| [2] | 3521 |  | 
|---|
| [551] | 3522 | case WM_VSCROLL: | 
|---|
| [2] | 3523 | // fprintf(stderr,"Seeall: WM_VSCROLL\n"); | 
|---|
| [551] | 3524 | if (pAD && !pAD->stopflag && | 
|---|
|  | 3525 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
| [2] | 3526 |  | 
|---|
| [551] | 3527 | ULONG numlines, wascursored; | 
|---|
|  | 3528 | RECTL rcl; | 
|---|
| [2] | 3529 |  | 
|---|
| [551] | 3530 | if (pAD->afifiles) { | 
|---|
|  | 3531 | WinQueryWindowRect(hwnd, &rcl); | 
|---|
|  | 3532 | numlines = NumLines(&rcl, pAD); | 
|---|
|  | 3533 | if (numlines) { | 
|---|
|  | 3534 | wascursored = pAD->cursored; | 
|---|
|  | 3535 | switch (SHORT2FROMMP(mp2)) { | 
|---|
|  | 3536 | case SB_PAGEUP: | 
|---|
|  | 3537 | if (pAD->topfile > 1) { | 
|---|
|  | 3538 | pAD->topfile -= numlines; | 
|---|
|  | 3539 | if (pAD->topfile > pAD->afifiles || | 
|---|
|  | 3540 | pAD->topfile > (pAD->afifiles + 1) - numlines) | 
|---|
|  | 3541 | pAD->topfile = 1; | 
|---|
|  | 3542 | if (pAD->cursored > pAD->topfile + numlines) | 
|---|
|  | 3543 | pAD->cursored = pAD->topfile + numlines; | 
|---|
|  | 3544 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3545 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3546 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3547 | } | 
|---|
|  | 3548 | break; | 
|---|
|  | 3549 | case SB_PAGEDOWN: | 
|---|
|  | 3550 | if (pAD->topfile <= pAD->afifiles - numlines) { | 
|---|
|  | 3551 | pAD->topfile += numlines; | 
|---|
|  | 3552 | if (pAD->topfile > (pAD->afifiles + 1) - numlines) | 
|---|
|  | 3553 | pAD->topfile = (pAD->afifiles + 1) - numlines; | 
|---|
|  | 3554 | if (pAD->cursored < pAD->topfile) | 
|---|
|  | 3555 | pAD->cursored = pAD->topfile; | 
|---|
|  | 3556 | if (pAD->cursored > (pAD->topfile + numlines) - 1) | 
|---|
|  | 3557 | pAD->cursored = (pAD->topfile + numlines) - 1; | 
|---|
|  | 3558 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3559 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3560 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3561 | } | 
|---|
|  | 3562 | break; | 
|---|
|  | 3563 | case SB_LINEDOWN: | 
|---|
|  | 3564 | if (pAD->topfile <= pAD->afifiles - numlines) { | 
|---|
| [2] | 3565 |  | 
|---|
| [551] | 3566 | RECTL Rectl, iRectl; | 
|---|
| [2] | 3567 |  | 
|---|
| [551] | 3568 | pAD->topfile++; | 
|---|
|  | 3569 | if (pAD->cursored < pAD->topfile) | 
|---|
|  | 3570 | pAD->cursored = pAD->topfile; | 
|---|
|  | 3571 | else if (pAD->cursored > (pAD->topfile + numlines) - 1) | 
|---|
|  | 3572 | pAD->cursored = (pAD->topfile + numlines) - 1; | 
|---|
|  | 3573 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3574 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3575 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3576 | WinScrollWindow(hwnd, 0, pAD->lMaxHeight, | 
|---|
|  | 3577 | NULL, NULL, NULLHANDLE, &iRectl, 0); | 
|---|
|  | 3578 | WinFillRect(pAD->hps, &iRectl, | 
|---|
|  | 3579 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3580 | PaintLine(hwnd, pAD->hps, (pAD->topfile + numlines) - 2, | 
|---|
|  | 3581 | pAD->topfile, &Rectl); | 
|---|
|  | 3582 | if (pAD->cursored != pAD->topfile + numlines) | 
|---|
|  | 3583 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 3584 | &Rectl); | 
|---|
|  | 3585 | if (wascursored != pAD->cursored | 
|---|
|  | 3586 | && wascursored < pAD->topfile + numlines | 
|---|
|  | 3587 | && wascursored >= pAD->topfile) | 
|---|
|  | 3588 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, | 
|---|
|  | 3589 | &Rectl); | 
|---|
|  | 3590 | if (wascursored != pAD->cursored) | 
|---|
|  | 3591 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 3592 | WinSendMsg(pAD->hhscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3593 | MPFROMSHORT((SHORT) abs(pAD->horzscroll)), | 
|---|
|  | 3594 | MPFROM2SHORT(0, (SHORT) (pAD->maxx - Rectl.xRight))); | 
|---|
|  | 3595 | WinSendMsg(pAD->hvscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3596 | MPFROMSHORT((SHORT) (pAD->topfile / | 
|---|
|  | 3597 | pAD->multiplier)), | 
|---|
|  | 3598 | MPFROM2SHORT(1, (SHORT) (pAD->afifiles / | 
|---|
|  | 3599 | pAD->multiplier) - | 
|---|
|  | 3600 | (numlines - 1))); | 
|---|
|  | 3601 | } | 
|---|
|  | 3602 | break; | 
|---|
|  | 3603 | case SB_LINEUP: | 
|---|
|  | 3604 | if (pAD->topfile > 1) { | 
|---|
| [2] | 3605 |  | 
|---|
| [551] | 3606 | RECTL Rectl, iRectl; | 
|---|
| [2] | 3607 |  | 
|---|
| [551] | 3608 | pAD->topfile--; | 
|---|
|  | 3609 | if (pAD->cursored < pAD->topfile) | 
|---|
|  | 3610 | pAD->cursored = pAD->topfile; | 
|---|
|  | 3611 | else if (pAD->cursored > (pAD->topfile + numlines) - 1) | 
|---|
|  | 3612 | pAD->cursored = (pAD->topfile + numlines) - 1; | 
|---|
|  | 3613 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3614 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3615 | WinQueryWindowRect(hwnd, &Rectl); | 
|---|
|  | 3616 | WinScrollWindow(hwnd, 0, -pAD->lMaxHeight, | 
|---|
|  | 3617 | NULL, NULL, NULLHANDLE, &iRectl, 0); | 
|---|
|  | 3618 | WinFillRect(pAD->hps, &iRectl, | 
|---|
|  | 3619 | standardcolors[Colors[COLORS_NORMALBACK]]); | 
|---|
|  | 3620 | iRectl = Rectl; | 
|---|
|  | 3621 | iRectl.yTop -= ((numlines * pAD->lMaxHeight) + | 
|---|
|  | 3622 | pAD->lMaxDescender); | 
|---|
|  | 3623 | WinFillRect(pAD->hps, &iRectl, | 
|---|
|  | 3624 | standardcolors[pAD->aulColors[COLORS_NORMALBACK]]); | 
|---|
|  | 3625 | PaintLine(hwnd, pAD->hps, pAD->topfile - 1, pAD->topfile, | 
|---|
|  | 3626 | &Rectl); | 
|---|
|  | 3627 | if (pAD->cursored != pAD->topfile) | 
|---|
|  | 3628 | PaintLine(hwnd, pAD->hps, pAD->cursored - 1, pAD->topfile, | 
|---|
|  | 3629 | &Rectl); | 
|---|
|  | 3630 | if (pAD->cursored != wascursored && wascursored >= pAD->topfile | 
|---|
|  | 3631 | && wascursored < pAD->topfile + numlines) | 
|---|
|  | 3632 | PaintLine(hwnd, pAD->hps, wascursored - 1, pAD->topfile, | 
|---|
|  | 3633 | &Rectl); | 
|---|
|  | 3634 | if (pAD->cursored != wascursored) | 
|---|
|  | 3635 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 3636 | WinSendMsg(pAD->hhscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3637 | MPFROMSHORT((SHORT) abs(pAD->horzscroll)), | 
|---|
|  | 3638 | MPFROM2SHORT(0, (SHORT) (pAD->maxx - Rectl.xRight))); | 
|---|
|  | 3639 | WinSendMsg(pAD->hvscroll, SBM_SETSCROLLBAR, | 
|---|
|  | 3640 | MPFROMSHORT((SHORT) (pAD->topfile / | 
|---|
|  | 3641 | pAD->multiplier)), | 
|---|
|  | 3642 | MPFROM2SHORT(1, (SHORT) (pAD->afifiles / | 
|---|
|  | 3643 | pAD->multiplier) - | 
|---|
|  | 3644 | (numlines - 1))); | 
|---|
| [84] | 3645 | } | 
|---|
| [551] | 3646 | break; | 
|---|
|  | 3647 | case SB_SLIDERTRACK: | 
|---|
|  | 3648 | if ((SHORT1FROMMP(mp2) >= 1) || | 
|---|
|  | 3649 | (SHORT1FROMMP(mp2)) <= pAD->afifiles) { | 
|---|
|  | 3650 | pAD->topfile = (ULONG) SHORT1FROMMP(mp2) * pAD->multiplier; | 
|---|
|  | 3651 | if (pAD->topfile > (pAD->afifiles + 1) - numlines) | 
|---|
|  | 3652 | pAD->topfile = (pAD->afifiles + 1) - numlines; | 
|---|
|  | 3653 | if (!pAD->topfile) | 
|---|
|  | 3654 | pAD->topfile = 1; | 
|---|
|  | 3655 | if (pAD->cursored < pAD->topfile) | 
|---|
|  | 3656 | pAD->cursored = pAD->topfile; | 
|---|
|  | 3657 | else if (pAD->cursored > pAD->topfile + numlines) | 
|---|
|  | 3658 | pAD->cursored = pAD->topfile + numlines; | 
|---|
|  | 3659 | if (pAD->cursored > pAD->afifiles) | 
|---|
|  | 3660 | pAD->cursored = pAD->afifiles; | 
|---|
|  | 3661 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3662 | } | 
|---|
|  | 3663 | else | 
|---|
|  | 3664 | WinAlarm(HWND_DESKTOP, WA_NOTE); | 
|---|
|  | 3665 | break; | 
|---|
| [84] | 3666 | } | 
|---|
|  | 3667 | } | 
|---|
| [2] | 3668 | } | 
|---|
| [551] | 3669 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3670 | } | 
|---|
|  | 3671 | break; | 
|---|
| [2] | 3672 |  | 
|---|
| [551] | 3673 | case WM_INITMENU: | 
|---|
|  | 3674 | if (pAD) { | 
|---|
|  | 3675 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 3676 | case IDM_FILESMENU: | 
|---|
|  | 3677 | { | 
|---|
|  | 3678 | APIRET rc; | 
|---|
| [2] | 3679 |  | 
|---|
| [551] | 3680 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 3681 | WinEnableMenuItem((HWND) mp2, IDM_DUPES, (rc == 0)); | 
|---|
|  | 3682 | WinEnableMenuItem((HWND) mp2, IDM_COLLECT, (rc == 0 && | 
|---|
| [84] | 3683 | pAD->selected != 0)); | 
|---|
| [551] | 3684 | WinEnableMenuItem((HWND) mp2, IDM_SAVETOCLIP, (rc == 0 && | 
|---|
|  | 3685 | pAD->selected != 0)); | 
|---|
|  | 3686 | WinEnableMenuItem((HWND) mp2, IDM_APPENDTOCLIP, (rc == 0 && | 
|---|
|  | 3687 | pAD->selected != | 
|---|
|  | 3688 | 0)); | 
|---|
|  | 3689 | WinEnableMenuItem((HWND) mp2, IDM_SAVETOLIST, | 
|---|
|  | 3690 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3691 | WinEnableMenuItem((HWND) mp2, IDM_REMOVE, | 
|---|
|  | 3692 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3693 | WinEnableMenuItem((HWND) mp2, IDM_HIDEALL, | 
|---|
|  | 3694 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3695 | WinEnableMenuItem((HWND) mp2, IDM_DELETESUBMENU, | 
|---|
|  | 3696 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3697 | WinEnableMenuItem((HWND) mp2, IDM_INFO, | 
|---|
|  | 3698 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3699 | WinEnableMenuItem((HWND) mp2, IDM_ATTRS, | 
|---|
|  | 3700 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3701 | WinEnableMenuItem((HWND) mp2, IDM_EAS, | 
|---|
|  | 3702 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3703 | WinEnableMenuItem((HWND) mp2, IDM_UUDECODE, | 
|---|
|  | 3704 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3705 | WinEnableMenuItem((HWND) mp2, IDM_EXTRACT, | 
|---|
|  | 3706 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3707 | WinEnableMenuItem((HWND) mp2, IDM_ARCHIVE, | 
|---|
|  | 3708 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3709 | WinEnableMenuItem((HWND) mp2, IDM_MOVEMENU, | 
|---|
|  | 3710 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3711 | WinEnableMenuItem((HWND) mp2, IDM_COPYMENU, | 
|---|
|  | 3712 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3713 | WinEnableMenuItem((HWND) mp2, IDM_RENAME, | 
|---|
|  | 3714 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3715 | WinEnableMenuItem((HWND) mp2, IDM_PRINT, | 
|---|
|  | 3716 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3717 | WinEnableMenuItem((HWND) mp2, IDM_SUBJECT, | 
|---|
|  | 3718 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3719 | WinEnableMenuItem((HWND) mp2, IDM_OPENSUBMENU, | 
|---|
|  | 3720 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3721 | WinEnableMenuItem((HWND) mp2, IDM_OBJECTSUBMENU, | 
|---|
|  | 3722 | (rc == 0 && pAD->selected != 0)); | 
|---|
|  | 3723 | if (!rc) | 
|---|
|  | 3724 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3725 | } | 
|---|
|  | 3726 | break; | 
|---|
| [2] | 3727 |  | 
|---|
| [551] | 3728 | case IDM_SELECTSUBMENU: | 
|---|
|  | 3729 | { | 
|---|
|  | 3730 | APIRET rc; | 
|---|
| [2] | 3731 |  | 
|---|
| [551] | 3732 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 3733 | WinEnableMenuItem((HWND) mp2, IDM_SELECTALL, (rc == 0 && | 
|---|
|  | 3734 | pAD->afifiles != 0 && | 
|---|
|  | 3735 | (pAD->afifiles != | 
|---|
|  | 3736 | pAD->selected || | 
|---|
|  | 3737 | !pAD->selected))); | 
|---|
|  | 3738 | WinEnableMenuItem((HWND) mp2, IDM_SELECTMASK, (rc == 0 && | 
|---|
| [84] | 3739 | pAD->afifiles != 0 && | 
|---|
|  | 3740 | (pAD->afifiles != | 
|---|
| [551] | 3741 | pAD->selected || | 
|---|
|  | 3742 | !pAD->selected))); | 
|---|
|  | 3743 | WinEnableMenuItem((HWND) mp2, IDM_DESELECTALL, (rc == 0 && | 
|---|
|  | 3744 | pAD->afifiles != 0 | 
|---|
|  | 3745 | && pAD->selected)); | 
|---|
|  | 3746 | WinEnableMenuItem((HWND) mp2, IDM_DESELECTMASK, | 
|---|
|  | 3747 | (rc == 0 && pAD->afifiles != 0) && pAD->selected); | 
|---|
|  | 3748 | WinEnableMenuItem((HWND) mp2, IDM_INVERT, | 
|---|
|  | 3749 | (rc == 0 && pAD->afifiles != 0)); | 
|---|
|  | 3750 | if (!rc) | 
|---|
|  | 3751 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3752 | } | 
|---|
|  | 3753 | break; | 
|---|
| [2] | 3754 |  | 
|---|
| [551] | 3755 | case IDM_SORTSUBMENU: | 
|---|
|  | 3756 | { | 
|---|
|  | 3757 | APIRET rc; | 
|---|
| [2] | 3758 |  | 
|---|
| [551] | 3759 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 3760 | WinEnableMenuItem((HWND) mp2, IDM_SORTNAME, (rc == 0)); | 
|---|
|  | 3761 | WinEnableMenuItem((HWND) mp2, IDM_SORTEASIZE, (rc == 0)); | 
|---|
|  | 3762 | WinEnableMenuItem((HWND) mp2, IDM_SORTSIZE, (rc == 0)); | 
|---|
|  | 3763 | WinEnableMenuItem((HWND) mp2, IDM_SORTLWDATE, (rc == 0)); | 
|---|
|  | 3764 | WinEnableMenuItem((HWND) mp2, IDM_SORTFILENAME, (rc == 0)); | 
|---|
|  | 3765 | WinEnableMenuItem((HWND) mp2, IDM_SORTFIRST, (rc == 0)); | 
|---|
|  | 3766 | if (!rc) | 
|---|
|  | 3767 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3768 | } | 
|---|
|  | 3769 | WinCheckMenuItem((HWND) mp2, IDM_SORTNAME, | 
|---|
|  | 3770 | (pAD->pfnCompare == comparefullnames)); | 
|---|
|  | 3771 | WinCheckMenuItem((HWND) mp2, IDM_SORTEASIZE, | 
|---|
|  | 3772 | (pAD->pfnCompare == (PFNSORT) NULL)); | 
|---|
|  | 3773 | WinCheckMenuItem((HWND) mp2, IDM_SORTSIZE, | 
|---|
|  | 3774 | (pAD->pfnCompare == comparesizes)); | 
|---|
|  | 3775 | WinCheckMenuItem((HWND) mp2, IDM_SORTLWDATE, | 
|---|
|  | 3776 | (pAD->pfnCompare == comparedates)); | 
|---|
|  | 3777 | WinCheckMenuItem((HWND) mp2, IDM_SORTFILENAME, | 
|---|
|  | 3778 | (pAD->pfnCompare == comparenames)); | 
|---|
|  | 3779 | WinCheckMenuItem((HWND) mp2, IDM_SORTREVERSE, pAD->invertsort); | 
|---|
|  | 3780 | WinCheckMenuItem((HWND) mp2, IDM_SORTFIRST, | 
|---|
|  | 3781 | (pAD->pfnCompare == compareexts)); | 
|---|
|  | 3782 | break; | 
|---|
| [2] | 3783 |  | 
|---|
| [551] | 3784 | case IDM_VIEWSMENU: | 
|---|
|  | 3785 | { | 
|---|
|  | 3786 | APIRET rc; | 
|---|
| [2] | 3787 |  | 
|---|
| [551] | 3788 | rc = DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN); | 
|---|
|  | 3789 | WinEnableMenuItem((HWND) mp2, IDM_RESCAN, (rc == 0)); | 
|---|
|  | 3790 | WinEnableMenuItem((HWND) mp2, IDM_FILTER, (rc == 0 && | 
|---|
|  | 3791 | pAD->affiles != 0)); | 
|---|
|  | 3792 | if (!rc) | 
|---|
|  | 3793 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
| [84] | 3794 | } | 
|---|
| [551] | 3795 | WinCheckMenuItem((HWND) mp2, IDM_SHOWLNAMES, pAD->fullnames); | 
|---|
|  | 3796 | break; | 
|---|
| [2] | 3797 | } | 
|---|
| [551] | 3798 | } | 
|---|
|  | 3799 | break; | 
|---|
|  | 3800 |  | 
|---|
|  | 3801 | case WM_COMMAND: | 
|---|
|  | 3802 | if (!pAD) | 
|---|
|  | 3803 | return 0; | 
|---|
|  | 3804 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 3805 | case IDM_SETTARGET: | 
|---|
|  | 3806 | SetTargetDir(hwnd, FALSE); | 
|---|
| [2] | 3807 | break; | 
|---|
|  | 3808 |  | 
|---|
| [551] | 3809 | case IDM_DUPES: | 
|---|
|  | 3810 | if (!pAD->stopflag && | 
|---|
|  | 3811 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 3812 | pAD->dupeflags = (USHORT) WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 3813 | hwnd, | 
|---|
|  | 3814 | DupeDlgProc, | 
|---|
|  | 3815 | FM3ModHandle, | 
|---|
|  | 3816 | DUPE_FRAME, | 
|---|
|  | 3817 | MPFROM2SHORT(pAD->dupeflags, 0)); | 
|---|
|  | 3818 | if (pAD->dupeflags) { | 
|---|
|  | 3819 | if (_beginthread(FindDupes, NULL, 65536, (PVOID) hwnd) == -1) | 
|---|
|  | 3820 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 3821 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 3822 | } | 
|---|
|  | 3823 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3824 | } | 
|---|
|  | 3825 | break; | 
|---|
| [2] | 3826 |  | 
|---|
| [551] | 3827 | case IDM_COLORPALETTE: | 
|---|
|  | 3828 | { | 
|---|
|  | 3829 | COLORS co; | 
|---|
|  | 3830 | LONG temp[COLORS_MAX]; | 
|---|
| [2] | 3831 |  | 
|---|
| [551] | 3832 | memset(&co, 0, sizeof(co)); | 
|---|
|  | 3833 | co.size = sizeof(co); | 
|---|
|  | 3834 | co.numcolors = COLORS_MAX; | 
|---|
|  | 3835 | co.colors = pAD->aulColors; | 
|---|
|  | 3836 | co.descriptions = IDS_SACOLORS1TEXT; | 
|---|
|  | 3837 | co.origs = temp; | 
|---|
|  | 3838 | co.prompt = IDS_SACOLORSPROMPTTEXT; | 
|---|
|  | 3839 | memcpy(temp, pAD->aulColors, sizeof(LONG) * COLORS_MAX); | 
|---|
|  | 3840 | if (WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 3841 | hwnd, | 
|---|
|  | 3842 | ColorDlgProc, | 
|---|
|  | 3843 | FM3ModHandle, COLOR_FRAME, (PVOID) & co)) { | 
|---|
|  | 3844 | memcpy(Colors, pAD->aulColors, sizeof(LONG) * COLORS_MAX); | 
|---|
|  | 3845 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3846 | appname, | 
|---|
|  | 3847 | "Seeall.Colors", | 
|---|
|  | 3848 | &pAD->aulColors, sizeof(LONG) * COLORS_MAX); | 
|---|
|  | 3849 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3850 | } | 
|---|
|  | 3851 | } | 
|---|
|  | 3852 | break; | 
|---|
| [2] | 3853 |  | 
|---|
| [551] | 3854 | case IDM_CODEPAGE: | 
|---|
|  | 3855 | { | 
|---|
|  | 3856 | INT cp; | 
|---|
| [2] | 3857 |  | 
|---|
| [551] | 3858 | cp = PickCodepage(hwnd); | 
|---|
|  | 3859 | if (cp != -1) { | 
|---|
|  | 3860 | pAD->fattrs.usCodePage = (USHORT) cp; | 
|---|
|  | 3861 | Codepage = pAD->fattrs.usCodePage; | 
|---|
| [84] | 3862 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3863 | appname, | 
|---|
| [551] | 3864 | "Seeall.Codepage", | 
|---|
|  | 3865 | &pAD->fattrs.usCodePage, sizeof(USHORT)); | 
|---|
|  | 3866 | GpiDeleteSetId(pAD->hps, FIXED_FONT_LCID); | 
|---|
|  | 3867 | GpiAssociate(pAD->hps, 0); | 
|---|
| [84] | 3868 | GpiDestroyPS(pAD->hps); | 
|---|
|  | 3869 | pAD->hps = InitWindow(hwnd); | 
|---|
|  | 3870 | pAD->maxx = pAD->horzscroll = 0; | 
|---|
| [551] | 3871 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3872 | } | 
|---|
|  | 3873 | } | 
|---|
|  | 3874 | break; | 
|---|
| [2] | 3875 |  | 
|---|
| [551] | 3876 | case IDM_FONTPALETTE: | 
|---|
|  | 3877 | SetMLEFont(hwnd, &pAD->fattrs, 11); | 
|---|
|  | 3878 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3879 | appname, | 
|---|
|  | 3880 | "Seeall.Fattrs", &pAD->fattrs, sizeof(pAD->fattrs)); | 
|---|
|  | 3881 | Fattrs = pAD->fattrs; | 
|---|
|  | 3882 | GpiDeleteSetId(pAD->hps, FIXED_FONT_LCID); | 
|---|
|  | 3883 | GpiAssociate(pAD->hps, 0); | 
|---|
|  | 3884 | GpiDestroyPS(pAD->hps); | 
|---|
|  | 3885 | pAD->hps = InitWindow(hwnd); | 
|---|
|  | 3886 | pAD->maxx = pAD->horzscroll = 0; | 
|---|
|  | 3887 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3888 | break; | 
|---|
|  | 3889 |  | 
|---|
|  | 3890 | case IDM_SHOWLNAMES: | 
|---|
|  | 3891 | pAD->fullnames = (pAD->fullnames) ? FALSE : TRUE; | 
|---|
|  | 3892 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3893 | appname, | 
|---|
|  | 3894 | "Seeall.Fullnames", &pAD->fullnames, sizeof(BOOL)); | 
|---|
|  | 3895 | Fullnames = pAD->fullnames; | 
|---|
|  | 3896 | pAD->maxx = pAD->horzscroll = 0; | 
|---|
|  | 3897 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3898 | break; | 
|---|
|  | 3899 |  | 
|---|
|  | 3900 | case IDM_SORTREVERSE: | 
|---|
|  | 3901 | pAD->invertsort = (pAD->invertsort) ? FALSE : TRUE; | 
|---|
|  | 3902 | SortReverse = pAD->invertsort; | 
|---|
|  | 3903 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3904 | appname, | 
|---|
|  | 3905 | "Seeall.SortReverse", | 
|---|
|  | 3906 | (PVOID) & pAD->invertsort, sizeof(BOOL)); | 
|---|
|  | 3907 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3908 | break; | 
|---|
|  | 3909 |  | 
|---|
|  | 3910 | case IDM_SORTEASIZE: | 
|---|
|  | 3911 | case IDM_SORTNAME: | 
|---|
|  | 3912 | case IDM_SORTFILENAME: | 
|---|
|  | 3913 | case IDM_SORTSIZE: | 
|---|
|  | 3914 | case IDM_SORTLWDATE: | 
|---|
|  | 3915 | case IDM_SORTFIRST: | 
|---|
|  | 3916 | if (!pAD->stopflag && | 
|---|
|  | 3917 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 3918 | { | 
|---|
|  | 3919 | USHORT dummy = SHORT1FROMMP(mp1); | 
|---|
|  | 3920 |  | 
|---|
| [84] | 3921 | PrfWriteProfileData(fmprof, | 
|---|
|  | 3922 | appname, | 
|---|
| [551] | 3923 | "Seeall.Sort", (PVOID) & dummy, sizeof(USHORT)); | 
|---|
|  | 3924 | SortType = SHORT1FROMMP(mp1); | 
|---|
|  | 3925 | } | 
|---|
|  | 3926 | WinSetPointer(HWND_DESKTOP, hptrBusy); | 
|---|
|  | 3927 | WinSendMsg(hwnd, UM_RESCAN, MPFROMLONG(1L), MPVOID); | 
|---|
|  | 3928 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 3929 | case IDM_SORTEASIZE: | 
|---|
|  | 3930 | pAD->pfnCompare = (PFNSORT) NULL; | 
|---|
|  | 3931 | ReSort(hwnd); | 
|---|
| [84] | 3932 | break; | 
|---|
| [2] | 3933 |  | 
|---|
| [551] | 3934 | case IDM_SORTNAME: | 
|---|
|  | 3935 | pAD->pfnCompare = comparefullnames; | 
|---|
|  | 3936 | ReSort(hwnd); | 
|---|
| [84] | 3937 | break; | 
|---|
| [2] | 3938 |  | 
|---|
| [84] | 3939 | case IDM_SORTFILENAME: | 
|---|
| [551] | 3940 | pAD->pfnCompare = comparenames; | 
|---|
|  | 3941 | ReSort(hwnd); | 
|---|
|  | 3942 | break; | 
|---|
|  | 3943 |  | 
|---|
| [84] | 3944 | case IDM_SORTSIZE: | 
|---|
| [551] | 3945 | pAD->pfnCompare = comparesizes; | 
|---|
|  | 3946 | ReSort(hwnd); | 
|---|
|  | 3947 | break; | 
|---|
|  | 3948 |  | 
|---|
| [84] | 3949 | case IDM_SORTLWDATE: | 
|---|
| [551] | 3950 | pAD->pfnCompare = comparedates; | 
|---|
|  | 3951 | ReSort(hwnd); | 
|---|
|  | 3952 | break; | 
|---|
|  | 3953 |  | 
|---|
| [84] | 3954 | case IDM_SORTFIRST: | 
|---|
| [551] | 3955 | pAD->pfnCompare = compareexts; | 
|---|
|  | 3956 | ReSort(hwnd); | 
|---|
|  | 3957 | break; | 
|---|
|  | 3958 | } | 
|---|
|  | 3959 | WinSetPointer(HWND_DESKTOP, hptrArrow); | 
|---|
|  | 3960 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3961 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 3962 | } | 
|---|
|  | 3963 | break; | 
|---|
| [2] | 3964 |  | 
|---|
| [551] | 3965 | case IDM_FILTER: | 
|---|
|  | 3966 | if (!pAD->stopflag && | 
|---|
|  | 3967 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 3968 | FilterList(hwnd); | 
|---|
|  | 3969 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 3970 | } | 
|---|
|  | 3971 | break; | 
|---|
| [2] | 3972 |  | 
|---|
| [551] | 3973 | case IDM_RESCAN: | 
|---|
|  | 3974 | if (!pAD->stopflag && | 
|---|
|  | 3975 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
| [2] | 3976 |  | 
|---|
| [551] | 3977 | CHAR tempflags[26]; | 
|---|
| [2] | 3978 |  | 
|---|
| [551] | 3979 | memcpy(tempflags, pAD->abDrvFlags, sizeof(tempflags)); | 
|---|
|  | 3980 | if (!WinDlgBox(HWND_DESKTOP, hwnd, AFDrvsWndProc, FM3ModHandle, | 
|---|
|  | 3981 | DRVS_FRAME, (PVOID) pAD)) { | 
|---|
|  | 3982 | memcpy(pAD->abDrvFlags, tempflags, sizeof(tempflags)); | 
|---|
|  | 3983 | *pAD->szFindPath = 0; | 
|---|
|  | 3984 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
| [84] | 3985 | break; | 
|---|
| [551] | 3986 | } | 
|---|
|  | 3987 | WinSendMsg(pAD->hhscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), | 
|---|
|  | 3988 | MPVOID); | 
|---|
|  | 3989 | WinSendMsg(pAD->hvscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(1, 1), | 
|---|
|  | 3990 | MPVOID); | 
|---|
|  | 3991 | pAD->topfile = 1; | 
|---|
|  | 3992 | pAD->cursored = 1; | 
|---|
|  | 3993 | pAD->selected = 0; | 
|---|
|  | 3994 | pAD->ullSelectedBytes = 0; | 
|---|
|  | 3995 | pAD->maxx = pAD->horzscroll = 0; | 
|---|
|  | 3996 | FreeAllFilesList(hwnd); | 
|---|
|  | 3997 | pAD->stopflag = 0; | 
|---|
|  | 3998 | if (_beginthread(FindAllThread, NULL, 524288, (PVOID) hwnd) == -1) { | 
|---|
|  | 3999 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 4000 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 4001 | WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 4002 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 4003 | } | 
|---|
|  | 4004 | else { | 
|---|
|  | 4005 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
|  | 4006 | DosSleep(100); | 
|---|
|  | 4007 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 4008 | PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID); | 
|---|
|  | 4009 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 4010 | } | 
|---|
|  | 4011 | } | 
|---|
|  | 4012 | break; | 
|---|
| [2] | 4013 |  | 
|---|
| [551] | 4014 | case IDM_DELETE: | 
|---|
|  | 4015 | case IDM_PERMDELETE: | 
|---|
|  | 4016 | case IDM_SELECTALL: | 
|---|
|  | 4017 | case IDM_DESELECTALL: | 
|---|
|  | 4018 | case IDM_INVERT: | 
|---|
|  | 4019 | case IDM_SELECTMASK: | 
|---|
|  | 4020 | case IDM_DESELECTMASK: | 
|---|
|  | 4021 | case IDM_REMOVE: | 
|---|
|  | 4022 | case IDM_HIDEALL: | 
|---|
|  | 4023 | case IDM_COLLECT: | 
|---|
|  | 4024 | case IDM_COLLECTOR: | 
|---|
|  | 4025 | case IDM_SAVETOCLIP: | 
|---|
|  | 4026 | case IDM_APPENDTOCLIP: | 
|---|
|  | 4027 | case IDM_SAVETOLIST: | 
|---|
|  | 4028 | case IDM_INFO: | 
|---|
|  | 4029 | case IDM_ATTRS: | 
|---|
|  | 4030 | case IDM_MOVE: | 
|---|
|  | 4031 | case IDM_COPY: | 
|---|
|  | 4032 | case IDM_RENAME: | 
|---|
|  | 4033 | case IDM_MOVEPRESERVE: | 
|---|
|  | 4034 | case IDM_COPYPRESERVE: | 
|---|
|  | 4035 | case IDM_WILDMOVE: | 
|---|
|  | 4036 | case IDM_WILDCOPY: | 
|---|
|  | 4037 | case IDM_SUBJECT: | 
|---|
|  | 4038 | case IDM_EAS: | 
|---|
|  | 4039 | case IDM_PRINT: | 
|---|
|  | 4040 | case IDM_ARCHIVE: | 
|---|
|  | 4041 | case IDM_EXTRACT: | 
|---|
|  | 4042 | case IDM_UUDECODE: | 
|---|
|  | 4043 | case IDM_SHADOW: | 
|---|
|  | 4044 | case IDM_OBJECT: | 
|---|
|  | 4045 | case IDM_OPENSETTINGS: | 
|---|
|  | 4046 | case IDM_OPENDEFAULT: | 
|---|
|  | 4047 | if (!pAD->stopflag && | 
|---|
|  | 4048 | !DosRequestMutexSem(pAD->hmtxScan, SEM_IMMEDIATE_RETURN)) { | 
|---|
|  | 4049 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 4050 | case IDM_SELECTALL: | 
|---|
|  | 4051 | case IDM_DESELECTALL: | 
|---|
|  | 4052 | case IDM_INVERT: | 
|---|
|  | 4053 | case IDM_HIDEALL: | 
|---|
|  | 4054 | case IDM_REMOVE: | 
|---|
|  | 4055 | Mark(hwnd, (SHORT1FROMMP(mp1) == IDM_DESELECTALL) ? | 
|---|
|  | 4056 | AFM_UNMARK : (SHORT1FROMMP(mp1) == IDM_INVERT) ? | 
|---|
|  | 4057 | AFM_INVERT : (SHORT1FROMMP(mp1) == IDM_HIDEALL) ? | 
|---|
|  | 4058 | AFM_FILTER : (SHORT1FROMMP(mp1) == IDM_REMOVE) ? | 
|---|
|  | 4059 | AFM_MARKDELETED : 0, NULL); | 
|---|
|  | 4060 | if (SHORT1FROMMP(mp1) == IDM_REMOVE || | 
|---|
|  | 4061 | SHORT1FROMMP(mp1) == IDM_HIDEALL) { | 
|---|
|  | 4062 | if (SHORT1FROMMP(mp1) == IDM_REMOVE) | 
|---|
|  | 4063 | RemoveDeleted(hwnd); | 
|---|
|  | 4064 | else | 
|---|
|  | 4065 | ReSort(hwnd); | 
|---|
| [84] | 4066 | } | 
|---|
| [551] | 4067 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 4068 | break; | 
|---|
| [2] | 4069 |  | 
|---|
| [551] | 4070 | case IDM_SELECTMASK: | 
|---|
|  | 4071 | case IDM_DESELECTMASK: | 
|---|
|  | 4072 | SelectMask(hwnd, (SHORT1FROMMP(mp1) == IDM_DESELECTMASK)); | 
|---|
|  | 4073 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [84] | 4074 | break; | 
|---|
| [2] | 4075 |  | 
|---|
| [84] | 4076 | case IDM_DELETE: | 
|---|
|  | 4077 | case IDM_PERMDELETE: | 
|---|
| [551] | 4078 | case IDM_APPENDTOCLIP: | 
|---|
| [84] | 4079 | case IDM_SAVETOCLIP: | 
|---|
|  | 4080 | case IDM_SAVETOLIST: | 
|---|
| [551] | 4081 | case IDM_COLLECT: | 
|---|
| [84] | 4082 | case IDM_INFO: | 
|---|
|  | 4083 | case IDM_ATTRS: | 
|---|
|  | 4084 | case IDM_MOVE: | 
|---|
|  | 4085 | case IDM_COPY: | 
|---|
|  | 4086 | case IDM_RENAME: | 
|---|
|  | 4087 | case IDM_MOVEPRESERVE: | 
|---|
|  | 4088 | case IDM_COPYPRESERVE: | 
|---|
|  | 4089 | case IDM_WILDMOVE: | 
|---|
|  | 4090 | case IDM_WILDCOPY: | 
|---|
|  | 4091 | case IDM_SUBJECT: | 
|---|
| [551] | 4092 | case IDM_PRINT: | 
|---|
| [84] | 4093 | case IDM_EAS: | 
|---|
|  | 4094 | case IDM_ARCHIVE: | 
|---|
|  | 4095 | case IDM_EXTRACT: | 
|---|
|  | 4096 | case IDM_SHADOW: | 
|---|
|  | 4097 | case IDM_OBJECT: | 
|---|
|  | 4098 | case IDM_OPENSETTINGS: | 
|---|
|  | 4099 | case IDM_OPENDEFAULT: | 
|---|
| [551] | 4100 | case IDM_UUDECODE: | 
|---|
|  | 4101 | { | 
|---|
|  | 4102 | CHAR **list = BuildAList(hwnd); | 
|---|
| [2] | 4103 |  | 
|---|
| [551] | 4104 | if (!list) | 
|---|
|  | 4105 | Runtime_Error(pszSrcFile, __LINE__, "no data"); | 
|---|
|  | 4106 | else { | 
|---|
|  | 4107 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 4108 | case IDM_COLLECT: | 
|---|
|  | 4109 | CollectList(hwnd, list); | 
|---|
| [84] | 4110 | break; | 
|---|
|  | 4111 | case IDM_DELETE: | 
|---|
|  | 4112 | case IDM_PERMDELETE: | 
|---|
|  | 4113 | case IDM_APPENDTOCLIP: | 
|---|
|  | 4114 | case IDM_SAVETOCLIP: | 
|---|
|  | 4115 | case IDM_SAVETOLIST: | 
|---|
|  | 4116 | case IDM_INFO: | 
|---|
|  | 4117 | case IDM_ATTRS: | 
|---|
|  | 4118 | case IDM_MOVE: | 
|---|
|  | 4119 | case IDM_COPY: | 
|---|
|  | 4120 | case IDM_RENAME: | 
|---|
|  | 4121 | case IDM_MOVEPRESERVE: | 
|---|
|  | 4122 | case IDM_COPYPRESERVE: | 
|---|
|  | 4123 | case IDM_WILDMOVE: | 
|---|
|  | 4124 | case IDM_WILDCOPY: | 
|---|
|  | 4125 | case IDM_SUBJECT: | 
|---|
|  | 4126 | case IDM_PRINT: | 
|---|
|  | 4127 | case IDM_EAS: | 
|---|
|  | 4128 | case IDM_ARCHIVE: | 
|---|
|  | 4129 | case IDM_EXTRACT: | 
|---|
| [551] | 4130 | case IDM_UUDECODE: | 
|---|
|  | 4131 | case IDM_OBJECT: | 
|---|
| [84] | 4132 | case IDM_SHADOW: | 
|---|
|  | 4133 | case IDM_OPENSETTINGS: | 
|---|
|  | 4134 | case IDM_OPENDEFAULT: | 
|---|
| [551] | 4135 | if (!PostMsg(pAD->hwndObj, UM_MASSACTION, mp1, MPFROMP(list))) | 
|---|
|  | 4136 | FreeList(list); | 
|---|
| [84] | 4137 | break; | 
|---|
| [551] | 4138 | } | 
|---|
|  | 4139 | if (fUnHilite) { | 
|---|
|  | 4140 | Mark(hwnd, AFM_UNMARK, NULL); | 
|---|
|  | 4141 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 4142 | } | 
|---|
|  | 4143 | } | 
|---|
|  | 4144 | } | 
|---|
|  | 4145 | break; | 
|---|
| [2] | 4146 |  | 
|---|
| [551] | 4147 | case IDM_COLLECTOR: | 
|---|
|  | 4148 | if (mp2) { | 
|---|
| [2] | 4149 |  | 
|---|
| [551] | 4150 | CHAR **list = mp2; | 
|---|
| [2] | 4151 |  | 
|---|
| [551] | 4152 | if (Collector) { | 
|---|
|  | 4153 | if (!PostMsg(Collector, WM_COMMAND, | 
|---|
|  | 4154 | MPFROM2SHORT(IDM_COLLECTOR, 0), MPFROMP(list))) | 
|---|
|  | 4155 | FreeList(list); | 
|---|
|  | 4156 | else if (fUnHilite) { | 
|---|
|  | 4157 | Mark(hwnd, AFM_UNMARK, NULL); | 
|---|
|  | 4158 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
|  | 4159 | } | 
|---|
| [84] | 4160 | } | 
|---|
| [551] | 4161 | else | 
|---|
|  | 4162 | FreeList(list); | 
|---|
| [84] | 4163 | } | 
|---|
|  | 4164 | break; | 
|---|
| [551] | 4165 | } | 
|---|
|  | 4166 | DosReleaseMutexSem(pAD->hmtxScan); | 
|---|
| [2] | 4167 | } | 
|---|
| [551] | 4168 | else if (SHORT1FROMMP(mp1) == IDM_COLLECTOR) { | 
|---|
|  | 4169 | DosSleep(100L); | 
|---|
|  | 4170 | if (!PostMsg(hwnd, msg, mp1, mp2)) | 
|---|
|  | 4171 | WinSendMsg(hwnd, msg, mp1, mp2); | 
|---|
|  | 4172 | } | 
|---|
|  | 4173 | break; | 
|---|
| [2] | 4174 |  | 
|---|
| [551] | 4175 | case IDM_HELP: | 
|---|
|  | 4176 | if (hwndHelp) | 
|---|
|  | 4177 | WinSendMsg(hwndHelp, | 
|---|
|  | 4178 | HM_DISPLAY_HELP, | 
|---|
|  | 4179 | MPFROM2SHORT(HELP_SEEALL, 0), MPFROMSHORT(HM_RESOURCEID)); | 
|---|
| [2] | 4180 | break; | 
|---|
| [551] | 4181 | } | 
|---|
|  | 4182 | return 0; | 
|---|
| [2] | 4183 |  | 
|---|
| [551] | 4184 | case WM_SIZE: | 
|---|
|  | 4185 | // fprintf(stderr,"Seeall: WM_SIZE\n"); | 
|---|
|  | 4186 | PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID); | 
|---|
|  | 4187 | break; | 
|---|
|  | 4188 |  | 
|---|
|  | 4189 | case WM_CLOSE: | 
|---|
| [2] | 4190 | // fprintf(stderr,"Seeall: WM_CLOSE\n"); | 
|---|
| [551] | 4191 | if (pAD) | 
|---|
|  | 4192 | pAD->stopflag = 1; | 
|---|
|  | 4193 | WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 4194 | return 0; | 
|---|
| [2] | 4195 |  | 
|---|
| [551] | 4196 | case WM_DESTROY: | 
|---|
| [2] | 4197 | // fprintf(stderr,"Seeall: WM_DESTROY\n"); | 
|---|
| [551] | 4198 | if (pAD) { | 
|---|
|  | 4199 | pAD->stopflag = 1; | 
|---|
|  | 4200 | if (pAD->hmtxScan) { | 
|---|
|  | 4201 | DosRequestMutexSem(pAD->hmtxScan, 15000L); | 
|---|
|  | 4202 | DosCloseMutexSem(pAD->hmtxScan); | 
|---|
| [2] | 4203 | } | 
|---|
| [551] | 4204 | if (pAD->hwndPopup) | 
|---|
|  | 4205 | WinDestroyWindow(pAD->hwndPopup); | 
|---|
|  | 4206 | if (pAD->hwndObj) { | 
|---|
|  | 4207 | if (!PostMsg(pAD->hwndObj, WM_CLOSE, MPVOID, MPVOID)) | 
|---|
|  | 4208 | WinSendMsg(pAD->hwndObj, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 4209 | } | 
|---|
|  | 4210 | if (pAD->hps) { | 
|---|
|  | 4211 | GpiDeleteSetId(pAD->hps, FIXED_FONT_LCID); | 
|---|
|  | 4212 | GpiAssociate(pAD->hps, 0); | 
|---|
|  | 4213 | GpiDestroyPS(pAD->hps); | 
|---|
|  | 4214 | } | 
|---|
|  | 4215 | if (pAD->killme) { | 
|---|
|  | 4216 | if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID)) | 
|---|
|  | 4217 | WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 4218 | } | 
|---|
|  | 4219 | FreeAllFilesList(hwnd); | 
|---|
|  | 4220 | free(pAD); | 
|---|
|  | 4221 | } | 
|---|
|  | 4222 | break; | 
|---|
| [2] | 4223 | } | 
|---|
|  | 4224 |  | 
|---|
| [551] | 4225 | return WinDefWindowProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 4226 | } | 
|---|
|  | 4227 |  | 
|---|
| [551] | 4228 | HWND StartSeeAll(HWND hwndParent, BOOL standalone,      // called by applet | 
|---|
|  | 4229 | CHAR * pszStartPath)   // pathname or NULL | 
|---|
| [84] | 4230 | { | 
|---|
| [551] | 4231 | HWND hwndFrame = (HWND) 0, hwndClient; | 
|---|
|  | 4232 | ULONG FrameFlags = FCF_TITLEBAR | FCF_SYSMENU | | 
|---|
|  | 4233 | FCF_SIZEBORDER | FCF_MINMAX | | 
|---|
|  | 4234 | FCF_NOBYTEALIGN | FCF_VERTSCROLL | | 
|---|
|  | 4235 | FCF_MENU | FCF_ICON | FCF_ACCELTABLE | FCF_HORZSCROLL; | 
|---|
| [2] | 4236 |  | 
|---|
| [551] | 4237 | if (ParentIsDesktop(hwndParent, hwndParent)) | 
|---|
| [2] | 4238 | FrameFlags |= (FCF_TASKLIST | FCF_SHELLPOSITION); | 
|---|
|  | 4239 | hwndFrame = WinCreateStdWindow(hwndParent, | 
|---|
| [84] | 4240 | WS_VISIBLE, | 
|---|
|  | 4241 | &FrameFlags, | 
|---|
|  | 4242 | GetPString(IDS_WCSEEALL), | 
|---|
|  | 4243 | GetPString(IDS_SEEALLTITLETEXT), | 
|---|
|  | 4244 | WS_VISIBLE | fwsAnimate, | 
|---|
| [551] | 4245 | FM3ModHandle, SEEALL_FRAME, &hwndClient); | 
|---|
|  | 4246 | if (hwndFrame) { | 
|---|
|  | 4247 | static CHAR *pszDir; | 
|---|
|  | 4248 |  | 
|---|
|  | 4249 | if (standalone) { | 
|---|
|  | 4250 | if (!PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 4251 | UM_SETUP4, MPVOID, MPVOID)) { | 
|---|
|  | 4252 | PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 4253 | return (HWND) 0; | 
|---|
| [2] | 4254 | } | 
|---|
|  | 4255 | } | 
|---|
| [551] | 4256 | if (pszStartPath) { | 
|---|
| [84] | 4257 | // Needs to be static for other thread | 
|---|
|  | 4258 | if (!pszDir) | 
|---|
| [551] | 4259 | pszDir = xmalloc(CCHMAXPATH, pszSrcFile, __LINE__); | 
|---|
| [84] | 4260 | if (pszDir) { | 
|---|
|  | 4261 | strcpy(pszDir, pszStartPath); | 
|---|
|  | 4262 | pszStartPath = pszDir; | 
|---|
|  | 4263 | } | 
|---|
|  | 4264 | } | 
|---|
| [551] | 4265 | PostMsg(WinWindowFromID(hwndFrame, FID_CLIENT), | 
|---|
|  | 4266 | UM_SETUP5, MPFROMP(pszStartPath), MPVOID); | 
|---|
| [2] | 4267 | } | 
|---|
| [551] | 4268 | else if (standalone) | 
|---|
|  | 4269 | PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
| [2] | 4270 | return hwndFrame; | 
|---|
|  | 4271 | } | 
|---|