| [36] | 1 | /*********************************************************************** | 
|---|
|  | 2 |  | 
|---|
|  | 3 | $Id: treecnr.c 618 2007-04-20 19:19:03Z stevenhl $ | 
|---|
|  | 4 |  | 
|---|
|  | 5 | Tree containers | 
|---|
|  | 6 |  | 
|---|
|  | 7 | Copyright (c) 1993-98 M. Kimes | 
|---|
| [552] | 8 | Copyright (c) 2001, 2007 Steven H. Levine | 
|---|
| [36] | 9 |  | 
|---|
| [156] | 10 | 16 Oct 02 SHL Handle large partitions | 
|---|
|  | 11 | 11 Jun 03 SHL Add JFS and FAT32 support | 
|---|
|  | 12 | 25 May 05 SHL Rename comnam to szCommonName and fix typo | 
|---|
|  | 13 | 25 May 05 SHL Use ULONGLONG and CommaFmtULL | 
|---|
| [176] | 14 | 26 May 05 SHL More large file formatting updates | 
|---|
| [186] | 15 | 05 Jun 05 SHL Use QWL_USER | 
|---|
| [246] | 16 | 06 Aug 05 SHL Renames | 
|---|
| [305] | 17 | 08 Dec 05 SHL TreeCnrWndProc: disable menu items if drive not ready | 
|---|
| [352] | 18 | 17 Jul 06 SHL Use Runtime_Error | 
|---|
| [443] | 19 | 15 Aug 06 SHL Rework SetMask args | 
|---|
| [472] | 20 | 31 Aug 06 JS  Add more partitioning menu items | 
|---|
| [549] | 21 | 22 OCT 06 GKY Add NDFS32 support | 
|---|
|  | 22 | 29 Dec 06 GKY Fixed menu gray out for remote drives (added variable "remote") | 
|---|
|  | 23 | 29 Dec 06 GKY Enabled edit of drive flags on "not ready" drives | 
|---|
| [555] | 24 | 18 Feb 07 GKY More drive type and icon support | 
|---|
| [557] | 25 | 08 Mar 07 SHL Ensure drive icon updates after drive flags change | 
|---|
|  | 26 | 09 Mar 07 GKY Use SelectDriveIcon | 
|---|
| [593] | 27 | 30 Mar 07 GKY Remove GetPString for window class names | 
|---|
| [603] | 28 | 06 Apr 07 GKY Work around PM DragInfo and DrgFreeDISH limits | 
|---|
|  | 29 | 06 Apr 07 GKY Add some error checking in drag/drop | 
|---|
| [618] | 30 | 19 Apr 07 SHL Sync with AcceptOneDrop GetOneDrop mods | 
|---|
|  | 31 | 19 Apr 07 SHL Add more drag/drop error checking | 
|---|
| [36] | 32 |  | 
|---|
|  | 33 | ***********************************************************************/ | 
|---|
|  | 34 |  | 
|---|
| [2] | 35 | #define INCL_DOS | 
|---|
|  | 36 | #define INCL_WIN | 
|---|
|  | 37 | #define INCL_GPI | 
|---|
|  | 38 | #define INCL_DOSERRORS | 
|---|
| [156] | 39 | #define INCL_LONGLONG | 
|---|
|  | 40 | #include <os2.h> | 
|---|
| [2] | 41 |  | 
|---|
|  | 42 | #include <stdarg.h> | 
|---|
|  | 43 | #include <stdio.h> | 
|---|
|  | 44 | #include <stdlib.h> | 
|---|
|  | 45 | #include <string.h> | 
|---|
|  | 46 | #include <ctype.h> | 
|---|
| [156] | 47 |  | 
|---|
| [2] | 48 | #include "fm3dll.h" | 
|---|
|  | 49 | #include "fm3dlg.h" | 
|---|
|  | 50 | #include "fm3str.h" | 
|---|
|  | 51 | #include "mle.h" | 
|---|
|  | 52 |  | 
|---|
|  | 53 | #pragma data_seg(DATA1) | 
|---|
| [352] | 54 |  | 
|---|
|  | 55 | static PSZ pszSrcFile = __FILE__; | 
|---|
|  | 56 |  | 
|---|
| [2] | 57 | #pragma alloc_text(TREECNR,TreeCnrWndProc,TreeObjWndProc,TreeClientWndProc) | 
|---|
|  | 58 | #pragma alloc_text(TREECNR,TreeFrameWndProc,TreeTitleWndProc,ShowTreeRec) | 
|---|
|  | 59 | #pragma alloc_text(TREECNR,TreeStatProc,OpenButtonProc) | 
|---|
|  | 60 | #pragma alloc_text(STARTUP,StartTreeCnr) | 
|---|
|  | 61 |  | 
|---|
| [551] | 62 | APIRET16 APIENTRY16 Dos16MemAvail(PULONG pulAvailMem); | 
|---|
| [2] | 63 |  | 
|---|
| [551] | 64 | typedef struct APPNOTIFY | 
|---|
|  | 65 | { | 
|---|
|  | 66 | HAPP happ; | 
|---|
|  | 67 | CHAR device; | 
|---|
| [2] | 68 | struct APPNOTIFY *next; | 
|---|
|  | 69 | struct APPNOTIFY *prev; | 
|---|
| [551] | 70 | } | 
|---|
|  | 71 | APPNOTIFY; | 
|---|
| [2] | 72 |  | 
|---|
| [551] | 73 | MRESULT EXPENTRY OpenButtonProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [352] | 74 | { | 
|---|
| [2] | 75 | static BOOL emphasized = FALSE; | 
|---|
|  | 76 |  | 
|---|
| [551] | 77 | switch (msg) { | 
|---|
|  | 78 | case WM_CREATE: | 
|---|
|  | 79 | { | 
|---|
|  | 80 | MRESULT rc; | 
|---|
| [2] | 81 |  | 
|---|
| [551] | 82 | rc = PFNWPButton(hwnd, msg, mp1, mp2); | 
|---|
|  | 83 | WinSetPresParam(hwnd, PP_FONTNAMESIZE, | 
|---|
|  | 84 | strlen(GetPString(IDS_8TIMESNEWROMANTEXT)) + 1, | 
|---|
|  | 85 | (PVOID) GetPString(IDS_8TIMESNEWROMANTEXT)); | 
|---|
|  | 86 | return rc; | 
|---|
|  | 87 | } | 
|---|
| [2] | 88 |  | 
|---|
| [551] | 89 | case WM_MOUSEMOVE: | 
|---|
|  | 90 | BubbleHelp(hwnd, TRUE, FALSE, TRUE, GetPString(IDS_OPENBUTTONHELP)); | 
|---|
|  | 91 | break; | 
|---|
| [2] | 92 |  | 
|---|
| [551] | 93 | case WM_CONTEXTMENU: | 
|---|
|  | 94 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 95 | WM_COMMAND, MPFROM2SHORT(IDM_OPENWALK, 0), MPVOID); | 
|---|
|  | 96 | return 0; | 
|---|
| [2] | 97 |  | 
|---|
| [551] | 98 | case DM_DRAGOVER: | 
|---|
|  | 99 | if (!emphasized) { | 
|---|
|  | 100 | emphasized = TRUE; | 
|---|
|  | 101 | EmphasizeButton(hwnd, emphasized); | 
|---|
|  | 102 | } | 
|---|
| [618] | 103 | if (AcceptOneDrop(hwnd, mp1, mp2)) | 
|---|
| [551] | 104 | return MRFROM2SHORT(DOR_DROP, DO_MOVE); | 
|---|
|  | 105 | return MRFROM2SHORT(DOR_NEVERDROP, 0); | 
|---|
| [2] | 106 |  | 
|---|
| [551] | 107 | case DM_DRAGLEAVE: | 
|---|
|  | 108 | if (emphasized) { | 
|---|
|  | 109 | emphasized = FALSE; | 
|---|
|  | 110 | EmphasizeButton(hwnd, emphasized); | 
|---|
|  | 111 | } | 
|---|
|  | 112 | break; | 
|---|
| [2] | 113 |  | 
|---|
| [551] | 114 | case DM_DROPHELP: | 
|---|
|  | 115 | DropHelp(mp1, mp2, hwnd, GetPString(IDS_OPENDROPHELP)); | 
|---|
|  | 116 | return 0; | 
|---|
| [2] | 117 |  | 
|---|
| [551] | 118 | case DM_DROP: | 
|---|
|  | 119 | { | 
|---|
|  | 120 | char szFrom[CCHMAXPATH + 2]; | 
|---|
| [2] | 121 |  | 
|---|
| [551] | 122 | if (emphasized) { | 
|---|
|  | 123 | emphasized = FALSE; | 
|---|
|  | 124 | EmphasizeButton(hwnd, emphasized); | 
|---|
| [2] | 125 | } | 
|---|
| [618] | 126 | if (GetOneDrop(hwnd, mp1, mp2, szFrom, sizeof(szFrom))) { | 
|---|
| [551] | 127 | MakeValidDir(szFrom); | 
|---|
|  | 128 | WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 129 | UM_OPENWINDOWFORME, MPFROMP(szFrom), MPVOID); | 
|---|
|  | 130 | } | 
|---|
|  | 131 | } | 
|---|
|  | 132 | return 0; | 
|---|
| [2] | 133 |  | 
|---|
|  | 134 | } | 
|---|
| [551] | 135 | return PFNWPButton(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 136 | } | 
|---|
|  | 137 |  | 
|---|
| [551] | 138 | VOID ShowTreeRec(HWND hwndCnr, CHAR * dirname, BOOL collapsefirst, | 
|---|
|  | 139 | BOOL maketop) | 
|---|
| [352] | 140 | { | 
|---|
| [2] | 141 | /* Find a record in tree view, move it so it shows in container and | 
|---|
|  | 142 | make it the current record */ | 
|---|
|  | 143 |  | 
|---|
| [551] | 144 | PCNRITEM pci, pciToSelect, pciP; | 
|---|
|  | 145 | BOOL quickbail = FALSE; | 
|---|
|  | 146 | CHAR szDir[CCHMAXPATH], *p; | 
|---|
| [2] | 147 |  | 
|---|
|  | 148 | /* is it already the current record? */ | 
|---|
|  | 149 | pci = WinSendMsg(hwndCnr, | 
|---|
| [176] | 150 | CM_QUERYRECORDEMPHASIS, | 
|---|
| [551] | 151 | MPFROMLONG(CMA_FIRST), MPFROMSHORT(CRA_CURSORED)); | 
|---|
|  | 152 | if (pci && (INT) pci != -1 && !stricmp(pci->szFileName, dirname)) { | 
|---|
| [2] | 153 | quickbail = TRUE; | 
|---|
| [551] | 154 | goto MakeTop;                       /* skip lookup bullsh*t */ | 
|---|
| [2] | 155 | } | 
|---|
| [551] | 156 | WinEnableWindowUpdate(hwndCnr, FALSE); | 
|---|
|  | 157 | pci = FindCnrRecord(hwndCnr, dirname, NULL, TRUE, FALSE, TRUE); | 
|---|
|  | 158 | if (!pci || (INT) pci == -1) { | 
|---|
|  | 159 | *szDir = *dirname; | 
|---|
| [2] | 160 | szDir[1] = ':'; | 
|---|
|  | 161 | szDir[2] = '\\'; | 
|---|
|  | 162 | szDir[3] = 0; | 
|---|
|  | 163 | p = szDir + 3; | 
|---|
| [551] | 164 | for (;;) { | 
|---|
|  | 165 | pciP = FindCnrRecord(hwndCnr, szDir, NULL, TRUE, FALSE, TRUE); | 
|---|
|  | 166 | if (pciP && (INT) pciP != -1) { | 
|---|
|  | 167 | if (!stricmp(dirname, pciP->szFileName)) | 
|---|
| [176] | 168 | break; | 
|---|
| [551] | 169 | if (!(pciP->rc.flRecordAttr & CRA_EXPANDED)) | 
|---|
|  | 170 | WinSendMsg(hwndCnr, CM_EXPANDTREE, MPFROMP(pciP), MPVOID); | 
|---|
|  | 171 | strcpy(szDir, dirname); | 
|---|
|  | 172 | if (p - szDir >= strlen(szDir)) | 
|---|
| [176] | 173 | break; | 
|---|
| [551] | 174 | p = strchr(p, '\\'); | 
|---|
|  | 175 | if (p) { | 
|---|
| [176] | 176 | *p = 0; | 
|---|
|  | 177 | p++; | 
|---|
|  | 178 | } | 
|---|
|  | 179 | else | 
|---|
|  | 180 | break; | 
|---|
| [2] | 181 | } | 
|---|
|  | 182 | else | 
|---|
| [176] | 183 | break; | 
|---|
| [2] | 184 | DosSleep(0L); | 
|---|
|  | 185 | } | 
|---|
| [551] | 186 | pci = FindCnrRecord(hwndCnr, dirname, NULL, TRUE, FALSE, TRUE); | 
|---|
| [2] | 187 | } | 
|---|
| [551] | 188 | if (pci && (INT) pci != -1) { | 
|---|
|  | 189 | if (!(pci->rc.flRecordAttr & CRA_CURSORED)) { | 
|---|
|  | 190 | if (collapsefirst) { | 
|---|
| [176] | 191 | /* collapse top level of all branches */ | 
|---|
|  | 192 | pciP = WinSendMsg(hwndCnr, | 
|---|
|  | 193 | CM_QUERYRECORD, | 
|---|
| [551] | 194 | MPVOID, MPFROM2SHORT(CMA_FIRST, CMA_ITEMORDER)); | 
|---|
|  | 195 | while (pciP && (INT) pciP != -1) { | 
|---|
|  | 196 | if (toupper(*pciP->szFileName) == toupper(*dirname)) | 
|---|
| [176] | 197 | /* collapse all levels if branch is our drive */ | 
|---|
| [551] | 198 | ExpandAll(hwndCnr, FALSE, pciP); | 
|---|
|  | 199 | else if (pciP->rc.flRecordAttr & CRA_EXPANDED) | 
|---|
|  | 200 | WinSendMsg(hwndCnr, CM_COLLAPSETREE, MPFROMP(pciP), MPVOID); | 
|---|
| [176] | 201 | pciP = WinSendMsg(hwndCnr, | 
|---|
|  | 202 | CM_QUERYRECORD, | 
|---|
|  | 203 | MPFROMP(pciP), | 
|---|
| [551] | 204 | MPFROM2SHORT(CMA_NEXT, CMA_ITEMORDER)); | 
|---|
| [176] | 205 | } | 
|---|
| [2] | 206 | } | 
|---|
|  | 207 | /* expand all parent branches */ | 
|---|
|  | 208 | pciToSelect = pci; | 
|---|
| [551] | 209 | for (;;) { | 
|---|
| [176] | 210 | pciP = WinSendMsg(hwndCnr, | 
|---|
|  | 211 | CM_QUERYRECORD, | 
|---|
|  | 212 | MPFROMP(pciToSelect), | 
|---|
| [551] | 213 | MPFROM2SHORT(CMA_PARENT, CMA_ITEMORDER)); | 
|---|
|  | 214 | if (pciP && (INT) pciP != -1) { | 
|---|
|  | 215 | if (!(pciP->rc.flRecordAttr & CRA_EXPANDED)) | 
|---|
|  | 216 | WinSendMsg(hwndCnr, CM_EXPANDTREE, MPFROMP(pciP), MPVOID); | 
|---|
| [176] | 217 | pciToSelect = pciP; | 
|---|
|  | 218 | } | 
|---|
|  | 219 | else | 
|---|
|  | 220 | break; | 
|---|
|  | 221 | DosSleep(0L); | 
|---|
| [2] | 222 | } | 
|---|
|  | 223 | } | 
|---|
|  | 224 | /* make record visible */ | 
|---|
| [551] | 225 | MakeTop: | 
|---|
| [2] | 226 | pciToSelect = pci; | 
|---|
| [551] | 227 | if (pciToSelect && (INT) pciToSelect != -1) { | 
|---|
|  | 228 | if (fTopDir || maketop) | 
|---|
|  | 229 | ShowCnrRecord(hwndCnr, (PMINIRECORDCORE) pciToSelect); | 
|---|
|  | 230 | if (fSwitchTreeExpand && !(pciToSelect->rc.flRecordAttr & CRA_EXPANDED)) | 
|---|
|  | 231 | WinSendMsg(hwndCnr, CM_EXPANDTREE, MPFROMP(pciToSelect), MPVOID); | 
|---|
|  | 232 | if (quickbail) { | 
|---|
|  | 233 | WinEnableWindowUpdate(hwndCnr, TRUE); | 
|---|
| [176] | 234 | return; | 
|---|
| [2] | 235 | } | 
|---|
|  | 236 | WinSendMsg(hwndCnr, | 
|---|
| [176] | 237 | CM_SETRECORDEMPHASIS, | 
|---|
|  | 238 | MPFROMP(pciToSelect), | 
|---|
| [551] | 239 | MPFROM2SHORT(TRUE, CRA_SELECTED | CRA_CURSORED)); | 
|---|
| [2] | 240 | } | 
|---|
|  | 241 | } | 
|---|
| [551] | 242 | WinEnableWindowUpdate(hwndCnr, TRUE); | 
|---|
| [2] | 243 | } | 
|---|
|  | 244 |  | 
|---|
| [551] | 245 | MRESULT EXPENTRY TreeTitleWndProc(HWND hwnd, ULONG msg, MPARAM mp1, | 
|---|
|  | 246 | MPARAM mp2) | 
|---|
| [352] | 247 | { | 
|---|
| [551] | 248 | PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 249 |  | 
|---|
| [551] | 250 | switch (msg) { | 
|---|
|  | 251 | case WM_CONTEXTMENU: | 
|---|
|  | 252 | return WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 253 | UM_CONTEXTMENU, mp1, mp2); | 
|---|
| [2] | 254 | } | 
|---|
| [551] | 255 | return oldproc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 256 | } | 
|---|
|  | 257 |  | 
|---|
| [551] | 258 | MRESULT EXPENTRY TreeStatProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [352] | 259 | { | 
|---|
| [551] | 260 | switch (msg) { | 
|---|
|  | 261 | case WM_CREATE: | 
|---|
|  | 262 | return CommonTextProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 263 |  | 
|---|
| [551] | 264 | case WM_CONTEXTMENU: | 
|---|
|  | 265 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), msg, mp1, mp2); | 
|---|
|  | 266 | return 0; | 
|---|
| [2] | 267 |  | 
|---|
| [551] | 268 | case WM_PAINT: | 
|---|
|  | 269 | { | 
|---|
|  | 270 | MRESULT mr = PFNWPStatic(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 271 |  | 
|---|
| [551] | 272 | PaintRecessedWindow(hwnd, (HPS) 0, FALSE, FALSE); | 
|---|
|  | 273 | return mr; | 
|---|
|  | 274 | } | 
|---|
| [2] | 275 |  | 
|---|
| [551] | 276 | case WM_SETFOCUS: | 
|---|
|  | 277 | if (mp2) | 
|---|
|  | 278 | PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID); | 
|---|
|  | 279 | break; | 
|---|
| [2] | 280 |  | 
|---|
| [551] | 281 | case UM_FOCUSME: | 
|---|
|  | 282 | WinSetFocus(HWND_DESKTOP, WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 283 | return 0; | 
|---|
| [2] | 284 | } | 
|---|
| [551] | 285 | return PFNWPStatic(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 286 | } | 
|---|
|  | 287 |  | 
|---|
| [551] | 288 | MRESULT EXPENTRY TreeFrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1, | 
|---|
|  | 289 | MPARAM mp2) | 
|---|
| [352] | 290 | { | 
|---|
| [551] | 291 | switch (msg) { | 
|---|
|  | 292 | case UM_RESCAN: | 
|---|
|  | 293 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), msg, mp1, mp2); | 
|---|
|  | 294 | return 0; | 
|---|
| [2] | 295 |  | 
|---|
| [551] | 296 | case WM_ADJUSTWINDOWPOS: | 
|---|
|  | 297 | { | 
|---|
|  | 298 | SWP *pswp; | 
|---|
| [2] | 299 |  | 
|---|
| [551] | 300 | pswp = (SWP *) mp1; | 
|---|
|  | 301 | if (ParentIsDesktop(hwnd, (HWND) 0)) { | 
|---|
|  | 302 | if (pswp->fl & (SWP_HIDE | SWP_MINIMIZE)) | 
|---|
|  | 303 | HideNote(); | 
|---|
| [2] | 304 | } | 
|---|
| [551] | 305 | } | 
|---|
|  | 306 | break; | 
|---|
| [2] | 307 |  | 
|---|
| [551] | 308 | case WM_TRACKFRAME: | 
|---|
|  | 309 | if (!fFreeTree && !ParentIsDesktop(hwnd, (HWND) 0)) { | 
|---|
|  | 310 | switch (SHORT1FROMMP(mp1) & TF_MOVE) { | 
|---|
|  | 311 | case TF_MOVE: | 
|---|
|  | 312 | case TF_LEFT: | 
|---|
|  | 313 | case TF_TOP: | 
|---|
|  | 314 | case (TF_LEFT | TF_BOTTOM): | 
|---|
|  | 315 | case (TF_LEFT | TF_TOP): | 
|---|
|  | 316 | { | 
|---|
|  | 317 | SWP swp; | 
|---|
| [2] | 318 |  | 
|---|
| [551] | 319 | WinQueryWindowPos(hwnd, &swp); | 
|---|
|  | 320 | if (!(swp.fl & SWP_ACTIVATE)) | 
|---|
|  | 321 | WinSetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, | 
|---|
|  | 322 | SWP_ZORDER | SWP_ACTIVATE); | 
|---|
| [176] | 323 | } | 
|---|
| [551] | 324 | return 0; | 
|---|
| [2] | 325 | } | 
|---|
| [551] | 326 | } | 
|---|
|  | 327 | break; | 
|---|
| [2] | 328 |  | 
|---|
| [551] | 329 | case WM_CALCFRAMERECT: | 
|---|
|  | 330 | if (*(ULONG *) realappname != FM3UL) { | 
|---|
| [2] | 331 |  | 
|---|
| [551] | 332 | MRESULT mr; | 
|---|
|  | 333 | PRECTL prectl; | 
|---|
| [2] | 334 |  | 
|---|
| [551] | 335 | mr = CommonFrameWndProc(TREE_CNR, hwnd, msg, mp1, mp2); | 
|---|
| [2] | 336 |  | 
|---|
| [551] | 337 | /* | 
|---|
|  | 338 | * Calculate the position of the client rectangle. | 
|---|
|  | 339 | * Otherwise,  we'll see a lot of redraw when we move the | 
|---|
|  | 340 | * client during WM_FORMATFRAME. | 
|---|
|  | 341 | */ | 
|---|
| [2] | 342 |  | 
|---|
| [551] | 343 | if (mr && mp2) { | 
|---|
|  | 344 | prectl = (PRECTL) mp1; | 
|---|
|  | 345 | prectl->yTop -= 22; | 
|---|
| [2] | 346 | } | 
|---|
| [551] | 347 | return mr; | 
|---|
|  | 348 | } | 
|---|
|  | 349 | break; | 
|---|
| [2] | 350 |  | 
|---|
| [551] | 351 | case WM_FORMATFRAME: | 
|---|
|  | 352 | { | 
|---|
|  | 353 | SHORT sCount; | 
|---|
|  | 354 | PSWP pswp, pswpClient, pswpNew; | 
|---|
| [2] | 355 |  | 
|---|
| [551] | 356 | sCount = (SHORT) CommonFrameWndProc(TREE_CNR, hwnd, msg, mp1, mp2); | 
|---|
| [2] | 357 |  | 
|---|
| [551] | 358 | /* | 
|---|
|  | 359 | * Reformat the frame to "squeeze" the client | 
|---|
|  | 360 | */ | 
|---|
| [2] | 361 |  | 
|---|
| [551] | 362 | pswp = (PSWP) mp1; | 
|---|
|  | 363 | { | 
|---|
|  | 364 | SHORT x; | 
|---|
| [2] | 365 |  | 
|---|
| [551] | 366 | for (x = 0; x < sCount; x++) { | 
|---|
|  | 367 | if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_CLIENT) { | 
|---|
|  | 368 | pswpClient = pswp; | 
|---|
|  | 369 | break; | 
|---|
| [176] | 370 | } | 
|---|
| [551] | 371 | pswp++; | 
|---|
| [176] | 372 | } | 
|---|
| [551] | 373 | } | 
|---|
|  | 374 | pswpNew = (PSWP) mp1 + sCount; | 
|---|
|  | 375 | *pswpNew = *pswpClient; | 
|---|
|  | 376 | pswpNew->hwnd = WinWindowFromID(hwnd, MAIN_STATUS); | 
|---|
|  | 377 | if (*(ULONG *) realappname == FM3UL) { | 
|---|
| [2] | 378 |  | 
|---|
| [551] | 379 | PSWP pswpTitlebar = (PSWP) 0, pswpMinbutton = (PSWP) 0; | 
|---|
|  | 380 | SHORT x; | 
|---|
| [2] | 381 |  | 
|---|
| [551] | 382 | pswpNew->hwnd = WinWindowFromID(hwnd, IDM_OPENWINDOW); | 
|---|
|  | 383 | pswp = (PSWP) mp1; | 
|---|
|  | 384 | for (x = 0; x < sCount; x++) { | 
|---|
|  | 385 | if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_TITLEBAR) | 
|---|
|  | 386 | pswpTitlebar = pswp; | 
|---|
|  | 387 | else if (WinQueryWindowUShort(pswp->hwnd, QWS_ID) == FID_MINMAX) | 
|---|
|  | 388 | pswpMinbutton = pswp; | 
|---|
|  | 389 | if (pswpTitlebar && pswpMinbutton) | 
|---|
|  | 390 | break; | 
|---|
|  | 391 | pswp++; | 
|---|
| [176] | 392 | } | 
|---|
| [551] | 393 | pswpNew->cy = pswpMinbutton->cy + 3; | 
|---|
|  | 394 | pswpNew->cx = min(pswpNew->cy, (pswpMinbutton->cx / 2) + 3); | 
|---|
|  | 395 | pswpTitlebar->cx -= (pswpNew->cx + 1); | 
|---|
|  | 396 | pswpNew->x = pswpTitlebar->x + pswpTitlebar->cx; | 
|---|
|  | 397 | pswpNew->y = pswpMinbutton->y - 1; | 
|---|
| [2] | 398 | } | 
|---|
| [551] | 399 | else { | 
|---|
|  | 400 | pswpNew->x = pswpClient->x + 3; | 
|---|
|  | 401 | pswpNew->y = (pswpClient->y + pswpClient->cy) - 20; | 
|---|
|  | 402 | pswpNew->cx = pswpClient->cx - 6; | 
|---|
|  | 403 | pswpNew->cy = 18; | 
|---|
|  | 404 | pswpClient->cy -= 22; | 
|---|
|  | 405 | } | 
|---|
|  | 406 | sCount++; | 
|---|
|  | 407 | return MRFROMSHORT(sCount); | 
|---|
|  | 408 | } | 
|---|
| [2] | 409 |  | 
|---|
| [551] | 410 | case WM_QUERYFRAMECTLCOUNT: | 
|---|
|  | 411 | { | 
|---|
|  | 412 | SHORT sCount; | 
|---|
| [2] | 413 |  | 
|---|
| [551] | 414 | sCount = (SHORT) CommonFrameWndProc(TREE_CNR, hwnd, msg, mp1, mp2); | 
|---|
|  | 415 | sCount++; | 
|---|
|  | 416 | return MRFROMSHORT(sCount); | 
|---|
|  | 417 | } | 
|---|
| [2] | 418 | } | 
|---|
| [551] | 419 | return CommonFrameWndProc(TREE_CNR, hwnd, msg, mp1, mp2); | 
|---|
| [2] | 420 | } | 
|---|
|  | 421 |  | 
|---|
| [551] | 422 | MRESULT EXPENTRY TreeClientWndProc(HWND hwnd, ULONG msg, MPARAM mp1, | 
|---|
|  | 423 | MPARAM mp2) | 
|---|
|  | 424 | { | 
|---|
| [2] | 425 |  | 
|---|
| [551] | 426 | switch (msg) { | 
|---|
|  | 427 | case UM_CONTAINERHWND: | 
|---|
|  | 428 | return MRFROMLONG(WinWindowFromID(hwnd, TREE_CNR)); | 
|---|
| [2] | 429 |  | 
|---|
| [551] | 430 | case UM_VIEWSMENU: | 
|---|
|  | 431 | return MRFROMLONG(CheckMenu(&TreeCnrMenu, TREECNR_POPUP)); | 
|---|
| [2] | 432 |  | 
|---|
| [551] | 433 | case UM_TIMER: | 
|---|
|  | 434 | case UM_ACTION: | 
|---|
|  | 435 | case UM_SHOWME: | 
|---|
|  | 436 | case UM_OPENWINDOWFORME: | 
|---|
|  | 437 | case UM_MINIMIZE: | 
|---|
|  | 438 | case UM_MAXIMIZE: | 
|---|
|  | 439 | case WM_INITMENU: | 
|---|
|  | 440 | case UM_INITMENU: | 
|---|
|  | 441 | case UM_FILTER: | 
|---|
|  | 442 | case UM_FILESMENU: | 
|---|
|  | 443 | case UM_UPDATERECORD: | 
|---|
|  | 444 | case UM_UPDATERECORDLIST: | 
|---|
|  | 445 | case MM_PORTHOLEINIT: | 
|---|
|  | 446 | case UM_DRIVECMD: | 
|---|
|  | 447 | case WM_CLOSE: | 
|---|
|  | 448 | case WM_CONTROL: | 
|---|
|  | 449 | case UM_COMMAND: | 
|---|
|  | 450 | case WM_COMMAND: | 
|---|
|  | 451 | return WinSendMsg(WinWindowFromID(hwnd, TREE_CNR), msg, mp1, mp2); | 
|---|
| [2] | 452 |  | 
|---|
| [551] | 453 | case WM_PSETFOCUS: | 
|---|
|  | 454 | case WM_SETFOCUS: | 
|---|
|  | 455 | if (mp2) | 
|---|
|  | 456 | PostMsg(hwnd, UM_FOCUSME, MPVOID, MPVOID); | 
|---|
|  | 457 | break; | 
|---|
| [2] | 458 |  | 
|---|
| [551] | 459 | case UM_FOCUSME: | 
|---|
|  | 460 | WinSetFocus(HWND_DESKTOP, WinWindowFromID(hwnd, TREE_CNR)); | 
|---|
|  | 461 | break; | 
|---|
| [2] | 462 |  | 
|---|
| [551] | 463 | case WM_ERASEBACKGROUND: | 
|---|
|  | 464 | WinFillRect((HPS) mp1, (PRECTL) mp2, 0x00d0d0d0); | 
|---|
|  | 465 | return 0; | 
|---|
| [2] | 466 |  | 
|---|
| [551] | 467 | case WM_PAINT: | 
|---|
|  | 468 | { | 
|---|
|  | 469 | HPS hps; | 
|---|
|  | 470 | RECTL rcl; | 
|---|
| [2] | 471 |  | 
|---|
| [551] | 472 | hps = WinBeginPaint(hwnd, (HPS) 0, NULL); | 
|---|
|  | 473 | if (hps) { | 
|---|
|  | 474 | WinQueryWindowRect(hwnd, &rcl); | 
|---|
|  | 475 | WinFillRect(hps, &rcl, CLR_PALEGRAY); | 
|---|
|  | 476 | PaintRecessedWindow(WinWindowFromID(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 477 | MAIN_STATUS), hps, FALSE, FALSE); | 
|---|
|  | 478 | WinEndPaint(hps); | 
|---|
| [2] | 479 | } | 
|---|
| [551] | 480 | } | 
|---|
|  | 481 | break; | 
|---|
| [2] | 482 |  | 
|---|
| [551] | 483 | case WM_SIZE: | 
|---|
|  | 484 | WinSetWindowPos(WinWindowFromID(hwnd, TREE_CNR), | 
|---|
|  | 485 | HWND_TOP, | 
|---|
|  | 486 | 0, | 
|---|
|  | 487 | 0, | 
|---|
|  | 488 | SHORT1FROMMP(mp2), | 
|---|
|  | 489 | SHORT2FROMMP(mp2), SWP_SHOW | SWP_MOVE | SWP_SIZE); | 
|---|
|  | 490 | if (hwndMain) | 
|---|
|  | 491 | PostMsg(hwndMain, UM_SIZE, MPVOID, MPVOID); | 
|---|
|  | 492 | break; | 
|---|
| [2] | 493 |  | 
|---|
| [551] | 494 | case WM_CONTEXTMENU: | 
|---|
|  | 495 | case UM_CONTEXTMENU: | 
|---|
|  | 496 | PostMsg(WinWindowFromID(hwnd, TREE_CNR), | 
|---|
|  | 497 | WM_CONTROL, MPFROM2SHORT(TREE_CNR, CN_CONTEXTMENU), MPVOID); | 
|---|
|  | 498 | return 0; | 
|---|
| [2] | 499 | } | 
|---|
| [551] | 500 | return WinDefWindowProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 501 | } | 
|---|
|  | 502 |  | 
|---|
| [551] | 503 | MRESULT EXPENTRY TreeObjWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [156] | 504 | { | 
|---|
| [2] | 505 | DIRCNRDATA *dcd; | 
|---|
|  | 506 |  | 
|---|
| [551] | 507 | switch (msg) { | 
|---|
|  | 508 | case WM_CREATE: | 
|---|
|  | 509 | break; | 
|---|
| [2] | 510 |  | 
|---|
| [551] | 511 | case UM_SHOWME: | 
|---|
|  | 512 | if (mp1) { | 
|---|
|  | 513 | dcd = INSTDATA(hwnd); | 
|---|
|  | 514 | if (dcd) { | 
|---|
|  | 515 | BOOL tempsusp, tempfollow, temptop; | 
|---|
| [2] | 516 |  | 
|---|
| [551] | 517 | tempsusp = dcd->suspendview; | 
|---|
|  | 518 | dcd->suspendview = TRUE; | 
|---|
|  | 519 | tempfollow = fFollowTree; | 
|---|
|  | 520 | fFollowTree = FALSE; | 
|---|
|  | 521 | if (mp2) { | 
|---|
|  | 522 | temptop = fTopDir; | 
|---|
|  | 523 | fTopDir = TRUE; | 
|---|
| [176] | 524 | } | 
|---|
| [551] | 525 | ShowTreeRec(dcd->hwndCnr, (CHAR *) mp1, fCollapseFirst, TRUE); | 
|---|
|  | 526 | dcd->suspendview = tempsusp; | 
|---|
|  | 527 | fFollowTree = tempfollow; | 
|---|
|  | 528 | if (mp2) | 
|---|
|  | 529 | fTopDir = temptop; | 
|---|
| [2] | 530 | } | 
|---|
| [551] | 531 | free((CHAR *) mp1); | 
|---|
|  | 532 | } | 
|---|
|  | 533 | return 0; | 
|---|
| [2] | 534 |  | 
|---|
| [551] | 535 | case DM_PRINTOBJECT: | 
|---|
|  | 536 | return MRFROMLONG(DRR_TARGET); | 
|---|
| [2] | 537 |  | 
|---|
| [551] | 538 | case DM_DISCARDOBJECT: | 
|---|
|  | 539 | dcd = INSTDATA(hwnd); | 
|---|
|  | 540 | if (fFM2Deletes && dcd) { | 
|---|
| [2] | 541 |  | 
|---|
| [551] | 542 | LISTINFO *li; | 
|---|
|  | 543 | CNRDRAGINFO cni; | 
|---|
| [2] | 544 |  | 
|---|
| [551] | 545 | cni.pRecord = NULL; | 
|---|
|  | 546 | cni.pDragInfo = (PDRAGINFO) mp1; | 
|---|
|  | 547 | li = DoFileDrop(dcd->hwndCnr, | 
|---|
| [618] | 548 | dcd->directory, FALSE, MPVOID, MPFROMP(&cni)); | 
|---|
|  | 549 | if (NumItemsToUnhilite) | 
|---|
|  | 550 | saymsg(MB_CANCEL | MB_ICONEXCLAMATION, | 
|---|
|  | 551 | hwnd, | 
|---|
|  | 552 | GetPString(IDS_ERRORTEXT), | 
|---|
|  | 553 | GetPString(IDS_EXCEEDPMDRGLMT)); | 
|---|
| [551] | 554 | if (li) { | 
|---|
|  | 555 | li->type = ((fDefaultDeletePerm) ? IDM_PERMDELETE : IDM_DELETE); | 
|---|
|  | 556 | if (!PostMsg(hwnd, UM_MASSACTION, MPFROMP(li), MPVOID)) | 
|---|
|  | 557 | FreeListInfo(li); | 
|---|
|  | 558 | else | 
|---|
|  | 559 | return MRFROMLONG(DRR_SOURCE); | 
|---|
| [2] | 560 | } | 
|---|
| [551] | 561 | } | 
|---|
|  | 562 | return MRFROMLONG(DRR_TARGET); | 
|---|
| [2] | 563 |  | 
|---|
| [551] | 564 | case UM_EXPAND: | 
|---|
|  | 565 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 566 | if (!dcd) | 
|---|
|  | 567 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 568 | else { | 
|---|
|  | 569 | BOOL tempsusp = dcd->suspendview; | 
|---|
| [2] | 570 |  | 
|---|
| [551] | 571 | dcd->suspendview = TRUE; | 
|---|
|  | 572 | ExpandAll(dcd->hwndCnr, | 
|---|
|  | 573 | (SHORT1FROMMP(mp1) == IDM_EXPAND), (PCNRITEM) mp2); | 
|---|
|  | 574 | dcd->suspendview = tempsusp; | 
|---|
|  | 575 | PostMsg(dcd->hwndCnr, UM_FILTER, MPVOID, MPVOID); | 
|---|
|  | 576 | } | 
|---|
|  | 577 | return 0; | 
|---|
| [2] | 578 |  | 
|---|
| [551] | 579 | case UM_UPDATERECORDLIST: | 
|---|
|  | 580 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 581 | if (!dcd || !mp1) | 
|---|
|  | 582 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 583 | else { | 
|---|
|  | 584 | INT numentries = 0; | 
|---|
|  | 585 | CHAR **list = (CHAR **) mp1; | 
|---|
| [2] | 586 |  | 
|---|
| [551] | 587 | while (list[numentries]) | 
|---|
|  | 588 | numentries++; | 
|---|
|  | 589 | if (numentries) | 
|---|
|  | 590 | UpdateCnrList(dcd->hwndCnr, list, numentries, TRUE, dcd); | 
|---|
|  | 591 | } | 
|---|
|  | 592 | return 0; | 
|---|
| [2] | 593 |  | 
|---|
| [551] | 594 | case UM_SETUP: | 
|---|
|  | 595 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 596 | if (!dcd) | 
|---|
|  | 597 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 598 | else { | 
|---|
|  | 599 | dcd->hwndObject = hwnd; | 
|---|
|  | 600 | if (ParentIsDesktop(hwnd, dcd->hwndParent)) | 
|---|
|  | 601 | DosSleep(250L); | 
|---|
|  | 602 | } | 
|---|
|  | 603 | return 0; | 
|---|
|  | 604 |  | 
|---|
|  | 605 | case UM_RESCAN2: | 
|---|
|  | 606 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 607 | if (!dcd) | 
|---|
|  | 608 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 609 | // Bypass if not running integrated (i.e if vtree) | 
|---|
|  | 610 | else if (hwndStatus && | 
|---|
|  | 611 | dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) { | 
|---|
|  | 612 | CHAR s[CCHMAXPATH * 2]; | 
|---|
|  | 613 | PCNRITEM pci = (PCNRITEM) mp1; | 
|---|
|  | 614 | FSALLOCATE fsa; | 
|---|
|  | 615 | struct | 
|---|
|  | 616 | { | 
|---|
|  | 617 | ULONG serial; | 
|---|
|  | 618 | CHAR volumelength; | 
|---|
|  | 619 | CHAR volumelabel[CCHMAXPATH]; | 
|---|
| [2] | 620 | } | 
|---|
| [551] | 621 | volser; | 
|---|
|  | 622 | CHAR tb[64]; | 
|---|
|  | 623 | CHAR szFree[64]; | 
|---|
|  | 624 | CNRINFO cnri; | 
|---|
| [2] | 625 |  | 
|---|
| [551] | 626 | strcpy(s, GetPString(IDS_TREETEXT)); | 
|---|
|  | 627 | memset(&cnri, 0, sizeof(CNRINFO)); | 
|---|
|  | 628 | cnri.cb = sizeof(CNRINFO); | 
|---|
|  | 629 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 630 | CM_QUERYCNRINFO, | 
|---|
|  | 631 | MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO))); | 
|---|
|  | 632 | if (cnri.cRecords) { | 
|---|
|  | 633 | sprintf(s, GetPString(IDS_NUMDRIVESTEXT), cnri.cRecords); | 
|---|
|  | 634 | if (pci) { | 
|---|
|  | 635 | if (!(driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 636 | DRIVE_REMOVABLE) || | 
|---|
|  | 637 | driveserial[toupper(*pci->szFileName) - 'A'] != -1) { | 
|---|
|  | 638 | memset(&volser, 0, sizeof(volser)); | 
|---|
|  | 639 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 640 | if (!DosQueryFSInfo(toupper(*pci->szFileName) - '@', | 
|---|
|  | 641 | FSIL_VOLSER, | 
|---|
|  | 642 | &volser, | 
|---|
|  | 643 | (ULONG) sizeof(volser)) && | 
|---|
|  | 644 | dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) { | 
|---|
| [176] | 645 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 646 | if (!DosQueryFSInfo(toupper(*pci->szFileName) - '@', | 
|---|
| [551] | 647 | FSIL_ALLOC, &fsa, sizeof(FSALLOCATE))) { | 
|---|
|  | 648 | CommaFmtULL(tb, sizeof(tb), | 
|---|
|  | 649 | (ULONGLONG) fsa.cUnitAvail * (fsa.cSectorUnit * | 
|---|
|  | 650 | fsa.cbSector), 'M'); | 
|---|
|  | 651 | sprintf(szFree, "  %s %s", tb, GetPString(IDS_FREETEXT)); | 
|---|
|  | 652 | } | 
|---|
|  | 653 | else | 
|---|
|  | 654 | *szFree = 0; | 
|---|
|  | 655 | driveserial[toupper(*pci->szFileName) - 'A'] = volser.serial; | 
|---|
|  | 656 | sprintf(&s[strlen(s)], | 
|---|
|  | 657 | GetPString(IDS_TREESTATUSSTARTTEXT), | 
|---|
|  | 658 | toupper(*pci->szFileName), | 
|---|
|  | 659 | volser.volumelabel, volser.serial, szFree); | 
|---|
|  | 660 | if (!fMoreButtons) { | 
|---|
|  | 661 | if (*dcd->mask.szMask || | 
|---|
|  | 662 | (dcd->mask.attrFile != ALLATTRS || | 
|---|
|  | 663 | ((fFilesInTree || | 
|---|
|  | 664 | (driveflags[toupper(*pci->szFileName)] & | 
|---|
|  | 665 | DRIVE_INCLUDEFILES)) ? | 
|---|
|  | 666 | dcd->mask.antiattr : | 
|---|
|  | 667 | (dcd->mask.antiattr && | 
|---|
|  | 668 | dcd->mask.antiattr != FILE_DIRECTORY)))) { | 
|---|
|  | 669 | sprintf(&s[strlen(s)], | 
|---|
|  | 670 | " (%s)", | 
|---|
|  | 671 | (*dcd->mask.szMask) ? | 
|---|
|  | 672 | dcd->mask.szMask : GetPString(IDS_ATTRTEXT)); | 
|---|
| [176] | 673 | } | 
|---|
|  | 674 | } | 
|---|
|  | 675 | } | 
|---|
|  | 676 | } | 
|---|
| [551] | 677 | else { | 
|---|
|  | 678 | /* find root record and strip it */ | 
|---|
|  | 679 | pci = FindParentRecord(dcd->hwndCnr, pci); | 
|---|
|  | 680 | driveserial[toupper(*pci->szFileName) - 'A'] = -1; | 
|---|
|  | 681 | UnFlesh(dcd->hwndCnr, pci); | 
|---|
|  | 682 | } | 
|---|
| [176] | 683 | } | 
|---|
| [2] | 684 | } | 
|---|
| [551] | 685 | if (dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) | 
|---|
|  | 686 | WinSetWindowText(hwndStatus, s); | 
|---|
|  | 687 | } | 
|---|
|  | 688 | return 0; | 
|---|
| [2] | 689 |  | 
|---|
| [551] | 690 | case UM_RESCAN: | 
|---|
|  | 691 | /* | 
|---|
|  | 692 | * populate container | 
|---|
|  | 693 | */ | 
|---|
|  | 694 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 695 | if (!dcd) | 
|---|
|  | 696 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 697 | else { | 
|---|
|  | 698 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 699 | CM_REMOVERECORD, | 
|---|
|  | 700 | MPVOID, | 
|---|
|  | 701 | MPFROM2SHORT(0, CMA_FREE | CMA_INVALIDATE | CMA_ERASE)); | 
|---|
|  | 702 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 703 | CM_SCROLLWINDOW, MPFROMSHORT(CMA_VERTICAL), MPFROMLONG(-1)); | 
|---|
|  | 704 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 705 | CM_SCROLLWINDOW, | 
|---|
|  | 706 | MPFROMSHORT(CMA_HORIZONTAL), MPFROMLONG(-1)); | 
|---|
|  | 707 | FillTreeCnr(dcd->hwndCnr, dcd->hwndParent); | 
|---|
|  | 708 | if (fOkayMinimize) { | 
|---|
|  | 709 | PostMsg(dcd->hwndCnr, UM_MINIMIZE, MPVOID, MPVOID); | 
|---|
|  | 710 | fOkayMinimize = FALSE; | 
|---|
| [2] | 711 | } | 
|---|
| [551] | 712 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 713 | CM_INVALIDATERECORD, | 
|---|
|  | 714 | MPVOID, MPFROM2SHORT(0, CMA_ERASE | CMA_REPOSITION)); | 
|---|
|  | 715 | PostMsg(dcd->hwndCnr, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 716 | } | 
|---|
|  | 717 | return 0; | 
|---|
| [2] | 718 |  | 
|---|
| [551] | 719 | case UM_COMMAND: | 
|---|
|  | 720 | if (mp1) { | 
|---|
| [2] | 721 |  | 
|---|
| [551] | 722 | LISTINFO *li = (LISTINFO *) mp1; | 
|---|
| [2] | 723 |  | 
|---|
| [551] | 724 | switch (li->type) { | 
|---|
|  | 725 | case IDM_DOITYOURSELF: | 
|---|
|  | 726 | case IDM_APPENDTOCLIP: | 
|---|
|  | 727 | case IDM_SAVETOCLIP: | 
|---|
|  | 728 | case IDM_ARCHIVE: | 
|---|
|  | 729 | case IDM_VIEW: | 
|---|
|  | 730 | case IDM_EDIT: | 
|---|
|  | 731 | case IDM_OBJECT: | 
|---|
|  | 732 | case IDM_SHADOW: | 
|---|
|  | 733 | case IDM_SHADOW2: | 
|---|
|  | 734 | case IDM_PRINT: | 
|---|
|  | 735 | case IDM_ATTRS: | 
|---|
|  | 736 | case IDM_DELETE: | 
|---|
|  | 737 | case IDM_PERMDELETE: | 
|---|
|  | 738 | if (PostMsg(hwnd, UM_MASSACTION, mp1, mp2)) | 
|---|
|  | 739 | return (MRESULT) TRUE; | 
|---|
|  | 740 | default: | 
|---|
|  | 741 | if (PostMsg(hwnd, UM_ACTION, mp1, mp2)) | 
|---|
|  | 742 | return (MRESULT) TRUE; | 
|---|
| [2] | 743 | } | 
|---|
| [551] | 744 | } | 
|---|
|  | 745 | return 0; | 
|---|
| [2] | 746 |  | 
|---|
| [551] | 747 | case UM_MASSACTION: | 
|---|
|  | 748 | if (mp1) { | 
|---|
| [2] | 749 |  | 
|---|
| [551] | 750 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 751 | if (!dcd) | 
|---|
|  | 752 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 753 | else { | 
|---|
|  | 754 | WORKER *wk; | 
|---|
|  | 755 |  | 
|---|
|  | 756 | wk = xmallocz(sizeof(WORKER), pszSrcFile, __LINE__); | 
|---|
|  | 757 | if (!wk) | 
|---|
|  | 758 | FreeListInfo((LISTINFO *) mp1); | 
|---|
| [352] | 759 | else { | 
|---|
| [551] | 760 | wk->size = sizeof(WORKER); | 
|---|
|  | 761 | wk->hwndCnr = dcd->hwndCnr; | 
|---|
|  | 762 | wk->hwndParent = dcd->hwndParent; | 
|---|
|  | 763 | wk->hwndFrame = dcd->hwndFrame; | 
|---|
|  | 764 | wk->hwndClient = dcd->hwndClient; | 
|---|
|  | 765 | wk->li = (LISTINFO *) mp1; | 
|---|
|  | 766 | strcpy(wk->directory, dcd->directory); | 
|---|
|  | 767 | if (_beginthread(MassAction, NULL, 122880, (PVOID) wk) == -1) { | 
|---|
|  | 768 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 769 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 770 | free(wk); | 
|---|
|  | 771 | FreeListInfo((LISTINFO *) mp1); | 
|---|
| [176] | 772 | } | 
|---|
|  | 773 | } | 
|---|
| [2] | 774 | } | 
|---|
| [551] | 775 | } | 
|---|
|  | 776 | return 0; | 
|---|
| [2] | 777 |  | 
|---|
| [551] | 778 | case UM_ACTION: | 
|---|
|  | 779 | if (mp1) { | 
|---|
| [2] | 780 |  | 
|---|
| [551] | 781 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 782 | if (!dcd) | 
|---|
|  | 783 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 784 | else { | 
|---|
|  | 785 | WORKER *wk; | 
|---|
|  | 786 |  | 
|---|
|  | 787 | wk = xmallocz(sizeof(WORKER), pszSrcFile, __LINE__); | 
|---|
|  | 788 | if (!wk) | 
|---|
|  | 789 | FreeListInfo((LISTINFO *) mp1); | 
|---|
| [352] | 790 | else { | 
|---|
| [551] | 791 | wk->size = sizeof(WORKER); | 
|---|
|  | 792 | wk->hwndCnr = dcd->hwndCnr; | 
|---|
|  | 793 | wk->hwndParent = dcd->hwndParent; | 
|---|
|  | 794 | wk->hwndFrame = dcd->hwndFrame; | 
|---|
|  | 795 | wk->hwndClient = dcd->hwndClient; | 
|---|
|  | 796 | wk->li = (LISTINFO *) mp1; | 
|---|
|  | 797 | strcpy(wk->directory, dcd->directory); | 
|---|
|  | 798 | if (_beginthread(Action, NULL, 122880, (PVOID) wk) == -1) { | 
|---|
|  | 799 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 800 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 801 | free(wk); | 
|---|
|  | 802 | FreeListInfo((LISTINFO *) mp1); | 
|---|
| [176] | 803 | } | 
|---|
|  | 804 | } | 
|---|
| [2] | 805 | } | 
|---|
| [551] | 806 | } | 
|---|
|  | 807 | return 0; | 
|---|
| [2] | 808 |  | 
|---|
| [551] | 809 | case WM_CLOSE: | 
|---|
|  | 810 | WinDestroyWindow(hwnd); | 
|---|
|  | 811 | break; | 
|---|
| [2] | 812 |  | 
|---|
| [551] | 813 | case WM_DESTROY: | 
|---|
|  | 814 | hwndTree = (HWND) 0; | 
|---|
|  | 815 | dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
|  | 816 | if (dcd) { | 
|---|
|  | 817 | WinSendMsg(dcd->hwndCnr, | 
|---|
|  | 818 | UM_CLOSE, MPFROMLONG(dcd->dontclose != FALSE), MPVOID); | 
|---|
|  | 819 | free(dcd); | 
|---|
|  | 820 | } | 
|---|
|  | 821 | DosPostEventSem(CompactSem); | 
|---|
|  | 822 | if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID)) | 
|---|
|  | 823 | WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 824 | break; | 
|---|
| [2] | 825 | } | 
|---|
| [551] | 826 | return WinDefWindowProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 827 | } | 
|---|
|  | 828 |  | 
|---|
| [551] | 829 | MRESULT EXPENTRY TreeCnrWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
| [305] | 830 | { | 
|---|
| [551] | 831 | static APPNOTIFY *apphead = NULL, *apptail = NULL; | 
|---|
|  | 832 | DIRCNRDATA *dcd = WinQueryWindowPtr(hwnd, QWL_USER); | 
|---|
| [2] | 833 |  | 
|---|
| [551] | 834 | switch (msg) { | 
|---|
|  | 835 | case DM_PRINTOBJECT: | 
|---|
|  | 836 | return MRFROMLONG(DRR_TARGET); | 
|---|
|  | 837 |  | 
|---|
|  | 838 | case DM_DISCARDOBJECT: | 
|---|
|  | 839 | if (dcd) | 
|---|
|  | 840 | return WinSendMsg(dcd->hwndObject, msg, mp1, mp2); | 
|---|
|  | 841 | else | 
|---|
| [2] | 842 | return MRFROMLONG(DRR_TARGET); | 
|---|
|  | 843 |  | 
|---|
| [551] | 844 | case WM_CHAR: | 
|---|
|  | 845 | shiftstate = (SHORT1FROMMP(mp1) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 846 | if (SHORT1FROMMP(mp1) & KC_KEYUP) | 
|---|
|  | 847 | return (MRESULT) TRUE; | 
|---|
|  | 848 | if (SHORT1FROMMP(mp1) & KC_VIRTUALKEY) { | 
|---|
|  | 849 | switch (SHORT2FROMMP(mp2)) { | 
|---|
|  | 850 | case VK_INSERT: | 
|---|
|  | 851 | if ((shiftstate & KC_CTRL) == KC_CTRL) | 
|---|
|  | 852 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_MKDIR, 0), MPVOID); | 
|---|
|  | 853 | break; | 
|---|
|  | 854 | case VK_DELETE: | 
|---|
|  | 855 | if ((shiftstate & KC_CTRL) == KC_CTRL) | 
|---|
|  | 856 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_PERMDELETE, 0), MPVOID); | 
|---|
|  | 857 | else if ((shiftstate & KC_SHIFT) == KC_SHIFT) | 
|---|
|  | 858 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_SAVETOCLIP, 0), MPVOID); | 
|---|
|  | 859 | else | 
|---|
|  | 860 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_DELETE, 0), MPVOID); | 
|---|
|  | 861 | break; | 
|---|
| [2] | 862 | } | 
|---|
| [551] | 863 | } | 
|---|
|  | 864 | if (shiftstate || fNoSearch) | 
|---|
|  | 865 | break; | 
|---|
|  | 866 | if (SHORT1FROMMP(mp1) & KC_CHAR) { | 
|---|
| [2] | 867 |  | 
|---|
| [551] | 868 | ULONG thistime, len; | 
|---|
|  | 869 | SEARCHSTRING srch; | 
|---|
|  | 870 | PCNRITEM pci; | 
|---|
| [2] | 871 |  | 
|---|
| [551] | 872 | if (!dcd) | 
|---|
|  | 873 | break; | 
|---|
|  | 874 | switch (SHORT1FROMMP(mp2)) { | 
|---|
|  | 875 | case '\x1b': | 
|---|
|  | 876 | case '\r': | 
|---|
|  | 877 | case '\n': | 
|---|
|  | 878 | dcd->lasttime = 0; | 
|---|
|  | 879 | *dcd->szCommonName = 0; | 
|---|
|  | 880 | break; | 
|---|
|  | 881 | default: | 
|---|
|  | 882 | thistime = WinQueryMsgTime(WinQueryAnchorBlock(hwnd)); | 
|---|
|  | 883 | if (thistime > dcd->lasttime + 1250) | 
|---|
|  | 884 | *dcd->szCommonName = 0; | 
|---|
|  | 885 | dcd->lasttime = thistime; | 
|---|
|  | 886 | if (SHORT1FROMMP(mp2) == ' ' && !*dcd->szCommonName) | 
|---|
| [176] | 887 | break; | 
|---|
| [551] | 888 | KbdRetry: | 
|---|
|  | 889 | len = strlen(dcd->szCommonName); | 
|---|
|  | 890 | if (len >= CCHMAXPATH - 1) { | 
|---|
|  | 891 | *dcd->szCommonName = 0; | 
|---|
|  | 892 | len = 0; | 
|---|
|  | 893 | } | 
|---|
|  | 894 | dcd->szCommonName[len] = toupper(SHORT1FROMMP(mp2)); | 
|---|
|  | 895 | dcd->szCommonName[len + 1] = 0; | 
|---|
|  | 896 | memset(&srch, 0, sizeof(SEARCHSTRING)); | 
|---|
|  | 897 | srch.cb = (ULONG) sizeof(SEARCHSTRING); | 
|---|
|  | 898 | srch.pszSearch = (PSZ) dcd->szCommonName; | 
|---|
|  | 899 | srch.fsPrefix = TRUE; | 
|---|
|  | 900 | srch.fsCaseSensitive = FALSE; | 
|---|
|  | 901 | srch.usView = CV_ICON; | 
|---|
|  | 902 | pci = WinSendMsg(hwnd, | 
|---|
|  | 903 | CM_SEARCHSTRING, | 
|---|
|  | 904 | MPFROMP(&srch), MPFROMLONG(CMA_FIRST)); | 
|---|
|  | 905 | if (pci && (INT) pci != -1) { | 
|---|
|  | 906 | /* make found item current item */ | 
|---|
|  | 907 | WinSendMsg(hwnd, | 
|---|
|  | 908 | CM_SETRECORDEMPHASIS, | 
|---|
|  | 909 | MPFROMP(pci), MPFROM2SHORT(TRUE, CRA_CURSORED)); | 
|---|
|  | 910 | /* make sure that record shows in viewport */ | 
|---|
|  | 911 | ShowCnrRecord(hwnd, (PMINIRECORDCORE) pci); | 
|---|
|  | 912 | return (MRESULT) TRUE; | 
|---|
|  | 913 | } | 
|---|
|  | 914 | else { | 
|---|
|  | 915 | if (SHORT1FROMMP(mp2) == ' ') { | 
|---|
|  | 916 | dcd->szCommonName[len] = 0; | 
|---|
| [176] | 917 | break; | 
|---|
| [551] | 918 | } | 
|---|
|  | 919 | *dcd->szCommonName = 0; | 
|---|
|  | 920 | dcd->lasttime = 0; | 
|---|
|  | 921 | if (len)                      // retry as first letter if no match | 
|---|
|  | 922 | goto KbdRetry; | 
|---|
| [176] | 923 | } | 
|---|
| [551] | 924 | break; | 
|---|
| [2] | 925 | } | 
|---|
| [551] | 926 | } | 
|---|
|  | 927 | break; | 
|---|
| [2] | 928 |  | 
|---|
| [551] | 929 | case WM_MOUSEMOVE: | 
|---|
|  | 930 | case WM_BUTTON1UP: | 
|---|
|  | 931 | case WM_BUTTON2UP: | 
|---|
|  | 932 | case WM_BUTTON3UP: | 
|---|
|  | 933 | shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 934 | break; | 
|---|
| [2] | 935 |  | 
|---|
| [551] | 936 | case UM_TIMER: | 
|---|
|  | 937 | if (dcd && dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent) && | 
|---|
|  | 938 | hwndStatus2) { | 
|---|
|  | 939 | FILEFINDBUF3 ffb; | 
|---|
|  | 940 | ULONG nm = 1L; | 
|---|
|  | 941 | HDIR hdir = HDIR_CREATE; | 
|---|
| [2] | 942 |  | 
|---|
| [551] | 943 | if (*SwapperDat) { | 
|---|
|  | 944 | if (!DosFindFirst(SwapperDat, | 
|---|
|  | 945 | &hdir, | 
|---|
|  | 946 | FILE_NORMAL | FILE_HIDDEN | | 
|---|
|  | 947 | FILE_SYSTEM | FILE_ARCHIVED | FILE_READONLY, | 
|---|
|  | 948 | &ffb, sizeof(ffb), &nm, FIL_STANDARD)) { | 
|---|
|  | 949 | CHAR tb[39], tm[39], tpm[39], s[163]; | 
|---|
|  | 950 | ULONG amem; | 
|---|
| [2] | 951 |  | 
|---|
| [551] | 952 | priority_bumped(); | 
|---|
|  | 953 | DosFindClose(hdir); | 
|---|
|  | 954 | if (!DosQuerySysInfo(QSV_TOTAVAILMEM, | 
|---|
|  | 955 | QSV_TOTAVAILMEM, | 
|---|
|  | 956 | (PVOID) & amem, sizeof(amem))) { | 
|---|
|  | 957 | CommaFmtULL(tpm, sizeof(tpm), amem, 'M'); | 
|---|
| [176] | 958 | } | 
|---|
|  | 959 | else | 
|---|
| [551] | 960 | *tpm = 0; | 
|---|
|  | 961 | if (!Dos16MemAvail(&amem)) | 
|---|
|  | 962 | CommaFmtULL(tm, sizeof(tm), amem, 'M'); | 
|---|
|  | 963 | else | 
|---|
|  | 964 | *tm = 0; | 
|---|
|  | 965 | CommaFmtULL(tb, sizeof(tb), ffb.cbFile, 'M'); | 
|---|
|  | 966 | sprintf(s, " %s %s%s%s%s%s", | 
|---|
|  | 967 | GetPString(IDS_SWAPFILETEXT), | 
|---|
|  | 968 | tb, | 
|---|
|  | 969 | *tm ? GetPString(IDS_TREEMEMTEXT) : NullStr, | 
|---|
|  | 970 | tm, *tpm ? "/" : NullStr, tpm); | 
|---|
|  | 971 | WinSetWindowText(hwndStatus2, s); | 
|---|
| [176] | 972 | } | 
|---|
|  | 973 | else | 
|---|
| [551] | 974 | WinSetWindowText(hwndStatus2, NullStr); | 
|---|
| [2] | 975 | } | 
|---|
| [551] | 976 | else | 
|---|
|  | 977 | WinSetWindowText(hwndStatus2, NullStr); | 
|---|
|  | 978 | } | 
|---|
|  | 979 | if (msg == UM_TIMER) | 
|---|
|  | 980 | return 0; | 
|---|
|  | 981 | break; | 
|---|
| [2] | 982 |  | 
|---|
| [551] | 983 | case WM_PRESPARAMCHANGED: | 
|---|
|  | 984 | PresParamChanged(hwnd, "TreeCnr", mp1, mp2); | 
|---|
|  | 985 | break; | 
|---|
| [2] | 986 |  | 
|---|
| [551] | 987 | case UM_FILESMENU: | 
|---|
|  | 988 | { | 
|---|
|  | 989 | PCNRITEM pci; | 
|---|
|  | 990 | HWND menuHwnd = (HWND) 0; | 
|---|
| [2] | 991 |  | 
|---|
| [551] | 992 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 993 | if (pci && (INT) pci != -1) { | 
|---|
|  | 994 | if (IsRoot(pci->szFileName)) | 
|---|
|  | 995 | menuHwnd = CheckMenu(&TreeMenu, TREE_POPUP); | 
|---|
|  | 996 | else { | 
|---|
|  | 997 | menuHwnd = CheckMenu(&DirMenu, DIR_POPUP); | 
|---|
| [2] | 998 | //            WinEnableMenuItem(DirMenu, | 
|---|
|  | 999 | //                              IDM_TREE, | 
|---|
|  | 1000 | //                              FALSE); | 
|---|
| [176] | 1001 | } | 
|---|
| [551] | 1002 | if (!(pci->attrFile & FILE_DIRECTORY)) | 
|---|
|  | 1003 | menuHwnd = CheckMenu(&FileMenu, FILE_POPUP); | 
|---|
| [2] | 1004 | } | 
|---|
| [551] | 1005 | return MRFROMLONG(menuHwnd); | 
|---|
|  | 1006 | } | 
|---|
| [2] | 1007 |  | 
|---|
| [551] | 1008 | case UM_COMPARE: | 
|---|
|  | 1009 | if (dcd && mp1 && mp2) { | 
|---|
| [2] | 1010 |  | 
|---|
| [551] | 1011 | COMPARE *cmp; | 
|---|
|  | 1012 | CHAR *leftdir = (CHAR *) mp1, *rightdir = (CHAR *) mp2; | 
|---|
| [2] | 1013 |  | 
|---|
| [551] | 1014 | if (!IsFile(leftdir) && !IsFile(rightdir)) { | 
|---|
|  | 1015 | cmp = xmallocz(sizeof(COMPARE), pszSrcFile, __LINE__); | 
|---|
|  | 1016 | if (cmp) { | 
|---|
|  | 1017 | cmp->size = sizeof(COMPARE); | 
|---|
|  | 1018 | strcpy(cmp->leftdir, leftdir); | 
|---|
|  | 1019 | strcpy(cmp->rightdir, rightdir); | 
|---|
|  | 1020 | cmp->hwndParent = dcd->hwndParent; | 
|---|
|  | 1021 | cmp->dcd.hwndParent = dcd->hwndParent; | 
|---|
|  | 1022 | WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 1023 | HWND_DESKTOP, | 
|---|
|  | 1024 | CompareDlgProc, FM3ModHandle, COMP_FRAME, MPFROMP(cmp)); | 
|---|
| [176] | 1025 | } | 
|---|
| [2] | 1026 | } | 
|---|
| [551] | 1027 | } | 
|---|
|  | 1028 | return 0; | 
|---|
| [2] | 1029 |  | 
|---|
| [551] | 1030 | case UM_UPDATERECORDLIST: | 
|---|
|  | 1031 | if (dcd && mp1) | 
|---|
|  | 1032 | WinSendMsg(dcd->hwndObject, msg, mp1, mp2); | 
|---|
|  | 1033 | return 0; | 
|---|
| [2] | 1034 |  | 
|---|
| [551] | 1035 | case UM_UPDATERECORD: | 
|---|
|  | 1036 | if (dcd && mp1) { | 
|---|
| [2] | 1037 |  | 
|---|
| [551] | 1038 | CHAR *filename; | 
|---|
| [2] | 1039 |  | 
|---|
| [551] | 1040 | filename = mp1; | 
|---|
|  | 1041 | if (filename) | 
|---|
|  | 1042 | UpdateCnrRecord(hwnd, filename, TRUE, dcd); | 
|---|
|  | 1043 | } | 
|---|
|  | 1044 | return 0; | 
|---|
| [2] | 1045 |  | 
|---|
| [551] | 1046 | case WM_SETFOCUS: | 
|---|
|  | 1047 | if (dcd && hwndStatus && mp2) { | 
|---|
|  | 1048 | WinSendMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1049 | if (hwndMain) | 
|---|
|  | 1050 | PostMsg(hwndMain, UM_ADVISEFOCUS, MPFROMLONG(dcd->hwndFrame), MPVOID); | 
|---|
|  | 1051 | } | 
|---|
|  | 1052 | break; | 
|---|
| [2] | 1053 |  | 
|---|
| [551] | 1054 | case UM_RESCAN: | 
|---|
|  | 1055 | if (dcd && dcd->hwndFrame == WinQueryActiveWindow(dcd->hwndParent)) { | 
|---|
|  | 1056 | /* | 
|---|
|  | 1057 | * put name of our window on status line | 
|---|
|  | 1058 | */ | 
|---|
| [2] | 1059 |  | 
|---|
| [551] | 1060 | PCNRITEM pci = NULL; | 
|---|
|  | 1061 | CHAR str[CCHMAXPATH + 6]; | 
|---|
| [2] | 1062 |  | 
|---|
| [551] | 1063 | if (fAutoView && hwndMain) { | 
|---|
|  | 1064 | pci = WinSendMsg(hwnd, | 
|---|
|  | 1065 | CM_QUERYRECORDEMPHASIS, | 
|---|
|  | 1066 | MPFROMLONG(CMA_FIRST), MPFROMSHORT(CRA_CURSORED)); | 
|---|
|  | 1067 | if (pci && (INT) pci != -1 && fComments && | 
|---|
|  | 1068 | !(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_SLOW)) | 
|---|
|  | 1069 | WinSendMsg(hwndMain, UM_LOADFILE, MPFROMP(pci->szFileName), MPVOID); | 
|---|
|  | 1070 | else | 
|---|
|  | 1071 | WinSendMsg(hwndMain, UM_LOADFILE, MPVOID, MPVOID); | 
|---|
|  | 1072 | } | 
|---|
|  | 1073 | if (!fAutoView || !hwndMain) | 
|---|
|  | 1074 | pci = (PCNRITEM) WinSendMsg(hwnd, | 
|---|
|  | 1075 | CM_QUERYRECORDEMPHASIS, | 
|---|
|  | 1076 | MPFROMLONG(CMA_FIRST), | 
|---|
|  | 1077 | MPFROMSHORT(CRA_CURSORED)); | 
|---|
|  | 1078 | if ((INT) pci == -1) | 
|---|
|  | 1079 | pci = NULL; | 
|---|
|  | 1080 | if (pci) { | 
|---|
|  | 1081 | if (*(ULONG *) realappname == FM3UL) { | 
|---|
|  | 1082 | sprintf(str, "%s %s", GetPString(IDS_DTTEXT), pci->szFileName); | 
|---|
|  | 1083 | WinSetWindowText(dcd->hwndFrame, str); | 
|---|
|  | 1084 | WinSetWindowText(WinWindowFromID(dcd->hwndFrame, FID_TITLEBAR), | 
|---|
|  | 1085 | str); | 
|---|
| [176] | 1086 | } | 
|---|
| [551] | 1087 | else | 
|---|
|  | 1088 | WinSetWindowText(WinWindowFromID(dcd->hwndFrame, | 
|---|
|  | 1089 | MAIN_STATUS), pci->szFileName); | 
|---|
|  | 1090 | if (fMoreButtons && hwndName) { | 
|---|
|  | 1091 | WinSetWindowText(hwndName, pci->szFileName); | 
|---|
|  | 1092 | sprintf(str, | 
|---|
|  | 1093 | "%04u/%02u/%02u %02u:%02u:%02u", | 
|---|
|  | 1094 | pci->date.year, | 
|---|
|  | 1095 | pci->date.month, | 
|---|
|  | 1096 | pci->date.day, | 
|---|
|  | 1097 | pci->time.hours, pci->time.minutes, pci->time.seconds); | 
|---|
|  | 1098 | WinSetWindowText(hwndDate, str); | 
|---|
|  | 1099 | WinSetWindowText(hwndAttr, pci->pszDispAttr); | 
|---|
| [176] | 1100 | } | 
|---|
| [2] | 1101 | } | 
|---|
| [551] | 1102 | PostMsg(dcd->hwndObject, UM_RESCAN2, MPFROMP(pci), MPVOID); | 
|---|
|  | 1103 | if (hwndStatus2) | 
|---|
|  | 1104 | PostMsg(hwnd, UM_TIMER, MPVOID, MPVOID); | 
|---|
|  | 1105 | } | 
|---|
|  | 1106 | return 0; | 
|---|
| [2] | 1107 |  | 
|---|
| [551] | 1108 | case UM_SETUP2: | 
|---|
|  | 1109 | { | 
|---|
|  | 1110 | PCNRITEM pci = (PCNRITEM) mp1; | 
|---|
| [2] | 1111 |  | 
|---|
| [551] | 1112 | if (pci) | 
|---|
|  | 1113 | NotifyError(pci->szFileName, (ULONG) mp2); | 
|---|
|  | 1114 | } | 
|---|
|  | 1115 | return 0; | 
|---|
|  | 1116 |  | 
|---|
|  | 1117 | case UM_SETUP: | 
|---|
|  | 1118 | if (!dcd) { | 
|---|
|  | 1119 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 1120 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [2] | 1121 | return 0; | 
|---|
| [551] | 1122 | } | 
|---|
|  | 1123 | else { | 
|---|
|  | 1124 | if (!dcd->hwndObject) { | 
|---|
|  | 1125 | /* | 
|---|
|  | 1126 | * first time through -- set things up | 
|---|
|  | 1127 | */ | 
|---|
| [2] | 1128 |  | 
|---|
| [551] | 1129 | CNRINFO cnri; | 
|---|
| [2] | 1130 |  | 
|---|
| [551] | 1131 | RestorePresParams(hwnd, "TreeCnr"); | 
|---|
|  | 1132 | memset(&cnri, 0, sizeof(CNRINFO)); | 
|---|
|  | 1133 | cnri.cb = sizeof(CNRINFO); | 
|---|
|  | 1134 | WinSendMsg(hwnd, | 
|---|
|  | 1135 | CM_QUERYCNRINFO, | 
|---|
|  | 1136 | MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO))); | 
|---|
|  | 1137 | cnri.cyLineSpacing = 0; | 
|---|
|  | 1138 | cnri.cxTreeIndent = 12L; | 
|---|
|  | 1139 | cnri.pSortRecord = (PVOID) SortTreeCnr; | 
|---|
|  | 1140 | cnri.flWindowAttr &= (~(CV_NAME | CV_DETAIL | CV_TEXT)); | 
|---|
|  | 1141 | cnri.flWindowAttr |= (CV_TREE | CA_TREELINE | CV_ICON | CV_MINI); | 
|---|
|  | 1142 | { | 
|---|
|  | 1143 | ULONG size = sizeof(ULONG); | 
|---|
| [2] | 1144 |  | 
|---|
| [551] | 1145 | PrfQueryProfileData(fmprof, | 
|---|
|  | 1146 | appname, | 
|---|
|  | 1147 | "TreeflWindowAttr", | 
|---|
|  | 1148 | (PVOID) & cnri.flWindowAttr, &size); | 
|---|
|  | 1149 | size = sizeof(MASK); | 
|---|
|  | 1150 | *dcd->mask.prompt = 0; | 
|---|
|  | 1151 | if (!*dcd->mask.szMask && !dcd->mask.attrFile) { | 
|---|
|  | 1152 | if (PrfQueryProfileSize(fmprof, | 
|---|
|  | 1153 | appname, "TreeFilter", &size) && size) { | 
|---|
|  | 1154 | PrfQueryProfileData(fmprof, | 
|---|
|  | 1155 | appname, "TreeFilter", &dcd->mask, &size); | 
|---|
|  | 1156 | SetMask(NULL, &dcd->mask); | 
|---|
| [176] | 1157 | } | 
|---|
| [551] | 1158 | else | 
|---|
|  | 1159 | dcd->mask.attrFile = (FILE_READONLY | FILE_NORMAL | | 
|---|
|  | 1160 | FILE_ARCHIVED | FILE_DIRECTORY | | 
|---|
|  | 1161 | FILE_HIDDEN | FILE_SYSTEM); | 
|---|
| [176] | 1162 | } | 
|---|
| [551] | 1163 | dcd->mask.attrFile |= FILE_DIRECTORY; | 
|---|
| [176] | 1164 | } | 
|---|
| [551] | 1165 | cnri.flWindowAttr &= (~(CA_MIXEDTARGETEMPH | CA_ORDEREDTARGETEMPH)); | 
|---|
|  | 1166 | cnri.flWindowAttr |= CV_FLOW; | 
|---|
|  | 1167 | dcd->flWindowAttr = cnri.flWindowAttr; | 
|---|
|  | 1168 | WinSendMsg(hwnd, | 
|---|
|  | 1169 | CM_SETCNRINFO, | 
|---|
|  | 1170 | MPFROMP(&cnri), | 
|---|
|  | 1171 | MPFROMLONG(CMA_FLWINDOWATTR | CMA_LINESPACING | | 
|---|
|  | 1172 | CMA_CXTREEINDENT | CMA_PSORTRECORD)); | 
|---|
|  | 1173 | if (_beginthread(MakeObjWin, NULL, 327680, (PVOID) dcd) == -1) { | 
|---|
|  | 1174 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 1175 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 1176 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 1177 | return 0; | 
|---|
|  | 1178 | } | 
|---|
|  | 1179 | else | 
|---|
|  | 1180 | DosSleep(1L); | 
|---|
| [2] | 1181 | } | 
|---|
| [551] | 1182 | } | 
|---|
|  | 1183 | return 0; | 
|---|
| [2] | 1184 |  | 
|---|
| [551] | 1185 | case WM_BUTTON3CLICK: | 
|---|
|  | 1186 | case WM_CHORD: | 
|---|
|  | 1187 | { | 
|---|
|  | 1188 | PCNRITEM pci = NULL; | 
|---|
|  | 1189 | QUERYRECFROMRECT pqr; | 
|---|
|  | 1190 | NOTIFYRECORDENTER nr; | 
|---|
|  | 1191 | BOOL tbool = fDCOpens; | 
|---|
|  | 1192 | RECTL rectl; | 
|---|
|  | 1193 | POINTL ptl; | 
|---|
| [2] | 1194 |  | 
|---|
| [551] | 1195 | shiftstate = (SHORT2FROMMP(mp2) & (KC_SHIFT | KC_ALT | KC_CTRL)); | 
|---|
|  | 1196 | if (msg == WM_CHORD) { | 
|---|
|  | 1197 | if (!WinQueryPointerPos(HWND_DESKTOP, &ptl)) | 
|---|
|  | 1198 | break; | 
|---|
|  | 1199 | WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1L); | 
|---|
| [2] | 1200 | } | 
|---|
| [551] | 1201 | else { | 
|---|
|  | 1202 | ptl.x = SHORT1FROMMP(mp1); | 
|---|
|  | 1203 | ptl.y = SHORT2FROMMP(mp1); | 
|---|
|  | 1204 | } | 
|---|
|  | 1205 | memset(&rectl, 0, sizeof(rectl)); | 
|---|
|  | 1206 | memset(&pqr, 0, sizeof(pqr)); | 
|---|
|  | 1207 | pqr.cb = sizeof(pqr); | 
|---|
|  | 1208 | pqr.rect.xLeft = ptl.x - 1; | 
|---|
|  | 1209 | pqr.rect.xRight = ptl.x + 1; | 
|---|
|  | 1210 | pqr.rect.yTop = ptl.y + 1; | 
|---|
|  | 1211 | pqr.rect.yBottom = ptl.y - 1; | 
|---|
|  | 1212 | pqr.fsSearch = CMA_PARTIAL; | 
|---|
|  | 1213 | pci = (PCNRITEM) WinSendMsg(hwnd, | 
|---|
|  | 1214 | CM_QUERYRECORDFROMRECT, | 
|---|
|  | 1215 | MPFROMLONG(CMA_FIRST), MPFROMP(&pqr)); | 
|---|
|  | 1216 | if (!pci || (INT) pci == -1) | 
|---|
|  | 1217 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 1218 | else { | 
|---|
|  | 1219 | memset(&nr, 0, sizeof(nr)); | 
|---|
|  | 1220 | nr.hwndCnr = hwnd; | 
|---|
|  | 1221 | nr.pRecord = (PRECORDCORE) pci; | 
|---|
|  | 1222 | fDCOpens = TRUE; | 
|---|
|  | 1223 | WinSendMsg(hwnd, | 
|---|
|  | 1224 | WM_CONTROL, | 
|---|
|  | 1225 | MPFROM2SHORT(WinQueryWindowUShort(hwnd, | 
|---|
|  | 1226 | QWS_ID), | 
|---|
|  | 1227 | CN_ENTER), MPFROMP(&nr)); | 
|---|
|  | 1228 | PostMsg(hwnd, UM_RESTOREDC, MPFROMLONG(tbool), MPVOID); | 
|---|
|  | 1229 | } | 
|---|
|  | 1230 | } | 
|---|
|  | 1231 | break; | 
|---|
| [2] | 1232 |  | 
|---|
| [551] | 1233 | case UM_RESTOREDC: | 
|---|
|  | 1234 | fDCOpens = (BOOL) mp1; | 
|---|
|  | 1235 | return 0; | 
|---|
| [2] | 1236 |  | 
|---|
| [551] | 1237 | case WM_CONTROL: | 
|---|
|  | 1238 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1239 | if (dcd) { | 
|---|
|  | 1240 | switch (SHORT2FROMMP(mp1)) { | 
|---|
|  | 1241 | case CN_BEGINEDIT: | 
|---|
|  | 1242 | case CN_REALLOCPSZ: | 
|---|
|  | 1243 | case CN_ENDEDIT: | 
|---|
|  | 1244 | { | 
|---|
|  | 1245 | MRESULT mre; | 
|---|
| [2] | 1246 |  | 
|---|
| [551] | 1247 | mre = CnrDirectEdit(hwnd, msg, mp1, mp2); | 
|---|
|  | 1248 | if (mre != (MRESULT) - 1) | 
|---|
|  | 1249 | return mre; | 
|---|
|  | 1250 | } | 
|---|
|  | 1251 | break; | 
|---|
| [2] | 1252 |  | 
|---|
| [551] | 1253 | case CN_DRAGLEAVE: | 
|---|
|  | 1254 | if (mp2) { | 
|---|
| [2] | 1255 |  | 
|---|
| [551] | 1256 | PDRAGINFO pDInfo; | 
|---|
| [2] | 1257 |  | 
|---|
| [618] | 1258 | // fixme to know why - seems superfluous | 
|---|
| [551] | 1259 | pDInfo = ((PCNRDRAGINFO) mp2)->pDragInfo; | 
|---|
|  | 1260 | DrgAccessDraginfo(pDInfo); | 
|---|
|  | 1261 | DrgFreeDraginfo(pDInfo); | 
|---|
|  | 1262 | } | 
|---|
|  | 1263 | return 0; | 
|---|
| [2] | 1264 |  | 
|---|
| [551] | 1265 | case CN_DRAGAFTER: | 
|---|
|  | 1266 | case CN_DRAGOVER: | 
|---|
|  | 1267 | if (mp2) { | 
|---|
| [2] | 1268 |  | 
|---|
| [551] | 1269 | PDRAGITEM pDItem; | 
|---|
|  | 1270 | PDRAGINFO pDInfo; | 
|---|
|  | 1271 | PCNRITEM pci; | 
|---|
|  | 1272 | USHORT uso; | 
|---|
| [2] | 1273 |  | 
|---|
| [551] | 1274 | pDInfo = ((PCNRDRAGINFO) mp2)->pDragInfo; | 
|---|
| [618] | 1275 | if (!DrgAccessDraginfo(pDInfo)) { | 
|---|
|  | 1276 | Win_Error(hwnd, hwnd, pszSrcFile, __LINE__, | 
|---|
|  | 1277 | "DrgAccessDraginfo"); | 
|---|
|  | 1278 | return (MRFROM2SHORT(DOR_NODROP, 0));       /* Drop not valid */ | 
|---|
|  | 1279 | } | 
|---|
| [551] | 1280 | pci = (PCNRITEM) ((PCNRDRAGINFO) mp2)->pRecord; | 
|---|
|  | 1281 | if ((INT) pci == -1) | 
|---|
|  | 1282 | pci = NULL; | 
|---|
|  | 1283 | if (pci && (pci->flags & (RECFLAGS_ENV | RECFLAGS_NODROP))) { | 
|---|
|  | 1284 | DrgFreeDraginfo(pDInfo); | 
|---|
|  | 1285 | return MRFROM2SHORT(DOR_NODROP, 0); | 
|---|
|  | 1286 | } | 
|---|
|  | 1287 | if (!WinIsWindowEnabled(dcd->hwndFrame)) { | 
|---|
|  | 1288 | DrgFreeDraginfo(pDInfo); | 
|---|
|  | 1289 | return MRFROM2SHORT(DOR_NODROP, 0); | 
|---|
|  | 1290 | } | 
|---|
|  | 1291 | if (pci) { | 
|---|
|  | 1292 | uso = pDInfo->usOperation; | 
|---|
|  | 1293 | if (uso == DO_DEFAULT) | 
|---|
|  | 1294 | uso = (fCopyDefault) ? DO_COPY : DO_MOVE; | 
|---|
|  | 1295 | if (!(pci->attrFile & FILE_DIRECTORY)) { | 
|---|
|  | 1296 | if (uso != DO_LINK && uso != DO_COPY && uso != DO_MOVE) { | 
|---|
| [176] | 1297 | DrgFreeDraginfo(pDInfo); | 
|---|
| [551] | 1298 | return (MRFROM2SHORT(DOR_NODROP, 0)); | 
|---|
| [176] | 1299 | } | 
|---|
| [551] | 1300 | if (uso != DO_LINK && | 
|---|
|  | 1301 | !(driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1302 | DRIVE_NOTWRITEABLE)) { | 
|---|
| [2] | 1303 |  | 
|---|
| [551] | 1304 | ARC_TYPE *info; | 
|---|
| [2] | 1305 |  | 
|---|
| [551] | 1306 | if (!fQuickArcFind && | 
|---|
|  | 1307 | !(driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1308 | DRIVE_SLOW)) | 
|---|
|  | 1309 | info = find_type(pci->szFileName, NULL); | 
|---|
|  | 1310 | else | 
|---|
|  | 1311 | info = quick_find_type(pci->szFileName, NULL); | 
|---|
|  | 1312 | if (!info || ((uso == DO_MOVE && !info->move) || | 
|---|
|  | 1313 | (uso == DO_COPY && !info->create))) { | 
|---|
|  | 1314 | DrgFreeDraginfo(pDInfo); | 
|---|
|  | 1315 | return (MRFROM2SHORT(DOR_NODROP, 0)); | 
|---|
| [176] | 1316 | } | 
|---|
|  | 1317 | } | 
|---|
|  | 1318 | } | 
|---|
| [551] | 1319 | } | 
|---|
| [618] | 1320 | pDItem = DrgQueryDragitemPtr(pDInfo,  /* Access DRAGITEM */ | 
|---|
|  | 1321 | 0);      /* Index to DRAGITEM */ | 
|---|
| [551] | 1322 | if (DrgVerifyRMF(pDItem,      /* Check valid rendering */ | 
|---|
| [618] | 1323 | DRM_OS2FILE, /* mechanisms and data */ | 
|---|
|  | 1324 | NULL) || DrgVerifyRMF(pDItem, DRM_FM2ARCMEMBER, DRF_FM2ARCHIVE)) {   /* formats */ | 
|---|
|  | 1325 | DrgFreeDraginfo(pDInfo);    /* Free DRAGINFO */ | 
|---|
| [551] | 1326 | if (!pci || (INT) pci == -1) | 
|---|
|  | 1327 | return MRFROM2SHORT(DOR_DROP, DO_MOVE); | 
|---|
|  | 1328 | if (driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1329 | DRIVE_NOTWRITEABLE) | 
|---|
|  | 1330 | return MRFROM2SHORT(DOR_DROP, DO_LINK); | 
|---|
|  | 1331 | if (toupper(*pci->szFileName) < 'C') | 
|---|
|  | 1332 | return MRFROM2SHORT(DOR_DROP, DO_COPY); | 
|---|
| [618] | 1333 | return MRFROM2SHORT(DOR_DROP,       /* Return okay to drop */ | 
|---|
| [551] | 1334 | ((fCopyDefault) ? DO_COPY : DO_MOVE)); | 
|---|
|  | 1335 | } | 
|---|
| [618] | 1336 | DrgFreeDraginfo(pDInfo);      /* Free DRAGINFO */ | 
|---|
| [551] | 1337 | } | 
|---|
| [618] | 1338 | return MRFROM2SHORT(DOR_NODROP, 0);     /* Drop not valid */ | 
|---|
| [2] | 1339 |  | 
|---|
| [551] | 1340 | case CN_INITDRAG: | 
|---|
|  | 1341 | { | 
|---|
|  | 1342 | PCNRDRAGINIT pcd = (PCNRDRAGINIT) mp2; | 
|---|
|  | 1343 | PCNRITEM pci; | 
|---|
| [2] | 1344 |  | 
|---|
| [551] | 1345 | if (!pcd) { | 
|---|
|  | 1346 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 1347 | break; | 
|---|
|  | 1348 | } | 
|---|
|  | 1349 | else { | 
|---|
|  | 1350 | pci = (PCNRITEM) pcd->pRecord; | 
|---|
|  | 1351 | if (!pci || (INT) pci == -1) { | 
|---|
|  | 1352 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 1353 | break; | 
|---|
| [176] | 1354 | } | 
|---|
| [551] | 1355 | if (pci->flags & (RECFLAGS_ENV | RECFLAGS_NODRAG)) { | 
|---|
|  | 1356 | Runtime_Error(pszSrcFile, __LINE__, "drag not allowed"); | 
|---|
|  | 1357 | break; | 
|---|
|  | 1358 | } | 
|---|
|  | 1359 | if (hwndStatus2) { | 
|---|
|  | 1360 | WinSetWindowText(hwndStatus2, (IsRoot(pci->szFileName)) ? | 
|---|
|  | 1361 | GetPString(IDS_DRAGROOTTEXT) : | 
|---|
|  | 1362 | (pci->attrFile & FILE_DIRECTORY) ? | 
|---|
|  | 1363 | GetPString(IDS_DRAGDIRTEXT) : | 
|---|
|  | 1364 | GetPString(IDS_DRAGFILETEXT)); | 
|---|
|  | 1365 | } | 
|---|
|  | 1366 | DoFileDrag(hwnd, dcd->hwndObject, mp2, NULL, NULL, TRUE); | 
|---|
|  | 1367 | if (hwndStatus2) { | 
|---|
|  | 1368 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1369 | } | 
|---|
|  | 1370 | } | 
|---|
|  | 1371 | } | 
|---|
|  | 1372 | return 0; | 
|---|
| [2] | 1373 |  | 
|---|
| [551] | 1374 | case CN_DROP: | 
|---|
|  | 1375 | { | 
|---|
|  | 1376 | LISTINFO *li; | 
|---|
|  | 1377 | ULONG action = UM_ACTION; | 
|---|
| [2] | 1378 |  | 
|---|
| [618] | 1379 | li = DoFileDrop(hwnd, NULL, TRUE, mp1, mp2); | 
|---|
|  | 1380 | if (NumItemsToUnhilite) | 
|---|
|  | 1381 | saymsg(MB_CANCEL | MB_ICONEXCLAMATION, | 
|---|
|  | 1382 | hwnd, | 
|---|
|  | 1383 | GetPString(IDS_ERRORTEXT), | 
|---|
|  | 1384 | GetPString(IDS_EXCEEDPMDRGLMT)); | 
|---|
| [551] | 1385 | if (li) { | 
|---|
|  | 1386 | if (!*li->targetpath) { | 
|---|
|  | 1387 | if (li->list[0]) | 
|---|
|  | 1388 | PMMkDir(dcd->hwndParent, li->list[0], FALSE); | 
|---|
|  | 1389 | FreeListInfo(li); | 
|---|
|  | 1390 | return 0; | 
|---|
|  | 1391 | } | 
|---|
|  | 1392 | if (li->list && li->list[0] && IsRoot(li->list[0])) | 
|---|
|  | 1393 | li->type = DO_LINK; | 
|---|
|  | 1394 | else if (fDragndropDlg && (!*li->arcname || !li->info)) { | 
|---|
| [2] | 1395 |  | 
|---|
| [551] | 1396 | CHECKLIST cl; | 
|---|
| [2] | 1397 |  | 
|---|
| [551] | 1398 | memset(&cl, 0, sizeof(cl)); | 
|---|
|  | 1399 | cl.size = sizeof(cl); | 
|---|
|  | 1400 | cl.flags = li->type; | 
|---|
|  | 1401 | cl.list = li->list; | 
|---|
|  | 1402 | cl.cmd = li->type; | 
|---|
|  | 1403 | cl.prompt = li->targetpath; | 
|---|
|  | 1404 | li->type = WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 1405 | dcd->hwndParent, | 
|---|
|  | 1406 | DropListProc, | 
|---|
| [618] | 1407 | FM3ModHandle, DND_FRAME, MPFROMP(&cl)); | 
|---|
|  | 1408 | if (li->type == DID_ERROR) | 
|---|
|  | 1409 | Win_Error(hwnd, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 1410 | "Drag & Drop Dialog"); | 
|---|
|  | 1411 | if (!li->type) { | 
|---|
| [551] | 1412 | FreeListInfo(li); | 
|---|
|  | 1413 | return 0; | 
|---|
|  | 1414 | } | 
|---|
|  | 1415 | li->list = cl.list; | 
|---|
| [618] | 1416 | if (!li->list || !li->list[0]) { | 
|---|
| [551] | 1417 | FreeListInfo(li); | 
|---|
|  | 1418 | return 0; | 
|---|
|  | 1419 | } | 
|---|
|  | 1420 | } | 
|---|
|  | 1421 | switch (li->type) { | 
|---|
|  | 1422 | case DO_LINK: | 
|---|
|  | 1423 | if (fLinkSetsIcon) { | 
|---|
|  | 1424 | li->type = IDM_SETICON; | 
|---|
|  | 1425 | action = UM_MASSACTION; | 
|---|
|  | 1426 | } | 
|---|
|  | 1427 | else | 
|---|
|  | 1428 | li->type = IDM_COMPARE; | 
|---|
|  | 1429 | break; | 
|---|
|  | 1430 | case DND_EXTRACT: | 
|---|
|  | 1431 | if (*li->targetpath && !IsFile(li->targetpath)) | 
|---|
|  | 1432 | li->type = IDM_EXTRACT; | 
|---|
|  | 1433 | break; | 
|---|
|  | 1434 | case DND_MOVE: | 
|---|
|  | 1435 | li->type = IDM_MOVE; | 
|---|
|  | 1436 | if (*li->targetpath && IsFile(li->targetpath) == 1) { | 
|---|
|  | 1437 | action = UM_MASSACTION; | 
|---|
|  | 1438 | li->type = IDM_ARCHIVEM; | 
|---|
|  | 1439 | } | 
|---|
|  | 1440 | break; | 
|---|
|  | 1441 | case DND_WILDMOVE: | 
|---|
|  | 1442 | li->type = IDM_WILDMOVE; | 
|---|
|  | 1443 | if (*li->targetpath && IsFile(li->targetpath) == 1) { | 
|---|
|  | 1444 | action = UM_MASSACTION; | 
|---|
|  | 1445 | li->type = IDM_ARCHIVEM; | 
|---|
|  | 1446 | } | 
|---|
|  | 1447 | break; | 
|---|
|  | 1448 | case DND_OBJECT: | 
|---|
|  | 1449 | li->type = IDM_OBJECT; | 
|---|
|  | 1450 | action = UM_MASSACTION; | 
|---|
|  | 1451 | break; | 
|---|
|  | 1452 | case DND_SHADOW: | 
|---|
|  | 1453 | li->type = IDM_SHADOW; | 
|---|
|  | 1454 | action = UM_MASSACTION; | 
|---|
|  | 1455 | break; | 
|---|
|  | 1456 | case DND_COMPARE: | 
|---|
|  | 1457 | li->type = IDM_COMPARE; | 
|---|
|  | 1458 | break; | 
|---|
|  | 1459 | case DND_SETICON: | 
|---|
|  | 1460 | action = UM_MASSACTION; | 
|---|
|  | 1461 | li->type = IDM_SETICON; | 
|---|
|  | 1462 | break; | 
|---|
|  | 1463 | case DND_COPY: | 
|---|
|  | 1464 | li->type = IDM_COPY; | 
|---|
|  | 1465 | if (*li->targetpath && IsFile(li->targetpath) == 1) { | 
|---|
|  | 1466 | action = UM_MASSACTION; | 
|---|
|  | 1467 | li->type = IDM_ARCHIVE; | 
|---|
|  | 1468 | } | 
|---|
|  | 1469 | break; | 
|---|
|  | 1470 | case DND_WILDCOPY: | 
|---|
|  | 1471 | li->type = IDM_WILDCOPY; | 
|---|
|  | 1472 | if (*li->targetpath && IsFile(li->targetpath) == 1) { | 
|---|
|  | 1473 | action = UM_MASSACTION; | 
|---|
|  | 1474 | li->type = IDM_ARCHIVE; | 
|---|
|  | 1475 | } | 
|---|
|  | 1476 | break; | 
|---|
|  | 1477 | default: | 
|---|
|  | 1478 | if (*li->arcname && li->info) { | 
|---|
|  | 1479 | action = UM_MASSACTION; | 
|---|
|  | 1480 | li->type = (li->type == DO_MOVE) ? | 
|---|
|  | 1481 | IDM_FAKEEXTRACTM : IDM_FAKEEXTRACT; | 
|---|
|  | 1482 | } | 
|---|
|  | 1483 | else if (*li->targetpath && IsFile(li->targetpath) == 1) { | 
|---|
|  | 1484 | action = UM_MASSACTION; | 
|---|
|  | 1485 | li->type = (li->type == DO_MOVE) ? IDM_ARCHIVEM : IDM_ARCHIVE; | 
|---|
|  | 1486 | } | 
|---|
|  | 1487 | else | 
|---|
|  | 1488 | li->type = (li->type == DO_MOVE) ? IDM_MOVE : IDM_COPY; | 
|---|
|  | 1489 | break; | 
|---|
|  | 1490 | } | 
|---|
|  | 1491 | if (!li->list || !li->list[0]) | 
|---|
|  | 1492 | FreeListInfo(li); | 
|---|
|  | 1493 | else if (!PostMsg(dcd->hwndObject, action, MPFROMP(li), MPVOID)) | 
|---|
|  | 1494 | FreeListInfo(li); | 
|---|
|  | 1495 | else { | 
|---|
| [2] | 1496 |  | 
|---|
| [551] | 1497 | USHORT usop = 0; | 
|---|
| [2] | 1498 |  | 
|---|
| [551] | 1499 | switch (li->type) { | 
|---|
|  | 1500 | case IDM_COPY: | 
|---|
|  | 1501 | case IDM_WILDCOPY: | 
|---|
|  | 1502 | usop = DO_COPY; | 
|---|
|  | 1503 | break; | 
|---|
|  | 1504 | case IDM_MOVE: | 
|---|
|  | 1505 | case IDM_WILDMOVE: | 
|---|
|  | 1506 | case IDM_ARCHIVEM: | 
|---|
|  | 1507 | usop = DO_MOVE; | 
|---|
|  | 1508 | break; | 
|---|
| [176] | 1509 | } | 
|---|
| [551] | 1510 | if (usop) | 
|---|
|  | 1511 | return MRFROM2SHORT(DOR_DROP, usop); | 
|---|
| [176] | 1512 | } | 
|---|
| [551] | 1513 | } | 
|---|
|  | 1514 | } | 
|---|
|  | 1515 | return 0; | 
|---|
| [2] | 1516 |  | 
|---|
| [551] | 1517 | case CN_EMPHASIS: | 
|---|
|  | 1518 | if (!fDummy) { | 
|---|
| [2] | 1519 |  | 
|---|
| [551] | 1520 | PNOTIFYRECORDEMPHASIS pre = mp2; | 
|---|
| [2] | 1521 |  | 
|---|
| [551] | 1522 | if (pre->fEmphasisMask & CRA_SELECTED) { | 
|---|
|  | 1523 | if (pre->pRecord->flRecordAttr & CRA_SELECTED) { | 
|---|
|  | 1524 | if (((PCNRITEM) (pre->pRecord))->attrFile & FILE_DIRECTORY) { | 
|---|
|  | 1525 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1526 | if (fFollowTree && | 
|---|
|  | 1527 | !(driveflags | 
|---|
|  | 1528 | [toupper(*((PCNRITEM) pre->pRecord)->szFileName) - | 
|---|
|  | 1529 | 'A'] & DRIVE_INVALID)) { | 
|---|
|  | 1530 | if (!LastDir && !ParentIsDesktop(hwnd, dcd->hwndParent)) | 
|---|
|  | 1531 | LastDir = FindDirCnr(dcd->hwndParent); | 
|---|
|  | 1532 | if (LastDir) { | 
|---|
| [2] | 1533 |  | 
|---|
| [551] | 1534 | NOTIFYRECORDENTER pri; | 
|---|
|  | 1535 | BOOL tbool = fDCOpens; | 
|---|
| [2] | 1536 |  | 
|---|
| [551] | 1537 | fDCOpens = FALSE; | 
|---|
|  | 1538 | memset(&pri, 0, sizeof(pri)); | 
|---|
|  | 1539 | pri.hwndCnr = hwnd; | 
|---|
|  | 1540 | pri.fKey = FALSE; | 
|---|
|  | 1541 | pri.pRecord = pre->pRecord; | 
|---|
|  | 1542 | WinSendMsg(hwnd, | 
|---|
|  | 1543 | WM_CONTROL, | 
|---|
|  | 1544 | MPFROM2SHORT(SHORT1FROMMP(mp1), | 
|---|
|  | 1545 | CN_ENTER), MPFROMP(&pri)); | 
|---|
|  | 1546 | fDCOpens = tbool; | 
|---|
| [176] | 1547 | } | 
|---|
|  | 1548 | } | 
|---|
| [551] | 1549 | if (*(ULONG *) realappname != FM3UL) | 
|---|
|  | 1550 | WinSetWindowText(WinWindowFromID(dcd->hwndFrame, | 
|---|
|  | 1551 | MAIN_STATUS), | 
|---|
|  | 1552 | ((PCNRITEM) (pre->pRecord))->szFileName); | 
|---|
| [176] | 1553 | } | 
|---|
|  | 1554 | } | 
|---|
| [551] | 1555 | } | 
|---|
|  | 1556 | } | 
|---|
|  | 1557 | break; | 
|---|
| [2] | 1558 |  | 
|---|
| [551] | 1559 | case CN_CONTEXTMENU: | 
|---|
|  | 1560 | { | 
|---|
|  | 1561 | PCNRITEM pci = (PCNRITEM) mp2; | 
|---|
|  | 1562 | BOOL wasFollowing; | 
|---|
| [2] | 1563 |  | 
|---|
| [551] | 1564 | DosEnterCritSec(); | 
|---|
|  | 1565 | wasFollowing = fFollowTree; | 
|---|
|  | 1566 | fFollowTree = FALSE; | 
|---|
|  | 1567 | DosExitCritSec(); | 
|---|
|  | 1568 | if (pci && (INT) pci != -1 && !(pci->flags & RECFLAGS_ENV)) { | 
|---|
|  | 1569 | WinSendMsg(hwnd, | 
|---|
|  | 1570 | CM_SETRECORDEMPHASIS, | 
|---|
|  | 1571 | MPFROMP(pci), MPFROM2SHORT(TRUE, CRA_CURSORED)); | 
|---|
|  | 1572 | MarkAll(hwnd, FALSE, FALSE, TRUE); | 
|---|
|  | 1573 | if (!(pci->attrFile & FILE_DIRECTORY)) | 
|---|
|  | 1574 | dcd->hwndLastMenu = CheckMenu(&FileMenu, FILE_POPUP); | 
|---|
|  | 1575 | else if (!IsRoot(pci->szFileName)) | 
|---|
|  | 1576 | dcd->hwndLastMenu = CheckMenu(&DirMenu, DIR_POPUP); | 
|---|
|  | 1577 | else | 
|---|
|  | 1578 | dcd->hwndLastMenu = CheckMenu(&TreeMenu, TREE_POPUP); | 
|---|
|  | 1579 | } | 
|---|
|  | 1580 | else { | 
|---|
|  | 1581 | dcd->hwndLastMenu = CheckMenu(&TreeCnrMenu, TREECNR_POPUP); | 
|---|
|  | 1582 | if (dcd->hwndLastMenu && !dcd->cnremphasized) { | 
|---|
|  | 1583 | WinSendMsg(hwnd, CM_SETRECORDEMPHASIS, MPVOID, | 
|---|
|  | 1584 | MPFROM2SHORT(TRUE, CRA_SOURCE)); | 
|---|
|  | 1585 | dcd->cnremphasized = TRUE; | 
|---|
|  | 1586 | } | 
|---|
|  | 1587 | } | 
|---|
|  | 1588 | if (dcd->hwndLastMenu) { | 
|---|
|  | 1589 | if (dcd->hwndLastMenu == DirMenu) | 
|---|
|  | 1590 | WinEnableMenuItem(DirMenu, IDM_TREE, FALSE); | 
|---|
|  | 1591 | if (dcd->hwndLastMenu == TreeCnrMenu) { | 
|---|
|  | 1592 | if (dcd->flWindowAttr & CV_MINI) | 
|---|
|  | 1593 | WinCheckMenuItem(dcd->hwndLastMenu, IDM_MINIICONS, TRUE); | 
|---|
|  | 1594 | } | 
|---|
|  | 1595 | if (!PopupMenu(hwnd, hwnd, dcd->hwndLastMenu)) { | 
|---|
|  | 1596 | if (dcd->cnremphasized) { | 
|---|
|  | 1597 | WinSendMsg(hwnd, CM_SETRECORDEMPHASIS, MPVOID, | 
|---|
|  | 1598 | MPFROM2SHORT(FALSE, CRA_SOURCE)); | 
|---|
|  | 1599 | dcd->cnremphasized = FALSE; | 
|---|
| [176] | 1600 | } | 
|---|
| [551] | 1601 | if (dcd->hwndLastMenu != TreeCnrMenu) | 
|---|
|  | 1602 | MarkAll(hwnd, TRUE, FALSE, TRUE); | 
|---|
| [176] | 1603 | } | 
|---|
| [551] | 1604 | } | 
|---|
|  | 1605 | DosEnterCritSec(); | 
|---|
|  | 1606 | fFollowTree = wasFollowing; | 
|---|
|  | 1607 | DosExitCritSec(); | 
|---|
|  | 1608 | } | 
|---|
|  | 1609 | break; | 
|---|
| [2] | 1610 |  | 
|---|
| [551] | 1611 | case CN_ENTER: | 
|---|
|  | 1612 | if (mp2) { | 
|---|
|  | 1613 | PCNRITEM pci = (PCNRITEM) ((PNOTIFYRECORDENTER) mp2)->pRecord; | 
|---|
| [2] | 1614 |  | 
|---|
| [551] | 1615 | PostMsg(hwnd, UM_ENTER, MPFROMP(pci), MPVOID); | 
|---|
|  | 1616 | } | 
|---|
|  | 1617 | break; | 
|---|
| [2] | 1618 |  | 
|---|
| [551] | 1619 | case CN_COLLAPSETREE: | 
|---|
|  | 1620 | case CN_EXPANDTREE: | 
|---|
|  | 1621 | { | 
|---|
|  | 1622 | PCNRITEM pci = (PCNRITEM) mp2; | 
|---|
| [2] | 1623 |  | 
|---|
| [551] | 1624 | if (pci && (INT) pci != -1 && !(pci->flags & RECFLAGS_ENV)) { | 
|---|
|  | 1625 | if (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) { | 
|---|
| [2] | 1626 |  | 
|---|
| [551] | 1627 | struct | 
|---|
|  | 1628 | { | 
|---|
|  | 1629 | ULONG serial; | 
|---|
|  | 1630 | CHAR volumelength; | 
|---|
|  | 1631 | CHAR volumelabel[CCHMAXPATH]; | 
|---|
|  | 1632 | } | 
|---|
|  | 1633 | volser; | 
|---|
| [2] | 1634 |  | 
|---|
| [551] | 1635 | memset(&volser, 0, sizeof(volser)); | 
|---|
|  | 1636 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1637 | if (!DosQueryFSInfo(toupper(*pci->szFileName) - '@', | 
|---|
|  | 1638 | FSIL_VOLSER, &volser, | 
|---|
|  | 1639 | (ULONG) sizeof(volser))) { | 
|---|
|  | 1640 | if (SHORT2FROMMP(mp1) == CN_COLLAPSETREE && | 
|---|
|  | 1641 | !volser.serial || | 
|---|
|  | 1642 | driveserial[toupper(*pci->szFileName) - 'A'] != | 
|---|
|  | 1643 | volser.serial) | 
|---|
|  | 1644 | UnFlesh(hwnd, pci); | 
|---|
|  | 1645 | if (SHORT2FROMMP(mp1) != CN_COLLAPSETREE || | 
|---|
|  | 1646 | (!volser.serial || | 
|---|
|  | 1647 | driveserial[toupper(*pci->szFileName) - 'A'] != | 
|---|
|  | 1648 | volser.serial)) { | 
|---|
|  | 1649 | if (Flesh(hwnd, pci) && | 
|---|
|  | 1650 | SHORT2FROMMP(mp1) == CN_EXPANDTREE && | 
|---|
|  | 1651 | !dcd->suspendview && fTopDir) | 
|---|
|  | 1652 | PostMsg(hwnd, UM_TOPDIR, MPFROMP(pci), MPVOID); | 
|---|
| [176] | 1653 | } | 
|---|
| [551] | 1654 | driveserial[toupper(*pci->szFileName) - 'A'] = volser.serial; | 
|---|
| [176] | 1655 | } | 
|---|
| [551] | 1656 | else { | 
|---|
|  | 1657 | driveserial[toupper(*pci->szFileName) - 'A'] = -1; | 
|---|
|  | 1658 | UnFlesh(hwnd, pci); | 
|---|
|  | 1659 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1660 | DosBeep(250, 100); | 
|---|
|  | 1661 | } | 
|---|
| [176] | 1662 | } | 
|---|
| [551] | 1663 | else if (SHORT2FROMMP(mp1) == CN_EXPANDTREE) { | 
|---|
|  | 1664 | if (Flesh(hwnd, pci) && !dcd->suspendview && fTopDir) | 
|---|
|  | 1665 | PostMsg(hwnd, UM_TOPDIR, MPFROMP(pci), MPVOID); | 
|---|
|  | 1666 | } | 
|---|
|  | 1667 | if (SHORT2FROMMP(mp1) == CN_EXPANDTREE && !dcd->suspendview) | 
|---|
|  | 1668 | WinSendMsg(hwnd, UM_FILTER, MPVOID, MPVOID); | 
|---|
|  | 1669 | } | 
|---|
|  | 1670 | } | 
|---|
|  | 1671 | break; | 
|---|
|  | 1672 | }                                 // switch WM_CONTROL | 
|---|
|  | 1673 | } | 
|---|
|  | 1674 | return 0; | 
|---|
| [2] | 1675 |  | 
|---|
| [551] | 1676 | case UM_ACTION: | 
|---|
|  | 1677 | if (mp1) { | 
|---|
| [2] | 1678 |  | 
|---|
| [551] | 1679 | LISTINFO *li = mp1; | 
|---|
|  | 1680 | ULONG action = (ULONG) mp2; | 
|---|
| [2] | 1681 |  | 
|---|
| [551] | 1682 | if (!li->list || !li->list[0] || | 
|---|
|  | 1683 | !PostMsg(dcd->hwndObject, action, MPFROMP(li), MPVOID)) | 
|---|
|  | 1684 | FreeListInfo(li); | 
|---|
|  | 1685 | } | 
|---|
|  | 1686 | return 0; | 
|---|
| [2] | 1687 |  | 
|---|
| [551] | 1688 | case UM_SHOWME: | 
|---|
|  | 1689 | if (mp1 && dcd) { | 
|---|
|  | 1690 | CHAR *dir = xstrdup((CHAR *) mp1, pszSrcFile, __LINE__); | 
|---|
|  | 1691 |  | 
|---|
|  | 1692 | if (dir) { | 
|---|
|  | 1693 | if (!PostMsg(dcd->hwndObject, UM_SHOWME, MPFROMP(dir), MPVOID)) | 
|---|
|  | 1694 | free(dir); | 
|---|
| [2] | 1695 | } | 
|---|
| [551] | 1696 | } | 
|---|
|  | 1697 | return 0; | 
|---|
| [2] | 1698 |  | 
|---|
| [551] | 1699 | case UM_TOPDIR: | 
|---|
|  | 1700 | if (mp1) { | 
|---|
| [2] | 1701 |  | 
|---|
| [551] | 1702 | PCNRITEM pci = (PCNRITEM) mp1; | 
|---|
| [2] | 1703 |  | 
|---|
| [551] | 1704 | ShowCnrRecord(hwnd, (PMINIRECORDCORE) pci); | 
|---|
|  | 1705 | } | 
|---|
|  | 1706 | return 0; | 
|---|
| [2] | 1707 |  | 
|---|
| [551] | 1708 | case UM_ENTER: | 
|---|
|  | 1709 | { | 
|---|
|  | 1710 | FILEFINDBUF3 ffb; | 
|---|
|  | 1711 | HDIR hDir = HDIR_CREATE; | 
|---|
|  | 1712 | ULONG nm = 1L; | 
|---|
|  | 1713 | APIRET status; | 
|---|
|  | 1714 | BOOL IsOk = FALSE; | 
|---|
|  | 1715 | ULONG ulDriveNum, ulDriveMap; | 
|---|
|  | 1716 | PCNRITEM pciP, pciL, pci; | 
|---|
|  | 1717 | ULONG fl = SWP_ACTIVATE; | 
|---|
| [2] | 1718 |  | 
|---|
| [551] | 1719 | if (fFollowTree) | 
|---|
|  | 1720 | fl = 0; | 
|---|
|  | 1721 | SetShiftState(); | 
|---|
|  | 1722 | pci = (PCNRITEM) mp1; | 
|---|
|  | 1723 | if (pci && | 
|---|
|  | 1724 | (INT) pci != -1 && | 
|---|
|  | 1725 | !(pci->rc.flRecordAttr & CRA_INUSE) && | 
|---|
|  | 1726 | !(pci->flags & RECFLAGS_ENV) && IsFullName(pci->szFileName)) { | 
|---|
|  | 1727 | if (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_INVALID) { | 
|---|
|  | 1728 | DosBeep(50, 100); | 
|---|
|  | 1729 | if (hwndStatus) | 
|---|
|  | 1730 | WinSetWindowText(hwndStatus, GetPString(IDS_RESCANSUGTEXT)); | 
|---|
|  | 1731 | return 0; | 
|---|
|  | 1732 | } | 
|---|
|  | 1733 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1734 | if (!DosQCurDisk(&ulDriveNum, &ulDriveMap)) { | 
|---|
|  | 1735 | if (!(ulDriveMap & 1L << (toupper(*pci->szFileName) - 'A'))) { | 
|---|
| [176] | 1736 | pciL = pciP = pci; | 
|---|
| [551] | 1737 | for (;;) { | 
|---|
| [176] | 1738 | pciP = WinSendMsg(hwnd, | 
|---|
|  | 1739 | CM_QUERYRECORD, | 
|---|
|  | 1740 | MPFROMP(pciL), | 
|---|
| [551] | 1741 | MPFROM2SHORT(CMA_PARENT, CMA_ITEMORDER)); | 
|---|
|  | 1742 | if (pciP && (INT) pciP != -1) | 
|---|
| [176] | 1743 | pciL = pciP; | 
|---|
|  | 1744 | else { | 
|---|
|  | 1745 | pciP = pciL; | 
|---|
|  | 1746 | break; | 
|---|
|  | 1747 | } | 
|---|
| [551] | 1748 | }                           // for | 
|---|
|  | 1749 | WinSendMsg(hwnd, | 
|---|
|  | 1750 | CM_REMOVERECORD, | 
|---|
|  | 1751 | MPFROMP(&pciP), | 
|---|
|  | 1752 | MPFROM2SHORT(1, CMA_FREE | CMA_INVALIDATE)); | 
|---|
|  | 1753 | return 0; | 
|---|
|  | 1754 | } | 
|---|
|  | 1755 | } | 
|---|
|  | 1756 | if (driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1757 | (DRIVE_REMOVABLE | DRIVE_NOPRESCAN)) { | 
|---|
|  | 1758 |  | 
|---|
|  | 1759 | struct | 
|---|
|  | 1760 | { | 
|---|
|  | 1761 | ULONG serial; | 
|---|
|  | 1762 | CHAR volumelength; | 
|---|
|  | 1763 | CHAR volumelabel[CCHMAXPATH]; | 
|---|
|  | 1764 | } | 
|---|
|  | 1765 | volser; | 
|---|
|  | 1766 |  | 
|---|
|  | 1767 | pciL = pciP = pci; | 
|---|
|  | 1768 | for (;;) { | 
|---|
|  | 1769 | pciP = WinSendMsg(hwnd, | 
|---|
|  | 1770 | CM_QUERYRECORD, | 
|---|
|  | 1771 | MPFROMP(pciL), | 
|---|
|  | 1772 | MPFROM2SHORT(CMA_PARENT, CMA_ITEMORDER)); | 
|---|
|  | 1773 | if (pciP && (INT) pciP != -1) | 
|---|
|  | 1774 | pciL = pciP; | 
|---|
|  | 1775 | else { | 
|---|
|  | 1776 | pciP = pciL; | 
|---|
|  | 1777 | break; | 
|---|
| [176] | 1778 | } | 
|---|
| [551] | 1779 | } | 
|---|
|  | 1780 | if ((driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
| [176] | 1781 | DRIVE_NOPRESCAN) || | 
|---|
| [551] | 1782 | (toupper(*pci->szFileName) > 'B' && | 
|---|
|  | 1783 | !(driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1784 | DRIVE_CDROM))) { | 
|---|
| [2] | 1785 |  | 
|---|
| [551] | 1786 | INT removable, x = (INT) (toupper(*pci->szFileName) - 'A'); | 
|---|
|  | 1787 | ULONG drvtype; | 
|---|
|  | 1788 | CHAR FileSystem[CCHMAXPATH]; | 
|---|
| [2] | 1789 |  | 
|---|
| [551] | 1790 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1791 | removable = CheckDrive(toupper(*pciP->szFileName), | 
|---|
|  | 1792 | FileSystem, &drvtype); | 
|---|
|  | 1793 | if (removable != -1) { | 
|---|
|  | 1794 | driveflags[x] &= (DRIVE_IGNORE | DRIVE_NOPRESCAN | | 
|---|
|  | 1795 | DRIVE_NOLOADICONS | DRIVE_NOLOADSUBJS | | 
|---|
|  | 1796 | DRIVE_NOLOADLONGS | DRIVE_INCLUDEFILES | | 
|---|
| [555] | 1797 | DRIVE_SLOW | DRIVE_NOSTATS); | 
|---|
| [527] | 1798 |  | 
|---|
| [551] | 1799 | if (removable == 1) | 
|---|
|  | 1800 | driveflags[x] |= DRIVE_REMOVABLE; | 
|---|
|  | 1801 | if (drvtype & DRIVE_REMOTE) | 
|---|
|  | 1802 | driveflags[x] |= DRIVE_REMOTE; | 
|---|
| [618] | 1803 | if (!strcmp(FileSystem, CBSIFS)) { | 
|---|
| [552] | 1804 | driveflags[x] |= DRIVE_ZIPSTREAM; | 
|---|
| [618] | 1805 | driveflags[x] &= (~DRIVE_REMOTE); | 
|---|
|  | 1806 | } | 
|---|
|  | 1807 | if(!strcmp(FileSystem,NDFS32)) { | 
|---|
|  | 1808 | driveflags[x] |= DRIVE_VIRTUAL; | 
|---|
|  | 1809 | driveflags[x] &= (~DRIVE_REMOTE); | 
|---|
|  | 1810 | } | 
|---|
|  | 1811 | if(!strcmp(FileSystem,RAMFS)) { | 
|---|
|  | 1812 | driveflags[x] |= DRIVE_RAMDISK; | 
|---|
|  | 1813 | driveflags[x] &= (~DRIVE_REMOTE); | 
|---|
|  | 1814 | } | 
|---|
| [552] | 1815 | if (!strcmp(FileSystem, CDFS) || !strcmp(FileSystem, ISOFS)) | 
|---|
| [551] | 1816 | driveflags[x] |= (DRIVE_REMOVABLE | | 
|---|
| [618] | 1817 | DRIVE_NOTWRITEABLE | DRIVE_CDROM); | 
|---|
|  | 1818 | if(!strcmp(FileSystem,NTFS)) | 
|---|
|  | 1819 | driveflags[x] |= DRIVE_NOTWRITEABLE; | 
|---|
| [551] | 1820 | if (strcmp(FileSystem, HPFS) && | 
|---|
|  | 1821 | strcmp(FileSystem, JFS) && | 
|---|
|  | 1822 | strcmp(FileSystem, CDFS) && | 
|---|
| [618] | 1823 | strcmp(FileSystem, ISOFS) && | 
|---|
|  | 1824 | strcmp(FileSystem, RAMFS) && | 
|---|
| [551] | 1825 | strcmp(FileSystem, FAT32) && | 
|---|
| [618] | 1826 | strcmp(FileSystem, NDFS32) && | 
|---|
|  | 1827 | strcmp(FileSystem, NTFS) && | 
|---|
|  | 1828 | strcmp(FileSystem, HPFS386)) { | 
|---|
| [551] | 1829 | driveflags[x] |= DRIVE_NOLONGNAMES; | 
|---|
| [618] | 1830 | } | 
|---|
|  | 1831 | SelectDriveIcon(pciP); | 
|---|
| [551] | 1832 | WinSendMsg(hwnd, | 
|---|
|  | 1833 | CM_INVALIDATERECORD, | 
|---|
|  | 1834 | MPFROMP(&pciP), | 
|---|
|  | 1835 | MPFROM2SHORT(1, CMA_ERASE | CMA_REPOSITION)); | 
|---|
|  | 1836 | if (hwndMain) | 
|---|
|  | 1837 | PostMsg(hwndMain, UM_BUILDDRIVEBAR, MPVOID, MPVOID); | 
|---|
| [176] | 1838 | } | 
|---|
| [551] | 1839 | } | 
|---|
|  | 1840 | memset(&volser, 0, sizeof(volser)); | 
|---|
|  | 1841 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1842 | status = DosQueryFSInfo(toupper(*pci->szFileName) - '@', | 
|---|
|  | 1843 | FSIL_VOLSER, &volser, | 
|---|
|  | 1844 | (ULONG) sizeof(volser)); | 
|---|
|  | 1845 | if (!status) { | 
|---|
|  | 1846 | if (!volser.serial || | 
|---|
|  | 1847 | driveserial[toupper(*pci->szFileName) - 'A'] != | 
|---|
|  | 1848 | volser.serial) { | 
|---|
|  | 1849 | UnFlesh(hwnd, pciP); | 
|---|
|  | 1850 | Flesh(hwnd, pciP); | 
|---|
|  | 1851 | driveserial[toupper(*pci->szFileName) - 'A'] = volser.serial; | 
|---|
|  | 1852 | } | 
|---|
|  | 1853 | pciL = WinSendMsg(hwnd, | 
|---|
|  | 1854 | CM_QUERYRECORD, | 
|---|
|  | 1855 | MPFROMP(pciP), | 
|---|
|  | 1856 | MPFROM2SHORT(CMA_FIRSTCHILD, CMA_ITEMORDER)); | 
|---|
|  | 1857 | if (!pciL) | 
|---|
|  | 1858 | Flesh(hwnd, pciP); | 
|---|
|  | 1859 | } | 
|---|
|  | 1860 | else { | 
|---|
|  | 1861 | driveserial[toupper(*pci->szFileName) - 'A'] = -1; | 
|---|
|  | 1862 | UnFlesh(hwnd, pci); | 
|---|
|  | 1863 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 1864 | PostMsg(hwnd, UM_SETUP2, MPFROMP(pci), MPFROMLONG(status)); | 
|---|
|  | 1865 | return 0; | 
|---|
|  | 1866 | } | 
|---|
|  | 1867 | } | 
|---|
|  | 1868 | status = 0; | 
|---|
|  | 1869 | IsOk = (IsRoot(pci->szFileName) && | 
|---|
|  | 1870 | IsValidDrive(toupper(*pci->szFileName))); | 
|---|
|  | 1871 | if (!IsOk) { | 
|---|
|  | 1872 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 1873 | status = DosFindFirst(pci->szFileName, &hDir, | 
|---|
|  | 1874 | FILE_NORMAL | FILE_DIRECTORY | | 
|---|
|  | 1875 | FILE_ARCHIVED | FILE_READONLY | | 
|---|
|  | 1876 | FILE_HIDDEN | FILE_SYSTEM, | 
|---|
|  | 1877 | &ffb, sizeof(ffb), &nm, FIL_STANDARD); | 
|---|
|  | 1878 | priority_bumped(); | 
|---|
|  | 1879 | } | 
|---|
|  | 1880 | if (!status) { | 
|---|
|  | 1881 | if (!IsOk) | 
|---|
|  | 1882 | DosFindClose(hDir); | 
|---|
|  | 1883 | if (IsOk || (ffb.attrFile & FILE_DIRECTORY)) { | 
|---|
|  | 1884 | if ((shiftstate & (KC_CTRL | KC_ALT)) == (KC_CTRL | KC_ALT)) { | 
|---|
| [176] | 1885 | PostMsg(hwnd, | 
|---|
| [551] | 1886 | WM_COMMAND, MPFROM2SHORT(IDM_SHOWALLFILES, 0), MPVOID); | 
|---|
| [176] | 1887 | return 0; | 
|---|
|  | 1888 | } | 
|---|
| [551] | 1889 | if ((shiftstate & (KC_CTRL | KC_SHIFT)) == (KC_CTRL | KC_SHIFT)) { | 
|---|
|  | 1890 | OpenObject(pci->szFileName, Settings, dcd->hwndFrame); | 
|---|
|  | 1891 | return 0; | 
|---|
|  | 1892 | } | 
|---|
|  | 1893 | if (!(shiftstate & (KC_CTRL | KC_SHIFT))) { | 
|---|
|  | 1894 | if (!ParentIsDesktop(hwnd, dcd->hwndParent)) { | 
|---|
|  | 1895 | if (FindDirCnrByName(pci->szFileName, TRUE)) | 
|---|
|  | 1896 | return 0; | 
|---|
| [176] | 1897 | } | 
|---|
|  | 1898 | } | 
|---|
| [551] | 1899 | if ((shiftstate & KC_CTRL) || | 
|---|
|  | 1900 | (!(shiftstate & KC_SHIFT) && | 
|---|
|  | 1901 | ParentIsDesktop(hwnd, dcd->hwndParent) && fVTreeOpensWPS)) { | 
|---|
| [2] | 1902 |  | 
|---|
| [551] | 1903 | ULONG size = sizeof(ULONG), flWindowAttr = CV_ICON; | 
|---|
|  | 1904 | CHAR s[33]; | 
|---|
| [2] | 1905 |  | 
|---|
| [551] | 1906 | strcpy(s, "ICON"); | 
|---|
|  | 1907 | PrfQueryProfileData(fmprof, | 
|---|
|  | 1908 | appname, | 
|---|
|  | 1909 | "DirflWindowAttr", | 
|---|
|  | 1910 | (PVOID) & flWindowAttr, &size); | 
|---|
|  | 1911 | if (flWindowAttr & CV_DETAIL) { | 
|---|
|  | 1912 | if (IsRoot(pci->szFileName)) | 
|---|
|  | 1913 | strcpy(s, "TREE"); | 
|---|
|  | 1914 | else | 
|---|
|  | 1915 | strcpy(s, "DETAILS"); | 
|---|
| [176] | 1916 | } | 
|---|
| [551] | 1917 | OpenObject(pci->szFileName, s, dcd->hwndFrame); | 
|---|
|  | 1918 | return 0; | 
|---|
| [176] | 1919 | } | 
|---|
| [551] | 1920 | if (!ParentIsDesktop(hwnd, dcd->hwndParent) && | 
|---|
|  | 1921 | !fDCOpens && !LastDir && !(shiftstate & KC_SHIFT)) | 
|---|
|  | 1922 | LastDir = FindDirCnr(dcd->hwndParent); | 
|---|
|  | 1923 | if (LastDir && !fDCOpens && !(shiftstate & KC_SHIFT)) { | 
|---|
|  | 1924 | WinSendMsg(LastDir, | 
|---|
|  | 1925 | UM_SETDIR, MPFROMP(pci->szFileName), MPVOID); | 
|---|
|  | 1926 | WinSetWindowPos(WinQueryWindow(WinQueryWindow(LastDir, | 
|---|
|  | 1927 | QW_PARENT), | 
|---|
|  | 1928 | QW_PARENT), | 
|---|
|  | 1929 | HWND_TOP, 0, 0, 0, 0, SWP_ZORDER | fl); | 
|---|
|  | 1930 | } | 
|---|
|  | 1931 | else | 
|---|
|  | 1932 | OpenDirCnr(hwnd, | 
|---|
|  | 1933 | dcd->hwndParent, | 
|---|
|  | 1934 | dcd->hwndFrame, FALSE, pci->szFileName); | 
|---|
| [176] | 1935 | } | 
|---|
|  | 1936 | else { | 
|---|
| [551] | 1937 | if (!(driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 1938 | DRIVE_INCLUDEFILES)) | 
|---|
| [176] | 1939 | WinSendMsg(hwnd, | 
|---|
|  | 1940 | CM_REMOVERECORD, | 
|---|
|  | 1941 | MPFROMP(&pci), | 
|---|
| [551] | 1942 | MPFROM2SHORT(1, CMA_FREE | CMA_INVALIDATE)); | 
|---|
|  | 1943 | else { | 
|---|
|  | 1944 |  | 
|---|
|  | 1945 | SWP swp; | 
|---|
|  | 1946 |  | 
|---|
|  | 1947 | WinQueryWindowPos(dcd->hwndFrame, &swp); | 
|---|
|  | 1948 | DefaultViewKeys(hwnd, | 
|---|
|  | 1949 | dcd->hwndFrame, | 
|---|
|  | 1950 | dcd->hwndParent, &swp, pci->szFileName); | 
|---|
| [176] | 1951 | } | 
|---|
|  | 1952 | } | 
|---|
|  | 1953 | } | 
|---|
| [551] | 1954 | else { | 
|---|
|  | 1955 | if (!IsRoot(pci->szFileName)) { | 
|---|
|  | 1956 | NotifyError(pci->szFileName, status); | 
|---|
|  | 1957 | WinSendMsg(hwnd, | 
|---|
|  | 1958 | CM_REMOVERECORD, | 
|---|
|  | 1959 | MPFROMP(&pci), | 
|---|
|  | 1960 | MPFROM2SHORT(1, CMA_FREE | CMA_INVALIDATE)); | 
|---|
|  | 1961 | } | 
|---|
|  | 1962 | } | 
|---|
| [2] | 1963 | } | 
|---|
| [551] | 1964 | else if (!pci) | 
|---|
|  | 1965 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_MKDIR, 0), MPVOID); | 
|---|
|  | 1966 | if (fFollowTree) | 
|---|
|  | 1967 | WinSetFocus(HWND_DESKTOP, hwnd); | 
|---|
|  | 1968 | } | 
|---|
|  | 1969 | return 0; | 
|---|
| [2] | 1970 |  | 
|---|
| [551] | 1971 | case WM_MENUEND: | 
|---|
|  | 1972 | if (dcd) { | 
|---|
| [2] | 1973 |  | 
|---|
| [551] | 1974 | HWND hwndMenu = (HWND) mp2; | 
|---|
| [2] | 1975 |  | 
|---|
| [551] | 1976 | if (hwndMenu == TreeCnrMenu || hwndMenu == TreeMenu || | 
|---|
|  | 1977 | hwndMenu == DirMenu) { | 
|---|
|  | 1978 | MarkAll(hwnd, TRUE, FALSE, TRUE); | 
|---|
|  | 1979 | if (dcd->cnremphasized) { | 
|---|
|  | 1980 | WinSendMsg(hwnd, | 
|---|
|  | 1981 | CM_SETRECORDEMPHASIS, | 
|---|
|  | 1982 | MPVOID, MPFROM2SHORT(FALSE, CRA_SOURCE)); | 
|---|
|  | 1983 | dcd->cnremphasized = FALSE; | 
|---|
| [176] | 1984 | } | 
|---|
| [2] | 1985 | } | 
|---|
| [551] | 1986 | } | 
|---|
|  | 1987 | break; | 
|---|
| [2] | 1988 |  | 
|---|
| [551] | 1989 | case UM_OPENWINDOWFORME: | 
|---|
|  | 1990 | if (dcd) { | 
|---|
|  | 1991 | if (mp1 && !IsFile((CHAR *) mp1)) | 
|---|
|  | 1992 | OpenDirCnr(hwnd, dcd->hwndParent, dcd->hwndFrame, FALSE, (char *)mp1); | 
|---|
|  | 1993 | } | 
|---|
|  | 1994 | return 0; | 
|---|
| [2] | 1995 |  | 
|---|
| [551] | 1996 | case MM_PORTHOLEINIT: | 
|---|
|  | 1997 | if (dcd) { | 
|---|
|  | 1998 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 1999 | case 0: | 
|---|
|  | 2000 | case 1: | 
|---|
|  | 2001 | { | 
|---|
|  | 2002 | ULONG wmsg; | 
|---|
| [2] | 2003 |  | 
|---|
| [551] | 2004 | wmsg = ((SHORT1FROMMP(mp1) == 0) ? UM_FILESMENU : UM_VIEWSMENU); | 
|---|
|  | 2005 | PortholeInit((HWND) WinSendMsg(dcd->hwndClient, | 
|---|
|  | 2006 | wmsg, MPVOID, MPVOID), mp1, mp2); | 
|---|
| [176] | 2007 | } | 
|---|
| [551] | 2008 | break; | 
|---|
| [2] | 2009 | } | 
|---|
| [551] | 2010 | } | 
|---|
|  | 2011 | break; | 
|---|
| [2] | 2012 |  | 
|---|
| [551] | 2013 | case UM_INITMENU: | 
|---|
|  | 2014 | case WM_INITMENU: | 
|---|
|  | 2015 | if (dcd) { | 
|---|
|  | 2016 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2017 | case IDM_FILESMENU: | 
|---|
|  | 2018 | { | 
|---|
|  | 2019 | PCNRITEM pci; | 
|---|
| [2] | 2020 |  | 
|---|
| [551] | 2021 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2022 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2023 | BOOL rdy; | 
|---|
|  | 2024 | BOOL writeable; | 
|---|
|  | 2025 | BOOL removable; | 
|---|
|  | 2026 | BOOL remote; | 
|---|
|  | 2027 | BOOL underenv; | 
|---|
|  | 2028 | CHAR chDrvU; | 
|---|
|  | 2029 | CHAR szDrv[CCHMAXPATH]; | 
|---|
| [305] | 2030 |  | 
|---|
| [551] | 2031 | strcpy(szDrv, pci->szFileName); | 
|---|
|  | 2032 | chDrvU = *pci->szFileName; | 
|---|
|  | 2033 | chDrvU = toupper(chDrvU); | 
|---|
|  | 2034 | MakeValidDir(szDrv); | 
|---|
|  | 2035 | rdy = *szDrv == chDrvU;     // Drive not ready if MakeValidDir changes drive letter | 
|---|
|  | 2036 | removable = rdy | 
|---|
|  | 2037 | && (driveflags[chDrvU - 'A'] & DRIVE_REMOVABLE) != 0; | 
|---|
|  | 2038 | writeable = rdy | 
|---|
|  | 2039 | && !(driveflags[chDrvU - 'A'] & DRIVE_NOTWRITEABLE); | 
|---|
| [552] | 2040 | remote = rdy && (driveflags[chDrvU - 'A'] & (DRIVE_REMOTE || DRIVE_VIRTUAL)) != 0; | 
|---|
| [551] | 2041 | underenv = (pci->flags & RECFLAGS_UNDERENV) != 0; | 
|---|
| [305] | 2042 |  | 
|---|
| [551] | 2043 | WinEnableMenuItem((HWND) mp2, IDM_INFO, rdy); | 
|---|
| [305] | 2044 |  | 
|---|
| [551] | 2045 | WinEnableMenuItem((HWND) mp2, IDM_ATTRS, writeable); | 
|---|
|  | 2046 | WinEnableMenuItem((HWND) mp2, IDM_EAS, writeable); | 
|---|
|  | 2047 | WinEnableMenuItem((HWND) mp2, IDM_SUBJECT, writeable); | 
|---|
|  | 2048 | WinEnableMenuItem((HWND) mp2, IDM_DRVFLAGS, 1);     // fixme to allow if not ready | 
|---|
| [305] | 2049 |  | 
|---|
| [551] | 2050 | WinEnableMenuItem((HWND) mp2, IDM_ARCHIVE, rdy); | 
|---|
| [305] | 2051 |  | 
|---|
| [551] | 2052 | WinEnableMenuItem((HWND) mp2, IDM_UPDATE, !underenv); | 
|---|
|  | 2053 | WinEnableMenuItem((HWND) mp2, IDM_EXPANDSUBMENU, !underenv); | 
|---|
|  | 2054 | WinEnableMenuItem((HWND) mp2, IDM_EXPAND, !underenv); | 
|---|
|  | 2055 | WinEnableMenuItem((HWND) mp2, IDM_COLLAPSE, !underenv); | 
|---|
| [305] | 2056 |  | 
|---|
| [551] | 2057 | WinEnableMenuItem((HWND) mp2, IDM_SIZES, rdy); | 
|---|
|  | 2058 | WinEnableMenuItem((HWND) mp2, IDM_MKDIR, writeable); | 
|---|
|  | 2059 | WinEnableMenuItem((HWND) mp2, IDM_SHOWALLFILES, rdy); | 
|---|
|  | 2060 | WinEnableMenuItem((HWND) mp2, IDM_UNDELETE, writeable); | 
|---|
| [305] | 2061 |  | 
|---|
| [551] | 2062 | WinEnableMenuItem((HWND) mp2, IDM_CHKDSK, writeable && !remote); | 
|---|
|  | 2063 | WinEnableMenuItem((HWND) mp2, IDM_FORMAT, writeable && !remote); | 
|---|
|  | 2064 | WinEnableMenuItem((HWND) mp2, IDM_OPTIMIZE, writeable && !remote); | 
|---|
|  | 2065 | WinEnableMenuItem((HWND) mp2, IDM_PARTITIONSMENU, !remote); | 
|---|
| [305] | 2066 |  | 
|---|
| [551] | 2067 | WinEnableMenuItem((HWND) mp2, IDM_DETACH, remote); | 
|---|
| [305] | 2068 |  | 
|---|
| [551] | 2069 | WinEnableMenuItem((HWND) mp2, IDM_EJECT, removable); | 
|---|
| [305] | 2070 |  | 
|---|
| [551] | 2071 | WinEnableMenuItem((HWND) mp2, IDM_LOCK, removable); | 
|---|
|  | 2072 | WinEnableMenuItem((HWND) mp2, IDM_UNLOCK, removable); | 
|---|
| [305] | 2073 |  | 
|---|
| [551] | 2074 | WinEnableMenuItem((HWND) mp2, IDM_DELETE, !underenv && writeable); | 
|---|
|  | 2075 | WinEnableMenuItem((HWND) mp2, IDM_PERMDELETE, !underenv | 
|---|
|  | 2076 | && writeable); | 
|---|
|  | 2077 | WinEnableMenuItem((HWND) mp2, IDM_DELETESUBMENU, !underenv | 
|---|
|  | 2078 | && writeable); | 
|---|
|  | 2079 | WinEnableMenuItem((HWND) mp2, IDM_MOVEMENU, !underenv | 
|---|
|  | 2080 | && writeable); | 
|---|
|  | 2081 | WinEnableMenuItem((HWND) mp2, IDM_RENAME, !underenv && writeable); | 
|---|
| [2] | 2082 |  | 
|---|
| [551] | 2083 | } | 
|---|
|  | 2084 | } | 
|---|
|  | 2085 | break; | 
|---|
| [2] | 2086 |  | 
|---|
| [551] | 2087 | case IDM_VIEWSMENU: | 
|---|
|  | 2088 | WinCheckMenuItem((HWND) mp2, | 
|---|
|  | 2089 | IDM_MINIICONS, ((dcd->flWindowAttr & CV_MINI) != 0)); | 
|---|
|  | 2090 | WinEnableMenuItem((HWND) mp2, IDM_RESELECT, FALSE); | 
|---|
|  | 2091 | break; | 
|---|
| [2] | 2092 |  | 
|---|
| [551] | 2093 | case IDM_COMMANDSMENU: | 
|---|
|  | 2094 | SetupCommandMenu((HWND) mp2, hwnd); | 
|---|
|  | 2095 | break; | 
|---|
| [2] | 2096 |  | 
|---|
| [551] | 2097 | case IDM_SORTSUBMENU: | 
|---|
|  | 2098 | SetSortChecks((HWND) mp2, TreesortFlags); | 
|---|
| [176] | 2099 | break; | 
|---|
| [2] | 2100 |  | 
|---|
| [551] | 2101 | case IDM_WINDOWSMENU: | 
|---|
|  | 2102 | SetupWinList((HWND) mp2, | 
|---|
|  | 2103 | (hwndMain) ? hwndMain : (HWND) 0, dcd->hwndFrame); | 
|---|
|  | 2104 | break; | 
|---|
|  | 2105 | } | 
|---|
|  | 2106 | dcd->hwndLastMenu = (HWND) mp2; | 
|---|
|  | 2107 | } | 
|---|
|  | 2108 | if (msg == WM_INITMENU) | 
|---|
|  | 2109 | break; | 
|---|
|  | 2110 | return 0; | 
|---|
|  | 2111 |  | 
|---|
|  | 2112 | case UM_COMMAND: | 
|---|
|  | 2113 | if (!mp1) | 
|---|
|  | 2114 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 2115 | else { | 
|---|
|  | 2116 | if (!dcd) { | 
|---|
|  | 2117 | Runtime_Error2(pszSrcFile, __LINE__, IDS_NODATATEXT); | 
|---|
|  | 2118 | FreeListInfo((LISTINFO *) mp1); | 
|---|
|  | 2119 | } | 
|---|
| [352] | 2120 | else { | 
|---|
| [551] | 2121 | if (!PostMsg(dcd->hwndObject, UM_COMMAND, mp1, mp2)) { | 
|---|
|  | 2122 | Runtime_Error(pszSrcFile, __LINE__, "PostMsg"); | 
|---|
|  | 2123 | FreeListInfo((LISTINFO *) mp1); | 
|---|
| [352] | 2124 | } | 
|---|
| [551] | 2125 | else | 
|---|
|  | 2126 | return (MRESULT) TRUE; | 
|---|
| [2] | 2127 | } | 
|---|
| [551] | 2128 | } | 
|---|
|  | 2129 | return 0; | 
|---|
| [2] | 2130 |  | 
|---|
| [551] | 2131 | case UM_LOADFILE: | 
|---|
|  | 2132 | if (dcd && mp2) { | 
|---|
| [2] | 2133 |  | 
|---|
| [551] | 2134 | HWND ret; | 
|---|
| [2] | 2135 |  | 
|---|
| [551] | 2136 | ret = StartMLEEditor(dcd->hwndParent, (INT) mp1, (CHAR *) mp2, | 
|---|
|  | 2137 | dcd->hwndFrame); | 
|---|
|  | 2138 | if (mp2) | 
|---|
|  | 2139 | free((CHAR *) mp2); | 
|---|
|  | 2140 | return MRFROMLONG(ret); | 
|---|
|  | 2141 | } | 
|---|
|  | 2142 | return 0; | 
|---|
| [2] | 2143 |  | 
|---|
| [551] | 2144 | case UM_FIXCNRMLE: | 
|---|
|  | 2145 | case UM_FIXEDITNAME: | 
|---|
|  | 2146 | return CommonCnrProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2147 |  | 
|---|
| [551] | 2148 | case UM_NOTIFY: | 
|---|
|  | 2149 | if (mp2) | 
|---|
|  | 2150 | Notify((CHAR *) mp2); | 
|---|
|  | 2151 | return 0; | 
|---|
| [2] | 2152 |  | 
|---|
| [551] | 2153 | case UM_FILTER: | 
|---|
|  | 2154 | if (dcd) { | 
|---|
| [2] | 2155 |  | 
|---|
| [551] | 2156 | BOOL tempsusp = dcd->suspendview; | 
|---|
| [2] | 2157 |  | 
|---|
| [551] | 2158 | if (mp1) { | 
|---|
|  | 2159 | DosEnterCritSec(); | 
|---|
|  | 2160 | SetMask((CHAR *) mp1, &dcd->mask); | 
|---|
|  | 2161 | DosExitCritSec(); | 
|---|
| [2] | 2162 | } | 
|---|
| [551] | 2163 | dcd->suspendview = TRUE; | 
|---|
|  | 2164 | dcd->mask.attrFile |= FILE_DIRECTORY; | 
|---|
|  | 2165 | WinSendMsg(hwnd, CM_FILTER, MPFROMP(Filter), MPFROMP(&dcd->mask)); | 
|---|
|  | 2166 | dcd->suspendview = tempsusp; | 
|---|
|  | 2167 | PostMsg(hwnd, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 2168 | } | 
|---|
|  | 2169 | return 0; | 
|---|
| [2] | 2170 |  | 
|---|
| [551] | 2171 | case UM_DRIVECMD: | 
|---|
|  | 2172 | if (mp1) | 
|---|
|  | 2173 | ShowTreeRec(hwnd, (CHAR *) mp1, FALSE, TRUE); | 
|---|
|  | 2174 | return 0; | 
|---|
| [2] | 2175 |  | 
|---|
| [551] | 2176 | case WM_APPTERMINATENOTIFY: | 
|---|
|  | 2177 | { | 
|---|
|  | 2178 | APPNOTIFY *info; | 
|---|
|  | 2179 | PCNRITEM pci; | 
|---|
|  | 2180 | CHAR s[] = " :\\"; | 
|---|
| [2] | 2181 |  | 
|---|
| [551] | 2182 | if (!mp2) { | 
|---|
|  | 2183 | if (hwndMain) | 
|---|
|  | 2184 | PostMsg(hwndMain, UM_BUILDDRIVEBAR, MPVOID, MPVOID); | 
|---|
|  | 2185 | } | 
|---|
|  | 2186 | info = apphead; | 
|---|
|  | 2187 | while (info) { | 
|---|
|  | 2188 | if (info->happ == (HAPP) mp1) { | 
|---|
|  | 2189 | *s = info->device; | 
|---|
|  | 2190 | pci = FindCnrRecord(hwnd, s, NULL, FALSE, FALSE, TRUE); | 
|---|
|  | 2191 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2192 | driveserial[info->device - 'A'] = -1; | 
|---|
|  | 2193 | DriveFlagsOne(info->device - 'A'); | 
|---|
|  | 2194 | if (driveflags[info->device - 'A'] & | 
|---|
|  | 2195 | (DRIVE_INVALID | DRIVE_IGNORE)) | 
|---|
|  | 2196 | WinSendMsg(hwnd, | 
|---|
|  | 2197 | CM_REMOVERECORD, | 
|---|
|  | 2198 | MPFROMP(&pci), MPFROM2SHORT(1, CMA_FREE)); | 
|---|
|  | 2199 | else | 
|---|
|  | 2200 | Flesh(hwnd, pci); | 
|---|
| [176] | 2201 | } | 
|---|
| [551] | 2202 | if (info->prev) | 
|---|
|  | 2203 | info->prev->next = info->next; | 
|---|
|  | 2204 | if (info->next) | 
|---|
|  | 2205 | info->next->prev = info->prev; | 
|---|
|  | 2206 | if (apphead == info) | 
|---|
|  | 2207 | apphead = info->next; | 
|---|
|  | 2208 | if (apptail == info) | 
|---|
|  | 2209 | apptail = info->prev; | 
|---|
|  | 2210 | free(info); | 
|---|
|  | 2211 | break; | 
|---|
| [176] | 2212 | } | 
|---|
| [551] | 2213 | info = info->next; | 
|---|
| [2] | 2214 | } | 
|---|
| [551] | 2215 | } | 
|---|
|  | 2216 | break; | 
|---|
| [2] | 2217 |  | 
|---|
| [551] | 2218 | case WM_COMMAND: | 
|---|
|  | 2219 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 2220 | if (dcd) { | 
|---|
|  | 2221 | if (SwitchCommand(dcd->hwndLastMenu, SHORT1FROMMP(mp1))) | 
|---|
|  | 2222 | return 0; | 
|---|
|  | 2223 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2224 | case IDM_SETTARGET: | 
|---|
|  | 2225 | SetTargetDir(hwnd, FALSE); | 
|---|
|  | 2226 | break; | 
|---|
| [2] | 2227 |  | 
|---|
| [551] | 2228 | case IDM_DETACH: | 
|---|
|  | 2229 | { | 
|---|
|  | 2230 | CHAR d[3] = " :"; | 
|---|
|  | 2231 | PCNRITEM pci; | 
|---|
|  | 2232 | PROGDETAILS pgd; | 
|---|
|  | 2233 | CHAR params[368], *p; | 
|---|
|  | 2234 | HAPP happ; | 
|---|
| [2] | 2235 |  | 
|---|
| [551] | 2236 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2237 | if (pci && (INT) pci != -1 && isalpha(*pci->szFileName)) { | 
|---|
|  | 2238 | *d = toupper(*pci->szFileName); | 
|---|
|  | 2239 | p = GetCmdSpec(FALSE); | 
|---|
|  | 2240 | memset(&pgd, 0, sizeof(pgd)); | 
|---|
|  | 2241 | pgd.Length = sizeof(pgd); | 
|---|
|  | 2242 | pgd.progt.progc = PROG_WINDOWABLEVIO; | 
|---|
|  | 2243 | pgd.progt.fbVisible = SHE_VISIBLE; | 
|---|
|  | 2244 | pgd.pszTitle = GetPString(IDS_DETACHREQUESTTEXT); | 
|---|
|  | 2245 | pgd.pszExecutable = p; | 
|---|
|  | 2246 | pgd.pszParameters = params; | 
|---|
|  | 2247 | pgd.pszStartupDir = NULL; | 
|---|
|  | 2248 | pgd.pszIcon = NULL; | 
|---|
|  | 2249 | pgd.pszEnvironment = NULL; | 
|---|
|  | 2250 | pgd.swpInitial.hwndInsertBehind = HWND_TOP; | 
|---|
|  | 2251 | pgd.swpInitial.hwnd = hwnd; | 
|---|
|  | 2252 | pgd.swpInitial.fl = SWP_SHOW | SWP_ACTIVATE; | 
|---|
|  | 2253 | sprintf(params, "/C NET USE %s /D", d); | 
|---|
|  | 2254 | happ = WinStartApp(hwnd, &pgd, pgd.pszParameters, | 
|---|
|  | 2255 | NULL, SAF_MAXIMIZED); | 
|---|
|  | 2256 | if (!happ) { | 
|---|
|  | 2257 | saymsg(MB_CANCEL | MB_ICONEXCLAMATION, hwnd, | 
|---|
|  | 2258 | GetPString(IDS_ERRORTEXT), | 
|---|
|  | 2259 | GetPString(IDS_CANTSTARTTEXT), p, params); | 
|---|
|  | 2260 | } | 
|---|
|  | 2261 | else { | 
|---|
|  | 2262 | APPNOTIFY *info; | 
|---|
| [2] | 2263 |  | 
|---|
| [551] | 2264 | info = xmallocz(sizeof(APPNOTIFY), pszSrcFile, __LINE__); | 
|---|
|  | 2265 | if (info) { | 
|---|
|  | 2266 | info->happ = happ; | 
|---|
|  | 2267 | info->device = *d; | 
|---|
|  | 2268 | if (!apphead) | 
|---|
|  | 2269 | apphead = info; | 
|---|
| [352] | 2270 | else { | 
|---|
| [551] | 2271 | apptail->next = info; | 
|---|
|  | 2272 | info->prev = apptail; | 
|---|
| [176] | 2273 | } | 
|---|
| [551] | 2274 | apptail = info; | 
|---|
| [176] | 2275 | } | 
|---|
|  | 2276 | } | 
|---|
| [551] | 2277 | } | 
|---|
|  | 2278 | } | 
|---|
|  | 2279 | break; | 
|---|
| [2] | 2280 |  | 
|---|
| [551] | 2281 | case IDM_REMAP: | 
|---|
|  | 2282 | WinDlgBox(HWND_DESKTOP, hwnd, RemapDlgProc, | 
|---|
|  | 2283 | FM3ModHandle, MAP_FRAME, NULL); | 
|---|
|  | 2284 | break; | 
|---|
| [2] | 2285 |  | 
|---|
| [551] | 2286 | case IDM_CONTEXTMENU: | 
|---|
|  | 2287 | { | 
|---|
|  | 2288 | PCNRITEM pci; | 
|---|
| [2] | 2289 |  | 
|---|
| [551] | 2290 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2291 | PostMsg(hwnd, WM_CONTROL, MPFROM2SHORT(DIR_CNR, CN_CONTEXTMENU), | 
|---|
|  | 2292 | MPFROMP(pci)); | 
|---|
|  | 2293 | } | 
|---|
|  | 2294 | break; | 
|---|
| [2] | 2295 |  | 
|---|
| [551] | 2296 | case IDM_FINDINTREE: | 
|---|
|  | 2297 | { | 
|---|
|  | 2298 | CHAR dir[CCHMAXPATH]; | 
|---|
|  | 2299 | PCNRITEM pci; | 
|---|
| [2] | 2300 |  | 
|---|
| [551] | 2301 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2302 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2303 | strcpy(dir, pci->szFileName); | 
|---|
|  | 2304 | MakeValidDir(dir); | 
|---|
|  | 2305 | } | 
|---|
|  | 2306 | else | 
|---|
|  | 2307 | save_dir2(dir); | 
|---|
|  | 2308 | if (WinDlgBox(HWND_DESKTOP, dcd->hwndParent, | 
|---|
|  | 2309 | WalkAllDlgProc, | 
|---|
|  | 2310 | FM3ModHandle, WALK_FRAME, MPFROMP(dir)) && *dir) | 
|---|
|  | 2311 | WinSendMsg(hwnd, UM_SHOWME, MPFROMP(dir), MPFROMLONG(1L)); | 
|---|
|  | 2312 | } | 
|---|
|  | 2313 | break; | 
|---|
| [2] | 2314 |  | 
|---|
| [551] | 2315 | case IDM_BEGINEDIT: | 
|---|
|  | 2316 | OpenEdit(hwnd); | 
|---|
|  | 2317 | break; | 
|---|
| [2] | 2318 |  | 
|---|
| [551] | 2319 | case IDM_ENDEDIT: | 
|---|
|  | 2320 | WinSendMsg(hwnd, CM_CLOSEEDIT, MPVOID, MPVOID); | 
|---|
|  | 2321 | break; | 
|---|
| [2] | 2322 |  | 
|---|
| [551] | 2323 | case IDM_FILTER: | 
|---|
|  | 2324 | { | 
|---|
|  | 2325 | BOOL empty = FALSE; | 
|---|
|  | 2326 | PCNRITEM pci; | 
|---|
| [2] | 2327 |  | 
|---|
| [551] | 2328 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2329 | if (!*dcd->mask.szMask) | 
|---|
|  | 2330 | empty = TRUE; | 
|---|
|  | 2331 | dcd->mask.fIsTree = TRUE; | 
|---|
|  | 2332 | *dcd->mask.prompt = 0; | 
|---|
|  | 2333 | if (pci && (INT) pci != -1) | 
|---|
|  | 2334 | dcd->mask.fFilesIncluded = | 
|---|
|  | 2335 | ((driveflags[toupper(*pci->szFileName) - 'A'] & | 
|---|
|  | 2336 | DRIVE_INCLUDEFILES) != 0); | 
|---|
|  | 2337 | else | 
|---|
|  | 2338 | dcd->mask.fFilesIncluded = FALSE; | 
|---|
|  | 2339 | if (WinDlgBox(HWND_DESKTOP, hwnd, PickMaskDlgProc, | 
|---|
|  | 2340 | FM3ModHandle, MSK_FRAME, MPFROMP(&dcd->mask))) | 
|---|
|  | 2341 | WinSendMsg(hwnd, UM_FILTER, MPVOID, MPVOID); | 
|---|
|  | 2342 | else if (empty) | 
|---|
|  | 2343 | *dcd->mask.szMask = 0; | 
|---|
|  | 2344 | PrfWriteProfileData(fmprof, appname, "TreeFilter", &dcd->mask, | 
|---|
|  | 2345 | sizeof(MASK)); | 
|---|
|  | 2346 | } | 
|---|
|  | 2347 | break; | 
|---|
| [2] | 2348 |  | 
|---|
| [551] | 2349 | case IDM_SHOWSORT: | 
|---|
|  | 2350 | QuickPopup(hwnd, dcd, CheckMenu(&TreeCnrMenu, TREECNR_POPUP), | 
|---|
|  | 2351 | IDM_SORTSUBMENU); | 
|---|
|  | 2352 | break; | 
|---|
| [2] | 2353 |  | 
|---|
| [551] | 2354 | case IDM_SHOWSELECT: | 
|---|
|  | 2355 | QuickPopup(hwnd, dcd, CheckMenu(&TreeCnrMenu, TREECNR_POPUP), | 
|---|
|  | 2356 | IDM_SELECTSUBMENU); | 
|---|
|  | 2357 | break; | 
|---|
| [2] | 2358 |  | 
|---|
| [551] | 2359 | case IDM_NOTEBOOK: | 
|---|
|  | 2360 | if (!ParentIsDesktop(dcd->hwndParent, dcd->hwndParent)) | 
|---|
|  | 2361 | PostMsg(dcd->hwndParent, msg, mp1, mp2); | 
|---|
|  | 2362 | else | 
|---|
|  | 2363 | WinDlgBox(HWND_DESKTOP, hwnd, CfgDlgProc, FM3ModHandle, | 
|---|
|  | 2364 | CFG_FRAME, (PVOID) "Tree"); | 
|---|
|  | 2365 | break; | 
|---|
| [2] | 2366 |  | 
|---|
| [551] | 2367 | case IDM_WALKDIR: | 
|---|
|  | 2368 | case IDM_OPENWALK: | 
|---|
|  | 2369 | { | 
|---|
|  | 2370 | CHAR newpath[CCHMAXPATH]; | 
|---|
|  | 2371 | PCNRITEM pci; | 
|---|
| [2] | 2372 |  | 
|---|
| [551] | 2373 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2374 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2375 | strcpy(newpath, pci->szFileName); | 
|---|
|  | 2376 | MakeValidDir(newpath); | 
|---|
|  | 2377 | } | 
|---|
|  | 2378 | else | 
|---|
|  | 2379 | save_dir2(newpath); | 
|---|
|  | 2380 | if (!WinDlgBox(HWND_DESKTOP, dcd->hwndParent, WalkAllDlgProc, | 
|---|
|  | 2381 | FM3ModHandle, WALK_FRAME, | 
|---|
|  | 2382 | MPFROMP(newpath)) || !*newpath) | 
|---|
| [176] | 2383 | break; | 
|---|
| [551] | 2384 | WinSendMsg(hwnd, UM_OPENWINDOWFORME, MPFROMP(newpath), MPVOID); | 
|---|
|  | 2385 | } | 
|---|
|  | 2386 | break; | 
|---|
| [2] | 2387 |  | 
|---|
| [551] | 2388 | case IDM_HELP: | 
|---|
|  | 2389 | if (hwndHelp) { | 
|---|
|  | 2390 | if (!ParentIsDesktop(dcd->hwndFrame, dcd->hwndParent)) | 
|---|
|  | 2391 | PostMsg(dcd->hwndParent, UM_COMMAND, mp1, mp2); | 
|---|
|  | 2392 | else | 
|---|
|  | 2393 | WinSendMsg(hwndHelp, HM_HELP_CONTENTS, MPVOID, MPVOID); | 
|---|
|  | 2394 | } | 
|---|
|  | 2395 | break; | 
|---|
| [2] | 2396 |  | 
|---|
| [551] | 2397 | case IDM_PARTITION: | 
|---|
|  | 2398 | runemf2(SEPARATE | WINDOWED, HWND_DESKTOP, NULL, NULL, | 
|---|
|  | 2399 | "%s", "MINILVM.EXE"); | 
|---|
|  | 2400 | break; | 
|---|
| [2] | 2401 |  | 
|---|
| [551] | 2402 | case IDM_PARTITIONDF: | 
|---|
|  | 2403 | runemf2(SEPARATE | WINDOWED, HWND_DESKTOP, NULL, NULL, | 
|---|
|  | 2404 | "%s", "DFSOS2.EXE"); | 
|---|
|  | 2405 | break; | 
|---|
| [472] | 2406 |  | 
|---|
| [551] | 2407 | case IDM_PARTITIONLVMG: | 
|---|
|  | 2408 | runemf2(SEPARATE | WINDOWED, HWND_DESKTOP, NULL, NULL, | 
|---|
|  | 2409 | "%s", "LVMGUI.CMD"); | 
|---|
|  | 2410 | break; | 
|---|
| [472] | 2411 |  | 
|---|
| [551] | 2412 | case IDM_PARTITIONFD: | 
|---|
|  | 2413 | runemf2(SEPARATE | WINDOWED, HWND_DESKTOP, NULL, NULL, | 
|---|
|  | 2414 | "%s", "FDISKPM.EXE"); | 
|---|
|  | 2415 | break; | 
|---|
| [472] | 2416 |  | 
|---|
| [551] | 2417 | case IDM_SORTNAME: | 
|---|
|  | 2418 | case IDM_SORTFILENAME: | 
|---|
|  | 2419 | case IDM_SORTSIZE: | 
|---|
|  | 2420 | case IDM_SORTEASIZE: | 
|---|
|  | 2421 | case IDM_SORTFIRST: | 
|---|
|  | 2422 | case IDM_SORTLAST: | 
|---|
|  | 2423 | case IDM_SORTLWDATE: | 
|---|
|  | 2424 | case IDM_SORTLADATE: | 
|---|
|  | 2425 | case IDM_SORTCRDATE: | 
|---|
|  | 2426 | TreesortFlags &= (SORT_REVERSE | SORT_DIRSFIRST | SORT_DIRSLAST); | 
|---|
|  | 2427 | case IDM_SORTDIRSFIRST: | 
|---|
|  | 2428 | case IDM_SORTDIRSLAST: | 
|---|
|  | 2429 | case IDM_SORTREVERSE: | 
|---|
|  | 2430 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2431 | case IDM_SORTFILENAME: | 
|---|
|  | 2432 | TreesortFlags |= SORT_FILENAME; | 
|---|
|  | 2433 | break; | 
|---|
|  | 2434 | case IDM_SORTSIZE: | 
|---|
|  | 2435 | TreesortFlags |= SORT_SIZE; | 
|---|
|  | 2436 | break; | 
|---|
|  | 2437 | case IDM_SORTEASIZE: | 
|---|
|  | 2438 | TreesortFlags |= SORT_EASIZE; | 
|---|
|  | 2439 | break; | 
|---|
|  | 2440 | case IDM_SORTFIRST: | 
|---|
|  | 2441 | TreesortFlags |= SORT_FIRSTEXTENSION; | 
|---|
|  | 2442 | break; | 
|---|
|  | 2443 | case IDM_SORTLAST: | 
|---|
|  | 2444 | TreesortFlags |= SORT_LASTEXTENSION; | 
|---|
|  | 2445 | break; | 
|---|
|  | 2446 | case IDM_SORTLWDATE: | 
|---|
|  | 2447 | TreesortFlags |= SORT_LWDATE; | 
|---|
|  | 2448 | break; | 
|---|
|  | 2449 | case IDM_SORTLADATE: | 
|---|
|  | 2450 | TreesortFlags |= SORT_LADATE; | 
|---|
|  | 2451 | break; | 
|---|
|  | 2452 | case IDM_SORTCRDATE: | 
|---|
|  | 2453 | TreesortFlags |= SORT_CRDATE; | 
|---|
|  | 2454 | break; | 
|---|
|  | 2455 | case IDM_SORTDIRSFIRST: | 
|---|
|  | 2456 | if (TreesortFlags & SORT_DIRSFIRST) | 
|---|
|  | 2457 | TreesortFlags &= (~SORT_DIRSFIRST); | 
|---|
|  | 2458 | else { | 
|---|
|  | 2459 | TreesortFlags |= SORT_DIRSFIRST; | 
|---|
|  | 2460 | TreesortFlags &= (~SORT_DIRSLAST); | 
|---|
|  | 2461 | } | 
|---|
|  | 2462 | break; | 
|---|
|  | 2463 | case IDM_SORTDIRSLAST: | 
|---|
|  | 2464 | if (TreesortFlags & SORT_DIRSLAST) | 
|---|
|  | 2465 | TreesortFlags &= (~SORT_DIRSLAST); | 
|---|
|  | 2466 | else { | 
|---|
|  | 2467 | TreesortFlags |= SORT_DIRSLAST; | 
|---|
|  | 2468 | TreesortFlags &= (~SORT_DIRSFIRST); | 
|---|
|  | 2469 | } | 
|---|
|  | 2470 | break; | 
|---|
|  | 2471 | case IDM_SORTREVERSE: | 
|---|
|  | 2472 | if (TreesortFlags & SORT_REVERSE) | 
|---|
|  | 2473 | TreesortFlags &= (~SORT_REVERSE); | 
|---|
|  | 2474 | else | 
|---|
|  | 2475 | TreesortFlags |= SORT_REVERSE; | 
|---|
|  | 2476 | break; | 
|---|
|  | 2477 | } | 
|---|
|  | 2478 | PrfWriteProfileData(fmprof, appname, "TreeSort", &TreesortFlags, | 
|---|
|  | 2479 | sizeof(INT)); | 
|---|
|  | 2480 | WinSendMsg(hwnd, CM_SORTRECORD, MPFROMP(SortTreeCnr), MPVOID); | 
|---|
|  | 2481 | break; | 
|---|
| [2] | 2482 |  | 
|---|
| [551] | 2483 | case IDM_COLLECT: | 
|---|
|  | 2484 | if (!Collector) { | 
|---|
| [2] | 2485 |  | 
|---|
| [551] | 2486 | HWND hwndC; | 
|---|
|  | 2487 | SWP swp; | 
|---|
| [2] | 2488 |  | 
|---|
| [551] | 2489 | if (!ParentIsDesktop(hwnd, dcd->hwndParent) && | 
|---|
|  | 2490 | !fAutoTile && | 
|---|
|  | 2491 | (!fExternalCollector && *(ULONG *) realappname == FM3UL)) | 
|---|
|  | 2492 | GetNextWindowPos(dcd->hwndParent, &swp, NULL, NULL); | 
|---|
|  | 2493 | hwndC = StartCollector((fExternalCollector || | 
|---|
|  | 2494 | *(ULONG *) realappname != FM3UL) ? | 
|---|
|  | 2495 | HWND_DESKTOP : dcd->hwndParent, 4); | 
|---|
|  | 2496 | if (hwndC) { | 
|---|
|  | 2497 | if (!ParentIsDesktop(hwnd, | 
|---|
|  | 2498 | dcd->hwndParent) && | 
|---|
|  | 2499 | !fAutoTile && | 
|---|
|  | 2500 | (!fExternalCollector && *(ULONG *) realappname == FM3UL)) | 
|---|
| [176] | 2501 | WinSetWindowPos(hwndC, | 
|---|
|  | 2502 | HWND_TOP, | 
|---|
| [551] | 2503 | swp.x, | 
|---|
|  | 2504 | swp.y, | 
|---|
|  | 2505 | swp.cx, | 
|---|
|  | 2506 | swp.cy, | 
|---|
|  | 2507 | SWP_MOVE | SWP_SIZE | SWP_SHOW | SWP_ZORDER); | 
|---|
|  | 2508 | else if (!ParentIsDesktop(hwnd, | 
|---|
|  | 2509 | dcd->hwndParent) && | 
|---|
|  | 2510 | fAutoTile && *(ULONG *) realappname == FM3UL) | 
|---|
|  | 2511 | TileChildren(dcd->hwndParent, TRUE); | 
|---|
|  | 2512 | } | 
|---|
|  | 2513 | WinSetWindowPos(hwndC, HWND_TOP, 0, 0, 0, 0, SWP_ACTIVATE); | 
|---|
|  | 2514 | DosSleep(250L); | 
|---|
|  | 2515 | } | 
|---|
|  | 2516 | else | 
|---|
|  | 2517 | StartCollector(dcd->hwndParent, 4); | 
|---|
|  | 2518 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_COLLECTOR, 0), MPVOID); | 
|---|
|  | 2519 | break; | 
|---|
| [2] | 2520 |  | 
|---|
| [551] | 2521 | case IDM_COLLECTOR: | 
|---|
|  | 2522 | DosSleep(64L); | 
|---|
|  | 2523 | { | 
|---|
|  | 2524 | CHAR **list; | 
|---|
| [2] | 2525 |  | 
|---|
| [551] | 2526 | list = BuildList(hwnd); | 
|---|
|  | 2527 | if (list) { | 
|---|
|  | 2528 | if (Collector) { | 
|---|
|  | 2529 | if (!PostMsg(Collector, WM_COMMAND, | 
|---|
|  | 2530 | MPFROM2SHORT(IDM_COLLECTOR, 0), MPFROMP(list))) | 
|---|
|  | 2531 | FreeList(list); | 
|---|
| [176] | 2532 | } | 
|---|
| [551] | 2533 | else | 
|---|
|  | 2534 | FreeList(list); | 
|---|
|  | 2535 | } | 
|---|
|  | 2536 | } | 
|---|
|  | 2537 | break; | 
|---|
| [2] | 2538 |  | 
|---|
| [551] | 2539 | case IDM_COLLAPSEALL: | 
|---|
|  | 2540 | WinSendMsg(hwnd, CM_COLLAPSETREE, MPVOID, MPVOID); | 
|---|
|  | 2541 | break; | 
|---|
| [2] | 2542 |  | 
|---|
| [551] | 2543 | case IDM_COLLAPSE: | 
|---|
|  | 2544 | case IDM_EXPAND: | 
|---|
|  | 2545 | { | 
|---|
|  | 2546 | PCNRITEM pci = NULL; | 
|---|
| [2] | 2547 |  | 
|---|
| [551] | 2548 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2549 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2550 | if (pci->flags & RECFLAGS_UNDERENV) | 
|---|
|  | 2551 | break; | 
|---|
|  | 2552 | PostMsg(dcd->hwndObject, UM_EXPAND, mp1, MPFROMP(pci)); | 
|---|
|  | 2553 | } | 
|---|
|  | 2554 | } | 
|---|
|  | 2555 | break; | 
|---|
| [2] | 2556 |  | 
|---|
| [551] | 2557 | case IDM_UPDATE: | 
|---|
|  | 2558 | { | 
|---|
| [557] | 2559 | PCNRITEM pci = (PCNRITEM)CurrentRecord(hwnd); | 
|---|
|  | 2560 | if (pci && (INT)pci != -1) { | 
|---|
|  | 2561 | UINT driveflag = driveflags[toupper(*pci->szFileName) - 'A']; | 
|---|
| [551] | 2562 | if (pci->attrFile & FILE_DIRECTORY) { | 
|---|
|  | 2563 | if (pci->flags & RECFLAGS_UNDERENV) | 
|---|
|  | 2564 | break; | 
|---|
|  | 2565 | UnFlesh(hwnd, pci); | 
|---|
| [557] | 2566 | // Check if drive type might need update | 
|---|
|  | 2567 | if ((driveflag & (DRIVE_INVALID | DRIVE_NOPRESCAN)) || | 
|---|
| [618] | 2568 | (~driveflag & DRIVE_NOPRESCAN && pci->rc.hptrIcon == hptrDunno)) | 
|---|
| [557] | 2569 | { | 
|---|
| [551] | 2570 | driveflags[toupper(*pci->szFileName) - 'A'] &= | 
|---|
|  | 2571 | (DRIVE_IGNORE | DRIVE_NOPRESCAN | DRIVE_NOLOADICONS | | 
|---|
| [552] | 2572 | DRIVE_NOLOADSUBJS | DRIVE_NOLOADLONGS | DRIVE_NOSTATS); | 
|---|
| [551] | 2573 | DriveFlagsOne(toupper(*pci->szFileName) - 'A'); | 
|---|
| [618] | 2574 | driveflag = driveflags[toupper(*pci->szFileName) - 'A']; | 
|---|
| [557] | 2575 | if (driveflag & DRIVE_INVALID) | 
|---|
| [551] | 2576 | pci->rc.hptrIcon = hptrDunno; | 
|---|
| [176] | 2577 | else { | 
|---|
| [618] | 2578 | SelectDriveIcon(pci); | 
|---|
| [176] | 2579 | } | 
|---|
| [551] | 2580 | WinSendMsg(hwnd, | 
|---|
|  | 2581 | CM_INVALIDATERECORD, | 
|---|
|  | 2582 | MPFROMP(&pci), | 
|---|
|  | 2583 | MPFROM2SHORT(1, CMA_ERASE | CMA_REPOSITION)); | 
|---|
|  | 2584 | if (hwndMain) | 
|---|
|  | 2585 | PostMsg(hwndMain, UM_BUILDDRIVEBAR, MPVOID, MPVOID); | 
|---|
| [176] | 2586 | } | 
|---|
| [557] | 2587 | if (~driveflag & DRIVE_INVALID) | 
|---|
| [551] | 2588 | Flesh(hwnd, pci); | 
|---|
| [176] | 2589 | } | 
|---|
| [551] | 2590 | } | 
|---|
|  | 2591 | } | 
|---|
|  | 2592 | break; | 
|---|
| [2] | 2593 |  | 
|---|
| [551] | 2594 | case IDM_RESCAN: | 
|---|
|  | 2595 | PostMsg(dcd->hwndObject, UM_RESCAN, MPVOID, MPVOID); | 
|---|
|  | 2596 | break; | 
|---|
| [2] | 2597 |  | 
|---|
| [551] | 2598 | case IDM_RESORT: | 
|---|
|  | 2599 | WinSendMsg(hwnd, CM_SORTRECORD, MPFROMP(SortTreeCnr), MPVOID); | 
|---|
|  | 2600 | break; | 
|---|
| [2] | 2601 |  | 
|---|
| [551] | 2602 | case IDM_TEXT: | 
|---|
|  | 2603 | case IDM_MINIICONS: | 
|---|
|  | 2604 | { | 
|---|
|  | 2605 | CNRINFO cnri; | 
|---|
|  | 2606 |  | 
|---|
|  | 2607 | memset(&cnri, 0, sizeof(CNRINFO)); | 
|---|
|  | 2608 | cnri.cb = sizeof(CNRINFO); | 
|---|
|  | 2609 | WinSendMsg(hwnd, | 
|---|
|  | 2610 | CM_QUERYCNRINFO, | 
|---|
|  | 2611 | MPFROMP(&cnri), MPFROMLONG(sizeof(CNRINFO))); | 
|---|
|  | 2612 | if (SHORT1FROMMP(mp1) == IDM_MINIICONS) { | 
|---|
|  | 2613 | if (cnri.flWindowAttr & CV_MINI) | 
|---|
|  | 2614 | cnri.flWindowAttr &= (~CV_MINI); | 
|---|
|  | 2615 | else | 
|---|
|  | 2616 | cnri.flWindowAttr |= CV_MINI; | 
|---|
|  | 2617 | } | 
|---|
|  | 2618 | else { | 
|---|
|  | 2619 | if (cnri.flWindowAttr & CV_TEXT) { | 
|---|
|  | 2620 | cnri.flWindowAttr &= (~CV_TEXT); | 
|---|
|  | 2621 | cnri.flWindowAttr |= CV_ICON; | 
|---|
| [176] | 2622 | } | 
|---|
| [551] | 2623 | else { | 
|---|
|  | 2624 | cnri.flWindowAttr &= (~CV_ICON); | 
|---|
|  | 2625 | cnri.flWindowAttr |= CV_TEXT; | 
|---|
|  | 2626 | } | 
|---|
|  | 2627 | } | 
|---|
|  | 2628 | dcd->flWindowAttr = cnri.flWindowAttr; | 
|---|
|  | 2629 | PrfWriteProfileData(fmprof, | 
|---|
|  | 2630 | appname, | 
|---|
|  | 2631 | "TreeflWindowAttr", | 
|---|
|  | 2632 | &cnri.flWindowAttr, sizeof(ULONG)); | 
|---|
|  | 2633 | WinSendMsg(hwnd, | 
|---|
|  | 2634 | CM_SETCNRINFO, | 
|---|
|  | 2635 | MPFROMP(&cnri), | 
|---|
|  | 2636 | MPFROMLONG(CMA_FLWINDOWATTR | CMA_TREEICON | | 
|---|
|  | 2637 | CMA_SLTREEBITMAPORICON)); | 
|---|
|  | 2638 | } | 
|---|
|  | 2639 | break; | 
|---|
| [2] | 2640 |  | 
|---|
| [551] | 2641 | case IDM_SIZES: | 
|---|
|  | 2642 | case IDM_DRVFLAGS: | 
|---|
|  | 2643 | case IDM_SHOWALLFILES: | 
|---|
|  | 2644 | case IDM_UNDELETE: | 
|---|
|  | 2645 | case IDM_OPTIMIZE: | 
|---|
|  | 2646 | case IDM_CHKDSK: | 
|---|
|  | 2647 | case IDM_FORMAT: | 
|---|
|  | 2648 | case IDM_MKDIR: | 
|---|
|  | 2649 | case IDM_LOCK: | 
|---|
|  | 2650 | case IDM_UNLOCK: | 
|---|
|  | 2651 | case IDM_EJECT: | 
|---|
|  | 2652 | case IDM_CLOSETRAY: | 
|---|
|  | 2653 | { | 
|---|
|  | 2654 | PCNRITEM pci; | 
|---|
| [2] | 2655 |  | 
|---|
| [551] | 2656 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2657 | if (pci && (INT) pci != -1) | 
|---|
|  | 2658 | CommonDriveCmd(hwnd, pci->szFileName, SHORT1FROMMP(mp1)); | 
|---|
|  | 2659 | } | 
|---|
|  | 2660 | break; | 
|---|
| [2] | 2661 |  | 
|---|
| [551] | 2662 | case IDM_SAVETOLIST: | 
|---|
|  | 2663 | WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 2664 | hwnd, | 
|---|
|  | 2665 | SaveListDlgProc, FM3ModHandle, SAV_FRAME, MPFROMP(&hwnd)); | 
|---|
|  | 2666 | break; | 
|---|
| [2] | 2667 |  | 
|---|
| [551] | 2668 | case IDM_DELETE: | 
|---|
|  | 2669 | case IDM_PERMDELETE: | 
|---|
|  | 2670 | case IDM_MOVE: | 
|---|
|  | 2671 | case IDM_WPSMOVE: | 
|---|
|  | 2672 | case IDM_WILDMOVE: | 
|---|
|  | 2673 | case IDM_RENAME: | 
|---|
|  | 2674 | { | 
|---|
|  | 2675 | PCNRITEM pci; | 
|---|
| [2] | 2676 |  | 
|---|
| [551] | 2677 | pci = (PCNRITEM) CurrentRecord(hwnd); | 
|---|
|  | 2678 | if (pci && (INT) pci != -1) { | 
|---|
|  | 2679 | if (pci->flags & RECFLAGS_UNDERENV) | 
|---|
|  | 2680 | break; | 
|---|
|  | 2681 | } | 
|---|
|  | 2682 | } | 
|---|
|  | 2683 | /* else intentional fallthru */ | 
|---|
|  | 2684 | case IDM_ATTRS: | 
|---|
|  | 2685 | case IDM_INFO: | 
|---|
|  | 2686 | case IDM_COPY: | 
|---|
|  | 2687 | case IDM_WPSCOPY: | 
|---|
|  | 2688 | case IDM_WILDCOPY: | 
|---|
|  | 2689 | case IDM_DOITYOURSELF: | 
|---|
|  | 2690 | case IDM_OPENWINDOW: | 
|---|
|  | 2691 | case IDM_OPENSETTINGS: | 
|---|
|  | 2692 | case IDM_OPENDEFAULT: | 
|---|
|  | 2693 | case IDM_OPENICON: | 
|---|
|  | 2694 | case IDM_OPENDETAILS: | 
|---|
|  | 2695 | case IDM_OPENTREE: | 
|---|
|  | 2696 | case IDM_SHADOW: | 
|---|
|  | 2697 | case IDM_SHADOW2: | 
|---|
|  | 2698 | case IDM_COMPARE: | 
|---|
|  | 2699 | case IDM_VIEW: | 
|---|
|  | 2700 | case IDM_VIEWTEXT: | 
|---|
|  | 2701 | case IDM_VIEWBINARY: | 
|---|
|  | 2702 | case IDM_EDIT: | 
|---|
|  | 2703 | case IDM_EDITTEXT: | 
|---|
|  | 2704 | case IDM_EDITBINARY: | 
|---|
|  | 2705 | case IDM_EAS: | 
|---|
|  | 2706 | case IDM_SUBJECT: | 
|---|
|  | 2707 | case IDM_APPENDTOCLIP: | 
|---|
|  | 2708 | case IDM_SAVETOCLIP: | 
|---|
|  | 2709 | case IDM_ARCHIVE: | 
|---|
|  | 2710 | case IDM_MCIPLAY: | 
|---|
|  | 2711 | case IDM_UUDECODE: | 
|---|
|  | 2712 | { | 
|---|
|  | 2713 | LISTINFO *li; | 
|---|
|  | 2714 | ULONG action = UM_ACTION; | 
|---|
|  | 2715 |  | 
|---|
|  | 2716 | li = xmallocz(sizeof(LISTINFO), pszSrcFile, __LINE__); | 
|---|
|  | 2717 | if (li) { | 
|---|
|  | 2718 | li->type = SHORT1FROMMP(mp1); | 
|---|
|  | 2719 | li->hwnd = hwnd; | 
|---|
|  | 2720 | li->list = BuildList(hwnd); | 
|---|
|  | 2721 | if (!li->list || !li->list[0]) { | 
|---|
|  | 2722 | free(li); | 
|---|
|  | 2723 | break; | 
|---|
| [176] | 2724 | } | 
|---|
| [551] | 2725 | if (IsRoot(li->list[0])) { | 
|---|
|  | 2726 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2727 | case IDM_MOVE: | 
|---|
|  | 2728 | case IDM_COPY: | 
|---|
|  | 2729 | case IDM_WILDCOPY: | 
|---|
|  | 2730 | case IDM_WILDMOVE: | 
|---|
|  | 2731 | case IDM_WPSMOVE: | 
|---|
|  | 2732 | case IDM_WPSCOPY: | 
|---|
|  | 2733 | case IDM_RENAME: | 
|---|
|  | 2734 | case IDM_DELETE: | 
|---|
|  | 2735 | case IDM_PERMDELETE: | 
|---|
|  | 2736 | mp1 = MPFROM2SHORT(IDM_INFO, SHORT2FROMMP(mp1)); | 
|---|
|  | 2737 | li->type = IDM_INFO; | 
|---|
|  | 2738 | break; | 
|---|
| [176] | 2739 | } | 
|---|
|  | 2740 | } | 
|---|
| [551] | 2741 | switch (SHORT1FROMMP(mp1)) { | 
|---|
|  | 2742 | case IDM_APPENDTOCLIP: | 
|---|
|  | 2743 | case IDM_SAVETOCLIP: | 
|---|
|  | 2744 | case IDM_ARCHIVE: | 
|---|
|  | 2745 | case IDM_DELETE: | 
|---|
|  | 2746 | case IDM_PERMDELETE: | 
|---|
|  | 2747 | case IDM_ATTRS: | 
|---|
|  | 2748 | case IDM_SHADOW: | 
|---|
|  | 2749 | case IDM_SHADOW2: | 
|---|
|  | 2750 | case IDM_DOITYOURSELF: | 
|---|
|  | 2751 | case IDM_EAS: | 
|---|
|  | 2752 | case IDM_VIEW: | 
|---|
|  | 2753 | case IDM_VIEWTEXT: | 
|---|
|  | 2754 | case IDM_VIEWBINARY: | 
|---|
|  | 2755 | case IDM_EDIT: | 
|---|
|  | 2756 | case IDM_EDITTEXT: | 
|---|
|  | 2757 | case IDM_EDITBINARY: | 
|---|
|  | 2758 | case IDM_MCIPLAY: | 
|---|
|  | 2759 | action = UM_MASSACTION; | 
|---|
|  | 2760 | break; | 
|---|
|  | 2761 | } | 
|---|
|  | 2762 | if (SHORT1FROMMP(mp1) == IDM_SHADOW || | 
|---|
|  | 2763 | SHORT1FROMMP(mp1) == IDM_SHADOW2) | 
|---|
|  | 2764 | *li->targetpath = 0; | 
|---|
|  | 2765 | if (!PostMsg(dcd->hwndObject, action, MPFROMP(li), MPVOID)) { | 
|---|
|  | 2766 | Runtime_Error(pszSrcFile, __LINE__, "PostMsg"); | 
|---|
|  | 2767 | FreeListInfo(li); | 
|---|
|  | 2768 | } | 
|---|
|  | 2769 | } | 
|---|
|  | 2770 | } | 
|---|
|  | 2771 | break; | 
|---|
| [2] | 2772 |  | 
|---|
| [551] | 2773 | default: | 
|---|
|  | 2774 | if (SHORT1FROMMP(mp1) >= IDM_COMMANDSTART && | 
|---|
|  | 2775 | SHORT1FROMMP(mp1) < IDM_QUICKTOOLSTART) { | 
|---|
| [2] | 2776 |  | 
|---|
| [551] | 2777 | INT x; | 
|---|
| [2] | 2778 |  | 
|---|
| [551] | 2779 | if (!cmdloaded) | 
|---|
|  | 2780 | load_commands(); | 
|---|
|  | 2781 | x = SHORT1FROMMP(mp1) - IDM_COMMANDSTART; | 
|---|
|  | 2782 | if (x >= 0) { | 
|---|
|  | 2783 | x++; | 
|---|
|  | 2784 | RunCommand(hwnd, x); | 
|---|
|  | 2785 | if (fUnHilite) | 
|---|
|  | 2786 | UnHilite(hwnd, TRUE, &dcd->lastselection); | 
|---|
|  | 2787 | } | 
|---|
| [176] | 2788 | } | 
|---|
| [551] | 2789 | break; | 
|---|
| [2] | 2790 | } | 
|---|
| [551] | 2791 | } | 
|---|
|  | 2792 | return 0; | 
|---|
| [2] | 2793 |  | 
|---|
| [551] | 2794 | case WM_SAVEAPPLICATION: | 
|---|
|  | 2795 | if (dcd && !ParentIsDesktop(hwnd, dcd->hwndParent)) { | 
|---|
| [2] | 2796 |  | 
|---|
| [551] | 2797 | SWP swp, swpP; | 
|---|
|  | 2798 | INT ratio; | 
|---|
| [2] | 2799 |  | 
|---|
| [551] | 2800 | WinQueryWindowPos(dcd->hwndFrame, &swp); | 
|---|
|  | 2801 | if (!(swp.fl & (SWP_MINIMIZE | SWP_MAXIMIZE | SWP_HIDE))) { | 
|---|
|  | 2802 | WinQueryWindowPos(dcd->hwndParent, &swpP); | 
|---|
|  | 2803 | ratio = (swpP.cx * 100) / swp.cx; | 
|---|
|  | 2804 | if (ratio > 0) | 
|---|
|  | 2805 | PrfWriteProfileData(fmprof, appname, "TreeWindowRatio", | 
|---|
|  | 2806 | &ratio, sizeof(INT)); | 
|---|
| [2] | 2807 | } | 
|---|
| [551] | 2808 | } | 
|---|
|  | 2809 | else if (dcd && ParentIsDesktop(hwnd, dcd->hwndParent)) { | 
|---|
| [2] | 2810 |  | 
|---|
| [551] | 2811 | SWP swp; | 
|---|
| [2] | 2812 |  | 
|---|
| [551] | 2813 | WinQueryWindowPos(dcd->hwndFrame, &swp); | 
|---|
|  | 2814 | if (!(swp.fl & (SWP_HIDE | SWP_MINIMIZE | SWP_MAXIMIZE))) | 
|---|
|  | 2815 | WinStoreWindowPos(FM2Str, "VTreeWindowPos", dcd->hwndFrame); | 
|---|
|  | 2816 | } | 
|---|
|  | 2817 | break; | 
|---|
| [2] | 2818 |  | 
|---|
| [551] | 2819 | case UM_MINIMIZE: | 
|---|
|  | 2820 | if (dcd && hwndMain) { | 
|---|
|  | 2821 | fOkayMinimize = TRUE; | 
|---|
|  | 2822 | if (dcd->hwndObject && !fDummy) { | 
|---|
|  | 2823 | DosSleep(100L); | 
|---|
|  | 2824 | if (!fDummy) { | 
|---|
|  | 2825 | fOkayMinimize = FALSE; | 
|---|
|  | 2826 | WinSetWindowPos(((hwndMain) ? WinQueryWindow(hwndMain, QW_PARENT) : | 
|---|
|  | 2827 | dcd->hwndFrame), HWND_TOP, 0, 0, 0, 0, | 
|---|
|  | 2828 | SWP_MINIMIZE | SWP_DEACTIVATE); | 
|---|
| [176] | 2829 | } | 
|---|
| [2] | 2830 | } | 
|---|
| [551] | 2831 | } | 
|---|
|  | 2832 | return 0; | 
|---|
| [2] | 2833 |  | 
|---|
| [551] | 2834 | case UM_MAXIMIZE: | 
|---|
|  | 2835 | if (dcd || hwndMain) | 
|---|
|  | 2836 | WinSetWindowPos(((hwndMain) ? WinQueryWindow(hwndMain, QW_PARENT) : | 
|---|
|  | 2837 | dcd->hwndFrame), HWND_TOP, 0, 0, 0, 0, SWP_MAXIMIZE | | 
|---|
|  | 2838 | SWP_SHOW); | 
|---|
|  | 2839 | return 0; | 
|---|
| [2] | 2840 |  | 
|---|
| [551] | 2841 | case UM_CLOSE: | 
|---|
|  | 2842 | { | 
|---|
|  | 2843 | HWND hwndParent = WinQueryWindow(WinQueryWindow(WinQueryWindow(hwnd, | 
|---|
|  | 2844 | QW_PARENT), | 
|---|
|  | 2845 | QW_PARENT), QW_PARENT); | 
|---|
| [2] | 2846 |  | 
|---|
| [551] | 2847 | if (!mp1) { | 
|---|
|  | 2848 | if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID)) | 
|---|
|  | 2849 | WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
|  | 2850 | if (hwndParent && !ParentIsDesktop(hwnd, hwndParent)) | 
|---|
|  | 2851 | WinDestroyWindow(hwndParent); | 
|---|
| [2] | 2852 | } | 
|---|
|  | 2853 | else | 
|---|
| [551] | 2854 | WinDestroyWindow(WinQueryWindow(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 2855 | QW_PARENT)); | 
|---|
|  | 2856 | } | 
|---|
|  | 2857 | return 0; | 
|---|
| [2] | 2858 |  | 
|---|
| [551] | 2859 | case WM_CLOSE: | 
|---|
|  | 2860 | WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID); | 
|---|
|  | 2861 | if (dcd) | 
|---|
|  | 2862 | dcd->stopflag++; | 
|---|
|  | 2863 | if (dcd && dcd->hwndObject) { | 
|---|
|  | 2864 | /* kill object window */ | 
|---|
|  | 2865 | if (!PostMsg(dcd->hwndObject, WM_CLOSE, MPVOID, MPVOID)) | 
|---|
|  | 2866 | WinSendMsg(dcd->hwndObject, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2867 | } | 
|---|
|  | 2868 | else | 
|---|
|  | 2869 | WinSendMsg(hwnd, UM_CLOSE, MPFROMLONG(1L), MPVOID); | 
|---|
|  | 2870 | return 0; | 
|---|
| [2] | 2871 |  | 
|---|
| [551] | 2872 | case WM_DESTROY: | 
|---|
|  | 2873 | if (TreeCnrMenu) | 
|---|
|  | 2874 | WinDestroyWindow(TreeCnrMenu); | 
|---|
|  | 2875 | if (DirMenu) | 
|---|
|  | 2876 | WinDestroyWindow(DirMenu); | 
|---|
|  | 2877 | if (FileMenu) | 
|---|
|  | 2878 | WinDestroyWindow(FileMenu); | 
|---|
|  | 2879 | TreeCnrMenu = FileMenu = DirMenu = (HWND) 0; | 
|---|
|  | 2880 | EmptyCnr(hwnd); | 
|---|
|  | 2881 | if (apphead) { | 
|---|
| [2] | 2882 |  | 
|---|
| [551] | 2883 | APPNOTIFY *info, *next; | 
|---|
|  | 2884 |  | 
|---|
|  | 2885 | info = apphead; | 
|---|
|  | 2886 | while (info) { | 
|---|
|  | 2887 | next = info->next; | 
|---|
|  | 2888 | free(info); | 
|---|
|  | 2889 | info = next; | 
|---|
| [2] | 2890 | } | 
|---|
| [551] | 2891 | apphead = apptail = NULL; | 
|---|
|  | 2892 | } | 
|---|
|  | 2893 | break; | 
|---|
| [2] | 2894 | } | 
|---|
| [551] | 2895 | return (dcd && dcd->oldproc) ? dcd->oldproc(hwnd, msg, mp1, mp2) : | 
|---|
|  | 2896 | PFNWPCnr(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 2897 | } | 
|---|
|  | 2898 |  | 
|---|
| [551] | 2899 | HWND StartTreeCnr(HWND hwndParent, ULONG flags) | 
|---|
| [352] | 2900 | { | 
|---|
| [2] | 2901 | /* bitmapped flags: | 
|---|
|  | 2902 | * 0x00000001 = don't close app when window closes | 
|---|
|  | 2903 | * 0x00000002 = no frame controls | 
|---|
|  | 2904 | */ | 
|---|
|  | 2905 |  | 
|---|
| [551] | 2906 | HWND hwndFrame = (HWND) 0, hwndClient; | 
|---|
|  | 2907 | ULONG FrameFlags = FCF_TITLEBAR | FCF_SYSMENU | | 
|---|
|  | 2908 | FCF_SIZEBORDER | FCF_MINMAX | FCF_ICON | FCF_NOBYTEALIGN | FCF_ACCELTABLE; | 
|---|
|  | 2909 | DIRCNRDATA *dcd; | 
|---|
| [2] | 2910 |  | 
|---|
| [551] | 2911 | if (!hwndParent) | 
|---|
| [2] | 2912 | hwndParent = HWND_DESKTOP; | 
|---|
| [551] | 2913 | if (ParentIsDesktop(hwndParent, hwndParent)) | 
|---|
| [2] | 2914 | FrameFlags |= (FCF_TASKLIST | FCF_MENU); | 
|---|
| [551] | 2915 | if (flags & 2) | 
|---|
| [2] | 2916 | FrameFlags &= (~(FCF_TITLEBAR | FCF_SYSMENU | FCF_SIZEBORDER | | 
|---|
| [551] | 2917 | FCF_MINMAX | FCF_ICON)); | 
|---|
| [2] | 2918 | hwndFrame = WinCreateStdWindow(hwndParent, | 
|---|
| [176] | 2919 | WS_VISIBLE, | 
|---|
|  | 2920 | &FrameFlags, | 
|---|
| [593] | 2921 | WC_TREECONTAINER, | 
|---|
| [176] | 2922 | NULL, | 
|---|
|  | 2923 | WS_VISIBLE | fwsAnimate, | 
|---|
| [551] | 2924 | FM3ModHandle, TREE_FRAME, &hwndClient); | 
|---|
|  | 2925 | if (hwndFrame && hwndClient) { | 
|---|
| [352] | 2926 | dcd = xmalloc(sizeof(DIRCNRDATA), pszSrcFile, __LINE__); | 
|---|
|  | 2927 | if (!dcd) { | 
|---|
| [551] | 2928 | Runtime_Error(pszSrcFile, __LINE__, GetPString(IDS_OUTOFMEMORY)); | 
|---|
|  | 2929 | PostMsg(hwndClient, WM_CLOSE, MPVOID, MPVOID); | 
|---|
|  | 2930 | hwndFrame = (HWND) 0; | 
|---|
| [352] | 2931 | } | 
|---|
|  | 2932 | else { | 
|---|
| [2] | 2933 | SWP swp; | 
|---|
| [551] | 2934 |  | 
|---|
|  | 2935 | WinQueryWindowPos(hwndFrame, &swp); | 
|---|
|  | 2936 | if (*(ULONG *) realappname == FM3UL) { | 
|---|
| [377] | 2937 | if (!WinCreateWindow(hwndFrame, | 
|---|
| [593] | 2938 | WC_TREEOPENBUTTON, | 
|---|
| [551] | 2939 | "O", | 
|---|
|  | 2940 | WS_VISIBLE | BS_PUSHBUTTON | BS_NOPOINTERFOCUS, | 
|---|
|  | 2941 | ((swp.cx - | 
|---|
|  | 2942 | WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2943 | SV_CXMINMAXBUTTON)) - | 
|---|
|  | 2944 | WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2945 | SV_CXMINMAXBUTTON) / 2) - | 
|---|
|  | 2946 | WinQuerySysValue(HWND_DESKTOP, SV_CXSIZEBORDER), | 
|---|
|  | 2947 | (swp.cy - | 
|---|
|  | 2948 | WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2949 | SV_CYMINMAXBUTTON)) - | 
|---|
|  | 2950 | WinQuerySysValue(HWND_DESKTOP, SV_CYSIZEBORDER), | 
|---|
|  | 2951 | WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2952 | SV_CXMINMAXBUTTON) / 2, | 
|---|
|  | 2953 | WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2954 | SV_CYMINMAXBUTTON), hwndFrame, | 
|---|
|  | 2955 | HWND_TOP, IDM_OPENWINDOW, NULL, NULL)) { | 
|---|
|  | 2956 | Win_Error2(hwndFrame, hwndParent, pszSrcFile, __LINE__, | 
|---|
|  | 2957 | IDS_WINCREATEWINDOW); | 
|---|
| [377] | 2958 | } | 
|---|
|  | 2959 | } | 
|---|
|  | 2960 | else { | 
|---|
|  | 2961 | if (!WinCreateWindow(hwndFrame, | 
|---|
| [593] | 2962 | WC_TREESTATUS, | 
|---|
| [551] | 2963 | GetPString(IDS_YOUAREHERETEXT), | 
|---|
|  | 2964 | WS_VISIBLE | SS_TEXT | DT_LEFT | DT_VCENTER, | 
|---|
|  | 2965 | swp.x + 4 + WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2966 | SV_CXSIZEBORDER), | 
|---|
|  | 2967 | swp.cy - (22 + WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2968 | SV_CYSIZEBORDER)), | 
|---|
|  | 2969 | (swp.cx - 8) - (WinQuerySysValue(HWND_DESKTOP, | 
|---|
|  | 2970 | SV_CXSIZEBORDER) | 
|---|
|  | 2971 | * 2), 22, hwndFrame, HWND_TOP, | 
|---|
|  | 2972 | MAIN_STATUS, NULL, NULL)) { | 
|---|
|  | 2973 | Win_Error2(hwndFrame, hwndParent, pszSrcFile, __LINE__, | 
|---|
|  | 2974 | IDS_WINCREATEWINDOW); | 
|---|
| [377] | 2975 | } | 
|---|
|  | 2976 | } | 
|---|
| [551] | 2977 | memset(dcd, 0, sizeof(DIRCNRDATA)); | 
|---|
| [2] | 2978 | dcd->size = sizeof(DIRCNRDATA); | 
|---|
|  | 2979 | dcd->type = TREE_FRAME; | 
|---|
|  | 2980 | dcd->dontclose = ((flags & 1) != 0); | 
|---|
|  | 2981 | dcd->hwndParent = (hwndParent) ? hwndParent : HWND_DESKTOP; | 
|---|
|  | 2982 | dcd->hwndClient = hwndClient; | 
|---|
| [551] | 2983 | dcd->hwndFrame = hwndFrame; | 
|---|
| [2] | 2984 | { | 
|---|
| [176] | 2985 | PFNWP oldproc; | 
|---|
| [2] | 2986 |  | 
|---|
| [551] | 2987 | oldproc = WinSubclassWindow(hwndFrame, TreeFrameWndProc); | 
|---|
|  | 2988 | WinSetWindowPtr(hwndFrame, QWL_USER, (PVOID) oldproc); | 
|---|
|  | 2989 | oldproc = WinSubclassWindow(WinWindowFromID(hwndFrame, FID_TITLEBAR), | 
|---|
|  | 2990 | (PFNWP) TreeTitleWndProc); | 
|---|
|  | 2991 | WinSetWindowPtr(WinWindowFromID(hwndFrame, FID_TITLEBAR), | 
|---|
|  | 2992 | QWL_USER, (PVOID) oldproc); | 
|---|
| [2] | 2993 | } | 
|---|
|  | 2994 | dcd->hwndCnr = WinCreateWindow(hwndClient, | 
|---|
| [176] | 2995 | WC_CONTAINER, | 
|---|
|  | 2996 | NULL, | 
|---|
|  | 2997 | CCS_AUTOPOSITION | CCS_MINIICONS | | 
|---|
|  | 2998 | CCS_MINIRECORDCORE | WS_VISIBLE, | 
|---|
|  | 2999 | 0, | 
|---|
|  | 3000 | 0, | 
|---|
|  | 3001 | 0, | 
|---|
|  | 3002 | 0, | 
|---|
|  | 3003 | hwndClient, | 
|---|
| [551] | 3004 | HWND_TOP, (ULONG) TREE_CNR, NULL, NULL); | 
|---|
| [377] | 3005 | if (!dcd->hwndCnr) { | 
|---|
| [551] | 3006 | Win_Error2(hwndClient, hwndClient, pszSrcFile, __LINE__, | 
|---|
|  | 3007 | IDS_WINCREATEWINDOW); | 
|---|
|  | 3008 | PostMsg(hwndClient, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [377] | 3009 | free(dcd); | 
|---|
| [551] | 3010 | hwndFrame = (HWND) 0; | 
|---|
| [377] | 3011 | } | 
|---|
|  | 3012 | else { | 
|---|
| [551] | 3013 | WinSetWindowPtr(dcd->hwndCnr, QWL_USER, (PVOID) dcd); | 
|---|
|  | 3014 | if (ParentIsDesktop(hwndFrame, hwndParent)) { | 
|---|
|  | 3015 | WinSetWindowText(WinWindowFromID(hwndFrame, FID_TITLEBAR), "VTree"); | 
|---|
|  | 3016 | FixSwitchList(hwndFrame, "VTree"); | 
|---|
| [176] | 3017 | } | 
|---|
|  | 3018 | else { | 
|---|
| [551] | 3019 | WinSetWindowText(hwndFrame, GetPString(IDS_TREETEXT)); | 
|---|
|  | 3020 | WinSetWindowText(WinWindowFromID(hwndFrame, FID_TITLEBAR), | 
|---|
| [176] | 3021 | GetPString(IDS_TREETEXT)); | 
|---|
|  | 3022 | } | 
|---|
| [551] | 3023 | dcd->oldproc = WinSubclassWindow(dcd->hwndCnr, TreeCnrWndProc); | 
|---|
|  | 3024 | if (!PostMsg(dcd->hwndCnr, UM_SETUP, MPVOID, MPVOID)) | 
|---|
|  | 3025 | WinSendMsg(dcd->hwndCnr, UM_SETUP, MPVOID, MPVOID); | 
|---|
| [2] | 3026 | } | 
|---|
|  | 3027 | } | 
|---|
|  | 3028 | } | 
|---|
|  | 3029 | return hwndFrame; | 
|---|
|  | 3030 | } | 
|---|