Changeset 1394 for trunk/dll/systemf.c


Ignore:
Timestamp:
Feb 5, 2009, 5:17:25 AM (17 years ago)
Author:
Steven Levine
Message:

Ticket 340: Convert GetPString to use STRINGTABLE.

Drop fm3dll.str and mkstr.exe from makefiles and wpi builders

Convert many functions to expect PCSZ arguments.
Correct walk, compare and dirsizes dialog setups to ignore saved dialog size
Drop copyright.c logic from makefile

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/dll/systemf.c

    r1375 r1394  
    77
    88  Copyright (c) 1993-98 M. Kimes
    9   Copyright (c) 2003, 2008 Steven H.Levine
     9  Copyright (c) 2003, 2009 Steven H.Levine
    1010
    1111  21 Nov 03 SHL Comments
    … …  
    2525  19 Jul 08 GKY Replace save_dir2(dir) with pFM2SaveDirectory or pTmpDir and use MakeTempName
    2626  03 Jan 09 GKY Check for system that is protectonly to gray out Dos/Win command lines and prevent
    27                 Dos/Win programs from being inserted into the execute dialog with message why.
     27                Dos/Win programs from being inserted into the execute dialog with message why.
    2828
    2929***********************************************************************/
    … …  
    8282    if (!rc) {
    8383      if (swctl.idProcess == pid && swctl.uchVisibility == SWL_VISIBLE)
    84         rc = WinSwitchToProgram(hswitch);
     84        rc = WinSwitchToProgram(hswitch);
    8585      if (!rc)
    86         return TRUE;
     86        return TRUE;
    8787      // else saymsg(MB_ENTER,HWND_DESKTOP,DEBUG_STRING,"Failed: %lu/%lx",rc,rc);
    8888
    … …  
    100100
    101101int ExecOnList(HWND hwnd, char *command, int flags, char *tpath,
    102                char **list, char *prompt, PCSZ pszCallingFile, UINT uiLineNumber)
     102               PSZ *list, PCSZ prompt, PCSZ pszCallingFile, UINT uiLineNumber)
    103103{
    104104  /* executes the command once for all files in list */
    105105
    106   char path[CCHMAXPATH], *commandline, modpath[CCHMAXPATH], listfile[CCHMAXPATH],
     106  CHAR path[CCHMAXPATH], *commandline, modpath[CCHMAXPATH], listfile[CCHMAXPATH],
    107107       *p, *pp, drive, *file, *ext, *dot;
    108108  register int x;
    … …  
    135135    if (p) {
    136136      if (*p == ':') {
    137         p++;
    138         *p = '\\';
    139         p++;
     137        p++;
     138        *p = '\\';
     139        p++;
    140140      }
    141141      *p = 0;
    … …  
    152152    if (p) {
    153153      if (*p == ':') {
    154         p++;
    155         *p = '\\';
    156         p++;
     154        p++;
     155        *p = '\\';
     156        p++;
    157157      }
    158158      *p = 0;
    … …  
    196196      switch (*(p + 1)) {
    197197      case '!':                 /* write list to file, add filename */
    198         if (list) {
    199           if (!*listfile) {
    200             FILE *fp;
    201 
    202 
    203             strcpy(listfile, pTmpDir ? pTmpDir : pFM2SaveDirectory);
    204             MakeTempName(listfile, "$FM2LI$T", 2);
    205             /*if (listfile[strlen(listfile) - 1] != '\\')
    206               strcat(listfile, "\\");
    207             sprintf(&listfile[strlen(listfile)], "%s.%03x",
    208                     LISTTEMPROOT, (clock() & 4095));*/
    209             fp = xfopen(listfile, "w",pszSrcFile,__LINE__);
    210             if (fp) {
    211               for (x = 0; list[x]; x++)
    212               {
    213                 fputs(list[x], fp);
    214                 if (list[x + 1])
    215                   fputc('\n', fp);
    216               }
    217               fclose(fp);
    218             }
    219           }
    220           strcpy(pp, listfile);
    221           pp += strlen(listfile);
    222         }
    223         p += 2;
    224         break;
     198        if (list) {
     199          if (!*listfile) {
     200            FILE *fp;
     201
     202
     203            strcpy(listfile, pTmpDir ? pTmpDir : pFM2SaveDirectory);
     204            MakeTempName(listfile, "$FM2LI$T", 2);
     205            /*if (listfile[strlen(listfile) - 1] != '\\')
     206              strcat(listfile, "\\");
     207            sprintf(&listfile[strlen(listfile)], "%s.%03x",
     208                    LISTTEMPROOT, (clock() & 4095));*/
     209            fp = xfopen(listfile, "w",pszSrcFile,__LINE__);
     210            if (fp) {
     211              for (x = 0; list[x]; x++)
     212              {
     213                fputs(list[x], fp);
     214                if (list[x + 1])
     215                  fputc('\n', fp);
     216              }
     217              fclose(fp);
     218            }
     219          }
     220          strcpy(pp, listfile);
     221          pp += strlen(listfile);
     222        }
     223        p += 2;
     224        break;
    225225
    226226      case 'c':                 /* add name of command processor */
    227         {
    228           char *env = GetCmdSpec(FALSE);
    229 
    230           if (needs_quoting(env) && !strchr(env, '\"')) {
    231             *pp = '\"';
    232             pp++;
    233             spaces = TRUE;
    234           }
    235           else
    236             spaces = FALSE;
    237           strcpy(pp, env);
    238           p += 2;
    239           pp += strlen(env);
    240           if (spaces) {
    241             *pp = '\"';
    242             pp++;
    243           }
    244         }
    245         break;
     227        {
     228          char *env = GetCmdSpec(FALSE);
     229
     230          if (needs_quoting(env) && !strchr(env, '\"')) {
     231            *pp = '\"';
     232            pp++;
     233            spaces = TRUE;
     234          }
     235          else
     236            spaces = FALSE;
     237          strcpy(pp, env);
     238          p += 2;
     239          pp += strlen(env);
     240          if (spaces) {
     241            *pp = '\"';
     242            pp++;
     243          }
     244        }
     245        break;
    246246
    247247      case 't':                 /* add Target directory */
    248         if (needs_quoting(targetdir) && !strchr(targetdir, '\"')) {
    249           *pp = '\"';
    250           pp++;
    251           spaces = TRUE;
    252         }
    253         else
    254           spaces = FALSE;
    255         strcpy(pp, targetdir);
    256         p += 2;
    257         pp += strlen(targetdir);
    258         if (spaces) {
    259           *pp = '\"';
    260           pp++;
    261         }
    262         break;
     248        if (needs_quoting(targetdir) && !strchr(targetdir, '\"')) {
     249          *pp = '\"';
     250          pp++;
     251          spaces = TRUE;
     252        }
     253        else
     254          spaces = FALSE;
     255        strcpy(pp, targetdir);
     256        p += 2;
     257        pp += strlen(targetdir);
     258        if (spaces) {
     259          *pp = '\"';
     260          pp++;
     261        }
     262        break;
    263263
    264264      case '$':                 /* add drive letter */
    265         if (drive)
    266           *pp = drive;
    267         else {
    268           ULONG ulDriveNum = 3, ulDriveMap;
    269 
    270           DosQCurDisk(&ulDriveNum, &ulDriveMap);
    271           *pp = (char) (ulDriveNum + '@');
    272         }
    273         pp++;
    274         p += 2;
    275         break;
     265        if (drive)
     266          *pp = drive;
     267        else {
     268          ULONG ulDriveNum = 3, ulDriveMap;
     269
     270          DosQCurDisk(&ulDriveNum, &ulDriveMap);
     271          *pp = (char) (ulDriveNum + '@');
     272        }
     273        pp++;
     274        p += 2;
     275        break;
    276276
    277277      case 'U':                 /* add path of first list component */
    278278      case 'u':
    279         if (*modpath) {
    280           if (needs_quoting(modpath) && !strchr(modpath, '\"')) {
    281             spaces = TRUE;
    282             *pp = '\"';
    283             pp++;
    284           }
    285           else
    286             spaces = FALSE;
    287           if (*(p + 1) == 'u') {
    288             strcpy(pp, modpath);
    289             pp += strlen(modpath);
    290           }
    291           else {
    292             strcpy(pp, modpath + 2);
    293             pp += strlen(modpath + 2);
    294           }
    295           if (spaces) {
    296             if (modpath[strlen(modpath) - 1] == '\\') {
    297               *pp = '\\';
    298               pp++;
    299             }
    300             *pp = '\"';
    301             pp++;
    302           }
    303         }
    304         else {
    305           char temp[CCHMAXPATH];
    306 
    307           strcpy(temp, pFM2SaveDirectory);
    308           if (needs_quoting(temp) && !strchr(temp, '\"')) {
    309             spaces = TRUE;
    310             *pp = '\"';
    311             pp++;
    312           }
    313           else
    314             spaces = FALSE;
    315           strcpy(pp, temp);
    316           pp += strlen(temp);
    317           if (spaces) {
    318             if (temp[strlen(temp) - 1] == '\\') {
    319               *pp = '\\';
    320               pp++;
    321             }
    322             *pp = '\"';
    323             pp++;
    324           }
    325         }
    326         p += 2;
    327         break;
     279        if (*modpath) {
     280          if (needs_quoting(modpath) && !strchr(modpath, '\"')) {
     281            spaces = TRUE;
     282            *pp = '\"';
     283            pp++;
     284          }
     285          else
     286            spaces = FALSE;
     287          if (*(p + 1) == 'u') {
     288            strcpy(pp, modpath);
     289            pp += strlen(modpath);
     290          }
     291          else {
     292            strcpy(pp, modpath + 2);
     293            pp += strlen(modpath + 2);
     294          }
     295          if (spaces) {
     296            if (modpath[strlen(modpath) - 1] == '\\') {
     297              *pp = '\\';
     298              pp++;
     299            }
     300            *pp = '\"';
     301            pp++;
     302          }
     303        }
     304        else {
     305          char temp[CCHMAXPATH];
     306
     307          strcpy(temp, pFM2SaveDirectory);
     308          if (needs_quoting(temp) && !strchr(temp, '\"')) {
     309            spaces = TRUE;
     310            *pp = '\"';
     311            pp++;
     312          }
     313          else
     314            spaces = FALSE;
     315          strcpy(pp, temp);
     316          pp += strlen(temp);
     317          if (spaces) {
     318            if (temp[strlen(temp) - 1] == '\\') {
     319              *pp = '\\';
     320              pp++;
     321            }
     322            *pp = '\"';
     323            pp++;
     324          }
     325        }
     326        p += 2;
     327        break;
    328328
    329329      case 'P':                 /* add path of execution */
    330330      case 'p':
    331         if (*path) {
    332           if (needs_quoting(path) && !strchr(path, '\"')) {
    333             spaces = TRUE;
    334             *pp = '\"';
    335             pp++;
    336           }
    337           else
    338             spaces = FALSE;
    339           if (*(p + 1) == 'p') {
    340             strcpy(pp, path);
    341             pp += strlen(path);
    342           }
    343           else {
    344             strcpy(pp, path + 2);
    345             pp += strlen(path + 2);
    346           }
    347           if (spaces) {
    348             if (path[strlen(path) - 1] == '\\') {
    349               *pp = '\\';
    350               pp++;
    351             }
    352             *pp = '\"';
    353             pp++;
    354           }
    355         }
    356         else {
    357           char temp[CCHMAXPATH];
    358 
    359           strcpy(temp, pFM2SaveDirectory);
    360           if (needs_quoting(temp) && !strchr(temp, '\"')) {
    361             spaces = TRUE;
    362             *pp = '\"';
    363             pp++;
    364           }
    365           else
    366             spaces = FALSE;
    367           strcpy(pp, temp);
    368           pp += strlen(temp);
    369           if (spaces) {
    370             if (temp[strlen(temp) - 1] == '\\') {
    371               *pp = '\\';
    372               pp++;
    373             }
    374             *pp = '\"';
    375             pp++;
    376           }
    377         }
    378         p += 2;
    379         break;
     331        if (*path) {
     332          if (needs_quoting(path) && !strchr(path, '\"')) {
     333            spaces = TRUE;
     334            *pp = '\"';
     335            pp++;
     336          }
     337          else
     338            spaces = FALSE;
     339          if (*(p + 1) == 'p') {
     340            strcpy(pp, path);
     341            pp += strlen(path);
     342          }
     343          else {
     344            strcpy(pp, path + 2);
     345            pp += strlen(path + 2);
     346          }
     347          if (spaces) {
     348            if (path[strlen(path) - 1] == '\\') {
     349              *pp = '\\';
     350              pp++;
     351            }
     352            *pp = '\"';
     353            pp++;
     354          }
     355        }
     356        else {
     357          char temp[CCHMAXPATH];
     358
     359          strcpy(temp, pFM2SaveDirectory);
     360          if (needs_quoting(temp) && !strchr(temp, '\"')) {
     361            spaces = TRUE;
     362            *pp = '\"';
     363            pp++;
     364          }
     365          else
     366            spaces = FALSE;
     367          strcpy(pp, temp);
     368          pp += strlen(temp);
     369          if (spaces) {
     370            if (temp[strlen(temp) - 1] == '\\') {
     371              *pp = '\\';
     372              pp++;
     373            }
     374            *pp = '\"';
     375            pp++;
     376          }
     377        }
     378        p += 2;
     379        break;
    380380
    381381      case 'D':
    382         if (hwndMain) {
    383           PCNRITEM pci;
    384 
    385           pci = (PCNRITEM) WinSendMsg(WinWindowFromID(WinWindowFromID(
    386                                            hwndTree, FID_CLIENT), TREE_CNR),
    387                                       CM_QUERYRECORDEMPHASIS,
    388                                       MPFROMLONG(CMA_FIRST),
    389                                       MPFROMSHORT(CRA_CURSORED));
    390           if (pci && (int) pci != -1 && *pci->pszFileName) {
    391             if (needs_quoting(pci->pszFileName) &&
    392                 !strchr(pci->pszFileName, '\"'))
    393             {
    394               *pp = '\"';
    395               pp++;
    396               spaces = TRUE;
    397             }
    398             else
    399               spaces = FALSE;
    400             strcpy(pp, pci->pszFileName);
    401             pp += strlen(pci->pszFileName);
    402             if (spaces) {
    403               *pp = '\"';
    404               pp++;
    405             }
    406           }
    407         }
    408         p += 2;
    409         break;
     382        if (hwndMain) {
     383          PCNRITEM pci;
     384
     385          pci = (PCNRITEM) WinSendMsg(WinWindowFromID(WinWindowFromID(
     386                                           hwndTree, FID_CLIENT), TREE_CNR),
     387                                      CM_QUERYRECORDEMPHASIS,
     388                                      MPFROMLONG(CMA_FIRST),
     389                                      MPFROMSHORT(CRA_CURSORED));
     390          if (pci && (int) pci != -1 && *pci->pszFileName) {
     391            if (needs_quoting(pci->pszFileName) &&
     392                !strchr(pci->pszFileName, '\"'))
     393            {
     394              *pp = '\"';
     395              pp++;
     396              spaces = TRUE;
     397            }
     398            else
     399              spaces = FALSE;
     400            strcpy(pp, pci->pszFileName);
     401            pp += strlen(pci->pszFileName);
     402            if (spaces) {
     403              *pp = '\"';
     404              pp++;
     405            }
     406          }
     407        }
     408        p += 2;
     409        break;
    410410
    411411      case 'd':
    412         if (hwndMain) {
    413           HENUM henum;
    414           char retstr[CCHMAXPATH];
    415           HWND hwndC, hwndDir;
    416           USHORT id;
    417           BOOL first = TRUE;
    418 
    419           henum = WinBeginEnumWindows(hwndMain);
    420           while ((hwndC = WinGetNextWindow(henum)) != NULLHANDLE) {
    421             if (hwndC != hwndTree) {
    422               id = WinQueryWindowUShort(hwndC, QWS_ID);
    423               if (id) {
    424                 hwndDir = WinWindowFromID(hwndC, FID_CLIENT);
    425                 if (hwndDir) {
    426                   hwndDir = WinWindowFromID(hwndDir, DIR_CNR);
    427                   if (hwndDir) {
    428                     *retstr = 0;
    429                     WinSendMsg(hwndC, UM_CONTAINERDIR, MPFROMP(retstr), MPVOID);
    430                     if (*retstr) {
    431                       if (!first) {
    432                         *pp = ' ';
    433                         pp++;
    434                       }
    435                       first = FALSE;
    436                       if (needs_quoting(retstr) && !strchr(retstr, '\"')) {
    437                         *pp = '\"';
    438                         pp++;
    439                         spaces = TRUE;
    440                       }
    441                       else
    442                         spaces = FALSE;
    443                       strcpy(pp, retstr);
    444                       pp += strlen(retstr);
    445                       if (spaces) {
    446                         *pp = '\"';
    447                         pp++;
    448                       }
    449                     }
    450                   }
    451                 }
    452               }
    453             }
    454           }
    455           WinEndEnumWindows(henum);
    456         }
    457         p += 2;
    458         break;
     412        if (hwndMain) {
     413          HENUM henum;
     414          char retstr[CCHMAXPATH];
     415          HWND hwndC, hwndDir;
     416          USHORT id;
     417          BOOL first = TRUE;
     418
     419          henum = WinBeginEnumWindows(hwndMain);
     420          while ((hwndC = WinGetNextWindow(henum)) != NULLHANDLE) {
     421            if (hwndC != hwndTree) {
     422              id = WinQueryWindowUShort(hwndC, QWS_ID);
     423              if (id) {
     424                hwndDir = WinWindowFromID(hwndC, FID_CLIENT);
     425                if (hwndDir) {
     426                  hwndDir = WinWindowFromID(hwndDir, DIR_CNR);
     427                  if (hwndDir) {
     428                    *retstr = 0;
     429                    WinSendMsg(hwndC, UM_CONTAINERDIR, MPFROMP(retstr), MPVOID);
     430                    if (*retstr) {
     431                      if (!first) {
     432                        *pp = ' ';
     433                        pp++;
     434                      }
     435                      first = FALSE;
     436                      if (needs_quoting(retstr) && !strchr(retstr, '\"')) {
     437                        *pp = '\"';
     438                        pp++;
     439                        spaces = TRUE;
     440                      }
     441                      else
     442                        spaces = FALSE;
     443                      strcpy(pp, retstr);
     444                      pp += strlen(retstr);
     445                      if (spaces) {
     446                        *pp = '\"';
     447                        pp++;
     448                      }
     449                    }
     450                  }
     451                }
     452              }
     453            }
     454          }
     455          WinEndEnumWindows(henum);
     456        }
     457        p += 2;
     458        break;
    459459
    460460      case '%':
    461         *pp = '%';
    462         pp++;
    463         p += 2;
    464         break;
     461        *pp = '%';
     462        pp++;
     463        p += 2;
     464        break;
    465465
    466466      case 'R':
    … …  
    471471      case 'a':
    472472      case 'e':
    473         if (list) {
    474           for (x = 0; list[x]; x++)
    475           {
    476             file = strrchr(list[x], '\\');
    477             if (!file)
    478               file = strrchr(list[x], ':');
    479             if (file)
    480               file++;
    481             else
    482               file = list[x];
    483             ext = strrchr(file, '.');
    484             dot = ext;
    485             if (ext)
    486               ext++;
    487             switch (*(p + 1)) {
    488             case 'R':
    489             case 'r':
    490               if (pp + strlen(list[x]) > commandline + MaxComLineStrg)
    491                 goto BreakOut;
    492               if (*(p + 1) == 'r') {
    493                 strcpy(pp, list[x]);
    494                 pp += strlen(list[x]);
    495               }
    496               else {
    497                 strcpy(pp, list[x] + 2);
    498                 pp += strlen(list[x] + 2);
    499               }
    500               break;
    501 
    502             case 'F':
    503             case 'f':
    504               if (*(p + 1) == 'F' && dot)
    505                 *dot = 0;
    506               if (pp + strlen(file) > commandline + MaxComLineStrg)
    507                 goto BreakOut;
    508               if (needs_quoting(file)) {
    509                 spaces = TRUE;
    510                 *pp = '\"';
    511                 pp++;
    512               }
    513               else
    514                 spaces = FALSE;
    515               strcpy(pp, file);
    516               pp += strlen(file);
    517               if (*(p + 1) == 'F' && dot)
    518                 *dot = '.';
    519               if (spaces) {
    520                 if (*(pp - 1) != '\"') {
    521                   *pp = '\"';
    522                   pp++;
    523                 }
    524               }
    525               break;
    526 
    527             case 'A':
    528             case 'a':
    529               if (pp + strlen(list[x]) > commandline + MaxComLineStrg)
    530                 goto BreakOut;
    531               if (needs_quoting(list[x]) && !strchr(list[x], '\"')) {
    532                 spaces = TRUE;
    533                 *pp = '\"';
    534                 pp++;
    535               }
    536               else
    537                 spaces = FALSE;
    538               if (*(p + 1) == 'a') {
    539                 strcpy(pp, list[x]);
    540                 pp += strlen(list[x]);
    541               }
    542               else {
    543                 strcpy(pp, list[x] + 2);
    544                 pp += strlen(list[x] + 2);
    545               }
    546               if (spaces) {
    547                 if (list[x][strlen(list[x]) - 1] == '\\') {
    548                   *pp = '\\';
    549                   pp++;
    550                 }
    551                 *pp = '\"';
    552                 pp++;
    553               }
    554               break;
    555 
    556             case 'e':
    557               if (ext) {
    558                 if (pp + strlen(ext) > commandline + MaxComLineStrg)
    559                   goto BreakOut;
    560                 if (needs_quoting(ext)) {
    561                   spaces = TRUE;
    562                   *pp = '\"';
    563                   pp++;
    564                 }
    565                 else
    566                   spaces = FALSE;
    567                 strcpy(pp, ext);
    568                 pp += strlen(ext);
    569                 if (spaces) {
    570                   if (*(pp - 1) != '\"') {
    571                     *pp = '\"';
    572                     pp++;
    573                   }
    574                 }
    575               }
    576               break;
    577             }
    578             if (list[x + 1]) {
    579               *pp = ' ';
    580               pp++;
    581             }
    582           }
    583         }
    584         p += 2;
    585         break;
     473        if (list) {
     474          for (x = 0; list[x]; x++)
     475          {
     476            file = strrchr(list[x], '\\');
     477            if (!file)
     478              file = strrchr(list[x], ':');
     479            if (file)
     480              file++;
     481            else
     482              file = list[x];
     483            ext = strrchr(file, '.');
     484            dot = ext;
     485            if (ext)
     486              ext++;
     487            switch (*(p + 1)) {
     488            case 'R':
     489            case 'r':
     490              if (pp + strlen(list[x]) > commandline + MaxComLineStrg)
     491                goto BreakOut;
     492              if (*(p + 1) == 'r') {
     493                strcpy(pp, list[x]);
     494                pp += strlen(list[x]);
     495              }
     496              else {
     497                strcpy(pp, list[x] + 2);
     498                pp += strlen(list[x] + 2);
     499              }
     500              break;
     501
     502            case 'F':
     503            case 'f':
     504              if (*(p + 1) == 'F' && dot)
     505                *dot = 0;
     506              if (pp + strlen(file) > commandline + MaxComLineStrg)
     507                goto BreakOut;
     508              if (needs_quoting(file)) {
     509                spaces = TRUE;
     510                *pp = '\"';
     511                pp++;
     512              }
     513              else
     514                spaces = FALSE;
     515              strcpy(pp, file);
     516              pp += strlen(file);
     517              if (*(p + 1) == 'F' && dot)
     518                *dot = '.';
     519              if (spaces) {
     520                if (*(pp - 1) != '\"') {
     521                  *pp = '\"';
     522                  pp++;
     523                }
     524              }
     525              break;
     526
     527            case 'A':
     528            case 'a':
     529              if (pp + strlen(list[x]) > commandline + MaxComLineStrg)
     530                goto BreakOut;
     531              if (needs_quoting(list[x]) && !strchr(list[x], '\"')) {
     532                spaces = TRUE;
     533                *pp = '\"';
     534                pp++;
     535              }
     536              else
     537                spaces = FALSE;
     538              if (*(p + 1) == 'a') {
     539                strcpy(pp, list[x]);
     540                pp += strlen(list[x]);
     541              }
     542              else {
     543                strcpy(pp, list[x] + 2);
     544                pp += strlen(list[x] + 2);
     545              }
     546              if (spaces) {
     547                if (list[x][strlen(list[x]) - 1] == '\\') {
     548                  *pp = '\\';
     549                  pp++;
     550                }
     551                *pp = '\"';
     552                pp++;
     553              }
     554              break;
     555
     556            case 'e':
     557              if (ext) {
     558                if (pp + strlen(ext) > commandline + MaxComLineStrg)
     559                  goto BreakOut;
     560                if (needs_quoting(ext)) {
     561                  spaces = TRUE;
     562                  *pp = '\"';
     563                  pp++;
     564                }
     565                else
     566                  spaces = FALSE;
     567                strcpy(pp, ext);
     568                pp += strlen(ext);
     569                if (spaces) {
     570                  if (*(pp - 1) != '\"') {
     571                    *pp = '\"';
     572                    pp++;
     573                  }
     574                }
     575              }
     576              break;
     577            }
     578            if (list[x + 1]) {
     579              *pp = ' ';
     580              pp++;
     581            }
     582          }
     583        }
     584        p += 2;
     585        break;
    586586
    587587      default:
    588         *pp = *p;
    589         p++;
    590         pp++;
    591         break;
     588        *pp = *p;
     589        p++;
     590        pp++;
     591        break;
    592592      }
    593593    }
    … …  
    616616      strcpy(ex.path, path);
    617617      if (prompt)
    618         strcpy(ex.title, prompt);
     618        strcpy(ex.title, prompt);
    619619      ret = WinDlgBox(HWND_DESKTOP, hwnd, CmdLineDlgProc, FM3ModHandle,
    620                       EXEC_FRAME, &ex);
     620                      EXEC_FRAME, &ex);
    621621      if (ret != 1) {
    622         free(commandline);
    623         return (ret == 0) ? -1 : -2;
     622        free(commandline);
     623        return (ret == 0) ? -1 : -2;
    624624      }
    625625    }
    … …  
    628628    ex.flags &= (~PROMPT);
    629629    ret = runemf2(ex.flags, hwnd, pszCallingFile, uiLineNumber, path,
    630                    (*ex.environment) ? ex.environment : NULL,
    631                    "%s", commandline);
     630                   (*ex.environment) ? ex.environment : NULL,
     631                   "%s", commandline);
    632632    free(commandline);
    633633    return ret;
    … …  
    640640
    641641int runemf2(int type, HWND hwnd, PCSZ pszCallingFile, UINT uiLineNumber,
    642             char *pszDirectory, char *pszEnvironment,
    643             char *formatstring,...)
     642            char *pszDirectory, char *pszEnvironment,
     643            char *formatstring,...)
    644644{
    645645  /** example:
    … …  
    697697  if (pszDirectory && *pszDirectory) {
    698698    if (!DosQueryPathInfo(pszDirectory,
    699                           FIL_QUERYFULLNAME,
    700                           szTempdir,
    701                           sizeof(szTempdir)))
     699                          FIL_QUERYFULLNAME,
     700                          szTempdir,
     701                          sizeof(szTempdir)))
    702702      pszDirectory = szTempdir;
    703703  }
    … …  
    707707
    708708  rc = DosAllocMem((PVOID)&pszPgm,
    709                    MaxComLineStrg,
    710                    PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
     709                   MaxComLineStrg,
     710                   PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
    711711  if (rc) {
    712712    Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,GetPString(IDS_OUTOFMEMORY));
    … …  
    718718  *pszPgm = 0;
    719719  va_start(parguments,
    720            formatstring);
     720           formatstring);
    721721  vsprintf(pszPgm,
    722            formatstring,
    723            parguments);
     722           formatstring,
     723           parguments);
    724724  va_end(parguments);
    725725
    … …  
    754754      temp = *p;
    755755      if (temp) {
    756         rc = DosAllocMem((PVOID)&pszArgs,
    757                         MaxComLineStrg * 2,
    758                         PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
    759         if (rc)
    760           Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,GetPString(IDS_OUTOFMEMORY));
     756        rc = DosAllocMem((PVOID)&pszArgs,
     757                        MaxComLineStrg * 2,
     758                        PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
     759        if (rc)
     760          Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,GetPString(IDS_OUTOFMEMORY));
    761761      }
    762762      else
    763         pszArgs = NULL;
     763        pszArgs = NULL;
    764764      *p = 0;
    765765      /* Find the handle of the WPS object */
    … …  
    767767      *p = temp;
    768768      if (hWPSObject != NULLHANDLE) {
    769         if (pszArgs && *p) {
    770           sprintf(pszArgs,"OPEN=DEFAULT;PARAMETERS=\"%s\"",p);
    771           WinSetObjectData(hWPSObject,pszArgs);
    772         }
    773         else
    774           WinSetObjectData(hWPSObject,"OPEN=DEFAULT");
    775         ret = 0;
     769        if (pszArgs && *p) {
     770          sprintf(pszArgs,"OPEN=DEFAULT;PARAMETERS=\"%s\"",p);
     771          WinSetObjectData(hWPSObject,pszArgs);
     772        }
     773        else
     774          WinSetObjectData(hWPSObject,"OPEN=DEFAULT");
     775        ret = 0;
    776776      }
    777777      goto ObjectInterrupt;
    … …  
    779779
    780780    if ((type & RUNTYPE_MASK) == SYNCHRONOUS ||
    781         (type & RUNTYPE_MASK) == ASYNCHRONOUS ||
    782         (type & RUNTYPE_MASK) == DETACHED)
     781        (type & RUNTYPE_MASK) == ASYNCHRONOUS ||
     782        (type & RUNTYPE_MASK) == DETACHED)
    783783    {
    784784      strip_lead_char(" \t", pszPgm);
    … …  
    786786      wasquote = FALSE;
    787787      while (*p &&
    788              (wasquote ||
    789               (*p != ' ' &&
    790                *p != '\t')))
     788             (wasquote ||
     789              (*p != ' ' &&
     790               *p != '\t')))
    791791      {
    792         if (*p == '\"') {
    793           if (!wasquote) {
    794             wasquote = TRUE;
    795             memmove(p,
    796                     p + 1,
    797                     strlen(p));
    798             while (*p == ' ' ||
    799                    *p == '\t')
    800               p++;
    801           }
    802           else {
    803             memmove(p,
    804                     p + 1,
    805                     strlen(p));
    806             break;
    807           }
    808         }
    809         else
    810           p++;
     792        if (*p == '\"') {
     793          if (!wasquote) {
     794            wasquote = TRUE;
     795            memmove(p,
     796                    p + 1,
     797                    strlen(p));
     798            while (*p == ' ' ||
     799                   *p == '\t')
     800              p++;
     801          }
     802          else {
     803            memmove(p,
     804                    p + 1,
     805                    strlen(p));
     806            break;
     807          }
     808        }
     809        else
     810          p++;
    811811      }
    812812      if (*p) {
    813         *p = 0;
    814         p++;
     813        *p = 0;
     814        p++;
    815815      }
    816816      else
    817         p = pszPgm;
     817        p = pszPgm;
    818818      p[strlen(p) + 1] = 0;             /* double-terminate args */
    819819      if (*pszPgm) {
    820         if (!strchr(pszPgm, '\\') &&
    821             !strchr(pszPgm, ':') &&
    822             pszDirectory &&
    823             *pszDirectory)
    824         {
    825           strcpy(szSavedir, pFM2SaveDirectory);
    826           switch_to(pszDirectory);
    827         }
    828         rc = DosQueryAppType(pszPgm,&ulAppType);
    829         if (!strchr(pszPgm, '\\') &&
    830             !strchr(pszPgm, ':') &&
    831             pszDirectory &&
    832             *pszDirectory)
    833           switch_to(szSavedir);
    834         if (rc) {
    835           Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,
    836                     GetPString(IDS_DOSQAPPTYPEFAILEDTEXT),
    837                     pszPgm, pszCallingFile, uiLineNumber);      // 26 May 08 SHL
    838           DosFreeMem(pszPgm);
    839           if (pszArgs)
    840             DosFreeMem(pszArgs);
    841           return -1;
    842         }
    843         if (ulAppType) {
    844           if (ulAppType & FAPPTYP_DLL || ulAppType & FAPPTYP_VIRTDRV ||
    845               ulAppType & FAPPTYP_PHYSDRV || ulAppType & FAPPTYP_PROTDLL)
    846           {
    847             Runtime_Error(pszSrcFile, __LINE__,
    848                           GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
    849                           ulAppType, pszPgm, pszCallingFile, uiLineNumber);     // 26 May 08 SHL
    850             if (pszPgm)
    851               DosFreeMem(pszPgm);
    852             if (pszArgs)
    853               DosFreeMem(pszArgs);
    854             return -1;
    855           }
    856           if (ulAppType & FAPPTYP_DOS || ulAppType & FAPPTYP_WINDOWSREAL ||
    857               ulAppType & FAPPTYP_WINDOWSPROT || ulAppType & FAPPTYP_WINDOWSPROT31)
    858           {
    859             Runtime_Error(pszSrcFile, __LINE__,
    860                           GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
    861                           ulAppType, pszPgm, pszCallingFile, uiLineNumber);     // 26 May 08 SHL
    862             if (pszPgm)
    863               DosFreeMem(pszPgm);
    864             if (pszArgs)
    865               DosFreeMem(pszArgs);
    866             return -1;
    867           }
    868         }
    869         memset(&results, 0, sizeof(results));
    870         if (pszDirectory && *pszDirectory) {
    871           strcpy(szSavedir, pFM2SaveDirectory);
    872           switch_to(pszDirectory);
    873         }
    874         ret = DosExecPgm(szObject, sizeof(szObject),
    875                         ((type & RUNTYPE_MASK) == ASYNCHRONOUS ?  EXEC_ASYNC : 0) +
    876                         ((type & RUNTYPE_MASK) == DETACHED ? EXEC_BACKGROUND : 0),
    877                         pszPgm, pszEnvironment, &results, pszPgm);
    878         if (pszDirectory && *pszDirectory)
    879           switch_to(szSavedir);
    880         if (ret && !fNoErrorMsg) {
    881           Dos_Error(MB_ENTER,ret,hwnd,pszSrcFile,__LINE__,
    882                     GetPString(IDS_DOSEXECPGMFAILEDTEXT), pszPgm,
    883                     pszCallingFile, uiLineNumber);      // 26 May 08 SHL
    884         }
     820        if (!strchr(pszPgm, '\\') &&
     821            !strchr(pszPgm, ':') &&
     822            pszDirectory &&
     823            *pszDirectory)
     824        {
     825          strcpy(szSavedir, pFM2SaveDirectory);
     826          switch_to(pszDirectory);
     827        }
     828        rc = DosQueryAppType(pszPgm,&ulAppType);
     829        if (!strchr(pszPgm, '\\') &&
     830            !strchr(pszPgm, ':') &&
     831            pszDirectory &&
     832            *pszDirectory)
     833          switch_to(szSavedir);
     834        if (rc) {
     835          Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,
     836                    GetPString(IDS_DOSQAPPTYPEFAILEDTEXT),
     837                    pszPgm, pszCallingFile, uiLineNumber);      // 26 May 08 SHL
     838          DosFreeMem(pszPgm);
     839          if (pszArgs)
     840            DosFreeMem(pszArgs);
     841          return -1;
     842        }
     843        if (ulAppType) {
     844          if (ulAppType & FAPPTYP_DLL || ulAppType & FAPPTYP_VIRTDRV ||
     845              ulAppType & FAPPTYP_PHYSDRV || ulAppType & FAPPTYP_PROTDLL)
     846          {
     847            Runtime_Error(pszSrcFile, __LINE__,
     848                          GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
     849                          ulAppType, pszPgm, pszCallingFile, uiLineNumber);     // 26 May 08 SHL
     850            if (pszPgm)
     851              DosFreeMem(pszPgm);
     852            if (pszArgs)
     853              DosFreeMem(pszArgs);
     854            return -1;
     855          }
     856          if (ulAppType & FAPPTYP_DOS || ulAppType & FAPPTYP_WINDOWSREAL ||
     857              ulAppType & FAPPTYP_WINDOWSPROT || ulAppType & FAPPTYP_WINDOWSPROT31)
     858          {
     859            Runtime_Error(pszSrcFile, __LINE__,
     860                          GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
     861                          ulAppType, pszPgm, pszCallingFile, uiLineNumber);     // 26 May 08 SHL
     862            if (pszPgm)
     863              DosFreeMem(pszPgm);
     864            if (pszArgs)
     865              DosFreeMem(pszArgs);
     866            return -1;
     867          }
     868        }
     869        memset(&results, 0, sizeof(results));
     870        if (pszDirectory && *pszDirectory) {
     871          strcpy(szSavedir, pFM2SaveDirectory);
     872          switch_to(pszDirectory);
     873        }
     874        ret = DosExecPgm(szObject, sizeof(szObject),
     875                        ((type & RUNTYPE_MASK) == ASYNCHRONOUS ?  EXEC_ASYNC : 0) +
     876                        ((type & RUNTYPE_MASK) == DETACHED ? EXEC_BACKGROUND : 0),
     877                        pszPgm, pszEnvironment, &results, pszPgm);
     878        if (pszDirectory && *pszDirectory)
     879          switch_to(szSavedir);
     880        if (ret && !fNoErrorMsg) {
     881          Dos_Error(MB_ENTER,ret,hwnd,pszSrcFile,__LINE__,
     882                    GetPString(IDS_DOSEXECPGMFAILEDTEXT), pszPgm,
     883                    pszCallingFile, uiLineNumber);      // 26 May 08 SHL
     884        }
    885885      }
    886886    }
    887887    else {
    888888      if (~type & FULLSCREEN)
    889         type |= WINDOWED;
     889        type |= WINDOWED;
    890890      rc = DosAllocMem((PVOID) & pszArgs, MaxComLineStrg * 2,
    891                        PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
     891                       PAG_COMMIT | OBJ_TILE | PAG_READ | PAG_WRITE);
    892892      if (rc) {
    893         Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,GetPString(IDS_OUTOFMEMORY));
    894         DosFreeMem(pszPgm);
    895         return -1;
     893        Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,GetPString(IDS_OUTOFMEMORY));
     894        DosFreeMem(pszPgm);
     895        return -1;
    896896      }
    897897      *pszArgs = 0;
    … …  
    901901      wasquote = FALSE;
    902902      while (*p && (wasquote || (*p != ' ' && *p != '\t'))) {
    903         if (*p == '\"') {
    904           if (!wasquote) {
    905             wasquote = TRUE;
    906             memmove(p, p + 1, strlen(p));
    907             while (*p == ' ' || *p == '\t')
    908               p++;
    909           }
    910           else {
    911             memmove(p, p + 1, strlen(p));
    912             break;
    913           }
    914         }
    915         else
    916           p++;
     903        if (*p == '\"') {
     904          if (!wasquote) {
     905            wasquote = TRUE;
     906            memmove(p, p + 1, strlen(p));
     907            while (*p == ' ' || *p == '\t')
     908              p++;
     909          }
     910          else {
     911            memmove(p, p + 1, strlen(p));
     912            break;
     913          }
     914        }
     915        else
     916          p++;
    917917      } // while
    918918      if (*p) {
    919         *p = 0;
    920         p++;
     919        *p = 0;
     920        p++;
    921921      }
    922922      else
    923         p = NullStr;
     923        p = NullStr;
    924924      if (*p)
    925         strcpy(pszArgs, p);
     925        strcpy(pszArgs, p);
    926926
    927927      p = strrchr(pszPgm, '.');
    928928      if (p) {
    929         char temp[CCHMAXPATH + 1];
    930 
    931         if (!stricmp(p, ".BAT")) {
    932           strcpy(temp, pszPgm);
    933           strcpy(pszPgm, pszArgs);
    934           strcpy(pszArgs, "/C ");
    935           strcat(pszArgs, temp);
    936           strcat(pszArgs, " ");
    937           strcat(pszArgs, pszPgm);
    938           strcpy(pszPgm, GetCmdSpec(TRUE));             // DOS
    939         }
    940         else if (!stricmp(p, ".CMD") || !stricmp(p, ".BTM")) {
    941           // Assume 4OS2 is BTM
    942           strcpy(temp, pszPgm);
    943           strcpy(pszPgm, pszArgs);
    944           strcpy(pszArgs, "/C ");
    945           strcat(pszArgs, temp);
    946           strcat(pszArgs, " ");
    947           strcat(pszArgs, pszPgm);
    948           strcpy(pszPgm, GetCmdSpec(FALSE));            // OS/2
    949         }
     929        char temp[CCHMAXPATH + 1];
     930
     931        if (!stricmp(p, ".BAT")) {
     932          strcpy(temp, pszPgm);
     933          strcpy(pszPgm, pszArgs);
     934          strcpy(pszArgs, "/C ");
     935          strcat(pszArgs, temp);
     936          strcat(pszArgs, " ");
     937          strcat(pszArgs, pszPgm);
     938          strcpy(pszPgm, GetCmdSpec(TRUE));             // DOS
     939        }
     940        else if (!stricmp(p, ".CMD") || !stricmp(p, ".BTM")) {
     941          // Assume 4OS2 is BTM
     942          strcpy(temp, pszPgm);
     943          strcpy(pszPgm, pszArgs);
     944          strcpy(pszArgs, "/C ");
     945          strcat(pszArgs, temp);
     946          strcat(pszArgs, " ");
     947          strcat(pszArgs, pszPgm);
     948          strcpy(pszPgm, GetCmdSpec(FALSE));            // OS/2
     949        }
    950950      }
    951951
    … …  
    953953
    954954      if (strlen(pszPgm) + strlen(pszArgs) > 1024)
    955         pszArgs[1024 - strlen(pszPgm)] = 0;
     955        pszArgs[1024 - strlen(pszPgm)] = 0;
    956956
    957957      if (!strchr(pszPgm, '\\') &&
    958           !strchr(pszPgm, ':') &&
    959           pszDirectory &&
    960           *pszDirectory)
     958          !strchr(pszPgm, ':') &&
     959          pszDirectory &&
     960          *pszDirectory)
    961961      {
    962         strcpy(szSavedir, pFM2SaveDirectory);
    963         switch_to(pszDirectory);
     962        strcpy(szSavedir, pFM2SaveDirectory);
     963        switch_to(pszDirectory);
    964964      }
    965965      rc = DosQueryAppType(pszPgm,&ulAppType);
    966966      if (!strchr(pszPgm, '\\') &&
    967           !strchr(pszPgm, ':') &&
    968           pszDirectory &&
    969           *pszDirectory)
    970         switch_to(szSavedir);
     967          !strchr(pszPgm, ':') &&
     968          pszDirectory &&
     969          *pszDirectory)
     970        switch_to(szSavedir);
    971971      if (rc) {
    972         Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,
    973                   GetPString(IDS_DOSQAPPTYPEFAILEDTEXT),
    974                   pszPgm, pszCallingFile, uiLineNumber);        // 26 May 08 SHL
    975         DosFreeMem(pszPgm);
    976         if (pszArgs)
    977           DosFreeMem(pszArgs);
    978         return -1;
     972        Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,
     973                  GetPString(IDS_DOSQAPPTYPEFAILEDTEXT),
     974                  pszPgm, pszCallingFile, uiLineNumber);        // 26 May 08 SHL
     975        DosFreeMem(pszPgm);
     976        if (pszArgs)
     977          DosFreeMem(pszArgs);
     978        return -1;
    979979      }
    980980
    981981      if (ulAppType) {
    982         if (ulAppType & (FAPPTYP_DLL | FAPPTYP_VIRTDRV | FAPPTYP_PHYSDRV | FAPPTYP_PROTDLL))
    983         {
    984           Runtime_Error(pszSrcFile, __LINE__,
    985                         GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
    986                         ulAppType, pszPgm, pszCallingFile, uiLineNumber);  // 26 May 08 SHL
    987           DosFreeMem(pszPgm);
    988           if (pszArgs)
    989             DosFreeMem(pszArgs);
    990           return -1;
    991         }
    992         ulAppType &= ~FAPPTYP_BOUND;
    993         if (ulAppType & (FAPPTYP_DOS | FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
    994         {
    995           if (ulAppType & (FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
    996           {
    997             if (~type & FULLSCREEN &&
    998                 ulAppType & (FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
    999             {
    1000               ret = RunSeamless(pszPgm, pszArgs, hwnd);
    1001               if (pszPgm)
    1002                 DosFreeMem(pszPgm);
    1003               if (pszArgs)
    1004                 DosFreeMem(pszArgs);
    1005               return ret ? 0 : -1;
    1006             }
    1007             else {
    1008               strcat(pszPgm, " ");
    1009               strcat(pszPgm, pszArgs);
    1010               *pszArgs = 0;
    1011               if (ulAppType & (FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT31))
    1012                 strcat(pszArgs, "/3 ");
    1013               strcat(pszArgs, pszPgm);
    1014               strcpy(pszPgm, "WINOS2.COM");
    1015             }
    1016           }
    1017           else {
    1018             if (~type & FULLSCREEN) {
    1019               type |= WINDOWED;
    1020               ulAppType = SSF_TYPE_WINDOWEDVDM;
    1021             }
    1022             else {
    1023               type &= ~WINDOWED;
    1024               ulAppType = SSF_TYPE_VDM;
    1025             }
    1026           }
    1027         }
    1028         else if (ulAppType & FAPPTYP_32BIT) {
    1029           ulAppType &= ~FAPPTYP_32BIT;
    1030           if (ulAppType == FAPPTYP_WINDOWAPI)
    1031             ulAppType = SSF_TYPE_PM;
    1032           else if (ulAppType == FAPPTYP_WINDOWCOMPAT)
    1033             ulAppType = SSF_TYPE_WINDOWABLEVIO;
    1034           else if (ulAppType == FAPPTYP_NOTWINDOWCOMPAT) {
    1035             ulAppType = SSF_TYPE_FULLSCREEN;
    1036             type &= ~WINDOWED;
    1037             type |= FULLSCREEN;
    1038           }
    1039           else                          /* ? */
    1040             ulAppType = SSF_TYPE_WINDOWABLEVIO;
    1041         }
    1042         else if (ulAppType == FAPPTYP_WINDOWAPI)
    1043           ulAppType = SSF_TYPE_PM;
    1044         else if (ulAppType == FAPPTYP_WINDOWCOMPAT)
    1045           ulAppType = SSF_TYPE_WINDOWABLEVIO;
    1046         else if (ulAppType == FAPPTYP_NOTWINDOWCOMPAT) {
    1047           type &= ~WINDOWED;
    1048           ulAppType = SSF_TYPE_FULLSCREEN;
    1049         }
    1050         else
    1051           ulAppType = SSF_TYPE_DEFAULT;
    1052         if ((type & FULLSCREEN || ~type & WINDOWED) &&
    1053             ulAppType == SSF_TYPE_WINDOWABLEVIO)
    1054         {
    1055           ulAppType = SSF_TYPE_FULLSCREEN;
    1056         }
    1057         // fixme parens?
    1058         else if (type & FULLSCREEN ||
    1059                 (type & WINDOWED && ulAppType == SSF_TYPE_WINDOWEDVDM))
    1060         {
    1061           ulAppType = SSF_TYPE_VDM;
    1062         }
     982        if (ulAppType & (FAPPTYP_DLL | FAPPTYP_VIRTDRV | FAPPTYP_PHYSDRV | FAPPTYP_PROTDLL))
     983        {
     984          Runtime_Error(pszSrcFile, __LINE__,
     985                        GetPString(IDS_APPTYPEUNEXPECTEDTEXT),
     986                        ulAppType, pszPgm, pszCallingFile, uiLineNumber);  // 26 May 08 SHL
     987          DosFreeMem(pszPgm);
     988          if (pszArgs)
     989            DosFreeMem(pszArgs);
     990          return -1;
     991        }
     992        ulAppType &= ~FAPPTYP_BOUND;
     993        if (ulAppType & (FAPPTYP_DOS | FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
     994        {
     995          if (ulAppType & (FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
     996          {
     997            if (~type & FULLSCREEN &&
     998                ulAppType & (FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSPROT31))
     999            {
     1000              ret = RunSeamless(pszPgm, pszArgs, hwnd);
     1001              if (pszPgm)
     1002                DosFreeMem(pszPgm);
     1003              if (pszArgs)
     1004                DosFreeMem(pszArgs);
     1005              return ret ? 0 : -1;
     1006            }
     1007            else {
     1008              strcat(pszPgm, " ");
     1009              strcat(pszPgm, pszArgs);
     1010              *pszArgs = 0;
     1011              if (ulAppType & (FAPPTYP_WINDOWSPROT | FAPPTYP_WINDOWSREAL | FAPPTYP_WINDOWSPROT31))
     1012                strcat(pszArgs, "/3 ");
     1013              strcat(pszArgs, pszPgm);
     1014              strcpy(pszPgm, "WINOS2.COM");
     1015            }
     1016          }
     1017          else {
     1018            if (~type & FULLSCREEN) {
     1019              type |= WINDOWED;
     1020              ulAppType = SSF_TYPE_WINDOWEDVDM;
     1021            }
     1022            else {
     1023              type &= ~WINDOWED;
     1024              ulAppType = SSF_TYPE_VDM;
     1025            }
     1026          }
     1027        }
     1028        else if (ulAppType & FAPPTYP_32BIT) {
     1029          ulAppType &= ~FAPPTYP_32BIT;
     1030          if (ulAppType == FAPPTYP_WINDOWAPI)
     1031            ulAppType = SSF_TYPE_PM;
     1032          else if (ulAppType == FAPPTYP_WINDOWCOMPAT)
     1033            ulAppType = SSF_TYPE_WINDOWABLEVIO;
     1034          else if (ulAppType == FAPPTYP_NOTWINDOWCOMPAT) {
     1035            ulAppType = SSF_TYPE_FULLSCREEN;
     1036            type &= ~WINDOWED;
     1037            type |= FULLSCREEN;
     1038          }
     1039          else                          /* ? */
     1040            ulAppType = SSF_TYPE_WINDOWABLEVIO;
     1041        }
     1042        else if (ulAppType == FAPPTYP_WINDOWAPI)
     1043          ulAppType = SSF_TYPE_PM;
     1044        else if (ulAppType == FAPPTYP_WINDOWCOMPAT)
     1045          ulAppType = SSF_TYPE_WINDOWABLEVIO;
     1046        else if (ulAppType == FAPPTYP_NOTWINDOWCOMPAT) {
     1047          type &= ~WINDOWED;
     1048          ulAppType = SSF_TYPE_FULLSCREEN;
     1049        }
     1050        else
     1051          ulAppType = SSF_TYPE_DEFAULT;
     1052        if ((type & FULLSCREEN || ~type & WINDOWED) &&
     1053            ulAppType == SSF_TYPE_WINDOWABLEVIO)
     1054        {
     1055          ulAppType = SSF_TYPE_FULLSCREEN;
     1056        }
     1057        // fixme parens?
     1058        else if (type & FULLSCREEN ||
     1059                (type & WINDOWED && ulAppType == SSF_TYPE_WINDOWEDVDM))
     1060        {
     1061          ulAppType = SSF_TYPE_VDM;
     1062        }
    10631063      }
    10641064      if (ulAppType == SSF_TYPE_WINDOWEDVDM && type & SEPARATEKEEP) {
    1065         type &= ~SEPARATEKEEP;
    1066         type |= SEPARATE;
     1065        type &= ~SEPARATEKEEP;
     1066        type |= SEPARATE;
    10671067      }
    10681068
    … …  
    10701070
    10711071      if (~type & WAIT)
    1072         useTermQ = FALSE;
     1072        useTermQ = FALSE;
    10731073      else {
    1074         rc = 0;
    1075         DosEnterCritSec();
    1076         if (!hTermQ) {
    1077           // Create term queue and event semaphore just once
    1078           sprintf(szTermQName, TERMQ_BASE_NAME "_%x", ppib->pib_ulpid);
    1079           rc = DosCreateQueue(&hTermQ, QUE_FIFO | QUE_CONVERT_ADDRESS, szTermQName);
    1080           if (rc) {
    1081             hTermQ = (HQUEUE)0;         // Try to survive
    1082             DosExitCritSec();
    1083             Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosCreateQueue");
    1084           }
    1085           else {
    1086             rc = DosCreateEventSem(NULL,(PHEV)&hTermQSem,0,FALSE);
    1087             if (rc) {
    1088                 hTermQSem = (HEV)0;     // Try to survive
    1089                 DosCloseQueue(hTermQ);
    1090                 hTermQ = (HQUEUE)0;     // Try to survive
    1091                 DosExitCritSec();
    1092                 Dos_Error(MB_ENTER,rc,HWND_DESKTOP,pszSrcFile,__LINE__,"DoCreateEventSem");
    1093             }
    1094             // if (!rc) fprintf(stderr,"%s %d qcreated ptib %x hTermQ %x\n",__FILE__, __LINE__,ptib,hTermQ);
    1095           }
    1096         } // if 1st time
    1097         useTermQ = hTermQ && hTermQSem;
    1098         if (!rc)
    1099           DosExitCritSec();
     1074        rc = 0;
     1075        DosEnterCritSec();
     1076        if (!hTermQ) {
     1077          // Create term queue and event semaphore just once
     1078          sprintf(szTermQName, TERMQ_BASE_NAME "_%x", ppib->pib_ulpid);
     1079          rc = DosCreateQueue(&hTermQ, QUE_FIFO | QUE_CONVERT_ADDRESS, szTermQName);
     1080          if (rc) {
     1081            hTermQ = (HQUEUE)0;         // Try to survive
     1082            DosExitCritSec();
     1083            Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosCreateQueue");
     1084          }
     1085          else {
     1086            rc = DosCreateEventSem(NULL,(PHEV)&hTermQSem,0,FALSE);
     1087            if (rc) {
     1088                hTermQSem = (HEV)0;     // Try to survive
     1089                DosCloseQueue(hTermQ);
     1090                hTermQ = (HQUEUE)0;     // Try to survive
     1091                DosExitCritSec();
     1092                Dos_Error(MB_ENTER,rc,HWND_DESKTOP,pszSrcFile,__LINE__,"DoCreateEventSem");
     1093            }
     1094            // if (!rc) fprintf(stderr,"%s %d qcreated ptib %x hTermQ %x\n",__FILE__, __LINE__,ptib,hTermQ);
     1095          }
     1096        } // if 1st time
     1097        useTermQ = hTermQ && hTermQSem;
     1098        if (!rc)
     1099          DosExitCritSec();
    11001100      } // if wait
    11011101
    … …  
    11031103      sdata.Length = sizeof(sdata);
    11041104      sdata.Related = type & (WAIT | CHILD) ? SSF_RELATED_CHILD :
    1105                                               SSF_RELATED_INDEPENDENT;
     1105                                              SSF_RELATED_INDEPENDENT;
    11061106      sdata.FgBg = type & BACKGROUND ? SSF_FGBG_BACK : SSF_FGBG_FORE;
    11071107      sdata.TraceOpt = SSF_TRACEOPT_NONE;
    11081108      sdata.PgmName = pszPgm;
    11091109      if (*pszArgs)
    1110         sdata.PgmInputs = (PBYTE)pszArgs;
     1110        sdata.PgmInputs = (PBYTE)pszArgs;
    11111111      if (useTermQ)
    1112         sdata.TermQ = (PBYTE)szTermQName;
     1112        sdata.TermQ = (PBYTE)szTermQName;
    11131113      sdata.Environment = (PBYTE)pszEnvironment;
    11141114      sdata.InheritOpt = SSF_INHERTOPT_PARENT;
    … …  
    11171117      sdata.ObjectBuffLen = sizeof(szObject);
    11181118      if ((type & RUNTYPE_MASK) == SEPARATEKEEP)
    1119         sdata.PgmControl |= SSF_CONTROL_NOAUTOCLOSE;
     1119        sdata.PgmControl |= SSF_CONTROL_NOAUTOCLOSE;
    11201120      if (type & MAXIMIZED)
    1121         sdata.PgmControl |= SSF_CONTROL_MAXIMIZE;
     1121        sdata.PgmControl |= SSF_CONTROL_MAXIMIZE;
    11221122      if (type & MINIMIZED)
    1123         sdata.PgmControl |= SSF_CONTROL_MINIMIZE;
     1123        sdata.PgmControl |= SSF_CONTROL_MINIMIZE;
    11241124      if (type & INVISIBLE)
    1125         sdata.PgmControl |= SSF_CONTROL_INVISIBLE;
     1125        sdata.PgmControl |= SSF_CONTROL_INVISIBLE;
    11261126
    11271127      if (pszDirectory && *pszDirectory) {
    1128         strcpy(szSavedir, pFM2SaveDirectory);
    1129         switch_to(pszDirectory);
     1128        strcpy(szSavedir, pFM2SaveDirectory);
     1129        switch_to(pszDirectory);
    11301130      }
    11311131      ret = DosStartSession(&sdata, &ulSessID, &sessPID);
    … …  
    11331133
    11341134      if (pszDirectory && *pszDirectory)
    1135         switch_to(szSavedir);
     1135        switch_to(szSavedir);
    11361136
    11371137      if (ret && ret != ERROR_SMG_START_IN_BACKGROUND) {
    1138         if (!fNoErrorMsg)
    1139         Dos_Error(MB_CANCEL,ret,hwnd,pszSrcFile,__LINE__,
    1140                   GetPString(IDS_DOSSTARTSESSIONFAILEDTEXT),pszPgm,pszArgs,
    1141                   pszCallingFile, uiLineNumber);        // 26 May 08 SHL
     1138        if (!fNoErrorMsg)
     1139        Dos_Error(MB_CANCEL,ret,hwnd,pszSrcFile,__LINE__,
     1140                  GetPString(IDS_DOSSTARTSESSIONFAILEDTEXT),pszPgm,pszArgs,
     1141                  pszCallingFile, uiLineNumber);        // 26 May 08 SHL
    11421142      }
    11431143      else if (type & WAIT) {
    1144         if (!(type & (BACKGROUND | MINIMIZED | INVISIBLE)))
    1145           ShowSession(hwnd, sessPID);
    1146 
    1147         if (!useTermQ) {
    1148           STATUSDATA sd;
    1149 
    1150           memset(&sd, 0, sizeof(sd));
    1151           sd.Length = (USHORT) sizeof(sd);
    1152           sd.SelectInd = SET_SESSION_UNCHANGED;
    1153           sd.BondInd = SET_SESSION_UNCHANGED;
    1154           for (ctr = 0;; ctr++)
    1155           {
    1156             DosSleep(100);//05 Aug 07 GKY 200
    1157             if (DosSetSession(ulSessID, &sd))   // Check if session gone (i.e. finished)
    1158               break;
    1159             if (ctr > 10) {
    1160               ShowSession(hwnd, sessPID);       // Show every 2 seconds
    1161               ctr = 0;
    1162             }
    1163           }
    1164         }
    1165         else {
    1166           for (ctr = 0;; ctr++)
    1167           {
    1168             if (ctr < 20) {
    1169               rc = DosReadQueue(hTermQ, &rq, &ulLength, (PPVOID)&pTermInfo, 0,
    1170                                 DCWW_NOWAIT, &bPriority, hTermQSem);
    1171               if (rc == ERROR_QUE_EMPTY) {
    1172                 DosSleep(50);//05 Aug 07 GKY 100
    1173                 continue;
    1174               }
    1175             }
    1176             else {
    1177               if (ctr == 20) {
    1178                 ShowSession(hwnd, sessPID);             // Show long running session
    1179               }
    1180               rc = DosReadQueue(hTermQ, &rq, &ulLength, (PPVOID)&pTermInfo, 0,
    1181                                 DCWW_WAIT, &bPriority, 0);
    1182             }
    1183 
    1184             if (rc) {
    1185               // Oh heck
    1186               Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosReadQueue");
    1187               DosSleep(100);//05 Aug 07 GKY 500
    1188               continue;
    1189             }
    1190 
    1191             //  printf("%s %d DosReadQueue thread 0x%x sess %u sessRC %u rq.pid 0x%x rq.data 0x%x\n",
    1192             //       __FILE__, __LINE__,ptib->tib_ordinal,pTermInfo->usSessID,pTermInfo->usRC,rq.pid, rq.ulData); fflush(stdout);
    1193 
    1194             if (pTermInfo->usSessID == ulSessID)
    1195               break;                    // Our session is done
    1196 
    1197             // Requeue session for other thread
    1198             {
    1199               static ULONG ulLastSessID;
    1200               // printf("%s %d requeue thread 0x%x our sess %u term sess %u term rc %u\n",
    1201               //       __FILE__, __LINE__,ptib->tib_ordinal,ulSessID,pTermInfo->usSessID,pTermInfo->usRC); fflush(stdout);
    1202               // fixme to be gone when no longer needed for debug?
    1203               if (ulLastSessID) {
    1204                 DosSleep(100);//05 Aug 07 GKY 500
    1205                 ulLastSessID = pTermInfo->usSessID;
    1206               }
    1207               // requeue term report for other thread and do not free yet
    1208               rc = DosWriteQueue(hTermQ, rq.ulData, ulLength,(PVOID)pTermInfo, bPriority);
    1209               if (rc)
    1210                 Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosWriteQueue");
    1211               DosSleep(50); //05 Aug 07 GKY 100         // Let other thread see queue entry
    1212             }
    1213           } // for
    1214 
    1215           ret = pTermInfo->usRC == 0;           // Set 1 if rc 0 else 0
    1216           // printf("%s %d thread 0x%x term for sess %u\n",
    1217           //      __FILE__, __LINE__,ptib->tib_ordinal,ulSessID);fflush(stdout);
    1218           DosFreeMem(pTermInfo);
    1219         }
     1144        if (!(type & (BACKGROUND | MINIMIZED | INVISIBLE)))
     1145          ShowSession(hwnd, sessPID);
     1146
     1147        if (!useTermQ) {
     1148          STATUSDATA sd;
     1149
     1150          memset(&sd, 0, sizeof(sd));
     1151          sd.Length = (USHORT) sizeof(sd);
     1152          sd.SelectInd = SET_SESSION_UNCHANGED;
     1153          sd.BondInd = SET_SESSION_UNCHANGED;
     1154          for (ctr = 0;; ctr++)
     1155          {
     1156            DosSleep(100);//05 Aug 07 GKY 200
     1157            if (DosSetSession(ulSessID, &sd))   // Check if session gone (i.e. finished)
     1158              break;
     1159            if (ctr > 10) {
     1160              ShowSession(hwnd, sessPID);       // Show every 2 seconds
     1161              ctr = 0;
     1162            }
     1163          }
     1164        }
     1165        else {
     1166          for (ctr = 0;; ctr++)
     1167          {
     1168            if (ctr < 20) {
     1169              rc = DosReadQueue(hTermQ, &rq, &ulLength, (PPVOID)&pTermInfo, 0,
     1170                                DCWW_NOWAIT, &bPriority, hTermQSem);
     1171              if (rc == ERROR_QUE_EMPTY) {
     1172                DosSleep(50);//05 Aug 07 GKY 100
     1173                continue;
     1174              }
     1175            }
     1176            else {
     1177              if (ctr == 20) {
     1178                ShowSession(hwnd, sessPID);             // Show long running session
     1179              }
     1180              rc = DosReadQueue(hTermQ, &rq, &ulLength, (PPVOID)&pTermInfo, 0,
     1181                                DCWW_WAIT, &bPriority, 0);
     1182            }
     1183
     1184            if (rc) {
     1185              // Oh heck
     1186              Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosReadQueue");
     1187              DosSleep(100);//05 Aug 07 GKY 500
     1188              continue;
     1189            }
     1190
     1191            //  printf("%s %d DosReadQueue thread 0x%x sess %u sessRC %u rq.pid 0x%x rq.data 0x%x\n",
     1192            //       __FILE__, __LINE__,ptib->tib_ordinal,pTermInfo->usSessID,pTermInfo->usRC,rq.pid, rq.ulData); fflush(stdout);
     1193
     1194            if (pTermInfo->usSessID == ulSessID)
     1195              break;                    // Our session is done
     1196
     1197            // Requeue session for other thread
     1198            {
     1199              static ULONG ulLastSessID;
     1200              // printf("%s %d requeue thread 0x%x our sess %u term sess %u term rc %u\n",
     1201              //       __FILE__, __LINE__,ptib->tib_ordinal,ulSessID,pTermInfo->usSessID,pTermInfo->usRC); fflush(stdout);
     1202              // fixme to be gone when no longer needed for debug?
     1203              if (ulLastSessID) {
     1204                DosSleep(100);//05 Aug 07 GKY 500
     1205                ulLastSessID = pTermInfo->usSessID;
     1206              }
     1207              // requeue term report for other thread and do not free yet
     1208              rc = DosWriteQueue(hTermQ, rq.ulData, ulLength,(PVOID)pTermInfo, bPriority);
     1209              if (rc)
     1210                Dos_Error(MB_CANCEL,rc,hwnd,pszSrcFile,__LINE__,"DosWriteQueue");
     1211              DosSleep(50); //05 Aug 07 GKY 100         // Let other thread see queue entry
     1212            }
     1213          } // for
     1214
     1215          ret = pTermInfo->usRC == 0;           // Set 1 if rc 0 else 0
     1216          // printf("%s %d thread 0x%x term for sess %u\n",
     1217          //      __FILE__, __LINE__,ptib->tib_ordinal,ulSessID);fflush(stdout);
     1218          DosFreeMem(pTermInfo);
     1219        }
    12201220      } // if wait
    12211221      else if (!(type & (BACKGROUND | MINIMIZED | INVISIBLE)))
    1222         ShowSession(hwnd, sessPID);
     1222        ShowSession(hwnd, sessPID);
    12231223    }
    12241224  }
    … …  
    12371237#if 0  // JBS   11 Sep 08
    12381238HAPP Exec(HWND hwndNotify, BOOL child, char *startdir, char *env,
    1239           PROGTYPE *progt, ULONG fl, char *formatstring,...)
     1239          PROGTYPE *progt, ULONG fl, char *formatstring,...)
    12401240{
    12411241  PROGDETAILS pgd;
    … …  
    12591259      parameters = xmalloc(MaxComLineStrg, pszSrcFile, __LINE__);
    12601260      if (parameters) {
    1261         p = executable;
    1262         wasquote = FALSE;
    1263         while (*p && (wasquote || (*p != ' ' && *p != '\t'))) {
    1264           if (*p == '\"') {
    1265             if (!wasquote) {
    1266               wasquote = TRUE;
    1267               memmove(p, p + 1, strlen(p));
    1268               while (*p == ' ' || *p == '\t')
    1269                 p++;
    1270             }
    1271             else {
    1272               memmove(p, p + 1, strlen(p));
    1273               break;
    1274             }
    1275           }
    1276           else
    1277             p++;
    1278         }
    1279         if (*p) {
    1280           *p = 0;
    1281           p++;
    1282         }
    1283         else
    1284           p = NullStr;
    1285         if (*p)
    1286           strcpy(parameters, p);
    1287 
    1288         if (p && (!stricmp(p, ".BAT") || !stricmp(p, ".CMD"))) {
    1289           char *temp;
    1290 
    1291           temp = xmalloc(CCHMAXPATH * 2,pszSrcFile,__LINE__);
    1292           if (temp) {
    1293             if (!stricmp(p, ".BAT")) {
    1294               strcpy(temp, executable);
    1295               strcpy(executable, parameters);
    1296               strcpy(parameters, "/C ");
    1297               strcat(parameters, temp);
    1298               strcat(parameters, " ");
    1299               strcat(parameters, executable);
    1300               strcpy(executable, GetCmdSpec(TRUE));
    1301             }
    1302             else if (!stricmp(p, ".CMD")) {
    1303               strcpy(temp, executable);
    1304               strcpy(executable, parameters);
    1305               strcpy(parameters, "/C ");
    1306               strcat(parameters, temp);
    1307               strcat(parameters, " ");
    1308               strcat(parameters, executable);
    1309               strcpy(executable, GetCmdSpec(FALSE));
    1310             }
    1311             free(temp);
    1312           }
    1313         }
    1314 
    1315         memset(&pgd, 0, sizeof(pgd));
    1316         pgd.Length = sizeof(pgd);
    1317         pgd.progt = *progt;
    1318         pgd.swpInitial.fl = fl;
    1319         pgd.pszEnvironment = env;
    1320         pgd.pszStartupDir = startdir;
    1321         pgd.pszParameters = *parameters ? parameters : NULL;
    1322         pgd.pszExecutable = executable;
    1323         pgd.swpInitial.hwndInsertBehind = HWND_TOP;
    1324         happ = WinStartApp(hwndNotify, &pgd, NULL, NULL, ulOptions);
    1325         free(parameters);
     1261        p = executable;
     1262        wasquote = FALSE;
     1263        while (*p && (wasquote || (*p != ' ' && *p != '\t'))) {
     1264          if (*p == '\"') {
     1265            if (!wasquote) {
     1266              wasquote = TRUE;
     1267              memmove(p, p + 1, strlen(p));
     1268              while (*p == ' ' || *p == '\t')
     1269                p++;
     1270            }
     1271            else {
     1272              memmove(p, p + 1, strlen(p));
     1273              break;
     1274            }
     1275          }
     1276          else
     1277            p++;
     1278        }
     1279        if (*p) {
     1280          *p = 0;
     1281          p++;
     1282        }
     1283        else
     1284          p = NullStr;
     1285        if (*p)
     1286          strcpy(parameters, p);
     1287
     1288        if (p && (!stricmp(p, ".BAT") || !stricmp(p, ".CMD"))) {
     1289          char *temp;
     1290
     1291          temp = xmalloc(CCHMAXPATH * 2,pszSrcFile,__LINE__);
     1292          if (temp) {
     1293            if (!stricmp(p, ".BAT")) {
     1294              strcpy(temp, executable);
     1295              strcpy(executable, parameters);
     1296              strcpy(parameters, "/C ");
     1297              strcat(parameters, temp);
     1298              strcat(parameters, " ");
     1299              strcat(parameters, executable);
     1300              strcpy(executable, GetCmdSpec(TRUE));
     1301            }
     1302            else if (!stricmp(p, ".CMD")) {
     1303              strcpy(temp, executable);
     1304              strcpy(executable, parameters);
     1305              strcpy(parameters, "/C ");
     1306              strcat(parameters, temp);
     1307              strcat(parameters, " ");
     1308              strcat(parameters, executable);
     1309              strcpy(executable, GetCmdSpec(FALSE));
     1310            }
     1311            free(temp);
     1312          }
     1313        }
     1314
     1315        memset(&pgd, 0, sizeof(pgd));
     1316        pgd.Length = sizeof(pgd);
     1317        pgd.progt = *progt;
     1318        pgd.swpInitial.fl = fl;
     1319        pgd.pszEnvironment = env;
     1320        pgd.pszStartupDir = startdir;
     1321        pgd.pszParameters = *parameters ? parameters : NULL;
     1322        pgd.pszExecutable = executable;
     1323        pgd.swpInitial.hwndInsertBehind = HWND_TOP;
     1324        happ = WinStartApp(hwndNotify, &pgd, NULL, NULL, ulOptions);
     1325        free(parameters);
    13261326      }
    13271327    }
Note: See TracChangeset for help on using the changeset viewer.