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