/ Liren Large Software Subsidy 7 / 07.iso / c / c006 / 1.ddi / FINDROOT.C

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| ff 01 00 00 00 5c 43 42 | 54 52 45 45 5c 4c 49 42 |.....\CB|TREE\LIB|
|00000010| 52 41 52 59 5c 46 49 4e | 44 52 4f 4f 54 2e 43 00 |RARY\FIN|DROOT.C.|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 1b 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 0a 20 2a 0d |********|***.. *.|
|000000d0| 0a 20 2a 20 20 20 66 69 | 6e 64 72 6f 6f 74 2e 63 |. *   fi|ndroot.c|
|000000e0| 20 20 2d 2d 20 20 20 72 | 65 74 75 72 6e 20 62 79 |  --   r|eturn by|
|000000f0| 74 65 20 6f 66 66 73 65 | 74 20 6f 66 20 72 6f 6f |te offse|t of roo|
|00000100| 74 70 74 72 20 66 6f 72 | 20 67 69 76 65 6e 20 62 |tptr for| given b|
|00000110| 74 72 65 65 2e 0d 0a 20 | 2a 2f 0d 0a 0d 0a 23 69 |tree... |*/....#i|
|00000120| 6e 63 6c 75 64 65 20 22 | 63 62 74 72 65 65 2e 68 |nclude "|cbtree.h|
|00000130| 22 0d 0a 0d 0a 6c 6f 6e | 67 20 66 69 6e 64 72 6f |"....lon|g findro|
|00000140| 6f 74 28 66 64 2c 20 62 | 74 6e 61 6d 65 29 20 20 |ot(fd, b|tname)  |
|00000150| 20 20 2f 2a 20 72 65 74 | 75 72 6e 20 62 79 74 65 |  /* ret|urn byte|
|00000160| 20 6f 66 66 73 65 74 20 | 66 6f 72 20 62 74 63 2e | offset |for btc.|
|00000170| 66 69 6e 64 72 6f 6f 74 | 20 2a 2f 0d 0a 69 6e 74 |findroot| */..int|
|00000180| 20 66 64 3b 20 20 20 20 | 20 20 20 20 20 2f 2a 20 | fd;    |     /* |
|00000190| 66 69 6c 65 20 74 6f 20 | 6c 6f 6f 6b 20 69 6e 20 |file to |look in |
|000001a0| 2a 2f 0d 0a 63 68 61 72 | 20 2a 62 74 6e 61 6d 65 |*/..char| *btname|
|000001b0| 3b 20 20 20 2f 2a 20 62 | 74 72 65 65 20 6e 61 6d |;   /* b|tree nam|
|000001c0| 65 20 74 6f 20 6c 6f 6f | 6b 20 66 6f 72 20 2a 2f |e to loo|k for */|
|000001d0| 0d 0a 7b 0d 0a 20 20 20 | 65 78 74 65 72 6e 20 6c |..{..   |extern l|
|000001e0| 6f 6e 67 20 6c 73 65 65 | 6b 28 29 3b 0d 0a 20 20 |ong lsee|k();..  |
|000001f0| 20 65 78 74 65 72 6e 20 | 69 6e 74 20 73 74 72 63 | extern |int strc|
|00000200| 6d 70 28 29 3b 0d 0a 20 | 20 20 42 54 5f 42 41 53 |mp();.. |  BT_BAS|
|00000210| 45 20 62 74 62 61 73 65 | 3b 20 20 20 2f 2a 20 46 |E btbase|;   /* F|
|00000220| 69 6c 65 20 42 61 73 65 | 20 69 6e 66 6f 20 2a 2f |ile Base| info */|
|00000230| 0d 0a 20 20 20 42 54 5f | 49 4e 46 4f 20 62 74 69 |..   BT_|INFO bti|
|00000240| 6e 66 6f 3b 20 20 20 2f | 2a 20 69 6e 66 6f 20 62 |nfo;   /|* info b|
|00000250| 6c 6f 63 6b 20 2a 2f 0d | 0a 20 20 20 6c 6f 6e 67 |lock */.|.   long|
|00000260| 20 20 20 20 6f 66 66 73 | 65 74 3b 0d 0a 0d 0a 20 |    offs|et;.... |
|00000270| 20 20 69 66 20 28 6c 73 | 65 65 6b 28 66 64 2c 20 |  if (ls|eek(fd, |
|00000280| 28 6c 6f 6e 67 29 53 5a | 42 4c 4b 48 44 52 2c 20 |(long)SZ|BLKHDR, |
|00000290| 30 29 20 3d 3d 20 2d 31 | 4c 29 20 20 20 20 2f 2a |0) == -1|L)    /*|
|000002a0| 20 62 65 67 69 6e 6e 69 | 6e 67 20 6f 66 20 66 69 | beginni|ng of fi|
|000002b0| 6c 65 20 2a 2f 0d 0a 20 | 20 20 20 20 20 63 6b 65 |le */.. |     cke|
|000002c0| 72 72 6f 72 28 2d 20 43 | 4b 5f 53 45 45 4b 2c 20 |rror(- C|K_SEEK, |
|000002d0| 22 31 30 31 22 29 3b 0d | 0a 20 20 20 69 66 20 28 |"101");.|.   if (|
|000002e0| 72 65 61 64 28 66 64 2c | 20 28 63 68 61 72 20 2a |read(fd,| (char *|
|000002f0| 29 26 62 74 62 61 73 65 | 2c 20 53 5a 5f 42 54 5f |)&btbase|, SZ_BT_|
|00000300| 42 41 53 45 29 20 3d 3d | 20 45 52 52 29 0d 0a 20 |BASE) ==| ERR).. |
|00000310| 20 20 20 20 20 63 6b 65 | 72 72 6f 72 28 2d 20 43 |     cke|rror(- C|
|00000320| 4b 5f 52 45 41 44 2c 20 | 22 31 30 32 22 29 3b 0d |K_READ, |"102");.|
|00000330| 0a 20 20 20 6f 66 66 73 | 65 74 20 3d 20 28 6c 6f |.   offs|et = (lo|
|00000340| 6e 67 29 28 53 5a 42 4c | 4b 48 44 52 20 2b 20 53 |ng)(SZBL|KHDR + S|
|00000350| 5a 5f 42 54 5f 42 41 53 | 45 29 3b 0d 0a 20 20 20 |Z_BT_BAS|E);..   |
|00000360| 66 6f 72 28 3b 3b 29 0d | 0a 20 20 20 7b 0d 0a 20 |for(;;).|.   {.. |
|00000370| 20 20 20 20 20 69 66 20 | 28 72 65 61 64 28 66 64 |     if |(read(fd|
|00000380| 2c 20 28 63 68 61 72 20 | 2a 29 26 62 74 69 6e 66 |, (char |*)&btinf|
|00000390| 6f 2c 20 53 5a 5f 42 54 | 5f 49 4e 46 4f 29 20 3d |o, SZ_BT|_INFO) =|
|000003a0| 3d 20 45 52 52 29 0d 0a | 20 20 20 20 20 20 20 20 |= ERR)..|        |
|000003b0| 20 63 6b 65 72 72 6f 72 | 28 2d 20 43 4b 5f 52 45 | ckerror|(- CK_RE|
|000003c0| 41 44 2c 20 22 31 30 33 | 22 29 3b 0d 0a 23 69 66 |AD, "103|");..#if|
|000003d0| 6e 64 65 66 20 4e 44 45 | 42 55 47 0d 0a 70 72 69 |ndef NDE|BUG..pri|
|000003e0| 6e 74 66 28 22 5c 6e 46 | 49 4e 44 52 4f 4f 54 3a |ntf("\nF|INDROOT:|
|000003f0| 20 62 74 69 6e 66 6f 2e | 62 69 5f 62 6e 61 6d 65 | btinfo.|bi_bname|
|00000400| 20 3d 20 27 25 73 27 2c | 20 6f 66 66 73 65 74 20 | = '%s',| offset |
|00000410| 3d 20 25 6c 75 22 2c 0d | 0a 20 20 20 20 20 20 62 |= %lu",.|.      b|
|00000420| 74 69 6e 66 6f 2e 62 69 | 5f 62 6e 61 6d 65 2c 20 |tinfo.bi|_bname, |
|00000430| 6f 66 66 73 65 74 29 3b | 0d 0a 23 65 6e 64 69 66 |offset);|..#endif|
|00000440| 0d 0a 20 20 20 20 20 20 | 69 66 20 28 73 74 72 6e |..      |if (strn|
|00000450| 63 6d 70 28 62 74 69 6e | 66 6f 2e 62 69 5f 62 6e |cmp(btin|fo.bi_bn|
|00000460| 61 6d 65 2c 20 22 4c 20 | 49 20 4e 20 4b 3a 22 2c |ame, "L |I N K:",|
|00000470| 20 53 5a 5f 42 4e 41 4d | 45 29 20 3d 3d 20 30 29 | SZ_BNAM|E) == 0)|
|00000480| 0d 0a 20 20 20 20 20 20 | 7b 0d 0a 20 20 20 20 20 |..      |{..     |
|00000490| 20 20 20 20 69 66 20 28 | 62 74 73 65 65 6b 28 66 |    if (|btseek(f|
|000004a0| 64 2c 20 62 74 69 6e 66 | 6f 2e 62 69 5f 72 6f 6f |d, btinf|o.bi_roo|
|000004b0| 74 70 2c 20 62 74 62 61 | 73 65 2e 62 62 5f 62 6c |tp, btba|se.bb_bl|
|000004c0| 6b 73 7a 29 20 3d 3d 20 | 2d 31 4c 29 0d 0a 20 20 |ksz) == |-1L)..  |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 63 6b 65 72 72 6f |        |  ckerro|
|000004e0| 72 28 2d 20 43 4b 5f 53 | 45 45 4b 2c 20 22 31 30 |r(- CK_S|EEK, "10|
|000004f0| 34 22 29 3b 0d 0a 20 20 | 20 20 20 20 20 20 20 6f |4");..  |       o|
|00000500| 66 66 73 65 74 20 3d 20 | 62 74 62 61 73 65 2e 62 |ffset = |btbase.b|
|00000510| 62 5f 62 6c 6b 73 7a 20 | 2a 20 28 62 74 69 6e 66 |b_blksz |* (btinf|
|00000520| 6f 2e 62 69 5f 72 6f 6f | 74 70 20 2d 20 31 29 3b |o.bi_roo|tp - 1);|
|00000530| 0d 0a 20 20 20 20 20 20 | 20 20 20 63 6f 6e 74 69 |..      |   conti|
|00000540| 6e 75 65 3b 0d 0a 20 20 | 20 20 20 20 7d 0d 0a 20 |nue;..  |    }.. |
|00000550| 20 20 20 20 20 2f 2a 20 | 6d 75 73 74 20 63 68 65 |     /* |must che|
|00000560| 63 6b 20 6e 61 6d 65 20 | 66 69 72 73 74 20 74 6f |ck name |first to|
|00000570| 20 63 6f 6f 72 64 69 6e | 61 74 65 20 77 69 74 68 | coordin|ate with|
|00000580| 20 63 72 65 61 74 62 74 | 72 28 29 20 2a 2f 0d 0a | creatbt|r() */..|
|00000590| 20 20 20 20 20 20 69 66 | 20 28 73 74 72 6e 63 6d |      if| (strncm|
|000005a0| 70 28 62 74 69 6e 66 6f | 2e 62 69 5f 62 6e 61 6d |p(btinfo|.bi_bnam|
|000005b0| 65 2c 20 62 74 6e 61 6d | 65 2c 20 53 5a 5f 42 4e |e, btnam|e, SZ_BN|
|000005c0| 41 4d 45 29 20 3d 3d 20 | 30 29 0d 0a 20 20 20 20 |AME) == |0)..    |
|000005d0| 20 20 7b 0d 0a 23 69 66 | 6e 64 65 66 20 4e 44 45 |  {..#if|ndef NDE|
|000005e0| 42 55 47 0d 0a 70 72 69 | 6e 74 66 28 22 5c 6e 46 |BUG..pri|ntf("\nF|
|000005f0| 49 4e 44 52 4f 4f 54 3a | 20 72 65 74 75 72 6e 69 |INDROOT:| returni|
|00000600| 6e 67 20 6f 66 66 73 65 | 74 20 3d 20 25 6c 75 5c |ng offse|t = %lu\|
|00000610| 6e 22 2c 20 6f 66 66 73 | 65 74 29 3b 0d 0a 23 65 |n", offs|et);..#e|
|00000620| 6e 64 69 66 0d 0a 20 20 | 20 20 20 20 20 20 20 72 |ndif..  |       r|
|00000630| 65 74 75 72 6e 20 28 6f | 66 66 73 65 74 29 3b 0d |eturn (o|ffset);.|
|00000640| 0a 20 20 20 20 20 20 7d | 0d 0a 20 20 20 20 20 20 |.      }|..      |
|00000650| 69 66 20 28 73 74 72 6e | 63 6d 70 28 62 74 69 6e |if (strn|cmp(btin|
|00000660| 66 6f 2e 62 69 5f 62 6e | 61 6d 65 2c 20 22 45 4e |fo.bi_bn|ame, "EN|
|00000670| 44 20 4c 49 53 54 22 2c | 20 53 5a 5f 42 4e 41 4d |D LIST",| SZ_BNAM|
|00000680| 45 29 20 3d 3d 20 30 29 | 0d 0a 20 20 20 20 20 20 |E) == 0)|..      |
|00000690| 20 20 20 72 65 74 75 72 | 6e 20 28 30 4c 29 3b 20 |   retur|n (0L); |
|000006a0| 20 20 2f 2a 20 6e 61 6d | 65 20 4e 4f 54 20 66 6f |  /* nam|e NOT fo|
|000006b0| 75 6e 64 20 2a 2f 0d 0a | 20 20 20 20 20 20 6f 66 |und */..|      of|
|000006c0| 66 73 65 74 20 2b 3d 20 | 53 5a 5f 42 54 5f 49 4e |fset += |SZ_BT_IN|
|000006d0| 46 4f 3b 0d 0a 20 20 20 | 20 20 20 69 66 20 28 62 |FO;..   |   if (b|
|000006e0| 74 62 61 73 65 2e 62 62 | 5f 6e 75 6d 62 74 72 65 |tbase.bb|_numbtre|
|000006f0| 65 2d 2d 20 3d 3d 20 30 | 29 0d 0a 20 20 20 20 20 |e-- == 0|)..     |
|00000700| 20 20 20 20 63 6b 65 72 | 72 6f 72 28 2d 20 43 4b |    cker|ror(- CK|
|00000710| 5f 49 4e 44 58 2c 20 22 | 36 38 22 29 3b 20 20 20 |_INDX, "|68");   |
|00000720| 2f 2a 20 62 69 67 20 65 | 72 72 6f 72 3a 20 63 6f |/* big e|rror: co|
|00000730| 72 72 75 70 74 65 64 20 | 66 69 6c 65 20 2a 2f 0d |rrupted |file */.|
|00000740| 0a 20 20 20 7d 0d 0a 23 | 69 66 20 54 43 0d 0a 23 |.   }..#|if TC..#|
|00000750| 65 6c 73 65 0d 0a 20 20 | 20 72 65 74 75 72 6e 20 |else..  | return |
|00000760| 28 2d 31 4c 29 3b 20 20 | 20 2f 2a 20 73 68 6f 75 |(-1L);  | /* shou|
|00000770| 6c 64 20 6e 65 76 65 72 | 20 67 65 74 20 68 65 72 |ld never| get her|
|00000780| 65 20 2a 2f 0d 0a 23 65 | 6e 64 69 66 0d 0a 7d 0d |e */..#e|ndif..}.|
|00000790| 0a                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+