ebus-racket: db tests

2 files changed, 257 insertions, 0 deletions

diff --git a/ebus-racket/debug_db/benchmark_db-5.2.1.log b/ebus-racket/debug_db/benchmark_db-5.2.1.log
new file mode 100644
index 0000000..afcb2f4
--- /dev/null
+++ b/ebus-racket/debug_db/benchmark_db-5.2.1.log
@@ -0,0 +1,225 @@
+name=db-5.2.1 time=1331428203764 counter=500 current-memory-use=43684056
+name=db-5.2.1 time=1331428203944 counter=1000 current-memory-use=41597776
+name=db-5.2.1 time=1331428204106 counter=1500 current-memory-use=37775008
+name=db-5.2.1 time=1331428204299 counter=2000 current-memory-use=34182336
+name=db-5.2.1 time=1331428204451 counter=2500 current-memory-use=46977456
+name=db-5.2.1 time=1331428204622 counter=3000 current-memory-use=43381720
+name=db-5.2.1 time=1331428204797 counter=3500 current-memory-use=41355888
+name=db-5.2.1 time=1331428204961 counter=4000 current-memory-use=37799104
+name=db-5.2.1 time=1331428205122 counter=4500 current-memory-use=33313560
+name=db-5.2.1 time=1331428205283 counter=5000 current-memory-use=46066016
+name=db-5.2.1 time=1331428205449 counter=5500 current-memory-use=41479752
+name=db-5.2.1 time=1331428205607 counter=6000 current-memory-use=36918256
+name=db-5.2.1 time=1331428205773 counter=6500 current-memory-use=49630928
+name=db-5.2.1 time=1331428205951 counter=7000 current-memory-use=47006144
+name=db-5.2.1 time=1331428206114 counter=7500 current-memory-use=42423456
+name=db-5.2.1 time=1331428206285 counter=8000 current-memory-use=38690760
+name=db-5.2.1 time=1331428206455 counter=8500 current-memory-use=52224584
+name=db-5.2.1 time=1331428206613 counter=9000 current-memory-use=46578728
+name=db-5.2.1 time=1331428206774 counter=9500 current-memory-use=41551752
+name=db-5.2.1 time=1331428206940 counter=10000 current-memory-use=54148696
+name=db-5.2.1 time=1331428207115 counter=10500 current-memory-use=49828616
+name=db-5.2.1 time=1331428207270 counter=11000 current-memory-use=43007872
+name=db-5.2.1 time=1331428207435 counter=11500 current-memory-use=56167432
+name=db-5.2.1 time=1331428207594 counter=12000 current-memory-use=49587408
+name=db-5.2.1 time=1331428207753 counter=12500 current-memory-use=43015928
+name=db-5.2.1 time=1331428207916 counter=13000 current-memory-use=55671408
+name=db-5.2.1 time=1331428208093 counter=13500 current-memory-use=50949416
+name=db-5.2.1 time=1331428208269 counter=14000 current-memory-use=44205104
+name=db-5.2.1 time=1331428208437 counter=14500 current-memory-use=56806048
+name=db-5.2.1 time=1331428208598 counter=15000 current-memory-use=49201960
+name=db-5.2.1 time=1331428208769 counter=15500 current-memory-use=42604432
+name=db-5.2.1 time=1331428208935 counter=16000 current-memory-use=55214392
+name=db-5.2.1 time=1331428209107 counter=16500 current-memory-use=48972840
+name=db-5.2.1 time=1331428209257 counter=17000 current-memory-use=61259312
+name=db-5.2.1 time=1331428209421 counter=17500 current-memory-use=53624312
+name=db-5.2.1 time=1331428209577 counter=18000 current-memory-use=45358736
+name=db-5.2.1 time=1331428209740 counter=18500 current-memory-use=58133944
+name=db-5.2.1 time=1331428209909 counter=19000 current-memory-use=49428048
+name=db-5.2.1 time=1331428210073 counter=19500 current-memory-use=63414432
+name=db-5.2.1 time=1331428210303 counter=20000 current-memory-use=40041784
+name=db-5.2.1 time=1331428210549 counter=20500 current-memory-use=34439920
+name=db-5.2.1 time=1331428210736 counter=21000 current-memory-use=33705576
+name=db-5.2.1 time=1331428210907 counter=21500 current-memory-use=33017848
+name=db-5.2.1 time=1331428211079 counter=22000 current-memory-use=32333136
+name=db-5.2.1 time=1331428211252 counter=22500 current-memory-use=31645264
+name=db-5.2.1 time=1331428211415 counter=23000 current-memory-use=31019008
+name=db-5.2.1 time=1331428211620 counter=23500 current-memory-use=31941680
+name=db-5.2.1 time=1331428211802 counter=24000 current-memory-use=31400344
+name=db-5.2.1 time=1331428212002 counter=24500 current-memory-use=29621160
+name=db-5.2.1 time=1331428212248 counter=25000 current-memory-use=28969560
+name=db-5.2.1 time=1331428212424 counter=25500 current-memory-use=41681496
+name=db-5.2.1 time=1331428212672 counter=26000 current-memory-use=40794392
+name=db-5.2.1 time=1331428212845 counter=26500 current-memory-use=38988072
+name=db-5.2.1 time=1331428213059 counter=27000 current-memory-use=37731688
+name=db-5.2.1 time=1331428213236 counter=27500 current-memory-use=36039976
+name=db-5.2.1 time=1331428213392 counter=28000 current-memory-use=33125216
+name=db-5.2.1 time=1331428213560 counter=28500 current-memory-use=30833016
+name=db-5.2.1 time=1331428213729 counter=29000 current-memory-use=43440640
+name=db-5.2.1 time=1331428213895 counter=29500 current-memory-use=41560072
+name=db-5.2.1 time=1331428214064 counter=30000 current-memory-use=38733496
+name=db-5.2.1 time=1331428214240 counter=30500 current-memory-use=35357992
+name=db-5.2.1 time=1331428214399 counter=31000 current-memory-use=31889320
+name=db-5.2.1 time=1331428214556 counter=31500 current-memory-use=44717424
+name=db-5.2.1 time=1331428214712 counter=32000 current-memory-use=41303848
+name=db-5.2.1 time=1331428214869 counter=32500 current-memory-use=37924960
+name=db-5.2.1 time=1331428215048 counter=33000 current-memory-use=36557256
+name=db-5.2.1 time=1331428215432 counter=33500 current-memory-use=49573128
+name=db-5.2.1 time=1331428215606 counter=34000 current-memory-use=45636496
+name=db-5.2.1 time=1331428215763 counter=34500 current-memory-use=40861808
+name=db-5.2.1 time=1331428215958 counter=35000 current-memory-use=36830416
+name=db-5.2.1 time=1331428216130 counter=35500 current-memory-use=49864512
+name=db-5.2.1 time=1331428216291 counter=36000 current-memory-use=45251256
+name=db-5.2.1 time=1331428216457 counter=36500 current-memory-use=41165992
+name=db-5.2.1 time=1331428216611 counter=37000 current-memory-use=35764552
+name=db-5.2.1 time=1331428216760 counter=37500 current-memory-use=48728720
+name=db-5.2.1 time=1331428216920 counter=38000 current-memory-use=42942768
+name=db-5.2.1 time=1331428217088 counter=38500 current-memory-use=37300840
+name=db-5.2.1 time=1331428217244 counter=39000 current-memory-use=50878776
+name=db-5.2.1 time=1331428217396 counter=39500 current-memory-use=45511888
+name=db-5.2.1 time=1331428217552 counter=40000 current-memory-use=39522152
+name=db-5.2.1 time=1331428217710 counter=40500 current-memory-use=52712800
+name=db-5.2.1 time=1331428217881 counter=41000 current-memory-use=45814912
+name=db-5.2.1 time=1331428218044 counter=41500 current-memory-use=39523496
+name=db-5.2.1 time=1331428218201 counter=42000 current-memory-use=52322464
+name=db-5.2.1 time=1331428218356 counter=42500 current-memory-use=45837928
+name=db-5.2.1 time=1331428218522 counter=43000 current-memory-use=40650248
+name=db-5.2.1 time=1331428218681 counter=43500 current-memory-use=53422256
+name=db-5.2.1 time=1331428218846 counter=44000 current-memory-use=45810232
+name=db-5.2.1 time=1331428219001 counter=44500 current-memory-use=59609240
+name=db-5.2.1 time=1331428219154 counter=45000 current-memory-use=52139912
+name=db-5.2.1 time=1331428219321 counter=45500 current-memory-use=44521672
+name=db-5.2.1 time=1331428219477 counter=46000 current-memory-use=58240344
+name=db-5.2.1 time=1331428219641 counter=46500 current-memory-use=51006408
+name=db-5.2.1 time=1331428219793 counter=47000 current-memory-use=41879048
+name=db-5.2.1 time=1331428219956 counter=47500 current-memory-use=54589968
+name=db-5.2.1 time=1331428220121 counter=48000 current-memory-use=46459232
+name=db-5.2.1 time=1331428220278 counter=48500 current-memory-use=59280304
+name=db-5.2.1 time=1331428220435 counter=49000 current-memory-use=50724072
+name=db-5.2.1 time=1331428220591 counter=49500 current-memory-use=63507752
+name=db-5.2.1 time=1331428220754 counter=50000 current-memory-use=57074016
+name=db-5.2.1 time=1331428220917 counter=50500 current-memory-use=47457192
+name=db-5.2.1 time=1331428221074 counter=51000 current-memory-use=60271264
+name=db-5.2.1 time=1331428221240 counter=51500 current-memory-use=51305840
+name=db-5.2.1 time=1331428221394 counter=52000 current-memory-use=64098960
+name=db-5.2.1 time=1331428221564 counter=52500 current-memory-use=55522784
+name=db-5.2.1 time=1331428221712 counter=53000 current-memory-use=67805360
+name=db-5.2.1 time=1331428221866 counter=53500 current-memory-use=58291056
+name=db-5.2.1 time=1331428222031 counter=54000 current-memory-use=47606512
+name=db-5.2.1 time=1331428222179 counter=54500 current-memory-use=60528312
+name=db-5.2.1 time=1331428222364 counter=55000 current-memory-use=51515880
+name=db-5.2.1 time=1331428222517 counter=55500 current-memory-use=64408744
+name=db-5.2.1 time=1331428222681 counter=56000 current-memory-use=53634840
+name=db-5.2.1 time=1331428222837 counter=56500 current-memory-use=67334224
+name=db-5.2.1 time=1331428223001 counter=57000 current-memory-use=55392880
+name=db-5.2.1 time=1331428223163 counter=57500 current-memory-use=68084352
+name=db-5.2.1 time=1331428223325 counter=58000 current-memory-use=57970320
+name=db-5.2.1 time=1331428223478 counter=58500 current-memory-use=70244664
+name=db-5.2.1 time=1331428223706 counter=59000 current-memory-use=36520048
+name=db-5.2.1 time=1331428223927 counter=59500 current-memory-use=31983224
+name=db-5.2.1 time=1331428224080 counter=60000 current-memory-use=31660192
+name=db-5.2.1 time=1331428224240 counter=60500 current-memory-use=31247400
+name=db-5.2.1 time=1331428224404 counter=61000 current-memory-use=30732928
+name=db-5.2.1 time=1331428224570 counter=61500 current-memory-use=30207376
+name=db-5.2.1 time=1331428224734 counter=62000 current-memory-use=31572672
+name=db-5.2.1 time=1331428224895 counter=62500 current-memory-use=30080176
+name=db-5.2.1 time=1331428225059 counter=63000 current-memory-use=28597368
+name=db-5.2.1 time=1331428225213 counter=63500 current-memory-use=41429496
+name=db-5.2.1 time=1331428225379 counter=64000 current-memory-use=41463912
+name=db-5.2.1 time=1331428225540 counter=64500 current-memory-use=39969440
+name=db-5.2.1 time=1331428225701 counter=65000 current-memory-use=38540160
+name=db-5.2.1 time=1331428225863 counter=65500 current-memory-use=37025656
+name=db-5.2.1 time=1331428226041 counter=66000 current-memory-use=36181256
+name=db-5.2.1 time=1331428226201 counter=66500 current-memory-use=33692184
+name=db-5.2.1 time=1331428226370 counter=67000 current-memory-use=31085400
+name=db-5.2.1 time=1331428226535 counter=67500 current-memory-use=43696712
+name=db-5.2.1 time=1331428226721 counter=68000 current-memory-use=45021680
+name=db-5.2.1 time=1331428226876 counter=68500 current-memory-use=42557336
+name=db-5.2.1 time=1331428227038 counter=69000 current-memory-use=38821440
+name=db-5.2.1 time=1331428227203 counter=69500 current-memory-use=35299080
+name=db-5.2.1 time=1331428227352 counter=70000 current-memory-use=48196200
+name=db-5.2.1 time=1331428227517 counter=70500 current-memory-use=46448416
+name=db-5.2.1 time=1331428227683 counter=71000 current-memory-use=42759640
+name=db-5.2.1 time=1331428227845 counter=71500 current-memory-use=39293840
+name=db-5.2.1 time=1331428228015 counter=72000 current-memory-use=34610632
+name=db-5.2.1 time=1331428228176 counter=72500 current-memory-use=49012776
+name=db-5.2.1 time=1331428228335 counter=73000 current-memory-use=44768040
+name=db-5.2.1 time=1331428228486 counter=73500 current-memory-use=40365656
+name=db-5.2.1 time=1331428228639 counter=74000 current-memory-use=35347984
+name=db-5.2.1 time=1331428228798 counter=74500 current-memory-use=48083232
+name=db-5.2.1 time=1331428228963 counter=75000 current-memory-use=43487256
+name=db-5.2.1 time=1331428229116 counter=75500 current-memory-use=38031232
+name=db-5.2.1 time=1331428229272 counter=76000 current-memory-use=50890720
+name=db-5.2.1 time=1331428229430 counter=76500 current-memory-use=45372568
+name=db-5.2.1 time=1331428229601 counter=77000 current-memory-use=39705216
+name=db-5.2.1 time=1331428229763 counter=77500 current-memory-use=52407928
+name=db-5.2.1 time=1331428229938 counter=78000 current-memory-use=48645168
+name=db-5.2.1 time=1331428230106 counter=78500 current-memory-use=43809128
+name=db-5.2.1 time=1331428230273 counter=79000 current-memory-use=56491200
+name=db-5.2.1 time=1331428230437 counter=79500 current-memory-use=51423688
+name=db-5.2.1 time=1331428230596 counter=80000 current-memory-use=44566752
+name=db-5.2.1 time=1331428230765 counter=80500 current-memory-use=57163472
+name=db-5.2.1 time=1331428230921 counter=81000 current-memory-use=51597736
+name=db-5.2.1 time=1331428231079 counter=81500 current-memory-use=43655528
+name=db-5.2.1 time=1331428231244 counter=82000 current-memory-use=56337736
+name=db-5.2.1 time=1331428231414 counter=82500 current-memory-use=49994264
+name=db-5.2.1 time=1331428231572 counter=83000 current-memory-use=42003104
+name=db-5.2.1 time=1331428231741 counter=83500 current-memory-use=54622144
+name=db-5.2.1 time=1331428231912 counter=84000 current-memory-use=46940688
+name=db-5.2.1 time=1331428232083 counter=84500 current-memory-use=59553192
+name=db-5.2.1 time=1331428232241 counter=85000 current-memory-use=51022792
+name=db-5.2.1 time=1331428232407 counter=85500 current-memory-use=42398200
+name=db-5.2.1 time=1331428232559 counter=86000 current-memory-use=55291496
+name=db-5.2.1 time=1331428232721 counter=86500 current-memory-use=46736088
+name=db-5.2.1 time=1331428232884 counter=87000 current-memory-use=59427768
+name=db-5.2.1 time=1331428233060 counter=87500 current-memory-use=54828736
+name=db-5.2.1 time=1331428233222 counter=88000 current-memory-use=44694000
+name=db-5.2.1 time=1331428233385 counter=88500 current-memory-use=57424368
+name=db-5.2.1 time=1331428233546 counter=89000 current-memory-use=47827720
+name=db-5.2.1 time=1331428233719 counter=89500 current-memory-use=60371064
+name=db-5.2.1 time=1331428233885 counter=90000 current-memory-use=50644128
+name=db-5.2.1 time=1331428234049 counter=90500 current-memory-use=65327048
+name=db-5.2.1 time=1331428234212 counter=91000 current-memory-use=55538040
+name=db-5.2.1 time=1331428234369 counter=91500 current-memory-use=68262280
+name=db-5.2.1 time=1331428234540 counter=92000 current-memory-use=59234920
+name=db-5.2.1 time=1331428234696 counter=92500 current-memory-use=48140064
+name=db-5.2.1 time=1331428234866 counter=93000 current-memory-use=60689008
+name=db-5.2.1 time=1331428235029 counter=93500 current-memory-use=50042080
+name=db-5.2.1 time=1331428235193 counter=94000 current-memory-use=64439200
+name=db-5.2.1 time=1331428235371 counter=94500 current-memory-use=52339904
+name=db-5.2.1 time=1331428235530 counter=95000 current-memory-use=65060400
+name=db-5.2.1 time=1331428235708 counter=95500 current-memory-use=53288040
+name=db-5.2.1 time=1331428235874 counter=96000 current-memory-use=67390440
+name=db-5.2.1 time=1331428236039 counter=96500 current-memory-use=55384720
+name=db-5.2.1 time=1331428236199 counter=97000 current-memory-use=68112272
+name=db-5.2.1 time=1331428236359 counter=97500 current-memory-use=57061728
+name=db-5.2.1 time=1331428236518 counter=98000 current-memory-use=69866536
+name=db-5.2.1 time=1331428236750 counter=98500 current-memory-use=34627136
+name=db-5.2.1 time=1331428236971 counter=99000 current-memory-use=29972768
+name=db-5.2.1 time=1331428237135 counter=99500 current-memory-use=29496944
+name=db-5.2.1 time=1331428237294 counter=100000 current-memory-use=29061136
+name=db-5.2.1 time=1331428237459 counter=100500 current-memory-use=28529784
+name=db-5.2.1 time=1331428237624 counter=101000 current-memory-use=26978056
+name=db-5.2.1 time=1331428237799 counter=101500 current-memory-use=27064112
+name=db-5.2.1 time=1331428237950 counter=102000 current-memory-use=39996248
+name=db-5.2.1 time=1331428238118 counter=102500 current-memory-use=38343536
+name=db-5.2.1 time=1331428238273 counter=103000 current-memory-use=36990808
+name=db-5.2.1 time=1331428238433 counter=103500 current-memory-use=35580584
+name=db-5.2.1 time=1331428238629 counter=104000 current-memory-use=38883008
+name=db-5.2.1 time=1331428238780 counter=104500 current-memory-use=36228192
+name=db-5.2.1 time=1331428238947 counter=105000 current-memory-use=33608136
+name=db-5.2.1 time=1331428239106 counter=105500 current-memory-use=31144648
+name=db-5.2.1 time=1331428239268 counter=106000 current-memory-use=43875760
+name=db-5.2.1 time=1331428239433 counter=106500 current-memory-use=41331360
+name=db-5.2.1 time=1331428239611 counter=107000 current-memory-use=40413488
+name=db-5.2.1 time=1331428239776 counter=107500 current-memory-use=38488472
+name=db-5.2.1 time=1331428239939 counter=108000 current-memory-use=34913392
+name=db-5.2.1 time=1331428240093 counter=108500 current-memory-use=47750792
+name=db-5.2.1 time=1331428240257 counter=109000 current-memory-use=44263504
+name=db-5.2.1 time=1331428240412 counter=109500 current-memory-use=40915592
+name=db-5.2.1 time=1331428240585 counter=110000 current-memory-use=39283928
+name=db-5.2.1 time=1331428240752 counter=110500 current-memory-use=35679184
+name=db-5.2.1 time=1331428240902 counter=111000 current-memory-use=48669488
+name=db-5.2.1 time=1331428241075 counter=111500 current-memory-use=43954456
+name=db-5.2.1 time=1331428241251 counter=112000 current-memory-use=41237080
+name=db-5.2.1 time=1331428241419 counter=112500 current-memory-use=37289976
diff --git a/ebus-racket/debug_db/test.rkt b/ebus-racket/debug_db/test.rkt
new file mode 100644
index 0000000..c180058
--- /dev/null
+++ b/ebus-racket/debug_db/test.rkt
@@ -0,0 +1,32 @@
+#lang racket/base
+
+(define (benchmark func name)
+  (define output-file (open-output-file (string-append "benchmark_" name ".log")))
+  (define (log counter)
+    (let ([message (format "name=~a time=~a counter=~a current-memory-use=~a~n" 
+                           name (current-milliseconds)
+                           counter (current-memory-use))])
+      (display message)
+      (display message output-file)))
+  (let loop ([counter 1])
+    (let ([x (func)])
+      (when (= 0 (modulo counter 500))
+        (log counter))
+      (when (<= counter 125000)
+        (loop (+ counter 1))))))
+
+
+
+;;(require (prefix-in db: db)) (define name "db-5.2.1")
+;;(require (prefix-in db: (file "~/github.com_plt_racket/collects/db/main.rkt"))) (define name "db-git-09bed0d")
+(require (prefix-in db: (planet ryanc/db:1:4))) (define name "ryanc/db_1_4")
+
+(define pgc
+  (db:postgresql-connect
+    #:user "ebus" #:database "ebus" #:password "ebus" #:server "10.2.2.26"))
+
+(define (pgc-test)
+  (db:query-value pgc "SELECT 1"))
+
+(benchmark pgc-test name)
+