Changeset 8588 for trunk/tools


Ignore:
Timestamp:
Jun 7, 2002, 2:58:14 PM (23 years ago)
Author:
bird
Message:

Added toolkit452. Corrected bird work defaults.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tools/bin/buildenv.cmd

    r8583 r8588  
    1 /* $Id: buildenv.cmd,v 1.8 2002-06-07 01:37:07 bird Exp $
     1/* $Id: buildenv.cmd,v 1.9 2002-06-07 12:58:14 bird Exp $
    22 *
    33 * This is the master tools environment script. It contains environment
     
    8383    aCfg.i.sId = 'toolkit45';       aCfg.i.sGrp = 'tlktos2';    aCfg.i.sSet = 'Toolkit45';              aCfg.i.sDesc = 'Toolkit v4.5'; i = i + 1;
    8484    aCfg.i.sId = 'toolkit451';      aCfg.i.sGrp = 'tlktos2';    aCfg.i.sSet = 'Toolkit451';             aCfg.i.sDesc = 'Toolkit v4.5.1'; i = i + 1;
     85    aCfg.i.sId = 'toolkit452';      aCfg.i.sGrp = 'tlktos2';    aCfg.i.sSet = 'Toolkit452';             aCfg.i.sDesc = 'Toolkit v4.5.2'; i = i + 1;
    8586    aCfg.i.sId = 'unix';            aCfg.i.sGrp = 'misc';       aCfg.i.sSet = 'Unix';                   aCfg.i.sDesc = 'Misc unix stuff.'; i = i + 1;
    8687    aCfg.i.sId = 'vac308';          aCfg.i.sGrp = 'comp32';     aCfg.i.sSet = 'VAC308';                 aCfg.i.sDesc = 'VisualAge for C++ v3.08'; i = i + 1;
     
    111112         */
    112113        ch = substr(sEnv.i, length(sEnv.i), 1);
    113         if (ch = '-' | ch = '+' | ch = '*' | ch = '!' | ch = '@') then
     114        if (ch = '-' | ch = '+' | ch = '*' | ch = '!' | ch = '?') then
    114115            sEnv.i = substr(sEnv.i, 1, length(sEnv.i) - 1);
    115116        fRM = (ch = '-');
    116117        fCfg = (ch = '*');
    117118        fForcedCfg = (ch = '!');
    118         fVerify = (ch = '@')
     119        fVerify = (ch = '?')
    119120
    120121        /*
     
    751752        aPath.i.sPId = 'toolkit45';                 aPath.i.sPath = 'f:\toolkit45';                 i = i + 1;
    752753        aPath.i.sPId = 'toolkit451';                aPath.i.sPath = 'f:\toolkit451';                i = i + 1;
     754      /*aPath.i.sPId = 'toolkit452';                aPath.i.sPath = 'f:\toolkit452';                i = i + 1;*/
    753755        aPath.i.sPId = 'unixroot';                  aPath.i.sPath = 'e:\unix';                      i = i + 1;
    754756        aPath.i.sPId = 'xfree86';                   aPath.i.sPath = 'e:\xfree86';                   i = i + 1;
     
    775777    do
    776778        say 'Info: No or empty path file, using birds work defaults.';
    777         aPath.i.sPId = 'cvs';                       aPath.i.sPath = 'e:\cvs';                       i = i + 1;
     779        aPath.i.sPId = 'cvs';                       aPath.i.sPath = 'e:\cvs111';                    i = i + 1;
    778780        aPath.i.sPId = 'emx';                       aPath.i.sPath = 'e:\emx';                       i = i + 1;
    779781        aPath.i.sPId = 'emxpgcc';                   aPath.i.sPath = 'e:\emxpgcc';                   i = i + 1;
    780         aPath.i.sPId = 'db2v52';                    aPath.i.sPath = 'e:\sqllib52';                  i = i + 1;
     782      /*aPath.i.sPId = 'db2v52';                    aPath.i.sPath = 'e:\sqllib52';                  i = i + 1;
    781783        aPath.i.sPId = 'icatgam';                   aPath.i.sPath = 'e:\icatos2';                   i = i + 1;
    782784        aPath.i.sPId = 'icatgam406rc1';             aPath.i.sPath = 'e:\icatos2.4.0.6.rc1';         i = i + 1;
    783785        aPath.i.sPId = 'icatpe';                    aPath.i.sPath = 'e:\icatpe';                    i = i + 1;
    784786        aPath.i.sPId = 'ida38';                     aPath.i.sPath = 'e:\ida38';                     i = i + 1;
    785         aPath.i.sPId = 'ida40';                     aPath.i.sPath = 'e:\ida401';                    i = i + 1;
     787        aPath.i.sPId = 'ida40';                     aPath.i.sPath = 'e:\ida401';                    i = i + 1; */
    786788        aPath.i.sPId = 'ida414';                    aPath.i.sPath = 'e:\ida414';                    i = i + 1;
    787         aPath.i.sPId = 'idasdk';                    aPath.i.sPath = 'e:\idasdk';                    i = i + 1;
     789      /*aPath.i.sPId = 'idasdk';                    aPath.i.sPath = 'e:\idasdk';                    i = i + 1; */
    788790        aPath.i.sPId = 'ddkbase';                   aPath.i.sPath = 'e:\ddk\base';                  i = i + 1;
    789         aPath.i.sPId = 'home';                      aPath.i.sPath = 'e:\user\kso';                  i = i + 1;
     791        aPath.i.sPId = 'home';                      aPath.i.sPath = 'x:\home';                      i = i + 1;
    790792        aPath.i.sPId = 'mscv6-16';                  aPath.i.sPath = 'e:\ddktools\toolkits\msc60';   i = i + 1;
    791         aPath.i.sPId = 'mysql';                     aPath.i.sPath = 'e:\mysql2';                    i = i + 1;
     793      /*aPath.i.sPId = 'mysql';                     aPath.i.sPath = 'e:\mysql2';                    i = i + 1;
    792794        aPath.i.sPId = 'netqos2';                   aPath.i.sPath = 'e:\netqos2';                   i = i + 1;
    793795        aPath.i.sPId = 'perl';                      aPath.i.sPath = 'e:\perllib';                   i = i + 1;
     
    795797        aPath.i.sPId = 'toolkit40';                 aPath.i.sPath = 'e:\toolkit';                   i = i + 1;
    796798        aPath.i.sPId = 'toolkit45';                 aPath.i.sPath = 'e:\toolkit45';                 i = i + 1;
    797         aPath.i.sPId = 'toolkit451';                aPath.i.sPath = 'e:\toolkit451';                i = i + 1;
     799        aPath.i.sPId = 'toolkit451';                aPath.i.sPath = 'e:\toolkit451';                i = i + 1; */
     800        aPath.i.sPId = 'toolkit452';                aPath.i.sPath = 'e:\toolkit452';                i = i + 1;
    798801        aPath.i.sPId = 'unixroot';                  aPath.i.sPath = 'e:\unix';                      i = i + 1;
    799802        aPath.i.sPId = 'xfree86';                   aPath.i.sPath = 'e:\xfree86';                   i = i + 1;
    800         aPath.i.sPId = 'vac308';                    aPath.i.sPath = 'e:\ibmcpp';                    i = i + 1;
    801         aPath.i.sPId = 'vac365';                    aPath.i.sPath = 'e:\ibmcxxo';                   i = i + 1;
    802         aPath.i.sPId = 'vac40';                     aPath.i.sPath = 'e:\ibmcpp40';                  i = i + 1;
     803        aPath.i.sPId = 'vac308';                    aPath.i.sPath = 'e:\ibmcpp308';                 i = i + 1;
     804      /*aPath.i.sPId = 'vac365';                    aPath.i.sPath = 'e:\ibmcxxo';                   i = i + 1;
     805        aPath.i.sPId = 'vac40';                     aPath.i.sPath = 'e:\ibmcpp40';                  i = i + 1;*/
    803806        aPath.i.sPId = 'warpin';                    aPath.i.sPath = 'e:\warpin';                    i = i + 1;
    804         aPath.i.sPId = 'watcom11';                  aPath.i.sPath = 'e:\watcom';                    i = i + 1;
     807      /*aPath.i.sPId = 'watcom11';                  aPath.i.sPath = 'e:\watcom';                    i = i + 1;*/
    805808        aPath.i.sPId = 'watcom11c';                 aPath.i.sPath = 'e:\watcom11c';                 i = i + 1;
    806809        aPath.i.sPId = 'testcase_drive_unused';     aPath.i.sPath = 't'; /* reqired */              i = i + 1;
     
    23702373
    23712374
     2375/*
     2376 * OS/2 Programmers Toolkit v4.5.2
     2377 */
     2378Toolkit452: procedure expose aCfg. aPath. sPathFile
     2379    parse arg sToolId,sOperation,fRM,fQuiet
     2380
     2381    /*
     2382     * Toolkit (4.5.1) main directory.
     2383     */
     2384     sPathTK    = PathQuery('toolkit452', sToolId, sOperation);
     2385    if (sPathTK = '') then
     2386        return 1;
     2387    /* If config operation we're done now. */
     2388    if (pos('config', sOperation) > 0) then
     2389        return 0;
     2390
     2391    /*
     2392     * Installing the environment variables.
     2393     */
     2394    call EnvSet      fRM, 'PATH_TOOLKIT',  sPathTK;
     2395    call EnvAddFront fRM, 'path',        sPathTK'\bin;'sPathTK'\som\common;'sPathTK'\som\bin'
     2396    call EnvAddFront fRM, 'dpath',       sPathTK'\msg;'sPathTK'\book;'sPathTK'\SOM\COMMON\SYSTEM;'sPathTK'\SOM\MSG;'
     2397    call EnvAddFront fRM, 'beginlibpath', sPathTK'\dll;'sPathTK'\som\common\dll;'sPathTK'\som\lib;'
     2398    call EnvAddFront fRM, 'help',        sPathTK'\help;'
     2399    call EnvAddFront fRM, 'bookshelf',   sPathTK'\book;'sPathTK'\archived;'
     2400    call EnvAddFront fRM, 'somir',       sPathTK'\SOM\COMMON\ETC\214\SOM.IR;'
     2401    call EnvAddEnd   fRM, 'somir',       sPathTK'\SAMPLES\REXX\SOM\ANIMAL\ORXSMP.IR;'
     2402    call EnvAddFront fRM, 'nlspath',     sPathTK'\msg\%N;'
     2403    call EnvAddEnd   fRM, 'ulspath',     sPathTK'\language;'
     2404    call EnvAddFront fRM, 'include',     sPathTK'\H\ARPA;'sPathTK'\H\NET;'sPathTK'\H\NETINET;'sPathTK'\H\NETNB;'sPathTK'\H\RPC;'sPathTK'\SPEECH\H;'sPathTK'\H\GL;'sPathTK'\H;'sPathTK'\SOM\INCLUDE;'sPathTK'\INC;'
     2405    call EnvAddFront fRM, 'lib',         sPathTK'\lib;'
     2406    call EnvAddEnd   fRM, 'lib',         sPathTK'\SAMPLES\MM\LIB;'sPathTK'\SPEECH\LIB;'
     2407    call EnvAddFront fRM, 'helpndx',     'EPMKWHLP.NDX+', '+'
     2408    call EnvAddFront fRM, 'ipfc',        sPathTK'\ipfc;'
     2409    call EnvSet      fRM, 'sombase',     sPathTK'\SOM'
     2410    call EnvSet      fRM, 'somruntime',  sPathTK'\SOM\COMMON'
     2411    call EnvSet      fRM, 'LANG',        'en_us'
     2412
     2413    call EnvSet      fRM, 'CPREF',       'CP1.INF+CP2.INF+CP3.INF'
     2414    call EnvSet      fRM, 'GPIREF',      'GPI1.INF+GPI2.INF+GPI3.INF+GPI4.INF'
     2415    call EnvSet      fRM, 'MMREF',       'MMREF1.INF+MMREF2.INF+MMREF3.INF'
     2416    call EnvSet      fRM, 'PMREF',       'PM1.INF+PM2.INF+PM3.INF+PM4.INF+PM5.INF'
     2417    call EnvSet      fRM, 'WPSREF',      'WPS1.INF+WPS2.INF+WPS3.INF'
     2418    call EnvAddFront fRM, 'sminclude',   sPathTK'\H;'sPathTK'\IDL;'sPathTK'\SOM\INCLUDE;.;'
     2419    call EnvSet      fRM, 'smaddstar',   '1'
     2420    call EnvSet      fRM, 'smemit',      'h;ih;c'
     2421    call EnvSet      fRM, 'smtmp',       EnvGet('tmp');
     2422    call EnvSet      fRM, 'smclasses',   'WPTYPES.IDL'
     2423    /*
     2424    call EnvSet      fRM, 'CAT_MACHINE', 'COM1:57600'
     2425    call EnvSet      fRM, 'CAT_HOST_BIN_PATH', TKMAIN'\BIN'
     2426    call EnvSet      fRM, 'CAT_COMMUNICATION_TYPE', 'ASYNC_SIGBRK'
     2427    call EnvSet      fRM, 'CAT_HOST_SOURCE_PATH',TKMAIN'\BIN;'
     2428    */
     2429
     2430    /*
     2431     * Verify.
     2432     */
     2433    if (pos('verify', sOperation) <= 0) then
     2434        return 0;
     2435    if (    \CfgVerifyFile(sPathTK'\bin\alp.exe', fQuiet),
     2436        |   \CfgVerifyFile(sPathTK'\bin\rc.exe', fQuiet),
     2437        |   \CfgVerifyFile(sPathTK'\bin\ipfc.exe', fQuiet),
     2438        |   \CfgVerifyFile(sPathTK'\bin\implib.exe', fQuiet),
     2439        |   \CfgVerifyFile(sPathTK'\bin\mkmsgf.exe', fQuiet),
     2440        |   \CfgVerifyFile(sPathTK'\bin\mapsym.exe', fQuiet),
     2441        |   \CfgVerifyFile(sPathTK'\bin\nmake.exe', fQuiet),
     2442        |   \CfgVerifyFile(sPathTK'\bin\nmake32.exe', fQuiet),
     2443        |   \CfgVerifyFile(sPathTK'\lib\os2386.lib', fQuiet),
     2444        |   \CfgVerifyFile(sPathTK'\lib\pmbidi.lib', fQuiet),
     2445        |   \CfgVerifyFile(sPathTK'\lib\tcpip32.lib', fQuiet),
     2446        |   \CfgVerifyFile(sPathTK'\h\os2.h', fQuiet),
     2447        |   \CfgVerifyFile(sPathTK'\h\os2win.h', fQuiet),
     2448        |   \CfgVerifyFile(sPathTK'\h\stack16\pmwsock.h', fQuiet),
     2449        |   \CfgVerifyFile(sPathTK'\som\bin\sc.exe', fQuiet),
     2450        ) then
     2451        return 2;
     2452    rc = CheckCmdOutput('syslevel '||sPathTK||'\bin', 0, fQuiet, 'IBM OS/2 Developer''s Toolkit Version 4.5'||'0d0a'x||'Version 4.50.2     Component ID 5639F9300');
     2453    if (rc = 0) then
     2454        rc = CheckCmdOutput('sc -V', -1, fQuiet, '", Version: 2.54.');
     2455    if (rc = 0) then
     2456        rc = CheckCmdOutput('rc', 1, fQuiet, 'Version 4.00.011 Oct 04 2001');
     2457    if (rc = 0) then
     2458        rc = CheckCmdOutput('ipfc', 0, fQuiet, 'Version 4.00.007 Oct 02 2000');
     2459    if (rc = 0) then
     2460        rc = CheckCmdOutput('nmake -?', 0, fQuiet, 'Version 4.00.001 Oct  4 2001');
     2461    if (rc = 0) then
     2462        rc = CheckCmdOutput('nmake32 -?', 0, fQuiet, 'Version 5.00.003 Oct  4 2001');
     2463return rc;
     2464
     2465
     2466
    23722467/**
    23732468 * This will envolve into an full UNIX like environment some day perhaps...
Note: See TracChangeset for help on using the changeset viewer.