Return to slide7 CVS log

Up to [Research Unix] / researchv10no / cmd / dist / talk

Annotation of researchv10no/cmd/dist/talk/slide7, revision 1.1.1.1

1.1       root        1: .ce
                      2: How \fIinsdist\fP works
                      3: .sp 2
                      4: .BU
                      5: We want either completely install the distribution, or
                      6: completely fail to install it; we don't want the file system
                      7: left in an intermediate state.
                      8: Initial idea:
                      9: .CO
                     10: tar cf $backup $files
                     11: tar t $backup | sort > $oldlist
                     12: tar tf $tarfile | sort > $newlist
                     13: if tar xf $tarfile
                     14: then
                     15:        comm -23 $oldlist $newlist > $remove
                     16:        test -s $remove && xargs rm -fr < $remove
                     17: else
                     18:        tar xf $backup
                     19:        comm -13 $oldlist $newlist > $remove
                     20:        test -s $remove && xargs rm -fr < $remove
                     21: fi
                     22: .CE
                     23: .BU
                     24: Unfortunately, line oriented text utilities don't like
                     25: funny file names.  We can fix this with \f(CWqargs\fP and
                     26: \f(CWuargs\fP.
                     27: Revised code:
                     28: .CO
                     29: # assume $files is in qargs format
                     30: uargs tar cf $backup $files
                     31: # tarf -tq prints tarfile contents in qargs format
                     32: tarf -tq < $backup | sort > $oldlist
                     33: tarf -tq < $tarfile | sort > $newlist
                     34: if tar xf $tarfile
                     35: then
                     36:        comm -23 $oldlist $newlist > $remove
                     37:        test -s $remove && xargs uargs rm -fr < $remove
                     38: else
                     39:        tar xf $backup
                     40:        comm -13 $oldlist $newlist > $remove
                     41:        test -s $remove && xargs uargs rm -fr < $remove
                     42: fi
                     43: .CE

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.