| [30] | 1 |  | 
|---|
|  | 2 | /*********************************************************************** | 
|---|
|  | 3 |  | 
|---|
|  | 4 | $Id: datamin.c 793 2007-08-21 02:53:38Z gyoung $ | 
|---|
|  | 5 |  | 
|---|
|  | 6 | Minimized data bar | 
|---|
|  | 7 |  | 
|---|
|  | 8 | Copyright (c) 1993-98 M. Kimes | 
|---|
| [346] | 9 | Copyright (c) 2001, 2006 Steven H. Levine | 
|---|
| [30] | 10 |  | 
|---|
| [130] | 11 | 14 Sep 02 SHL Handle large partitions | 
|---|
|  | 12 | 16 Oct 02 SHL Handle large partitions better | 
|---|
|  | 13 | 23 May 05 SHL Use QWL_USER | 
|---|
| [136] | 14 | 23 May 05 SHL Avoid delays for inaccessible drives | 
|---|
| [162] | 15 | 25 May 05 SHL Use ULONGLONG and CommaFmtULL | 
|---|
| [204] | 16 | 06 Jun 05 SHL Drop unused code | 
|---|
| [346] | 17 | 22 Jul 06 SHL Check more run time errors | 
|---|
| [552] | 18 | 02 Jan 07 GKY Changed drive information string formating to accomodate 6 char FS names | 
|---|
|  | 19 | 07 Jan 07 GKY Move error strings etc. to string file | 
|---|
| [593] | 20 | 30 Mar 07 GKY Remove GetPString for window class names | 
|---|
| [793] | 21 | 20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat | 
|---|
| [30] | 22 |  | 
|---|
|  | 23 | ***********************************************************************/ | 
|---|
|  | 24 |  | 
|---|
| [2] | 25 | #define INCL_DOS | 
|---|
| [136] | 26 | #define INCL_DOSERRORS | 
|---|
| [2] | 27 | #define INCL_WIN | 
|---|
|  | 28 | #define INCL_GPI | 
|---|
| [162] | 29 | #define INCL_LONGLONG | 
|---|
|  | 30 | #include <os2.h> | 
|---|
| [2] | 31 |  | 
|---|
|  | 32 | #include <stdio.h> | 
|---|
|  | 33 | #include <stdlib.h> | 
|---|
|  | 34 | #include <string.h> | 
|---|
|  | 35 | #include <ctype.h> | 
|---|
|  | 36 | #include <limits.h> | 
|---|
| [689] | 37 | #include <process.h>                    // _beginthread | 
|---|
| [136] | 38 |  | 
|---|
| [2] | 39 | #include "fm3dll.h" | 
|---|
|  | 40 | #include "fm3dlg.h" | 
|---|
|  | 41 | #include "fm3str.h" | 
|---|
|  | 42 | #include "procstat.h" | 
|---|
| [136] | 43 | #include "datamin.h" | 
|---|
| [2] | 44 |  | 
|---|
|  | 45 | #pragma data_seg(DATA2) | 
|---|
| [346] | 46 |  | 
|---|
|  | 47 | static PSZ pszSrcFile = __FILE__; | 
|---|
|  | 48 |  | 
|---|
| [136] | 49 | APIRET16 APIENTRY16 Dos16MemAvail(PULONG pulAvailMem); | 
|---|
| [2] | 50 |  | 
|---|
| [136] | 51 | static volatile HEV G_hevDataMin = NULLHANDLE; | 
|---|
|  | 52 | static volatile HWND G_hwndSingle = NULLHANDLE; | 
|---|
| [2] | 53 |  | 
|---|
| [551] | 54 | static VOID dataminThread(VOID * pv); | 
|---|
| [2] | 55 |  | 
|---|
| [136] | 56 | long MINI_X = 208, MINI_Y = 16; | 
|---|
| [2] | 57 |  | 
|---|
| [136] | 58 | //=== MiniTimeProc - time, swap and drive status mini windows procedure === | 
|---|
| [2] | 59 |  | 
|---|
| [136] | 60 | MRESULT EXPENTRY MiniTimeProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
|  | 61 | { | 
|---|
|  | 62 | APIRET rc; | 
|---|
| [551] | 63 |  | 
|---|
|  | 64 | switch (msg) { | 
|---|
| [136] | 65 | case WM_CREATE: | 
|---|
|  | 66 | { | 
|---|
| [551] | 67 | PVOID pv = xmalloc(sizeof(tDataMin), pszSrcFile, __LINE__); | 
|---|
|  | 68 |  | 
|---|
| [136] | 69 | WinSetWindowPtr(hwnd, QWL_DATAMIN_PTR, pv); | 
|---|
|  | 70 | } | 
|---|
|  | 71 | break; | 
|---|
| [2] | 72 |  | 
|---|
| [136] | 73 | case WM_BUTTON1CLICK: | 
|---|
|  | 74 | { | 
|---|
|  | 75 | USHORT id = WinQueryWindowUShort(hwnd, QWS_ID); | 
|---|
|  | 76 |  | 
|---|
| [551] | 77 | if (id >= MINI_DRIVEA) { | 
|---|
|  | 78 | if (G_hevDataMin != NULLHANDLE) { | 
|---|
| [136] | 79 | G_hwndSingle = hwnd; | 
|---|
|  | 80 | rc = DosPostEventSem(G_hevDataMin); | 
|---|
| [551] | 81 | if (rc) { | 
|---|
| [552] | 82 | Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 83 | GetPString(IDS_POSTSEMFAILED)); | 
|---|
| [136] | 84 | } | 
|---|
|  | 85 | } | 
|---|
|  | 86 | } | 
|---|
|  | 87 | else if (id == MINI_TIME) | 
|---|
| [551] | 88 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), UM_SETUP6,     // Up time | 
|---|
|  | 89 | MPVOID, MPVOID); | 
|---|
| [136] | 90 | else if (id == MINI_PROC) | 
|---|
|  | 91 | WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
| [551] | 92 | WM_SYSCOMMAND, MPFROM2SHORT(SC_TASKMANAGER, 0), MPVOID); | 
|---|
| [136] | 93 | } | 
|---|
|  | 94 | break; | 
|---|
| [2] | 95 |  | 
|---|
| [136] | 96 | case WM_BUTTON1DBLCLK: | 
|---|
|  | 97 | { | 
|---|
|  | 98 | USHORT id = WinQueryWindowUShort(hwnd, QWS_ID); | 
|---|
| [2] | 99 |  | 
|---|
| [551] | 100 | if (id >= MINI_DRIVEA && !hwndMain) { | 
|---|
| [136] | 101 | CHAR s[] = " :\\"; | 
|---|
| [2] | 102 |  | 
|---|
| [136] | 103 | *s = (CHAR) (id - MINI_DRIVEA) + 'A'; | 
|---|
| [551] | 104 | OpenDirCnr((HWND) 0, HWND_DESKTOP, (HWND) 0, FALSE, s); | 
|---|
| [136] | 105 | return MRFROMLONG(1L); | 
|---|
|  | 106 | } | 
|---|
| [551] | 107 | else if (id == MINI_TIME) { | 
|---|
| [136] | 108 | OpenObject("<WP_CLOCK>", | 
|---|
| [551] | 109 | (SHORT2FROMMP(mp2) & KC_SHIFT) ? Default : Settings, hwnd); | 
|---|
| [136] | 110 | return MRFROMLONG(1L); | 
|---|
|  | 111 | } | 
|---|
| [2] | 112 |  | 
|---|
|  | 113 | #ifdef NEVER | 
|---|
| [551] | 114 | else if (id == MINI_MEM) { | 
|---|
| [136] | 115 | WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 116 | HWND_DESKTOP, | 
|---|
| [551] | 117 | SysInfoDlgProc, FM3ModHandle, SYS_FRAME, NULL); | 
|---|
| [136] | 118 | return MRFROMLONG(1L); | 
|---|
|  | 119 | } | 
|---|
| [2] | 120 | #endif | 
|---|
|  | 121 |  | 
|---|
| [551] | 122 | else if (id == MINI_PROC || id == MINI_MEM) { | 
|---|
| [136] | 123 | WinDlgBox(HWND_DESKTOP, | 
|---|
| [551] | 124 | hwnd, KillDlgProc, FM3ModHandle, KILL_FRAME, NULL); | 
|---|
| [136] | 125 | return MRFROMLONG(1L); | 
|---|
|  | 126 | } | 
|---|
| [551] | 127 | else if (id == MINI_SWAP && *SwapperDat) { | 
|---|
| [2] | 128 |  | 
|---|
| [136] | 129 | char s[5]; | 
|---|
| [2] | 130 |  | 
|---|
| [136] | 131 | strncpy(s, SwapperDat, 4); | 
|---|
|  | 132 | s[3] = 0; | 
|---|
|  | 133 | WinDlgBox(HWND_DESKTOP, | 
|---|
|  | 134 | hwndMain, | 
|---|
| [551] | 135 | UndeleteDlgProc, FM3ModHandle, UNDEL_FRAME, MPFROMP(s)); | 
|---|
| [136] | 136 | return MRFROMLONG(1L); | 
|---|
| [2] | 137 | } | 
|---|
| [136] | 138 | } | 
|---|
|  | 139 | break; | 
|---|
| [2] | 140 |  | 
|---|
| [136] | 141 | case WM_BUTTON1MOTIONSTART: | 
|---|
|  | 142 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
| [551] | 143 | UM_BUTTON1MOTIONSTART, MPVOID, MPVOID); | 
|---|
| [136] | 144 | break; | 
|---|
| [2] | 145 |  | 
|---|
| [136] | 146 | case WM_CONTEXTMENU: | 
|---|
| [551] | 147 | PostMsg(WinQueryWindow(hwnd, QW_PARENT), UM_CONTEXTMENU, MPVOID, MPVOID); | 
|---|
| [136] | 148 | break; | 
|---|
| [2] | 149 |  | 
|---|
| [136] | 150 | case WM_PAINT: | 
|---|
|  | 151 | { | 
|---|
|  | 152 | MRESULT mr = 0; | 
|---|
|  | 153 | USHORT id; | 
|---|
|  | 154 |  | 
|---|
|  | 155 | id = WinQueryWindowUShort(hwnd, QWS_ID); | 
|---|
| [551] | 156 | if (id >= MINI_DRIVEA) { | 
|---|
| [136] | 157 | HPS hps = WinBeginPaint(hwnd, (HPS) 0, NULL); | 
|---|
| [551] | 158 |  | 
|---|
|  | 159 | if (hps) { | 
|---|
| [136] | 160 | mr = WinSendMsg(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
| [551] | 161 | UM_PAINT, MPFROM2SHORT(id, 0), MPFROMLONG(hps)); | 
|---|
| [136] | 162 | WinEndPaint(hps); | 
|---|
| [551] | 163 | return mr;                    // Bypass default paint | 
|---|
| [136] | 164 | } | 
|---|
|  | 165 | } | 
|---|
|  | 166 | } | 
|---|
|  | 167 | break; | 
|---|
| [2] | 168 |  | 
|---|
| [551] | 169 | case WM_DESTROY: | 
|---|
|  | 170 | { | 
|---|
|  | 171 | PVOID pv = WinQueryWindowPtr(hwnd, QWL_DATAMIN_PTR); | 
|---|
|  | 172 |  | 
|---|
|  | 173 | xfree(pv); | 
|---|
|  | 174 | } | 
|---|
|  | 175 | break; | 
|---|
| [2] | 176 | } | 
|---|
| [136] | 177 | return PFNWPStatic(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 178 |  | 
|---|
| [551] | 179 | }                                       // MiniTimeProc | 
|---|
| [2] | 180 |  | 
|---|
| [136] | 181 | //=== DataProc - databar client window procedure === | 
|---|
| [2] | 182 |  | 
|---|
| [136] | 183 | MRESULT EXPENTRY DataProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2) | 
|---|
|  | 184 | { | 
|---|
|  | 185 | APIRET rc; | 
|---|
|  | 186 |  | 
|---|
| [2] | 187 | static ULONG counter; | 
|---|
| [136] | 188 | static BOOL NoFloat, noqproc = FALSE, Positioned; | 
|---|
| [551] | 189 | static HWND hwndMenu = (HWND) 0; | 
|---|
| [2] | 190 |  | 
|---|
| [551] | 191 | switch (msg) { | 
|---|
| [136] | 192 | case WM_CREATE: | 
|---|
| [377] | 193 | if (DataHwnd) { | 
|---|
| [551] | 194 | WinSetWindowPos(DataHwnd, HWND_TOP, 0, 0, 0, 0, SWP_ZORDER | SWP_SHOW); | 
|---|
| [136] | 195 | return MRFROMLONG(1L); | 
|---|
|  | 196 | } | 
|---|
|  | 197 | DataHwnd = WinQueryWindow(hwnd, QW_PARENT); | 
|---|
|  | 198 | NoFloat = FALSE; | 
|---|
|  | 199 | Positioned = FALSE; | 
|---|
|  | 200 | SetPresParams(hwnd, | 
|---|
| [551] | 201 | &RGBGREY, &RGBBLACK, &RGBBLACK, GetPString(IDS_8HELVTEXT)); | 
|---|
| [136] | 202 | { | 
|---|
|  | 203 | int c; | 
|---|
|  | 204 | long x = 3; | 
|---|
| [551] | 205 | USHORT ids[] = { MINI_TIME, MINI_MEM, MINI_SWAP, MINI_PROC, 0 }; | 
|---|
| [136] | 206 | POINTL aptl[TXTBOX_COUNT]; | 
|---|
|  | 207 | HPS hps; | 
|---|
|  | 208 |  | 
|---|
|  | 209 | hps = WinGetPS(hwnd); | 
|---|
| [551] | 210 | if (hps) { | 
|---|
| [136] | 211 | GpiQueryTextBox(hps, | 
|---|
|  | 212 | 34, | 
|---|
|  | 213 | "  -=03:08:22  SMW  1998/08/02=-  ", | 
|---|
| [551] | 214 | TXTBOX_COUNT, aptl); | 
|---|
| [136] | 215 | WinReleasePS(hps); | 
|---|
|  | 216 | MINI_X = aptl[TXTBOX_TOPRIGHT].x + 6; | 
|---|
|  | 217 | MINI_Y = aptl[TXTBOX_TOPRIGHT].y + 6; | 
|---|
| [2] | 218 | } | 
|---|
| [551] | 219 | for (c = 0; ids[c]; c++) { | 
|---|
| [377] | 220 | if (!WinCreateWindow(hwnd, | 
|---|
| [593] | 221 | WC_MINITIME, | 
|---|
| [551] | 222 | NullStr, | 
|---|
|  | 223 | SS_TEXT | DT_CENTER | DT_VCENTER | WS_VISIBLE, | 
|---|
|  | 224 | x, | 
|---|
|  | 225 | 3, | 
|---|
|  | 226 | MINI_X, | 
|---|
|  | 227 | MINI_Y, hwnd, HWND_TOP, ids[c], NULL, NULL)) { | 
|---|
|  | 228 | Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, IDS_WINCREATEWINDOW); | 
|---|
| [377] | 229 | } | 
|---|
| [136] | 230 | x += (MINI_X + 4); | 
|---|
| [2] | 231 | } | 
|---|
| [136] | 232 | } | 
|---|
| [551] | 233 | if (!hwndMain) { | 
|---|
| [136] | 234 | SWCNTRL swctl; | 
|---|
| [2] | 235 |  | 
|---|
| [136] | 236 | memset(&swctl, 0, sizeof(swctl)); | 
|---|
|  | 237 | swctl.hwnd = WinQueryWindow(hwnd, QW_PARENT); | 
|---|
|  | 238 | swctl.uchVisibility = SWL_VISIBLE; | 
|---|
|  | 239 | swctl.fbJump = (fDataToFore) ? SWL_NOTJUMPABLE : SWL_JUMPABLE; | 
|---|
|  | 240 | swctl.bProgType = PROG_PM; | 
|---|
| [551] | 241 | strcpy(swctl.szSwtitle, GetPString(IDS_DATABARTITLETEXT)); | 
|---|
|  | 242 | WinCreateSwitchEntry(WinQueryAnchorBlock(hwnd), &swctl); | 
|---|
| [136] | 243 | } | 
|---|
| [551] | 244 | PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID); | 
|---|
| [136] | 245 | return 0; | 
|---|
| [2] | 246 |  | 
|---|
| [136] | 247 | case WM_MENUEND: | 
|---|
|  | 248 | NoFloat = FALSE; | 
|---|
| [551] | 249 | if (hwndMenu == (HWND) mp2) { | 
|---|
| [136] | 250 | WinDestroyWindow(hwndMenu); | 
|---|
| [551] | 251 | hwndMenu = (HWND) 0; | 
|---|
| [136] | 252 | } | 
|---|
|  | 253 | break; | 
|---|
|  | 254 |  | 
|---|
|  | 255 | case UM_RESTORE: | 
|---|
|  | 256 | WinSetWindowPtr(hwnd, QWL_USER, mp1); | 
|---|
|  | 257 | return 0; | 
|---|
|  | 258 |  | 
|---|
|  | 259 | case UM_SETUP: | 
|---|
|  | 260 | { | 
|---|
|  | 261 | long x, y; | 
|---|
|  | 262 | SWP swp, swpD; | 
|---|
|  | 263 | int c; | 
|---|
|  | 264 | ULONG size = sizeof(SWP); | 
|---|
|  | 265 | ULONG numdrives = 0; | 
|---|
|  | 266 | ULONG drivestyle = (DRIVE_REMOVABLE | DRIVE_INVALID | | 
|---|
| [553] | 267 | DRIVE_IGNORE | DRIVE_ZIPSTREAM | DRIVE_NOSTATS); | 
|---|
| [136] | 268 | ULONG ulDriveNum, ulDriveMap; | 
|---|
|  | 269 |  | 
|---|
|  | 270 | if (!fDataInclRemote) | 
|---|
| [553] | 271 | drivestyle |= DRIVE_REMOTE || DRIVE_VIRTUAL || DRIVE_RAMDISK; | 
|---|
| [551] | 272 | if (fDataShowDrives) { | 
|---|
| [136] | 273 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 274 | DosQCurDisk(&ulDriveNum, &ulDriveMap); | 
|---|
|  | 275 | x = 3; | 
|---|
|  | 276 | y = MINI_Y + 4; | 
|---|
|  | 277 | // Drive status windows | 
|---|
| [551] | 278 | for (c = 2; c < 26; c++) { | 
|---|
|  | 279 | if ((ulDriveMap & (1L << c)) && !(driveflags[c] & drivestyle)) { | 
|---|
| [377] | 280 | if (!WinCreateWindow(hwnd, | 
|---|
| [593] | 281 | WC_MINITIME, | 
|---|
| [551] | 282 | NullStr, | 
|---|
|  | 283 | SS_TEXT | DT_CENTER | DT_VCENTER | | 
|---|
|  | 284 | WS_VISIBLE, x, y, MINI_X, MINI_Y, hwnd, | 
|---|
|  | 285 | HWND_TOP, MINI_DRIVEA + c, NULL, NULL)) { | 
|---|
|  | 286 | Win_Error2(hwnd, hwnd, pszSrcFile, __LINE__, | 
|---|
|  | 287 | IDS_WINCREATEWINDOW); | 
|---|
| [377] | 288 | } | 
|---|
| [136] | 289 | numdrives++; | 
|---|
|  | 290 | x += (MINI_X + 4); | 
|---|
| [551] | 291 | if ((numdrives % 4) == 0) { | 
|---|
| [136] | 292 | y += (MINI_Y + 4); | 
|---|
|  | 293 | x = 3; | 
|---|
|  | 294 | } | 
|---|
|  | 295 | } | 
|---|
|  | 296 | } | 
|---|
| [2] | 297 | } | 
|---|
| [136] | 298 | x = (MINI_X * 4) + 18; | 
|---|
|  | 299 | y = (MINI_Y + 4) + ((numdrives / 4) * (MINI_Y + 4)) + | 
|---|
|  | 300 | (((numdrives % 4) != 0) * (MINI_Y + 4)); | 
|---|
| [551] | 301 | if (!Positioned) { | 
|---|
|  | 302 | if (PrfQueryProfileData(fmprof, appname, "DataMinPos", &swp, &size)) { | 
|---|
| [136] | 303 | WinQueryWindowPos(HWND_DESKTOP, &swpD); | 
|---|
|  | 304 | if (swp.x > swpD.cx - 16) | 
|---|
|  | 305 | swp.x = swpD.cx - 16; | 
|---|
|  | 306 | if (swp.y > swpD.cy - 16) | 
|---|
|  | 307 | swp.y = swpD.cy - 16; | 
|---|
|  | 308 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 309 | HWND_TOP, | 
|---|
|  | 310 | swp.x, | 
|---|
|  | 311 | swp.y, | 
|---|
| [551] | 312 | x, y, SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_ZORDER); | 
|---|
| [136] | 313 | } | 
|---|
|  | 314 | else | 
|---|
|  | 315 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 316 | HWND_TOP, | 
|---|
|  | 317 | 0, | 
|---|
|  | 318 | 0, | 
|---|
| [551] | 319 | x, y, SWP_SHOW | SWP_SIZE | SWP_MOVE | SWP_ZORDER); | 
|---|
| [136] | 320 | Positioned = TRUE; | 
|---|
|  | 321 | } | 
|---|
|  | 322 | else | 
|---|
|  | 323 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 324 | HWND_TOP, | 
|---|
| [551] | 325 | 0, 0, x, y, SWP_SHOW | SWP_SIZE | SWP_ZORDER); | 
|---|
|  | 326 | WinShowWindow(WinQueryWindow(hwnd, QW_PARENT), TRUE); | 
|---|
| [136] | 327 | if (numdrives) { | 
|---|
| [551] | 328 | if (_beginthread(dataminThread, NULL, 32768, (PVOID) hwnd) == -1) { | 
|---|
|  | 329 | Runtime_Error(pszSrcFile, __LINE__, | 
|---|
|  | 330 | GetPString(IDS_COULDNTSTARTTHREADTEXT)); | 
|---|
|  | 331 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [136] | 332 | } | 
|---|
|  | 333 | } | 
|---|
|  | 334 | counter = 0; | 
|---|
| [551] | 335 | PostMsg(hwnd, UM_TIMER, MPVOID, MPVOID); | 
|---|
| [136] | 336 | } | 
|---|
| [551] | 337 | return 0;                           // UM_SETUP | 
|---|
| [136] | 338 |  | 
|---|
|  | 339 | case WM_BUTTON1DBLCLK: | 
|---|
|  | 340 | if (hwndMain) | 
|---|
| [551] | 341 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [136] | 342 | break; | 
|---|
|  | 343 |  | 
|---|
|  | 344 | case UM_CONTEXTMENU: | 
|---|
|  | 345 | case WM_CONTEXTMENU: | 
|---|
|  | 346 | if (!hwndMenu) | 
|---|
| [551] | 347 | hwndMenu = WinLoadMenu(HWND_DESKTOP, FM3ModHandle, MINI_FRAME); | 
|---|
|  | 348 | if (hwndMenu) { | 
|---|
|  | 349 | WinCheckMenuItem(hwndMenu, MINI_FLOAT, fDataToFore); | 
|---|
|  | 350 | WinCheckMenuItem(hwndMenu, MINI_SHOW, fDataShowDrives); | 
|---|
|  | 351 | WinCheckMenuItem(hwndMenu, MINI_BORING, fDullMin); | 
|---|
|  | 352 | WinCheckMenuItem(hwndMenu, MINI_INCLREMOTE, fDataInclRemote); | 
|---|
| [136] | 353 | NoFloat = TRUE; | 
|---|
| [551] | 354 | if (!PopupMenu(hwnd, hwnd, hwndMenu)) | 
|---|
| [136] | 355 | NoFloat = FALSE; | 
|---|
|  | 356 | } | 
|---|
|  | 357 | if (msg == UM_CONTEXTMENU) | 
|---|
| [2] | 358 | return 0; | 
|---|
| [136] | 359 | break; | 
|---|
| [2] | 360 |  | 
|---|
| [136] | 361 | case WM_BUTTON2DBLCLK: | 
|---|
| [551] | 362 | if (!(SHORT2FROMMP(mp2) & KC_SHIFT)) { | 
|---|
|  | 363 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(MINI_FLOAT, 0), MPVOID); | 
|---|
| [2] | 364 | break; | 
|---|
| [136] | 365 | } | 
|---|
|  | 366 | /* else intentional fallthru */ | 
|---|
|  | 367 | case WM_CHORD: | 
|---|
|  | 368 | case WM_BUTTON3DBLCLK: | 
|---|
| [551] | 369 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(MINI_SHOW, 0), MPVOID); | 
|---|
| [136] | 370 | break; | 
|---|
| [2] | 371 |  | 
|---|
| [136] | 372 | case UM_BUTTON1MOTIONSTART: | 
|---|
|  | 373 | case WM_BUTTON1MOTIONSTART: | 
|---|
|  | 374 | { | 
|---|
|  | 375 | TRACKINFO TrackInfo; | 
|---|
|  | 376 | SWP Position; | 
|---|
| [2] | 377 |  | 
|---|
| [136] | 378 | memset(&TrackInfo, 0, sizeof(TrackInfo)); | 
|---|
|  | 379 | TrackInfo.cxBorder = 1; | 
|---|
|  | 380 | TrackInfo.cyBorder = 1; | 
|---|
|  | 381 | TrackInfo.cxGrid = 1; | 
|---|
|  | 382 | TrackInfo.cyGrid = 1; | 
|---|
|  | 383 | TrackInfo.cxKeyboard = 8; | 
|---|
|  | 384 | TrackInfo.cyKeyboard = 8; | 
|---|
|  | 385 | WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &Position); | 
|---|
|  | 386 | TrackInfo.rclTrack.xLeft = Position.x; | 
|---|
|  | 387 | TrackInfo.rclTrack.xRight = Position.x + Position.cx; | 
|---|
|  | 388 | TrackInfo.rclTrack.yBottom = Position.y; | 
|---|
|  | 389 | TrackInfo.rclTrack.yTop = Position.y + Position.cy; | 
|---|
|  | 390 | WinQueryWindowPos(HWND_DESKTOP, &Position); | 
|---|
|  | 391 | TrackInfo.rclBoundary.xLeft = Position.x; | 
|---|
|  | 392 | TrackInfo.rclBoundary.xRight = Position.x + Position.cx; | 
|---|
|  | 393 | TrackInfo.rclBoundary.yBottom = Position.y; | 
|---|
|  | 394 | TrackInfo.rclBoundary.yTop = Position.y + Position.cy; | 
|---|
|  | 395 | TrackInfo.ptlMinTrackSize.x = 0; | 
|---|
|  | 396 | TrackInfo.ptlMinTrackSize.y = 0; | 
|---|
|  | 397 | TrackInfo.ptlMaxTrackSize.x = Position.cx; | 
|---|
|  | 398 | TrackInfo.ptlMaxTrackSize.y = Position.cy; | 
|---|
|  | 399 | TrackInfo.fs = TF_MOVE | TF_STANDARD | TF_ALLINBOUNDARY; | 
|---|
| [551] | 400 | if (WinTrackRect(HWND_DESKTOP, (HPS) 0, &TrackInfo)) { | 
|---|
| [136] | 401 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 402 | HWND_TOP, TrackInfo.rclTrack.xLeft, | 
|---|
|  | 403 | TrackInfo.rclTrack.yBottom, 0, 0, SWP_MOVE); | 
|---|
|  | 404 | WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID); | 
|---|
|  | 405 | } | 
|---|
|  | 406 | } | 
|---|
|  | 407 | break; | 
|---|
| [2] | 408 |  | 
|---|
| [136] | 409 | case WM_HELP: | 
|---|
|  | 410 | PostMsg(hwnd, WM_COMMAND, MPFROM2SHORT(IDM_HELP, 0), MPVOID); | 
|---|
|  | 411 | break; | 
|---|
|  | 412 |  | 
|---|
|  | 413 | case WM_COMMAND: | 
|---|
| [551] | 414 | switch (SHORT1FROMMP(mp1)) { | 
|---|
| [136] | 415 | case IDM_COMMANDLINE: | 
|---|
|  | 416 | case IDM_DOSCOMMANDLINE: | 
|---|
|  | 417 | case IDM_WINFULLSCREEN: | 
|---|
|  | 418 | { | 
|---|
|  | 419 | CHAR *env = GetCmdSpec(FALSE), path[CCHMAXPATH]; | 
|---|
|  | 420 | INT type = SEPARATE | WINDOWED; | 
|---|
|  | 421 |  | 
|---|
|  | 422 | *path = 0; | 
|---|
| [551] | 423 | TopWindowName(hwnd, (HWND) 0, path); | 
|---|
| [136] | 424 | if (SHORT1FROMMP(mp1) == IDM_DOSCOMMANDLINE) | 
|---|
|  | 425 | env = GetCmdSpec(TRUE); | 
|---|
| [551] | 426 | else if (SHORT1FROMMP(mp1) != IDM_COMMANDLINE) { | 
|---|
| [136] | 427 | env = "WINOS2.COM"; | 
|---|
|  | 428 | type = SEPARATE | FULLSCREEN; | 
|---|
|  | 429 | } | 
|---|
| [551] | 430 | runemf2(type, hwnd, path, NULL, "%s", env); | 
|---|
| [2] | 431 | } | 
|---|
| [136] | 432 | break; | 
|---|
| [2] | 433 |  | 
|---|
| [136] | 434 | case IDM_HELP: | 
|---|
|  | 435 | if (hwndHelp) | 
|---|
|  | 436 | WinSendMsg(hwndHelp, | 
|---|
|  | 437 | HM_DISPLAY_HELP, | 
|---|
| [551] | 438 | MPFROM2SHORT(HELP_DATABAR, 0), MPFROMSHORT(HM_RESOURCEID)); | 
|---|
| [2] | 439 | break; | 
|---|
|  | 440 |  | 
|---|
| [136] | 441 | case MINI_CLOSE: | 
|---|
| [551] | 442 | PostMsg(hwnd, WM_CLOSE, MPVOID, MPVOID); | 
|---|
| [2] | 443 | break; | 
|---|
|  | 444 |  | 
|---|
| [136] | 445 | case MINI_BORING: | 
|---|
|  | 446 | fDullMin = (fDullMin) ? FALSE : TRUE; | 
|---|
|  | 447 | PrfWriteProfileData(fmprof, | 
|---|
| [551] | 448 | FM3Str, "DullDatabar", &fDullMin, sizeof(BOOL)); | 
|---|
|  | 449 | if (G_hevDataMin != NULLHANDLE) { | 
|---|
| [136] | 450 | rc = DosPostEventSem(G_hevDataMin); | 
|---|
|  | 451 | if (rc) { | 
|---|
| [552] | 452 | Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 453 | GetPString(IDS_POSTSEMFAILED)); | 
|---|
| [136] | 454 | } | 
|---|
| [2] | 455 | } | 
|---|
| [136] | 456 |  | 
|---|
| [2] | 457 | break; | 
|---|
|  | 458 |  | 
|---|
| [136] | 459 | case MINI_INCLREMOTE: | 
|---|
|  | 460 | case MINI_SHOW: | 
|---|
| [551] | 461 | if (SHORT1FROMMP(mp1) == MINI_SHOW) { | 
|---|
| [136] | 462 | fDataShowDrives = (fDataShowDrives) ? FALSE : TRUE; | 
|---|
|  | 463 | PrfWriteProfileData(fmprof, | 
|---|
|  | 464 | appname, | 
|---|
| [551] | 465 | "DataShowDrives", &fDataShowDrives, sizeof(BOOL)); | 
|---|
| [136] | 466 | } | 
|---|
| [551] | 467 | else { | 
|---|
| [136] | 468 | fDataInclRemote = (fDataInclRemote) ? FALSE : TRUE; | 
|---|
|  | 469 | PrfWriteProfileData(fmprof, | 
|---|
|  | 470 | appname, | 
|---|
| [551] | 471 | "DataInclRemote", &fDataInclRemote, sizeof(BOOL)); | 
|---|
| [136] | 472 | } | 
|---|
|  | 473 | { | 
|---|
|  | 474 | HENUM henum; | 
|---|
|  | 475 | HWND hwndChild; | 
|---|
|  | 476 | USHORT id; | 
|---|
| [2] | 477 |  | 
|---|
| [136] | 478 | henum = WinBeginEnumWindows(hwnd); | 
|---|
| [551] | 479 | while ((hwndChild = WinGetNextWindow(henum)) != NULLHANDLE) { | 
|---|
| [136] | 480 | id = WinQueryWindowUShort(hwndChild, QWS_ID); | 
|---|
|  | 481 | if (id >= MINI_DRIVEA) | 
|---|
|  | 482 | WinDestroyWindow(hwndChild); | 
|---|
|  | 483 | } | 
|---|
|  | 484 | WinEndEnumWindows(henum); | 
|---|
| [2] | 485 | } | 
|---|
| [136] | 486 | PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID); | 
|---|
| [2] | 487 | break; | 
|---|
|  | 488 |  | 
|---|
| [136] | 489 | case MINI_FLOAT: | 
|---|
|  | 490 | fDataToFore = (fDataToFore) ? FALSE : TRUE; | 
|---|
|  | 491 | PrfWriteProfileData(fmprof, | 
|---|
| [551] | 492 | appname, "DataToFore", &fDataToFore, sizeof(BOOL)); | 
|---|
|  | 493 | if (!hwndMain) { | 
|---|
| [136] | 494 |  | 
|---|
|  | 495 | SWCNTRL swcntrl; | 
|---|
|  | 496 | HSWITCH hswitch; | 
|---|
|  | 497 |  | 
|---|
|  | 498 | hswitch = (HSWITCH) WinQuerySwitchHandle(hwnd, (PID) 0); | 
|---|
| [551] | 499 | if (hswitch) { | 
|---|
| [136] | 500 | memset(&swcntrl, 0, sizeof(SWCNTRL)); | 
|---|
| [551] | 501 | if (!WinQuerySwitchEntry(hswitch, &swcntrl)) { | 
|---|
| [136] | 502 | swcntrl.fbJump = (fDataToFore) ? SWL_NOTJUMPABLE : SWL_JUMPABLE; | 
|---|
| [551] | 503 | WinChangeSwitchEntry(hswitch, &swcntrl); | 
|---|
| [136] | 504 | } | 
|---|
|  | 505 | } | 
|---|
|  | 506 | } | 
|---|
| [2] | 507 | break; | 
|---|
| [136] | 508 | } | 
|---|
|  | 509 | return 0; | 
|---|
| [2] | 510 |  | 
|---|
| [136] | 511 | case WM_SIZE: | 
|---|
|  | 512 | WinSetWindowPos(hwnd, | 
|---|
|  | 513 | HWND_TOP, | 
|---|
|  | 514 | 0, | 
|---|
|  | 515 | 0, | 
|---|
|  | 516 | SHORT1FROMMP(mp2), | 
|---|
| [551] | 517 | SHORT2FROMMP(mp2), SWP_MOVE | SWP_SIZE); | 
|---|
| [136] | 518 | break; | 
|---|
| [2] | 519 |  | 
|---|
| [136] | 520 | case WM_PAINT: | 
|---|
|  | 521 | { | 
|---|
|  | 522 | HPS hps; | 
|---|
|  | 523 | POINTL ptl; | 
|---|
|  | 524 | SWP swp; | 
|---|
|  | 525 | RECTL rcl; | 
|---|
| [2] | 526 |  | 
|---|
| [551] | 527 | hps = WinBeginPaint(hwnd, (HPS) 0, &rcl); | 
|---|
|  | 528 | if (hps) { | 
|---|
|  | 529 | WinFillRect(hps, (PRECTL) & rcl, CLR_PALEGRAY); | 
|---|
| [136] | 530 | GpiSetMix(hps, FM_OVERPAINT); | 
|---|
|  | 531 | GpiSetColor(hps, CLR_WHITE); | 
|---|
|  | 532 | WinQueryWindowPos(hwnd, &swp); | 
|---|
|  | 533 | ptl.x = 0; | 
|---|
|  | 534 | ptl.y = 0; | 
|---|
|  | 535 | GpiMove(hps, &ptl); | 
|---|
|  | 536 | ptl.y = swp.cy - 1; | 
|---|
|  | 537 | GpiLine(hps, &ptl); | 
|---|
|  | 538 | ptl.x = swp.cx - 1; | 
|---|
|  | 539 | GpiLine(hps, &ptl); | 
|---|
|  | 540 | GpiSetColor(hps, CLR_DARKGRAY); | 
|---|
|  | 541 | ptl.y = 0; | 
|---|
|  | 542 | GpiLine(hps, &ptl); | 
|---|
|  | 543 | ptl.x = 0; | 
|---|
|  | 544 | GpiLine(hps, &ptl); | 
|---|
|  | 545 | { | 
|---|
|  | 546 | HENUM henum; | 
|---|
|  | 547 | HWND hwndTemp; | 
|---|
| [2] | 548 |  | 
|---|
| [136] | 549 | henum = WinBeginEnumWindows(hwnd); | 
|---|
| [551] | 550 | while ((hwndTemp = WinGetNextWindow(henum)) != NULLHANDLE) { | 
|---|
| [136] | 551 | PaintRecessedWindow(hwndTemp, | 
|---|
| [551] | 552 | hps, (WinQueryWindowUShort(hwndTemp, QWS_ID) | 
|---|
|  | 553 | != MINI_TIME), FALSE); | 
|---|
| [136] | 554 | } | 
|---|
|  | 555 | WinEndEnumWindows(henum); | 
|---|
|  | 556 | } | 
|---|
|  | 557 | WinEndPaint(hps); | 
|---|
|  | 558 | } | 
|---|
|  | 559 | } | 
|---|
|  | 560 | return 0; | 
|---|
| [2] | 561 |  | 
|---|
| [136] | 562 | case UM_PAINT: | 
|---|
|  | 563 | { | 
|---|
|  | 564 | CHAR s[90]; | 
|---|
|  | 565 | CHAR szFreeQty[38]; | 
|---|
|  | 566 | CHAR szDrvLtr[] = " :"; | 
|---|
|  | 567 | CHAR *pszFSystem; | 
|---|
| [162] | 568 | ULONGLONG ullFreeQty; | 
|---|
| [136] | 569 | ULONG ulPercentFree; | 
|---|
|  | 570 | ULONG wasx; | 
|---|
|  | 571 | HPS hps = (HPS) mp2; | 
|---|
|  | 572 | HWND hwndChild; | 
|---|
|  | 573 | USHORT id; | 
|---|
|  | 574 | SWP swp; | 
|---|
|  | 575 | POINTL ptl; | 
|---|
|  | 576 | tDataMin *pDM; | 
|---|
| [2] | 577 |  | 
|---|
| [136] | 578 | id = SHORT1FROMMP(mp1); | 
|---|
| [551] | 579 | if (id >= MINI_DRIVEA) { | 
|---|
| [136] | 580 | hwndChild = WinWindowFromID(hwnd, id); | 
|---|
|  | 581 | if (!hwndChild) | 
|---|
|  | 582 | return 0; | 
|---|
|  | 583 | if (!WinQueryWindowPos(hwndChild, &swp)) | 
|---|
|  | 584 | return 0; | 
|---|
|  | 585 | pDM = WinQueryWindowPtr(hwndChild, QWL_DATAMIN_PTR); | 
|---|
| [551] | 586 | if (!pDM || pDM->qfsi_rc) { | 
|---|
| [162] | 587 | ullFreeQty = 0; | 
|---|
| [136] | 588 | ulPercentFree = 0; | 
|---|
|  | 589 | } | 
|---|
| [551] | 590 | else { | 
|---|
|  | 591 | ullFreeQty = (ULONGLONG) pDM->fsa.cUnitAvail * | 
|---|
|  | 592 | (pDM->fsa.cSectorUnit * pDM->fsa.cbSector); | 
|---|
| [2] | 593 |  | 
|---|
| [551] | 594 | ulPercentFree = (pDM->fsa.cUnit && pDM->fsa.cUnitAvail) ? | 
|---|
|  | 595 | (pDM->fsa.cUnitAvail * 100) / pDM->fsa.cUnit : 0; | 
|---|
| [136] | 596 | } | 
|---|
| [2] | 597 |  | 
|---|
| [551] | 598 | CommaFmtULL(szFreeQty, sizeof(szFreeQty), ullFreeQty, ' '); | 
|---|
|  | 599 | *szDrvLtr = (CHAR) (id - MINI_DRIVEA) + 'A'; | 
|---|
| [2] | 600 |  | 
|---|
| [551] | 601 | if (!pDM || pDM->qfsi_rc || pDM->qfsa_rc) | 
|---|
| [136] | 602 | pszFSystem = "N/A"; | 
|---|
| [551] | 603 | else { | 
|---|
| [689] | 604 | pszFSystem = (PCHAR)(pDM->fsqb2.szName) + pDM->fsqb2.cbName + 1; | 
|---|
| [136] | 605 | pszFSystem[15] = 0; | 
|---|
|  | 606 | } | 
|---|
|  | 607 | sprintf(s, | 
|---|
| [549] | 608 | "%s %13s %lu%%-%s %6s ", | 
|---|
| [136] | 609 | szDrvLtr, | 
|---|
|  | 610 | szFreeQty, | 
|---|
| [551] | 611 | ulPercentFree, GetPString(IDS_FREETEXT), pszFSystem); | 
|---|
| [136] | 612 | if (!hps) | 
|---|
|  | 613 | hps = WinGetPS(hwndChild); | 
|---|
| [551] | 614 | if (hps) { | 
|---|
|  | 615 | if (!fDullMin) { | 
|---|
| [136] | 616 | ptl.x = 0; | 
|---|
|  | 617 | ptl.y = 0; | 
|---|
| [551] | 618 | GpiMove(hps, &ptl); | 
|---|
|  | 619 | GpiSetColor(hps, CLR_BLACK); | 
|---|
| [136] | 620 | ptl.x = swp.cx - 1; | 
|---|
|  | 621 | ptl.y = swp.cy - 1; | 
|---|
| [551] | 622 | GpiBox(hps, DRO_OUTLINE, &ptl, 0, 0); | 
|---|
| [136] | 623 | ptl.x = 1; | 
|---|
|  | 624 | ptl.y = 1; | 
|---|
| [551] | 625 | if (ulPercentFree) { | 
|---|
| [136] | 626 | GpiMove(hps, &ptl); | 
|---|
|  | 627 | GpiSetColor(hps, | 
|---|
|  | 628 | (ulPercentFree < 11) ? CLR_DARKRED : | 
|---|
|  | 629 | (ulPercentFree < 26) ? CLR_DARKBLUE : | 
|---|
|  | 630 | CLR_DARKGREEN); | 
|---|
|  | 631 | ptl.y = swp.cy - 2; | 
|---|
|  | 632 | ptl.x = ((swp.cx - 2) * ulPercentFree) / 100; | 
|---|
|  | 633 | wasx = ptl.x; | 
|---|
| [551] | 634 | GpiBox(hps, DRO_OUTLINEFILL, &ptl, 0, 0); | 
|---|
| [136] | 635 | GpiSetColor(hps, | 
|---|
|  | 636 | (ulPercentFree < 11) ? CLR_RED : | 
|---|
|  | 637 | (ulPercentFree < 26) ? CLR_BLUE : CLR_GREEN); | 
|---|
|  | 638 | ptl.x = wasx; | 
|---|
|  | 639 | ptl.y = swp.cy - 2; | 
|---|
| [551] | 640 | GpiMove(hps, &ptl); | 
|---|
| [136] | 641 | ptl.x = 1; | 
|---|
| [551] | 642 | GpiLine(hps, &ptl); | 
|---|
| [136] | 643 | ptl.y = 2; | 
|---|
|  | 644 | ptl.x = 1; | 
|---|
| [551] | 645 | GpiLine(hps, &ptl); | 
|---|
| [136] | 646 | ptl.x = wasx; | 
|---|
|  | 647 | } | 
|---|
| [551] | 648 | if (ulPercentFree < 99) { | 
|---|
|  | 649 | GpiSetColor(hps, CLR_DARKGRAY); | 
|---|
| [136] | 650 | wasx = ptl.x; | 
|---|
|  | 651 | ptl.y = 2; | 
|---|
|  | 652 | GpiMove(hps, &ptl); | 
|---|
|  | 653 | ptl.y = swp.cy - 2; | 
|---|
|  | 654 | ptl.x = swp.cx - 2; | 
|---|
| [551] | 655 | GpiBox(hps, DRO_OUTLINEFILL, &ptl, 0, 0); | 
|---|
| [136] | 656 | ptl.x = wasx; | 
|---|
| [551] | 657 | GpiMove(hps, &ptl); | 
|---|
|  | 658 | GpiSetColor(hps, CLR_PALEGRAY); | 
|---|
| [136] | 659 | ptl.x = swp.cx - 3; | 
|---|
|  | 660 | GpiLine(hps, &ptl); | 
|---|
|  | 661 | ptl.x = wasx; | 
|---|
|  | 662 | ptl.y = 1; | 
|---|
|  | 663 | GpiMove(hps, &ptl); | 
|---|
| [551] | 664 | GpiSetColor(hps, CLR_BLACK); | 
|---|
| [136] | 665 | ptl.x = swp.cx - 2; | 
|---|
|  | 666 | GpiLine(hps, &ptl); | 
|---|
|  | 667 | ptl.y = swp.cy - 3; | 
|---|
|  | 668 | GpiLine(hps, &ptl); | 
|---|
|  | 669 | } | 
|---|
| [551] | 670 | GpiSetColor(hps, CLR_WHITE); | 
|---|
| [136] | 671 | } | 
|---|
| [551] | 672 | else { | 
|---|
|  | 673 | GpiSetColor(hps, CLR_PALEGRAY); | 
|---|
| [136] | 674 | ptl.x = 0; | 
|---|
|  | 675 | ptl.y = 0; | 
|---|
| [551] | 676 | GpiMove(hps, &ptl); | 
|---|
| [136] | 677 | ptl.x = swp.cx - 1; | 
|---|
|  | 678 | ptl.y = swp.cy - 1; | 
|---|
| [551] | 679 | GpiBox(hps, DRO_OUTLINEFILL, &ptl, 0, 0); | 
|---|
| [136] | 680 | GpiSetColor(hps, | 
|---|
| [551] | 681 | (ulPercentFree < 11) ? CLR_DARKRED : CLR_DARKBLUE); | 
|---|
| [136] | 682 | } | 
|---|
| [551] | 683 | GpiSetBackMix(hps, BM_LEAVEALONE); | 
|---|
|  | 684 | GpiSetMix(hps, FM_OVERPAINT); | 
|---|
| [136] | 685 | { | 
|---|
|  | 686 | POINTL aptl[TXTBOX_COUNT]; | 
|---|
| [2] | 687 |  | 
|---|
| [551] | 688 | GpiQueryTextBox(hps, strlen(s), s, TXTBOX_COUNT, aptl); | 
|---|
| [136] | 689 | ptl.y = ((swp.cy / 2) - | 
|---|
|  | 690 | ((aptl[TXTBOX_TOPRIGHT].y + | 
|---|
|  | 691 | aptl[TXTBOX_BOTTOMLEFT].y) / 2)); | 
|---|
|  | 692 | ptl.y++; | 
|---|
|  | 693 | ptl.x = (swp.cx / 2) - (aptl[TXTBOX_TOPRIGHT].x / 2); | 
|---|
|  | 694 | if (ptl.x < 2) | 
|---|
|  | 695 | ptl.x = 2; | 
|---|
| [551] | 696 | GpiCharStringAt(hps, &ptl, strlen(s), s); | 
|---|
| [136] | 697 | } | 
|---|
|  | 698 | if (!mp2) | 
|---|
|  | 699 | WinReleasePS(hps); | 
|---|
|  | 700 | } | 
|---|
| [551] | 701 | }                                 // if drive window | 
|---|
| [136] | 702 | } | 
|---|
|  | 703 | return 0; | 
|---|
|  | 704 |  | 
|---|
|  | 705 | case UM_TIMER: | 
|---|
|  | 706 | { | 
|---|
|  | 707 | CHAR s[134]; | 
|---|
|  | 708 | DATETIME dt; | 
|---|
|  | 709 |  | 
|---|
|  | 710 | if (fDataToFore && !NoFloat) | 
|---|
|  | 711 | WinSetWindowPos(WinQueryWindow(hwnd, QW_PARENT), | 
|---|
|  | 712 | HWND_TOP, 0, 0, 0, 0, SWP_ZORDER); | 
|---|
| [551] | 713 | if (counter && (counter % 19) && (counter % 20)) { | 
|---|
|  | 714 | if (!DosGetDateTime(&dt)) { | 
|---|
| [136] | 715 | sprintf(s, | 
|---|
|  | 716 | " %02hu:%02hu:%02hu  %s %04u/%02u/%02u", | 
|---|
|  | 717 | dt.hours, | 
|---|
|  | 718 | dt.minutes, | 
|---|
|  | 719 | dt.seconds, | 
|---|
|  | 720 | GetPString(IDS_SUNDAY + dt.weekday), | 
|---|
| [551] | 721 | dt.year, dt.month, dt.day); | 
|---|
|  | 722 | WinSetDlgItemText(hwnd, MINI_TIME, s); | 
|---|
| [136] | 723 | } | 
|---|
| [2] | 724 | } | 
|---|
| [136] | 725 | else if (!counter || !(counter % 19)) | 
|---|
|  | 726 | PostMsg(hwnd, UM_SETUP6, MPVOID, MPVOID);       // Uptime | 
|---|
| [551] | 727 | if (!(counter % 4)) { | 
|---|
| [136] | 728 | PostMsg(hwnd, UM_SETUP3, MPVOID, MPVOID);       // Memory utilization | 
|---|
| [551] | 729 | if (!(counter % 10)) { | 
|---|
| [136] | 730 | PostMsg(hwnd, UM_SETUP5, MPVOID, MPVOID);     // Process status | 
|---|
| [551] | 731 | if (!(counter % 20)) { | 
|---|
| [136] | 732 | PostMsg(hwnd, UM_SETUP2, MPVOID, MPVOID);   // Swapper | 
|---|
|  | 733 | } | 
|---|
|  | 734 | } | 
|---|
|  | 735 | } | 
|---|
|  | 736 | } | 
|---|
|  | 737 | counter++; | 
|---|
|  | 738 | return 0; | 
|---|
| [2] | 739 |  | 
|---|
| [136] | 740 | case UM_SETUP2: | 
|---|
|  | 741 | { | 
|---|
| [204] | 742 | CHAR s[134], szFileQty[38], szFreeQty[38]; | 
|---|
| [136] | 743 | FILEFINDBUF3 ffb; | 
|---|
| [761] | 744 | ULONG nm = 1; | 
|---|
| [162] | 745 | ULONGLONG ullFreeQty; | 
|---|
| [136] | 746 | HDIR hdir = HDIR_CREATE; | 
|---|
|  | 747 | FSALLOCATE fsa; | 
|---|
| [2] | 748 |  | 
|---|
| [551] | 749 | if (*SwapperDat) { | 
|---|
| [136] | 750 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 751 | if (!DosFindFirst(SwapperDat, &hdir, FILE_NORMAL | FILE_HIDDEN | | 
|---|
|  | 752 | FILE_SYSTEM | FILE_ARCHIVED | FILE_READONLY, | 
|---|
| [551] | 753 | &ffb, sizeof(ffb), &nm, FIL_STANDARD)) { | 
|---|
| [136] | 754 | priority_bumped(); | 
|---|
|  | 755 | DosFindClose(hdir); | 
|---|
|  | 756 | DosError(FERR_DISABLEHARDERR); | 
|---|
|  | 757 | if (!DosQueryFSInfo(toupper(*SwapperDat) - '@', FSIL_ALLOC, | 
|---|
| [551] | 758 | &fsa, sizeof(FSALLOCATE))) { | 
|---|
|  | 759 | ullFreeQty = | 
|---|
|  | 760 | (ULONGLONG) fsa.cUnitAvail * (fsa.cSectorUnit * fsa.cbSector); | 
|---|
|  | 761 | CommaFmtULL(szFreeQty, sizeof(szFreeQty), ullFreeQty, ' '); | 
|---|
| [136] | 762 | } | 
|---|
|  | 763 | else | 
|---|
| [162] | 764 | *szFreeQty = 0; | 
|---|
|  | 765 |  | 
|---|
| [551] | 766 | CommaFmtULL(szFileQty, sizeof(szFileQty), ffb.cbFile, ' '); | 
|---|
| [162] | 767 | sprintf(s, " %s %s%s%s", | 
|---|
| [136] | 768 | GetPString(IDS_SWAPTITLETEXT), | 
|---|
| [551] | 769 | szFileQty, *szFreeQty ? "/" : NullStr, szFreeQty); | 
|---|
|  | 770 | WinSetDlgItemText(hwnd, MINI_SWAP, s); | 
|---|
| [136] | 771 | } | 
|---|
|  | 772 | } | 
|---|
|  | 773 | } | 
|---|
|  | 774 | return 0; | 
|---|
| [2] | 775 |  | 
|---|
| [136] | 776 | case UM_SETUP3:                       // Memory utilization | 
|---|
|  | 777 | { | 
|---|
| [162] | 778 | CHAR s[134], tm[38], szQty[38]; | 
|---|
| [136] | 779 | ULONG amem = 0; | 
|---|
| [2] | 780 |  | 
|---|
| [136] | 781 | if (!DosQuerySysInfo(QSV_TOTAVAILMEM, QSV_TOTAVAILMEM, | 
|---|
| [551] | 782 | (PVOID) & amem, (ULONG) sizeof(amem))) { | 
|---|
|  | 783 | CommaFmtUL(tm, sizeof(tm), amem, 'M'); | 
|---|
| [162] | 784 | if (!Dos16MemAvail(&amem)) | 
|---|
| [551] | 785 | CommaFmtUL(szQty, sizeof(szQty), amem, 'M'); | 
|---|
| [136] | 786 | else | 
|---|
| [162] | 787 | *szQty = 0; | 
|---|
|  | 788 | sprintf(s, " %s%s%s%s", | 
|---|
| [136] | 789 | GetPString(IDS_MEMTITLETEXT), | 
|---|
| [551] | 790 | szQty, (*szQty) ? "/" : NullStr, tm); | 
|---|
|  | 791 | WinSetDlgItemText(hwnd, MINI_MEM, s); | 
|---|
| [2] | 792 | } | 
|---|
| [136] | 793 | } | 
|---|
|  | 794 | return 0; | 
|---|
| [2] | 795 |  | 
|---|
| [551] | 796 | case UM_SETUP5:                       // Process status | 
|---|
| [136] | 797 | { | 
|---|
|  | 798 | CHAR s[134], tm[38], szQty[38]; | 
|---|
|  | 799 |  | 
|---|
| [551] | 800 | if (fUseQProcStat && !noqproc) { | 
|---|
| [2] | 801 |  | 
|---|
| [136] | 802 | PROCESSINFO *ppi; | 
|---|
|  | 803 | BUFFHEADER *pbh = NULL; | 
|---|
|  | 804 | MODINFO *pmi; | 
|---|
|  | 805 | ULONG numprocs = 0, numthreads = 0; | 
|---|
| [346] | 806 | APIRET rc; | 
|---|
| [136] | 807 |  | 
|---|
| [346] | 808 | rc = DosAllocMem((PVOID) & pbh, USHRT_MAX + 4096, | 
|---|
| [551] | 809 | PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE); | 
|---|
| [346] | 810 | if (rc) | 
|---|
| [551] | 811 | Dos_Error(MB_CANCEL, rc, hwnd, pszSrcFile, __LINE__, | 
|---|
|  | 812 | GetPString(IDS_OUTOFMEMORY)); | 
|---|
|  | 813 | else { | 
|---|
| [346] | 814 | if (DosQProcStatus(pbh, USHRT_MAX)) | 
|---|
|  | 815 | noqproc = TRUE; | 
|---|
|  | 816 | else { | 
|---|
| [551] | 817 | ppi = pbh->ppi; | 
|---|
|  | 818 | while (ppi->ulEndIndicator != PROCESS_END_INDICATOR) { | 
|---|
|  | 819 | pmi = pbh->pmi; | 
|---|
|  | 820 | while (pmi && ppi->hModRef != pmi->hMod) | 
|---|
|  | 821 | pmi = pmi->pNext; | 
|---|
|  | 822 | if (pmi) { | 
|---|
| [136] | 823 | numprocs++; | 
|---|
| [551] | 824 | numthreads += ppi->usThreadCount; | 
|---|
| [136] | 825 | } | 
|---|
| [551] | 826 | ppi = (PPROCESSINFO) (ppi->ptiFirst + ppi->usThreadCount); | 
|---|
| [36] | 827 | } | 
|---|
| [136] | 828 | commafmt(szQty, sizeof(szQty), numprocs); | 
|---|
|  | 829 | commafmt(tm, sizeof(tm), numthreads); | 
|---|
|  | 830 | sprintf(s, | 
|---|
|  | 831 | " %s%s  %s%s", | 
|---|
|  | 832 | GetPString(IDS_PROCSTITLETEXT), | 
|---|
| [551] | 833 | szQty, GetPString(IDS_THRDSTITLETEXT), tm); | 
|---|
|  | 834 | WinSetDlgItemText(hwnd, MINI_PROC, s); | 
|---|
| [136] | 835 | } | 
|---|
|  | 836 | DosFreeMem(pbh); | 
|---|
|  | 837 | } | 
|---|
| [2] | 838 | } | 
|---|
| [551] | 839 | else { | 
|---|
| [136] | 840 | commafmt(szQty, sizeof(szQty), | 
|---|
| [551] | 841 | WinQuerySwitchList(WinQueryAnchorBlock(hwnd), (PSWBLOCK) 0, | 
|---|
|  | 842 | 0)); | 
|---|
|  | 843 | sprintf(s, " %s%s", GetPString(IDS_TASKSTITLETEXT), szQty); | 
|---|
|  | 844 | WinSetDlgItemText(hwnd, MINI_PROC, s); | 
|---|
| [2] | 845 | } | 
|---|
| [136] | 846 | } | 
|---|
|  | 847 | return 0; | 
|---|
| [2] | 848 |  | 
|---|
| [136] | 849 | case UM_SETUP6:                       // Uptime | 
|---|
|  | 850 | { | 
|---|
|  | 851 | ULONG val = 0, numdays, nummins; | 
|---|
|  | 852 | CHAR s[128]; | 
|---|
|  | 853 |  | 
|---|
|  | 854 | if (!DosQuerySysInfo(QSV_MS_COUNT, | 
|---|
|  | 855 | QSV_MS_COUNT, | 
|---|
| [551] | 856 | (PVOID) & val, (ULONG) sizeof(val))) { | 
|---|
| [136] | 857 | val /= 60000L; | 
|---|
|  | 858 | numdays = val / (60L * 24L); | 
|---|
|  | 859 | strcpy(s, GetPString(IDS_ELAPSEDTITLETEXT)); | 
|---|
|  | 860 | if (numdays) | 
|---|
|  | 861 | sprintf(s + strlen(s), | 
|---|
|  | 862 | " %lu %s%s, ", | 
|---|
| [551] | 863 | numdays, GetPString(IDS_DAYTEXT), &"s"[numdays == 1L]); | 
|---|
| [136] | 864 | nummins = val % (60L * 24L); | 
|---|
| [551] | 865 | sprintf(s + strlen(s), " %lu:%02lu", nummins / 60, nummins % 60); | 
|---|
|  | 866 | WinSetDlgItemText(hwnd, MINI_TIME, s); | 
|---|
| [2] | 867 | } | 
|---|
| [136] | 868 | } | 
|---|
|  | 869 | return 0; | 
|---|
| [2] | 870 |  | 
|---|
| [136] | 871 | case WM_SAVEAPPLICATION: | 
|---|
|  | 872 | { | 
|---|
|  | 873 | SWP swp; | 
|---|
| [2] | 874 |  | 
|---|
| [136] | 875 | WinQueryWindowPos(WinQueryWindow(hwnd, QW_PARENT), &swp); | 
|---|
| [551] | 876 | PrfWriteProfileData(fmprof, appname, "DataMinPos", &swp, sizeof(SWP)); | 
|---|
| [136] | 877 | } | 
|---|
|  | 878 | break; | 
|---|
| [2] | 879 |  | 
|---|
| [136] | 880 | case WM_CLOSE: | 
|---|
| [551] | 881 | WinSendMsg(hwnd, WM_SAVEAPPLICATION, MPVOID, MPVOID); | 
|---|
| [136] | 882 | WinDestroyWindow(WinQueryWindow(hwnd, QW_PARENT)); | 
|---|
|  | 883 | return 0; | 
|---|
| [2] | 884 |  | 
|---|
| [136] | 885 | case WM_DESTROY: | 
|---|
| [551] | 886 | if (DataHwnd == WinQueryWindow(hwnd, QW_PARENT)) { | 
|---|
|  | 887 | DataHwnd = (HWND) 0; | 
|---|
| [136] | 888 | if (hwndMenu) | 
|---|
|  | 889 | WinDestroyWindow(hwndMenu); | 
|---|
| [551] | 890 | hwndMenu = (HWND) 0; | 
|---|
| [136] | 891 | } | 
|---|
| [551] | 892 | if (hwndMain) { | 
|---|
| [2] | 893 |  | 
|---|
| [136] | 894 | SWP swp; | 
|---|
|  | 895 | ULONG fl = SWP_SHOW | SWP_ZORDER | SWP_ACTIVATE, ofl; | 
|---|
| [2] | 896 |  | 
|---|
| [136] | 897 | ofl = WinQueryWindowULong(hwnd, QWL_USER); | 
|---|
|  | 898 | WinQueryWindowPos(WinQueryWindow(hwndMain, QW_PARENT), &swp); | 
|---|
|  | 899 | if (swp.fl & SWP_MINIMIZE) | 
|---|
|  | 900 | fl |= ((ofl & SWP_MAXIMIZE) ? SWP_MAXIMIZE : SWP_RESTORE); | 
|---|
|  | 901 | WinSetWindowPos(WinQueryWindow(hwndMain, QW_PARENT), | 
|---|
| [551] | 902 | HWND_TOP, 0, 0, 0, 0, fl); | 
|---|
| [136] | 903 | } | 
|---|
| [551] | 904 | else if (!PostMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID)) | 
|---|
|  | 905 | WinSendMsg((HWND) 0, WM_QUIT, MPVOID, MPVOID); | 
|---|
| [136] | 906 | break; | 
|---|
|  | 907 | } | 
|---|
|  | 908 | return WinDefWindowProc(hwnd, msg, mp1, mp2); | 
|---|
| [2] | 909 |  | 
|---|
| [551] | 910 | }                                       // DataProc | 
|---|
| [2] | 911 |  | 
|---|
| [136] | 912 | //=== CreateDataBar - create databar windows === | 
|---|
| [2] | 913 |  | 
|---|
| [136] | 914 | HWND CreateDataBar(HWND hwndParent, ULONG fl) | 
|---|
|  | 915 | { | 
|---|
| [551] | 916 | HWND hwndClient = (HWND) 0; | 
|---|
| [136] | 917 | ULONG FrameFlags = 0; | 
|---|
| [2] | 918 |  | 
|---|
| [136] | 919 | if (WinCreateStdWindow(hwndParent, | 
|---|
|  | 920 | WS_VISIBLE, | 
|---|
|  | 921 | &FrameFlags, | 
|---|
| [593] | 922 | WC_DATABAR, | 
|---|
| [551] | 923 | NULL, WS_VISIBLE, 0, MINI_FRAME, &hwndClient)) { | 
|---|
|  | 924 | WinSendMsg(hwndClient, UM_RESTORE, MPFROMLONG(fl), MPVOID); | 
|---|
| [136] | 925 | } | 
|---|
|  | 926 | return hwndClient; | 
|---|
| [2] | 927 |  | 
|---|
| [551] | 928 | }                                       // CreateDataBar | 
|---|
| [2] | 929 |  | 
|---|
| [136] | 930 | //=== dataminThread - drive status thread === | 
|---|
| [2] | 931 |  | 
|---|
| [551] | 932 | static VOID dataminThread(VOID * pv) | 
|---|
| [136] | 933 | { | 
|---|
| [551] | 934 | HAB hab = NULLHANDLE; | 
|---|
|  | 935 | HMQ hmq = NULLHANDLE; | 
|---|
|  | 936 | HWND hwndParent = (HWND) pv; | 
|---|
|  | 937 | HWND hwnd; | 
|---|
|  | 938 | HENUM henum; | 
|---|
| [136] | 939 | BOOL busy = TRUE; | 
|---|
|  | 940 | APIRET rc; | 
|---|
|  | 941 | USHORT id; | 
|---|
|  | 942 |  | 
|---|
| [551] | 943 | if (G_hevDataMin == NULLHANDLE) { | 
|---|
| [136] | 944 | // Create just once for any thread that might use it | 
|---|
|  | 945 | // Kernel will clean up on exit | 
|---|
| [551] | 946 | rc = DosCreateEventSem(NULL, (PHEV) & G_hevDataMin, 0L, FALSE); | 
|---|
| [136] | 947 | if (rc) { | 
|---|
| [552] | 948 | Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 949 | GetPString(IDS_CREATESEMFAILED)); | 
|---|
| [136] | 950 | busy = FALSE; | 
|---|
|  | 951 | } | 
|---|
|  | 952 | } | 
|---|
|  | 953 |  | 
|---|
| [179] | 954 | // fixme to report errors | 
|---|
| [136] | 955 | hab = WinInitialize(0); | 
|---|
|  | 956 | if (hab == NULLHANDLE) | 
|---|
|  | 957 | busy = FALSE; | 
|---|
| [551] | 958 | else { | 
|---|
|  | 959 | hmq = WinCreateMsgQueue(hab, 0); | 
|---|
| [136] | 960 | if (hmq == NULLHANDLE) | 
|---|
|  | 961 | busy = FALSE; | 
|---|
|  | 962 | else | 
|---|
| [551] | 963 | WinCancelShutdown(hmq, TRUE); | 
|---|
| [136] | 964 | } | 
|---|
|  | 965 |  | 
|---|
| [551] | 966 | while (busy) { | 
|---|
| [136] | 967 | HWND hwndSingle = G_hwndSingle; | 
|---|
| [551] | 968 |  | 
|---|
| [136] | 969 | G_hwndSingle = NULLHANDLE; | 
|---|
|  | 970 |  | 
|---|
|  | 971 | busy = FALSE; | 
|---|
|  | 972 |  | 
|---|
| [551] | 973 | if (!WinIsWindow(hab, hwndParent)) | 
|---|
| [2] | 974 | break; | 
|---|
|  | 975 |  | 
|---|
| [136] | 976 | henum = WinBeginEnumWindows(hwndParent); | 
|---|
| [551] | 977 | while (henum && (hwnd = WinGetNextWindow(henum)) != NULLHANDLE) { | 
|---|
|  | 978 | if (!WinIsWindow(hab, hwnd)) | 
|---|
| [136] | 979 | continue; | 
|---|
|  | 980 | if (hwndSingle && hwndSingle != hwnd) | 
|---|
|  | 981 | continue; | 
|---|
| [551] | 982 | id = WinQueryWindowUShort(hwnd, QWS_ID); | 
|---|
|  | 983 | if (id > MINI_DRIVEA) { | 
|---|
| [136] | 984 | ULONG dskNum = id - MINI_DRIVEA + 1; | 
|---|
|  | 985 | tDataMin *pDM = WinQueryWindowPtr(hwnd, QWL_DATAMIN_PTR); | 
|---|
|  | 986 | SWP swp; | 
|---|
|  | 987 | CHAR szPath[] = " :"; | 
|---|
| [551] | 988 |  | 
|---|
| [136] | 989 | if (!pDM) | 
|---|
|  | 990 | continue; | 
|---|
|  | 991 | busy = TRUE; | 
|---|
|  | 992 | if (!WinQueryWindowPos(hwnd, &swp)) | 
|---|
|  | 993 | continue; | 
|---|
| [2] | 994 |  | 
|---|
| [136] | 995 | DosError(FERR_DISABLEHARDERR); | 
|---|
| [551] | 996 | pDM->qfsi_rc = DosQueryFSInfo(dskNum, | 
|---|
|  | 997 | FSIL_ALLOC, | 
|---|
|  | 998 | &pDM->fsa, sizeof(FSALLOCATE)); | 
|---|
| [2] | 999 |  | 
|---|
| [551] | 1000 | if (!pDM->qfsi_rc) { | 
|---|
| [136] | 1001 | *szPath = (CHAR) dskNum + 'A' - 1; | 
|---|
| [551] | 1002 | pDM->qfsa_cb = sizeof(FSQBUFFER2) + 256;      // se tDataMin | 
|---|
| [136] | 1003 | DosError(FERR_DISABLEHARDERR); | 
|---|
| [551] | 1004 | pDM->qfsa_rc = DosQueryFSAttach(szPath, 0,    /* Ordinal */ | 
|---|
|  | 1005 | FSAIL_QUERYNAME, | 
|---|
|  | 1006 | &pDM->fsqb2, &pDM->qfsa_cb); | 
|---|
| [136] | 1007 | } | 
|---|
|  | 1008 | WinInvalidateRect(hwnd, NULL, FALSE); | 
|---|
| [551] | 1009 | }                                 // if drive window | 
|---|
|  | 1010 | }                                   // while henum | 
|---|
| [136] | 1011 | WinEndEnumWindows(henum); | 
|---|
| [2] | 1012 |  | 
|---|
| [551] | 1013 | if (busy) { | 
|---|
| [136] | 1014 | ULONG clPosted; | 
|---|
| [551] | 1015 |  | 
|---|
|  | 1016 | rc = DosWaitEventSem(G_hevDataMin, 20000L); | 
|---|
|  | 1017 | if (rc && rc != ERROR_TIMEOUT) { | 
|---|
| [552] | 1018 | Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 1019 | GetPString(IDS_POSTSEMFAILED)); | 
|---|
| [2] | 1020 | } | 
|---|
|  | 1021 |  | 
|---|
| [551] | 1022 | rc = DosResetEventSem(G_hevDataMin, &clPosted); | 
|---|
|  | 1023 | if (rc && rc != ERROR_ALREADY_RESET) { | 
|---|
| [552] | 1024 | Dos_Error(MB_ENTER, rc, HWND_DESKTOP, pszSrcFile, __LINE__, | 
|---|
|  | 1025 | GetPString(IDS_POSTSEMFAILED)); | 
|---|
| [136] | 1026 | } | 
|---|
|  | 1027 | } | 
|---|
| [2] | 1028 |  | 
|---|
| [551] | 1029 | }                                     // while | 
|---|
| [2] | 1030 |  | 
|---|
| [136] | 1031 | if (hmq != NULLHANDLE) | 
|---|
|  | 1032 | WinDestroyMsgQueue(hmq); | 
|---|
| [2] | 1033 |  | 
|---|
| [136] | 1034 | if (hab != NULLHANDLE) | 
|---|
|  | 1035 | WinTerminate(hab); | 
|---|
|  | 1036 |  | 
|---|
| [551] | 1037 | }                                       // dataminThread | 
|---|
| [793] | 1038 |  | 
|---|
|  | 1039 | #pragma alloc_text(DATAMIN,DataDlgProc,MiniTimeProc) | 
|---|