Changeset 10642 for trunk/tools


Ignore:
Timestamp:
Dec 18, 2005, 2:24:40 PM (20 years ago)
Author:
bird
Message:

added iscdebug, idebug and jitdbg. added forward-slash variant to the PATH of igcc.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/tools/bin/buildenv.cmd

    r10641 r10642  
    1 /* $Id: buildenv.cmd,v 1.57 2004-11-17 07:55:33 bird Exp $
     1/* $Id: buildenv.cmd,v 1.58 2005-12-18 13:24:40 bird Exp $
    22 *
    33 * This is the master tools environment script. It contains environment
    … …  
    1414 *     - Same goes for some other stuff, we have no stack of previous values.
    1515 *
    16  * Copyright (c) 1999-2002 knut st. osmundsen (bird@anduin.net)
     16 * Copyright (c) 1999-2005 knut st. osmundsen (bird@anduin.net)
    1717 *
    1818 * GPL v2
    … …  
    2727     * Version
    2828     */
    29     sVersion = '1.1.3 [2004-10-14]';
     29    sVersion = '1.1.4 [2005-12-18]';
    3030
    3131    /*
    … …  
    127127    aCfg.i.sId = 'ida414';          aCfg.i.sGrp = 'misc';       aCfg.i.sSet = 'IDA414';                 aCfg.i.sDesc = 'Interactive DisAssembler (IDA) v4.14'; i = i + 1;
    128128    aCfg.i.sId = 'idasdk';          aCfg.i.sGrp = 'misc';       aCfg.i.sSet = 'IDASDK';                 aCfg.i.sDesc = 'Interactive DisAssembler (IDA) SDK'; i = i + 1;
     129    aCfg.i.sId = 'icsdebug';        aCfg.i.sGrp = 'debugger';   aCfg.i.sSet = 'icsdebug';               aCfg.i.sDesc = 'icsdebug from VAC308'; i = i + 1;
     130    aCfg.i.sId = 'idebug';          aCfg.i.sGrp = 'debugger';   aCfg.i.sSet = 'idebug';                 aCfg.i.sDesc = 'idebug from VAC365'; i = i + 1;
    129131    aCfg.i.sId = 'java131';         aCfg.i.sGrp = 'java';       aCfg.i.sSet = 'Java131';                aCfg.i.sDesc = 'Java v1.3.1 (co131-20020710)'; i = i + 1;
     132    aCfg.i.sId = 'jitdbg';          aCfg.i.sGrp = 'debugger';   aCfg.i.sSet = 'jitdbg';                 aCfg.i.sDesc = 'jitdbg (secret)'; i = i + 1;
    130133    aCfg.i.sId = 'jpeg';            aCfg.i.sGrp = 'misc';       aCfg.i.sSet = 'JPEG';                   aCfg.i.sDesc = '(lib)JPEG v6b';             i = i + 1;
    131134    aCfg.i.sId = 'mode12050';       aCfg.i.sGrp = 'misc';       aCfg.i.sSet = 'Mode,120,50';            aCfg.i.sDesc = 'mode 120,50';               i = i + 1;
    … …  
    783786 */
    784787PathWrite: procedure expose aCfg. aPath.
    785 
    786788    sPathFile = PathGetFile();
    787789    call SysFileDelete(sPathFile);
    … …  
    21542156    call EnvAddFront fRM, 'DPATH',              sGCCBack'\lib;'
    21552157    /*call EnvAddFront fRM, 'HELP',               sGCCBack'\lib;'*/
    2156     call EnvAddFront fRM, 'PATH',               sGCCBack'\'sTrgt'\bin;'sGCCBack'\bin;'
     2158    call EnvAddFront fRM, 'PATH',               sGCCForw'\'sTrgt'\bin;'sGCCBack'\'sTrgt'\bin;'sGCCForw'\bin;'sGCCBack'\bin;'
    21572159    /*call EnvAddFront fRM, 'DPATH',              sGCCBack'\book;'
    21582160    call EnvAddFront fRM, 'BOOKSHELF',          sGCCBack'\book;'
    … …  
    25242526return 0;
    25252527
     2528/*
     2529 * icsdebug (IBM Visual Age for C++ v3.08 for OS/2)
     2530 */
     2531icsdebug: procedure expose aCfg. aPath.
     2532    parse arg sToolId,sOperation,fRM,fQuiet
     2533
     2534    /*
     2535     * icsdebug (IBM Visual Age for C++ Version 3.08) main directory.
     2536     */
     2537    sPath = PathQuery('icsdebug', sToolId, sOperation);
     2538    if (sPath = '') then
     2539        return 1;
     2540    /* If config operation we're done now. */
     2541    if (pos('config', sOperation) > 0) then
     2542        return 0;
     2543
     2544    /*
     2545     * Installing the environment variables.
     2546     */
     2547    call EnvSet      fRM, 'PATH_ICSDEBUG',  sPath
     2548
     2549    call EnvAddFront fRM, 'beginlibpath',   sPath'\DLL;'
     2550    call EnvAddFront fRM, 'path',           sPath'\BIN;'
     2551    call EnvAddFront fRM, 'dpath',          sPath'\HELP;'sPath';'sPath'\LOCALE;'
     2552
     2553    /*
     2554     * Verify.
     2555     */
     2556    if (pos('verify', sOperation) <= 0) then
     2557        return 0;
     2558    if (    \CfgVerifyFile(sPath'\bin\icsdebug.exe', fQuiet),
     2559        |   \CfgVerifyFile(sPath'\help\dde4.msg', fQuiet),
     2560        |   \CfgVerifyFile(sPath'\help\dde4lde.msg', fQuiet),
     2561        |   \CfgVerifyFile(sPath'\dll\cppibs30.dll', fQuiet),
     2562        |   \CfgVerifyFile(sPath'\dll\cppom30.dll', fQuiet),
     2563        |   \CfgVerifyFile(sPath'\dll\cppoob3.dll', fQuiet),
     2564        |   \CfgVerifyFile(sPath'\dll\cppood3.dll', fQuiet),
     2565        |   \CfgVerifyFile(sPath'\dll\cppoou3.dll', fQuiet),
     2566        |   \CfgVerifyFile(sPath'\dll\dde4brsc.dll', fQuiet),
     2567        |   \CfgVerifyFile(sPath'\dll\dde4cr.dll', fQuiet),
     2568        |   \CfgVerifyFile(sPath'\dll\dde4cx.dll', fQuiet),
     2569        |   \CfgVerifyFile(sPath'\dll\dde4dsl.dll', fQuiet),
     2570        |   \CfgVerifyFile(sPath'\dll\dde4lde.dll', fQuiet),
     2571        |   \CfgVerifyFile(sPath'\dll\dde4modl.dll', fQuiet),
     2572        |   \CfgVerifyFile(sPath'\dll\dde4mth.dll', fQuiet),
     2573        |   \CfgVerifyFile(sPath'\dll\dde4pmdb.dll', fQuiet),
     2574        |   \CfgVerifyFile(sPath'\dll\dde4prt.dll', fQuiet),
     2575        |   \CfgVerifyFile(sPath'\dll\dde4ress.dll', fQuiet),
     2576        |   \CfgVerifyFile(sPath'\dll\dde4tk.dll', fQuiet),
     2577        |   \CfgVerifyFile(sPath'\dll\dde4trib.dll', fQuiet),
     2578        ) then
     2579        return 2;
     2580return 0;
     2581
     2582
     2583/*
     2584 * idebug (Visual Age / C and C++ tools v3.6.5 for OS/2)
     2585 */
     2586idebug: procedure expose aCfg. aPath.
     2587    parse arg sToolId,sOperation,fRM,fQuiet
     2588
     2589    /*
     2590     * IBM C/C++ Compiler and Tools Version 3.6.5 main directory.
     2591     */
     2592    sPath    = PathQuery('idebug', sToolId, sOperation);
     2593    if (sPath = '') then
     2594        return 1;
     2595    /* If config operation we're done now. */
     2596    if (pos('config', sOperation) > 0) then
     2597        return 0;
     2598
     2599    /*
     2600     * Installing the environment variables.
     2601     */
     2602    call EnvSet      fRM, 'PATH_IDEBUG', sPath;
     2603
     2604    call EnvAddFront fRM, 'path',        sPath'\bin;'
     2605    call EnvAddFront fRM, 'dpath',       sPath'\local;'sPath'\help;'
     2606    call EnvAddFront fRM, 'beginlibpath',sPath'\dll;'
     2607
     2608    /*
     2609     * Verify.
     2610     */
     2611    if (pos('verify', sOperation) <= 0) then
     2612        return 0;
     2613    if (    \CfgVerifyFile(sPath'\bin\idebug.exe', fQuiet),
     2614        |   \CfgVerifyFile(sPath'\dll\cppbhg36.dll', fQuiet),
     2615        |   \CfgVerifyFile(sPath'\dll\cppbpg36.dll', fQuiet),
     2616        |   \CfgVerifyFile(sPath'\dll\cppddle1.dll', fQuiet),
     2617        |   \CfgVerifyFile(sPath'\dll\cppddpm1.dll', fQuiet),
     2618        |   \CfgVerifyFile(sPath'\dll\cppdfer1.dll', fQuiet),
     2619        |   \CfgVerifyFile(sPath'\dll\cppdfhp1.dll', fQuiet),
     2620        |   \CfgVerifyFile(sPath'\dll\cppdfiw1.dll', fQuiet),
     2621        |   \CfgVerifyFile(sPath'\dll\cppdfpw1.dll', fQuiet),
     2622        |   \CfgVerifyFile(sPath'\dll\cppdftk1.dll', fQuiet),
     2623        |   \CfgVerifyFile(sPath'\dll\cppdqmq1.dll', fQuiet),
     2624        |   \CfgVerifyFile(sPath'\dll\cppdrq1.dll', fQuiet),
     2625        |   \CfgVerifyFile(sPath'\dll\cppdrx1.dll', fQuiet),
     2626        |   \CfgVerifyFile(sPath'\dll\cppdtcp1.dll', fQuiet),
     2627        |   \CfgVerifyFile(sPath'\dll\cppdunf1.dll', fQuiet),
     2628        |   \CfgVerifyFile(sPath'\dll\cppdxcx1.dll', fQuiet),
     2629        |   \CfgVerifyFile(sPath'\dll\cppdxsm1.dll', fQuiet),
     2630        |   \CfgVerifyFile(sPath'\dll\cpprdi36.dll', fQuiet),
     2631        |   \CfgVerifyFile(sPath'\dll\cpprmi36.dll', fQuiet),
     2632        |   \CfgVerifyFile(sPath'\dll\cpptb30.dll', fQuiet),
     2633        |   \CfgVerifyFile(sPath'\dll\cpptd30.dll', fQuiet),
     2634        |   \CfgVerifyFile(sPath'\dll\cpptu30.dll', fQuiet),
     2635        |   \CfgVerifyFile(sPath'\dll\cppxb30.dll', fQuiet),
     2636        |   \CfgVerifyFile(sPath'\dll\cppxd30.dll', fQuiet),
     2637        |   \CfgVerifyFile(sPath'\dll\cppxm30.dll', fQuiet),
     2638        |   \CfgVerifyFile(sPath'\dll\cppxm36.dll', fQuiet),
     2639        |   \CfgVerifyFile(sPath'\dll\cppxu30.dll', fQuiet),
     2640        |   \CfgVerifyFile(sPath'\help\cppdmg1.msg', fQuiet),
     2641        |   \CfgVerifyFile(sPath'\msg\cppdcc1.cat', fQuiet),
     2642        ) then
     2643        return 2;
     2644return 0;
     2645
    25262646
    25272647/*
    … …  
    25772697        return 2;
    25782698
     2699return 0;
     2700
     2701
     2702/*
     2703 * jitdbg (secret)
     2704 */
     2705jitdbg: procedure expose aCfg. aPath.
     2706    parse arg sToolId,sOperation,fRM,fQuiet
     2707
     2708    /*
     2709     * IBM C/C++ Compiler and Tools Version 3.6.5 main directory.
     2710     */
     2711    sPath    = PathQuery('jitdbg', sToolId, sOperation);
     2712    if (sPath = '') then
     2713        return 1;
     2714    /* If config operation we're done now. */
     2715    if (pos('config', sOperation) > 0) then
     2716        return 0;
     2717
     2718    /*
     2719     * Installing the environment variables.
     2720     */
     2721    call EnvSet      fRM, 'PATH_JITDBG', sPath;
     2722
     2723    call EnvAddFront fRM, 'path',        sPath'\bin;'
     2724    call EnvAddFront fRM, 'dpath',       sPath'\msg;'sPath'\help;'
     2725    call EnvAddFront fRM, 'beginlibpath',sPath'\dll;'sPath'\extradlls;'
     2726    call EnvAddFront fRM, 'help',        sPath'\help;'
     2727
     2728    /*
     2729     * Verify.
     2730     */
     2731    if (pos('verify', sOperation) <= 0) then
     2732        return 0;
     2733    if (    \CfgVerifyFile(sPath'\bin\idbug.exe', fQuiet),
     2734        ) then
     2735        return 2;
    25792736return 0;
    25802737
Note: See TracChangeset for help on using the changeset viewer.