Artifact c5fb9baccf9457612f4aff097c15d41e688fbbbb:
File
tools/cvs2fossil/lib/pkgIndex.tcl
part of check-in
[b6bf21e2a8]
- Added helper class managing access to fossil repositories. Already has a basic method to import and delta-compress a series of files. Used 'test' commands of fossil to get the necessary low-level access.
by
aku on
2007-12-05 07:52:00.
0000: 23 20 23 20 23 23 20 23 23 23 20 23 23 23 23 23 # # ## ### #####
0010: 20 23 23 23 23 23 23 23 23 20 23 23 23 23 23 23 ######## ######
0020: 23 23 23 23 23 23 23 20 23 23 23 23 23 23 23 23 ####### ########
0030: 23 23 23 23 23 23 23 23 23 23 23 23 23 0a 23 23 #############.##
0040: 20 50 61 63 6b 61 67 65 20 6d 61 6e 61 67 65 6d Package managem
0050: 65 6e 74 2e 0a 23 23 20 49 6e 64 65 78 20 6f 66 ent..## Index of
0060: 20 74 68 65 20 6c 6f 63 61 6c 20 70 61 63 6b 61 the local packa
0070: 67 65 73 20 72 65 71 75 69 72 65 64 20 62 79 20 ges required by
0080: 63 76 73 32 66 6f 73 73 69 6c 0a 23 20 23 20 23 cvs2fossil.# # #
0090: 23 20 23 23 23 20 23 23 23 23 23 20 23 23 23 23 # ### ##### ####
00a0: 23 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23 #### ###########
00b0: 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23 ## #############
00c0: 23 23 23 23 23 23 23 23 0a 69 66 20 7b 21 5b 70 ########.if {![p
00d0: 61 63 6b 61 67 65 20 76 73 61 74 69 73 66 69 65 ackage vsatisfie
00e0: 73 20 5b 70 61 63 6b 61 67 65 20 72 65 71 75 69 s [package requi
00f0: 72 65 20 54 63 6c 5d 20 38 2e 34 5d 7d 20 72 65 re Tcl] 8.4]} re
0100: 74 75 72 6e 0a 70 61 63 6b 61 67 65 20 69 66 6e turn.package ifn
0110: 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c eeded vc::fossil
0120: 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 20 20 20 ::import::cvs
0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0140: 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 1.0 [list sourc
0150: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 e [file join $di
0160: 72 20 63 76 73 32 66 6f 73 73 69 6c 2e 74 63 6c r cvs2fossil.tcl
0170: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 ]].package ifnee
0180: 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a ded vc::fossil::
0190: 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 66 69 6c import::cvs::fil
01a0: 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 e 1
01b0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 .0 [list source
01c0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 [file join $dir
01d0: 63 32 66 5f 66 69 6c 65 2e 74 63 6c 5d 5d 0a 70 c2f_file.tcl]].p
01e0: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 ackage ifneeded
01f0: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f vc::fossil::impo
0200: 72 74 3a 3a 63 76 73 3a 3a 66 69 6c 65 3a 3a 6c rt::cvs::file::l
0210: 6f 64 6d 67 72 20 20 20 20 20 20 31 2e 30 20 5b odmgr 1.0 [
0220: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c list source [fil
0230: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f e join $dir c2f_
0240: 66 6c 6f 64 6d 67 72 2e 74 63 6c 5d 5d 0a 70 61 flodmgr.tcl]].pa
0250: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 ckage ifneeded v
0260: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 c::fossil::impor
0270: 74 3a 3a 63 76 73 3a 3a 66 69 6c 65 3a 3a 72 65 t::cvs::file::re
0280: 76 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b 6c v 1.0 [l
0290: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 ist source [file
02a0: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 66 join $dir c2f_f
02b0: 72 65 76 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 rev.tcl]].packag
02c0: 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 e ifneeded vc::f
02d0: 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 ossil::import::c
02e0: 76 73 3a 3a 66 69 6c 65 3a 3a 73 79 6d 20 20 20 vs::file::sym
02f0: 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 1.0 [list
0300: 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 source [file joi
0310: 6e 20 24 64 69 72 20 63 32 66 5f 66 73 79 6d 2e n $dir c2f_fsym.
0320: 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 tcl]].package if
0330: 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 needed vc::fossi
0340: 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a l::import::cvs::
0350: 66 69 6c 65 3a 3a 74 72 75 6e 6b 20 20 20 20 20 file::trunk
0360: 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 1.0 [list sour
0370: 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 ce [file join $d
0380: 69 72 20 63 32 66 5f 66 74 72 75 6e 6b 2e 74 63 ir c2f_ftrunk.tc
0390: 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 l]].package ifne
03a0: 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a eded vc::fossil:
03b0: 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 66 6f :import::cvs::fo
03c0: 73 73 69 6c 20 20 20 20 20 20 20 20 20 20 20 20 ssil
03d0: 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 1.0 [list source
03e0: 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 [file join $dir
03f0: 20 63 32 66 5f 66 6f 73 73 69 6c 2e 74 63 6c 5d c2f_fossil.tcl]
0400: 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 ].package ifneed
0410: 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 ed vc::fossil::i
0420: 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 6f 70 74 69 mport::cvs::opti
0430: 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20 31 2e on 1.
0440: 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 0 [list source [
0450: 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 file join $dir c
0460: 32 66 5f 6f 70 74 69 6f 6e 2e 74 63 6c 5d 5d 0a 2f_option.tcl]].
0470: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 package ifneeded
0480: 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 vc::fossil::imp
0490: 6f 72 74 3a 3a 63 76 73 3a 3a 69 6e 74 65 67 72 ort::cvs::integr
04a0: 69 74 79 20 20 20 20 20 20 20 20 20 31 2e 30 20 ity 1.0
04b0: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 [list source [fi
04c0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 le join $dir c2f
04d0: 5f 69 6e 74 65 67 72 69 74 79 2e 74 63 6c 5d 5d _integrity.tcl]]
04e0: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 .package ifneede
04f0: 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d d vc::fossil::im
0500: 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 20 port::cvs::pass
0510: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 1.0
0520: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 [list source [f
0530: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 ile join $dir c2
0540: 66 5f 70 61 73 73 2e 74 63 6c 5d 5d 0a 70 61 63 f_pass.tcl]].pac
0550: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 kage ifneeded vc
0560: 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 ::fossil::import
0570: 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63 6f 6c ::cvs::pass::col
0580: 6c 61 72 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 lar 1.0 [li
0590: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 st source [file
05a0: 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 63 join $dir c2f_pc
05b0: 6f 6c 6c 61 72 2e 74 63 6c 5d 5d 0a 70 61 63 6b ollar.tcl]].pack
05c0: 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a age ifneeded vc:
05d0: 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a :fossil::import:
05e0: 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63 6f 6c 6c :cvs::pass::coll
05f0: 72 65 76 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 rev 1.0 [lis
0600: 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a t source [file j
0610: 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 63 6f oin $dir c2f_pco
0620: 6c 6c 72 65 76 2e 74 63 6c 5d 5d 0a 70 61 63 6b llrev.tcl]].pack
0630: 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a age ifneeded vc:
0640: 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a :fossil::import:
0650: 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63 6f 6c 6c :cvs::pass::coll
0660: 73 79 6d 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 sym 1.0 [lis
0670: 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a t source [file j
0680: 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 63 6f oin $dir c2f_pco
0690: 6c 6c 73 79 6d 2e 74 63 6c 5d 5d 0a 70 61 63 6b llsym.tcl]].pack
06a0: 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a age ifneeded vc:
06b0: 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a :fossil::import:
06c0: 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 66 69 6c 74 :cvs::pass::filt
06d0: 65 72 73 79 6d 20 20 20 31 2e 30 20 5b 6c 69 73 ersym 1.0 [lis
06e0: 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a t source [file j
06f0: 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 66 69 oin $dir c2f_pfi
0700: 6c 74 65 72 73 79 6d 2e 74 63 6c 5d 5d 0a 70 61 ltersym.tcl]].pa
0710: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 ckage ifneeded v
0720: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 c::fossil::impor
0730: 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 69 6e t::cvs::pass::in
0740: 69 74 63 73 65 74 73 20 20 20 31 2e 30 20 5b 6c itcsets 1.0 [l
0750: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 ist source [file
0760: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 join $dir c2f_p
0770: 69 6e 69 74 63 73 65 74 73 2e 74 63 6c 5d 5d 0a initcsets.tcl]].
0780: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 package ifneeded
0790: 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 vc::fossil::imp
07a0: 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a ort::cvs::pass::
07b0: 63 73 65 74 64 65 70 73 20 20 20 20 31 2e 30 20 csetdeps 1.0
07c0: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 [list source [fi
07d0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 le join $dir c2f
07e0: 5f 70 63 73 65 74 64 65 70 73 2e 74 63 6c 5d 5d _pcsetdeps.tcl]]
07f0: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 .package ifneede
0800: 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d d vc::fossil::im
0810: 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a port::cvs::pass:
0820: 3a 62 72 65 61 6b 72 63 79 63 6c 65 20 31 2e 30 :breakrcycle 1.0
0830: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 [list source [f
0840: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 ile join $dir c2
0850: 66 5f 70 62 72 65 61 6b 72 63 79 63 6c 65 2e 74 f_pbreakrcycle.t
0860: 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e cl]].package ifn
0870: 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c eeded vc::fossil
0880: 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 ::import::cvs::p
0890: 61 73 73 3a 3a 72 74 6f 70 73 6f 72 74 20 20 20 ass::rtopsort
08a0: 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 1.0 [list sourc
08b0: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 e [file join $di
08c0: 72 20 63 32 66 5f 70 72 74 6f 70 73 6f 72 74 2e r c2f_prtopsort.
08d0: 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 tcl]].package if
08e0: 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 needed vc::fossi
08f0: 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a l::import::cvs::
0900: 70 61 73 73 3a 3a 62 72 65 61 6b 73 63 79 63 6c pass::breakscycl
0910: 65 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 e 1.0 [list sour
0920: 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 ce [file join $d
0930: 69 72 20 63 32 66 5f 70 62 72 65 61 6b 73 63 79 ir c2f_pbreakscy
0940: 63 6c 65 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 cle.tcl]].packag
0950: 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 e ifneeded vc::f
0960: 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 ossil::import::c
0970: 76 73 3a 3a 70 61 73 73 3a 3a 62 72 65 61 6b 61 vs::pass::breaka
0980: 63 79 63 6c 65 20 31 2e 30 20 5b 6c 69 73 74 20 cycle 1.0 [list
0990: 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 source [file joi
09a0: 6e 20 24 64 69 72 20 63 32 66 5f 70 62 72 65 61 n $dir c2f_pbrea
09b0: 6b 61 63 79 63 6c 65 2e 74 63 6c 5d 5d 0a 70 61 kacycle.tcl]].pa
09c0: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 ckage ifneeded v
09d0: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 c::fossil::impor
09e0: 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 61 74 t::cvs::pass::at
09f0: 6f 70 73 6f 72 74 20 20 20 20 31 2e 30 20 5b 6c opsort 1.0 [l
0a00: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 ist source [file
0a10: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 join $dir c2f_p
0a20: 61 74 6f 70 73 6f 72 74 2e 74 63 6c 5d 5d 0a 70 atopsort.tcl]].p
0a30: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 ackage ifneeded
0a40: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f vc::fossil::impo
0a50: 72 74 3a 3a 63 76 73 3a 3a 67 74 63 6f 72 65 20 rt::cvs::gtcore
0a60: 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b 1.0 [
0a70: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c list source [fil
0a80: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f e join $dir c2f_
0a90: 67 74 63 6f 72 65 2e 74 63 6c 5d 5d 0a 70 61 63 gtcore.tcl]].pac
0aa0: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 kage ifneeded vc
0ab0: 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 ::fossil::import
0ac0: 3a 3a 63 76 73 3a 3a 63 79 63 6c 65 62 72 65 61 ::cvs::cyclebrea
0ad0: 6b 65 72 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 ker 1.0 [li
0ae0: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 st source [file
0af0: 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 63 79 join $dir c2f_cy
0b00: 63 6c 65 62 72 65 61 6b 65 72 2e 74 63 6c 5d 5d clebreaker.tcl]]
0b10: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 .package ifneede
0b20: 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d d vc::fossil::im
0b30: 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65 port::cvs::proje
0b40: 63 74 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 ct 1.0
0b50: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 [list source [f
0b60: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 ile join $dir c2
0b70: 66 5f 70 72 6f 6a 65 63 74 2e 74 63 6c 5d 5d 0a f_project.tcl]].
0b80: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 package ifneeded
0b90: 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 vc::fossil::imp
0ba0: 6f 72 74 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65 63 ort::cvs::projec
0bb0: 74 3a 3a 6c 6f 64 6d 67 72 20 20 20 31 2e 30 20 t::lodmgr 1.0
0bc0: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 [list source [fi
0bd0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 le join $dir c2f
0be0: 5f 70 6c 6f 64 6d 67 72 2e 74 63 6c 5d 5d 0a 70 _plodmgr.tcl]].p
0bf0: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 ackage ifneeded
0c00: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f vc::fossil::impo
0c10: 72 74 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65 63 74 rt::cvs::project
0c20: 3a 3a 72 65 76 20 20 20 20 20 20 31 2e 30 20 5b ::rev 1.0 [
0c30: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c list source [fil
0c40: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f e join $dir c2f_
0c50: 70 72 65 76 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 prev.tcl]].packa
0c60: 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a ge ifneeded vc::
0c70: 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a fossil::import::
0c80: 63 76 73 3a 3a 70 72 6f 6a 65 63 74 3a 3a 72 65 cvs::project::re
0c90: 76 6c 69 6e 6b 20 20 31 2e 30 20 5b 6c 69 73 74 vlink 1.0 [list
0ca0: 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f source [file jo
0cb0: 69 6e 20 24 64 69 72 20 63 32 66 5f 70 72 65 76 in $dir c2f_prev
0cc0: 6c 69 6e 6b 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 link.tcl]].packa
0cd0: 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a ge ifneeded vc::
0ce0: 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a fossil::import::
0cf0: 63 76 73 3a 3a 70 72 6f 6a 65 63 74 3a 3a 73 79 cvs::project::sy
0d00: 6d 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 m 1.0 [list
0d10: 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f source [file jo
0d20: 69 6e 20 24 64 69 72 20 63 32 66 5f 70 73 79 6d in $dir c2f_psym
0d30: 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 .tcl]].package i
0d40: 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 fneeded vc::foss
0d50: 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a il::import::cvs:
0d60: 3a 70 72 6f 6a 65 63 74 3a 3a 74 72 75 6e 6b 20 :project::trunk
0d70: 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 1.0 [list sou
0d80: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 rce [file join $
0d90: 64 69 72 20 63 32 66 5f 70 74 72 75 6e 6b 2e 74 dir c2f_ptrunk.t
0da0: 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e cl]].package ifn
0db0: 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c eeded vc::fossil
0dc0: 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 72 ::import::cvs::r
0dd0: 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20 20 20 epository
0de0: 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 1.0 [list sourc
0df0: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 e [file join $di
0e00: 72 20 63 32 66 5f 72 65 70 6f 73 69 74 6f 72 79 r c2f_repository
0e10: 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 .tcl]].package i
0e20: 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 fneeded vc::foss
0e30: 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a il::import::cvs:
0e40: 3a 73 74 61 74 65 20 20 20 20 20 20 20 20 20 20 :state
0e50: 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 1.0 [list sou
0e60: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 rce [file join $
0e70: 64 69 72 20 63 32 66 5f 73 74 61 74 65 2e 74 63 dir c2f_state.tc
0e80: 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 l]].package ifne
0e90: 65 64 65 64 20 76 63 3a 3a 72 63 73 3a 3a 70 61 eded vc::rcs::pa
0ea0: 72 73 65 72 20 20 20 20 20 20 20 20 20 20 20 20 rser
0eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0ec0: 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 1.0 [list source
0ed0: 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 [file join $dir
0ee0: 20 72 63 73 70 61 72 73 65 72 2e 74 63 6c 5d 5d rcsparser.tcl]]
0ef0: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 .package ifneede
0f00: 64 20 76 63 3a 3a 74 6f 6f 6c 73 3a 3a 64 6f 74 d vc::tools::dot
0f10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0f20: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 1.0
0f30: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 [list source [f
0f40: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 64 6f ile join $dir do
0f50: 74 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 t.tcl]].package
0f60: 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 74 6f 6f ifneeded vc::too
0f70: 6c 73 3a 3a 69 64 20 20 20 20 20 20 20 20 20 20 ls::id
0f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0f90: 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 1.0 [list so
0fa0: 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 urce [file join
0fb0: 24 64 69 72 20 69 64 2e 74 63 6c 5d 5d 0a 70 61 $dir id.tcl]].pa
0fc0: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 ckage ifneeded v
0fd0: 63 3a 3a 74 6f 6f 6c 73 3a 3a 6c 6f 67 20 20 20 c::tools::log
0fe0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0ff0: 20 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b 6c 1.0 [l
1000: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 ist source [file
1010: 20 6a 6f 69 6e 20 24 64 69 72 20 6c 6f 67 2e 74 join $dir log.t
1020: 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e cl]].package ifn
1030: 65 65 64 65 64 20 76 63 3a 3a 74 6f 6f 6c 73 3a eeded vc::tools:
1040: 3a 6d 69 73 63 20 20 20 20 20 20 20 20 20 20 20 :misc
1050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1060: 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 1.0 [list sourc
1070: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 e [file join $di
1080: 72 20 6d 69 73 63 2e 74 63 6c 5d 5d 0a 70 61 63 r misc.tcl]].pac
1090: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 kage ifneeded vc
10a0: 3a 3a 74 6f 6f 6c 73 3a 3a 74 72 6f 75 62 6c 65 ::tools::trouble
10b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
10c0: 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 1.0 [li
10d0: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 st source [file
10e0: 6a 6f 69 6e 20 24 64 69 72 20 74 72 6f 75 62 6c join $dir troubl
10f0: 65 2e 74 63 6c 5d 5d 0a e.tcl]].