/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU1.DMS / in.adf / Includes / dos / filehandler.bb2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 00 3b 20 24 56 45 52 | 3a 20 66 69 6c 65 68 61 |;.; $VER|: fileha|
|00000010| 6e 64 6c 65 72 2e 62 62 | 32 20 34 30 2e 30 20 28 |ndler.bb|2 40.0 (|
|00000020| 32 38 2e 30 32 2e 39 34 | 29 00 3b 00 00 80 12 20 |28.02.94|).;.... |
|00000030| 22 65 78 65 63 2f 70 6f | 72 74 73 2e 62 62 32 22 |"exec/po|rts.bb2"|
|00000040| 00 00 80 12 20 22 64 6f | 73 2f 64 6f 73 2e 62 62 |.... "do|s/dos.bb|
|00000050| 32 22 00 00 3b 2f 2a 20 | 54 68 65 20 64 69 73 6b |2"..;/* |The disk|
|00000060| 20 22 65 6e 76 69 72 6f | 6e 6d 65 6e 74 22 20 69 | "enviro|nment" i|
|00000070| 73 20 61 20 6c 6f 6e 67 | 77 6f 72 64 20 61 72 72 |s a long|word arr|
|00000080| 61 79 20 74 68 61 74 20 | 64 65 73 63 72 69 62 65 |ay that |describe|
|00000090| 73 20 74 68 65 00 3b 20 | 2a 20 64 69 73 6b 20 67 |s the.; |* disk g|
|000000a0| 65 6f 6d 65 74 72 79 2e | 20 20 49 74 20 69 73 20 |eometry.|  It is |
|000000b0| 76 61 72 69 61 62 6c 65 | 20 73 69 7a 65 64 2c 20 |variable| sized, |
|000000c0| 77 69 74 68 20 74 68 65 | 20 6c 65 6e 67 74 68 20 |with the| length |
|000000d0| 61 74 20 74 68 65 20 62 | 65 67 69 6e 6e 69 6e 67 |at the b|eginning|
|000000e0| 2e 00 3b 20 2a 20 48 65 | 72 65 20 61 72 65 20 74 |..; * He|re are t|
|000000f0| 68 65 20 63 6f 6e 73 74 | 61 6e 74 73 20 66 6f 72 |he const|ants for|
|00000100| 20 61 20 73 74 61 6e 64 | 61 72 64 20 67 65 6f 6d | a stand|ard geom|
|00000110| 65 74 72 79 2e 00 3b 20 | 2a 2f 00 00 80 01 2e 44 |etry..; |*/.....D|
|00000120| 6f 73 45 6e 76 65 63 00 | 64 65 5f 54 61 62 6c 65 |osEnvec.|de_Table|
|00000130| 53 69 7a 65 2e 6c 20 3b | 2f 2a 20 53 69 7a 65 20 |Size.l ;|/* Size |
|00000140| 6f 66 20 45 6e 76 69 72 | 6f 6e 6d 65 6e 74 20 76 |of Envir|onment v|
|00000150| 65 63 74 6f 72 20 2a 2f | 00 64 65 5f 53 69 7a 65 |ector */|.de_Size|
|00000160| 42 6c 6f 63 6b 2e 6c 20 | 3b 2f 2a 20 69 6e 20 6c |Block.l |;/* in l|
|00000170| 6f 6e 67 77 6f 72 64 73 | 3a 20 73 74 61 6e 64 61 |ongwords|: standa|
|00000180| 72 64 20 76 61 6c 75 65 | 20 69 73 20 31 32 38 20 |rd value| is 128 |
|00000190| 2a 2f 00 64 65 5f 53 65 | 63 4f 72 67 2e 6c 20 3b |*/.de_Se|cOrg.l ;|
|000001a0| 2f 2a 20 6e 6f 74 20 75 | 73 65 64 3b 20 6d 75 73 |/* not u|sed; mus|
|000001b0| 74 20 62 65 20 30 20 2a | 2f 00 64 65 5f 53 75 72 |t be 0 *|/.de_Sur|
|000001c0| 66 61 63 65 73 2e 6c 20 | 3b 2f 2a 20 23 20 6f 66 |faces.l |;/* # of|
|000001d0| 20 68 65 61 64 73 20 28 | 73 75 72 66 61 63 65 73 | heads (|surfaces|
|000001e0| 29 2e 20 64 72 69 76 65 | 20 73 70 65 63 69 66 69 |). drive| specifi|
|000001f0| 63 20 2a 2f 00 64 65 5f | 53 65 63 74 6f 72 50 65 |c */.de_|SectorPe|
|00000200| 72 42 6c 6f 63 6b 2e 6c | 20 3b 2f 2a 20 6e 6f 74 |rBlock.l| ;/* not|
|00000210| 20 75 73 65 64 3b 20 6d | 75 73 74 20 62 65 20 31 | used; m|ust be 1|
|00000220| 20 2a 2f 00 64 65 5f 42 | 6c 6f 63 6b 73 50 65 72 | */.de_B|locksPer|
|00000230| 54 72 61 63 6b 2e 6c 20 | 3b 2f 2a 20 62 6c 6f 63 |Track.l |;/* bloc|
|00000240| 6b 73 20 70 65 72 20 74 | 72 61 63 6b 2e 20 64 72 |ks per t|rack. dr|
|00000250| 69 76 65 20 73 70 65 63 | 69 66 69 63 20 2a 2f 00 |ive spec|ific */.|
|00000260| 64 65 5f 52 65 73 65 72 | 76 65 64 2e 6c 20 3b 2f |de_Reser|ved.l ;/|
|00000270| 2a 20 44 4f 53 20 72 65 | 73 65 72 76 65 64 20 62 |* DOS re|served b|
|00000280| 6c 6f 63 6b 73 20 61 74 | 20 73 74 61 72 74 20 6f |locks at| start o|
|00000290| 66 20 70 61 72 74 69 74 | 69 6f 6e 2e 20 2a 2f 00 |f partit|ion. */.|
|000002a0| 64 65 5f 50 72 65 41 6c | 6c 6f 63 2e 6c 20 3b 2f |de_PreAl|loc.l ;/|
|000002b0| 2a 20 44 4f 53 20 72 65 | 73 65 72 76 65 64 20 62 |* DOS re|served b|
|000002c0| 6c 6f 63 6b 73 20 61 74 | 20 65 6e 64 20 6f 66 20 |locks at| end of |
|000002d0| 70 61 72 74 69 74 69 6f | 6e 20 2a 2f 00 64 65 5f |partitio|n */.de_|
|000002e0| 49 6e 74 65 72 6c 65 61 | 76 65 2e 6c 20 3b 2f 2a |Interlea|ve.l ;/*|
|000002f0| 20 75 73 75 61 6c 6c 79 | 20 30 20 2a 2f 00 64 65 | usually| 0 */.de|
|00000300| 5f 4c 6f 77 43 79 6c 2e | 6c 20 3b 2f 2a 20 73 74 |_LowCyl.|l ;/* st|
|00000310| 61 72 74 69 6e 67 20 63 | 79 6c 69 6e 64 65 72 2e |arting c|ylinder.|
|00000320| 20 74 79 70 69 63 61 6c | 6c 79 20 30 20 2a 2f 00 | typical|ly 0 */.|
|00000330| 64 65 5f 48 69 67 68 43 | 79 6c 2e 6c 20 3b 2f 2a |de_HighC|yl.l ;/*|
|00000340| 20 6d 61 78 20 63 79 6c | 69 6e 64 65 72 2e 20 64 | max cyl|inder. d|
|00000350| 72 69 76 65 20 73 70 65 | 63 69 66 69 63 20 2a 2f |rive spe|cific */|
|00000360| 00 64 65 5f 4e 75 6d 42 | 75 66 66 65 72 73 2e 6c |.de_NumB|uffers.l|
|00000370| 20 3b 2f 2a 20 49 6e 69 | 74 69 61 6c 20 23 20 44 | ;/* Ini|tial # D|
|00000380| 4f 53 20 6f 66 20 62 75 | 66 66 65 72 73 2e 20 20 |OS of bu|ffers.  |
|00000390| 2a 2f 00 64 65 5f 42 75 | 66 4d 65 6d 54 79 70 65 |*/.de_Bu|fMemType|
|000003a0| 2e 6c 20 3b 2f 2a 20 74 | 79 70 65 20 6f 66 20 6d |.l ;/* t|ype of m|
|000003b0| 65 6d 20 74 6f 20 61 6c | 6c 6f 63 61 74 65 20 66 |em to al|locate f|
|000003c0| 6f 72 20 62 75 66 66 65 | 72 73 20 2a 2f 00 64 65 |or buffe|rs */.de|
|000003d0| 5f 4d 61 78 54 72 61 6e | 73 66 65 72 2e 6c 20 3b |_MaxTran|sfer.l ;|
|000003e0| 2f 2a 20 4d 61 78 20 6e | 75 6d 62 65 72 20 6f 66 |/* Max n|umber of|
|000003f0| 20 62 79 74 65 73 20 74 | 6f 20 74 72 61 6e 73 66 | bytes t|o transf|
|00000400| 65 72 20 61 74 20 61 20 | 74 69 6d 65 20 2a 2f 00 |er at a |time */.|
|00000410| 64 65 5f 4d 61 73 6b 2e | 6c 20 3b 2f 2a 20 41 64 |de_Mask.|l ;/* Ad|
|00000420| 64 72 65 73 73 20 4d 61 | 73 6b 20 74 6f 20 62 6c |dress Ma|sk to bl|
|00000430| 6f 63 6b 20 6f 75 74 20 | 63 65 72 74 61 69 6e 20 |ock out |certain |
|00000440| 6d 65 6d 6f 72 79 20 2a | 2f 00 64 65 5f 42 6f 6f |memory *|/.de_Boo|
|00000450| 74 50 72 69 2e 6c 20 3b | 2f 2a 20 42 6f 6f 74 20 |tPri.l ;|/* Boot |
|00000460| 70 72 69 6f 72 69 74 79 | 20 66 6f 72 20 61 75 74 |priority| for aut|
|00000470| 6f 62 6f 6f 74 20 2a 2f | 00 64 65 5f 44 6f 73 54 |oboot */|.de_DosT|
|00000480| 79 70 65 2e 6c 20 3b 2f | 2a 20 41 53 43 49 49 20 |ype.l ;/|* ASCII |
|00000490| 28 48 45 58 29 20 73 74 | 72 69 6e 67 20 73 68 6f |(HEX) st|ring sho|
|000004a0| 77 69 6e 67 20 66 69 6c | 65 73 79 73 74 65 6d 20 |wing fil|esystem |
|000004b0| 74 79 70 65 3b 00 3b 20 | 20 20 20 20 20 20 20 20 |type;.; |        |
|000004c0| 20 20 2a 20 30 58 34 34 | 34 46 35 33 30 30 20 69 |  * 0X44|4F5300 i|
|000004d0| 73 20 6f 6c 64 20 66 69 | 6c 65 73 79 73 74 65 6d |s old fi|lesystem|
|000004e0| 2c 00 3b 20 20 20 20 20 | 20 20 20 20 20 20 2a 20 |,.;     |      * |
|000004f0| 30 58 34 34 34 46 35 33 | 30 31 20 69 73 20 66 61 |0X444F53|01 is fa|
|00000500| 73 74 20 66 69 6c 65 20 | 73 79 73 74 65 6d 20 2a |st file |system *|
|00000510| 2f 00 64 65 5f 42 61 75 | 64 2e 6c 20 3b 2f 2a 20 |/.de_Bau|d.l ;/* |
|00000520| 42 61 75 64 20 72 61 74 | 65 20 66 6f 72 20 73 65 |Baud rat|e for se|
|00000530| 72 69 61 6c 20 68 61 6e | 64 6c 65 72 20 2a 2f 00 |rial han|dler */.|
|00000540| 64 65 5f 43 6f 6e 74 72 | 6f 6c 2e 6c 20 3b 2f 2a |de_Contr|ol.l ;/*|
|00000550| 20 43 6f 6e 74 72 6f 6c | 20 77 6f 72 64 20 66 6f | Control| word fo|
|00000560| 72 20 68 61 6e 64 6c 65 | 72 2f 66 69 6c 65 73 79 |r handle|r/filesy|
|00000570| 73 74 65 6d 20 2a 2f 00 | 64 65 5f 42 6f 6f 74 42 |stem */.|de_BootB|
|00000580| 6c 6f 63 6b 73 2e 6c 20 | 3b 2f 2a 20 4e 75 6d 62 |locks.l |;/* Numb|
|00000590| 65 72 20 6f 66 20 62 6c | 6f 63 6b 73 20 63 6f 6e |er of bl|ocks con|
|000005a0| 74 61 69 6e 69 6e 67 20 | 62 6f 6f 74 20 63 6f 64 |taining |boot cod|
|000005b0| 65 20 2a 2f 00 80 02 20 | 80 01 00 00 3b 2f 2a 20 |e */... |....;/* |
|000005c0| 74 68 65 73 65 20 61 72 | 65 20 74 68 65 20 6f 66 |these ar|e the of|
|000005d0| 66 73 65 74 73 20 69 6e | 74 6f 20 74 68 65 20 61 |fsets in|to the a|
|000005e0| 72 72 61 79 20 2a 2f 00 | 3b 2f 2a 20 44 45 5f 54 |rray */.|;/* DE_T|
|000005f0| 41 42 4c 45 53 49 5a 45 | 20 69 73 20 73 65 74 20 |ABLESIZE| is set |
|00000600| 74 6f 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 |to the n|umber of|
|00000610| 20 6c 6f 6e 67 77 6f 72 | 64 73 20 69 6e 20 74 68 | longwor|ds in th|
|00000620| 65 20 74 61 62 6c 65 20 | 6d 69 6e 75 73 20 31 20 |e table |minus 1 |
|00000630| 2a 2f 00 00 23 44 45 5f | 54 41 42 4c 45 53 49 5a |*/..#DE_|TABLESIZ|
|00000640| 45 3d 30 3b 2f 2a 20 6d | 69 6e 69 6d 75 6d 20 76 |E=0;/* m|inimum v|
|00000650| 61 6c 75 65 20 69 73 20 | 31 31 20 28 69 6e 63 6c |alue is |11 (incl|
|00000660| 75 64 65 73 20 4e 75 6d | 42 75 66 66 65 72 73 29 |udes Num|Buffers)|
|00000670| 20 2a 2f 00 23 44 45 5f | 53 49 5a 45 42 4c 4f 43 | */.#DE_|SIZEBLOC|
|00000680| 4b 3d 31 3b 2f 2a 20 69 | 6e 20 6c 6f 6e 67 77 6f |K=1;/* i|n longwo|
|00000690| 72 64 73 3a 20 73 74 61 | 6e 64 61 72 64 20 76 61 |rds: sta|ndard va|
|000006a0| 6c 75 65 20 69 73 20 31 | 32 38 20 2a 2f 00 23 44 |lue is 1|28 */.#D|
|000006b0| 45 5f 53 45 43 4f 52 47 | 3d 32 3b 2f 2a 20 6e 6f |E_SECORG|=2;/* no|
|000006c0| 74 20 75 73 65 64 3b 20 | 6d 75 73 74 20 62 65 20 |t used; |must be |
|000006d0| 30 20 2a 2f 00 23 44 45 | 5f 4e 55 4d 48 45 41 44 |0 */.#DE|_NUMHEAD|
|000006e0| 53 3d 33 3b 2f 2a 20 23 | 20 6f 66 20 68 65 61 64 |S=3;/* #| of head|
|000006f0| 73 20 28 73 75 72 66 61 | 63 65 73 29 2e 20 64 72 |s (surfa|ces). dr|
|00000700| 69 76 65 20 73 70 65 63 | 69 66 69 63 20 2a 2f 00 |ive spec|ific */.|
|00000710| 23 44 45 5f 53 45 43 53 | 50 45 52 42 4c 4b 3d 34 |#DE_SECS|PERBLK=4|
|00000720| 3b 2f 2a 20 6e 6f 74 20 | 75 73 65 64 3b 20 6d 75 |;/* not |used; mu|
|00000730| 73 74 20 62 65 20 31 20 | 2a 2f 00 23 44 45 5f 42 |st be 1 |*/.#DE_B|
|00000740| 4c 4b 53 50 45 52 54 52 | 41 43 4b 3d 35 3b 2f 2a |LKSPERTR|ACK=5;/*|
|00000750| 20 62 6c 6f 63 6b 73 20 | 70 65 72 20 74 72 61 63 | blocks |per trac|
|00000760| 6b 2e 20 64 72 69 76 65 | 20 73 70 65 63 69 66 69 |k. drive| specifi|
|00000770| 63 20 2a 2f 00 23 44 45 | 5f 52 45 53 45 52 56 45 |c */.#DE|_RESERVE|
|00000780| 44 42 4c 4b 53 3d 36 3b | 2f 2a 20 75 6e 61 76 61 |DBLKS=6;|/* unava|
|00000790| 69 6c 61 62 6c 65 20 62 | 6c 6f 63 6b 73 20 61 74 |ilable b|locks at|
|000007a0| 20 73 74 61 72 74 2e 20 | 20 75 73 75 61 6c 6c 79 | start. | usually|
|000007b0| 20 32 20 2a 2f 00 23 44 | 45 5f 50 52 45 46 41 43 | 2 */.#D|E_PREFAC|
|000007c0| 3d 37 3b 2f 2a 20 6e 6f | 74 20 75 73 65 64 3b 20 |=7;/* no|t used; |
|000007d0| 6d 75 73 74 20 62 65 20 | 30 20 2a 2f 00 23 44 45 |must be |0 */.#DE|
|000007e0| 5f 49 4e 54 45 52 4c 45 | 41 56 45 3d 38 3b 2f 2a |_INTERLE|AVE=8;/*|
|000007f0| 20 75 73 75 61 6c 6c 79 | 20 30 20 2a 2f 00 23 44 | usually| 0 */.#D|
|00000800| 45 5f 4c 4f 57 43 59 4c | 3d 39 3b 2f 2a 20 73 74 |E_LOWCYL|=9;/* st|
|00000810| 61 72 74 69 6e 67 20 63 | 79 6c 69 6e 64 65 72 2e |arting c|ylinder.|
|00000820| 20 74 79 70 69 63 61 6c | 6c 79 20 30 20 2a 2f 00 | typical|ly 0 */.|
|00000830| 23 44 45 5f 55 50 50 45 | 52 43 59 4c 3d 31 30 3b |#DE_UPPE|RCYL=10;|
|00000840| 2f 2a 20 6d 61 78 20 63 | 79 6c 69 6e 64 65 72 2e |/* max c|ylinder.|
|00000850| 20 20 64 72 69 76 65 20 | 73 70 65 63 69 66 69 63 |  drive |specific|
|00000860| 20 2a 2f 00 23 44 45 5f | 4e 55 4d 42 55 46 46 45 | */.#DE_|NUMBUFFE|
|00000870| 52 53 3d 31 31 3b 2f 2a | 20 73 74 61 72 74 69 6e |RS=11;/*| startin|
|00000880| 67 20 23 20 6f 66 20 62 | 75 66 66 65 72 73 2e 20 |g # of b|uffers. |
|00000890| 20 74 79 70 69 63 61 6c | 6c 79 20 35 20 2a 2f 00 | typical|ly 5 */.|
|000008a0| 23 44 45 5f 4d 45 4d 42 | 55 46 54 59 50 45 3d 31 |#DE_MEMB|UFTYPE=1|
|000008b0| 32 3b 2f 2a 20 74 79 70 | 65 20 6f 66 20 6d 65 6d |2;/* typ|e of mem|
|000008c0| 20 74 6f 20 61 6c 6c 6f | 63 61 74 65 20 66 6f 72 | to allo|cate for|
|000008d0| 20 62 75 66 66 65 72 73 | 2e 20 2a 2f 00 23 44 45 | buffers|. */.#DE|
|000008e0| 5f 42 55 46 4d 45 4d 54 | 59 50 45 3d 31 32 3b 2f |_BUFMEMT|YPE=12;/|
|000008f0| 2a 20 73 61 6d 65 20 61 | 73 20 61 62 6f 76 65 2c |* same a|s above,|
|00000900| 20 62 65 74 74 65 72 20 | 6e 61 6d 65 00 3b 20 20 | better |name.;  |
|00000910| 20 20 20 20 20 20 2a 20 | 31 20 69 73 20 70 75 62 |      * |1 is pub|
|00000920| 6c 69 63 2c 20 33 20 69 | 73 20 63 68 69 70 2c 20 |lic, 3 i|s chip, |
|00000930| 35 20 69 73 20 66 61 73 | 74 20 2a 2f 00 23 44 45 |5 is fas|t */.#DE|
|00000940| 5f 4d 41 58 54 52 41 4e | 53 46 45 52 3d 31 33 3b |_MAXTRAN|SFER=13;|
|00000950| 2f 2a 20 4d 61 78 20 6e | 75 6d 62 65 72 20 62 79 |/* Max n|umber by|
|00000960| 74 65 73 20 74 6f 20 74 | 72 61 6e 73 66 65 72 20 |tes to t|ransfer |
|00000970| 61 74 20 61 20 74 69 6d | 65 20 2a 2f 00 23 44 45 |at a tim|e */.#DE|
|00000980| 5f 4d 41 53 4b 3d 31 34 | 3b 2f 2a 20 41 64 64 72 |_MASK=14|;/* Addr|
|00000990| 65 73 73 20 4d 61 73 6b | 20 74 6f 20 62 6c 6f 63 |ess Mask| to bloc|
|000009a0| 6b 20 6f 75 74 20 63 65 | 72 74 61 69 6e 20 6d 65 |k out ce|rtain me|
|000009b0| 6d 6f 72 79 20 2a 2f 00 | 23 44 45 5f 42 4f 4f 54 |mory */.|#DE_BOOT|
|000009c0| 50 52 49 3d 31 35 3b 2f | 2a 20 42 6f 6f 74 20 70 |PRI=15;/|* Boot p|
|000009d0| 72 69 6f 72 69 74 79 20 | 66 6f 72 20 61 75 74 6f |riority |for auto|
|000009e0| 62 6f 6f 74 20 2a 2f 00 | 23 44 45 5f 44 4f 53 54 |boot */.|#DE_DOST|
|000009f0| 59 50 45 3d 31 36 3b 2f | 2a 20 41 53 43 49 49 20 |YPE=16;/|* ASCII |
|00000a00| 28 48 45 58 29 20 73 74 | 72 69 6e 67 20 73 68 6f |(HEX) st|ring sho|
|00000a10| 77 69 6e 67 20 66 69 6c | 65 73 79 73 74 65 6d 20 |wing fil|esystem |
|00000a20| 74 79 70 65 3b 00 3b 20 | 20 20 20 20 20 20 20 2a |type;.; |       *|
|00000a30| 20 30 58 34 34 34 46 35 | 33 30 30 20 69 73 20 6f | 0X444F5|300 is o|
|00000a40| 6c 64 20 66 69 6c 65 73 | 79 73 74 65 6d 2c 00 3b |ld files|ystem,.;|
|00000a50| 20 20 20 20 20 20 20 20 | 2a 20 30 58 34 34 34 46 |        |* 0X444F|
|00000a60| 35 33 30 31 20 69 73 20 | 66 61 73 74 20 66 69 6c |5301 is |fast fil|
|00000a70| 65 20 73 79 73 74 65 6d | 20 2a 2f 00 23 44 45 5f |e system| */.#DE_|
|00000a80| 42 41 55 44 3d 31 37 3b | 2f 2a 20 42 61 75 64 20 |BAUD=17;|/* Baud |
|00000a90| 72 61 74 65 20 66 6f 72 | 20 73 65 72 69 61 6c 20 |rate for| serial |
|00000aa0| 68 61 6e 64 6c 65 72 20 | 2a 2f 00 23 44 45 5f 43 |handler |*/.#DE_C|
|00000ab0| 4f 4e 54 52 4f 4c 3d 31 | 38 3b 2f 2a 20 43 6f 6e |ONTROL=1|8;/* Con|
|00000ac0| 74 72 6f 6c 20 77 6f 72 | 64 20 66 6f 72 20 68 61 |trol wor|d for ha|
|00000ad0| 6e 64 6c 65 72 2f 66 69 | 6c 65 73 79 73 74 65 6d |ndler/fi|lesystem|
|00000ae0| 20 2a 2f 00 23 44 45 5f | 42 4f 4f 54 42 4c 4f 43 | */.#DE_|BOOTBLOC|
|00000af0| 4b 53 3d 31 39 3b 2f 2a | 20 4e 75 6d 62 65 72 20 |KS=19;/*| Number |
|00000b00| 6f 66 20 62 6c 6f 63 6b | 73 20 63 6f 6e 74 61 69 |of block|s contai|
|00000b10| 6e 69 6e 67 20 62 6f 6f | 74 20 63 6f 64 65 20 2a |ning boo|t code *|
|00000b20| 2f 00 00 3b 2f 2a 20 54 | 68 65 20 66 69 6c 65 20 |/..;/* T|he file |
|00000b30| 73 79 73 74 65 6d 20 73 | 74 61 72 74 75 70 20 6d |system s|tartup m|
|00000b40| 65 73 73 61 67 65 20 69 | 73 20 6c 69 6e 6b 65 64 |essage i|s linked|
|00000b50| 20 69 6e 74 6f 20 61 20 | 64 65 76 69 63 65 20 6e | into a |device n|
|00000b60| 6f 64 65 27 73 20 73 74 | 61 72 74 75 70 00 3b 2a |ode's st|artup.;*|
|00000b70| 2a 20 66 69 65 6c 64 2e | 20 20 49 74 20 63 6f 6e |* field.|  It con|
|00000b80| 74 61 69 6e 73 20 61 20 | 70 6f 69 6e 74 65 72 20 |tains a |pointer |
|00000b90| 74 6f 20 74 68 65 20 61 | 62 6f 76 65 20 65 6e 76 |to the a|bove env|
|00000ba0| 69 72 6f 6e 6d 65 6e 74 | 2c 20 70 6c 75 73 20 74 |ironment|, plus t|
|00000bb0| 68 65 00 3b 2a 2a 20 69 | 6e 66 6f 72 6d 61 74 69 |he.;** i|nformati|
|00000bc0| 6f 6e 20 6e 65 65 64 65 | 64 20 74 6f 20 64 6f 20 |on neede|d to do |
|00000bd0| 61 6e 20 65 78 65 63 20 | 4f 70 65 6e 44 65 76 69 |an exec |OpenDevi|
|00000be0| 63 65 28 29 2e 00 3b 2a | 2f 00 80 01 2e 46 69 6c |ce()..;*|/....Fil|
|00000bf0| 65 53 79 73 53 74 61 72 | 74 75 70 4d 73 67 00 66 |eSysStar|tupMsg.f|
|00000c00| 73 73 6d 5f 55 6e 69 74 | 2e 6c 20 3b 2f 2a 20 65 |ssm_Unit|.l ;/* e|
|00000c10| 78 65 63 20 75 6e 69 74 | 20 6e 75 6d 62 65 72 20 |xec unit| number |
|00000c20| 66 6f 72 20 74 68 69 73 | 20 64 65 76 69 63 65 20 |for this| device |
|00000c30| 2a 2f 00 2a 66 73 73 6d | 5f 44 65 76 69 63 65 2e |*/.*fssm|_Device.|
|00000c40| 62 20 3b 2f 2a 20 6e 75 | 6c 6c 20 74 65 72 6d 69 |b ;/* nu|ll termi|
|00000c50| 6e 61 74 65 64 20 62 73 | 74 72 69 6e 67 20 74 6f |nated bs|tring to|
|00000c60| 20 74 68 65 20 64 65 76 | 69 63 65 20 6e 61 6d 65 | the dev|ice name|
|00000c70| 20 2a 2f 00 2a 66 73 73 | 6d 5f 45 6e 76 69 72 6f | */.*fss|m_Enviro|
|00000c80| 6e 2e 62 20 3b 2f 2a 20 | 70 74 72 20 74 6f 20 65 |n.b ;/* |ptr to e|
|00000c90| 6e 76 69 72 6f 6e 6d 65 | 6e 74 20 74 61 62 6c 65 |nvironme|nt table|
|00000ca0| 20 28 73 65 65 20 61 62 | 6f 76 65 29 20 2a 2f 00 | (see ab|ove) */.|
|00000cb0| 66 73 73 6d 5f 46 6c 61 | 67 73 2e 6c 20 3b 2f 2a |fssm_Fla|gs.l ;/*|
|00000cc0| 20 66 6c 61 67 73 20 66 | 6f 72 20 4f 70 65 6e 44 | flags f|or OpenD|
|00000cd0| 65 76 69 63 65 28 29 20 | 2a 2f 00 80 02 20 80 01 |evice() |*/... ..|
|00000ce0| 00 00 3b 2f 2a 20 54 68 | 65 20 69 6e 63 6c 75 64 |..;/* Th|e includ|
|00000cf0| 65 20 66 69 6c 65 20 22 | 6c 69 62 72 61 72 69 65 |e file "|librarie|
|00000d00| 73 2f 64 6f 73 65 78 74 | 65 6e 73 2e 68 22 20 68 |s/dosext|ens.h" h|
|00000d10| 61 73 20 61 20 44 65 76 | 69 63 65 4c 69 73 74 20 |as a Dev|iceList |
|00000d20| 73 74 72 75 63 74 75 72 | 65 2e 00 3b 20 2a 20 54 |structur|e..; * T|
|00000d30| 68 65 20 22 64 65 76 69 | 63 65 20 6c 69 73 74 22 |he "devi|ce list"|
|00000d40| 20 63 61 6e 20 68 61 76 | 65 20 6f 6e 65 20 6f 66 | can hav|e one of|
|00000d50| 20 74 68 72 65 65 20 64 | 69 66 66 65 72 65 6e 74 | three d|ifferent|
|00000d60| 20 74 68 69 6e 67 73 20 | 6c 69 6e 6b 65 64 20 6f | things |linked o|
|00000d70| 6e 74 6f 00 3b 20 2a 20 | 69 74 2e 20 44 6f 73 65 |nto.; * |it. Dose|
|00000d80| 78 74 65 6e 73 20 64 65 | 66 69 6e 65 73 20 74 68 |xtens de|fines th|
|00000d90| 65 20 73 74 72 75 63 74 | 75 72 65 20 66 6f 72 20 |e struct|ure for |
|00000da0| 61 20 76 6f 6c 75 6d 65 | 2e 20 20 44 4c 54 5f 44 |a volume|.  DLT_D|
|00000db0| 49 52 45 43 54 4f 52 59 | 00 3b 20 2a 20 69 73 20 |IRECTORY|.; * is |
|00000dc0| 66 6f 72 20 61 6e 20 61 | 73 73 69 67 6e 65 64 20 |for an a|ssigned |
|00000dd0| 64 69 72 65 63 74 6f 72 | 79 2e 20 20 54 68 65 20 |director|y.  The |
|00000de0| 66 6f 6c 6c 6f 77 69 6e | 67 20 73 74 72 75 63 74 |followin|g struct|
|00000df0| 75 72 65 20 69 73 20 66 | 6f 72 00 3b 20 2a 20 61 |ure is f|or.; * a|
|00000e00| 20 64 6f 73 20 22 64 65 | 76 69 63 65 22 20 28 44 | dos "de|vice" (D|
|00000e10| 4c 54 5f 44 45 56 49 43 | 45 29 2e 00 3b 2a 2f 00 |LT_DEVIC|E)..;*/.|
|00000e20| 00 80 01 2e 44 65 76 69 | 63 65 4e 6f 64 65 00 2a |....Devi|ceNode.*|
|00000e30| 64 6e 5f 4e 65 78 74 2e | 62 20 3b 2f 2a 20 73 69 |dn_Next.|b ;/* si|
|00000e40| 6e 67 6c 79 20 6c 69 6e | 6b 65 64 20 6c 69 73 74 |ngly lin|ked list|
|00000e50| 20 2a 2f 00 64 6e 5f 54 | 79 70 65 2e 6c 20 3b 2f | */.dn_T|ype.l ;/|
|00000e60| 2a 20 61 6c 77 61 79 73 | 20 30 20 66 6f 72 20 64 |* always| 0 for d|
|00000e70| 6f 73 20 22 64 65 76 69 | 63 65 73 22 20 2a 2f 00 |os "devi|ces" */.|
|00000e80| 2a 64 6e 5f 54 61 73 6b | 2e 4d 73 67 50 6f 72 74 |*dn_Task|.MsgPort|
|00000e90| 3b 2f 2a 20 73 74 61 6e | 64 61 72 64 20 64 6f 73 |;/* stan|dard dos|
|00000ea0| 20 22 74 61 73 6b 22 20 | 66 69 65 6c 64 2e 20 20 | "task" |field.  |
|00000eb0| 49 66 20 74 68 69 73 20 | 69 73 00 3b 20 20 20 20 |If this |is.;    |
|00000ec0| 20 20 20 20 2a 20 6e 75 | 6c 6c 20 77 68 65 6e 20 |    * nu|ll when |
|00000ed0| 74 68 65 20 6e 6f 64 65 | 20 69 73 20 61 63 63 65 |the node| is acce|
|00000ee0| 73 73 65 73 2c 20 61 20 | 74 61 73 6b 00 3b 20 20 |sses, a |task.;  |
|00000ef0| 20 20 20 20 20 20 2a 20 | 77 69 6c 6c 20 62 65 20 |      * |will be |
|00000f00| 73 74 61 72 74 65 64 20 | 75 70 20 2a 2f 00 2a 64 |started |up */.*d|
|00000f10| 6e 5f 4c 6f 63 6b 2e 62 | 20 3b 2f 2a 20 6e 6f 74 |n_Lock.b| ;/* not|
|00000f20| 20 75 73 65 64 20 66 6f | 72 20 64 65 76 69 63 65 | used fo|r device|
|00000f30| 73 20 2d 2d 20 6c 65 61 | 76 65 20 6e 75 6c 6c 20 |s -- lea|ve null |
|00000f40| 2a 2f 00 2a 64 6e 5f 48 | 61 6e 64 6c 65 72 2e 62 |*/.*dn_H|andler.b|
|00000f50| 20 3b 2f 2a 20 66 69 6c | 65 6e 61 6d 65 20 74 6f | ;/* fil|ename to|
|00000f60| 20 6c 6f 61 64 73 65 67 | 20 28 69 66 20 73 65 67 | loadseg| (if seg|
|00000f70| 6c 69 73 74 20 69 73 20 | 6e 75 6c 6c 29 20 2a 2f |list is |null) */|
|00000f80| 00 64 6e 5f 53 74 61 63 | 6b 53 69 7a 65 2e 6c 20 |.dn_Stac|kSize.l |
|00000f90| 3b 2f 2a 20 73 74 61 63 | 6b 73 69 7a 65 20 74 6f |;/* stac|ksize to|
|00000fa0| 20 75 73 65 20 77 68 65 | 6e 20 73 74 61 72 74 69 | use whe|n starti|
|00000fb0| 6e 67 20 74 61 73 6b 20 | 2a 2f 00 64 6e 5f 50 72 |ng task |*/.dn_Pr|
|00000fc0| 69 6f 72 69 74 79 2e 6c | 20 3b 2f 2a 20 74 61 73 |iority.l| ;/* tas|
|00000fd0| 6b 20 70 72 69 6f 72 69 | 74 79 20 77 68 65 6e 20 |k priori|ty when |
|00000fe0| 73 74 61 72 74 69 6e 67 | 20 74 61 73 6b 20 2a 2f |starting| task */|
|00000ff0| 00 2a 64 6e 5f 53 74 61 | 72 74 75 70 2e 62 20 3b |.*dn_Sta|rtup.b ;|
|00001000| 2f 2a 20 73 74 61 72 74 | 75 70 20 6d 73 67 3a 20 |/* start|up msg: |
|00001010| 46 69 6c 65 53 79 73 53 | 74 61 72 74 75 70 4d 73 |FileSysS|tartupMs|
|00001020| 67 20 66 6f 72 20 64 69 | 73 6b 73 20 2a 2f 00 2a |g for di|sks */.*|
|00001030| 64 6e 5f 53 65 67 4c 69 | 73 74 2e 62 20 3b 2f 2a |dn_SegLi|st.b ;/*|
|00001040| 20 63 6f 64 65 20 74 6f | 20 72 75 6e 20 74 6f 20 | code to| run to |
|00001050| 73 74 61 72 74 20 6e 65 | 77 20 74 61 73 6b 20 28 |start ne|w task (|
|00001060| 69 66 20 6e 65 63 65 73 | 73 61 72 79 29 2e 00 3b |if neces|sary)..;|
|00001070| 20 20 20 20 20 20 20 20 | 2a 20 69 66 20 6e 75 6c |        |* if nul|
|00001080| 6c 20 74 68 65 6e 20 64 | 6e 5f 48 61 6e 64 6c 65 |l then d|n_Handle|
|00001090| 72 20 77 69 6c 6c 20 62 | 65 20 6c 6f 61 64 65 64 |r will b|e loaded|
|000010a0| 2e 20 2a 2f 00 2a 64 6e | 5f 47 6c 6f 62 61 6c 56 |. */.*dn|_GlobalV|
|000010b0| 65 63 2e 62 20 3b 2f 2a | 20 42 43 50 4c 20 67 6c |ec.b ;/*| BCPL gl|
|000010c0| 6f 62 61 6c 20 76 65 63 | 74 6f 72 20 74 6f 20 75 |obal vec|tor to u|
|000010d0| 73 65 20 77 68 65 6e 20 | 73 74 61 72 74 69 6e 67 |se when |starting|
|000010e0| 00 3b 20 20 20 20 20 20 | 20 20 2a 20 61 20 74 61 |.;      |  * a ta|
|000010f0| 73 6b 2e 20 20 2d 31 20 | 6d 65 61 6e 73 20 74 68 |sk.  -1 |means th|
|00001100| 61 74 20 64 6e 5f 53 65 | 67 4c 69 73 74 20 69 73 |at dn_Se|gList is|
|00001110| 20 6e 6f 74 00 3b 20 20 | 20 20 20 20 20 20 2a 20 | not.;  |      * |
|00001120| 66 6f 72 20 61 20 62 63 | 70 6c 20 70 72 6f 67 72 |for a bc|pl progr|
|00001130| 61 6d 2c 20 73 6f 20 74 | 68 65 20 64 6f 73 20 77 |am, so t|he dos w|
|00001140| 6f 6e 27 74 00 3b 20 20 | 20 20 20 20 20 20 2a 20 |on't.;  |      * |
|00001150| 74 72 79 20 61 6e 64 20 | 63 6f 6e 73 74 72 75 63 |try and |construc|
|00001160| 74 20 6f 6e 65 2e 20 20 | 30 20 74 65 6c 6c 20 74 |t one.  |0 tell t|
|00001170| 68 65 00 3b 20 20 20 20 | 20 20 20 20 2a 20 64 6f |he.;    |    * do|
|00001180| 73 20 74 68 61 74 20 79 | 6f 75 20 6f 62 65 79 20 |s that y|ou obey |
|00001190| 42 43 50 4c 20 6c 69 6e | 6b 61 67 65 20 72 75 6c |BCPL lin|kage rul|
|000011a0| 65 73 2c 00 3b 20 20 20 | 20 20 20 20 20 2a 20 61 |es,.;   |     * a|
|000011b0| 6e 64 20 74 68 61 74 20 | 69 74 20 73 68 6f 75 6c |nd that |it shoul|
|000011c0| 64 20 63 6f 6e 73 74 72 | 75 63 74 20 61 20 67 6c |d constr|uct a gl|
|000011d0| 6f 62 61 6c 00 3b 20 20 | 20 20 20 20 20 20 2a 20 |obal.;  |      * |
|000011e0| 76 65 63 74 6f 72 20 66 | 6f 72 20 79 6f 75 2e 00 |vector f|or you..|
|000011f0| 3b 20 20 20 20 20 20 20 | 20 2a 2f 00 2a 64 6e 5f |;       | */.*dn_|
|00001200| 4e 61 6d 65 2e 62 20 3b | 2f 2a 20 74 68 65 20 6e |Name.b ;|/* the n|
|00001210| 6f 64 65 20 6e 61 6d 65 | 2c 20 65 2e 67 2e 20 27 |ode name|, e.g. '|
|00001220| 5c 33 27 2c 27 44 27 2c | 27 46 27 2c 27 33 27 20 |\3','D',|'F','3' |
|00001230| 2a 2f 00 80 02 20 80 01 | 00                      |*/... ..|.       |
+--------+-------------------------+-------------------------+--------+--------+