Fossil SCM

Tweaked the log output for the statistics a bit.

aku 2007-11-22 07:21 trunk
Commit 2630e50610bdd0ed0370b3958a4a41c6dc962483
Parent 930ec162ce0db00…
1 file changed +11 -11
~ tools/cvs2fossil/lib/c2f_repository.tcl
M tools/cvs2fossil/lib/c2f_repository.tcl
+11 -11
--- tools/cvs2fossil/lib/c2f_repository.tcl
+++ tools/cvs2fossil/lib/c2f_repository.tcl
@@ -195,11 +195,11 @@
195195
 set bfmt %s
196196
 }
197197
198198
 foreach p $prlist {
199199
 set pid [$p id]
200
- set prefix "Statistics: Project [format $bfmt \"[$p printbase]\"]"
200
+ set prefix "Project [format $bfmt \"[$p printbase]\"]"
201201
 regsub -all {[^ ]} $prefix { } blanks
202202
 set sep " : "
203203
204204
 set rcount [state one { SELECT COUNT (*) FROM revision R, file F WHERE R.fid = F.fid AND F.pid = $pid }]
205205
 set tcount [state one { SELECT COUNT (*) FROM tag T, file F WHERE T.fid = F.fid AND F.pid = $pid }]
@@ -206,16 +206,16 @@
206206
 set bcount [state one { SELECT COUNT (*) FROM branch B, file F WHERE B.fid = F.fid AND F.pid = $pid }]
207207
 set scount [state one { SELECT COUNT (*) FROM symbol WHERE pid = $pid }]
208208
 set acount [state one { SELECT COUNT (*) FROM author WHERE aid IN (SELECT DISTINCT aid FROM meta WHERE pid = $pid) }]
209209
 set ccount [state one { SELECT COUNT (*) FROM cmessage WHERE cid IN (SELECT DISTINCT cid FROM meta WHERE pid = $pid) }]
210210
211
- log write 2 repository "$prefix$sep[format $fmt $rcount] [sp $rcount revision]"
212
- log write 2 repository "$blanks$sep[format $fmt $tcount] [sp $tcount tag]"
213
- log write 2 repository "$blanks$sep[format $fmt $bcount] [sp $bcount branch branches]"
214
- log write 2 repository "$blanks$sep[format $fmt $scount] [sp $scount symbol]"
215
- log write 2 repository "$blanks$sep[format $fmt $acount] [sp $acount author]"
216
- log write 2 repository "$blanks$sep[format $fmt $ccount] [sp $ccount {log message}]"
211
+ log write 2 repository "Statistics: $prefix$sep[format $fmt $rcount] [sp $rcount revision]"
212
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $tcount] [sp $tcount tag]"
213
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $bcount] [sp $bcount branch branches]"
214
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $scount] [sp $scount symbol]"
215
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $acount] [sp $acount author]"
216
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $ccount] [sp $ccount {log message}]"
217217
 }
218218
 return
219219
 }
220220
221221
 # pass II persistence
@@ -301,21 +301,21 @@
301301
 set bfmt %s
302302
 }
303303
304304
 foreach p $prlist {
305305
 set pid [$p id]
306
- set prefix "Statistics: Project [format $bfmt \"[$p printbase]\"]"
306
+ set prefix "Project [format $bfmt \"[$p printbase]\"]"
307307
 regsub -all {[^ ]} $prefix { } blanks
308308
 set sep " : "
309309
310310
 set ccount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid }]
311311
 set rcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 0 }]
312312
 set scount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 1 }]
313313
314
- log write 2 repository "$prefix$sep[format $fmt $ccount] [sp $ccount changeset]"
315
- log write 2 repository "$blanks$sep[format $fmt $rcount] [sp $rcount {revision changeset}]"
316
- log write 2 repository "$blanks$sep[format $fmt $scount] [sp $scount {symbol changeset}]"
314
+ log write 2 repository "Statistics: $prefix$sep[format $fmt $ccount] [sp $ccount changeset]"
315
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $rcount] [sp $rcount {revision changeset}]"
316
+ log write 2 repository "Statistics: $blanks$sep[format $fmt $scount] [sp $scount {symbol changeset}]"
317317
 }
318318
 return
319319
 }
320320
321321
 # # ## ### ##### ######## #############
322322
--- tools/cvs2fossil/lib/c2f_repository.tcl
+++ tools/cvs2fossil/lib/c2f_repository.tcl
@@ -195,11 +195,11 @@
195 set bfmt %s
196 }
197
198 foreach p $prlist {
199 set pid [$p id]
200 set prefix "Statistics: Project [format $bfmt \"[$p printbase]\"]"
201 regsub -all {[^ ]} $prefix { } blanks
202 set sep " : "
203
204 set rcount [state one { SELECT COUNT (*) FROM revision R, file F WHERE R.fid = F.fid AND F.pid = $pid }]
205 set tcount [state one { SELECT COUNT (*) FROM tag T, file F WHERE T.fid = F.fid AND F.pid = $pid }]
@@ -206,16 +206,16 @@
206 set bcount [state one { SELECT COUNT (*) FROM branch B, file F WHERE B.fid = F.fid AND F.pid = $pid }]
207 set scount [state one { SELECT COUNT (*) FROM symbol WHERE pid = $pid }]
208 set acount [state one { SELECT COUNT (*) FROM author WHERE aid IN (SELECT DISTINCT aid FROM meta WHERE pid = $pid) }]
209 set ccount [state one { SELECT COUNT (*) FROM cmessage WHERE cid IN (SELECT DISTINCT cid FROM meta WHERE pid = $pid) }]
210
211 log write 2 repository "$prefix$sep[format $fmt $rcount] [sp $rcount revision]"
212 log write 2 repository "$blanks$sep[format $fmt $tcount] [sp $tcount tag]"
213 log write 2 repository "$blanks$sep[format $fmt $bcount] [sp $bcount branch branches]"
214 log write 2 repository "$blanks$sep[format $fmt $scount] [sp $scount symbol]"
215 log write 2 repository "$blanks$sep[format $fmt $acount] [sp $acount author]"
216 log write 2 repository "$blanks$sep[format $fmt $ccount] [sp $ccount {log message}]"
217 }
218 return
219 }
220
221 # pass II persistence
@@ -301,21 +301,21 @@
301 set bfmt %s
302 }
303
304 foreach p $prlist {
305 set pid [$p id]
306 set prefix "Statistics: Project [format $bfmt \"[$p printbase]\"]"
307 regsub -all {[^ ]} $prefix { } blanks
308 set sep " : "
309
310 set ccount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid }]
311 set rcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 0 }]
312 set scount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 1 }]
313
314 log write 2 repository "$prefix$sep[format $fmt $ccount] [sp $ccount changeset]"
315 log write 2 repository "$blanks$sep[format $fmt $rcount] [sp $rcount {revision changeset}]"
316 log write 2 repository "$blanks$sep[format $fmt $scount] [sp $scount {symbol changeset}]"
317 }
318 return
319 }
320
321 # # ## ### ##### ######## #############
322
--- tools/cvs2fossil/lib/c2f_repository.tcl
+++ tools/cvs2fossil/lib/c2f_repository.tcl
@@ -195,11 +195,11 @@
195 set bfmt %s
196 }
197
198 foreach p $prlist {
199 set pid [$p id]
200 set prefix "Project [format $bfmt \"[$p printbase]\"]"
201 regsub -all {[^ ]} $prefix { } blanks
202 set sep " : "
203
204 set rcount [state one { SELECT COUNT (*) FROM revision R, file F WHERE R.fid = F.fid AND F.pid = $pid }]
205 set tcount [state one { SELECT COUNT (*) FROM tag T, file F WHERE T.fid = F.fid AND F.pid = $pid }]
@@ -206,16 +206,16 @@
206 set bcount [state one { SELECT COUNT (*) FROM branch B, file F WHERE B.fid = F.fid AND F.pid = $pid }]
207 set scount [state one { SELECT COUNT (*) FROM symbol WHERE pid = $pid }]
208 set acount [state one { SELECT COUNT (*) FROM author WHERE aid IN (SELECT DISTINCT aid FROM meta WHERE pid = $pid) }]
209 set ccount [state one { SELECT COUNT (*) FROM cmessage WHERE cid IN (SELECT DISTINCT cid FROM meta WHERE pid = $pid) }]
210
211 log write 2 repository "Statistics: $prefix$sep[format $fmt $rcount] [sp $rcount revision]"
212 log write 2 repository "Statistics: $blanks$sep[format $fmt $tcount] [sp $tcount tag]"
213 log write 2 repository "Statistics: $blanks$sep[format $fmt $bcount] [sp $bcount branch branches]"
214 log write 2 repository "Statistics: $blanks$sep[format $fmt $scount] [sp $scount symbol]"
215 log write 2 repository "Statistics: $blanks$sep[format $fmt $acount] [sp $acount author]"
216 log write 2 repository "Statistics: $blanks$sep[format $fmt $ccount] [sp $ccount {log message}]"
217 }
218 return
219 }
220
221 # pass II persistence
@@ -301,21 +301,21 @@
301 set bfmt %s
302 }
303
304 foreach p $prlist {
305 set pid [$p id]
306 set prefix "Project [format $bfmt \"[$p printbase]\"]"
307 regsub -all {[^ ]} $prefix { } blanks
308 set sep " : "
309
310 set ccount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid }]
311 set rcount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 0 }]
312 set scount [state one { SELECT COUNT (*) FROM changeset WHERE pid = $pid AND type = 1 }]
313
314 log write 2 repository "Statistics: $prefix$sep[format $fmt $ccount] [sp $ccount changeset]"
315 log write 2 repository "Statistics: $blanks$sep[format $fmt $rcount] [sp $rcount {revision changeset}]"
316 log write 2 repository "Statistics: $blanks$sep[format $fmt $scount] [sp $scount {symbol changeset}]"
317 }
318 return
319 }
320
321 # # ## ### ##### ######## #############
322

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button