source: trunk/tools/ahci.wis@ 211

Last change on this file since 211 was 211, checked in by David Azarewicz, 2 years ago

Added workaround to help with VirtualBox issues.
Improved diagnostic messages.
Changed how timeouts are reset and how ctx hooks are triggered.
Added quirk for devices with issues executing some standard commands.
Changed to make /N the default.

File size: 2.7 KB
Line 
1<WARPIN VERSION="1.0.15" OS="os2_45x">
2 <HEAD>
3 <TITLE>=("TITLE")</TITLE>
4 <REXX NAME=TITLE>
5 Call Rxfuncadd 'SysLoadFuncs','RexxUtil','SysLoadFuncs';
6 Call SysLoadFuncs;
7 MyTitle="AHCI Driver for OS/2";
8
9 BootDrive = SysBootDrive();
10 ConfigSys = BootDrive||'\config.sys';
11 OsDir=VALUE('OSDIR',,'OS2ENVIRONMENT');
12 if (OsDir='') then OsDir='?:\OS2';
13 OsDocTarget='TARGET="'||OsDir||'\DOC\AHCI" LONGFILENAMES SELECT';
14 if (TRANSLATE(RIGHT(OsDir,3))='OS2') then do
15 OsAppTarget='TARGET="'||OsDir||'\APPS" LONGFILENAMES SELECT';
16 end
17 else do
18 OsAppTarget='TARGET="'||OsDir||'\BIN" LONGFILENAMES SELECT';
19 end
20
21 /* find AHCI line, if any */
22 SearchString='BASEDEV=OS2AHCI.ADD';
23 If (SysFileSearch(SearchString,ConfigSys,'test.') \= 0) then test.0 = 0;
24 ahci_ln = 0;
25 do i = 1 to test.0
26 If (TRANSLATE(WORD(test.i, 1)) \= SearchString) then iterate;
27 ahci_ln = i;
28 leave;
29 end
30
31 /* find Dani line, if any */
32 SearchString='BASEDEV=DANIS506.ADD';
33 If (SysFileSearch(SearchString,ConfigSys,'test.') \= 0) then test.0 = 0;
34 dani_ln = 0;
35 do i = 1 to test.0
36 If (TRANSLATE(WORD(test.i, 1)) \= SearchString) then iterate;
37 dani_ln = i;
38 leave;
39 end
40
41 ConfigSysModify = '';
42 if (ahci_ln=0) then do
43 if (dani_ln=0) then do
44 ConfigSysModify='CONFIGSYS="BASEDEV=OS2AHCI.ADD | UNIQUE(OS2AHCI.ADD) ADDTOP"';
45 end
46 else do
47 ConfigSysModify='CONFIGSYS="BASEDEV=OS2AHCI.ADD | UNIQUE(OS2AHCI.ADD) ADDBEFORE(DANIS506.ADD)"';
48 end
49 end
50
51 rc = WirexxPutEnv('MyTitle',MyTitle);
52 rc = WirexxPutEnv('ConfigSysModify',ConfigSysModify);
53 rc = WirexxPutEnv('OsAppTarget',OsAppTarget);
54 rc = WirexxPutEnv('OsDocTarget',OsDocTarget);
55
56 Return MyTitle;
57 </REXX>
58 <REXX NAME=GetEnv>
59 Parse Arg EnvVar .
60 Return WirexxGetEnv(EnvVar);
61 </REXX>
62
63 <PCK INDEX=1 PACKAGEID="Arca Noae\AHCI\Driver\X\X\X"
64 TITLE="AHCI Driver"
65 TARGET="?:\OS2\BOOT" FIXED LONGFILENAMES SELECT
66 =("GetEnv ConfigSysModify")
67 >The AHCI Driver
68 </PCK>
69
70 <PCK INDEX=20 PACKAGEID="Arca Noae\AHCI\Documentation\X\X\X"
71 TITLE="AHCI Documentation"
72 =("GetEnv OsDocTarget")
73 >ReadMe and License
74 </PCK>
75</HEAD>
76 <BODY>
77 <PAGE INDEX=1 TYPE=README>
78 <TEXT>Welcome to the =("GetEnv MyTitle")</TEXT>
79 <README EXTRACTFROMPCK="20" FORMAT="PLAIN">ReadMe.txt</README>
80 </PAGE>
81 <PAGE INDEX=2 TYPE=CONTAINER>
82 <TEXT>Select the packages you want to install.
83 </TEXT>
84 </PAGE>
85 <PAGE INDEX=3 TYPE=CONFIGURE>
86 <TEXT>Press "Install" to begin installing this archive.</TEXT>
87 <NEXTBUTTON TARGET=0>I~nstall</NEXTBUTTON>
88 </PAGE>
89 </BODY>
90</WARPIN>
Note: See TracBrowser for help on using the repository browser.