Changeset 8588 for trunk/tools
- Timestamp:
- Jun 7, 2002, 2:58:14 PM (23 years ago)
- 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:07bird Exp $1 /* $Id: buildenv.cmd,v 1.9 2002-06-07 12:58:14 bird Exp $ 2 2 * 3 3 * This is the master tools environment script. It contains environment … … 83 83 aCfg.i.sId = 'toolkit45'; aCfg.i.sGrp = 'tlktos2'; aCfg.i.sSet = 'Toolkit45'; aCfg.i.sDesc = 'Toolkit v4.5'; i = i + 1; 84 84 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; 85 86 aCfg.i.sId = 'unix'; aCfg.i.sGrp = 'misc'; aCfg.i.sSet = 'Unix'; aCfg.i.sDesc = 'Misc unix stuff.'; i = i + 1; 86 87 aCfg.i.sId = 'vac308'; aCfg.i.sGrp = 'comp32'; aCfg.i.sSet = 'VAC308'; aCfg.i.sDesc = 'VisualAge for C++ v3.08'; i = i + 1; … … 111 112 */ 112 113 ch = substr(sEnv.i, length(sEnv.i), 1); 113 if (ch = '-' | ch = '+' | ch = '*' | ch = '!' | ch = ' @') then114 if (ch = '-' | ch = '+' | ch = '*' | ch = '!' | ch = '?') then 114 115 sEnv.i = substr(sEnv.i, 1, length(sEnv.i) - 1); 115 116 fRM = (ch = '-'); 116 117 fCfg = (ch = '*'); 117 118 fForcedCfg = (ch = '!'); 118 fVerify = (ch = ' @')119 fVerify = (ch = '?') 119 120 120 121 /* … … 751 752 aPath.i.sPId = 'toolkit45'; aPath.i.sPath = 'f:\toolkit45'; i = i + 1; 752 753 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;*/ 753 755 aPath.i.sPId = 'unixroot'; aPath.i.sPath = 'e:\unix'; i = i + 1; 754 756 aPath.i.sPId = 'xfree86'; aPath.i.sPath = 'e:\xfree86'; i = i + 1; … … 775 777 do 776 778 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; 778 780 aPath.i.sPId = 'emx'; aPath.i.sPath = 'e:\emx'; i = i + 1; 779 781 aPath.i.sPId = 'emxpgcc'; aPath.i.sPath = 'e:\emxpgcc'; i = i + 1; 780 782 /*aPath.i.sPId = 'db2v52'; aPath.i.sPath = 'e:\sqllib52'; i = i + 1; 781 783 aPath.i.sPId = 'icatgam'; aPath.i.sPath = 'e:\icatos2'; i = i + 1; 782 784 aPath.i.sPId = 'icatgam406rc1'; aPath.i.sPath = 'e:\icatos2.4.0.6.rc1'; i = i + 1; 783 785 aPath.i.sPId = 'icatpe'; aPath.i.sPath = 'e:\icatpe'; i = i + 1; 784 786 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; */ 786 788 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; */ 788 790 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; 790 792 aPath.i.sPId = 'mscv6-16'; aPath.i.sPath = 'e:\ddktools\toolkits\msc60'; i = i + 1; 791 793 /*aPath.i.sPId = 'mysql'; aPath.i.sPath = 'e:\mysql2'; i = i + 1; 792 794 aPath.i.sPId = 'netqos2'; aPath.i.sPath = 'e:\netqos2'; i = i + 1; 793 795 aPath.i.sPId = 'perl'; aPath.i.sPath = 'e:\perllib'; i = i + 1; … … 795 797 aPath.i.sPId = 'toolkit40'; aPath.i.sPath = 'e:\toolkit'; i = i + 1; 796 798 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; 798 801 aPath.i.sPId = 'unixroot'; aPath.i.sPath = 'e:\unix'; i = i + 1; 799 802 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 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;*/ 803 806 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;*/ 805 808 aPath.i.sPId = 'watcom11c'; aPath.i.sPath = 'e:\watcom11c'; i = i + 1; 806 809 aPath.i.sPId = 'testcase_drive_unused'; aPath.i.sPath = 't'; /* reqired */ i = i + 1; … … 2370 2373 2371 2374 2375 /* 2376 * OS/2 Programmers Toolkit v4.5.2 2377 */ 2378 Toolkit452: 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'); 2463 return rc; 2464 2465 2466 2372 2467 /** 2373 2468 * This will envolve into an full UNIX like environment some day perhaps...
Note:
See TracChangeset
for help on using the changeset viewer.