Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Minor changes to the lsmperf.tcl script.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 45e59053e7c8d1d92d97dc1033278665161c2be3
User & Date: dan 2012-10-03 09:24:09.252
Context
2012-10-15
19:36
Merge range-delete branch back into trunk. check-in: a7de625f13 user: dan tags: trunk
2012-10-03
20:05
Add (partially working) code for deleting keys to lsm_tree.c. Required for range-deletes. check-in: daa6942834 user: dan tags: range-delete
09:24
Minor changes to the lsmperf.tcl script. check-in: 45e59053e7 user: dan tags: trunk
2012-10-02
18:06
Simplify the way new cursors are created. check-in: 63d8eea506 user: dan tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to tool/lsmperf.tcl.
︙︙
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55

proc exec_gnuplot_script {script png} {
  write_to_file out "
    $script
    pause -1
  "
  
  set script "
    set terminal pngcairo size 1000,400
    $script
  "
  exec gnuplot << $script > $png 2>/dev/null
}

proc make_totalset {res nOp bFetch} {
  set ret ""








|








41
42
43
44
45
46
47
48
49
50
51
52
53
54
55

proc exec_gnuplot_script {script png} {
  write_to_file out "
    $script
    pause -1
  "
  
  set script "
    set terminal pngcairo size 1200,400
    $script
  "
  exec gnuplot << $script > $png 2>/dev/null
}

proc make_totalset {res nOp bFetch} {
  set ret ""
︙︙
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103


  set lRes [list]
  foreach {name sys} $lSys {
    set wt [list -w $nWrite -r $nRepeat -f $nFetch -system $sys]
    lappend lRes [exec_lsmtest_speed $nSec $wt]
    if {$sys != [lindex $lSys end]} {
      puts "Sleeping 20 seconds..."
      after 20000
    }
  }

  # Set up the header part of the gnuplot script.
  #
  set xmax 0
  foreach res $lRes {








|








89
90
91
92
93
94
95
96
97
98
99
100
101
102
103


  set lRes [list]
  foreach {name sys} $lSys {
    set wt [list -w $nWrite -r $nRepeat -f $nFetch -system $sys]
    lappend lRes [exec_lsmtest_speed $nSec $wt]
    if {$sys != [lindex $lSys end]} {
      puts "Sleeping 20 seconds..."
      #after 20000
    }
  }

  # Set up the header part of the gnuplot script.
  #
  set xmax 0
  foreach res $lRes {
︙︙
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178





179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196

    # Third plot. Cumulative writes per second (line chart).
    #
    set plot3 ",\"-\" ti \"$name cumulative writes/sec\" with lines lc rgb \"$c2\" lw 2 $plot3"
    set data3 "[make_totalset $res $nWrite 0] $data3"

    if {$nFetch>0} {
      set    new ", \"-\" ti \"$name fetches/sec\" axis x1y2 "
      append new "with points lw 3 lc rgb \"$c2\""
      set plot2 "$new $plot2"
      set data2 "[make_dataset $res 1 $nWrite $nWrite $nFetch] $data2"

      set    new ",\"-\" ti \"$name cumulative fetches/sec\" "
      append new "with lines lc rgb \"$c3\" lw 2 "
      set plot4 "$new $plot4"
      set data4 "[make_totalset $res $nFetch 1] $data4"
    }

    incr nShift [expr $nWrite/4]
  }
  append script "plot $plot1 $plot2 $plot3 $plot4\n"





  append script $data1
  append script $data2
  append script $data3
  append script $data4

  append script "pause -1\n"
  exec_gnuplot_script $script $zPng
}

do_write_test x.png 600 50000 50000 200 {
  lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0"
  LevelDB leveldb
}

# lsm-mt    "mmap=1 multi_proc=0 threads=2 autowork=0 autocheckpoint=8192000"
# lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0"
# lsm-st     "mmap=1 multi_proc=0 safety=1 threads=1 autowork=1"
# lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0"








|




|






|
>
>
>
>
>









|
|








159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201

    # Third plot. Cumulative writes per second (line chart).
    #
    set plot3 ",\"-\" ti \"$name cumulative writes/sec\" with lines lc rgb \"$c2\" lw 2 $plot3"
    set data3 "[make_totalset $res $nWrite 0] $data3"

    if {$nFetch>0} {
      set    new ", \"-\" ti \"$name fetches/sec\" axis x1y2 "
      append new "with points lw 1 lc rgb \"$c2\""
      set plot2 "$new $plot2"
      set data2 "[make_dataset $res 1 $nWrite $nWrite $nFetch] $data2"

      set    new ",\"-\" ti \"$name cumulative fetches/sec\" "
      append new "with lines lc rgb \"$c2\" lw 1 "
      set plot4 "$new $plot4"
      set data4 "[make_totalset $res $nFetch 1] $data4"
    }

    incr nShift [expr $nWrite/4]
  }
  append script "plot "
  append script $plot1
  append script $plot2
  append script $plot3
  append script $plot4
  append script "\n"
  append script $data1
  append script $data2
  append script $data3
  append script $data4

  append script "pause -1\n"
  exec_gnuplot_script $script $zPng
}

do_write_test x.png 600 50000 50000 20 {
  lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0 write_buffer=2097152"
  LevelDB leveldb
}

# lsm-mt    "mmap=1 multi_proc=0 threads=2 autowork=0 autocheckpoint=8192000"
# lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0"
# lsm-st     "mmap=1 multi_proc=0 safety=1 threads=1 autowork=1"
# lsm-mt     "mmap=1 multi_proc=0 safety=1 threads=3 autowork=0"
︙︙