home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / misc / volume08 / packdisk < prev    next >
SHell self-extracting ARchive  |  1991-08-27  |  17.9 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: SHell self-extracting ARchive (archive/shar).

You can browse this item here: packdisk

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert SHell self-extracting ARchive (archive/shar) magic Supported
100% dexvert Internet Message Format (text/imf) magic Supported
1% dexvert Text File (text/txt) fallback Supported
100% file C source, ASCII text default
100% TrID E-Mail message (Var. 2) default
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% siegfried fmt/329 Shell Archive Format default
100% detectItEasy Format: plain text[LF] default (weak)
100% xdgMime application/mbox default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 64 65 63 | 77 72 6c 21 77 75 61 72 |From dec|wrl!wuar|
|00000010| 63 68 69 76 65 21 67 65 | 6d 2e 6d 70 73 2e 6f 68 |chive!ge|m.mps.oh|
|00000020| 69 6f 2d 73 74 61 74 65 | 2e 65 64 75 21 61 70 70 |io-state|.edu!app|
|00000030| 6c 65 21 75 73 63 21 67 | 69 6e 6f 73 6b 6f 21 75 |le!usc!g|inosko!u|
|00000040| 75 6e 65 74 21 61 6c 6c | 62 65 72 79 20 53 75 6e |unet!all|bery Sun|
|00000050| 20 4f 63 74 20 20 38 20 | 31 32 3a 31 38 3a 32 35 | Oct 8 |12:18:25|
|00000060| 20 50 44 54 20 31 39 38 | 39 0a 41 72 74 69 63 6c | PDT 198|9.Articl|
|00000070| 65 20 31 31 34 30 20 6f | 66 20 63 6f 6d 70 2e 73 |e 1140 o|f comp.s|
|00000080| 6f 75 72 63 65 73 2e 6d | 69 73 63 3a 0a 50 61 74 |ources.m|isc:.Pat|
|00000090| 68 3a 20 64 65 63 77 72 | 6c 21 77 75 61 72 63 68 |h: decwr|l!wuarch|
|000000a0| 69 76 65 21 67 65 6d 2e | 6d 70 73 2e 6f 68 69 6f |ive!gem.|mps.ohio|
|000000b0| 2d 73 74 61 74 65 2e 65 | 64 75 21 61 70 70 6c 65 |-state.e|du!apple|
|000000c0| 21 75 73 63 21 67 69 6e | 6f 73 6b 6f 21 75 75 6e |!usc!gin|osko!uun|
|000000d0| 65 74 21 61 6c 6c 62 65 | 72 79 0a 46 72 6f 6d 3a |et!allbe|ry.From:|
|000000e0| 20 61 6c 6c 62 65 72 79 | 40 75 75 6e 65 74 2e 55 | allbery|@uunet.U|
|000000f0| 55 2e 4e 45 54 20 28 42 | 72 61 6e 64 6f 6e 20 53 |U.NET (B|randon S|
|00000100| 2e 20 41 6c 6c 62 65 72 | 79 20 2d 20 63 6f 6d 70 |. Allber|y - comp|
|00000110| 2e 73 6f 75 72 63 65 73 | 2e 6d 69 73 63 29 0a 4e |.sources|.misc).N|
|00000120| 65 77 73 67 72 6f 75 70 | 73 3a 20 63 6f 6d 70 2e |ewsgroup|s: comp.|
|00000130| 73 6f 75 72 63 65 73 2e | 6d 69 73 63 0a 53 75 62 |sources.|misc.Sub|
|00000140| 6a 65 63 74 3a 20 76 30 | 38 69 30 39 33 3a 20 53 |ject: v0|8i093: S|
|00000150| 79 73 74 65 6d 20 56 20 | 64 69 73 6b 20 63 6f 6d |ystem V |disk com|
|00000160| 70 61 63 74 6f 72 0a 4d | 65 73 73 61 67 65 2d 49 |pactor.M|essage-I|
|00000170| 44 3a 20 3c 36 39 36 32 | 36 40 75 75 6e 65 74 2e |D: <6962|6@uunet.|
|00000180| 55 55 2e 4e 45 54 3e 0a | 44 61 74 65 3a 20 38 20 |UU.NET>.|Date: 8 |
|00000190| 4f 63 74 20 38 39 20 31 | 36 3a 34 33 3a 31 39 20 |Oct 89 1|6:43:19 |
|000001a0| 47 4d 54 0a 53 65 6e 64 | 65 72 3a 20 61 6c 6c 62 |GMT.Send|er: allb|
|000001b0| 65 72 79 40 75 75 6e 65 | 74 2e 55 55 2e 4e 45 54 |ery@uune|t.UU.NET|
|000001c0| 0a 52 65 70 6c 79 2d 54 | 6f 3a 20 61 6e 64 79 40 |.Reply-T|o: andy@|
|000001d0| 63 73 76 61 78 2e 63 61 | 6c 74 65 63 68 2e 65 64 |csvax.ca|ltech.ed|
|000001e0| 75 20 28 41 6e 64 79 20 | 46 79 66 65 29 0a 4c 69 |u (Andy |Fyfe).Li|
|000001f0| 6e 65 73 3a 20 36 33 36 | 0a 41 70 70 72 6f 76 65 |nes: 636|.Approve|
|00000200| 64 3a 20 61 6c 6c 62 65 | 72 79 40 75 75 6e 65 74 |d: allbe|ry@uunet|
|00000210| 2e 55 55 2e 4e 45 54 20 | 28 42 72 61 6e 64 6f 6e |.UU.NET |(Brandon|
|00000220| 20 53 2e 20 41 6c 6c 62 | 65 72 79 20 2d 20 63 6f | S. Allb|ery - co|
|00000230| 6d 70 2e 73 6f 75 72 63 | 65 73 2e 6d 69 73 63 29 |mp.sourc|es.misc)|
|00000240| 0a 0a 50 6f 73 74 69 6e | 67 2d 6e 75 6d 62 65 72 |..Postin|g-number|
|00000250| 3a 20 56 6f 6c 75 6d 65 | 20 38 2c 20 49 73 73 75 |: Volume| 8, Issu|
|00000260| 65 20 39 33 0a 53 75 62 | 6d 69 74 74 65 64 2d 62 |e 93.Sub|mitted-b|
|00000270| 79 3a 20 61 6e 64 79 40 | 63 73 76 61 78 2e 63 61 |y: andy@|csvax.ca|
|00000280| 6c 74 65 63 68 2e 65 64 | 75 20 28 41 6e 64 79 20 |ltech.ed|u (Andy |
|00000290| 46 79 66 65 29 0a 41 72 | 63 68 69 76 65 2d 6e 61 |Fyfe).Ar|chive-na|
|000002a0| 6d 65 3a 20 70 61 63 6b | 64 69 73 6b 0a 0a 54 68 |me: pack|disk..Th|
|000002b0| 65 20 68 61 72 64 20 64 | 69 73 6b 20 6f 6e 20 6d |e hard d|isk on m|
|000002c0| 79 20 33 62 31 20 72 65 | 61 63 68 65 64 20 61 6e |y 3b1 re|ached an|
|000002d0| 20 69 6e 74 6f 6c 65 72 | 61 62 6c 65 20 6c 65 76 | intoler|able lev|
|000002e0| 65 6c 20 6f 66 20 66 72 | 61 67 6d 65 6e 74 61 74 |el of fr|agmentat|
|000002f0| 69 6f 6e 2c 0a 73 6f 20 | 49 20 77 72 6f 74 65 20 |ion,.so |I wrote |
|00000300| 74 68 69 73 20 70 72 6f | 67 72 61 6d 20 74 6f 20 |this pro|gram to |
|00000310| 64 6f 20 61 6e 20 69 6e | 20 73 69 74 75 20 72 65 |do an in| situ re|
|00000320| 6f 72 67 61 6e 69 7a 61 | 74 69 6f 6e 20 6f 66 20 |organiza|tion of |
|00000330| 74 68 65 20 64 69 73 6b | 2e 0a 54 68 65 20 65 6e |the disk|..The en|
|00000340| 64 20 72 65 73 75 6c 74 | 20 69 73 20 61 6c 6c 20 |d result| is all |
|00000350| 66 69 6c 65 73 20 61 6e | 64 20 64 69 72 65 63 74 |files an|d direct|
|00000360| 6f 72 69 65 73 20 61 72 | 65 20 63 6f 6e 74 69 67 |ories ar|e contig|
|00000370| 75 6f 75 73 2c 20 61 6e | 64 20 74 68 65 0a 66 72 |uous, an|d the.fr|
|00000380| 65 65 20 73 70 61 63 65 | 20 69 73 20 63 6f 6c 6c |ee space| is coll|
|00000390| 65 63 74 65 64 20 61 74 | 20 74 68 65 20 65 6e 64 |ected at| the end|
|000003a0| 20 6f 66 20 74 68 65 20 | 64 69 73 6b 2e 20 20 54 | of the |disk. T|
|000003b0| 68 65 20 70 72 6f 67 72 | 61 6d 20 6d 61 6b 65 73 |he progr|am makes|
|000003c0| 20 67 72 65 61 74 0a 65 | 66 66 6f 72 74 73 20 74 | great.e|fforts t|
|000003d0| 6f 20 6c 65 61 76 65 20 | 74 68 65 20 64 69 73 6b |o leave |the disk|
|000003e0| 20 69 6e 20 61 20 22 73 | 61 66 65 22 20 73 74 61 | in a "s|afe" sta|
|000003f0| 74 65 20 61 74 20 61 6c | 6c 20 74 69 6d 65 73 20 |te at al|l times |
|00000400| 28 77 69 74 68 20 74 68 | 65 0a 65 78 65 63 70 74 |(with th|e.execpt|
|00000410| 69 6f 6e 20 6f 66 20 74 | 68 65 20 66 72 65 65 20 |ion of t|he free |
|00000420| 6c 69 73 74 2c 20 77 68 | 69 63 68 20 69 73 6e 27 |list, wh|ich isn'|
|00000430| 74 20 72 65 62 75 69 6c | 74 20 75 6e 74 69 6c 20 |t rebuil|t until |
|00000440| 74 68 65 20 65 6e 64 2c | 20 74 68 6f 75 67 68 0a |the end,| though.|
|00000450| 61 6e 20 22 66 73 63 6b | 20 2d 73 22 20 77 69 6c |an "fsck| -s" wil|
|00000460| 6c 20 72 65 62 75 69 6c | 64 20 69 74 20 73 68 6f |l rebuil|d it sho|
|00000470| 75 6c 64 20 74 68 65 20 | 70 72 6f 67 72 61 6d 20 |uld the |program |
|00000480| 62 65 20 74 65 72 6d 69 | 6e 61 74 65 64 20 65 61 |be termi|nated ea|
|00000490| 72 6c 79 29 2e 0a 0a 54 | 68 6f 75 67 68 20 74 68 |rly)...T|hough th|
|000004a0| 69 73 20 70 72 6f 67 72 | 61 6d 20 77 61 73 20 64 |is progr|am was d|
|000004b0| 65 76 65 6c 6f 70 65 64 | 20 6f 6e 20 61 20 33 62 |eveloped| on a 3b|
|000004c0| 31 2c 20 69 74 20 77 61 | 73 20 77 72 69 74 74 65 |1, it wa|s writte|
|000004d0| 6e 20 77 69 74 68 0a 70 | 6f 72 74 61 62 69 6c 69 |n with.p|ortabili|
|000004e0| 74 79 20 69 6e 20 6d 69 | 6e 64 20 28 79 65 73 2c |ty in mi|nd (yes,|
|000004f0| 20 49 20 6b 6e 6f 77 20 | 2d 2d 20 79 6f 75 20 63 | I know |-- you c|
|00000500| 61 6e 20 73 74 6f 70 20 | 6c 61 75 67 68 69 6e 67 |an stop |laughing|
|00000510| 20 6e 6f 77 21 29 2e 0a | 50 65 72 68 61 70 73 20 | now!)..|Perhaps |
|00000520| 6f 74 68 65 72 20 73 79 | 73 74 65 6d 73 20 77 69 |other sy|stems wi|
|00000530| 74 68 20 74 68 65 20 53 | 79 73 74 65 6d 20 56 20 |th the S|ystem V |
|00000540| 66 69 6c 65 20 73 79 73 | 74 65 6d 20 28 69 6e 68 |file sys|tem (inh|
|00000550| 65 72 69 74 65 64 20 66 | 72 6f 6d 0a 56 37 3f 29 |erited f|rom.V7?)|
|00000560| 20 63 61 6e 20 61 6c 73 | 6f 20 75 73 65 20 74 68 | can als|o use th|
|00000570| 65 20 70 72 6f 67 72 61 | 6d 2c 20 6f 72 20 61 64 |e progra|m, or ad|
|00000580| 61 70 74 20 69 74 20 74 | 6f 20 74 68 65 69 72 20 |apt it t|o their |
|00000590| 6e 65 65 64 73 2e 0a 0a | 54 68 69 73 20 70 72 6f |needs...|This pro|
|000005a0| 67 72 61 6d 20 68 61 73 | 20 62 65 65 6e 20 73 75 |gram has| been su|
|000005b0| 63 63 65 73 73 66 75 6c | 6c 79 20 72 75 6e 20 6f |ccessful|ly run o|
|000005c0| 6e 20 6d 79 20 73 79 73 | 74 65 6d 2e 20 20 49 20 |n my sys|tem. I |
|000005d0| 64 6f 6e 27 74 20 70 72 | 6f 6d 69 73 65 0a 74 68 |don't pr|omise.th|
|000005e0| 61 74 20 69 74 20 77 69 | 6c 6c 20 72 75 6e 20 63 |at it wi|ll run c|
|000005f0| 6f 72 72 65 63 74 6c 79 | 20 6f 6e 20 61 6e 79 20 |orrectly| on any |
|00000600| 73 79 73 74 65 6d 20 2d | 2d 20 69 6e 63 6c 75 64 |system -|- includ|
|00000610| 69 6e 67 20 61 6e 6f 74 | 68 65 72 20 33 62 31 2e |ing anot|her 3b1.|
|00000620| 0a 55 73 65 20 69 74 20 | 61 74 20 79 6f 75 72 20 |.Use it |at your |
|00000630| 6f 77 6e 20 72 69 73 6b | 21 0a 0a 41 6e 64 79 20 |own risk|!..Andy |
|00000640| 46 79 66 65 0a 20 20 20 | 20 20 20 20 20 20 20 20 |Fyfe. | |
|00000650| 20 61 6e 64 79 40 63 73 | 76 61 78 2e 63 61 6c 74 | andy@cs|vax.calt|
|00000660| 65 63 68 2e 65 64 75 0a | 20 20 20 20 20 20 20 20 |ech.edu.| |
|00000670| 20 20 20 20 77 6a 61 66 | 79 66 65 40 63 61 6c 74 | wjaf|yfe@calt|
|00000680| 65 63 68 2e 62 69 74 6e | 65 74 0a 20 20 20 20 20 |ech.bitn|et. |
|00000690| 20 20 20 20 20 20 20 61 | 6e 64 79 40 63 69 74 2d | a|ndy@cit-|
|000006a0| 76 61 78 2e 55 55 43 50 | 09 28 2e 2e 2e 21 61 6d |vax.UUCP|.(...!am|
|000006b0| 65 73 21 65 6c 72 6f 79 | 21 63 69 74 2d 76 61 78 |es!elroy|!cit-vax|
|000006c0| 21 61 6e 64 79 29 0a 0a | 23 21 20 2f 62 69 6e 2f |!andy)..|#! /bin/|
|000006d0| 73 68 0a 23 20 54 68 69 | 73 20 69 73 20 61 20 73 |sh.# Thi|s is a s|
|000006e0| 68 65 6c 6c 20 61 72 63 | 68 69 76 65 2e 20 20 52 |hell arc|hive. R|
|000006f0| 65 6d 6f 76 65 20 61 6e | 79 74 68 69 6e 67 20 62 |emove an|ything b|
|00000700| 65 66 6f 72 65 20 74 68 | 69 73 20 6c 69 6e 65 2c |efore th|is line,|
|00000710| 20 74 68 65 6e 20 75 6e | 70 61 63 6b 0a 23 20 69 | then un|pack.# i|
|00000720| 74 20 62 79 20 73 61 76 | 69 6e 67 20 69 74 20 69 |t by sav|ing it i|
|00000730| 6e 74 6f 20 61 20 66 69 | 6c 65 20 61 6e 64 20 74 |nto a fi|le and t|
|00000740| 79 70 69 6e 67 20 22 73 | 68 20 66 69 6c 65 22 2e |yping "s|h file".|
|00000750| 20 20 54 6f 20 6f 76 65 | 72 77 72 69 74 65 20 65 | To ove|rwrite e|
|00000760| 78 69 73 74 69 6e 67 0a | 23 20 66 69 6c 65 73 2c |xisting.|# files,|
|00000770| 20 74 79 70 65 20 22 73 | 68 20 66 69 6c 65 20 2d | type "s|h file -|
|00000780| 63 22 2e 20 20 59 6f 75 | 20 63 61 6e 20 61 6c 73 |c". You| can als|
|00000790| 6f 20 66 65 65 64 20 74 | 68 69 73 20 61 73 20 73 |o feed t|his as s|
|000007a0| 74 61 6e 64 61 72 64 20 | 69 6e 70 75 74 20 76 69 |tandard |input vi|
|000007b0| 61 0a 23 20 75 6e 73 68 | 61 72 2c 20 6f 72 20 62 |a.# unsh|ar, or b|
|000007c0| 79 20 74 79 70 69 6e 67 | 20 22 73 68 20 3c 66 69 |y typing| "sh <fi|
|000007d0| 6c 65 22 2c 20 65 2e 67 | 2e 2e 20 20 49 66 20 74 |le", e.g|.. If t|
|000007e0| 68 69 73 20 61 72 63 68 | 69 76 65 20 69 73 20 63 |his arch|ive is c|
|000007f0| 6f 6d 70 6c 65 74 65 2c | 20 79 6f 75 0a 23 20 77 |omplete,| you.# w|
|00000800| 69 6c 6c 20 73 65 65 20 | 74 68 65 20 66 6f 6c 6c |ill see |the foll|
|00000810| 6f 77 69 6e 67 20 6d 65 | 73 73 61 67 65 20 61 74 |owing me|ssage at|
|00000820| 20 74 68 65 20 65 6e 64 | 3a 0a 23 09 09 22 45 6e | the end|:.#.."En|
|00000830| 64 20 6f 66 20 73 68 65 | 6c 6c 20 61 72 63 68 69 |d of she|ll archi|
|00000840| 76 65 2e 22 0a 23 20 43 | 6f 6e 74 65 6e 74 73 3a |ve.".# C|ontents:|
|00000850| 20 20 52 45 41 44 4d 45 | 20 43 4f 50 59 52 49 47 | README| COPYRIG|
|00000860| 48 54 20 4d 61 6b 65 66 | 69 6c 65 20 70 61 63 6b |HT Makef|ile pack|
|00000870| 64 69 73 6b 2e 63 0a 23 | 20 57 72 61 70 70 65 64 |disk.c.#| Wrapped|
|00000880| 20 62 79 20 61 6e 64 79 | 40 6d 61 72 6d 6f 74 20 | by andy|@marmot |
|00000890| 6f 6e 20 53 61 74 20 4f | 63 74 20 20 37 20 31 39 |on Sat O|ct 7 19|
|000008a0| 3a 35 31 3a 34 31 20 31 | 39 38 39 0a 50 41 54 48 |:51:41 1|989.PATH|
|000008b0| 3d 2f 62 69 6e 3a 2f 75 | 73 72 2f 62 69 6e 3a 2f |=/bin:/u|sr/bin:/|
|000008c0| 75 73 72 2f 75 63 62 20 | 3b 20 65 78 70 6f 72 74 |usr/ucb |; export|
|000008d0| 20 50 41 54 48 0a 69 66 | 20 74 65 73 74 20 2d 66 | PATH.if| test -f|
|000008e0| 20 27 52 45 41 44 4d 45 | 27 20 2d 61 20 22 24 7b | 'README|' -a "${|
|000008f0| 31 7d 22 20 21 3d 20 22 | 2d 63 22 20 3b 20 74 68 |1}" != "|-c" ; th|
|00000900| 65 6e 20 0a 20 20 65 63 | 68 6f 20 73 68 61 72 3a |en . ec|ho shar:|
|00000910| 20 57 69 6c 6c 20 6e 6f | 74 20 63 6c 6f 62 62 65 | Will no|t clobbe|
|00000920| 72 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |r existi|ng file |
|00000930| 5c 22 27 52 45 41 44 4d | 45 27 5c 22 0a 65 6c 73 |\"'READM|E'\".els|
|00000940| 65 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 45 78 74 |e.echo s|har: Ext|
|00000950| 72 61 63 74 69 6e 67 20 | 5c 22 27 52 45 41 44 4d |racting |\"'READM|
|00000960| 45 27 5c 22 20 5c 28 31 | 34 38 36 20 63 68 61 72 |E'\" \(1|486 char|
|00000970| 61 63 74 65 72 73 5c 29 | 0a 73 65 64 20 22 73 2f |acters\)|.sed "s/|
|00000980| 5e 58 2f 2f 22 20 3e 27 | 52 45 41 44 4d 45 27 20 |^X//" >'|README' |
|00000990| 3c 3c 27 45 4e 44 5f 4f | 46 5f 46 49 4c 45 27 0a |<<'END_O|F_FILE'.|
|000009a0| 58 54 68 69 73 20 70 72 | 6f 67 72 61 6d 20 72 65 |XThis pr|ogram re|
|000009b0| 61 72 72 61 6e 67 65 73 | 20 74 68 65 20 66 69 6c |arranges| the fil|
|000009c0| 65 73 20 61 6e 64 20 64 | 69 72 65 63 74 6f 72 69 |es and d|irectori|
|000009d0| 65 73 20 6f 6e 20 61 20 | 64 69 73 6b 0a 58 73 6f |es on a |disk.Xso|
|000009e0| 20 74 68 61 74 20 74 68 | 65 79 20 61 70 70 65 61 | that th|ey appea|
|000009f0| 72 20 63 6f 6e 74 69 67 | 75 6f 75 73 6c 79 2e 20 |r contig|uously. |
|00000a00| 20 54 68 69 73 20 69 73 | 20 74 6f 20 63 6f 75 6e | This is| to coun|
|00000a10| 74 65 72 61 63 74 20 74 | 68 65 0a 58 66 72 61 67 |teract t|he.Xfrag|
|00000a20| 6d 65 6e 74 61 74 69 6f | 6e 20 74 68 61 74 20 6f |mentatio|n that o|
|00000a30| 63 63 75 72 73 20 61 66 | 74 65 72 20 61 20 74 69 |ccurs af|ter a ti|
|00000a40| 6d 65 20 75 6e 64 65 72 | 20 53 79 73 74 65 6d 20 |me under| System |
|00000a50| 56 2e 20 20 41 66 74 65 | 72 0a 58 74 68 65 20 70 |V. Afte|r.Xthe p|
|00000a60| 72 6f 67 72 61 6d 20 66 | 69 6e 69 73 68 65 73 20 |rogram f|inishes |
|00000a70| 61 6c 6c 20 74 68 65 20 | 66 72 65 65 20 73 70 61 |all the |free spa|
|00000a80| 63 65 20 77 69 6c 6c 20 | 62 65 20 63 6f 6c 6c 65 |ce will |be colle|
|00000a90| 63 74 65 64 20 61 74 0a | 58 74 68 65 20 65 6e 64 |cted at.|Xthe end|
|00000aa0| 20 6f 66 20 74 68 65 20 | 64 69 73 6b 2e 0a 58 0a | of the |disk..X.|
|00000ab0| 58 54 68 69 73 20 70 72 | 6f 67 72 61 6d 20 77 61 |XThis pr|ogram wa|
|00000ac0| 73 20 77 72 69 74 74 65 | 6e 20 6f 6e 20 61 6e 20 |s writte|n on an |
|00000ad0| 41 54 26 54 20 33 62 31 | 20 28 72 75 6e 6e 69 6e |AT&T 3b1| (runnin|
|00000ae0| 67 20 75 6e 69 78 20 76 | 65 72 73 69 6f 6e 20 33 |g unix v|ersion 3|
|00000af0| 2e 35 29 2e 0a 58 57 68 | 69 6c 65 20 74 68 65 20 |.5)..XWh|ile the |
|00000b00| 70 72 6f 67 72 61 6d 20 | 77 61 73 20 77 72 69 74 |program |was writ|
|00000b10| 74 65 6e 20 77 69 74 68 | 20 70 6f 72 74 61 62 69 |ten with| portabi|
|00000b20| 6c 69 74 79 20 69 6e 20 | 6d 69 6e 64 2c 20 69 74 |lity in |mind, it|
|00000b30| 20 69 73 20 2a 6e 6f 74 | 2a 0a 58 67 75 61 72 61 | is *not|*.Xguara|
|00000b40| 6e 74 65 65 64 20 74 6f | 20 72 75 6e 20 6f 6e 20 |nteed to| run on |
|00000b50| 2a 61 6e 79 2a 20 6d 61 | 63 68 69 6e 65 2c 20 6e |*any* ma|chine, n|
|00000b60| 6f 74 20 65 76 65 6e 20 | 74 68 65 20 33 62 31 2e |ot even |the 3b1.|
|00000b70| 20 20 49 74 20 68 61 73 | 2c 0a 58 68 6f 77 65 76 | It has|,.Xhowev|
|00000b80| 65 72 2c 20 77 6f 72 6b | 65 64 20 66 6f 72 20 6d |er, work|ed for m|
|00000b90| 65 2e 0a 58 0a 58 59 6f | 75 20 73 68 6f 75 6c 64 |e..X.XYo|u should|
|00000ba0| 20 72 75 6e 20 66 73 63 | 6b 20 62 65 66 6f 72 65 | run fsc|k before|
|00000bb0| 20 72 75 6e 6e 69 6e 67 | 20 74 68 69 73 20 70 72 | running| this pr|
|00000bc0| 6f 67 72 61 6d 2c 20 61 | 6e 64 20 61 67 61 69 6e |ogram, a|nd again|
|00000bd0| 20 61 66 74 65 72 0a 58 | 69 74 27 73 20 64 6f 6e | after.X|it's don|
|00000be0| 65 2c 20 6a 75 73 74 20 | 74 6f 20 62 65 20 73 75 |e, just |to be su|
|00000bf0| 72 65 21 0a 58 0a 58 54 | 68 65 20 70 72 6f 67 72 |re!.X.XT|he progr|
|00000c00| 61 6d 20 69 73 20 2a 73 | 6c 6f 77 2a 2e 20 20 48 |am is *s|low*. H|
|00000c10| 6f 77 65 76 65 72 2c 20 | 74 68 65 20 64 69 73 6b |owever, |the disk|
|00000c20| 20 69 73 20 75 70 64 61 | 74 65 64 20 61 66 74 65 | is upda|ted afte|
|00000c30| 72 20 2a 65 76 65 72 79 | 2a 0a 58 62 6c 6f 63 6b |r *every|*.Xblock|
|00000c40| 20 69 73 20 6d 6f 76 65 | 64 2c 20 73 6f 20 74 68 | is move|d, so th|
|00000c50| 65 20 66 69 6c 65 20 73 | 79 73 74 65 6d 20 73 68 |e file s|ystem sh|
|00000c60| 6f 75 6c 64 20 62 65 20 | 69 6e 20 61 20 63 6f 6e |ould be |in a con|
|00000c70| 73 69 73 74 65 6e 74 20 | 73 74 61 74 65 0a 58 69 |sistent |state.Xi|
|00000c80| 66 20 74 68 65 20 70 72 | 6f 67 72 61 6d 20 69 73 |f the pr|ogram is|
|00000c90| 20 68 61 6c 74 65 64 20 | 66 6f 72 20 61 6e 79 20 | halted |for any |
|00000ca0| 72 65 61 73 6f 6e 20 28 | 65 78 63 65 70 74 20 66 |reason (|except f|
|00000cb0| 6f 72 20 74 68 65 20 66 | 72 65 65 20 6c 69 73 74 |or the f|ree list|
|00000cc0| 2c 0a 58 77 68 69 63 68 | 20 69 73 20 6e 6f 74 20 |,.Xwhich| is not |
|00000cd0| 72 65 62 75 69 6c 74 20 | 75 6e 74 69 6c 20 74 68 |rebuilt |until th|
|00000ce0| 65 20 76 65 72 79 20 65 | 6e 64 29 2e 0a 58 0a 58 |e very e|nd)..X.X|
|00000cf0| 49 20 64 6f 6e 27 74 20 | 67 75 61 72 61 6e 74 65 |I don't |guarante|
|00000d00| 65 20 74 68 61 74 20 74 | 68 69 73 20 70 72 6f 67 |e that t|his prog|
|00000d10| 72 61 6d 20 77 6f 6e 27 | 74 20 64 65 73 74 72 6f |ram won'|t destro|
|00000d20| 79 20 79 6f 75 72 20 64 | 69 73 6b 2e 0a 58 4d 61 |y your d|isk..XMa|
|00000d30| 6b 65 20 73 75 72 65 20 | 79 6f 75 20 68 61 76 65 |ke sure |you have|
|00000d40| 20 61 20 62 61 63 6b 75 | 70 20 6a 75 73 74 20 69 | a backu|p just i|
|00000d50| 6e 20 63 61 73 65 21 21 | 21 0a 58 0a 58 54 6f 20 |n case!!|!.X.XTo |
|00000d60| 72 75 6e 20 74 68 65 20 | 70 72 6f 67 72 61 6d 2c |run the |program,|
|00000d70| 20 73 69 6d 70 6c 79 20 | 67 69 76 65 20 74 68 65 | simply |give the|
|00000d80| 20 64 69 73 6b 20 64 65 | 76 69 63 65 20 61 73 20 | disk de|vice as |
|00000d90| 69 74 73 20 6f 6e 6c 79 | 0a 58 61 72 67 75 6d 65 |its only|.Xargume|
|00000da0| 6e 74 2e 20 20 54 68 65 | 20 70 72 6f 67 72 61 6d |nt. The| program|
|00000db0| 20 77 69 6c 6c 20 6e 6f | 72 6d 61 6c 6c 79 20 65 | will no|rmally e|
|00000dc0| 6e 73 75 72 65 20 74 68 | 61 74 20 74 68 65 20 67 |nsure th|at the g|
|00000dd0| 69 76 65 6e 20 6e 61 6d | 65 0a 58 69 73 20 61 20 |iven nam|e.Xis a |
|00000de0| 63 68 61 72 61 63 74 65 | 72 20 73 70 65 63 69 61 |characte|r specia|
|00000df0| 6c 20 64 65 76 69 63 65 | 2e 20 20 49 66 20 63 6f |l device|. If co|
|00000e00| 6d 70 69 6c 65 64 20 77 | 69 74 68 20 27 2d 44 44 |mpiled w|ith '-DD|
|00000e10| 45 42 55 47 27 2c 20 74 | 68 69 73 0a 58 63 68 65 |EBUG', t|his.Xche|
|00000e20| 63 6b 20 69 73 20 65 6c | 69 6d 69 6e 61 74 65 64 |ck is el|iminated|
|00000e30| 2e 20 20 54 68 69 73 20 | 61 6c 6c 6f 77 73 2c 20 |. This |allows, |
|00000e40| 66 6f 72 20 65 78 61 6d | 70 6c 65 2c 20 79 6f 75 |for exam|ple, you|
|00000e50| 20 74 6f 20 22 64 64 22 | 20 61 0a 58 66 6c 6f 70 | to "dd"| a.Xflop|
|00000e60| 70 79 20 74 6f 20 61 20 | 64 69 73 6b 20 66 69 6c |py to a |disk fil|
|00000e70| 65 20 28 73 61 79 20 2f | 74 6d 70 2f 64 69 73 6b |e (say /|tmp/disk|
|00000e80| 29 20 61 6e 64 20 74 68 | 65 6e 20 72 75 6e 20 74 |) and th|en run t|
|00000e90| 68 65 20 70 72 6f 67 72 | 61 6d 0a 58 77 69 74 68 |he progr|am.Xwith|
|00000ea0| 20 27 2f 74 6d 70 2f 64 | 69 73 6b 27 20 61 73 20 | '/tmp/d|isk' as |
|00000eb0| 69 74 73 20 61 72 67 75 | 6d 65 6e 74 2e 20 20 57 |its argu|ment. W|
|00000ec0| 68 65 6e 20 72 75 6e 6e | 69 6e 67 20 6f 6e 20 61 |hen runn|ing on a|
|00000ed0| 20 72 65 61 6c 20 64 69 | 73 6b 2c 0a 58 74 68 65 | real di|sk,.Xthe|
|00000ee0| 20 64 69 73 6b 20 69 6e | 20 71 75 65 73 74 69 6f | disk in| questio|
|00000ef0| 6e 20 2a 6d 75 73 74 2a | 20 2a 6e 6f 74 2a 20 62 |n *must*| *not* b|
|00000f00| 65 20 6d 6f 75 6e 74 65 | 64 21 21 21 0a 58 0a 58 |e mounte|d!!!.X.X|
|00000f10| 52 65 6d 65 6d 62 65 72 | 3a 20 20 54 48 49 53 20 |Remember|: THIS |
|00000f20| 50 52 4f 47 52 41 4d 20 | 49 53 20 50 4f 54 45 4e |PROGRAM |IS POTEN|
|00000f30| 54 49 41 4c 4c 59 20 56 | 45 52 59 20 44 41 4e 47 |TIALLY V|ERY DANG|
|00000f40| 45 52 4f 55 53 2e 20 20 | 55 73 65 20 69 74 0a 58 |EROUS. |Use it.X|
|00000f50| 61 74 20 79 6f 75 72 20 | 6f 77 6e 20 72 69 73 6b |at your |own risk|
|00000f60| 2e 0a 58 0a 58 09 09 09 | 09 41 6e 64 72 65 77 20 |..X.X...|.Andrew |
|00000f70| 46 79 66 65 0a 58 09 09 | 09 09 61 6e 64 79 40 63 |Fyfe.X..|..andy@c|
|00000f80| 73 76 61 78 2e 63 61 6c | 74 65 63 68 2e 65 64 75 |svax.cal|tech.edu|
|00000f90| 0a 45 4e 44 5f 4f 46 5f | 46 49 4c 45 0a 69 66 20 |.END_OF_|FILE.if |
|00000fa0| 74 65 73 74 20 31 34 38 | 36 20 2d 6e 65 20 60 77 |test 148|6 -ne `w|
|00000fb0| 63 20 2d 63 20 3c 27 52 | 45 41 44 4d 45 27 60 3b |c -c <'R|EADME'`;|
|00000fc0| 20 74 68 65 6e 0a 20 20 | 20 20 65 63 68 6f 20 73 | then. | echo s|
|00000fd0| 68 61 72 3a 20 5c 22 27 | 52 45 41 44 4d 45 27 5c |har: \"'|README'\|
|00000fe0| 22 20 75 6e 70 61 63 6b | 65 64 20 77 69 74 68 20 |" unpack|ed with |
|00000ff0| 77 72 6f 6e 67 20 73 69 | 7a 65 21 0a 66 69 0a 23 |wrong si|ze!.fi.#|
|00001000| 20 65 6e 64 20 6f 66 20 | 27 52 45 41 44 4d 45 27 | end of |'README'|
|00001010| 0a 66 69 0a 69 66 20 74 | 65 73 74 20 2d 66 20 27 |.fi.if t|est -f '|
|00001020| 43 4f 50 59 52 49 47 48 | 54 27 20 2d 61 20 22 24 |COPYRIGH|T' -a "$|
|00001030| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|00001040| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen . e|cho shar|
|00001050| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 63 6c 6f 62 62 |: Will n|ot clobb|
|00001060| 65 72 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |er exist|ing file|
|00001070| 20 5c 22 27 43 4f 50 59 | 52 49 47 48 54 27 5c 22 | \"'COPY|RIGHT'\"|
|00001080| 0a 65 6c 73 65 0a 65 63 | 68 6f 20 73 68 61 72 3a |.else.ec|ho shar:|
|00001090| 20 45 78 74 72 61 63 74 | 69 6e 67 20 5c 22 27 43 | Extract|ing \"'C|
|000010a0| 4f 50 59 52 49 47 48 54 | 27 5c 22 20 5c 28 31 30 |OPYRIGHT|'\" \(10|
|000010b0| 32 36 20 63 68 61 72 61 | 63 74 65 72 73 5c 29 0a |26 chara|cters\).|
|000010c0| 73 65 64 20 22 73 2f 5e | 58 2f 2f 22 20 3e 27 43 |sed "s/^|X//" >'C|
|000010d0| 4f 50 59 52 49 47 48 54 | 27 20 3c 3c 27 45 4e 44 |OPYRIGHT|' <<'END|
|000010e0| 5f 4f 46 5f 46 49 4c 45 | 27 0a 58 2f 2a 0a 58 20 |_OF_FILE|'.X/*.X |
|000010f0| 2a 20 43 6f 70 79 72 69 | 67 68 74 20 28 63 29 20 |* Copyri|ght (c) |
|00001100| 41 6e 64 72 65 77 20 46 | 79 66 65 2c 20 31 39 38 |Andrew F|yfe, 198|
|00001110| 39 0a 58 20 2a 20 41 6c | 6c 20 72 69 67 68 74 73 |9.X * Al|l rights|
|00001120| 20 72 65 73 65 72 76 65 | 64 2e 0a 58 20 2a 20 57 | reserve|d..X * W|
|00001130| 72 69 74 74 65 6e 20 62 | 79 20 41 6e 64 72 65 77 |ritten b|y Andrew|
|00001140| 20 46 79 66 65 2e 0a 58 | 20 2a 0a 58 20 2a 20 50 | Fyfe..X| *.X * P|
|00001150| 65 72 6d 69 73 73 69 6f | 6e 20 69 73 20 67 72 61 |ermissio|n is gra|
|00001160| 6e 74 65 64 20 74 6f 20 | 61 6e 79 6f 6e 65 20 74 |nted to |anyone t|
|00001170| 6f 20 75 73 65 20 74 68 | 69 73 20 73 6f 66 74 77 |o use th|is softw|
|00001180| 61 72 65 20 66 6f 72 20 | 61 6e 79 20 70 75 72 70 |are for |any purp|
|00001190| 6f 73 65 20 6f 6e 0a 58 | 20 2a 20 61 6e 79 20 63 |ose on.X| * any c|
|000011a0| 6f 6d 70 75 74 65 72 20 | 73 79 73 74 65 6d 2c 20 |omputer |system, |
|000011b0| 61 6e 64 20 74 6f 20 61 | 6c 74 65 72 20 69 74 20 |and to a|lter it |
|000011c0| 61 6e 64 20 72 65 64 69 | 73 74 72 69 62 75 74 65 |and redi|stribute|
|000011d0| 20 69 74 20 66 72 65 65 | 6c 79 2c 20 73 75 62 6a | it free|ly, subj|
|000011e0| 65 63 74 0a 58 20 2a 20 | 74 6f 20 74 68 65 20 66 |ect.X * |to the f|
|000011f0| 6f 6c 6c 6f 77 69 6e 67 | 20 72 65 73 74 72 69 63 |ollowing| restric|
|00001200| 74 69 6f 6e 73 3a 0a 58 | 20 2a 0a 58 20 2a 20 31 |tions:.X| *.X * 1|
|00001210| 2e 20 54 68 65 20 61 75 | 74 68 6f 72 20 69 73 20 |. The au|thor is |
|00001220| 6e 6f 74 20 72 65 73 70 | 6f 6e 73 69 62 6c 65 20 |not resp|onsible |
|00001230| 66 6f 72 20 74 68 65 20 | 63 6f 6e 73 65 71 75 65 |for the |conseque|
|00001240| 6e 63 65 73 20 6f 66 20 | 75 73 65 20 6f 66 20 74 |nces of |use of t|
|00001250| 68 69 73 0a 58 20 2a 20 | 20 20 20 73 6f 66 74 77 |his.X * | softw|
|00001260| 61 72 65 2c 20 6e 6f 20 | 6d 61 74 74 65 72 20 68 |are, no |matter h|
|00001270| 6f 77 20 61 77 66 75 6c | 2c 20 65 76 65 6e 20 69 |ow awful|, even i|
|00001280| 66 20 74 68 65 79 20 61 | 72 69 73 65 20 66 72 6f |f they a|rise fro|
|00001290| 6d 20 66 6c 61 77 73 20 | 69 6e 20 69 74 2e 0a 58 |m flaws |in it..X|
|000012a0| 20 2a 0a 58 20 2a 20 32 | 2e 20 54 68 65 20 6f 72 | *.X * 2|. The or|
|000012b0| 69 67 69 6e 20 6f 66 20 | 74 68 69 73 20 73 6f 66 |igin of |this sof|
|000012c0| 74 77 61 72 65 20 6d 75 | 73 74 20 6e 6f 74 20 62 |tware mu|st not b|
|000012d0| 65 20 6d 69 73 72 65 70 | 72 65 73 65 6e 74 65 64 |e misrep|resented|
|000012e0| 2c 20 65 69 74 68 65 72 | 20 62 79 0a 58 20 2a 20 |, either| by.X * |
|000012f0| 20 20 20 65 78 70 6c 69 | 63 69 74 20 63 6c 61 69 | expli|cit clai|
|00001300| 6d 20 6f 72 20 62 79 20 | 6f 6d 69 73 73 69 6f 6e |m or by |omission|
|00001310| 2e 20 20 53 69 6e 63 65 | 20 66 65 77 20 75 73 65 |. Since| few use|
|00001320| 72 73 20 65 76 65 72 20 | 72 65 61 64 20 73 6f 75 |rs ever |read sou|
|00001330| 72 63 65 73 2c 0a 58 20 | 2a 20 20 20 20 63 72 65 |rces,.X |* cre|
|00001340| 64 69 74 73 20 6d 75 73 | 74 20 61 70 70 65 61 72 |dits mus|t appear|
|00001350| 20 69 6e 20 74 68 65 20 | 64 6f 63 75 6d 65 6e 74 | in the |document|
|00001360| 61 74 69 6f 6e 2e 0a 58 | 20 2a 0a 58 20 2a 20 33 |ation..X| *.X * 3|
|00001370| 2e 20 41 6c 74 65 72 65 | 64 20 76 65 72 73 69 6f |. Altere|d versio|
|00001380| 6e 73 20 6d 75 73 74 20 | 62 65 20 70 6c 61 69 6e |ns must |be plain|
|00001390| 6c 79 20 6d 61 72 6b 65 | 64 20 61 73 20 73 75 63 |ly marke|d as suc|
|000013a0| 68 2c 20 61 6e 64 20 6d | 75 73 74 20 6e 6f 74 20 |h, and m|ust not |
|000013b0| 62 65 0a 58 20 2a 20 20 | 20 20 6d 69 73 72 65 70 |be.X * | misrep|
|000013c0| 72 65 73 65 6e 74 65 64 | 20 61 73 20 62 65 69 6e |resented| as bein|
|000013d0| 67 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 73 |g the or|iginal s|
|000013e0| 6f 66 74 77 61 72 65 2e | 20 20 53 69 6e 63 65 20 |oftware.| Since |
|000013f0| 66 65 77 20 75 73 65 72 | 73 0a 58 20 2a 20 20 20 |few user|s.X * |
|00001400| 20 65 76 65 72 20 72 65 | 61 64 20 73 6f 75 72 63 | ever re|ad sourc|
|00001410| 65 73 2c 20 63 72 65 64 | 69 74 73 20 6d 75 73 74 |es, cred|its must|
|00001420| 20 61 70 70 65 61 72 20 | 69 6e 20 74 68 65 20 64 | appear |in the d|
|00001430| 6f 63 75 6d 65 6e 74 61 | 74 69 6f 6e 2e 0a 58 20 |ocumenta|tion..X |
|00001440| 2a 0a 58 20 2a 20 34 2e | 20 54 68 69 73 20 6e 6f |*.X * 4.| This no|
|00001450| 74 69 63 65 20 6d 61 79 | 20 6e 6f 74 20 62 65 20 |tice may| not be |
|00001460| 72 65 6d 6f 76 65 64 20 | 6f 72 20 61 6c 74 65 72 |removed |or alter|
|00001470| 65 64 2e 0a 58 20 2a 2f | 0a 58 0a 58 20 2f 2a 0a |ed..X */|.X.X /*.|
|00001480| 58 20 20 2a 20 54 68 69 | 73 20 6e 6f 74 69 63 65 |X * Thi|s notice|
|00001490| 20 69 73 20 63 6f 70 69 | 65 64 20 66 72 6f 6d 20 | is copi|ed from |
|000014a0| 74 68 61 74 20 69 6e 63 | 6c 75 64 65 64 20 77 69 |that inc|luded wi|
|000014b0| 74 68 20 63 6e 65 77 73 | 2c 20 77 68 69 63 68 20 |th cnews|, which |
|000014c0| 77 61 73 0a 58 20 20 2a | 20 77 72 69 74 74 65 6e |was.X *| written|
|000014d0| 20 28 6d 6f 73 74 6c 79 | 29 20 62 79 20 47 65 6f | (mostly|) by Geo|
|000014e0| 66 66 72 65 79 20 43 6f | 6c 6c 79 65 72 20 61 6e |ffrey Co|llyer an|
|000014f0| 64 20 48 65 6e 72 79 20 | 53 70 65 6e 63 65 72 2e |d Henry |Spencer.|
|00001500| 0a 58 20 20 2a 2f 0a 45 | 4e 44 5f 4f 46 5f 46 49 |.X */.E|ND_OF_FI|
|00001510| 4c 45 0a 69 66 20 74 65 | 73 74 20 31 30 32 36 20 |LE.if te|st 1026 |
|00001520| 2d 6e 65 20 60 77 63 20 | 2d 63 20 3c 27 43 4f 50 |-ne `wc |-c <'COP|
|00001530| 59 52 49 47 48 54 27 60 | 3b 20 74 68 65 6e 0a 20 |YRIGHT'`|; then. |
|00001540| 20 20 20 65 63 68 6f 20 | 73 68 61 72 3a 20 5c 22 | echo |shar: \"|
|00001550| 27 43 4f 50 59 52 49 47 | 48 54 27 5c 22 20 75 6e |'COPYRIG|HT'\" un|
|00001560| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|00001570| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|00001580| 20 6f 66 20 27 43 4f 50 | 59 52 49 47 48 54 27 0a | of 'COP|YRIGHT'.|
|00001590| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 4d |fi.if te|st -f 'M|
|000015a0| 61 6b 65 66 69 6c 65 27 | 20 2d 61 20 22 24 7b 31 |akefile'| -a "${1|
|000015b0| 7d 22 20 21 3d 20 22 2d | 63 22 20 3b 20 74 68 65 |}" != "-|c" ; the|
|000015c0| 6e 20 0a 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |n . ech|o shar: |
|000015d0| 57 69 6c 6c 20 6e 6f 74 | 20 63 6c 6f 62 62 65 72 |Will not| clobber|
|000015e0| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|000015f0| 22 27 4d 61 6b 65 66 69 | 6c 65 27 5c 22 0a 65 6c |"'Makefi|le'\".el|
|00001600| 73 65 0a 65 63 68 6f 20 | 73 68 61 72 3a 20 45 78 |se.echo |shar: Ex|
|00001610| 74 72 61 63 74 69 6e 67 | 20 5c 22 27 4d 61 6b 65 |tracting| \"'Make|
|00001620| 66 69 6c 65 27 5c 22 20 | 5c 28 31 32 39 20 63 68 |file'\" |\(129 ch|
|00001630| 61 72 61 63 74 65 72 73 | 5c 29 0a 73 65 64 20 22 |aracters|\).sed "|
|00001640| 73 2f 5e 58 2f 2f 22 20 | 3e 27 4d 61 6b 65 66 69 |s/^X//" |>'Makefi|
|00001650| 6c 65 27 20 3c 3c 27 45 | 4e 44 5f 4f 46 5f 46 49 |le' <<'E|ND_OF_FI|
|00001660| 4c 45 27 0a 58 43 43 20 | 3d 20 67 63 63 20 2d 57 |LE'.XCC |= gcc -W|
|00001670| 61 6c 6c 0a 58 43 46 4c | 41 47 53 20 3d 20 2d 4f |all.XCFL|AGS = -O|
|00001680| 20 23 20 2d 44 44 45 42 | 55 47 0a 58 4c 44 46 4c | # -DDEB|UG.XLDFL|
|00001690| 41 47 53 20 3d 20 23 20 | 2d 73 68 6c 69 62 0a 58 |AGS = # |-shlib.X|
|000016a0| 0a 58 70 61 63 6b 64 69 | 73 6b 3a 20 70 61 63 6b |.Xpackdi|sk: pack|
|000016b0| 64 69 73 6b 2e 6f 0a 58 | 09 24 28 43 43 29 20 24 |disk.o.X|.$(CC) $|
|000016c0| 28 43 46 4c 41 47 53 29 | 20 24 28 4c 44 46 4c 41 |(CFLAGS)| $(LDFLA|
|000016d0| 47 53 29 20 2d 6f 20 70 | 61 63 6b 64 69 73 6b 20 |GS) -o p|ackdisk |
|000016e0| 70 61 63 6b 64 69 73 6b | 2e 6f 0a 45 4e 44 5f 4f |packdisk|.o.END_O|
|000016f0| 46 5f 46 49 4c 45 0a 69 | 66 20 74 65 73 74 20 31 |F_FILE.i|f test 1|
|00001700| 32 39 20 2d 6e 65 20 60 | 77 63 20 2d 63 20 3c 27 |29 -ne `|wc -c <'|
|00001710| 4d 61 6b 65 66 69 6c 65 | 27 60 3b 20 74 68 65 6e |Makefile|'`; then|
|00001720| 0a 20 20 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |. ech|o shar: |
|00001730| 5c 22 27 4d 61 6b 65 66 | 69 6c 65 27 5c 22 20 75 |\"'Makef|ile'\" u|
|00001740| 6e 70 61 63 6b 65 64 20 | 77 69 74 68 20 77 72 6f |npacked |with wro|
|00001750| 6e 67 20 73 69 7a 65 21 | 0a 66 69 0a 23 20 65 6e |ng size!|.fi.# en|
|00001760| 64 20 6f 66 20 27 4d 61 | 6b 65 66 69 6c 65 27 0a |d of 'Ma|kefile'.|
|00001770| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 70 |fi.if te|st -f 'p|
|00001780| 61 63 6b 64 69 73 6b 2e | 63 27 20 2d 61 20 22 24 |ackdisk.|c' -a "$|
|00001790| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|000017a0| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen . e|cho shar|
|000017b0| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 63 6c 6f 62 62 |: Will n|ot clobb|
|000017c0| 65 72 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |er exist|ing file|
|000017d0| 20 5c 22 27 70 61 63 6b | 64 69 73 6b 2e 63 27 5c | \"'pack|disk.c'\|
|000017e0| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|000017f0| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|00001800| 70 61 63 6b 64 69 73 6b | 2e 63 27 5c 22 20 5c 28 |packdisk|.c'\" \(|
|00001810| 31 31 33 39 33 20 63 68 | 61 72 61 63 74 65 72 73 |11393 ch|aracters|
|00001820| 5c 29 0a 73 65 64 20 22 | 73 2f 5e 58 2f 2f 22 20 |\).sed "|s/^X//" |
|00001830| 3e 27 70 61 63 6b 64 69 | 73 6b 2e 63 27 20 3c 3c |>'packdi|sk.c' <<|
|00001840| 27 45 4e 44 5f 4f 46 5f | 46 49 4c 45 27 0a 58 2f |'END_OF_|FILE'.X/|
|00001850| 2a 0a 58 20 2a 0a 58 20 | 2a 20 54 68 69 73 20 70 |*.X *.X |* This p|
|00001860| 72 6f 67 72 61 6d 20 74 | 61 6b 65 73 20 61 20 64 |rogram t|akes a d|
|00001870| 69 73 6b 20 61 6e 64 20 | 6d 61 6b 65 73 20 61 6c |isk and |makes al|
|00001880| 6c 20 74 68 65 20 66 69 | 6c 65 73 20 61 6e 64 20 |l the fi|les and |
|00001890| 64 69 72 65 63 74 6f 72 | 69 65 73 2c 0a 58 20 2a |director|ies,.X *|
|000018a0| 20 61 6e 64 20 74 68 65 | 20 66 72 65 65 20 6c 69 | and the| free li|
|000018b0| 73 74 2c 20 63 6f 6e 74 | 69 67 75 6f 75 73 2e 0a |st, cont|iguous..|
|000018c0| 58 20 2a 0a 58 20 2a 20 | 09 09 09 09 09 09 41 6e |X *.X * |......An|
|000018d0| 64 72 65 77 20 46 79 66 | 65 0a 58 20 2a 09 09 09 |drew Fyf|e.X *...|
|000018e0| 09 09 09 37 20 4f 63 74 | 6f 62 65 72 20 31 39 38 |...7 Oct|ober 198|
|000018f0| 39 0a 58 20 2a 0a 58 20 | 2a 09 09 09 09 09 09 61 |9.X *.X |*......a|
|00001900| 6e 64 79 40 63 73 76 61 | 78 2e 63 61 6c 74 65 63 |ndy@csva|x.caltec|
|00001910| 68 2e 65 64 75 0a 58 20 | 2a 2f 0a 58 0a 58 23 69 |h.edu.X |*/.X.X#i|
|00001920| 6e 63 6c 75 64 65 20 3c | 73 79 73 2f 66 69 6c 73 |nclude <|sys/fils|
|00001930| 79 73 2e 68 3e 0a 58 23 | 69 6e 63 6c 75 64 65 20 |ys.h>.X#|include |
|00001940| 3c 73 79 73 2f 69 6e 6f | 2e 68 3e 0a 58 23 69 6e |<sys/ino|.h>.X#in|
|00001950| 63 6c 75 64 65 20 3c 73 | 79 73 2f 73 74 61 74 2e |clude <s|ys/stat.|
|00001960| 68 3e 0a 58 23 69 6e 63 | 6c 75 64 65 20 3c 73 74 |h>.X#inc|lude <st|
|00001970| 64 69 6f 2e 68 3e 0a 58 | 23 69 6e 63 6c 75 64 65 |dio.h>.X|#include|
|00001980| 20 3c 73 74 64 6c 69 62 | 2e 68 3e 0a 58 0a 58 23 | <stdlib|.h>.X.X#|
|00001990| 64 65 66 69 6e 65 20 4e | 55 4d 5f 41 44 44 52 09 |define N|UM_ADDR.|
|000019a0| 31 33 0a 58 23 64 65 66 | 69 6e 65 20 46 49 52 53 |13.X#def|ine FIRS|
|000019b0| 54 5f 49 4e 44 49 52 09 | 31 30 20 20 20 2f 2a 20 |T_INDIR.|10 /* |
|000019c0| 30 2d 39 20 64 69 72 65 | 63 74 2c 20 31 30 20 73 |0-9 dire|ct, 10 s|
|000019d0| 69 6e 67 6c 65 2c 20 31 | 31 20 64 6f 75 62 6c 65 |ingle, 1|1 double|
|000019e0| 2c 20 31 32 20 74 72 69 | 70 6c 65 20 2a 2f 0a 58 |, 12 tri|ple */.X|
|000019f0| 23 64 65 66 69 6e 65 20 | 4e 55 4d 5f 49 4e 44 49 |#define |NUM_INDI|
|00001a00| 52 09 28 4e 55 4d 5f 41 | 44 44 52 20 2d 20 46 49 |R.(NUM_A|DDR - FI|
|00001a10| 52 53 54 5f 49 4e 44 49 | 52 29 0a 58 0a 58 63 68 |RST_INDI|R).X.Xch|
|00001a20| 61 72 20 2a 63 6d 64 5f | 6e 61 6d 65 3b 0a 58 69 |ar *cmd_|name;.Xi|
|00001a30| 6e 74 20 64 69 73 6b 2c | 20 64 65 76 3b 0a 58 0a |nt disk,| dev;.X.|
|00001a40| 58 73 74 72 75 63 74 20 | 66 69 6c 73 79 73 20 66 |Xstruct |filsys f|
|00001a50| 69 6c 73 79 73 3b 0a 58 | 0a 58 73 74 72 75 63 74 |ilsys;.X|.Xstruct|
|00001a60| 20 64 69 6e 6f 64 65 20 | 69 6e 6f 3b 09 2f 2a 20 | dinode |ino;./* |
|00001a70| 63 75 72 72 65 6e 74 20 | 77 6f 72 6b 69 6e 67 20 |current |working |
|00001a80| 69 6e 6f 64 65 2c 20 61 | 6e 64 20 69 74 73 20 6e |inode, a|nd its n|
|00001a90| 75 6d 62 65 72 20 2a 2f | 0a 58 69 6e 6f 5f 74 20 |umber */|.Xino_t |
|00001aa0| 77 5f 69 6e 6f 3b 0a 58 | 0a 58 63 68 61 72 20 2a |w_ino;.X|.Xchar *|
|00001ab0| 69 6e 6f 64 65 5f 62 6c | 6f 63 6b 3b 09 2f 2a 20 |inode_bl|ock;./* |
|00001ac0| 62 6c 6f 63 6b 20 63 6f | 6e 74 61 69 6e 69 6e 67 |block co|ntaining|
|00001ad0| 20 6c 61 73 74 20 72 65 | 61 64 2f 77 72 69 74 74 | last re|ad/writt|
|00001ae0| 65 6e 20 69 6e 6f 64 65 | 20 2a 2f 0a 58 64 61 64 |en inode| */.Xdad|
|00001af0| 64 72 5f 74 20 77 5f 69 | 6e 6f 5f 62 6c 6b 3b 09 |dr_t w_i|no_blk;.|
|00001b00| 2f 2a 20 61 6e 64 20 69 | 74 73 20 6e 75 6d 62 65 |/* and i|ts numbe|
|00001b10| 72 20 2a 2f 0a 58 0a 58 | 63 68 61 72 20 2a 69 6e |r */.X.X|char *in|
|00001b20| 64 69 72 5b 4e 55 4d 5f | 49 4e 44 49 52 5d 3b 09 |dir[NUM_|INDIR];.|
|00001b30| 09 2f 2a 20 63 75 72 72 | 65 6e 74 20 77 6f 72 6b |./* curr|ent work|
|00001b40| 69 6e 67 20 69 6e 64 69 | 72 65 63 74 20 62 6c 6f |ing indi|rect blo|
|00001b50| 63 6b 73 20 2a 2f 0a 58 | 64 61 64 64 72 5f 74 20 |cks */.X|daddr_t |
|00001b60| 77 5f 69 6e 64 69 72 5b | 4e 55 4d 5f 49 4e 44 49 |w_indir[|NUM_INDI|
|00001b70| 52 5d 3b 09 2f 2a 20 61 | 6e 64 20 74 68 65 69 72 |R];./* a|nd their|
|00001b80| 20 6e 75 6d 62 65 72 73 | 20 2a 2f 0a 58 0a 58 64 | numbers| */.X.Xd|
|00001b90| 61 64 64 72 5f 74 20 6e | 65 78 74 5f 66 69 6c 6c |addr_t n|ext_fill|
|00001ba0| 3b 09 2f 2a 20 6e 65 78 | 74 20 28 73 65 71 75 65 |;./* nex|t (seque|
|00001bb0| 6e 74 69 61 6c 29 20 62 | 6c 6f 63 6b 20 74 6f 20 |ntial) b|lock to |
|00001bc0| 66 69 6c 6c 20 2a 2f 0a | 58 0a 58 63 68 61 72 20 |fill */.|X.Xchar |
|00001bd0| 2a 69 6e 6f 64 65 5f 74 | 61 62 6c 65 3b 09 2f 2a |*inode_t|able;./*|
|00001be0| 20 61 20 63 61 63 68 65 | 20 6f 66 20 74 68 65 20 | a cache| of the |
|00001bf0| 65 6e 74 69 72 65 20 69 | 6e 6f 64 65 20 73 65 63 |entire i|node sec|
|00001c00| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 64 69 73 6b |tion of |the disk|
|00001c10| 20 2a 2f 0a 58 0a 58 6c | 6f 6e 67 20 2a 6d 61 70 | */.X.Xl|ong *map|
|00001c20| 3b 09 2f 2a 20 61 20 6d | 61 70 20 66 72 6f 6d 20 |;./* a m|ap from |
|00001c30| 62 6c 6f 63 6b 20 6e 75 | 6d 62 65 72 73 20 74 6f |block nu|mbers to|
|00001c40| 20 72 65 66 65 72 65 6e | 63 69 6e 67 20 69 6e 6f | referen|cing ino|
|00001c50| 64 65 2f 69 6e 64 69 72 | 20 62 6c 6f 63 6b 20 2a |de/indir| block *|
|00001c60| 2f 0a 58 0a 58 73 74 61 | 74 69 63 20 76 6f 69 64 |/.X.Xsta|tic void|
|00001c70| 20 72 65 61 64 5f 73 75 | 70 65 72 62 6c 6b 28 76 | read_su|perblk(v|
|00001c80| 6f 69 64 29 3b 0a 58 73 | 74 61 74 69 63 20 76 6f |oid);.Xs|tatic vo|
|00001c90| 69 64 20 77 72 69 74 65 | 5f 73 75 70 65 72 62 6c |id write|_superbl|
|00001ca0| 6b 28 76 6f 69 64 29 3b | 0a 58 73 74 61 74 69 63 |k(void);|.Xstatic|
|00001cb0| 20 76 6f 69 64 20 6d 61 | 70 5f 69 6e 6f 64 65 28 | void ma|p_inode(|
|00001cc0| 69 6e 6f 5f 74 20 69 6e | 6f 64 65 29 3b 0a 58 73 |ino_t in|ode);.Xs|
|00001cd0| 74 61 74 69 63 20 76 6f | 69 64 20 75 70 64 61 74 |tatic vo|id updat|
|00001ce0| 65 5f 6d 61 70 28 6c 6f | 6e 67 20 6d 61 70 5f 65 |e_map(lo|ng map_e|
|00001cf0| 6e 74 72 79 2c 20 64 61 | 64 64 72 5f 74 20 62 6c |ntry, da|ddr_t bl|
|00001d00| 6f 63 6b 2c 20 69 6e 74 | 20 6c 65 76 65 6c 29 3b |ock, int| level);|
|00001d10| 0a 58 73 74 61 74 69 63 | 20 76 6f 69 64 20 72 65 |.Xstatic| void re|
|00001d20| 61 64 5f 62 6c 6f 63 6b | 28 64 61 64 64 72 5f 74 |ad_block|(daddr_t|
|00001d30| 20 62 6c 6f 63 6b 2c 20 | 76 6f 69 64 20 2a 62 75 | block, |void *bu|
|00001d40| 66 29 3b 0a 58 73 74 61 | 74 69 63 20 76 6f 69 64 |f);.Xsta|tic void|
|00001d50| 20 77 72 69 74 65 5f 62 | 6c 6f 63 6b 28 64 61 64 | write_b|lock(dad|
|00001d60| 64 72 5f 74 20 62 6c 6f | 63 6b 2c 20 76 6f 69 64 |dr_t blo|ck, void|
|00001d70| 20 2a 62 75 66 29 3b 0a | 58 73 74 61 74 69 63 20 | *buf);.|Xstatic |
|00001d80| 76 6f 69 64 20 72 65 61 | 64 5f 69 6e 6f 64 65 28 |void rea|d_inode(|
|00001d90| 69 6e 6f 5f 74 20 69 6e | 6f 64 65 2c 20 73 74 72 |ino_t in|ode, str|
|00001da0| 75 63 74 20 64 69 6e 6f | 64 65 20 2a 62 75 66 29 |uct dino|de *buf)|
|00001db0| 3b 0a 58 73 74 61 74 69 | 63 20 76 6f 69 64 20 77 |;.Xstati|c void w|
|00001dc0| 72 69 74 65 5f 69 6e 6f | 64 65 28 69 6e 6f 5f 74 |rite_ino|de(ino_t|
|00001dd0| 20 69 6e 6f 64 65 2c 20 | 73 74 72 75 63 74 20 64 | inode, |struct d|
|00001de0| 69 6e 6f 64 65 20 2a 62 | 75 66 29 3b 0a 58 73 74 |inode *b|uf);.Xst|
|00001df0| 61 74 69 63 20 76 6f 69 | 64 20 6d 6f 76 65 5f 62 |atic voi|d move_b|
|00001e00| 6c 6f 63 6b 28 64 61 64 | 64 72 5f 74 20 66 72 6f |lock(dad|dr_t fro|
|00001e10| 6d 2c 20 64 61 64 64 72 | 5f 74 20 74 6f 29 3b 0a |m, daddr|_t to);.|
|00001e20| 58 73 74 61 74 69 63 20 | 76 6f 69 64 20 6d 6f 76 |Xstatic |void mov|
|00001e30| 65 5f 69 6e 6f 64 65 28 | 69 6e 6f 5f 74 20 69 6e |e_inode(|ino_t in|
|00001e40| 6f 64 65 29 3b 0a 58 73 | 74 61 74 69 63 20 76 6f |ode);.Xs|tatic vo|
|00001e50| 69 64 20 6d 6f 76 65 5f | 69 6e 64 69 72 65 63 74 |id move_|indirect|
|00001e60| 28 64 61 64 64 72 5f 74 | 20 62 6c 6f 63 6b 2c 20 |(daddr_t| block, |
|00001e70| 69 6e 74 20 6c 65 76 65 | 6c 29 3b 0a 58 73 74 61 |int leve|l);.Xsta|
|00001e80| 74 69 63 20 76 6f 69 64 | 20 6d 61 6b 65 5f 68 6f |tic void| make_ho|
|00001e90| 6c 65 28 76 6f 69 64 29 | 3b 0a 58 73 74 61 74 69 |le(void)|;.Xstati|
|00001ea0| 63 20 76 6f 69 64 20 72 | 65 62 75 69 6c 64 5f 66 |c void r|ebuild_f|
|00001eb0| 72 65 65 5f 6c 69 73 74 | 28 76 6f 69 64 29 3b 0a |ree_list|(void);.|
|00001ec0| 58 0a 58 65 78 74 65 72 | 6e 20 76 6f 69 64 20 6c |X.Xexter|n void l|
|00001ed0| 33 74 6f 6c 28 6c 6f 6e | 67 20 2a 2c 20 63 68 61 |3tol(lon|g *, cha|
|00001ee0| 72 20 2a 2c 20 69 6e 74 | 20 6c 65 6e 67 74 68 29 |r *, int| length)|
|00001ef0| 3b 0a 58 65 78 74 65 72 | 6e 20 76 6f 69 64 20 6c |;.Xexter|n void l|
|00001f00| 74 6f 6c 33 28 63 68 61 | 72 20 2a 2c 20 6c 6f 6e |tol3(cha|r *, lon|
|00001f10| 67 20 2a 2c 20 69 6e 74 | 20 6c 65 6e 67 74 68 29 |g *, int| length)|
|00001f20| 3b 0a 58 0a 58 76 6f 69 | 64 0a 58 6d 61 69 6e 28 |;.X.Xvoi|d.Xmain(|
|00001f30| 69 6e 74 20 61 72 67 63 | 2c 20 63 68 61 72 20 2a |int argc|, char *|
|00001f40| 61 72 67 76 5b 5d 29 0a | 58 7b 0a 58 20 20 20 20 |argv[]).|X{.X |
|00001f50| 69 6e 6f 5f 74 20 69 6e | 6f 64 65 2c 20 74 6f 74 |ino_t in|ode, tot|
|00001f60| 61 6c 5f 69 6e 6f 64 65 | 73 3b 0a 58 20 20 20 20 |al_inode|s;.X |
|00001f70| 64 61 64 64 72 5f 74 20 | 62 6c 6f 63 6b 3b 0a 58 |daddr_t |block;.X|
|00001f80| 20 20 20 20 69 6e 74 20 | 69 3b 0a 58 20 20 20 20 | int |i;.X |
|00001f90| 63 68 61 72 20 2a 63 74 | 69 6d 65 28 6c 6f 6e 67 |char *ct|ime(long|
|00001fa0| 20 2a 29 3b 0a 58 23 69 | 66 6e 64 65 66 20 44 45 | *);.X#i|fndef DE|
|00001fb0| 42 55 47 0a 58 20 20 20 | 20 73 74 72 75 63 74 20 |BUG.X | struct |
|00001fc0| 73 74 61 74 20 73 74 61 | 74 62 3b 0a 58 20 20 20 |stat sta|tb;.X |
|00001fd0| 20 65 78 74 65 72 6e 20 | 69 6e 74 20 73 74 61 74 | extern |int stat|
|00001fe0| 28 63 6f 6e 73 74 20 63 | 68 61 72 20 2a 2c 20 73 |(const c|har *, s|
|00001ff0| 74 72 75 63 74 20 73 74 | 61 74 20 2a 29 3b 0a 58 |truct st|at *);.X|
|00002000| 23 65 6e 64 69 66 0a 58 | 0a 58 20 20 20 20 63 6d |#endif.X|.X cm|
|00002010| 64 5f 6e 61 6d 65 20 3d | 20 61 72 67 76 5b 30 5d |d_name =| argv[0]|
|00002020| 3b 0a 58 0a 58 20 20 20 | 20 69 66 20 28 61 72 67 |;.X.X | if (arg|
|00002030| 63 20 21 3d 20 32 29 20 | 7b 0a 58 09 66 70 72 69 |c != 2) |{.X.fpri|
|00002040| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 25 73 3a |ntf(stde|rr, "%s:|
|00002050| 20 55 73 61 67 65 3a 20 | 25 73 20 3c 66 69 6c 65 | Usage: |%s <file|
|00002060| 20 73 79 73 74 65 6d 3e | 5c 6e 22 2c 0a 58 09 20 | system>|\n",.X. |
|00002070| 20 20 20 63 6d 64 5f 6e | 61 6d 65 2c 20 63 6d 64 | cmd_n|ame, cmd|
|00002080| 5f 6e 61 6d 65 29 3b 0a | 58 09 65 78 69 74 28 31 |_name);.|X.exit(1|
|00002090| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 0a 58 23 69 66 |);.X |}.X.X#if|
|000020a0| 6e 64 65 66 20 44 45 42 | 55 47 0a 58 20 20 20 20 |ndef DEB|UG.X |
|000020b0| 69 66 20 28 73 74 61 74 | 28 61 72 67 76 5b 31 5d |if (stat|(argv[1]|
|000020c0| 2c 20 26 73 74 61 74 62 | 29 20 3c 20 30 29 20 7b |, &statb|) < 0) {|
|000020d0| 0a 58 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |.X.fprin|tf(stder|
|000020e0| 72 2c 20 22 25 73 3a 20 | 63 61 6e 27 74 20 73 74 |r, "%s: |can't st|
|000020f0| 61 74 20 25 73 3a 20 22 | 2c 20 63 6d 64 5f 6e 61 |at %s: "|, cmd_na|
|00002100| 6d 65 2c 20 61 72 67 76 | 5b 31 5d 29 3b 0a 58 09 |me, argv|[1]);.X.|
|00002110| 70 65 72 72 6f 72 28 22 | 22 29 3b 0a 58 09 65 78 |perror("|");.X.ex|
|00002120| 69 74 28 31 29 3b 0a 58 | 20 20 20 20 7d 0a 58 20 |it(1);.X| }.X |
|00002130| 20 20 20 69 66 20 28 28 | 73 74 61 74 62 2e 73 74 | if ((|statb.st|
|00002140| 5f 6d 6f 64 65 20 26 20 | 53 5f 49 46 4d 54 29 20 |_mode & |S_IFMT) |
|00002150| 21 3d 20 53 5f 49 46 43 | 48 52 29 20 7b 0a 58 09 |!= S_IFC|HR) {.X.|
|00002160| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00002170| 22 25 73 3a 20 25 73 20 | 69 73 20 6e 6f 74 20 61 |"%s: %s |is not a|
|00002180| 20 63 68 61 72 61 63 74 | 65 72 20 64 65 76 69 63 | charact|er devic|
|00002190| 65 5c 6e 22 2c 0a 58 09 | 20 20 20 20 63 6d 64 5f |e\n",.X.| cmd_|
|000021a0| 6e 61 6d 65 2c 20 61 72 | 67 76 5b 31 5d 29 3b 0a |name, ar|gv[1]);.|
|000021b0| 58 09 65 78 69 74 28 31 | 29 3b 0a 58 20 20 20 20 |X.exit(1|);.X |
|000021c0| 7d 0a 58 23 65 6e 64 69 | 66 0a 58 0a 58 20 20 20 |}.X#endi|f.X.X |
|000021d0| 20 64 69 73 6b 20 3d 20 | 6f 70 65 6e 28 61 72 67 | disk = |open(arg|
|000021e0| 76 5b 31 5d 2c 20 32 2c | 20 30 29 3b 0a 58 20 20 |v[1], 2,| 0);.X |
|000021f0| 20 20 69 66 20 28 64 69 | 73 6b 20 3c 20 30 29 20 | if (di|sk < 0) |
|00002200| 7b 0a 58 09 66 70 72 69 | 6e 74 66 28 73 74 64 65 |{.X.fpri|ntf(stde|
|00002210| 72 72 2c 20 22 25 73 3a | 20 63 61 6e 27 74 20 6f |rr, "%s:| can't o|
|00002220| 70 65 6e 20 25 73 3a 20 | 22 2c 20 63 6d 64 5f 6e |pen %s: |", cmd_n|
|00002230| 61 6d 65 2c 20 61 72 67 | 76 5b 31 5d 29 3b 0a 58 |ame, arg|v[1]);.X|
|00002240| 09 70 65 72 72 6f 72 28 | 22 22 29 3b 0a 58 09 65 |.perror(|"");.X.e|
|00002250| 78 69 74 28 31 29 3b 0a | 58 20 20 20 20 7d 0a 58 |xit(1);.|X }.X|
|00002260| 0a 58 20 20 20 20 72 65 | 61 64 5f 73 75 70 65 72 |.X re|ad_super|
|00002270| 62 6c 6b 28 29 3b 0a 58 | 0a 58 20 20 20 20 74 6f |blk();.X|.X to|
|00002280| 74 61 6c 5f 69 6e 6f 64 | 65 73 20 3d 20 28 66 69 |tal_inod|es = (fi|
|00002290| 6c 73 79 73 2e 73 5f 69 | 73 69 7a 65 20 2d 20 46 |lsys.s_i|size - F|
|000022a0| 73 49 54 4f 44 28 64 65 | 76 2c 20 52 4f 4f 54 49 |sITOD(de|v, ROOTI|
|000022b0| 4e 4f 29 29 20 2a 20 46 | 73 49 4e 4f 50 42 28 64 |NO)) * F|sINOPB(d|
|000022c0| 65 76 29 3b 0a 58 20 20 | 20 20 66 70 72 69 6e 74 |ev);.X | fprint|
|000022d0| 66 28 73 74 64 65 72 72 | 2c 20 22 46 69 6c 65 20 |f(stderr|, "File |
|000022e0| 73 79 73 74 65 6d 3a 20 | 6e 61 6d 65 3a 20 5c 22 |system: |name: \"|
|000022f0| 25 2e 36 73 5c 22 2c 20 | 70 61 63 6b 3a 20 5c 22 |%.6s\", |pack: \"|
|00002300| 25 2e 36 73 5c 22 5c 6e | 22 2c 0a 58 09 66 69 6c |%.6s\"\n|",.X.fil|
|00002310| 73 79 73 2e 73 5f 66 6e | 61 6d 65 2c 20 66 69 6c |sys.s_fn|ame, fil|
|00002320| 73 79 73 2e 73 5f 66 70 | 61 63 6b 29 3b 0a 58 20 |sys.s_fp|ack);.X |
|00002330| 20 20 20 66 70 72 69 6e | 74 66 28 73 74 64 65 72 | fprin|tf(stder|
|00002340| 72 2c 20 22 5c 74 6c 61 | 73 74 20 6d 6f 64 69 66 |r, "\tla|st modif|
|00002350| 69 65 64 20 6f 6e 20 25 | 73 22 2c 20 63 74 69 6d |ied on %|s", ctim|
|00002360| 65 28 26 66 69 6c 73 79 | 73 2e 73 5f 74 69 6d 65 |e(&filsy|s.s_time|
|00002370| 29 29 3b 0a 58 20 20 20 | 20 66 70 72 69 6e 74 66 |));.X | fprintf|
|00002380| 28 73 74 64 65 72 72 2c | 0a 58 09 22 5c 74 74 6f |(stderr,|.X."\tto|
|00002390| 74 61 6c 20 69 6e 6f 64 | 65 73 20 3d 20 25 64 2c |tal inod|es = %d,|
|000023a0| 20 64 61 74 61 20 62 6c | 6f 63 6b 73 20 3d 20 25 | data bl|ocks = %|
|000023b0| 64 2c 20 74 6f 74 61 6c | 20 3d 20 25 64 20 62 6c |d, total| = %d bl|
|000023c0| 6f 63 6b 73 5c 6e 22 2c | 0a 58 09 74 6f 74 61 6c |ocks\n",|.X.total|
|000023d0| 5f 69 6e 6f 64 65 73 2c | 20 66 69 6c 73 79 73 2e |_inodes,| filsys.|
|000023e0| 73 5f 66 73 69 7a 65 20 | 2d 20 66 69 6c 73 79 73 |s_fsize |- filsys|
|000023f0| 2e 73 5f 69 73 69 7a 65 | 2c 20 66 69 6c 73 79 73 |.s_isize|, filsys|
|00002400| 2e 73 5f 66 73 69 7a 65 | 29 3b 0a 58 20 20 20 20 |.s_fsize|);.X |
|00002410| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00002420| 22 5c 74 66 72 65 65 20 | 62 6c 6f 63 6b 73 20 3d |"\tfree |blocks =|
|00002430| 20 25 64 2c 20 66 72 65 | 65 20 69 6e 6f 64 65 73 | %d, fre|e inodes|
|00002440| 20 3d 20 25 64 5c 6e 22 | 2c 0a 58 09 66 69 6c 73 | = %d\n"|,.X.fils|
|00002450| 79 73 2e 73 5f 74 66 72 | 65 65 2c 20 66 69 6c 73 |ys.s_tfr|ee, fils|
|00002460| 79 73 2e 73 5f 74 69 6e | 6f 64 65 29 3b 0a 58 0a |ys.s_tin|ode);.X.|
|00002470| 58 20 20 20 20 66 6f 72 | 20 28 69 20 3d 20 30 3b |X for| (i = 0;|
|00002480| 20 69 20 3c 20 4e 55 4d | 5f 49 4e 44 49 52 3b 20 | i < NUM|_INDIR; |
|00002490| 2b 2b 69 29 20 7b 0a 58 | 09 77 5f 69 6e 64 69 72 |++i) {.X|.w_indir|
|000024a0| 5b 69 5d 20 3d 20 30 3b | 0a 58 09 69 6e 64 69 72 |[i] = 0;|.X.indir|
|000024b0| 5b 69 5d 20 3d 20 6d 61 | 6c 6c 6f 63 28 46 73 42 |[i] = ma|lloc(FsB|
|000024c0| 53 49 5a 45 28 64 65 76 | 29 29 3b 0a 58 09 69 66 |SIZE(dev|));.X.if|
|000024d0| 20 28 69 6e 64 69 72 5b | 69 5d 20 3d 3d 20 30 29 | (indir[|i] == 0)|
|000024e0| 20 7b 0a 58 09 20 20 20 | 20 66 70 72 69 6e 74 66 | {.X. | fprintf|
|000024f0| 28 73 74 64 65 72 72 2c | 20 22 25 73 3a 20 63 61 |(stderr,| "%s: ca|
|00002500| 6e 27 74 20 6d 61 6c 6c | 6f 63 20 69 6e 64 69 72 |n't mall|oc indir|
|00002510| 20 62 75 66 66 65 72 20 | 73 70 61 63 65 3a 20 22 | buffer |space: "|
|00002520| 2c 20 63 6d 64 5f 6e 61 | 6d 65 29 3b 0a 58 09 20 |, cmd_na|me);.X. |
|00002530| 20 20 20 70 65 72 72 6f | 72 28 22 22 29 3b 0a 58 | perro|r("");.X|
|00002540| 09 20 20 20 20 65 78 69 | 74 28 31 29 3b 0a 58 09 |. exi|t(1);.X.|
|00002550| 7d 0a 58 20 20 20 20 7d | 0a 58 20 20 20 20 77 5f |}.X }|.X w_|
|00002560| 69 6e 6f 20 3d 20 30 3b | 0a 58 0a 58 20 20 20 20 |ino = 0;|.X.X |
|00002570| 6d 61 70 20 3d 20 63 61 | 6c 6c 6f 63 28 66 69 6c |map = ca|lloc(fil|
|00002580| 73 79 73 2e 73 5f 66 73 | 69 7a 65 2c 20 73 69 7a |sys.s_fs|ize, siz|
|00002590| 65 6f 66 28 2a 6d 61 70 | 29 29 3b 0a 58 20 20 20 |eof(*map|));.X |
|000025a0| 20 69 66 20 28 6d 61 70 | 20 3d 3d 20 30 29 20 7b | if (map| == 0) {|
|000025b0| 0a 58 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |.X.fprin|tf(stder|
|000025c0| 72 2c 20 22 25 73 3a 20 | 63 61 6e 27 74 20 63 61 |r, "%s: |can't ca|
|000025d0| 6c 6c 6f 63 20 6d 61 70 | 3a 20 22 2c 20 63 6d 64 |lloc map|: ", cmd|
|000025e0| 5f 6e 61 6d 65 29 3b 0a | 58 09 70 65 72 72 6f 72 |_name);.|X.perror|
|000025f0| 28 22 22 29 3b 0a 58 09 | 65 78 69 74 28 31 29 3b |("");.X.|exit(1);|
|00002600| 0a 58 20 20 20 20 7d 0a | 58 0a 58 20 20 20 20 69 |.X }.|X.X i|
|00002610| 6e 6f 64 65 5f 74 61 62 | 6c 65 20 3d 20 6d 61 6c |node_tab|le = mal|
|00002620| 6c 6f 63 28 66 69 6c 73 | 79 73 2e 73 5f 69 73 69 |loc(fils|ys.s_isi|
|00002630| 7a 65 20 2a 20 46 73 42 | 53 49 5a 45 28 64 65 76 |ze * FsB|SIZE(dev|
|00002640| 29 29 3b 0a 58 20 20 20 | 20 69 66 20 28 69 6e 6f |));.X | if (ino|
|00002650| 64 65 5f 74 61 62 6c 65 | 20 3d 3d 20 30 29 20 7b |de_table| == 0) {|
|00002660| 0a 58 09 66 70 72 69 6e | 74 66 28 73 74 64 65 72 |.X.fprin|tf(stder|
|00002670| 72 2c 20 22 25 73 3a 20 | 63 61 6e 27 74 20 6d 61 |r, "%s: |can't ma|
|00002680| 6c 6c 6f 63 20 73 70 61 | 63 65 20 66 6f 72 20 69 |lloc spa|ce for i|
|00002690| 6e 6f 64 65 20 74 61 62 | 6c 65 5c 6e 22 2c 20 63 |node tab|le\n", c|
|000026a0| 6d 64 5f 6e 61 6d 65 29 | 3b 0a 58 09 77 5f 69 6e |md_name)|;.X.w_in|
|000026b0| 6f 5f 62 6c 6b 20 3d 20 | 30 3b 0a 58 09 69 6e 6f |o_blk = |0;.X.ino|
|000026c0| 64 65 5f 62 6c 6f 63 6b | 20 3d 20 6d 61 6c 6c 6f |de_block| = mallo|
|000026d0| 63 28 46 73 42 53 49 5a | 45 28 64 65 76 29 29 3b |c(FsBSIZ|E(dev));|
|000026e0| 0a 58 09 69 66 20 28 69 | 6e 6f 64 65 5f 62 6c 6f |.X.if (i|node_blo|
|000026f0| 63 6b 20 3d 3d 20 30 29 | 20 7b 0a 58 09 20 20 20 |ck == 0)| {.X. |
|00002700| 20 66 70 72 69 6e 74 66 | 28 73 74 64 65 72 72 2c | fprintf|(stderr,|
|00002710| 20 22 25 73 3a 20 63 61 | 6e 27 74 20 6d 61 6c 6c | "%s: ca|n't mall|
|00002720| 6f 63 20 69 6e 6f 64 65 | 20 62 75 66 66 65 72 20 |oc inode| buffer |
|00002730| 73 70 61 63 65 3a 20 22 | 2c 20 63 6d 64 5f 6e 61 |space: "|, cmd_na|
|00002740| 6d 65 29 3b 0a 58 09 20 | 20 20 20 70 65 72 72 6f |me);.X. | perro|
|00002750| 72 28 22 22 29 3b 0a 58 | 09 20 20 20 20 65 78 69 |r("");.X|. exi|
|00002760| 74 28 31 29 3b 0a 58 09 | 7d 0a 58 20 20 20 20 7d |t(1);.X.|}.X }|
|00002770| 0a 58 20 20 20 20 65 6c | 73 65 0a 58 09 66 6f 72 |.X el|se.X.for|
|00002780| 20 28 62 6c 6f 63 6b 20 | 3d 20 46 73 49 54 4f 44 | (block |= FsITOD|
|00002790| 28 64 65 76 2c 20 52 4f | 4f 54 49 4e 4f 29 3b 20 |(dev, RO|OTINO); |
|000027a0| 62 6c 6f 63 6b 20 3c 20 | 66 69 6c 73 79 73 2e 73 |block < |filsys.s|
|000027b0| 5f 69 73 69 7a 65 3b 20 | 2b 2b 62 6c 6f 63 6b 29 |_isize; |++block)|
|000027c0| 0a 58 09 20 20 20 20 72 | 65 61 64 5f 62 6c 6f 63 |.X. r|ead_bloc|
|000027d0| 6b 28 62 6c 6f 63 6b 2c | 20 26 69 6e 6f 64 65 5f |k(block,| &inode_|
|000027e0| 74 61 62 6c 65 5b 62 6c | 6f 63 6b 20 2a 20 46 73 |table[bl|ock * Fs|
|000027f0| 42 53 49 5a 45 28 64 65 | 76 29 5d 29 3b 0a 58 0a |BSIZE(de|v)]);.X.|
|00002800| 58 20 20 20 20 66 70 72 | 69 6e 74 66 28 73 74 64 |X fpr|intf(std|
|00002810| 65 72 72 2c 20 22 6d 61 | 70 70 69 6e 67 2e 2e 2e |err, "ma|pping...|
|00002820| 22 29 3b 0a 58 20 20 20 | 20 66 6f 72 20 28 69 6e |");.X | for (in|
|00002830| 6f 64 65 20 3d 20 52 4f | 4f 54 49 4e 4f 3b 20 69 |ode = RO|OTINO; i|
|00002840| 6e 6f 64 65 20 3c 3d 20 | 74 6f 74 61 6c 5f 69 6e |node <= |total_in|
|00002850| 6f 64 65 73 3b 20 2b 2b | 69 6e 6f 64 65 29 0a 58 |odes; ++|inode).X|
|00002860| 09 6d 61 70 5f 69 6e 6f | 64 65 28 69 6e 6f 64 65 |.map_ino|de(inode|
|00002870| 29 3b 0a 58 20 20 20 20 | 66 70 72 69 6e 74 66 28 |);.X |fprintf(|
|00002880| 73 74 64 65 72 72 2c 20 | 22 64 6f 6e 65 5c 6e 22 |stderr, |"done\n"|
|00002890| 29 3b 0a 58 0a 58 20 20 | 20 20 6e 65 78 74 5f 66 |);.X.X | next_f|
|000028a0| 69 6c 6c 20 3d 20 66 69 | 6c 73 79 73 2e 73 5f 69 |ill = fi|lsys.s_i|
|000028b0| 73 69 7a 65 3b 0a 58 20 | 20 20 20 66 6f 72 20 28 |size;.X | for (|
|000028c0| 69 6e 6f 64 65 20 3d 20 | 52 4f 4f 54 49 4e 4f 3b |inode = |ROOTINO;|
|000028d0| 20 69 6e 6f 64 65 20 3c | 3d 20 74 6f 74 61 6c 5f | inode <|= total_|
|000028e0| 69 6e 6f 64 65 73 3b 20 | 2b 2b 69 6e 6f 64 65 29 |inodes; |++inode)|
|000028f0| 0a 58 09 6d 6f 76 65 5f | 69 6e 6f 64 65 28 69 6e |.X.move_|inode(in|
|00002900| 6f 64 65 29 3b 0a 58 0a | 58 20 20 20 20 66 70 72 |ode);.X.|X fpr|
|00002910| 69 6e 74 66 28 73 74 64 | 65 72 72 2c 20 22 5c 6e |intf(std|err, "\n|
|00002920| 72 65 62 75 69 6c 64 69 | 6e 67 20 74 68 65 20 66 |rebuildi|ng the f|
|00002930| 72 65 65 20 6c 69 73 74 | 5c 6e 22 29 3b 0a 58 20 |ree list|\n");.X |
|00002940| 20 20 20 72 65 62 75 69 | 6c 64 5f 66 72 65 65 5f | rebui|ld_free_|
|00002950| 6c 69 73 74 28 29 3b 0a | 58 0a 58 20 20 20 20 66 |list();.|X.X f|
|00002960| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00002970| 2a 2a 2a 20 52 75 6e 20 | 66 73 63 6b 20 74 6f 20 |*** Run |fsck to |
|00002980| 63 68 65 63 6b 20 6f 75 | 74 20 74 68 65 20 64 69 |check ou|t the di|
|00002990| 73 6b 21 21 21 5c 6e 22 | 29 3b 0a 58 0a 58 20 20 |sk!!!\n"|);.X.X |
|000029a0| 20 20 63 6c 6f 73 65 28 | 64 69 73 6b 29 3b 0a 58 | close(|disk);.X|
|000029b0| 20 20 20 20 65 78 69 74 | 28 30 29 3b 0a 58 7d 0a | exit|(0);.X}.|
|000029c0| 58 0a 58 73 74 61 74 69 | 63 20 76 6f 69 64 0a 58 |X.Xstati|c void.X|
|000029d0| 72 65 61 64 5f 73 75 70 | 65 72 62 6c 6b 28 76 6f |read_sup|erblk(vo|
|000029e0| 69 64 29 0a 58 7b 0a 58 | 20 20 20 20 69 66 20 28 |id).X{.X| if (|
|000029f0| 6c 73 65 65 6b 28 64 69 | 73 6b 2c 20 53 55 50 45 |lseek(di|sk, SUPE|
|00002a00| 52 42 4f 46 46 2c 20 30 | 29 20 21 3d 20 53 55 50 |RBOFF, 0|) != SUP|
|00002a10| 45 52 42 4f 46 46 29 20 | 7b 0a 58 09 66 70 72 69 |ERBOFF) |{.X.fpri|
|00002a20| 6e 74 66 28 73 74 64 65 | 72 72 2c 20 22 25 73 3a |ntf(stde|rr, "%s:|
|00002a30| 20 63 61 6e 27 74 20 73 | 65 65 6b 20 74 6f 20 73 | can't s|eek to s|
|00002a40| 75 70 65 72 62 6c 6f 63 | 6b 3a 20 22 2c 20 63 6d |uperbloc|k: ", cm|
|00002a50| 64 5f 6e 61 6d 65 29 3b | 0a 58 09 70 65 72 72 6f |d_name);|.X.perro|
|00002a60| 72 28 22 22 29 3b 0a 58 | 09 65 78 69 74 28 31 29 |r("");.X|.exit(1)|
|00002a70| 3b 0a 58 20 20 20 20 7d | 0a 58 20 20 20 20 69 66 |;.X }|.X if|
|00002a80| 20 28 72 65 61 64 28 64 | 69 73 6b 2c 20 26 66 69 | (read(d|isk, &fi|
|00002a90| 6c 73 79 73 2c 20 73 69 | 7a 65 6f 66 28 66 69 6c |lsys, si|zeof(fil|
|00002aa0| 73 79 73 29 29 20 21 3d | 20 73 69 7a 65 6f 66 28 |sys)) !=| sizeof(|
|00002ab0| 66 69 6c 73 79 73 29 29 | 20 7b 0a 58 09 66 70 72 |filsys))| {.X.fpr|
|00002ac0| 69 6e 74 66 28 73 74 64 | 65 72 72 2c 20 22 25 73 |intf(std|err, "%s|
|00002ad0| 3a 20 63 61 6e 27 74 20 | 72 65 61 64 20 73 75 70 |: can't |read sup|
|00002ae0| 65 72 62 6c 6f 63 6b 3a | 20 22 2c 20 63 6d 64 5f |erblock:| ", cmd_|
|00002af0| 6e 61 6d 65 29 3b 0a 58 | 09 70 65 72 72 6f 72 28 |name);.X|.perror(|
|00002b00| 22 22 29 3b 0a 58 09 65 | 78 69 74 28 31 29 3b 0a |"");.X.e|xit(1);.|
|00002b10| 58 20 20 20 20 7d 0a 58 | 20 20 20 20 69 66 20 28 |X }.X| if (|
|00002b20| 66 69 6c 73 79 73 2e 73 | 5f 6d 61 67 69 63 20 21 |filsys.s|_magic !|
|00002b30| 3d 20 46 73 4d 41 47 49 | 43 29 20 7b 0a 58 09 66 |= FsMAGI|C) {.X.f|
|00002b40| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00002b50| 25 73 3a 20 69 6e 76 61 | 6c 69 64 20 73 75 70 65 |%s: inva|lid supe|
|00002b60| 72 62 6c 6f 63 6b 20 6d | 61 67 69 63 20 6e 75 6d |rblock m|agic num|
|00002b70| 62 65 72 5c 6e 22 2c 20 | 63 6d 64 5f 6e 61 6d 65 |ber\n", |cmd_name|
|00002b80| 29 3b 0a 58 09 65 78 69 | 74 28 31 29 3b 0a 58 20 |);.X.exi|t(1);.X |
|00002b90| 20 20 20 7d 0a 58 20 20 | 20 20 64 65 76 20 3d 20 | }.X | dev = |
|00002ba0| 28 66 69 6c 73 79 73 2e | 73 5f 74 79 70 65 20 3d |(filsys.|s_type =|
|00002bb0| 3d 20 46 73 32 62 29 20 | 3f 20 46 73 32 42 4c 4b |= Fs2b) |? Fs2BLK|
|00002bc0| 20 3a 20 30 3b 0a 58 7d | 0a 58 0a 58 73 74 61 74 | : 0;.X}|.X.Xstat|
|00002bd0| 69 63 20 76 6f 69 64 0a | 58 77 72 69 74 65 5f 73 |ic void.|Xwrite_s|
|00002be0| 75 70 65 72 62 6c 6b 28 | 76 6f 69 64 29 0a 58 7b |uperblk(|void).X{|
|00002bf0| 0a 58 20 20 20 20 6c 73 | 65 65 6b 28 64 69 73 6b |.X ls|eek(disk|
|00002c00| 2c 20 53 55 50 45 52 42 | 4f 46 46 2c 20 30 29 3b |, SUPERB|OFF, 0);|
|00002c10| 0a 58 20 20 20 20 69 66 | 20 28 77 72 69 74 65 28 |.X if| (write(|
|00002c20| 64 69 73 6b 2c 20 26 66 | 69 6c 73 79 73 2c 20 73 |disk, &f|ilsys, s|
|00002c30| 69 7a 65 6f 66 28 66 69 | 6c 73 79 73 29 29 20 21 |izeof(fi|lsys)) !|
|00002c40| 3d 20 73 69 7a 65 6f 66 | 28 66 69 6c 73 79 73 29 |= sizeof|(filsys)|
|00002c50| 29 20 7b 0a 58 09 66 70 | 72 69 6e 74 66 28 73 74 |) {.X.fp|rintf(st|
|00002c60| 64 65 72 72 2c 20 22 25 | 73 3a 20 63 61 6e 27 74 |derr, "%|s: can't|
|00002c70| 20 77 72 69 74 65 20 73 | 75 70 65 72 62 6c 6f 63 | write s|uperbloc|
|00002c80| 6b 3a 20 22 2c 20 63 6d | 64 5f 6e 61 6d 65 29 3b |k: ", cm|d_name);|
|00002c90| 0a 58 09 70 65 72 72 6f | 72 28 22 22 29 3b 0a 58 |.X.perro|r("");.X|
|00002ca0| 09 65 78 69 74 28 31 29 | 3b 0a 58 20 20 20 20 7d |.exit(1)|;.X }|
|00002cb0| 0a 58 7d 0a 58 0a 58 73 | 74 61 74 69 63 20 76 6f |.X}.X.Xs|tatic vo|
|00002cc0| 69 64 0a 58 6d 61 70 5f | 69 6e 6f 64 65 28 69 6e |id.Xmap_|inode(in|
|00002cd0| 6f 5f 74 20 69 6e 6f 64 | 65 29 0a 58 7b 0a 58 20 |o_t inod|e).X{.X |
|00002ce0| 20 20 20 69 6e 74 20 74 | 79 70 65 2c 20 69 3b 0a | int t|ype, i;.|
|00002cf0| 58 20 20 20 20 6c 6f 6e | 67 20 62 6c 6f 63 6b 5b |X lon|g block[|
|00002d00| 4e 55 4d 5f 41 44 44 52 | 5d 3b 0a 58 0a 58 20 20 |NUM_ADDR|];.X.X |
|00002d10| 20 20 72 65 61 64 5f 69 | 6e 6f 64 65 28 69 6e 6f | read_i|node(ino|
|00002d20| 64 65 2c 20 26 69 6e 6f | 29 3b 0a 58 20 20 20 20 |de, &ino|);.X |
|00002d30| 69 66 20 28 69 6e 6f 2e | 64 69 5f 6d 6f 64 65 20 |if (ino.|di_mode |
|00002d40| 3d 3d 20 30 29 0a 58 09 | 72 65 74 75 72 6e 3b 0a |== 0).X.|return;.|
|00002d50| 58 20 20 20 20 74 79 70 | 65 20 3d 20 69 6e 6f 2e |X typ|e = ino.|
|00002d60| 64 69 5f 6d 6f 64 65 20 | 26 20 53 5f 49 46 4d 54 |di_mode |& S_IFMT|
|00002d70| 3b 0a 58 20 20 20 20 69 | 66 20 28 74 79 70 65 20 |;.X i|f (type |
|00002d80| 3d 3d 20 53 5f 49 46 43 | 48 52 20 7c 7c 20 74 79 |== S_IFC|HR || ty|
|00002d90| 70 65 20 3d 3d 20 53 5f | 49 46 42 4c 4b 29 0a 58 |pe == S_|IFBLK).X|
|00002da0| 09 72 65 74 75 72 6e 3b | 0a 58 0a 58 20 20 20 20 |.return;|.X.X |
|00002db0| 6c 33 74 6f 6c 28 62 6c | 6f 63 6b 2c 20 69 6e 6f |l3tol(bl|ock, ino|
|00002dc0| 2e 64 69 5f 61 64 64 72 | 2c 20 4e 55 4d 5f 41 44 |.di_addr|, NUM_AD|
|00002dd0| 44 52 29 3b 0a 58 20 20 | 20 20 66 6f 72 20 28 69 |DR);.X | for (i|
|00002de0| 20 3d 20 30 3b 20 69 20 | 3c 20 4e 55 4d 5f 41 44 | = 0; i |< NUM_AD|
|00002df0| 44 52 3b 20 2b 2b 69 29 | 0a 58 09 69 66 20 28 62 |DR; ++i)|.X.if (b|
|00002e00| 6c 6f 63 6b 5b 69 5d 20 | 21 3d 20 30 29 0a 58 09 |lock[i] |!= 0).X.|
|00002e10| 20 20 20 20 75 70 64 61 | 74 65 5f 6d 61 70 28 69 | upda|te_map(i|
|00002e20| 6e 6f 64 65 2c 20 62 6c | 6f 63 6b 5b 69 5d 2c 0a |node, bl|ock[i],.|
|00002e30| 58 09 09 28 69 20 3c 20 | 46 49 52 53 54 5f 49 4e |X..(i < |FIRST_IN|
|00002e40| 44 49 52 29 20 3f 20 30 | 20 3a 20 28 69 20 2d 20 |DIR) ? 0| : (i - |
|00002e50| 46 49 52 53 54 5f 49 4e | 44 49 52 20 2b 20 31 29 |FIRST_IN|DIR + 1)|
|00002e60| 29 3b 0a 58 7d 0a 58 0a | 58 73 74 61 74 69 63 20 |);.X}.X.|Xstatic |
|00002e70| 76 6f 69 64 0a 58 75 70 | 64 61 74 65 5f 6d 61 70 |void.Xup|date_map|
|00002e80| 28 6c 6f 6e 67 20 6d 61 | 70 5f 65 6e 74 72 79 2c |(long ma|p_entry,|
|00002e90| 20 64 61 64 64 72 5f 74 | 20 62 6c 6f 63 6b 2c 20 | daddr_t| block, |
|00002ea0| 69 6e 74 20 6c 65 76 65 | 6c 29 0a 58 7b 0a 58 20 |int leve|l).X{.X |
|00002eb0| 20 20 20 69 6e 74 20 69 | 3b 0a 58 0a 58 20 20 20 | int i|;.X.X |
|00002ec0| 20 69 66 20 28 6d 61 70 | 5b 62 6c 6f 63 6b 5d 20 | if (map|[block] |
|00002ed0| 21 3d 20 30 29 20 7b 0a | 58 09 66 70 72 69 6e 74 |!= 0) {.|X.fprint|
|00002ee0| 66 28 73 74 64 65 72 72 | 2c 20 22 25 73 3a 20 64 |f(stderr|, "%s: d|
|00002ef0| 75 70 6c 69 63 61 74 65 | 20 62 6c 6f 63 6b 20 25 |uplicate| block %|
|00002f00| 64 20 69 6e 20 25 64 20 | 61 6e 64 20 25 64 5c 6e |d in %d |and %d\n|
|00002f10| 22 2c 0a 58 09 20 20 20 | 20 63 6d 64 5f 6e 61 6d |",.X. | cmd_nam|
|00002f20| 65 2c 20 62 6c 6f 63 6b | 2c 20 6d 61 70 5b 62 6c |e, block|, map[bl|
|00002f30| 6f 63 6b 5d 2c 20 6d 61 | 70 5f 65 6e 74 72 79 29 |ock], ma|p_entry)|
|00002f40| 3b 0a 58 09 65 78 69 74 | 28 31 29 3b 0a 58 20 20 |;.X.exit|(1);.X |
|00002f50| 20 20 7d 0a 58 20 20 20 | 20 6d 61 70 5b 62 6c 6f | }.X | map[blo|
|00002f60| 63 6b 5d 20 3d 20 6d 61 | 70 5f 65 6e 74 72 79 3b |ck] = ma|p_entry;|
|00002f70| 0a 58 0a 58 20 20 20 20 | 69 66 20 28 6c 65 76 65 |.X.X |if (leve|
|00002f80| 6c 20 3d 3d 20 30 29 0a | 58 09 72 65 74 75 72 6e |l == 0).|X.return|
|00002f90| 3b 0a 58 0a 58 20 20 20 | 20 2d 2d 6c 65 76 65 6c |;.X.X | --level|
|00002fa0| 3b 0a 58 20 20 20 20 72 | 65 61 64 5f 62 6c 6f 63 |;.X r|ead_bloc|
|00002fb0| 6b 28 62 6c 6f 63 6b 2c | 20 69 6e 64 69 72 5b 6c |k(block,| indir[l|
|00002fc0| 65 76 65 6c 5d 29 3b 0a | 58 20 20 20 20 66 6f 72 |evel]);.|X for|
|00002fd0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 46 73 4e | (i = 0;| i < FsN|
|00002fe0| 49 4e 44 49 52 28 64 65 | 76 29 3b 20 2b 2b 69 29 |INDIR(de|v); ++i)|
|00002ff0| 0a 58 09 69 66 20 28 28 | 28 64 61 64 64 72 5f 74 |.X.if ((|(daddr_t|
|00003000| 20 2a 29 69 6e 64 69 72 | 5b 6c 65 76 65 6c 5d 29 | *)indir|[level])|
|00003010| 5b 69 5d 20 21 3d 20 30 | 29 0a 58 09 20 20 20 20 |[i] != 0|).X. |
|00003020| 75 70 64 61 74 65 5f 6d | 61 70 28 2d 62 6c 6f 63 |update_m|ap(-bloc|
|00003030| 6b 2c 20 28 28 64 61 64 | 64 72 5f 74 20 2a 29 69 |k, ((dad|dr_t *)i|
|00003040| 6e 64 69 72 5b 6c 65 76 | 65 6c 5d 29 5b 69 5d 2c |ndir[lev|el])[i],|
|00003050| 20 6c 65 76 65 6c 29 3b | 0a 58 7d 0a 58 0a 58 73 | level);|.X}.X.Xs|
|00003060| 74 61 74 69 63 20 76 6f | 69 64 0a 58 72 65 61 64 |tatic vo|id.Xread|
|00003070| 5f 62 6c 6f 63 6b 28 64 | 61 64 64 72 5f 74 20 62 |_block(d|addr_t b|
|00003080| 6c 6f 63 6b 2c 20 76 6f | 69 64 20 2a 62 75 66 29 |lock, vo|id *buf)|
|00003090| 0a 58 7b 0a 58 20 20 20 | 20 6c 73 65 65 6b 28 64 |.X{.X | lseek(d|
|000030a0| 69 73 6b 2c 20 62 6c 6f | 63 6b 20 2a 20 46 73 42 |isk, blo|ck * FsB|
|000030b0| 53 49 5a 45 28 64 65 76 | 29 2c 20 30 29 3b 0a 58 |SIZE(dev|), 0);.X|
|000030c0| 20 20 20 20 69 66 20 28 | 72 65 61 64 28 64 69 73 | if (|read(dis|
|000030d0| 6b 2c 20 62 75 66 2c 20 | 46 73 42 53 49 5a 45 28 |k, buf, |FsBSIZE(|
|000030e0| 64 65 76 29 29 20 21 3d | 20 46 73 42 53 49 5a 45 |dev)) !=| FsBSIZE|
|000030f0| 28 64 65 76 29 29 20 7b | 0a 58 09 66 70 72 69 6e |(dev)) {|.X.fprin|
|00003100| 74 66 28 73 74 64 65 72 | 72 2c 20 22 25 73 3a 20 |tf(stder|r, "%s: |
|00003110| 63 61 6e 27 74 20 72 65 | 61 64 20 62 6c 6f 63 6b |can't re|ad block|
|00003120| 20 25 64 3a 20 22 2c 20 | 63 6d 64 5f 6e 61 6d 65 | %d: ", |cmd_name|
|00003130| 2c 20 62 6c 6f 63 6b 29 | 3b 0a 58 09 70 65 72 72 |, block)|;.X.perr|
|00003140| 6f 72 28 22 22 29 3b 0a | 58 09 65 78 69 74 28 31 |or("");.|X.exit(1|
|00003150| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 7d 0a 58 0a 58 |);.X |}.X}.X.X|
|00003160| 73 74 61 74 69 63 20 76 | 6f 69 64 0a 58 77 72 69 |static v|oid.Xwri|
|00003170| 74 65 5f 62 6c 6f 63 6b | 28 64 61 64 64 72 5f 74 |te_block|(daddr_t|
|00003180| 20 62 6c 6f 63 6b 2c 20 | 76 6f 69 64 20 2a 62 75 | block, |void *bu|
|00003190| 66 29 0a 58 7b 0a 58 20 | 20 20 20 6c 73 65 65 6b |f).X{.X | lseek|
|000031a0| 28 64 69 73 6b 2c 20 62 | 6c 6f 63 6b 20 2a 20 46 |(disk, b|lock * F|
|000031b0| 73 42 53 49 5a 45 28 64 | 65 76 29 2c 20 30 29 3b |sBSIZE(d|ev), 0);|
|000031c0| 0a 58 20 20 20 20 69 66 | 20 28 77 72 69 74 65 28 |.X if| (write(|
|000031d0| 64 69 73 6b 2c 20 62 75 | 66 2c 20 46 73 42 53 49 |disk, bu|f, FsBSI|
|000031e0| 5a 45 28 64 65 76 29 29 | 20 21 3d 20 46 73 42 53 |ZE(dev))| != FsBS|
|000031f0| 49 5a 45 28 64 65 76 29 | 29 20 7b 0a 58 09 66 70 |IZE(dev)|) {.X.fp|
|00003200| 72 69 6e 74 66 28 73 74 | 64 65 72 72 2c 20 22 25 |rintf(st|derr, "%|
|00003210| 73 3a 20 63 61 6e 27 74 | 20 77 72 69 74 65 20 62 |s: can't| write b|
|00003220| 6c 6f 63 6b 20 25 64 3a | 20 22 2c 20 63 6d 64 5f |lock %d:| ", cmd_|
|00003230| 6e 61 6d 65 2c 20 62 6c | 6f 63 6b 29 3b 0a 58 09 |name, bl|ock);.X.|
|00003240| 70 65 72 72 6f 72 28 22 | 22 29 3b 0a 58 09 65 78 |perror("|");.X.ex|
|00003250| 69 74 28 31 29 3b 0a 58 | 20 20 20 20 7d 0a 58 7d |it(1);.X| }.X}|
|00003260| 0a 58 0a 58 73 74 61 74 | 69 63 20 76 6f 69 64 0a |.X.Xstat|ic void.|
|00003270| 58 72 65 61 64 5f 69 6e | 6f 64 65 28 69 6e 6f 5f |Xread_in|ode(ino_|
|00003280| 74 20 69 6e 6f 64 65 2c | 20 73 74 72 75 63 74 20 |t inode,| struct |
|00003290| 64 69 6e 6f 64 65 20 2a | 69 6e 6f 29 0a 58 7b 0a |dinode *|ino).X{.|
|000032a0| 58 20 20 20 20 64 61 64 | 64 72 5f 74 20 62 6c 6f |X dad|dr_t blo|
|000032b0| 63 6b 3b 0a 58 0a 58 20 | 20 20 20 62 6c 6f 63 6b |ck;.X.X | block|
|000032c0| 20 3d 20 46 73 49 54 4f | 44 28 64 65 76 2c 20 69 | = FsITO|D(dev, i|
|000032d0| 6e 6f 64 65 29 3b 0a 58 | 20 20 20 20 69 66 20 28 |node);.X| if (|
|000032e0| 69 6e 6f 64 65 5f 74 61 | 62 6c 65 20 3d 3d 20 30 |inode_ta|ble == 0|
|000032f0| 29 20 7b 0a 58 09 69 66 | 20 28 77 5f 69 6e 6f 5f |) {.X.if| (w_ino_|
|00003300| 62 6c 6b 20 21 3d 20 62 | 6c 6f 63 6b 29 20 7b 0a |blk != b|lock) {.|
|00003310| 58 09 20 20 20 20 77 5f | 69 6e 6f 5f 62 6c 6b 20 |X. w_|ino_blk |
|00003320| 3d 20 62 6c 6f 63 6b 3b | 0a 58 09 20 20 20 20 72 |= block;|.X. r|
|00003330| 65 61 64 5f 62 6c 6f 63 | 6b 28 62 6c 6f 63 6b 2c |ead_bloc|k(block,|
|00003340| 20 69 6e 6f 64 65 5f 62 | 6c 6f 63 6b 29 3b 0a 58 | inode_b|lock);.X|
|00003350| 09 7d 0a 58 09 2a 69 6e | 6f 20 3d 20 28 28 73 74 |.}.X.*in|o = ((st|
|00003360| 72 75 63 74 20 64 69 6e | 6f 64 65 20 2a 29 69 6e |ruct din|ode *)in|
|00003370| 6f 64 65 5f 62 6c 6f 63 | 6b 29 5b 46 73 49 54 4f |ode_bloc|k)[FsITO|
|00003380| 4f 28 64 65 76 2c 20 69 | 6e 6f 64 65 29 5d 3b 0a |O(dev, i|node)];.|
|00003390| 58 20 20 20 20 7d 0a 58 | 20 20 20 20 65 6c 73 65 |X }.X| else|
|000033a0| 20 7b 0a 58 09 2a 69 6e | 6f 20 3d 20 28 28 73 74 | {.X.*in|o = ((st|
|000033b0| 72 75 63 74 20 64 69 6e | 6f 64 65 20 2a 29 26 69 |ruct din|ode *)&i|
|000033c0| 6e 6f 64 65 5f 74 61 62 | 6c 65 5b 62 6c 6f 63 6b |node_tab|le[block|
|000033d0| 20 2a 20 46 73 42 53 49 | 5a 45 28 64 65 76 29 5d | * FsBSI|ZE(dev)]|
|000033e0| 29 0a 58 09 20 20 20 20 | 5b 46 73 49 54 4f 4f 28 |).X. |[FsITOO(|
|000033f0| 64 65 76 2c 20 69 6e 6f | 64 65 29 5d 3b 0a 58 20 |dev, ino|de)];.X |
|00003400| 20 20 20 7d 0a 58 7d 0a | 58 0a 58 73 74 61 74 69 | }.X}.|X.Xstati|
|00003410| 63 20 76 6f 69 64 0a 58 | 77 72 69 74 65 5f 69 6e |c void.X|write_in|
|00003420| 6f 64 65 28 69 6e 6f 5f | 74 20 69 6e 6f 64 65 2c |ode(ino_|t inode,|
|00003430| 20 73 74 72 75 63 74 20 | 64 69 6e 6f 64 65 20 2a | struct |dinode *|
|00003440| 69 6e 6f 29 0a 58 7b 0a | 58 20 20 20 20 64 61 64 |ino).X{.|X dad|
|00003450| 64 72 5f 74 20 62 6c 6f | 63 6b 3b 0a 58 0a 58 20 |dr_t blo|ck;.X.X |
|00003460| 20 20 20 62 6c 6f 63 6b | 20 3d 20 46 73 49 54 4f | block| = FsITO|
|00003470| 44 28 64 65 76 2c 20 69 | 6e 6f 64 65 29 3b 0a 58 |D(dev, i|node);.X|
|00003480| 20 20 20 20 69 66 20 28 | 69 6e 6f 64 65 5f 74 61 | if (|inode_ta|
|00003490| 62 6c 65 20 3d 3d 20 30 | 29 20 7b 0a 58 09 69 66 |ble == 0|) {.X.if|
|000034a0| 20 28 77 5f 69 6e 6f 5f | 62 6c 6b 20 21 3d 20 62 | (w_ino_|blk != b|
|000034b0| 6c 6f 63 6b 29 20 7b 0a | 58 09 20 20 20 20 77 5f |lock) {.|X. w_|
|000034c0| 69 6e 6f 5f 62 6c 6b 20 | 3d 20 62 6c 6f 63 6b 3b |ino_blk |= block;|
|000034d0| 0a 58 09 20 20 20 20 72 | 65 61 64 5f 62 6c 6f 63 |.X. r|ead_bloc|
|000034e0| 6b 28 62 6c 6f 63 6b 2c | 20 69 6e 6f 64 65 5f 62 |k(block,| inode_b|
|000034f0| 6c 6f 63 6b 29 3b 0a 58 | 09 7d 0a 58 09 28 28 73 |lock);.X|.}.X.((s|
|00003500| 74 72 75 63 74 20 64 69 | 6e 6f 64 65 20 2a 29 69 |truct di|node *)i|
|00003510| 6e 6f 64 65 5f 62 6c 6f | 63 6b 29 5b 46 73 49 54 |node_blo|ck)[FsIT|
|00003520| 4f 4f 28 64 65 76 2c 20 | 69 6e 6f 64 65 29 5d 20 |OO(dev, |inode)] |
|00003530| 3d 20 2a 69 6e 6f 3b 0a | 58 09 77 72 69 74 65 5f |= *ino;.|X.write_|
|00003540| 62 6c 6f 63 6b 28 62 6c | 6f 63 6b 2c 20 69 6e 6f |block(bl|ock, ino|
|00003550| 64 65 5f 62 6c 6f 63 6b | 29 3b 0a 58 20 20 20 20 |de_block|);.X |
|00003560| 7d 0a 58 20 20 20 20 65 | 6c 73 65 20 7b 0a 58 09 |}.X e|lse {.X.|
|00003570| 28 28 73 74 72 75 63 74 | 20 64 69 6e 6f 64 65 20 |((struct| dinode |
|00003580| 2a 29 26 69 6e 6f 64 65 | 5f 74 61 62 6c 65 5b 62 |*)&inode|_table[b|
|00003590| 6c 6f 63 6b 20 2a 20 46 | 73 42 53 49 5a 45 28 64 |lock * F|sBSIZE(d|
|000035a0| 65 76 29 5d 29 0a 58 09 | 20 20 20 20 5b 46 73 49 |ev)]).X.| [FsI|
|000035b0| 54 4f 4f 28 64 65 76 2c | 20 69 6e 6f 64 65 29 5d |TOO(dev,| inode)]|
|000035c0| 20 3d 20 2a 69 6e 6f 3b | 0a 58 09 77 72 69 74 65 | = *ino;|.X.write|
|000035d0| 5f 62 6c 6f 63 6b 28 62 | 6c 6f 63 6b 2c 20 26 69 |_block(b|lock, &i|
|000035e0| 6e 6f 64 65 5f 74 61 62 | 6c 65 5b 62 6c 6f 63 6b |node_tab|le[block|
|000035f0| 20 2a 20 46 73 42 53 49 | 5a 45 28 64 65 76 29 5d | * FsBSI|ZE(dev)]|
|00003600| 29 3b 0a 58 20 20 20 20 | 7d 0a 58 7d 0a 58 0a 58 |);.X |}.X}.X.X|
|00003610| 73 74 61 74 69 63 20 76 | 6f 69 64 0a 58 6d 6f 76 |static v|oid.Xmov|
|00003620| 65 5f 62 6c 6f 63 6b 28 | 64 61 64 64 72 5f 74 20 |e_block(|daddr_t |
|00003630| 66 72 6f 6d 2c 20 64 61 | 64 64 72 5f 74 20 74 6f |from, da|ddr_t to|
|00003640| 29 0a 58 7b 0a 58 20 20 | 20 20 63 68 61 72 20 62 |).X{.X | char b|
|00003650| 75 66 66 65 72 5b 46 73 | 42 53 49 5a 45 28 64 65 |uffer[Fs|BSIZE(de|
|00003660| 76 29 5d 3b 0a 58 20 20 | 20 20 64 61 64 64 72 5f |v)];.X | daddr_|
|00003670| 74 20 62 6c 6f 63 6b 3b | 0a 58 0a 58 20 20 20 20 |t block;|.X.X |
|00003680| 69 66 20 28 6d 61 70 5b | 74 6f 5d 20 21 3d 20 30 |if (map[|to] != 0|
|00003690| 29 0a 58 09 6d 61 6b 65 | 5f 68 6f 6c 65 28 29 3b |).X.make|_hole();|
|000036a0| 0a 58 0a 58 20 20 20 20 | 72 65 61 64 5f 62 6c 6f |.X.X |read_blo|
|000036b0| 63 6b 28 66 72 6f 6d 2c | 20 62 75 66 66 65 72 29 |ck(from,| buffer)|
|000036c0| 3b 0a 58 20 20 20 20 77 | 72 69 74 65 5f 62 6c 6f |;.X w|rite_blo|
|000036d0| 63 6b 28 74 6f 2c 20 62 | 75 66 66 65 72 29 3b 0a |ck(to, b|uffer);.|
|000036e0| 58 0a 58 20 20 20 20 6d | 61 70 5b 74 6f 5d 20 3d |X.X m|ap[to] =|
|000036f0| 20 6d 61 70 5b 66 72 6f | 6d 5d 3b 0a 58 20 20 20 | map[fro|m];.X |
|00003700| 20 6d 61 70 5b 66 72 6f | 6d 5d 20 3d 20 30 3b 0a | map[fro|m] = 0;.|
|00003710| 58 0a 58 20 20 20 20 66 | 6f 72 20 28 62 6c 6f 63 |X.X f|or (bloc|
|00003720| 6b 20 3d 20 66 69 6c 73 | 79 73 2e 73 5f 69 73 69 |k = fils|ys.s_isi|
|00003730| 7a 65 3b 20 62 6c 6f 63 | 6b 20 3c 20 66 69 6c 73 |ze; bloc|k < fils|
|00003740| 79 73 2e 73 5f 66 73 69 | 7a 65 3b 20 2b 2b 62 6c |ys.s_fsi|ze; ++bl|
|00003750| 6f 63 6b 29 0a 58 09 69 | 66 20 28 6d 61 70 5b 62 |ock).X.i|f (map[b|
|00003760| 6c 6f 63 6b 5d 20 3d 3d | 20 2d 66 72 6f 6d 29 0a |lock] ==| -from).|
|00003770| 58 09 20 20 20 20 6d 61 | 70 5b 62 6c 6f 63 6b 5d |X. ma|p[block]|
|00003780| 20 3d 20 2d 74 6f 3b 0a | 58 7d 0a 58 0a 58 73 74 | = -to;.|X}.X.Xst|
|00003790| 61 74 69 63 20 76 6f 69 | 64 0a 58 6d 6f 76 65 5f |atic voi|d.Xmove_|
|000037a0| 69 6e 6f 64 65 28 69 6e | 6f 5f 74 20 69 6e 6f 64 |inode(in|o_t inod|
|000037b0| 65 29 0a 58 7b 0a 58 20 | 20 20 20 69 6e 74 20 74 |e).X{.X | int t|
|000037c0| 79 70 65 2c 20 69 3b 0a | 58 20 20 20 20 6c 6f 6e |ype, i;.|X lon|
|000037d0| 67 20 62 6c 6f 63 6b 5b | 4e 55 4d 5f 41 44 44 52 |g block[|NUM_ADDR|
|000037e0| 5d 3b 0a 58 0a 58 20 20 | 20 20 72 65 61 64 5f 69 |];.X.X | read_i|
|000037f0| 6e 6f 64 65 28 69 6e 6f | 64 65 2c 20 26 69 6e 6f |node(ino|de, &ino|
|00003800| 29 3b 0a 58 20 20 20 20 | 77 5f 69 6e 6f 20 3d 20 |);.X |w_ino = |
|00003810| 69 6e 6f 64 65 3b 0a 58 | 20 20 20 20 69 66 20 28 |inode;.X| if (|
|00003820| 69 6e 6f 2e 64 69 5f 6d | 6f 64 65 20 3d 3d 20 30 |ino.di_m|ode == 0|
|00003830| 29 0a 58 09 72 65 74 75 | 72 6e 3b 0a 58 20 20 20 |).X.retu|rn;.X |
|00003840| 20 74 79 70 65 20 3d 20 | 69 6e 6f 2e 64 69 5f 6d | type = |ino.di_m|
|00003850| 6f 64 65 20 26 20 53 5f | 49 46 4d 54 3b 0a 58 20 |ode & S_|IFMT;.X |
|00003860| 20 20 20 69 66 20 28 74 | 79 70 65 20 3d 3d 20 53 | if (t|ype == S|
|00003870| 5f 49 46 43 48 52 20 7c | 7c 20 74 79 70 65 20 3d |_IFCHR ||| type =|
|00003880| 3d 20 53 5f 49 46 42 4c | 4b 29 0a 58 09 72 65 74 |= S_IFBL|K).X.ret|
|00003890| 75 72 6e 3b 0a 58 20 20 | 20 20 0a 58 20 20 20 20 |urn;.X | .X |
|000038a0| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|000038b0| 22 6d 6f 76 69 6e 67 20 | 69 6e 6f 64 65 20 25 64 |"moving |inode %d|
|000038c0| 20 28 73 69 7a 65 20 25 | 64 29 20 20 20 20 20 20 | (size %|d) |
|000038d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000038e0| 20 20 20 5c 72 22 2c 0a | 58 09 69 6e 6f 64 65 2c | \r",.|X.inode,|
|000038f0| 20 69 6e 6f 2e 64 69 5f | 73 69 7a 65 29 3b 0a 58 | ino.di_|size);.X|
|00003900| 0a 58 20 20 20 20 6c 33 | 74 6f 6c 28 62 6c 6f 63 |.X l3|tol(bloc|
|00003910| 6b 2c 20 69 6e 6f 2e 64 | 69 5f 61 64 64 72 2c 20 |k, ino.d|i_addr, |
|00003920| 4e 55 4d 5f 41 44 44 52 | 29 3b 0a 58 20 20 20 20 |NUM_ADDR|);.X |
|00003930| 66 6f 72 20 28 69 20 3d | 20 30 3b 20 69 20 3c 20 |for (i =| 0; i < |
|00003940| 4e 55 4d 5f 41 44 44 52 | 3b 20 2b 2b 69 29 20 7b |NUM_ADDR|; ++i) {|
|00003950| 0a 58 09 69 66 20 28 62 | 6c 6f 63 6b 5b 69 5d 20 |.X.if (b|lock[i] |
|00003960| 3d 3d 20 30 29 0a 58 09 | 20 20 20 20 63 6f 6e 74 |== 0).X.| cont|
|00003970| 69 6e 75 65 3b 0a 58 09 | 69 66 20 28 62 6c 6f 63 |inue;.X.|if (bloc|
|00003980| 6b 5b 69 5d 20 21 3d 20 | 6e 65 78 74 5f 66 69 6c |k[i] != |next_fil|
|00003990| 6c 29 20 7b 0a 58 09 20 | 20 20 20 6d 6f 76 65 5f |l) {.X. | move_|
|000039a0| 62 6c 6f 63 6b 28 62 6c | 6f 63 6b 5b 69 5d 2c 20 |block(bl|ock[i], |
|000039b0| 6e 65 78 74 5f 66 69 6c | 6c 29 3b 0a 58 09 20 20 |next_fil|l);.X. |
|000039c0| 20 20 6c 33 74 6f 6c 28 | 62 6c 6f 63 6b 2c 20 69 | l3tol(|block, i|
|000039d0| 6e 6f 2e 64 69 5f 61 64 | 64 72 2c 20 4e 55 4d 5f |no.di_ad|dr, NUM_|
|000039e0| 41 44 44 52 29 3b 0a 58 | 09 20 20 20 20 62 6c 6f |ADDR);.X|. blo|
|000039f0| 63 6b 5b 69 5d 20 3d 20 | 6e 65 78 74 5f 66 69 6c |ck[i] = |next_fil|
|00003a00| 6c 3b 0a 58 09 20 20 20 | 20 6c 74 6f 6c 33 28 69 |l;.X. | ltol3(i|
|00003a10| 6e 6f 2e 64 69 5f 61 64 | 64 72 2c 20 62 6c 6f 63 |no.di_ad|dr, bloc|
|00003a20| 6b 2c 20 4e 55 4d 5f 41 | 44 44 52 29 3b 0a 58 09 |k, NUM_A|DDR);.X.|
|00003a30| 20 20 20 20 77 72 69 74 | 65 5f 69 6e 6f 64 65 28 | writ|e_inode(|
|00003a40| 69 6e 6f 64 65 2c 20 26 | 69 6e 6f 29 3b 0a 58 09 |inode, &|ino);.X.|
|00003a50| 7d 0a 58 09 2b 2b 6e 65 | 78 74 5f 66 69 6c 6c 3b |}.X.++ne|xt_fill;|
|00003a60| 0a 58 20 20 20 20 7d 0a | 58 20 20 20 20 0a 58 20 |.X }.|X .X |
|00003a70| 20 20 20 66 6f 72 20 28 | 69 20 3d 20 46 49 52 53 | for (|i = FIRS|
|00003a80| 54 5f 49 4e 44 49 52 3b | 20 69 20 3c 20 4e 55 4d |T_INDIR;| i < NUM|
|00003a90| 5f 41 44 44 52 3b 20 2b | 2b 69 29 0a 58 09 6d 6f |_ADDR; +|+i).X.mo|
|00003aa0| 76 65 5f 69 6e 64 69 72 | 65 63 74 28 62 6c 6f 63 |ve_indir|ect(bloc|
|00003ab0| 6b 5b 69 5d 2c 20 69 2d | 46 49 52 53 54 5f 49 4e |k[i], i-|FIRST_IN|
|00003ac0| 44 49 52 29 3b 0a 58 7d | 0a 58 0a 58 73 74 61 74 |DIR);.X}|.X.Xstat|
|00003ad0| 69 63 20 76 6f 69 64 0a | 58 6d 6f 76 65 5f 69 6e |ic void.|Xmove_in|
|00003ae0| 64 69 72 65 63 74 28 64 | 61 64 64 72 5f 74 20 62 |direct(d|addr_t b|
|00003af0| 6c 6f 63 6b 2c 20 69 6e | 74 20 6c 65 76 65 6c 29 |lock, in|t level)|
|00003b00| 0a 58 7b 0a 58 20 20 20 | 20 69 6e 74 20 69 3b 0a |.X{.X | int i;.|
|00003b10| 58 0a 58 20 20 20 20 69 | 66 20 28 62 6c 6f 63 6b |X.X i|f (block|
|00003b20| 20 3d 3d 20 30 29 0a 58 | 09 72 65 74 75 72 6e 3b | == 0).X|.return;|
|00003b30| 0a 58 0a 58 20 20 20 20 | 72 65 61 64 5f 62 6c 6f |.X.X |read_blo|
|00003b40| 63 6b 28 62 6c 6f 63 6b | 2c 20 69 6e 64 69 72 5b |ck(block|, indir[|
|00003b50| 6c 65 76 65 6c 5d 29 3b | 0a 58 20 20 20 20 77 5f |level]);|.X w_|
|00003b60| 69 6e 64 69 72 5b 6c 65 | 76 65 6c 5d 20 3d 20 62 |indir[le|vel] = b|
|00003b70| 6c 6f 63 6b 3b 0a 58 0a | 58 20 20 20 20 66 6f 72 |lock;.X.|X for|
|00003b80| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 46 73 4e | (i = 0;| i < FsN|
|00003b90| 49 4e 44 49 52 28 64 65 | 76 29 3b 20 2b 2b 69 29 |INDIR(de|v); ++i)|
|00003ba0| 20 7b 0a 58 09 69 66 20 | 28 28 28 64 61 64 64 72 | {.X.if |(((daddr|
|00003bb0| 5f 74 20 2a 29 69 6e 64 | 69 72 5b 6c 65 76 65 6c |_t *)ind|ir[level|
|00003bc0| 5d 29 5b 69 5d 20 3d 3d | 20 30 29 0a 58 09 20 20 |])[i] ==| 0).X. |
|00003bd0| 20 20 63 6f 6e 74 69 6e | 75 65 3b 0a 58 09 69 66 | contin|ue;.X.if|
|00003be0| 20 28 28 28 64 61 64 64 | 72 5f 74 20 2a 29 69 6e | (((dadd|r_t *)in|
|00003bf0| 64 69 72 5b 6c 65 76 65 | 6c 5d 29 5b 69 5d 20 21 |dir[leve|l])[i] !|
|00003c00| 3d 20 6e 65 78 74 5f 66 | 69 6c 6c 29 20 7b 0a 58 |= next_f|ill) {.X|
|00003c10| 09 20 20 20 20 6d 6f 76 | 65 5f 62 6c 6f 63 6b 28 |. mov|e_block(|
|00003c20| 28 28 64 61 64 64 72 5f | 74 20 2a 29 69 6e 64 69 |((daddr_|t *)indi|
|00003c30| 72 5b 6c 65 76 65 6c 5d | 29 5b 69 5d 2c 20 6e 65 |r[level]|)[i], ne|
|00003c40| 78 74 5f 66 69 6c 6c 29 | 3b 0a 58 09 20 20 20 20 |xt_fill)|;.X. |
|00003c50| 28 28 64 61 64 64 72 5f | 74 20 2a 29 69 6e 64 69 |((daddr_|t *)indi|
|00003c60| 72 5b 6c 65 76 65 6c 5d | 29 5b 69 5d 20 3d 20 6e |r[level]|)[i] = n|
|00003c70| 65 78 74 5f 66 69 6c 6c | 3b 0a 58 09 20 20 20 20 |ext_fill|;.X. |
|00003c80| 77 72 69 74 65 5f 62 6c | 6f 63 6b 28 62 6c 6f 63 |write_bl|ock(bloc|
|00003c90| 6b 2c 20 69 6e 64 69 72 | 5b 6c 65 76 65 6c 5d 29 |k, indir|[level])|
|00003ca0| 3b 0a 58 09 7d 0a 58 09 | 2b 2b 6e 65 78 74 5f 66 |;.X.}.X.|++next_f|
|00003cb0| 69 6c 6c 3b 0a 58 20 20 | 20 20 7d 0a 58 0a 58 20 |ill;.X | }.X.X |
|00003cc0| 20 20 20 69 66 20 28 6c | 65 76 65 6c 20 3d 3d 20 | if (l|evel == |
|00003cd0| 30 29 0a 58 09 72 65 74 | 75 72 6e 3b 0a 58 0a 58 |0).X.ret|urn;.X.X|
|00003ce0| 20 20 20 20 66 6f 72 20 | 28 69 20 3d 20 30 3b 20 | for |(i = 0; |
|00003cf0| 69 20 3c 20 46 73 4e 49 | 4e 44 49 52 28 64 65 76 |i < FsNI|NDIR(dev|
|00003d00| 29 3b 20 2b 2b 69 29 0a | 58 09 6d 6f 76 65 5f 69 |); ++i).|X.move_i|
|00003d10| 6e 64 69 72 65 63 74 28 | 28 28 64 61 64 64 72 5f |ndirect(|((daddr_|
|00003d20| 74 20 2a 29 69 6e 64 69 | 72 5b 6c 65 76 65 6c 5d |t *)indi|r[level]|
|00003d30| 29 5b 69 5d 2c 20 6c 65 | 76 65 6c 2d 31 29 3b 0a |)[i], le|vel-1);.|
|00003d40| 58 7d 0a 58 0a 58 73 74 | 61 74 69 63 20 76 6f 69 |X}.X.Xst|atic voi|
|00003d50| 64 0a 58 6d 61 6b 65 5f | 68 6f 6c 65 28 76 6f 69 |d.Xmake_|hole(voi|
|00003d60| 64 29 0a 58 7b 0a 58 20 | 20 20 20 63 68 61 72 20 |d).X{.X | char |
|00003d70| 74 5f 69 6e 64 69 72 5b | 46 73 42 53 49 5a 45 28 |t_indir[|FsBSIZE(|
|00003d80| 64 65 76 29 5d 3b 0a 58 | 20 20 20 20 64 61 64 64 |dev)];.X| dadd|
|00003d90| 72 5f 74 20 2a 70 5f 69 | 6e 64 69 72 3b 0a 58 20 |r_t *p_i|ndir;.X |
|00003da0| 20 20 20 73 74 72 75 63 | 74 20 64 69 6e 6f 64 65 | struc|t dinode|
|00003db0| 20 74 5f 69 6e 6f 2c 20 | 2a 70 5f 69 6e 6f 3b 0a | t_ino, |*p_ino;.|
|00003dc0| 58 20 20 20 20 6c 6f 6e | 67 20 62 6c 6f 63 6b 5b |X lon|g block[|
|00003dd0| 4e 55 4d 5f 41 44 44 52 | 5d 3b 0a 58 20 20 20 20 |NUM_ADDR|];.X |
|00003de0| 64 61 64 64 72 5f 74 20 | 62 61 63 6b 3b 0a 58 20 |daddr_t |back;.X |
|00003df0| 20 20 20 69 6e 74 20 69 | 3b 0a 58 0a 58 20 20 20 | int i|;.X.X |
|00003e00| 20 62 61 63 6b 20 3d 20 | 66 69 6c 73 79 73 2e 73 | back = |filsys.s|
|00003e10| 5f 66 73 69 7a 65 20 2d | 20 31 3b 0a 58 20 20 20 |_fsize -| 1;.X |
|00003e20| 20 77 68 69 6c 65 20 28 | 6e 65 78 74 5f 66 69 6c | while (|next_fil|
|00003e30| 6c 20 3c 20 62 61 63 6b | 20 26 26 20 6d 61 70 5b |l < back| && map[|
|00003e40| 62 61 63 6b 5d 20 21 3d | 20 30 29 0a 58 09 2d 2d |back] !=| 0).X.--|
|00003e50| 62 61 63 6b 3b 0a 58 0a | 58 20 20 20 20 69 66 20 |back;.X.|X if |
|00003e60| 28 6e 65 78 74 5f 66 69 | 6c 6c 20 3e 3d 20 62 61 |(next_fi|ll >= ba|
|00003e70| 63 6b 29 20 7b 0a 58 09 | 66 70 72 69 6e 74 66 28 |ck) {.X.|fprintf(|
|00003e80| 73 74 64 65 72 72 2c 20 | 22 25 73 3a 20 63 61 6e |stderr, |"%s: can|
|00003e90| 27 74 20 66 69 6e 64 20 | 61 20 66 72 65 65 20 62 |'t find |a free b|
|00003ea0| 6c 6f 63 6b 20 66 6f 72 | 20 25 64 5c 6e 22 2c 0a |lock for| %d\n",.|
|00003eb0| 58 09 20 20 20 20 63 6d | 64 5f 6e 61 6d 65 2c 20 |X. cm|d_name, |
|00003ec0| 6e 65 78 74 5f 66 69 6c | 6c 29 3b 0a 58 09 65 78 |next_fil|l);.X.ex|
|00003ed0| 69 74 28 31 29 3b 0a 58 | 20 20 20 20 7d 0a 58 0a |it(1);.X| }.X.|
|00003ee0| 58 20 20 20 20 6d 6f 76 | 65 5f 62 6c 6f 63 6b 28 |X mov|e_block(|
|00003ef0| 6e 65 78 74 5f 66 69 6c | 6c 2c 20 62 61 63 6b 29 |next_fil|l, back)|
|00003f00| 3b 0a 58 0a 58 20 20 20 | 20 69 66 20 28 6d 61 70 |;.X.X | if (map|
|00003f10| 5b 62 61 63 6b 5d 20 3c | 20 30 29 20 7b 0a 58 09 |[back] <| 0) {.X.|
|00003f20| 62 6c 6f 63 6b 5b 30 5d | 20 3d 20 2d 6d 61 70 5b |block[0]| = -map[|
|00003f30| 62 61 63 6b 5d 3b 0a 58 | 09 66 6f 72 20 28 69 20 |back];.X|.for (i |
|00003f40| 3d 20 30 3b 20 69 20 3c | 20 4e 55 4d 5f 49 4e 44 |= 0; i <| NUM_IND|
|00003f50| 49 52 3b 20 2b 2b 69 29 | 0a 58 09 20 20 20 20 69 |IR; ++i)|.X. i|
|00003f60| 66 20 28 62 6c 6f 63 6b | 5b 30 5d 20 3d 3d 20 77 |f (block|[0] == w|
|00003f70| 5f 69 6e 64 69 72 5b 69 | 5d 29 0a 58 09 09 62 72 |_indir[i|]).X..br|
|00003f80| 65 61 6b 3b 0a 58 09 69 | 66 20 28 69 20 3c 20 4e |eak;.X.i|f (i < N|
|00003f90| 55 4d 5f 49 4e 44 49 52 | 29 20 7b 0a 58 09 20 20 |UM_INDIR|) {.X. |
|00003fa0| 20 20 70 5f 69 6e 64 69 | 72 20 3d 20 28 64 61 64 | p_indi|r = (dad|
|00003fb0| 64 72 5f 74 20 2a 29 69 | 6e 64 69 72 5b 69 5d 3b |dr_t *)i|ndir[i];|
|00003fc0| 0a 58 09 7d 0a 58 09 65 | 6c 73 65 20 7b 0a 58 09 |.X.}.X.e|lse {.X.|
|00003fd0| 20 20 20 20 70 5f 69 6e | 64 69 72 20 3d 20 28 64 | p_in|dir = (d|
|00003fe0| 61 64 64 72 5f 74 20 2a | 29 74 5f 69 6e 64 69 72 |addr_t *|)t_indir|
|00003ff0| 3b 0a 58 09 20 20 20 20 | 72 65 61 64 5f 62 6c 6f |;.X. |read_blo|
|00004000| 63 6b 28 62 6c 6f 63 6b | 5b 30 5d 2c 20 74 5f 69 |ck(block|[0], t_i|
|00004010| 6e 64 69 72 29 3b 0a 58 | 09 7d 0a 58 09 66 6f 72 |ndir);.X|.}.X.for|
|00004020| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 46 73 4e | (i = 0;| i < FsN|
|00004030| 49 4e 44 49 52 28 64 65 | 76 29 3b 20 2b 2b 69 29 |INDIR(de|v); ++i)|
|00004040| 20 7b 0a 58 09 20 20 20 | 20 69 66 20 28 70 5f 69 | {.X. | if (p_i|
|00004050| 6e 64 69 72 5b 69 5d 20 | 3d 3d 20 6e 65 78 74 5f |ndir[i] |== next_|
|00004060| 66 69 6c 6c 29 20 7b 0a | 58 09 09 70 5f 69 6e 64 |fill) {.|X..p_ind|
|00004070| 69 72 5b 69 5d 20 3d 20 | 62 61 63 6b 3b 0a 58 09 |ir[i] = |back;.X.|
|00004080| 09 62 72 65 61 6b 3b 0a | 58 09 20 20 20 20 7d 0a |.break;.|X. }.|
|00004090| 58 09 7d 0a 58 09 69 66 | 20 28 69 20 3d 3d 20 46 |X.}.X.if| (i == F|
|000040a0| 73 4e 49 4e 44 49 52 28 | 64 65 76 29 29 20 7b 0a |sNINDIR(|dev)) {.|
|000040b0| 58 09 20 20 20 20 66 70 | 72 69 6e 74 66 28 73 74 |X. fp|rintf(st|
|000040c0| 64 65 72 72 2c 0a 58 09 | 09 22 25 73 3a 20 70 61 |derr,.X.|."%s: pa|
|000040d0| 6e 69 63 3a 20 63 61 6e | 27 74 20 66 69 6e 64 20 |nic: can|'t find |
|000040e0| 25 64 20 69 6e 20 69 6e | 64 69 72 65 63 74 20 62 |%d in in|direct b|
|000040f0| 6c 6f 63 6b 20 25 64 5c | 6e 22 2c 0a 58 09 09 63 |lock %d\|n",.X..c|
|00004100| 6d 64 5f 6e 61 6d 65 2c | 20 6e 65 78 74 5f 66 69 |md_name,| next_fi|
|00004110| 6c 6c 2c 20 2d 6d 61 70 | 5b 62 61 63 6b 5d 29 3b |ll, -map|[back]);|
|00004120| 0a 58 09 20 20 20 20 65 | 78 69 74 28 31 29 3b 0a |.X. e|xit(1);.|
|00004130| 58 09 7d 0a 58 09 77 72 | 69 74 65 5f 62 6c 6f 63 |X.}.X.wr|ite_bloc|
|00004140| 6b 28 62 6c 6f 63 6b 5b | 30 5d 2c 20 70 5f 69 6e |k(block[|0], p_in|
|00004150| 64 69 72 29 3b 0a 58 20 | 20 20 20 7d 0a 58 20 20 |dir);.X | }.X |
|00004160| 20 20 65 6c 73 65 20 7b | 0a 58 09 69 66 20 28 6d | else {|.X.if (m|
|00004170| 61 70 5b 62 61 63 6b 5d | 20 3d 3d 20 77 5f 69 6e |ap[back]| == w_in|
|00004180| 6f 29 20 7b 0a 58 09 20 | 20 20 20 70 5f 69 6e 6f |o) {.X. | p_ino|
|00004190| 20 3d 20 26 69 6e 6f 3b | 0a 58 09 7d 0a 58 09 65 | = &ino;|.X.}.X.e|
|000041a0| 6c 73 65 20 7b 0a 58 09 | 20 20 20 20 70 5f 69 6e |lse {.X.| p_in|
|000041b0| 6f 20 3d 20 26 74 5f 69 | 6e 6f 3b 0a 58 09 20 20 |o = &t_i|no;.X. |
|000041c0| 20 20 72 65 61 64 5f 69 | 6e 6f 64 65 28 6d 61 70 | read_i|node(map|
|000041d0| 5b 62 61 63 6b 5d 2c 20 | 26 74 5f 69 6e 6f 29 3b |[back], |&t_ino);|
|000041e0| 0a 58 09 7d 0a 58 09 6c | 33 74 6f 6c 28 62 6c 6f |.X.}.X.l|3tol(blo|
|000041f0| 63 6b 2c 20 70 5f 69 6e | 6f 2d 3e 64 69 5f 61 64 |ck, p_in|o->di_ad|
|00004200| 64 72 2c 20 4e 55 4d 5f | 41 44 44 52 29 3b 0a 58 |dr, NUM_|ADDR);.X|
|00004210| 09 66 6f 72 20 28 69 20 | 3d 20 30 3b 20 69 20 3c |.for (i |= 0; i <|
|00004220| 20 4e 55 4d 5f 41 44 44 | 52 3b 20 2b 2b 69 29 20 | NUM_ADD|R; ++i) |
|00004230| 7b 0a 58 09 20 20 20 20 | 69 66 20 28 62 6c 6f 63 |{.X. |if (bloc|
|00004240| 6b 5b 69 5d 20 3d 3d 20 | 6e 65 78 74 5f 66 69 6c |k[i] == |next_fil|
|00004250| 6c 29 20 7b 0a 58 09 09 | 62 6c 6f 63 6b 5b 69 5d |l) {.X..|block[i]|
|00004260| 20 3d 20 62 61 63 6b 3b | 0a 58 09 09 6c 74 6f 6c | = back;|.X..ltol|
|00004270| 33 28 70 5f 69 6e 6f 2d | 3e 64 69 5f 61 64 64 72 |3(p_ino-|>di_addr|
|00004280| 2c 20 62 6c 6f 63 6b 2c | 20 4e 55 4d 5f 41 44 44 |, block,| NUM_ADD|
|00004290| 52 29 3b 0a 58 09 09 62 | 72 65 61 6b 3b 0a 58 09 |R);.X..b|reak;.X.|
|000042a0| 20 20 20 20 7d 0a 58 09 | 7d 0a 58 09 69 66 20 28 | }.X.|}.X.if (|
|000042b0| 69 20 3d 3d 20 4e 55 4d | 5f 41 44 44 52 29 20 7b |i == NUM|_ADDR) {|
|000042c0| 0a 58 09 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 |.X. f|printf(s|
|000042d0| 74 64 65 72 72 2c 20 22 | 25 73 3a 20 70 61 6e 69 |tderr, "|%s: pani|
|000042e0| 63 3a 20 63 61 6e 27 74 | 20 66 69 6e 64 20 25 64 |c: can't| find %d|
|000042f0| 20 69 6e 20 69 6e 6f 64 | 65 20 25 64 5c 6e 22 2c | in inod|e %d\n",|
|00004300| 0a 58 09 09 63 6d 64 5f | 6e 61 6d 65 2c 20 6e 65 |.X..cmd_|name, ne|
|00004310| 78 74 5f 66 69 6c 6c 2c | 20 6d 61 70 5b 62 61 63 |xt_fill,| map[bac|
|00004320| 6b 5d 29 3b 0a 58 09 20 | 20 20 20 65 78 69 74 28 |k]);.X. | exit(|
|00004330| 31 29 3b 0a 58 09 7d 0a | 58 09 77 72 69 74 65 5f |1);.X.}.|X.write_|
|00004340| 69 6e 6f 64 65 28 6d 61 | 70 5b 62 61 63 6b 5d 2c |inode(ma|p[back],|
|00004350| 20 70 5f 69 6e 6f 29 3b | 0a 58 20 20 20 20 7d 0a | p_ino);|.X }.|
|00004360| 58 7d 0a 58 0a 58 73 74 | 61 74 69 63 20 76 6f 69 |X}.X.Xst|atic voi|
|00004370| 64 0a 58 72 65 62 75 69 | 6c 64 5f 66 72 65 65 5f |d.Xrebui|ld_free_|
|00004380| 6c 69 73 74 28 76 6f 69 | 64 29 0a 58 7b 0a 58 20 |list(voi|d).X{.X |
|00004390| 20 20 20 69 6e 74 20 66 | 72 65 65 5f 73 69 7a 65 | int f|ree_size|
|000043a0| 2c 20 6e 66 72 65 65 3b | 0a 58 20 20 20 20 64 61 |, nfree;|.X da|
|000043b0| 64 64 72 5f 74 20 66 72 | 65 65 5b 4e 49 43 46 52 |ddr_t fr|ee[NICFR|
|000043c0| 45 45 5d 2c 20 62 6c 6f | 63 6b 3b 0a 58 20 20 20 |EE], blo|ck;.X |
|000043d0| 20 63 68 61 72 20 62 75 | 66 5b 46 73 42 53 49 5a | char bu|f[FsBSIZ|
|000043e0| 45 28 64 65 76 29 5d 3b | 0a 58 0a 58 20 20 20 20 |E(dev)];|.X.X |
|000043f0| 66 72 65 65 5f 73 69 7a | 65 20 3d 20 66 69 6c 73 |free_siz|e = fils|
|00004400| 79 73 2e 73 5f 66 73 69 | 7a 65 20 2d 20 6e 65 78 |ys.s_fsi|ze - nex|
|00004410| 74 5f 66 69 6c 6c 3b 0a | 58 20 20 20 20 69 66 20 |t_fill;.|X if |
|00004420| 28 66 72 65 65 5f 73 69 | 7a 65 20 21 3d 20 66 69 |(free_si|ze != fi|
|00004430| 6c 73 79 73 2e 73 5f 74 | 66 72 65 65 29 20 7b 0a |lsys.s_t|free) {.|
|00004440| 58 09 66 70 72 69 6e 74 | 66 28 73 74 64 65 72 72 |X.fprint|f(stderr|
|00004450| 2c 20 22 25 73 3a 20 66 | 72 65 65 20 6c 69 73 74 |, "%s: f|ree list|
|00004460| 20 63 68 61 6e 67 65 64 | 20 73 69 7a 65 20 66 72 | changed| size fr|
|00004470| 6f 6d 20 25 64 20 74 6f | 20 25 64 5c 6e 22 2c 0a |om %d to| %d\n",.|
|00004480| 58 09 20 20 20 20 63 6d | 64 5f 6e 61 6d 65 2c 20 |X. cm|d_name, |
|00004490| 66 69 6c 73 79 73 2e 73 | 5f 74 66 72 65 65 2c 20 |filsys.s|_tfree, |
|000044a0| 66 72 65 65 5f 73 69 7a | 65 29 3b 0a 58 09 65 78 |free_siz|e);.X.ex|
|000044b0| 69 74 28 31 29 3b 0a 58 | 20 20 20 20 7d 0a 58 0a |it(1);.X| }.X.|
|000044c0| 58 20 20 20 20 6e 66 72 | 65 65 20 3d 20 31 3b 0a |X nfr|ee = 1;.|
|000044d0| 58 20 20 20 20 6d 65 6d | 73 65 74 28 66 72 65 65 |X mem|set(free|
|000044e0| 2c 20 30 2c 20 73 69 7a | 65 6f 66 28 66 72 65 65 |, 0, siz|eof(free|
|000044f0| 29 29 3b 0a 58 20 20 20 | 20 6d 65 6d 73 65 74 28 |));.X | memset(|
|00004500| 62 75 66 2c 20 30 2c 20 | 73 69 7a 65 6f 66 28 62 |buf, 0, |sizeof(b|
|00004510| 75 66 29 29 3b 0a 58 0a | 58 20 20 20 20 66 6f 72 |uf));.X.|X for|
|00004520| 20 28 62 6c 6f 63 6b 20 | 3d 20 66 69 6c 73 79 73 | (block |= filsys|
|00004530| 2e 73 5f 66 73 69 7a 65 | 20 2d 20 31 3b 20 62 6c |.s_fsize| - 1; bl|
|00004540| 6f 63 6b 20 3e 3d 20 6e | 65 78 74 5f 66 69 6c 6c |ock >= n|ext_fill|
|00004550| 3b 20 2d 2d 62 6c 6f 63 | 6b 29 20 7b 0a 58 09 69 |; --bloc|k) {.X.i|
|00004560| 66 20 28 6e 66 72 65 65 | 20 3d 3d 20 4e 49 43 46 |f (nfree| == NICF|
|00004570| 52 45 45 29 20 7b 0a 58 | 09 20 20 20 20 28 28 64 |REE) {.X|. ((d|
|00004580| 61 64 64 72 5f 74 20 2a | 29 62 75 66 29 5b 30 5d |addr_t *|)buf)[0]|
|00004590| 20 3d 20 6e 66 72 65 65 | 3b 0a 58 09 20 20 20 20 | = nfree|;.X. |
|000045a0| 6d 65 6d 63 70 79 28 26 | 28 28 64 61 64 64 72 5f |memcpy(&|((daddr_|
|000045b0| 74 20 2a 29 62 75 66 29 | 5b 31 5d 2c 20 66 72 65 |t *)buf)|[1], fre|
|000045c0| 65 2c 20 73 69 7a 65 6f | 66 28 66 72 65 65 29 29 |e, sizeo|f(free))|
|000045d0| 3b 0a 58 09 20 20 20 20 | 77 72 69 74 65 5f 62 6c |;.X. |write_bl|
|000045e0| 6f 63 6b 28 62 6c 6f 63 | 6b 2c 20 62 75 66 29 3b |ock(bloc|k, buf);|
|000045f0| 0a 58 09 20 20 20 20 6e | 66 72 65 65 20 3d 20 30 |.X. n|free = 0|
|00004600| 3b 0a 58 09 20 20 20 20 | 6d 65 6d 73 65 74 28 66 |;.X. |memset(f|
|00004610| 72 65 65 2c 20 30 2c 20 | 73 69 7a 65 6f 66 28 66 |ree, 0, |sizeof(f|
|00004620| 72 65 65 29 29 3b 0a 58 | 09 7d 0a 58 09 66 72 65 |ree));.X|.}.X.fre|
|00004630| 65 5b 6e 66 72 65 65 2b | 2b 5d 20 3d 20 62 6c 6f |e[nfree+|+] = blo|
|00004640| 63 6b 3b 0a 58 20 20 20 | 20 7d 0a 58 0a 58 20 20 |ck;.X | }.X.X |
|00004650| 20 20 66 69 6c 73 79 73 | 2e 73 5f 6e 66 72 65 65 | filsys|.s_nfree|
|00004660| 20 3d 20 6e 66 72 65 65 | 3b 0a 58 20 20 20 20 6d | = nfree|;.X m|
|00004670| 65 6d 63 70 79 28 26 66 | 69 6c 73 79 73 2e 73 5f |emcpy(&f|ilsys.s_|
|00004680| 66 72 65 65 2c 20 66 72 | 65 65 2c 20 73 69 7a 65 |free, fr|ee, size|
|00004690| 6f 66 28 66 72 65 65 29 | 29 3b 0a 58 20 20 20 20 |of(free)|);.X |
|000046a0| 77 72 69 74 65 5f 73 75 | 70 65 72 62 6c 6b 28 29 |write_su|perblk()|
|000046b0| 3b 0a 58 7d 0a 45 4e 44 | 5f 4f 46 5f 46 49 4c 45 |;.X}.END|_OF_FILE|
|000046c0| 0a 69 66 20 74 65 73 74 | 20 31 31 33 39 33 20 2d |.if test| 11393 -|
|000046d0| 6e 65 20 60 77 63 20 2d | 63 20 3c 27 70 61 63 6b |ne `wc -|c <'pack|
|000046e0| 64 69 73 6b 2e 63 27 60 | 3b 20 74 68 65 6e 0a 20 |disk.c'`|; then. |
|000046f0| 20 20 20 65 63 68 6f 20 | 73 68 61 72 3a 20 5c 22 | echo |shar: \"|
|00004700| 27 70 61 63 6b 64 69 73 | 6b 2e 63 27 5c 22 20 75 |'packdis|k.c'\" u|
|00004710| 6e 70 61 63 6b 65 64 20 | 77 69 74 68 20 77 72 6f |npacked |with wro|
|00004720| 6e 67 20 73 69 7a 65 21 | 0a 66 69 0a 23 20 65 6e |ng size!|.fi.# en|
|00004730| 64 20 6f 66 20 27 70 61 | 63 6b 64 69 73 6b 2e 63 |d of 'pa|ckdisk.c|
|00004740| 27 0a 66 69 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |'.fi.ech|o shar: |
|00004750| 45 6e 64 20 6f 66 20 73 | 68 65 6c 6c 20 61 72 63 |End of s|hell arc|
|00004760| 68 69 76 65 2e 0a 65 78 | 69 74 20 30 0a 0a 0a |hive..ex|it 0... |
+--------+-------------------------+-------------------------+--------+--------+