add tpcc

packages/tls/tpcc-mysql/Dockerfile

+FROM ubuntu:16.04
+
+RUN apt-get update && apt-get install -y gcc libc6-dev zlib1g-dev make libmysqlclient-dev
+
+ADD . /tpcc-mysql
+ENV PATH /tpcc-mysql:$PATH
+WORKDIR /tpcc-mysql
+RUN cd src && make

packages/tls/tpcc-mysql/README.md

+1. Build binaries
+   * `cd src ; make`
+   ( you should have mysql_config available in $PATH)
+
+2. Load data
+   * create database
+     `mysqladmin create tpcc1000`
+   * create tables
+     `mysql tpcc1000 < create_table.sql`
+   * create indexes and FK ( this step can be done after loading data)
+     `mysql tpcc1000 < add_fkey_idx.sql`
+   * populate data
+     - simple step
+       `tpcc_load -h127.0.0.1 -d tpcc1000 -u root -p "" -w 1000`
+                 |hostname:port| |dbname| |user| |password| |WAREHOUSES|
+       ref. tpcc_load --help for all options
+     - load data in parallel 
+       check load.sh script
+
+3. Start benchmark
+   * `./tpcc_start -h127.0.0.1 -P3306 -dtpcc1000 -uroot -w1000 -c32 -r10 -l10800`
+   * |hostname| |port| |dbname| |user| |WAREHOUSES| |CONNECTIONS| |WARMUP TIME| |BENCHMARK TIME|
+   * ref. tpcc_start --help for all options 
+
+Output
+===================================
+
+With the defined interval (-i option), the tool will produce the following output:
+```
+  10, trx: 12920, 95%: 9.483, 99%: 18.738, max_rt: 213.169, 12919|98.778, 1292|101.096, 1293|443.955, 1293|670.842
+  20, trx: 12666, 95%: 7.074, 99%: 15.578, max_rt: 53.733, 12668|50.420, 1267|35.846, 1266|58.292, 1267|37.421
+  30, trx: 13269, 95%: 6.806, 99%: 13.126, max_rt: 41.425, 13267|27.968, 1327|32.242, 1327|40.529, 1327|29.580
+  40, trx: 12721, 95%: 7.265, 99%: 15.223, max_rt: 60.368, 12721|42.837, 1271|34.567, 1272|64.284, 1272|22.947
+  50, trx: 12573, 95%: 7.185, 99%: 14.624, max_rt: 48.607, 12573|45.345, 1258|41.104, 1258|54.022, 1257|26.626
+```
+
+Where: 
+* 10 - the seconds from the start of the benchmark
+* trx: 12920 - New Order transactions executed during the gived interval (in this case, for the previous 10 sec). Basically this is the throughput per interval. The more the better
+* 95%: 9.483: - The 95% Response time of New Order transactions per given interval. In this case it is 9.483 sec
+* 99%: 18.738: - The 99% Response time of New Order transactions per given interval. In this case it is 18.738 sec
+* max_rt: 213.169: - The Max Response time of New Order transactions per given interval. In this case it is 213.169 sec
+* the rest: `12919|98.778, 1292|101.096, 1293|443.955, 1293|670.842` is throughput and max response time for the other kind of transactions and can be ignored
+
+

packages/tls/tpcc-mysql/add_fkey_idx.sql

+SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0;
+SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0;
+
+
+CREATE INDEX idx_customer ON customer (c_w_id,c_d_id,c_last,c_first);
+CREATE INDEX idx_orders ON orders (o_w_id,o_d_id,o_c_id,o_id);
+CREATE INDEX fkey_stock_2 ON stock (s_i_id);
+CREATE INDEX fkey_order_line_2 ON order_line (ol_supply_w_id,ol_i_id);
+
+ALTER TABLE district  ADD CONSTRAINT fkey_district_1 FOREIGN KEY(d_w_id) REFERENCES warehouse(w_id);
+ALTER TABLE customer ADD CONSTRAINT fkey_customer_1 FOREIGN KEY(c_w_id,c_d_id) REFERENCES district(d_w_id,d_id);
+ALTER TABLE history  ADD CONSTRAINT fkey_history_1 FOREIGN KEY(h_c_w_id,h_c_d_id,h_c_id) REFERENCES customer(c_w_id,c_d_id,c_id);
+ALTER TABLE history  ADD CONSTRAINT fkey_history_2 FOREIGN KEY(h_w_id,h_d_id) REFERENCES district(d_w_id,d_id);
+ALTER TABLE new_orders ADD CONSTRAINT fkey_new_orders_1 FOREIGN KEY(no_w_id,no_d_id,no_o_id) REFERENCES orders(o_w_id,o_d_id,o_id);
+ALTER TABLE orders ADD CONSTRAINT fkey_orders_1 FOREIGN KEY(o_w_id,o_d_id,o_c_id) REFERENCES customer(c_w_id,c_d_id,c_id);
+ALTER TABLE order_line ADD CONSTRAINT fkey_order_line_1 FOREIGN KEY(ol_w_id,ol_d_id,ol_o_id) REFERENCES orders(o_w_id,o_d_id,o_id);
+ALTER TABLE order_line ADD CONSTRAINT fkey_order_line_2 FOREIGN KEY(ol_supply_w_id,ol_i_id) REFERENCES stock(s_w_id,s_i_id);
+ALTER TABLE stock ADD CONSTRAINT fkey_stock_1 FOREIGN KEY(s_w_id) REFERENCES warehouse(w_id);
+ALTER TABLE stock ADD CONSTRAINT fkey_stock_2 FOREIGN KEY(s_i_id) REFERENCES item(i_id);
+
+
+
+SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS;
+SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS;

packages/tls/tpcc-mysql/count.sql

+select count(w_id) from warehouse;
+select count(d_w_id) from district;
+select count(c_w_id) from customer;
+select count(h_c_id) from history;
+select count(no_w_id) from new_orders;
+select count(o_w_id) from orders;
+select count(ol_w_id) from order_line;
+select count(i_id) from item;
+select count(s_w_id) from stock;

packages/tls/tpcc-mysql/create_table.sql

+drop table if exists warehouse;
+
+create table warehouse (
+w_id smallint not null,
+w_name varchar(10), 
+w_street_1 varchar(20), 
+w_street_2 varchar(20), 
+w_city varchar(20), 
+w_state char(2), 
+w_zip char(9), 
+w_tax decimal(4,2), 
+w_ytd decimal(12,2),
+primary key (w_id) ) Engine=InnoDB;
+
+drop table if exists district;
+
+create table district (
+d_id tinyint not null, 
+d_w_id smallint not null, 
+d_name varchar(10), 
+d_street_1 varchar(20), 
+d_street_2 varchar(20), 
+d_city varchar(20), 
+d_state char(2), 
+d_zip char(9), 
+d_tax decimal(4,2), 
+d_ytd decimal(12,2), 
+d_next_o_id int,
+primary key (d_w_id, d_id) ) Engine=InnoDB;
+
+drop table if exists customer;
+
+create table customer (
+c_id int not null, 
+c_d_id tinyint not null,
+c_w_id smallint not null, 
+c_first varchar(16), 
+c_middle char(2), 
+c_last varchar(16), 
+c_street_1 varchar(20), 
+c_street_2 varchar(20), 
+c_city varchar(20), 
+c_state char(2), 
+c_zip char(9), 
+c_phone char(16), 
+c_since datetime, 
+c_credit char(2), 
+c_credit_lim bigint, 
+c_discount decimal(4,2), 
+c_balance decimal(12,2), 
+c_ytd_payment decimal(12,2), 
+c_payment_cnt smallint, 
+c_delivery_cnt smallint, 
+c_data text,
+PRIMARY KEY(c_w_id, c_d_id, c_id) ) Engine=InnoDB;
+
+drop table if exists history;
+
+create table history (
+h_c_id int, 
+h_c_d_id tinyint, 
+h_c_w_id smallint,
+h_d_id tinyint,
+h_w_id smallint,
+h_date datetime,
+h_amount decimal(6,2), 
+h_data varchar(24) ) Engine=InnoDB;
+
+drop table if exists new_orders;
+
+create table new_orders (
+no_o_id int not null,
+no_d_id tinyint not null,
+no_w_id smallint not null,
+PRIMARY KEY(no_w_id, no_d_id, no_o_id)) Engine=InnoDB;
+
+drop table if exists orders;
+
+create table orders (
+o_id int not null, 
+o_d_id tinyint not null, 
+o_w_id smallint not null,
+o_c_id int,
+o_entry_d datetime,
+o_carrier_id tinyint,
+o_ol_cnt tinyint, 
+o_all_local tinyint,
+PRIMARY KEY(o_w_id, o_d_id, o_id) ) Engine=InnoDB ;
+
+drop table if exists order_line;
+
+create table order_line ( 
+ol_o_id int not null, 
+ol_d_id tinyint not null,
+ol_w_id smallint not null,
+ol_number tinyint not null,
+ol_i_id int, 
+ol_supply_w_id smallint,
+ol_delivery_d datetime, 
+ol_quantity tinyint, 
+ol_amount decimal(6,2), 
+ol_dist_info char(24),
+PRIMARY KEY(ol_w_id, ol_d_id, ol_o_id, ol_number) ) Engine=InnoDB ;
+
+drop table if exists item;
+
+create table item (
+i_id int not null, 
+i_im_id int, 
+i_name varchar(24), 
+i_price decimal(5,2), 
+i_data varchar(50),
+PRIMARY KEY(i_id) ) Engine=InnoDB;
+
+drop table if exists stock;
+
+create table stock (
+s_i_id int not null, 
+s_w_id smallint not null, 
+s_quantity smallint, 
+s_dist_01 char(24), 
+s_dist_02 char(24),
+s_dist_03 char(24),
+s_dist_04 char(24), 
+s_dist_05 char(24), 
+s_dist_06 char(24), 
+s_dist_07 char(24), 
+s_dist_08 char(24), 
+s_dist_09 char(24), 
+s_dist_10 char(24), 
+s_ytd decimal(8,0), 
+s_order_cnt smallint, 
+s_remote_cnt smallint,
+s_data varchar(50),
+PRIMARY KEY(s_w_id, s_i_id) ) Engine=InnoDB ;
+

packages/tls/tpcc-mysql/cryptbenchmark.sh

+mysqladmin create tpcc1000 -uroot -pletmein -h127.0.0.1 -P3399
+mysql -uroot -pletmein -h127.0.0.1 -P3399 tpcc1000 < create_table.sql
+mysql -uroot -pletmein -h127.0.0.1 -P3399 tpcc1000 < all.sql
+mysqldump --skip-extended-insert -uroot -pletmein -h127.0.0.1 -P3399 tpcc1000 > crypt.sql

packages/tls/tpcc-mysql/drop_cons.sql

+SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0;
+SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0;
+
+ALTER TABLE district  DROP FOREIGN KEY fkey_district_1;
+ALTER TABLE customer DROP FOREIGN KEY fkey_customer_1;
+ALTER TABLE history  DROP FOREIGN KEY fkey_history_1;
+ALTER TABLE history  DROP FOREIGN KEY fkey_history_2;
+ALTER TABLE new_orders DROP FOREIGN KEY fkey_new_orders_1;
+ALTER TABLE orders DROP FOREIGN KEY fkey_orders_1;
+ALTER TABLE order_line DROP FOREIGN KEY fkey_order_line_1;
+ALTER TABLE order_line DROP FOREIGN KEY fkey_order_line_2;
+ALTER TABLE stock DROP FOREIGN KEY fkey_stock_1;
+ALTER TABLE stock DROP FOREIGN KEY fkey_stock_2;
+
+SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS;
+SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS;
+

packages/tls/tpcc-mysql/load.sh

+export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+DBNAME=$1
+WH=$2
+HOST=127.0.0.1
+STEP=100
+
+./tpcc_load -h $HOST -d $DBNAME -u root -p "" -w $WH -l 1 -m 1 -n $WH >> 1.out &
+
+x=1
+
+while [ $x -le $WH ]
+do
+ echo $x $(( $x + $STEP - 1 ))
+./tpcc_load -h $HOST -d $DBNAME -u root -p "" -w $WH -l 2 -m $x -n $(( $x + $STEP - 1 ))  >> 2_$x.out &
+./tpcc_load -h $HOST -d $DBNAME -u root -p "" -w $WH -l 3 -m $x -n $(( $x + $STEP - 1 ))  >> 3_$x.out &
+./tpcc_load -h $HOST -d $DBNAME -u root -p "" -w $WH -l 4 -m $x -n $(( $x + $STEP - 1 ))  >> 4_$x.out &
+ x=$(( $x + $STEP ))
+done
+

packages/tls/tpcc-mysql/load_multi_schema.sh

+export LD_LIBRARY_PATH=/data/opt/bin/mysql-5.7.11-linux-glibc2.5-x86_64/lib/
+DBNAME=$1
+WH=$2
+NSCHEMA=$3
+HOST=127.0.0.1
+STEP=5
+
+schema=0
+
+while [ $schema -lt $NSCHEMA ]
+do
+ DBFULLNAME=${DBNAME}_${schema}
+ echo "Creating schema $DBFULLNAME"
+ mysqladmin -h $HOST -f drop $DBFULLNAME
+ mysqladmin -h $HOST create $DBFULLNAME
+ mysql -h $HOST $DBFULLNAME  < create_table.sql 
+ mysql -h $HOST $DBFULLNAME  < add_fkey_idx.sql
+ mkdir -p out
+
+./tpcc_load -h $HOST -d $DBFULLNAME -u root -p "" -w $WH -l 1 -m 1 -n $WH >> out/1_$DBFULLNAME.out &
+
+x=1
+
+while [ $x -le $WH ]
+do
+ echo $x $(( $x + $STEP - 1 ))
+./tpcc_load -h $HOST -d $DBFULLNAME -u root -p "" -w $WH -l 2 -m $x -n $(( $x + $STEP - 1 ))  >> out/2_$DBFULLNAME.$x.out &
+./tpcc_load -h $HOST -d $DBFULLNAME -u root -p "" -w $WH -l 3 -m $x -n $(( $x + $STEP - 1 ))  >> out/3_$DBFULLNAME.$x.out &
+./tpcc_load -h $HOST -d $DBFULLNAME -u root -p "" -w $WH -l 4 -m $x -n $(( $x + $STEP - 1 ))  >> out/4_$DBFULLNAME.$x.out &
+ x=$(( $x + $STEP ))
+done
+
+for job in `jobs -p`
+do
+echo $job
+    wait $job
+done
+
+schema=$(( $schema + 1 ))
+
+done

packages/tls/tpcc-mysql/normalbenchmark.sh

+mysqladmin create tpcc1000 -uroot -pletmein -h127.0.0.1
+mysql -uroot -pletmein -h127.0.0.1 tpcc1000 < create_table.sql
+./tpcc_load -h127.0.0.1 -uroot -pletmein -d tpcc1000 -w 2
+mysqldump --skip-extended-insert -uroot -pletmein -h127.0.0.1 tpcc1000 > all.sql

packages/tls/tpcc-mysql/schema2/add_fkey_idx.sql

+SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0;
+SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0;
+
+
+ALTER TABLE district  ADD CONSTRAINT fkey_district_1 FOREIGN KEY(d_w_id) REFERENCES warehouse(w_id);
+ALTER TABLE customer ADD CONSTRAINT fkey_customer_1 FOREIGN KEY(c_d_id, c_w_id) REFERENCES district(d_id, d_w_id);
+ALTER TABLE history  ADD CONSTRAINT fkey_history_1 FOREIGN KEY(h_c_id, h_c_d_id, h_c_w_id) REFERENCES customer(c_id, c_d_id, c_w_id);
+ALTER TABLE history  ADD CONSTRAINT fkey_history_2 FOREIGN KEY(h_d_id, h_w_id) REFERENCES district(d_id, d_w_id);
+ALTER TABLE new_orders ADD CONSTRAINT fkey_new_orders_1 FOREIGN KEY(no_o_id,no_d_id,no_w_id) REFERENCES orders(o_id, o_d_id, o_w_id);
+ALTER TABLE orders ADD CONSTRAINT fkey_orders_1 FOREIGN KEY(o_c_id,o_d_id,o_w_id) REFERENCES customer(c_id,c_d_id,c_w_id);
+ALTER TABLE order_line ADD CONSTRAINT fkey_order_line_1 FOREIGN KEY(ol_o_id,ol_d_id,ol_w_id) REFERENCES orders(o_id, o_d_id, o_w_id);
+ALTER TABLE order_line ADD CONSTRAINT fkey_order_line_2 FOREIGN KEY(ol_i_id,ol_supply_w_id) REFERENCES stock(s_i_id,s_w_id);
+ALTER TABLE stock ADD CONSTRAINT fkey_stock_1 FOREIGN KEY(s_w_id) REFERENCES warehouse(w_id);
+ALTER TABLE stock ADD CONSTRAINT fkey_stock_2 FOREIGN KEY(s_i_id) REFERENCES item(i_id);
+
+
+CREATE INDEX idx_customer ON customer (c_w_id,c_d_id,c_last,c_first);
+CREATE INDEX idx_orders ON orders (o_w_id,o_d_id,o_c_id,o_id);
+
+
+SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS;
+SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS;
+

packages/tls/tpcc-mysql/schema2/count.sql

+select count(w_id) from warehouse;
+select count(d_w_id) from district;
+select count(c_w_id) from customer;
+select count(h_c_id) from history;
+select count(no_w_id) from new_orders;
+select count(o_w_id) from orders;
+select count(ol_w_id) from order_line;
+select count(i_id) from item;
+select count(s_w_id) from stock;

packages/tls/tpcc-mysql/schema2/create_table.sql

+SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0;
+SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0;
+
+drop table if exists warehouse;
+
+create table warehouse (
+w_id smallint not null,
+w_name varchar(10), 
+w_street_1 varchar(20), 
+w_street_2 varchar(20), 
+w_city varchar(20), 
+w_state char(2), 
+w_zip char(9), 
+w_tax decimal(4,2), 
+w_ytd decimal(12,2) ) TYPE=InnoDB;
+
+drop table if exists district;
+
+create table district (
+d_id tinyint not null, 
+d_w_id smallint not null, 
+d_name varchar(10), 
+d_street_1 varchar(20), 
+d_street_2 varchar(20), 
+d_city varchar(20), 
+d_state char(2), 
+d_zip char(9), 
+d_tax decimal(4,2), 
+d_ytd decimal(12,2), 
+d_next_o_id int ) TYPE=InnoDB;
+
+drop table if exists customer;
+
+create table customer (
+c_id int not null, 
+c_d_id tinyint not null,
+c_w_id smallint not null, 
+c_first varchar(16), 
+c_middle char(2), 
+c_last varchar(16), 
+c_street_1 varchar(20), 
+c_street_2 varchar(20), 
+c_city varchar(20), 
+c_state char(2), 
+c_zip char(9), 
+c_phone char(16), 
+c_since datetime, 
+c_credit char(2), 
+c_credit_lim bigint, 
+c_discount decimal(4,2), 
+c_balance decimal(12,2), 
+c_ytd_payment decimal(12,2), 
+c_payment_cnt smallint, 
+c_delivery_cnt smallint, 
+c_data text ) TYPE=InnoDB;
+
+drop table if exists history;
+
+create table history (
+h_c_id int, 
+h_c_d_id tinyint, 
+h_c_w_id smallint,
+h_d_id tinyint,
+h_w_id smallint,
+h_date datetime,
+h_amount decimal(6,2), 
+h_data varchar(24) ) TYPE=InnoDB;
+
+drop table if exists new_orders;
+
+create table new_orders (
+no_o_id int not null,
+no_d_id tinyint not null,
+no_w_id smallint not null) TYPE=InnoDB;
+
+drop table if exists orders;
+
+create table orders (
+o_id int not null, 
+o_d_id tinyint not null, 
+o_w_id smallint not null,
+o_c_id int,
+o_entry_d datetime,
+o_carrier_id tinyint,
+o_ol_cnt tinyint, 
+o_all_local tinyint ) TYPE=InnoDB;
+
+drop table if exists order_line;
+
+create table order_line ( 
+ol_o_id int not null, 
+ol_d_id tinyint not null,
+ol_w_id smallint not null,
+ol_number tinyint not null,
+ol_i_id int, 
+ol_supply_w_id smallint,
+ol_delivery_d datetime, 
+ol_quantity tinyint, 
+ol_amount decimal(6,2), 
+ol_dist_info char(24) ) TYPE=InnoDB;
+
+drop table if exists item;
+
+create table item (
+i_id int not null, 
+i_im_id int, 
+i_name varchar(24), 
+i_price decimal(5,2), 
+i_data varchar(50) ) TYPE=InnoDB;
+
+drop table if exists stock;
+
+create table stock (
+s_i_id int not null, 
+s_w_id smallint not null, 
+s_quantity smallint, 
+s_dist_01 char(24), 
+s_dist_02 char(24),
+s_dist_03 char(24),
+s_dist_04 char(24), 
+s_dist_05 char(24), 
+s_dist_06 char(24), 
+s_dist_07 char(24), 
+s_dist_08 char(24), 
+s_dist_09 char(24), 
+s_dist_10 char(24), 
+s_ytd decimal(8,0), 
+s_order_cnt smallint, 
+s_remote_cnt smallint,
+s_data varchar(50) ) TYPE=InnoDB;
+
+ALTER TABLE warehouse ADD CONSTRAINT pkey_warehouse PRIMARY KEY(w_id);
+ALTER TABLE district  ADD CONSTRAINT pkey_district  PRIMARY KEY(d_id, d_w_id);
+ALTER TABLE customer  ADD CONSTRAINT pkey_customer  PRIMARY KEY(c_id, c_d_id, c_w_id);
+ALTER TABLE new_orders ADD CONSTRAINT pkey_new_orders PRIMARY KEY(no_o_id, no_d_id, no_w_id);
+ALTER TABLE orders    ADD CONSTRAINT pkey_orders    PRIMARY KEY(o_id, o_d_id, o_w_id);
+ALTER TABLE order_line ADD CONSTRAINT pkey_order_line PRIMARY KEY(ol_o_id, ol_d_id, ol_w_id, ol_number);
+ALTER TABLE item ADD CONSTRAINT pkey_item PRIMARY KEY(i_id);
+ALTER TABLE stock ADD CONSTRAINT pkey_stock PRIMARY KEY(s_i_id,s_w_id);
+
+SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS;
+SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS;
+

packages/tls/tpcc-mysql/schema2/drop_cons.sql

+SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0;
+SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0;
+
+ALTER TABLE district  DROP FOREIGN KEY fkey_district_1;
+ALTER TABLE customer DROP FOREIGN KEY fkey_customer_1;
+ALTER TABLE history  DROP FOREIGN KEY fkey_history_1;
+ALTER TABLE history  DROP FOREIGN KEY fkey_history_2;
+ALTER TABLE new_orders DROP FOREIGN KEY fkey_new_orders_1;
+ALTER TABLE orders DROP FOREIGN KEY fkey_orders_1;
+ALTER TABLE order_line DROP FOREIGN KEY fkey_order_line_1;
+ALTER TABLE order_line DROP FOREIGN KEY fkey_order_line_2;
+ALTER TABLE stock DROP FOREIGN KEY fkey_stock_1;
+ALTER TABLE stock DROP FOREIGN KEY fkey_stock_2;
+
+SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS;
+SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS;
+

packages/tls/tpcc-mysql/scripts/2instances/run.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+
+BD="/mnt/fio320/back/tpcc500w"
+DR1="/mnt/tachion/tpcc500wi1"
+DR2="/mnt/tachion/tpcc500wi2"
+
+BD="/mnt/tachion/back/tpcc500w"
+DR1="/mnt/fio320/tpcc500wi1"
+DR2="/mnt/fio320/tpcc500wi2"
+
+WT=10
+RT=10800
+
+
+# restore from backup
+
+function restore_backup {
+rm -fr $DR1
+rm -fr $DR2
+
+cp -r $BD $DR1
+cp -r $BD $DR2
+
+sync
+echo 3 > /proc/sys/vm/drop_caches
+
+chown mysql.mysql -R $DR1
+chown mysql.mysql -R $DR2
+
+}
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql -S /tmp/mysql$1.sock
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G"  -S /tmp/mysql$1.sock | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql -S /tmp/mysql$1.sock
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+function wait_for_mysql {
+
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql -S /tmp/mysql$1.sock
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+}
+
+function setup_dirs {
+
+# Determine run number for selecting an output directory
+RUN_NUMBER=-1
+
+if [ -f ".run_number" ]; then
+  read RUN_NUMBER < .run_number
+fi
+
+if [ $RUN_NUMBER -eq -1 ]; then
+        RUN_NUMBER=0
+fi
+
+OUTDIR=res$RUN_NUMBER
+mkdir -p $OUTDIR
+
+RUN_NUMBER=`expr $RUN_NUMBER + 1`
+echo $RUN_NUMBER > .run_number
+
+cp /etc/my.cnf $OUTDIR
+
+}
+
+restore_backup
+setup_dirs
+
+#for par in  1 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 43
+for par in  6500MB 13GB 26GB 39GB 52GB 65GB 78GB
+do
+
+/usr/local/mysql/libexec/mysqld --defaults-file=/etc/my.cnf --datadir=$DR1 --port=3306 --socket=/tmp/mysql1.sock --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${par} --log-error=error1.log &
+/usr/local/mysql/libexec/mysqld --defaults-file=/etc/my.cnf --datadir=$DR2 --port=3307 --socket=/tmp/mysql2.sock --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${par} --log-error=error2.log &
+
+wait_for_mysql 1
+wait_for_mysql 2
+
+
+iostat -dmx 5 2000 >> $OUTDIR/iostat.${par}res &
+PID=$!
+vmstat 5 2000 >> $OUTDIR/vmstat.${par}res &
+PIDV=$!
+./tpcc_start 127.0.0.1:3306 tpcc500w root "" 500 12 10 3600 | tee -a $OUTDIR/tpcc3306.bp${par}.out &
+./tpcc_start 127.0.0.1:3307 tpcc500w root "" 500 12 10 3600 | tee -a $OUTDIR/tpcc3307.bp${par}.out &
+
+sleep 3700
+
+waitm 1
+
+kill -9 $PID
+kill -9 $PIDV
+
+
+mysqladmin  shutdown -S /tmp/mysql1.sock
+mysqladmin  shutdown -S /tmp/mysql2.sock
+
+done

packages/tls/tpcc-mysql/scripts/analyze.full.sh

+cat $1 | grep LSN_ratio_expected | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/1.rr
+cat $1 | grep -P "LSN_ratio[\s]" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/2.rr
+cat $1 | grep Innodb_log_write_sleeps | awk ' BEGIN {s=0;i=0} { print i,$4-s; s=$4;i++ } ' > /tmp/3.rr
+cat $1 | grep -P "Innodb_log_write_sleep_prob" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/4.rr
+cat $1 | grep -P "Innodb_break_ratio" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/5.rr
+cat $1 | grep -P "Innodb_break_value" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/6.rr
+cat $1 | grep -P "Innodb_tacts_to_flush_dirty" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/7.rr
+cat $1 | grep -P "Innodb_tacts_to_fill_target" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/8.rr
+cat $1 | grep -P "Innodb_EMA_lsn_grow" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/9.rr
+cat $1 | grep -P "Innodb_EMA_ckpt_lsn_grow" | awk ' BEGIN {s=0} { print s,$4; s++ } ' > /tmp/10.rr
+cat $1 | grep -P "Innodb_buffer_pool_pages_flushed[\s]" |  awk ' BEGIN {s=0;i=0} { print i,$4-s; s=$4;i++ } ' > /tmp/11.rr
+cat $1 | grep -P "Innodb_buffer_pool_pages_flushed_neighbors[\s]" |  awk ' BEGIN {s=0;i=0} { print i,$4-s; s=$4;i++ } ' > /tmp/12.rr
+cat $2 | awk ' BEGIN {i=0;sp=0 } /Last checkpoint at/  { st=$4 ; print i, (st)/1024/1024,(st-sp)/1024/1024; i++; sp=st } ' > /tmp/13.rr
+
+join /tmp/1.rr /tmp/2.rr > /tmp/a2.rr
+join /tmp/a2.rr /tmp/3.rr > /tmp/a3.rr
+join /tmp/a3.rr /tmp/4.rr > /tmp/a4.rr
+join /tmp/a4.rr /tmp/5.rr > /tmp/a5.rr
+join /tmp/a5.rr /tmp/6.rr > /tmp/a6.rr
+join /tmp/a6.rr /tmp/7.rr > /tmp/a7.rr
+join /tmp/a7.rr /tmp/8.rr > /tmp/a8.rr
+join /tmp/a8.rr /tmp/9.rr > /tmp/a9.rr
+join /tmp/a9.rr /tmp/10.rr > /tmp/a10.rr
+join /tmp/a10.rr /tmp/11.rr > /tmp/a11.rr
+join /tmp/a11.rr /tmp/12.rr > /tmp/a12.rr
+join /tmp/a12.rr /tmp/13.rr > /tmp/a13.rr
+echo "time LSN_ratio_expected LSN_ratio sleeps sleep_prob break_ratio break_value tacts_to_flush_dirty tacts_to_fill_target EMA_lsn EMA_ckpt_lsn  flushed flushed_neighbors checkpoint checkpoint_delta"
+cat /tmp/a13.rr

packages/tls/tpcc-mysql/scripts/analyze.sh

+TIMESLOT=1
+
+if [ -n "$2" ]
+then
+TIMESLOT=$2
+echo "Defined $2"
+fi
+
+cat $1 | grep -v HY000 | grep -v payment | grep -v neword | awk -v timeslot=$TIMESLOT ' BEGIN { FS="[,():]"; s=0; cntr=0; aggr=0 } /MEASURING START/ { s=1} /STOPPING THREADS/ {s=0} /0/ { if (s==1) { cntr++; aggr+=$2; } if ( cntr==timeslot ) { printf ("%d %3f\n",aggr,$5) ; cntr=0; aggr=0  }  } '
+

packages/tls/tpcc-mysql/scripts/analyzeR.sh

+TIMESLOT=1
+
+if [ -n "$2" ]
+then
+TIMESLOT=$2
+echo "Defined $2"
+fi
+
+
+for i in 1 2 4 8 16 32 64
+do
+cat tpcc.par$i.log4G.trx2..out | grep -v HY000 | grep -v payment | grep -v neword | awk -v timeslot=$TIMESLOT -v thr=$i ' BEGIN { FS="[,():]"; s=0; cntr=0; aggr=0 } /MEASURING START/ { s=1} /STOPPING THREADS/ {s=0} /0/ { if (s==1) { cntr++; aggr+=$2; } if ( cntr==timeslot ) { printf ("%d %d %d %3f innodb\n",thr,$1,aggr,$5) ; cntr=0; aggr=0  }  } '
+done
+

packages/tls/tpcc-mysql/scripts/analyze_checkpoint.sh

+cat $1 | awk ' BEGIN { } /Log sequence number/ {st=$4 } /Last checkpoint at/ { ed=$4; print (st-ed)/1024/1024 } '

packages/tls/tpcc-mysql/scripts/analyze_checkpoint_xtradb.sh

+cat $1 | awk ' BEGIN { } /Checkpoint age        / {st=$3 ;  print (st)/1024/1024 } '

packages/tls/tpcc-mysql/scripts/analyze_checkpoint_xtradb1.sh

+#cat $1 | awk ' BEGIN { } /Log sequence number/ {st=$4 ; print (st)/1024/1024 } '
+cat $1 | awk ' BEGIN { } /Last checkpoint at/ {st=$4 ; print (st)/1024/1024 } '

packages/tls/tpcc-mysql/scripts/analyze_dirty.sh

+cat $1 | awk ' BEGIN { dt=-1;dr=-1;df=-1 } /Innodb_buffer_pool_pages_data/ { if (dt==-1) { dt=$4} else { dt+=$4  } }  /Innodb_buffer_pool_pages_dirty/ { if (dr==-1) { dr=$4} else { dr+=$4  } } /Innodb_buffer_pool_pages_free/ { if (df==-1) { df=$4} else { df+=$4  } ; print (100*dr)/(1+dt+df)  } '

packages/tls/tpcc-mysql/scripts/analyze_evicted.sh

+cat $1 | awk ' BEGIN { df=0 ; dl=0; } /Innodb_buffer_pool_read_ahead_evicted/ { df=$4 }  /Innodb_buffer_pool_pages_LRU_flushed/ {  dl=$4; print df,dl }  '

packages/tls/tpcc-mysql/scripts/analyze_flushed.sh

+cat $1 | awk ' BEGIN { df=0 ; dl=0; } /Innodb_buffer_pool_pages_flushed[\s]/ { df=$4 }  /Innodb_buffer_pool_pages_LRU_flushed/ {  dl=$4; print df,dl }  '

packages/tls/tpcc-mysql/scripts/analyze_flushed_innodb.sh

+cat $1 | awk ' BEGIN { df=0 ; dl=0; } /Innodb_buffer_pool_pages_flushed/ { df=$4 ; print df }  '

packages/tls/tpcc-mysql/scripts/analyze_min.sh

+cat $1 | grep -v HY000 | grep -v payment | grep -v neword | awk ' BEGIN { FS="[,(]"; s=0; cntr=0; aggr=0 } /MEASURING START/ { s=1} /STOPPING THREADS/ {s=0} /0/ { if (s==1) { cntr++; aggr+=$2; } if ( cntr==6 ) { printf ("%d\n",aggr) ; cntr=0; aggr=0  }  } '

packages/tls/tpcc-mysql/scripts/analyze_modified.sh

+cat $1 | awk ' BEGIN { } /Log sequence number/ {st=$4 } /Log flushed up to/ { ed=$5; print (st-ed) } '

packages/tls/tpcc-mysql/scripts/flashcache_stat.sh

+sysctl -w dev.flashcache.zero_stats=1
+
+while [ true ]
+do
+
+dmsetup status flashcache 
+sleep 10
+
+done
+

packages/tls/tpcc-mysql/scripts/innodb_stat.sh

+x=1
+end=$1
+
+while [  [ $x -le $end ] ]
+do
+
+mysql -e "SHOW ENGINE INNODB STATUS\G" 
+sleep 10
+x=$(( $x + 10 ))
+
+done
+

packages/tls/tpcc-mysql/scripts/memlock.c

+#include <stdio.h>
+#include <stdlib.h>
+#include <sys/types.h>
+#include <sys/mman.h>
+
+char *
+alloc_workbuf(size_t size)
+{
+ char *ptr;
+
+ /* allocate some memory */
+ ptr = malloc(size);
+
+ /* return NULL on failure */
+ if (ptr == NULL)
+  return NULL;
+
+ /* lock this buffer into RAM */
+ if (mlock(ptr, size)) {
+  free(ptr);
+  return NULL;
+ }
+ return ptr;
+}
+
+void 
+free_workbuf(char *ptr, size_t size)
+{
+ /* unlock the address range */
+ munlock(ptr, size);
+
+ /* free the memory */
+ free(ptr);
+}
+
+int main()
+{
+
+char *area;
+size_t allocz=306535006208LLU;
+
+area=alloc_workbuf(allocz);
+
+while(1)
+{
+sleep(10);
+} 
+
+free_workbuf(area,allocz);
+
+return 0;
+
+}

packages/tls/tpcc-mysql/scripts/multi-instances/runX.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+#export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+export LD_LIBRARY_PATH=/usr/local/Percona-Server/lib/mysql/
+MYSQLDIR=/usr/local/Percona-Server-5.5.15-rel21.0-158.Linux.x86_64/
+#MYSQLDIR=/usr/local/mysql-5.6.3-m6-linux2.6-x86_64
+
+ulimit -c unlimited
+
+#DR="/mnt/fio320"
+DR="/data/fio/d"
+#IDR="/data/bench/fio/d"
+IDR="/data/fio/d"
+LR="/data/fio/d"
+#LR="/data/bench/fio/d"
+CONFIG="/etc/my.559.cnf"
+
+SERVER="R815"
+NINST=1
+MAXW=2400
+WH=$(($MAXW/$NINST))
+BP=$((120/$NINST))
+BD=/data/bench/back/tpcc$WH
+
+RT=7200
+
+
+log2="$DR/"
+
+# restore from backup
+function restore {
+
+for i in `seq 1 $NINST`
+do
+ssh $SERVER "mkdir -p $DR$i"
+ssh $SERVER "rm -fr $DR$i/*"
+
+ssh $SERVER "mkdir -p $LR$i"
+ssh $SERVER "rm -fr $LR$i/*"
+
+ssh $SERVER "mkdir -p $IDR$i"
+ssh $SERVER "rm -fr $IDR$i/*"
+
+ssh $SERVER "cp -r $BD/* $DR$i"
+
+ssh $SERVER "cp -r $BD/ibdata1 $IDR$i"
+ssh $SERVER "cp /tmp/ib_lru_dump $DR$i"
+ssh $SERVER "sync; echo 3 > /proc/sys/vm/drop_caches"
+
+ssh $SERVER "chown mysql.mysql -R $DR$i; chmod -R 755 $DR$i"
+ssh $SERVER "chown mysql.mysql -R $LR$i; chmod -R 755 $LR$i"
+done
+
+}
+
+function formatc {
+
+set +e
+ssh $SERVER "umount /data/fio"
+ssh $SERVER "mdadm --stop /dev/md127"
+ssh $SERVER "fio-detach /dev/fct0"
+ssh $SERVER "fio-detach /dev/fct1"
+ssh $SERVER "yes | fio-format -b 4096 /dev/fct0"
+ssh $SERVER "yes | fio-format -b 4096 /dev/fct1"
+ssh $SERVER "fio-attach /dev/fct0"
+ssh $SERVER "fio-attach /dev/fct1"
+ssh $SERVER "mdadm --create  --verbose /dev/md127 --level=0 --raid-devices=2 --chunk=128 /dev/fioa /dev/fiob"
+ssh $SERVER "mkfs.xfs -s size=4096 /dev/md127"
+ssh $SERVER "mount /dev/md127 /data/fio -o nobarrier"
+set -e
+
+}
+
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G" | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+function stratmysqld {
+
+
+for i in `seq 1 $NINST`
+do
+PORT=$((3305+$i))
+ssh $SERVER "numactl --cpunodebind=$(( ($i-1) * 8 / $NINST ))-$((($i-1)*8/$NINST+8/$NINST-1)) --interleave=all $MYSQLDIR/bin/mysqld --defaults-file=$CONFIG --datadir=$DR$i --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${BP}G --innodb-log-file-size=$logsz --innodb_flush_log_at_trx_commit=$trxv --log-error=$DR$i/mysql.error.log --socket=/tmp/mysql$PORT --port=$PORT --innodb_data_home_dir=$IDR$i --innodb_log_group_home_dir=$LR$i --basedir=$MYSQLDIR &"
+
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql -h $SERVER -P $PORT
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+done
+
+}
+
+
+# Determine run number for selecting an output directory
+RUN_NUMBER=-1
+
+if [ -f ".run_number" ]; then
+  read RUN_NUMBER < .run_number
+fi
+
+if [ $RUN_NUMBER -eq -1 ]; then
+        RUN_NUMBER=0
+fi
+
+OUTDIR=res$RUN_NUMBER
+mkdir -p $OUTDIR
+
+RUN_NUMBER=`expr $RUN_NUMBER + 1`
+echo $RUN_NUMBER > .run_number
+
+formatc
+
+for trxv in 2
+do
+for logsz in 4G
+do
+#for par in 12 24 36 48 60 72 
+#for par in 12 18 24 30 36  
+#for par in 4 6 8 10 12  
+#for par in $((36/$NINST)) $((48/$NINST))
+for par in $((48/$NINST))
+do
+
+runid="par$par.log$logsz.trx$trxv"
+
+restore
+
+stratmysqld
+
+sleep 30
+
+ssh -f $SERVER "iostat -dmx 10 $(($RT/10+1)) " >> $OUTDIR/iostat.$runid.res 
+ssh -f $SERVER "dstat -t -v --nocolor 10 $(($RT/10+1))" > $OUTDIR/dstat_plain.$runid.res 
+
+cp $0 $OUTDIR
+
+for i in `seq 1 $NINST`
+do
+PORT=$((3305+$i))
+mysqladmin variables -h $SERVER -P$PORT >>  $OUTDIR/mysql_variables.$PORT.res
+./innodb_stat.sh $RT $SERVER $PORT >> $OUTDIR/innodb.${runid}.$i.res &
+./tpcc_start $SERVER:$PORT tpcc$WH root "" $WH $par 10 $RT | tee -a $OUTDIR/tpcc.${runid}.$i.out &
+done
+
+sleep $(($RT+30))
+
+set +e
+ssh $SERVER "killall -s SIGKILL mysqld"
+set -e
+
+sleep 60
+ssh $SERVER "cp ${DR}1/ib_lru_dump /tmp"
+
+
+
+done
+
+done
+done

packages/tls/tpcc-mysql/scripts/parse_trx.py

+import sys
+import math
+import functools
+
+ins = open( sys.argv[1], "r" )
+array = {}
+response_times= {}
+
+array_10s = {}
+response_times_10s = {}
+
+array_60s = {}
+response_times_60s = {}
+
+def calms(f_sec,f_ms,s_sec,s_ms):
+	res=(int(f_sec)-int(s_sec))*1000 + (int(f_ms)-int(s_ms))/1000000
+	return res
+
+def percentile(N, percent, key=lambda x:x):
+    """
+    Find the percentile of a list of values.
+
+    @parameter N - is a list of values. Note N MUST BE already sorted.
+    @parameter percent - a float value from 0.0 to 1.0.
+    @parameter key - optional key function to compute value from each element of N.
+
+    @return - the percentile of the values
+    """
+    if not N:
+        return None
+    k = (len(N)-1) * percent
+    f = math.floor(k)
+    c = math.ceil(k)
+    if f == c:
+        return key(N[int(k)])
+    d0 = key(N[int(f)]) * (c-k)
+    d1 = key(N[int(c)]) * (k-f)
+    return d0+d1
+
+if len(sys.argv)>=2:
+	pref=sys.argv[2]
+else:
+	pref=""
+
+for line in ins:
+	data=line.split()
+	current_sec = int(data[3]);
+	if array.has_key(current_sec):
+		array[current_sec] = array[current_sec]+1
+		response_times[current_sec].append(calms(data[3],data[4],data[6],data[7]))
+	else:
+		array[current_sec] = 1
+		response_times[current_sec]=[calms(data[3],data[4],data[6],data[7])]
+	cur_10s = current_sec/10
+	if array_10s.has_key(cur_10s):
+		array_10s[cur_10s] = array_10s[cur_10s]+1
+		response_times_10s[cur_10s].append(calms(data[3],data[4],data[6],data[7]))
+	else:
+		array_10s[cur_10s] = 1
+		response_times_10s[cur_10s]=[calms(data[3],data[4],data[6],data[7])]
+		# print calms(data[3],data[4],data[6],data[7])
+	cur_60s = current_sec/60
+	if array_60s.has_key(cur_60s):
+		array_60s[cur_60s] = array_60s[cur_60s]+1
+		response_times_60s[cur_60s].append(calms(data[3],data[4],data[6],data[7]))
+	else:
+		array_60s[cur_60s] = 1
+		response_times_60s[cur_60s]=[calms(data[3],data[4],data[6],data[7])]
+
+minsec=min(array.keys())
+maxsec=max(array.keys())
+i=minsec
+while i<=maxsec:
+	if array.has_key(i):
+		# print str(i),len(response_times[str(i)].sort())
+		response_times[i].sort()
+		pct99=percentile(response_times[i],0.99)
+		print pref,i-minsec,array[i],pct99
+	else:
+		print pref,i-minsec,0
+	i=i+1
+
+print "========== 10 sec ============="
+
+minsec=min(array_10s.keys())
+maxsec=max(array_10s.keys())
+i=minsec
+while i<=maxsec:
+	if array_10s.has_key(i):
+		# print str(i),len(response_times[str(i)].sort())
+		response_times_10s[i].sort()
+		pct99=percentile(response_times_10s[i],0.99)
+		print pref,i-minsec,array_10s[i],pct99
+	else:
+		print pref,i-minsec,0
+	i=i+1
+
+print "========== 60 sec ============="
+
+minsec=min(array_60s.keys())
+maxsec=max(array_60s.keys())
+i=minsec
+while i<=maxsec:
+	if array_60s.has_key(i):
+		# print str(i),len(response_times[str(i)].sort())
+		response_times_60s[i].sort()
+		pct99=percentile(response_times_60s[i],0.99)
+		print pref,i-minsec,array_60s[i],pct99
+	else:
+		print pref,i-minsec,0
+	i=i+1

packages/tls/tpcc-mysql/scripts/remote/runX.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+#export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+export LD_LIBRARY_PATH=/usr/local/Percona-Server/lib/mysql/
+MYSQLDIR=/usr/local/Percona-XtraDB-Cluster-5.5.15
+#MYSQLDIR=/usr/local/mysql-5.6.3-m6-linux2.6-x86_64
+
+ulimit -c unlimited
+
+#DR="/mnt/fio320"
+DR="/data/fio/d"
+#IDR="/data/bench/fio/d"
+IDR="/data/fio/d"
+LR="/data/fio/d"
+#LR="/data/bench/fio/d"
+CONFIG="/etc/my.gal.55.cnf"
+
+#SERVER="10.11.12.206"
+SERVER="R815"
+NINST=1
+MAXW=600
+WH=$(($MAXW/$NINST))
+BP=$((120/$NINST))
+BD=/data/bench/back/tpcc$WH
+
+RT=3600
+
+
+log2="$DR/"
+
+# restore from backup
+function restore {
+
+for i in `seq 1 $NINST`
+do
+ssh $SERVER "mkdir -p $DR$i"
+ssh $SERVER "rm -fr $DR$i/*"
+
+ssh $SERVER "mkdir -p $LR$i"
+ssh $SERVER "rm -fr $LR$i/*"
+
+ssh $SERVER "mkdir -p $IDR$i"
+ssh $SERVER "rm -fr $IDR$i/*"
+
+ssh $SERVER "cp -r $BD/* $DR$i"
+
+ssh $SERVER "cp -r $BD/ibdata1 $IDR$i"
+ssh $SERVER "cp /tmp/ib_lru_dump $DR$i"
+ssh $SERVER "sync; echo 3 > /proc/sys/vm/drop_caches"
+
+ssh $SERVER "chown mysql.mysql -R $DR$i; chmod -R 755 $DR$i"
+ssh $SERVER "chown mysql.mysql -R $LR$i; chmod -R 755 $LR$i"
+done
+
+}
+
+function formatc {
+
+set +e
+ssh $SERVER "umount /data/fio"
+ssh $SERVER "mdadm --stop /dev/md127"
+ssh $SERVER "fio-detach /dev/fct0"
+ssh $SERVER "fio-detach /dev/fct1"
+ssh $SERVER "yes | fio-format -b 4096 /dev/fct0"
+ssh $SERVER "yes | fio-format -b 4096 /dev/fct1"
+ssh $SERVER "fio-attach /dev/fct0"
+ssh $SERVER "fio-attach /dev/fct1"
+ssh $SERVER "mdadm --create  --verbose /dev/md127 --level=0 --raid-devices=2 --chunk=128 /dev/fioa /dev/fiob"
+ssh $SERVER "mkfs.xfs -s size=4096 /dev/md127"
+ssh $SERVER "mount /dev/md127 /data/fio -o nobarrier"
+set -e
+
+}
+
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G" | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+function stratmysqld {
+
+
+for i in `seq 1 $NINST`
+do
+PORT=$((3305+$i))
+ssh $SERVER "PATH=$PATH:/usr/local/Percona-XtraDB-Cluster-5.5.15/bin numactl --cpunodebind=$(( ($i-1) * 8 / $NINST ))-$((($i-1)*8/$NINST+8/$NINST-1)) --interleave=all $MYSQLDIR/bin/mysqld --defaults-file=$CONFIG --datadir=$DR$i --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${BP}G --innodb-log-file-size=$logsz --innodb_flush_log_at_trx_commit=$trxv --log-error=$DR$i/mysql.error.log --socket=/tmp/mysql$PORT --port=$PORT --innodb_data_home_dir=$IDR$i --innodb_log_group_home_dir=$LR$i --basedir=$MYSQLDIR &"
+
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql -h $SERVER -P $PORT
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+done
+
+}
+
+
+# Determine run number for selecting an output directory
+RUN_NUMBER=-1
+
+if [ -f ".run_number" ]; then
+  read RUN_NUMBER < .run_number
+fi
+
+if [ $RUN_NUMBER -eq -1 ]; then
+        RUN_NUMBER=0
+fi
+
+OUTDIR=res$RUN_NUMBER
+mkdir -p $OUTDIR
+
+RUN_NUMBER=`expr $RUN_NUMBER + 1`
+echo $RUN_NUMBER > .run_number
+
+formatc
+
+for trxv in 2
+do
+for logsz in 4G
+do
+#for par in 12 24 36 48 60 72 
+#for par in 12 18 24 30 36  
+#for par in 4 6 8 10 12  
+#for par in $((36/$NINST)) $((48/$NINST))
+for par in $((48/$NINST))
+do
+
+runid="par$par.log$logsz.trx$trxv"
+
+restore
+
+#stratmysqld
+
+exit
+
+sleep 30
+
+ssh -f $SERVER "iostat -dmx 10 $(($RT/10+1)) " >> $OUTDIR/iostat.$runid.res 
+ssh -f $SERVER "dstat -t -v --nocolor 10 $(($RT/10+1))" > $OUTDIR/dstat_plain.$runid.res 
+
+cp $0 $OUTDIR
+
+for i in `seq 1 $NINST`
+do
+PORT=$((3305+$i))
+mysqladmin variables -h $SERVER -P$PORT >>  $OUTDIR/mysql_variables.$PORT.res
+./innodb_stat.sh $RT $SERVER $PORT >> $OUTDIR/innodb.${runid}.$i.res &
+./tpcc_start $SERVER:$PORT tpcc$WH root "" $WH $par 10 $RT | tee -a $OUTDIR/tpcc.${runid}.$i.out &
+done
+
+sleep $(($RT+30))
+
+set +e
+#ssh $SERVER "killall -s SIGKILL mysqld"
+set -e
+
+sleep 60
+#ssh $SERVER "cp ${DR}1/ib_lru_dump /tmp"
+
+
+
+done
+
+done
+done

packages/tls/tpcc-mysql/scripts/run.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+
+DR="/mnt/fio320/bench"
+BD="/data/back/fio320/bench"
+
+WT=10
+RT=10800
+
+ROWS=80000000
+
+#log2="/data/log/"
+log2="$DR/"
+
+# restore from backup
+
+rm -fr $DR/*
+
+echo $log2
+#for nm in ibdata1 ib_logfile0 ib_logfile1
+for nm in ibdata1 
+do
+rm -f $log2/$nm
+pagecache-management.sh cp $BD/$nm $log2
+done
+
+
+cp -r $BD/mysql $DR
+pagecache-management.sh cp -r $BD/tpcc $DR
+
+sync
+echo 3 > /proc/sys/vm/drop_caches
+
+chown mysql.mysql -R $DR
+chown mysql.mysql -R $log2
+
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G" | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+#for par in  1 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 43
+for par in  16
+do
+
+/usr/local/mysql/libexec/mysqld --defaults-file=/etc/my.cnf --datadir=$DR  --innodb_data_home_dir=$log2 --innodb_log_group_home_dir=$log2 --innodb_thread_concurrency=0 &
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+
+./tpcc_start localhost tpcc root "" 1000 $par 10 7200 | tee -a tpcc.threads${par}.out
+
+
+waitm
+
+
+mysqladmin  shutdown
+
+done

packages/tls/tpcc-mysql/scripts/runX.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+#export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+export LD_LIBRARY_PATH=/usr/local/Percona-Server/lib/mysql/
+MYSQLDIR=/usr/local/mysql-5.5.15-linux2.6-x86_64
+
+ulimit -c unlimited
+
+#DR="/mnt/fio320"
+BD=/data/bench/back/tpc/tpc
+#DR=/data/db/bench
+DR="/data/bench/test"
+#DR="/mnt/tachion/tpc1000w"
+CONFIG="/etc/my.van.cnf"
+#CONFIG="/etc/my.y.558.cnf"
+
+WT=10
+RT=10800
+
+ROWS=80000000
+
+#log2="/tachion/system/"
+#log2="/data/bench/"
+log2="$DR/"
+
+# restore from backup
+function restore {
+
+#sysctl -w dev.flashcache.cache_all=0
+
+mkdir -p $DR
+
+rm -fr $DR/*
+rm -f $log2/ib*
+
+echo $log2
+#for nm in ibdata1 ib_logfile0 ib_logfile1
+#for nm in ibdata1 
+#do
+#rm -f $log2/$nm
+#pagecache-management.sh cp $BD/$nm $log2
+#done
+
+
+cp -r $BD/mysql $DR
+cp -r $BD/tpcc $DR
+cp -r $BD/ibdata1 $log2
+
+sync
+echo 3 > /proc/sys/vm/drop_caches
+
+chown mysql.mysql -R $DR
+chown mysql.mysql -R $log2
+chmod -R 755 $DR
+
+#sysctl -w dev.flashcache.cache_all=1
+
+}
+
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G" | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+
+
+# Determine run number for selecting an output directory
+RUN_NUMBER=-1
+
+if [ -f ".run_number" ]; then
+  read RUN_NUMBER < .run_number
+fi
+
+if [ $RUN_NUMBER -eq -1 ]; then
+        RUN_NUMBER=0
+fi
+
+OUTDIR=res$RUN_NUMBER
+mkdir -p $OUTDIR
+
+RUN_NUMBER=`expr $RUN_NUMBER + 1`
+echo $RUN_NUMBER > .run_number
+
+for trxv in 2
+do
+for logsz in 1950M
+do
+#for par in  1 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 43
+#for par in  13 26 39 52 65 78
+for par in `seq 5 10 55`
+#for par in 13 52 78 144
+#for par in 1 2 4 8 16 32 64
+do
+
+runid="par$par.log$logsz.trx$trxv."
+
+restore
+
+
+$MYSQLDIR/bin/mysqld --defaults-file=$CONFIG --datadir=$DR --innodb_data_home_dir=$log2 --innodb_log_group_home_dir=$log2 --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${par}GB --innodb-log-file-size=$logsz --innodb_flush_log_at_trx_commit=$trxv --log-error=$OUTDIR/mysql.error.log &
+
+MYSQLPID=$!
+
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+iostat -mxt 10 $(($RT/10+1)) >> $OUTDIR/iostat.${runid}res &
+PID=$!
+vmstat 10  $(($RT/10+1)) >> $OUTDIR/vmstat.${runid}res &
+PIDV=$!
+$MYSQLDIR/bin/mysqladmin ext -i10  >> $OUTDIR/mysqladminext.${runid}res &
+PIDMYSQLSTAT=$!
+./innodb_stat.sh $RT  >> $OUTDIR/innodb.${runid}res &
+PIDINN=$!
+
+
+cp $CONFIG $OUTDIR
+cp $0 $OUTDIR
+mysqladmin variables >>  $OUTDIR/mysql_variables.res
+sysctl -a >> $OUTDIR/sysctl.res
+./tpcc_start localhost tpcc root "" 1000 32 10 $RT | tee -a $OUTDIR/tpcc.${runid}.out
+
+set +e
+kill -9 $PIDINN
+kill -9 $PIDMYSQLSTAT
+kill -9 `pidof mysqld`
+set -e
+
+
+
+
+done
+
+done
+done

packages/tls/tpcc-mysql/scripts/run_no_backup.sh

+#!/bin/sh
+set -u
+set -x
+set -e
+
+#export LD_LIBRARY_PATH=/usr/local/mysql/lib/mysql/
+export LD_LIBRARY_PATH=/usr/local/Percona-Server/lib/mysql/
+
+ulimit -c unlimited
+
+#DR="/mnt/fio320"
+BD=/mnt/tachion/tpc1000w
+#DR=/data/db/bench
+DR="/mnt/fio320/tpc1000w"
+
+WT=10
+RT=10800
+
+ROWS=80000000
+
+#log2="/data/log/"
+log2="$DR/"
+
+# restore from backup
+
+
+function waitm {
+
+while [ true ]
+do
+
+mysql -e "set global innodb_max_dirty_pages_pct=0" mysql
+
+wt=`mysql -e "SHOW ENGINE INNODB STATUS\G" | grep "Modified db pages" | sort -u | awk '{print $4}'`
+if [[ "$wt" -lt 100 ]] ;
+then
+mysql -e "set global innodb_max_dirty_pages_pct=90" mysql
+break
+fi
+
+echo "mysql pages $wt"
+sleep 10
+done
+
+}
+
+
+
+# Determine run number for selecting an output directory
+RUN_NUMBER=-1
+
+if [ -f ".run_number" ]; then
+  read RUN_NUMBER < .run_number
+fi
+
+if [ $RUN_NUMBER -eq -1 ]; then
+        RUN_NUMBER=0
+fi
+
+OUTDIR=res$RUN_NUMBER
+mkdir -p $OUTDIR
+
+RUN_NUMBER=`expr $RUN_NUMBER + 1`
+echo $RUN_NUMBER > .run_number
+
+#for par in  1 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 43
+for par in   13 26 39 52 65 78
+#for par in  24
+do
+export OS_FILE_LOG_BLOCK_SIZE=4096
+/usr/local/mysql/libexec/mysqld --defaults-file=/etc/my.cnf --datadir=$DR  --innodb_log_group_home_dir=$log2 --innodb_thread_concurrency=0 --innodb-buffer-pool-size=${par}GB &
+
+
+set +e
+
+while true;
+do
+mysql -Bse "SELECT 1" mysql
+
+if [ "$?" -eq 0 ]
+then
+  break
+fi
+
+sleep 30
+
+echo -n "."
+done
+set -e
+
+
+
+
+iostat -dx 5 2000 >> $OUTDIR/iostat.${par}res &
+PID=$!
+vmstat 5 2000 >> $OUTDIR/vmstat.${par}res &
+PIDV=$!
+./tpcc_start localhost tpcc1000 root "" 1000 24 10 3600 | tee -a $OUTDIR/tpcc.${par}.out
+kill -9 $PID
+kill -9 $PIDV
+
+waitm
+
+
+mysqladmin  shutdown
+rm -fr /mnt/fio320/tpc1000w ; cp -r /mnt/tachion/back/tpc1000w /mnt/fio320/
+sync
+
+done

packages/tls/tpcc-mysql/scripts/virident_stat.sh

+echo 0 >  /proc/driver/virident/vgcdrivea0/bdev
+
+while [ true ]
+do
+
+cat /proc/driver/virident/vgcdrivea0/bdev 
+cat /proc/driver/virident/vgcdrivea0/gc
+sleep 10
+
+done
+

packages/tls/tpcc-mysql/src/Makefile

+#
+# "make all" to build necessary executables.
+#
+
+
+
+LIBS=		`mysql_config --libs_r` -lrt
+
+INC=		-I. `mysql_config --include`
+
+#DEFS=		-DDEBUG
+
+CFLAGS=		-w -O3 -g
+
+TRANSACTIONS=	neword.o payment.o ordstat.o delivery.o slev.o
+OBJS=		main.o spt_proc.o driver.o support.o sequence.o rthist.o sb_percentile.o $(TRANSACTIONS)
+
+.SUFFIXES:
+.SUFFIXES: .o .c
+
+.c.o:
+	$(CC) $(CFLAGS) $(INC) $(DEFS) -c $*.c
+
+all: ../tpcc_load ../tpcc_start
+
+../tpcc_load : load.o support.o
+	$(CC) load.o support.o $(LIBS) -o ../tpcc_load
+
+../tpcc_start : $(OBJS)
+	$(CC) $(OBJS) $(LIBS) -o ../tpcc_start
+
+clean :
+	rm -f *.o

packages/tls/tpcc-mysql/src/delivery.c

+/*
+ * -*-C-*-
+ * delivery.pc
+ * corresponds to A.4 in appendix A
+ */
+
+#include <stdio.h>
+#include <string.h>
+#include <time.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+extern MYSQL **ctx;
+extern MYSQL_STMT ***stmt;
+
+#define NNULL ((void *)0)
+
+int delivery( int t_num,
+	      int w_id_arg,
+	      int o_carrier_id_arg
+)
+{
+	int            w_id = w_id_arg;
+	int            o_carrier_id = o_carrier_id_arg;
+	int            d_id;
+	int            c_id;
+	int            no_o_id;
+	float           ol_total;
+	char            datetime[81];
+
+	int proceed = 0;
+
+	MYSQL_STMT*   mysql_stmt;
+        MYSQL_BIND    param[4];
+        MYSQL_BIND    column[1];
+
+	/*EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+        gettimestamp(datetime, STRFTIME_FORMAT, TIMESTAMP_LEN);
+
+	/* For each district in warehouse */
+	/* printf("W: %d\n", w_id); */
+
+	for (d_id = 1; d_id <= DIST_PER_WARE; d_id++) {
+	        proceed = 1;
+		/*EXEC_SQL SELECT COALESCE(MIN(no_o_id),0) INTO :no_o_id
+		                FROM new_orders
+		                WHERE no_d_id = :d_id AND no_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][25];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &d_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_LONG;
+                column[0].buffer = &no_o_id;
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+                switch( mysql_stmt_fetch(mysql_stmt) ) {
+                    case 0: //SUCCESS
+                        break;
+                    case 1: //ERROR
+                    case MYSQL_NO_DATA: //NO MORE DATA
+                    default:
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto sqlerr;
+                }
+                mysql_stmt_free_result(mysql_stmt);
+
+
+		if(no_o_id == 0) continue;
+		proceed = 2;
+		/*EXEC_SQL DELETE FROM new_orders WHERE no_o_id = :no_o_id AND no_d_id = :d_id
+		  AND no_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][26];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &no_o_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+		proceed = 3;
+		/*EXEC_SQL SELECT o_c_id INTO :c_id FROM orders
+		                WHERE o_id = :no_o_id AND o_d_id = :d_id
+				AND o_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][27];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &no_o_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_LONG;
+                column[0].buffer = &c_id;
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+                switch( mysql_stmt_fetch(mysql_stmt) ) {
+                    case 0: //SUCCESS
+                        break;
+                    case 1: //ERROR
+                    case MYSQL_NO_DATA: //NO MORE DATA
+                    default:
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto sqlerr;
+                }
+                mysql_stmt_free_result(mysql_stmt);
+
+
+		proceed = 4;
+		/*EXEC_SQL UPDATE orders SET o_carrier_id = :o_carrier_id
+		                WHERE o_id = :no_o_id AND o_d_id = :d_id AND
+				o_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][28];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &o_carrier_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &no_o_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &d_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		proceed = 5;
+		/*EXEC_SQL UPDATE order_line
+		                SET ol_delivery_d = :datetime
+		                WHERE ol_o_id = :no_o_id AND ol_d_id = :d_id AND
+				ol_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][29];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_STRING;
+                param[0].buffer = datetime;
+                param[0].buffer_length = strlen(datetime);
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &no_o_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &d_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		proceed = 6;
+		/*EXEC_SQL SELECT SUM(ol_amount) INTO :ol_total
+		                FROM order_line
+		                WHERE ol_o_id = :no_o_id AND ol_d_id = :d_id
+				AND ol_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][30];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &no_o_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+                if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+                memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+                column[0].buffer_type = MYSQL_TYPE_FLOAT;
+                column[0].buffer = &ol_total;
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+                switch( mysql_stmt_fetch(mysql_stmt) ) {
+                    case 0: //SUCCESS
+                    case MYSQL_DATA_TRUNCATED:
+                        break;
+                    case 1: //ERROR
+                    case MYSQL_NO_DATA: //NO MORE DATA
+                    default:
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto sqlerr;
+                }
+                mysql_stmt_free_result(mysql_stmt);
+
+
+		proceed = 7;
+		/*EXEC_SQL UPDATE customer SET c_balance = c_balance + :ol_total ,
+		                             c_delivery_cnt = c_delivery_cnt + 1
+		                WHERE c_id = :c_id AND c_d_id = :d_id AND
+				c_w_id = :w_id;*/
+		mysql_stmt = stmt[t_num][31];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_FLOAT;
+		param[0].buffer = &ol_total;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &d_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+                if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		/*EXEC_SQL COMMIT WORK;*/
+		if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+
+		/* printf("D: %d, O: %d, time: %d\n", d_id, o_id, tad); */
+
+	}
+	/*EXEC_SQL COMMIT WORK;*/
+	return (1);
+
+sqlerr:
+        fprintf(stderr, "delivery %d:%d\n",t_num,proceed);
+	error(ctx[t_num],mysql_stmt);
+        /*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+sqlerrerr:
+	return (0);
+}

packages/tls/tpcc-mysql/src/driver.c

+/*
+ * driver.c
+ * driver for the tpcc transactions
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <sys/times.h>
+#include <time.h>
+#include "tpc.h"      /* prototypes for misc. functions */
+#include "trans_if.h" /* prototypes for transacation interface calls */
+#include "sequence.h"
+#include "rthist.h"
+#include "sb_percentile.h"
+
+static int other_ware (int home_ware);
+static int do_neword (int t_num);
+static int do_payment (int t_num);
+static int do_ordstat (int t_num);
+static int do_delivery (int t_num);
+static int do_slev (int t_num);
+
+extern int num_ware;
+extern int num_conn;
+extern int activate_transaction;
+extern int counting_on;
+
+extern int num_node;
+extern int time_count;
+extern FILE *freport_file;
+
+extern int success[];
+extern int late[];
+extern int retry[];
+extern int failure[];
+
+extern int* success2[];
+extern int* late2[];
+extern int* retry2[];
+extern int* failure2[];
+
+extern double max_rt[];
+extern double total_rt[];
+
+extern int rt_limit[];
+
+extern long clk_tck;
+extern sb_percentile_t local_percentile;
+
+#define MAX_RETRY 2000
+
+int driver (int t_num)
+{
+    int i, j;
+    
+
+    /* Actually, WaitTimes are needed... */
+    while( activate_transaction ){
+      switch(seq_get()){
+      case 0:
+	do_neword(t_num);
+	break;
+      case 1:
+	do_payment(t_num);
+	break;
+      case 2:
+	do_ordstat(t_num);
+	break;
+      case 3:
+	do_delivery(t_num);
+	break;
+      case 4:
+	do_slev(t_num);
+	break;
+      default:
+	printf("Error - Unknown sequence.\n");
+      }
+
+    }
+
+    return(0);
+
+}
+
+/*
+ * prepare data and execute the new order transaction for one order
+ * officially, this is supposed to be simulated terminal I/O
+ */
+static int do_neword (int t_num)
+{
+    int c_num;
+    int i,ret;
+    clock_t clk1,clk2;
+    double rt;
+    struct timespec tbuf1;
+    struct timespec tbuf2;
+    int  w_id, d_id, c_id, ol_cnt;
+    int  all_local = 1;
+    int  notfound = MAXITEMS+1;  /* valid item ids are numbered consecutively
+				    [1..MAXITEMS] */
+    int rbk;
+    int  itemid[MAX_NUM_ITEMS];
+    int  supware[MAX_NUM_ITEMS];
+    int  qty[MAX_NUM_ITEMS];
+
+    if(num_node==0){
+	w_id = RandomNumber(1, num_ware);
+    }else{
+	c_num = ((num_node * t_num)/num_conn); /* drop moduls */
+	w_id = RandomNumber(1 + (num_ware * c_num)/num_node,
+			    (num_ware * (c_num + 1))/num_node);
+    }
+    d_id = RandomNumber(1, DIST_PER_WARE);
+    c_id = NURand(1023, 1, CUST_PER_DIST);
+
+    ol_cnt = RandomNumber(5, 15);
+    rbk = RandomNumber(1, 100);
+
+    for (i = 0; i < ol_cnt; i++) {
+	itemid[i] = NURand(8191, 1, MAXITEMS);
+	if ((i == ol_cnt - 1) && (rbk == 1)) {
+	    itemid[i] = notfound;
+	}
+	if (RandomNumber(1, 100) != 1) {
+	    supware[i] = w_id;
+	}
+	else {
+	    supware[i] = other_ware(w_id);
+	    all_local = 0;
+	}
+	qty[i] = RandomNumber(1, 10);
+    }
+
+    clk1 = clock_gettime(CLOCK_MONOTONIC, &tbuf1 );
+    for (i = 0; i < MAX_RETRY; i++) {
+      ret = neword(t_num, w_id, d_id, c_id, ol_cnt, all_local, itemid, supware, qty);
+      clk2 = clock_gettime(CLOCK_MONOTONIC, &tbuf2 );
+
+      if(ret){
+
+	rt = (double)(tbuf2.tv_sec * 1000.0 + tbuf2.tv_nsec/1000000.0-tbuf1.tv_sec * 1000.0 - tbuf1.tv_nsec/1000000.0);
+        //printf("NOT : %.3f\n", rt);
+        if (freport_file != NULL) {
+          fprintf(freport_file,"%d %.3f\n", time_count, rt);
+        }
+
+	if(rt > max_rt[0])
+	  max_rt[0]=rt;
+	total_rt[0] += rt;
+	sb_percentile_update(&local_percentile, rt);
+	hist_inc(0, rt);
+	if(counting_on){
+	  if( rt < rt_limit[0]){
+	    success[0]++;
+	    success2[0][t_num]++;
+	  }else{
+	    late[0]++;
+	    late2[0][t_num]++;
+	  }
+	}
+
+	return (1); /* end */
+      }else{
+
+	if(counting_on){
+	  retry[0]++;
+	  retry2[0][t_num]++;
+	}
+
+      }
+    }
+
+    if(counting_on){
+      retry[0]--;
+      retry2[0][t_num]--;
+      failure[0]++;
+      failure2[0][t_num]++;
+    }
+
+    return (0);
+}
+
+/*
+ * produce the id of a valid warehouse other than home_ware
+ * (assuming there is one)
+ */
+static int other_ware (int home_ware)
+{
+    int tmp;
+
+    if (num_ware == 1) return home_ware;
+    while ((tmp = RandomNumber(1, num_ware)) == home_ware);
+    return tmp;
+}
+
+/*
+ * prepare data and execute payment transaction
+ */
+static int do_payment (int t_num)
+{
+    int c_num;
+    int byname,i,ret;
+    clock_t clk1,clk2;
+    double rt;
+    struct timespec tbuf1;
+    struct timespec tbuf2;
+    int  w_id, d_id, c_w_id, c_d_id, c_id, h_amount;
+    char c_last[17];
+
+    if(num_node==0){
+	w_id = RandomNumber(1, num_ware);
+    }else{
+	c_num = ((num_node * t_num)/num_conn); /* drop moduls */
+	w_id = RandomNumber(1 + (num_ware * c_num)/num_node,
+			    (num_ware * (c_num + 1))/num_node);
+    }
+    d_id = RandomNumber(1, DIST_PER_WARE);
+    c_id = NURand(1023, 1, CUST_PER_DIST); 
+    Lastname(NURand(255,0,999), c_last); 
+    h_amount = RandomNumber(1,5000);
+    if (RandomNumber(1, 100) <= 60) {
+        byname = 1; /* select by last name */
+    }else{
+        byname = 0; /* select by customer id */
+    }
+    if (RandomNumber(1, 100) <= 85) {
+        c_w_id = w_id;
+        c_d_id = d_id;
+    }else{
+        c_w_id = other_ware(w_id);
+        c_d_id = RandomNumber(1, DIST_PER_WARE);
+    }
+
+    clk1 = clock_gettime(CLOCK_MONOTONIC, &tbuf1 );
+    for (i = 0; i < MAX_RETRY; i++) {
+      ret = payment(t_num, w_id, d_id, byname, c_w_id, c_d_id, c_id, c_last, h_amount);
+      clk2 = clock_gettime(CLOCK_MONOTONIC, &tbuf2 );
+
+      if(ret){
+
+	rt = (double)(tbuf2.tv_sec * 1000.0 + tbuf2.tv_nsec/1000000.0-tbuf1.tv_sec * 1000.0 - tbuf1.tv_nsec/1000000.0);
+	if(rt > max_rt[1])
+	  max_rt[1]=rt;
+	total_rt[1] += rt;
+	hist_inc(1, rt);
+	if(counting_on){
+	  if( rt < rt_limit[1]){
+	    success[1]++;
+	    success2[1][t_num]++;
+	  }else{
+	    late[1]++;
+	    late2[1][t_num]++;
+	  }
+	}
+
+	return (1); /* end */
+      }else{
+
+	if(counting_on){
+	  retry[1]++;
+	  retry2[1][t_num]++;
+	}
+
+      }
+    }
+
+    if(counting_on){
+      retry[1]--;
+      retry2[1][t_num]--;
+      failure[1]++;
+      failure2[1][t_num]++;
+    }
+
+    return (0);
+}
+
+/*
+ * prepare data and execute order status transaction
+ */
+static int do_ordstat (int t_num)
+{
+    int c_num;
+    int byname,i,ret;
+    clock_t clk1,clk2;
+    double rt;
+    struct timespec tbuf1;
+    struct timespec tbuf2;
+    int  w_id, d_id, c_id;
+    char c_last[16];
+
+    if(num_node==0){
+	w_id = RandomNumber(1, num_ware);
+    }else{
+	c_num = ((num_node * t_num)/num_conn); /* drop moduls */
+	w_id = RandomNumber(1 + (num_ware * c_num)/num_node,
+			    (num_ware * (c_num + 1))/num_node);
+    }
+    d_id = RandomNumber(1, DIST_PER_WARE);
+    c_id = NURand(1023, 1, CUST_PER_DIST); 
+    Lastname(NURand(255,0,999), c_last); 
+    if (RandomNumber(1, 100) <= 60) {
+        byname = 1; /* select by last name */
+    }else{
+        byname = 0; /* select by customer id */
+    }
+
+      clk1 = clock_gettime(CLOCK_MONOTONIC, &tbuf1 );
+    for (i = 0; i < MAX_RETRY; i++) {
+      ret = ordstat(t_num, w_id, d_id, byname, c_id, c_last);
+      clk2 = clock_gettime(CLOCK_MONOTONIC, &tbuf2 );
+
+      if(ret){
+
+	rt = (double)(tbuf2.tv_sec * 1000.0 + tbuf2.tv_nsec/1000000.0-tbuf1.tv_sec * 1000.0 - tbuf1.tv_nsec/1000000.0);
+	if(rt > max_rt[2])
+	  max_rt[2]=rt;
+	total_rt[2] += rt;
+	hist_inc(2, rt);
+	if(counting_on){
+	  if( rt < rt_limit[2]){
+	    success[2]++;
+	    success2[2][t_num]++;
+	  }else{
+	    late[2]++;
+	    late2[2][t_num]++;
+	  }
+	}
+
+	return (1); /* end */
+      }else{
+
+	if(counting_on){
+	  retry[2]++;
+	  retry2[2][t_num]++;
+	}
+
+      }
+    }
+
+    if(counting_on){
+      retry[2]--;
+      retry2[2][t_num]--;
+      failure[2]++;
+      failure2[2][t_num]++;
+    }
+
+    return (0);
+
+}
+
+/*
+ * execute delivery transaction
+ */
+static int do_delivery (int t_num)
+{
+    int c_num;
+    int i,ret;
+    clock_t clk1,clk2;
+    double rt;
+    struct timespec tbuf1;
+    struct timespec tbuf2;
+    int  w_id, o_carrier_id;
+
+    if(num_node==0){
+	w_id = RandomNumber(1, num_ware);
+    }else{
+	c_num = ((num_node * t_num)/num_conn); /* drop moduls */
+	w_id = RandomNumber(1 + (num_ware * c_num)/num_node,
+			    (num_ware * (c_num + 1))/num_node);
+    }
+    o_carrier_id = RandomNumber(1, 10);
+
+      clk1 = clock_gettime(CLOCK_MONOTONIC, &tbuf1 );
+    for (i = 0; i < MAX_RETRY; i++) {
+      ret = delivery(t_num, w_id, o_carrier_id);
+      clk2 = clock_gettime(CLOCK_MONOTONIC, &tbuf2 );
+
+      if(ret){
+
+	rt = (double)(tbuf2.tv_sec * 1000.0 + tbuf2.tv_nsec/1000000.0-tbuf1.tv_sec * 1000.0 - tbuf1.tv_nsec/1000000.0);
+	if(rt > max_rt[3])
+	  max_rt[3]=rt;
+	total_rt[3] += rt;
+	hist_inc(3, rt );
+	if(counting_on){
+	  if( rt < rt_limit[3]){
+	    success[3]++;
+	    success2[3][t_num]++;
+	  }else{
+	    late[3]++;
+	    late2[3][t_num]++;
+	  }
+	}
+
+	return (1); /* end */
+      }else{
+
+	if(counting_on){
+	  retry[3]++;
+	  retry2[3][t_num]++;
+	}
+
+      }
+    }
+
+    if(counting_on){
+      retry[3]--;
+      retry2[3][t_num]--;
+      failure[3]++;
+      failure2[3][t_num]++;
+    }
+
+    return (0);
+
+}
+
+/* 
+ * prepare data and execute the stock level transaction
+ */
+static int do_slev (int t_num)
+{
+    int c_num;
+    int i,ret;
+    clock_t clk1,clk2;
+    double rt;
+    struct timespec tbuf1;
+    struct timespec tbuf2;
+    int  w_id, d_id, level;
+
+    if(num_node==0){
+	w_id = RandomNumber(1, num_ware);
+    }else{
+	c_num = ((num_node * t_num)/num_conn); /* drop moduls */
+	w_id = RandomNumber(1 + (num_ware * c_num)/num_node,
+			    (num_ware * (c_num + 1))/num_node);
+    }
+    d_id = RandomNumber(1, DIST_PER_WARE); 
+    level = RandomNumber(10, 20); 
+
+      clk1 = clock_gettime(CLOCK_MONOTONIC, &tbuf1 );
+    for (i = 0; i < MAX_RETRY; i++) {
+      ret = slev(t_num, w_id, d_id, level);
+      clk2 = clock_gettime(CLOCK_MONOTONIC, &tbuf2 );
+
+      if(ret){
+
+	rt = (double)(tbuf2.tv_sec * 1000.0 + tbuf2.tv_nsec/1000000.0-tbuf1.tv_sec * 1000.0 - tbuf1.tv_nsec/1000000.0);
+	if(rt > max_rt[4])
+	  max_rt[4]=rt;
+	total_rt[4] += rt;
+	hist_inc(4, rt );
+	if(counting_on){
+	  if( rt < rt_limit[4]){
+	    success[4]++;
+	    success2[4][t_num]++;
+	  }else{
+	    late[4]++;
+	    late2[4][t_num]++;
+	  }
+	}
+
+	return (1); /* end */
+      }else{
+
+	if(counting_on){
+	  retry[4]++;
+	  retry2[4][t_num]++;
+	}
+
+      }
+    }
+
+    if(counting_on){
+      retry[4]--;
+      retry2[4][t_num]--;
+      failure[4]++;
+      failure2[4][t_num]++;
+    }
+
+    return (0);
+
+}

packages/tls/tpcc-mysql/src/load.c

+/*
+ * corresponds to A.6 in appendix A
+ */
+
+/*
+ * ==================================================================+ | Load
+ * TPCC tables
+ * +==================================================================
+ */
+
+#include <stdio.h>
+#include <string.h>
+#include <unistd.h>
+#include <ctype.h>
+#include <stdlib.h>
+#include <time.h>
+#include <fcntl.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+#define NNULL ((void *)0)
+//#undef NULL
+
+MYSQL *mysql;
+MYSQL_STMT *stmt[11];
+
+/* Global SQL Variables */
+char            timestamp[81];
+long            count_ware;
+int             fd, seed;
+
+int             particle_flg = 0; /* "1" means particle mode */
+int             part_no = 0; /* 1:items 2:warehouse 3:customer 4:orders */
+long            min_ware = 1;
+long            max_ware;
+
+/* Global Variables */
+int             i;
+int             option_debug = 0;	/* 1 if generating debug output    */
+int             is_local = 1;           /* "1" mean local */
+
+#define DB_STRING_MAX 51
+
+#include "parse_port.h"
+
+int
+try_stmt_execute(MYSQL_STMT *mysql_stmt)
+{
+    int ret = mysql_stmt_execute(mysql_stmt);
+    if (ret) {
+        printf("\n%d, %s, %s\n", mysql_errno(mysql), mysql_sqlstate(mysql), mysql_error(mysql) );
+        mysql_rollback(mysql);
+    }
+    return ret;
+}
+
+/*
+ * ==================================================================+ |
+ * main() | ARGUMENTS |      Warehouses n [Debug] [Help]
+ * +==================================================================
+ */
+void 
+main(argc, argv)
+	int             argc;
+	char           *argv[];
+{
+	char            arg[2];
+        char           *ptr;
+
+	char           connect_string[DB_STRING_MAX];
+	char           db_string[DB_STRING_MAX];
+	char	       db_user[DB_STRING_MAX];
+	char	       db_password[DB_STRING_MAX];
+        int            port= 3306;
+
+	int i,c;
+
+	MYSQL* resp;
+
+	/* initialize */
+	count_ware = 0;
+
+	printf("*************************************\n");
+	printf("*** TPCC-mysql Data Loader        ***\n");
+	printf("*************************************\n");
+
+  /* Parse args */
+
+    while ( (c = getopt(argc, argv, "h:P:d:u:p:w:l:m:n:")) != -1) {
+        switch (c) {
+        case 'h':
+            printf ("option h with value '%s'\n", optarg);
+            strncpy(connect_string, optarg, DB_STRING_MAX);
+            break;
+        case 'd':
+            printf ("option d with value '%s'\n", optarg);
+            strncpy(db_string, optarg, DB_STRING_MAX);
+            break;
+        case 'u':
+            printf ("option u with value '%s'\n", optarg);
+            strncpy(db_user, optarg, DB_STRING_MAX);
+            break;
+        case 'p':
+            printf ("option p with value '%s'\n", optarg);
+            strncpy(db_password, optarg, DB_STRING_MAX);
+            break;
+        case 'w':
+            printf ("option w with value '%s'\n", optarg);
+            count_ware = atoi(optarg);
+            break;
+        case 'l':
+            printf ("option l with value '%s'\n", optarg);
+            part_no = atoi(optarg);
+	    particle_flg = 1;
+            break;
+        case 'm':
+            printf ("option m with value '%s'\n", optarg);
+            min_ware = atoi(optarg);
+            break;
+        case 'n':
+            printf ("option n with value '%s'\n", optarg);
+            max_ware = atoi(optarg);
+            break;
+        case 'P':
+            printf ("option P with value '%s'\n", optarg);
+            port = atoi(optarg);
+            break;
+        case '?':
+    	    printf("Usage: tpcc_load -h server_host -P port -d database_name -u mysql_user -p mysql_password -w warehouses -l part -m min_wh -n max_wh\n");
+    	    printf("* [part]: 1=ITEMS 2=WAREHOUSE 3=CUSTOMER 4=ORDERS\n");
+            exit(0);
+        default:
+            printf ("?? getopt returned character code 0%o ??\n", c);
+        }
+    }
+    if (optind < argc) {
+        printf ("non-option ARGV-elements: ");
+        while (optind < argc)
+            printf ("%s ", argv[optind++]);
+        printf ("\n");
+    }
+
+	if(strcmp(connect_string,"l")==0){
+	  is_local = 1;
+	}else{
+	  is_local = 0;
+	}
+
+	if(particle_flg==0){
+	    min_ware = 1;
+	    max_ware = count_ware;
+	}
+
+	printf("<Parameters>\n");
+	if(is_local==0)printf("     [server]: %s\n", connect_string);
+	if(is_local==0)printf("     [port]: %d\n", port);
+	printf("     [DBname]: %s\n", db_string);
+	printf("       [user]: %s\n", db_user);
+	printf("       [pass]: %s\n", db_password);
+
+	printf("  [warehouse]: %d\n", count_ware);
+
+	if(particle_flg==1){
+	    printf("  [part(1-4)]: %d\n", part_no);
+	    printf("     [MIN WH]: %d\n", min_ware);
+	    printf("     [MAX WH]: %d\n", max_ware);
+	}
+
+	fd = open("/dev/urandom", O_RDONLY);
+	if (fd == -1) {
+	    fd = open("/dev/random", O_RDONLY);
+	    if (fd == -1) {
+		struct timeval  tv;
+		gettimeofday(&tv, NNULL);
+		seed = (tv.tv_sec ^ tv.tv_usec) * tv.tv_sec * tv.tv_usec ^ tv.tv_sec;
+	    }else{
+		read(fd, &seed, sizeof(seed));
+		close(fd);
+	    }
+	}else{
+	    read(fd, &seed, sizeof(seed));
+	    close(fd);
+	}
+	SetSeed(seed);
+
+	/* Initialize timestamp (for date columns) */
+	gettimestamp(timestamp, STRFTIME_FORMAT, TIMESTAMP_LEN);
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO Error_SqlCall; */
+
+	mysql = mysql_init(NULL);
+	if(!mysql) goto Error_SqlCall;
+
+	if(is_local==1){
+	    /* exec sql connect :connect_string; */
+	    resp = mysql_real_connect(mysql, "localhost", db_user, db_password, db_string, port, NULL, 0);
+	}else{
+	    /* exec sql connect :connect_string USING :db_string; */
+	    resp = mysql_real_connect(mysql, connect_string, db_user, db_password, db_string, port, NULL, 0);
+	}
+
+	if(resp) {
+	    mysql_autocommit(mysql, 0);
+	    mysql_query(mysql, "SET UNIQUE_CHECKS=0");
+	    mysql_query(mysql, "SET FOREIGN_KEY_CHECKS=0");
+	} else {
+	    goto Error_SqlCall_close;
+	}
+
+	for( i=0; i<11; i++ ){
+	    stmt[i] = mysql_stmt_init(mysql);
+	    if(!stmt[i]) goto Error_SqlCall_close;
+	}
+
+	if( mysql_stmt_prepare(stmt[0],
+			       "INSERT INTO item values(?,?,?,?,?)",
+			       34) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[1],
+			       "INSERT INTO warehouse values(?,?,?,?,?,?,?,?,?)",
+			       47) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[2],
+			       "INSERT INTO stock values(?,?,?,?,?,?,?,?,?,?,?,?,?,0,0,0,?)",
+			       59) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[3],
+			       "INSERT INTO district values(?,?,?,?,?,?,?,?,?,?,?)",
+			       50) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[4],
+			       "INSERT INTO customer values(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?, 10.0, 1, 0,?)",
+			       76) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[5],
+			       "INSERT INTO history values(?,?,?,?,?,?,?,?)",
+			       43) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[6],
+			       "INSERT INTO orders values(?,?,?,?,?,NULL,?, 1)",
+			       46) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[7],
+			       "INSERT INTO new_orders values(?,?,?)",
+			       36) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[8],
+			       "INSERT INTO orders values(?,?,?,?,?,?,?, 1)",
+			       43) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[9],
+			       "INSERT INTO order_line values(?,?,?,?,?,?, NULL,?,?,?)",
+			       54) ) goto Error_SqlCall_close;
+	if( mysql_stmt_prepare(stmt[10],
+			       "INSERT INTO order_line values(?,?,?,?,?,?,?,?,?,?)",
+			       50) ) goto Error_SqlCall_close;
+
+
+	/* exec sql begin transaction; */
+
+	printf("TPCC Data Load Started...\n");
+
+	if(particle_flg==0){
+	    LoadItems();
+	    LoadWare();
+	    LoadCust();
+	    LoadOrd();
+	}else if(particle_flg==1){
+	    switch(part_no){
+		case 1:
+		    LoadItems();
+		    break;
+		case 2:
+		    LoadWare();
+		    break;
+		case 3:
+		    LoadCust();
+		    break;
+		case 4:
+		    LoadOrd();
+		    break;
+		default:
+		    printf("Unknown part_no\n");
+		    printf("1:ITEMS 2:WAREHOUSE 3:CUSTOMER 4:ORDERS\n");
+	    }
+	}
+
+	/* EXEC SQL COMMIT WORK; */
+
+	if( mysql_commit(mysql) ) goto Error_SqlCall;
+
+	for( i=0; i<11; i++ ){
+	    mysql_stmt_close(stmt[i]);
+	}
+
+	/* EXEC SQL DISCONNECT; */
+
+	mysql_close(mysql);
+
+	printf("\n...DATA LOADING COMPLETED SUCCESSFULLY.\n");
+	exit(0);
+Error_SqlCall_close:
+Error_SqlCall:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      LoadItems | DESCRIPTION |      Loads the Item table |
+ * ARGUMENTS |      none
+ * +==================================================================
+ */
+void 
+LoadItems()
+{
+
+	int             i_id;
+	int             i_im_id;
+        char            i_name[25];
+	float           i_price;
+	char            i_data[51];
+
+	int             idatasiz;
+	int             orig[MAXITEMS+1];
+	int             pos;
+	int             i;
+    int             retried = 0;
+
+	MYSQL_BIND    param[5];
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+	printf("Loading Item \n");
+
+	for (i = 0; i < MAXITEMS / 10; i++)
+		orig[i] = 0;
+	for (i = 0; i < MAXITEMS / 10; i++) {
+		do {
+			pos = RandomNumber(0L, MAXITEMS);
+		} while (orig[pos]);
+		orig[pos] = 1;
+	}
+retry:
+    if (retried)
+        printf("Retrying ...\n");
+    retried = 1;
+	for (i_id = 1; i_id <= MAXITEMS; i_id++) {
+
+		/* Generate Item Data */
+		i_im_id = RandomNumber(1L, 10000L);
+
+                i_name[ MakeAlphaString(14, 24, i_name) ] = 0;
+
+		i_price = ((int) RandomNumber(100L, 10000L)) / 100.0;
+
+		idatasiz = MakeAlphaString(26, 50, i_data);
+		i_data[idatasiz] = 0;
+
+		if (orig[i_id]) {
+			pos = RandomNumber(0L, idatasiz - 8);
+			i_data[pos] = 'o';
+			i_data[pos + 1] = 'r';
+			i_data[pos + 2] = 'i';
+			i_data[pos + 3] = 'g';
+			i_data[pos + 4] = 'i';
+			i_data[pos + 5] = 'n';
+			i_data[pos + 6] = 'a';
+			i_data[pos + 7] = 'l';
+		}
+		if (option_debug)
+			printf("IID = %ld, Name= %16s, Price = %5.2f\n",
+			       i_id, i_name, i_price);
+
+#if 0
+		printf("about to exec sql\n");
+		fflush(stdout);
+#endif
+
+		/* EXEC SQL INSERT INTO
+		                item
+		                values(:i_id,:i_im_id,:i_name,:i_price,:i_data); */
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 5); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &i_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &i_im_id;
+		param[2].buffer_type = MYSQL_TYPE_STRING;
+		param[2].buffer = i_name;
+		param[2].buffer_length = strlen(i_name);
+		param[3].buffer_type = MYSQL_TYPE_FLOAT;
+		param[3].buffer = &i_price;
+		param[4].buffer_type = MYSQL_TYPE_STRING;
+		param[4].buffer = i_data;
+		param[4].buffer_length = strlen(i_data);
+		if( mysql_stmt_bind_param(stmt[0], param) ) goto sqlerr;
+		if( try_stmt_execute(stmt[0]) ) goto retry;
+
+#if 0
+		printf("done executing sql\n");
+		fflush(stdout);
+#endif
+
+		if (!(i_id % 100)) {
+			printf(".");
+			fflush(stdout);
+
+			if (!(i_id % 5000))
+				printf(" %ld\n", i_id);
+		}
+	}
+
+	/* EXEC SQL COMMIT WORK; */
+	if( mysql_commit(mysql) ) goto sqlerr;
+
+	printf("Item Done. \n");
+	return;
+sqlerr:
+	Error(stmt[0]);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      LoadWare | DESCRIPTION |      Loads the Warehouse
+ * table |      Loads Stock, District as Warehouses are created | ARGUMENTS |
+ * none +==================================================================
+ */
+void 
+LoadWare()
+{
+
+	int             w_id;
+        char            w_name[11];
+        char            w_street_1[21];
+        char            w_street_2[21];
+        char            w_city[21];
+        char            w_state[3];
+        char            w_zip[10];
+	float           w_tax;
+	float           w_ytd;
+
+	int             tmp;
+    int             retried = 0;
+
+	MYSQL_BIND    param[9];
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+	printf("Loading Warehouse \n");
+    w_id = min_ware;
+retry:
+    if (retried)
+        printf("Retrying ....\n");
+    retried = 1;
+	for (; w_id <= max_ware; w_id++) {
+
+		/* Generate Warehouse Data */
+
+                w_name[ MakeAlphaString(6, 10, w_name) ] = 0;
+
+		MakeAddress(w_street_1, w_street_2, w_city, w_state, w_zip);
+
+		w_tax = ((float) RandomNumber(10L, 20L)) / 100.0;
+		w_ytd = 300000.00;
+
+		if (option_debug)
+			printf("WID = %ld, Name= %16s, Tax = %5.2f\n",
+			       w_id, w_name, w_tax);
+
+		/*EXEC SQL INSERT INTO
+		                warehouse
+		                values(:w_id,:w_name,
+				       :w_street_1,:w_street_2,:w_city,:w_state,
+				       :w_zip,:w_tax,:w_ytd);*/
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 9); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &w_id;
+		param[1].buffer_type = MYSQL_TYPE_STRING;
+		param[1].buffer = w_name;
+		param[1].buffer_length = strlen(w_name);
+		param[2].buffer_type = MYSQL_TYPE_STRING;
+		param[2].buffer = w_street_1;
+		param[2].buffer_length = strlen(w_street_1);
+		param[3].buffer_type = MYSQL_TYPE_STRING;
+		param[3].buffer = w_street_2;
+		param[3].buffer_length = strlen(w_street_2);
+		param[4].buffer_type = MYSQL_TYPE_STRING;
+		param[4].buffer = w_city;
+		param[4].buffer_length = strlen(w_city);
+		param[5].buffer_type = MYSQL_TYPE_STRING;
+		param[5].buffer = w_state;
+		param[5].buffer_length = strlen(w_state);
+		param[6].buffer_type = MYSQL_TYPE_STRING;
+		param[6].buffer = w_zip;
+		param[6].buffer_length = strlen(w_zip);
+		param[7].buffer_type = MYSQL_TYPE_FLOAT;
+		param[7].buffer = &w_tax;
+		param[8].buffer_type = MYSQL_TYPE_FLOAT;
+		param[8].buffer = &w_ytd;
+		if( mysql_stmt_bind_param(stmt[1], param) ) goto sqlerr;
+		if( try_stmt_execute(stmt[1]) ) goto retry;
+
+		/** Make Rows associated with Warehouse **/
+		if( Stock(w_id) ) goto retry;
+		if( District(w_id) ) goto retry;
+
+		/* EXEC SQL COMMIT WORK; */
+		if( mysql_commit(mysql) ) goto sqlerr;
+
+	}
+
+	return;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      LoadCust | DESCRIPTION |      Loads the Customer Table
+ * | ARGUMENTS |      none
+ * +==================================================================
+ */
+void 
+LoadCust()
+{
+
+	int             w_id;
+	int             d_id;
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+	for (w_id = min_ware; w_id <= max_ware; w_id++)
+		for (d_id = 1L; d_id <= DIST_PER_WARE; d_id++)
+			Customer(d_id, w_id);
+
+	/* EXEC SQL COMMIT WORK;*/	/* Just in case */
+	if( mysql_commit(mysql) ) goto sqlerr;
+
+	return;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      LoadOrd | DESCRIPTION |      Loads the Orders and
+ * Order_Line Tables | ARGUMENTS |      none
+ * +==================================================================
+ */
+void 
+LoadOrd()
+{
+
+	int             w_id;
+	float           w_tax;
+	int             d_id;
+	float           d_tax;
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	for (w_id = min_ware; w_id <= max_ware; w_id++)
+		for (d_id = 1L; d_id <= DIST_PER_WARE; d_id++)
+			Orders(d_id, w_id);
+
+	/* EXEC SQL COMMIT WORK; */	/* Just in case */
+	if( mysql_commit(mysql) ) goto sqlerr;
+
+	return;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      Stock | DESCRIPTION |      Loads the Stock table |
+ * ARGUMENTS |      w_id - warehouse id
+ * +==================================================================
+ */
+int 
+Stock(w_id)
+	int             w_id;
+{
+
+	int             s_i_id;
+	int             s_w_id;
+	int             s_quantity;
+
+	char            s_dist_01[25];
+	char            s_dist_02[25];
+	char            s_dist_03[25];
+	char            s_dist_04[25];
+	char            s_dist_05[25];
+	char            s_dist_06[25];
+	char            s_dist_07[25];
+	char            s_dist_08[25];
+	char            s_dist_09[25];
+	char            s_dist_10[25];
+	char            s_data[51];
+
+	int             sdatasiz;
+	int             orig[MAXITEMS+1];
+	int             pos;
+	int             i;
+    int             error;
+
+	MYSQL_BIND    param[14];
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+	printf("Loading Stock Wid=%ld\n", w_id);
+	s_w_id = w_id;
+
+	for (i = 0; i < MAXITEMS / 10; i++)
+		orig[i] = 0;
+	for (i = 0; i < MAXITEMS / 10; i++) {
+		do {
+			pos = RandomNumber(0L, MAXITEMS);
+		} while (orig[pos]);
+		orig[pos] = 1;
+	}
+
+retry:
+	for (s_i_id = 1; s_i_id <= MAXITEMS; s_i_id++) {
+
+		/* Generate Stock Data */
+		s_quantity = RandomNumber(10L, 100L);
+
+		s_dist_01[ MakeAlphaString(24, 24, s_dist_01) ] = 0;
+		s_dist_02[ MakeAlphaString(24, 24, s_dist_02) ] = 0;
+		s_dist_03[ MakeAlphaString(24, 24, s_dist_03) ] = 0;
+		s_dist_04[ MakeAlphaString(24, 24, s_dist_04) ] = 0;
+		s_dist_05[ MakeAlphaString(24, 24, s_dist_05) ] = 0;
+		s_dist_06[ MakeAlphaString(24, 24, s_dist_06) ] = 0;
+		s_dist_07[ MakeAlphaString(24, 24, s_dist_07) ] = 0;
+		s_dist_08[ MakeAlphaString(24, 24, s_dist_08) ] = 0;
+		s_dist_09[ MakeAlphaString(24, 24, s_dist_09) ] = 0;
+		s_dist_10[ MakeAlphaString(24, 24, s_dist_10) ] = 0;
+		sdatasiz = MakeAlphaString(26, 50, s_data);
+		s_data[sdatasiz] = 0;
+
+		if (orig[s_i_id]) {
+			pos = RandomNumber(0L, sdatasiz - 8);
+
+			s_data[pos] = 'o';
+			s_data[pos + 1] = 'r';
+			s_data[pos + 2] = 'i';
+			s_data[pos + 3] = 'g';
+			s_data[pos + 4] = 'i';
+			s_data[pos + 5] = 'n';
+			s_data[pos + 6] = 'a';
+			s_data[pos + 7] = 'l';
+
+		}
+		/*EXEC SQL INSERT INTO
+		                stock
+		                values(:s_i_id,:s_w_id,:s_quantity,
+				       :s_dist_01,:s_dist_02,:s_dist_03,:s_dist_04,:s_dist_05,
+				       :s_dist_06,:s_dist_07,:s_dist_08,:s_dist_09,:s_dist_10,
+				       0, 0, 0,:s_data);*/
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 14); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &s_i_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &s_w_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &s_quantity;
+		param[3].buffer_type = MYSQL_TYPE_STRING;
+		param[3].buffer = s_dist_01;
+		param[3].buffer_length = strlen(s_dist_01);
+		param[4].buffer_type = MYSQL_TYPE_STRING;
+		param[4].buffer = s_dist_02;
+		param[4].buffer_length = strlen(s_dist_02);
+		param[5].buffer_type = MYSQL_TYPE_STRING;
+		param[5].buffer = s_dist_03;
+		param[5].buffer_length = strlen(s_dist_03);
+		param[6].buffer_type = MYSQL_TYPE_STRING;
+		param[6].buffer = s_dist_04;
+		param[6].buffer_length = strlen(s_dist_04);
+		param[7].buffer_type = MYSQL_TYPE_STRING;
+		param[7].buffer = s_dist_05;
+		param[7].buffer_length = strlen(s_dist_05);
+		param[8].buffer_type = MYSQL_TYPE_STRING;
+		param[8].buffer = s_dist_06;
+		param[8].buffer_length = strlen(s_dist_06);
+		param[9].buffer_type = MYSQL_TYPE_STRING;
+		param[9].buffer = s_dist_07;
+		param[9].buffer_length = strlen(s_dist_07);
+		param[10].buffer_type = MYSQL_TYPE_STRING;
+		param[10].buffer = s_dist_08;
+		param[10].buffer_length = strlen(s_dist_08);
+		param[11].buffer_type = MYSQL_TYPE_STRING;
+		param[11].buffer = s_dist_09;
+		param[11].buffer_length = strlen(s_dist_09);
+		param[12].buffer_type = MYSQL_TYPE_STRING;
+		param[12].buffer = s_dist_10;
+		param[12].buffer_length = strlen(s_dist_10);
+		param[13].buffer_type = MYSQL_TYPE_STRING;
+		param[13].buffer = s_data;
+		param[13].buffer_length = strlen(s_data);
+		if( mysql_stmt_bind_param(stmt[2], param) ) goto sqlerr;
+		if( (error = try_stmt_execute(stmt[2])) ) goto out;
+
+		if (option_debug)
+			printf("SID = %ld, WID = %ld, Quan = %ld\n",
+			       s_i_id, s_w_id, s_quantity);
+
+		if (!(s_i_id % 100)) {
+			printf(".");
+			fflush(stdout);
+			if (!(s_i_id % 5000))
+				printf(" %ld\n", s_i_id);
+		}
+	}
+
+	printf(" Stock Done.\n");
+out:
+	return error;
+sqlerr:
+    Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      District | DESCRIPTION |      Loads the District table
+ * | ARGUMENTS |      w_id - warehouse id
+ * +==================================================================
+ */
+int 
+District(w_id)
+	int             w_id;
+{
+
+	int             d_id;
+	int             d_w_id;
+
+	char            d_name[11];
+	char            d_street_1[21];
+	char            d_street_2[21];
+	char            d_city[21];
+	char            d_state[3];
+	char            d_zip[10];
+
+	float           d_tax;
+	float           d_ytd;
+	int             d_next_o_id;
+    int             error;
+
+	MYSQL_BIND    param[11];
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	printf("Loading District\n");
+	d_w_id = w_id;
+	d_ytd = 30000.0;
+	d_next_o_id = 3001L;
+retry:
+	for (d_id = 1; d_id <= DIST_PER_WARE; d_id++) {
+
+		/* Generate District Data */
+
+		d_name[ MakeAlphaString(6L, 10L, d_name) ] = 0;
+		MakeAddress(d_street_1, d_street_2, d_city, d_state, d_zip);
+
+		d_tax = ((float) RandomNumber(10L, 20L)) / 100.0;
+
+		/*EXEC SQL INSERT INTO
+		                district
+		                values(:d_id,:d_w_id,:d_name,
+				       :d_street_1,:d_street_2,:d_city,:d_state,:d_zip,
+				       :d_tax,:d_ytd,:d_next_o_id);*/
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 11); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &d_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &d_w_id;
+		param[2].buffer_type = MYSQL_TYPE_STRING;
+		param[2].buffer = d_name;
+		param[2].buffer_length = strlen(d_name);
+		param[3].buffer_type = MYSQL_TYPE_STRING;
+		param[3].buffer = d_street_1;
+		param[3].buffer_length = strlen(d_street_1);
+		param[4].buffer_type = MYSQL_TYPE_STRING;
+		param[4].buffer = d_street_2;
+		param[4].buffer_length = strlen(d_street_2);
+		param[5].buffer_type = MYSQL_TYPE_STRING;
+		param[5].buffer = d_city;
+		param[5].buffer_length = strlen(d_city);
+		param[6].buffer_type = MYSQL_TYPE_STRING;
+		param[6].buffer = d_state;
+		param[6].buffer_length = strlen(d_state);
+		param[7].buffer_type = MYSQL_TYPE_STRING;
+		param[7].buffer = d_zip;
+		param[7].buffer_length = strlen(d_zip);
+		param[8].buffer_type = MYSQL_TYPE_FLOAT;
+		param[8].buffer = &d_tax;
+		param[9].buffer_type = MYSQL_TYPE_FLOAT;
+		param[9].buffer = &d_ytd;
+		param[10].buffer_type = MYSQL_TYPE_LONG;
+		param[10].buffer = &d_next_o_id;
+		if( mysql_stmt_bind_param(stmt[3], param) ) goto sqlerr;
+		if( (error = try_stmt_execute(stmt[3])) ) goto out;
+
+		if (option_debug)
+			printf("DID = %ld, WID = %ld, Name = %10s, Tax = %5.2f\n",
+			       d_id, d_w_id, d_name, d_tax);
+
+	}
+
+out:
+	return error;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      Customer | DESCRIPTION |      Loads Customer Table |
+ * Also inserts corresponding history record | ARGUMENTS |      id   -
+ * customer id |      d_id - district id |      w_id - warehouse id
+ * +==================================================================
+ */
+void 
+Customer(d_id, w_id)
+	int             d_id;
+	int             w_id;
+{
+	int             c_id;
+	int             c_d_id;
+	int             c_w_id;
+
+	char            c_first[17];
+	char            c_middle[3];
+	char            c_last[17];
+	char            c_street_1[21];
+	char            c_street_2[21];
+	char            c_city[21];
+	char            c_state[3];
+	char            c_zip[10];
+	char            c_phone[17];
+	char            c_since[12];
+	char            c_credit[3];
+
+	int             c_credit_lim;
+	float           c_discount;
+	float           c_balance;
+	char            c_data[501];
+
+	float           h_amount;
+
+	char            h_data[25];
+    int             retried = 0;
+
+	MYSQL_BIND    param[18];
+
+	/*EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	printf("Loading Customer for DID=%ld, WID=%ld\n", d_id, w_id);
+
+retry:
+    if (retried)
+        printf("Retrying ...\n");
+    retried = 1;
+	for (c_id = 1; c_id <= CUST_PER_DIST; c_id++) {
+
+		/* Generate Customer Data */
+		c_d_id = d_id;
+		c_w_id = w_id;
+
+		c_first[ MakeAlphaString(8, 16, c_first) ] = 0;
+		c_middle[0] = 'O';
+		c_middle[1] = 'E';
+		c_middle[2] = 0;
+
+		if (c_id <= 1000) {
+			Lastname(c_id - 1, c_last);
+		} else {
+			Lastname(NURand(255, 0, 999), c_last);
+		}
+
+		MakeAddress(c_street_1, c_street_2, c_city, c_state, c_zip);
+		c_phone[ MakeNumberString(16, 16, c_phone) ] = 0;
+
+		if (RandomNumber(0L, 1L))
+			c_credit[0] = 'G';
+		else
+			c_credit[0] = 'B';
+		c_credit[1] = 'C';
+		c_credit[2] = 0;
+
+		c_credit_lim = 50000;
+		c_discount = ((float) RandomNumber(0L, 50L)) / 100.0;
+		c_balance = -10.0;
+
+		c_data[ MakeAlphaString(300, 500, c_data) ] = 0;
+
+		/*EXEC SQL INSERT INTO
+		                customer
+		                values(:c_id,:c_d_id,:c_w_id,
+				  :c_first,:c_middle,:c_last,
+				  :c_street_1,:c_street_2,:c_city,:c_state,
+				  :c_zip,
+			          :c_phone, :timestamp,
+				  :c_credit,
+				  :c_credit_lim,:c_discount,:c_balance,
+				  10.0, 1, 0,:c_data);*/
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 18); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_w_id;
+		param[3].buffer_type = MYSQL_TYPE_STRING;
+		param[3].buffer = c_first;
+		param[3].buffer_length = strlen(c_first);
+		param[4].buffer_type = MYSQL_TYPE_STRING;
+		param[4].buffer = c_middle;
+		param[4].buffer_length = strlen(c_middle);
+		param[5].buffer_type = MYSQL_TYPE_STRING;
+		param[5].buffer = c_last;
+		param[5].buffer_length = strlen(c_last);
+		param[6].buffer_type = MYSQL_TYPE_STRING;
+		param[6].buffer = c_street_1;
+		param[6].buffer_length = strlen(c_street_1);
+		param[7].buffer_type = MYSQL_TYPE_STRING;
+		param[7].buffer = c_street_2;
+		param[7].buffer_length = strlen(c_street_2);
+		param[8].buffer_type = MYSQL_TYPE_STRING;
+		param[8].buffer = c_city;
+		param[8].buffer_length = strlen(c_city);
+		param[9].buffer_type = MYSQL_TYPE_STRING;
+		param[9].buffer = c_state;
+		param[9].buffer_length = strlen(c_state);
+		param[10].buffer_type = MYSQL_TYPE_STRING;
+		param[10].buffer = c_zip;
+		param[10].buffer_length = strlen(c_zip);
+		param[11].buffer_type = MYSQL_TYPE_STRING;
+		param[11].buffer = c_phone;
+		param[11].buffer_length = strlen(c_phone);
+		param[12].buffer_type = MYSQL_TYPE_STRING;
+		param[12].buffer = timestamp;
+		param[12].buffer_length = strlen(timestamp);
+		param[13].buffer_type = MYSQL_TYPE_STRING;
+		param[13].buffer = c_credit;
+		param[13].buffer_length = strlen(c_credit);
+		param[14].buffer_type = MYSQL_TYPE_LONG;
+		param[14].buffer = &c_credit_lim;
+		param[15].buffer_type = MYSQL_TYPE_FLOAT;
+		param[15].buffer = &c_discount;
+		param[16].buffer_type = MYSQL_TYPE_FLOAT;
+		param[16].buffer = &c_balance;
+		param[17].buffer_type = MYSQL_TYPE_STRING;
+		param[17].buffer = c_data;
+		param[17].buffer_length = strlen(c_data);
+		if( mysql_stmt_bind_param(stmt[4], param) ) goto sqlerr;
+		if( try_stmt_execute(stmt[4]) ) goto retry;
+
+		h_amount = 10.0;
+
+		h_data[ MakeAlphaString(12, 24, h_data) ] = 0;
+
+		/*EXEC SQL INSERT INTO
+		                history
+		                values(:c_id,:c_d_id,:c_w_id,
+				       :c_d_id,:c_w_id, :timestamp,
+				       :h_amount,:h_data);*/
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 8); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_w_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &c_d_id;
+		param[4].buffer_type = MYSQL_TYPE_LONG;
+		param[4].buffer = &c_w_id;
+		param[5].buffer_type = MYSQL_TYPE_STRING;
+		param[5].buffer = timestamp;
+		param[5].buffer_length = strlen(timestamp);
+		param[6].buffer_type = MYSQL_TYPE_FLOAT;
+		param[6].buffer = &h_amount;
+		param[7].buffer_type = MYSQL_TYPE_STRING;
+		param[7].buffer = h_data;
+		param[7].buffer_length = strlen(h_data);
+		if( mysql_stmt_bind_param(stmt[5], param) ) goto sqlerr;
+		if( try_stmt_execute(stmt[5]) ) goto retry;
+
+		if (option_debug)
+			printf("CID = %ld, LST = %s, P# = %s\n",
+			       c_id, c_last, c_phone);
+		if (!(c_id % 100)) {
+ 			printf(".");
+			fflush(stdout);
+			if (!(c_id % 1000))
+				printf(" %ld\n", c_id);
+		}
+	}
+	/* EXEC SQL COMMIT WORK; */
+	if( mysql_commit(mysql) ) goto sqlerr;
+	printf("Customer Done.\n");
+
+	return;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      Orders | DESCRIPTION |      Loads the Orders table |
+ * Also loads the Order_Line table on the fly | ARGUMENTS |      w_id -
+ * warehouse id
+ * +==================================================================
+ */
+void 
+Orders(d_id, w_id)
+	int             d_id, w_id;
+{
+
+	int             o_id;
+	int             o_c_id;
+	int             o_d_id;
+	int             o_w_id;
+	int             o_carrier_id;
+	int             o_ol_cnt;
+	int             ol;
+	int             ol_i_id;
+	int             ol_supply_w_id;
+	int             ol_quantity;
+	float           ol_amount;
+	char            ol_dist_info[25];
+	float           i_price;
+	float           c_discount;
+	float           tmp_float;
+    int             retried = 0;
+
+	MYSQL_BIND    param[10];
+
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+	printf("Loading Orders for D=%ld, W= %ld\n", d_id, w_id);
+	o_d_id = d_id;
+	o_w_id = w_id;
+retry:
+    if (retried)
+        printf("Retrying ...\n");
+    retried = 1;
+	InitPermutation();	/* initialize permutation of customer numbers */
+	for (o_id = 1; o_id <= ORD_PER_DIST; o_id++) {
+
+		/* Generate Order Data */
+		o_c_id = GetPermutation();
+		o_carrier_id = RandomNumber(1L, 10L);
+		o_ol_cnt = RandomNumber(5L, 15L);
+
+		if (o_id > 2100) {	/* the last 900 orders have not been
+					 * delivered) */
+		    /*EXEC SQL INSERT INTO
+			                orders
+			                values(:o_id,:o_d_id,:o_w_id,:o_c_id,
+					       :timestamp,
+					       NULL,:o_ol_cnt, 1);*/
+
+		    memset(param, 0, sizeof(MYSQL_BIND) * 6); /* initialize */
+		    param[0].buffer_type = MYSQL_TYPE_LONG;
+		    param[0].buffer = &o_id;
+		    param[1].buffer_type = MYSQL_TYPE_LONG;
+		    param[1].buffer = &o_d_id;
+		    param[2].buffer_type = MYSQL_TYPE_LONG;
+		    param[2].buffer = &o_w_id;
+		    param[3].buffer_type = MYSQL_TYPE_LONG;
+		    param[3].buffer = &o_c_id;
+		    param[4].buffer_type = MYSQL_TYPE_STRING;
+		    param[4].buffer = timestamp;
+		    param[4].buffer_length = strlen(timestamp);
+		    param[5].buffer_type = MYSQL_TYPE_LONG;
+		    param[5].buffer = &o_ol_cnt;
+		    if( mysql_stmt_bind_param(stmt[6], param) ) goto sqlerr;
+		    if( try_stmt_execute(stmt[6]) ) goto retry;
+
+		    /*EXEC SQL INSERT INTO
+			                new_orders
+			                values(:o_id,:o_d_id,:o_w_id);*/
+
+		    memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		    param[0].buffer_type = MYSQL_TYPE_LONG;
+		    param[0].buffer = &o_id;
+		    param[1].buffer_type = MYSQL_TYPE_LONG;
+		    param[1].buffer = &o_d_id;
+		    param[2].buffer_type = MYSQL_TYPE_LONG;
+		    param[2].buffer = &o_w_id;
+		    if( mysql_stmt_bind_param(stmt[7], param) ) goto sqlerr;
+		    if( try_stmt_execute(stmt[7]) ) goto retry;
+
+		} else {
+		    /*EXEC SQL INSERT INTO
+			    orders
+			    values(:o_id,:o_d_id,:o_w_id,:o_c_id,
+				   :timestamp,
+				   :o_carrier_id,:o_ol_cnt, 1);*/
+
+		    memset(param, 0, sizeof(MYSQL_BIND) * 7); /* initialize */
+		    param[0].buffer_type = MYSQL_TYPE_LONG;
+		    param[0].buffer = &o_id;
+		    param[1].buffer_type = MYSQL_TYPE_LONG;
+		    param[1].buffer = &o_d_id;
+		    param[2].buffer_type = MYSQL_TYPE_LONG;
+		    param[2].buffer = &o_w_id;
+		    param[3].buffer_type = MYSQL_TYPE_LONG;
+		    param[3].buffer = &o_c_id;
+		    param[4].buffer_type = MYSQL_TYPE_STRING;
+		    param[4].buffer = timestamp;
+		    param[4].buffer_length = strlen(timestamp);
+		    param[5].buffer_type = MYSQL_TYPE_LONG;
+		    param[5].buffer = &o_carrier_id;
+		    param[6].buffer_type = MYSQL_TYPE_LONG;
+		    param[6].buffer = &o_ol_cnt;
+		    if( mysql_stmt_bind_param(stmt[8], param) ) goto sqlerr;
+		    if( try_stmt_execute(stmt[8]) ) goto retry;
+
+		}
+
+
+		if (option_debug)
+			printf("OID = %ld, CID = %ld, DID = %ld, WID = %ld\n",
+			       o_id, o_c_id, o_d_id, o_w_id);
+
+		for (ol = 1; ol <= o_ol_cnt; ol++) {
+			/* Generate Order Line Data */
+			ol_i_id = RandomNumber(1L, MAXITEMS);
+			ol_supply_w_id = o_w_id;
+			ol_quantity = 5;
+			ol_amount = 0.0;
+
+			ol_dist_info[ MakeAlphaString(24, 24, ol_dist_info) ] = 0;
+
+			tmp_float = (float) (RandomNumber(10L, 10000L)) / 100.0;
+
+			if (o_id > 2100) {
+			    /*EXEC SQL INSERT INTO
+				                order_line
+				                values(:o_id,:o_d_id,:o_w_id,:ol,
+						       :ol_i_id,:ol_supply_w_id, NULL,
+						       :ol_quantity,:tmp_float,:ol_dist_info);*/
+
+			    memset(param, 0, sizeof(MYSQL_BIND) * 9); /* initialize */
+			    param[0].buffer_type = MYSQL_TYPE_LONG;
+			    param[0].buffer = &o_id;
+			    param[1].buffer_type = MYSQL_TYPE_LONG;
+			    param[1].buffer = &o_d_id;
+			    param[2].buffer_type = MYSQL_TYPE_LONG;
+			    param[2].buffer = &o_w_id;
+			    param[3].buffer_type = MYSQL_TYPE_LONG;
+			    param[3].buffer = &ol;
+			    param[4].buffer_type = MYSQL_TYPE_LONG;
+			    param[4].buffer = &ol_i_id;
+			    param[5].buffer_type = MYSQL_TYPE_LONG;
+			    param[5].buffer = &ol_supply_w_id;
+			    param[6].buffer_type = MYSQL_TYPE_LONG;
+			    param[6].buffer = &ol_quantity;
+			    param[7].buffer_type = MYSQL_TYPE_FLOAT;
+			    param[7].buffer = &tmp_float;
+			    param[8].buffer_type = MYSQL_TYPE_STRING;
+			    param[8].buffer = ol_dist_info;
+			    param[8].buffer_length = strlen(ol_dist_info);
+			    if( mysql_stmt_bind_param(stmt[9], param) ) goto sqlerr;
+			    if( try_stmt_execute(stmt[9]) ) goto retry;
+
+			} else {
+			    /*EXEC SQL INSERT INTO
+				    order_line
+				    values(:o_id,:o_d_id,:o_w_id,:ol,
+					   :ol_i_id,:ol_supply_w_id, 
+					   :timestamp,
+					   :ol_quantity,:ol_amount,:ol_dist_info);*/
+
+			    memset(param, 0, sizeof(MYSQL_BIND) * 10); /* initialize */
+			    param[0].buffer_type = MYSQL_TYPE_LONG;
+			    param[0].buffer = &o_id;
+			    param[1].buffer_type = MYSQL_TYPE_LONG;
+			    param[1].buffer = &o_d_id;
+			    param[2].buffer_type = MYSQL_TYPE_LONG;
+			    param[2].buffer = &o_w_id;
+			    param[3].buffer_type = MYSQL_TYPE_LONG;
+			    param[3].buffer = &ol;
+			    param[4].buffer_type = MYSQL_TYPE_LONG;
+			    param[4].buffer = &ol_i_id;
+			    param[5].buffer_type = MYSQL_TYPE_LONG;
+			    param[5].buffer = &ol_supply_w_id;
+			    param[6].buffer_type = MYSQL_TYPE_STRING;
+			    param[6].buffer = timestamp;
+			    param[6].buffer_length = strlen(timestamp);
+			    param[7].buffer_type = MYSQL_TYPE_LONG;
+			    param[7].buffer = &ol_quantity;
+			    param[8].buffer_type = MYSQL_TYPE_FLOAT;
+			    param[8].buffer = &ol_amount;
+			    param[9].buffer_type = MYSQL_TYPE_STRING;
+			    param[9].buffer = ol_dist_info;
+			    param[9].buffer_length = strlen(ol_dist_info);
+			    if( mysql_stmt_bind_param(stmt[10], param) ) goto sqlerr;
+			    if( try_stmt_execute(stmt[10]) ) goto retry;
+			}
+
+			if (option_debug)
+				printf("OL = %ld, IID = %ld, QUAN = %ld, AMT = %8.2f\n",
+				       ol, ol_i_id, ol_quantity, ol_amount);
+
+		}
+		if (!(o_id % 100)) {
+			printf(".");
+			fflush(stdout);
+
+ 			if (!(o_id % 1000))
+				printf(" %ld\n", o_id);
+		}
+	}
+	/*EXEC SQL COMMIT WORK;*/
+	if( mysql_commit(mysql) ) goto sqlerr;
+
+	printf("Orders Done.\n");
+	return;
+sqlerr:
+	Error(0);
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      MakeAddress() | DESCRIPTION |      Build an Address |
+ * ARGUMENTS
+ * +==================================================================
+ */
+void 
+MakeAddress(str1, str2, city, state, zip)
+	char           *str1;
+	char           *str2;
+	char           *city;
+	char           *state;
+	char           *zip;
+{
+	str1[ MakeAlphaString(10, 20, str1) ] = 0;	/* Street 1 */
+	str2[ MakeAlphaString(10, 20, str2) ] = 0;	/* Street 2 */
+	city[ MakeAlphaString(10, 20, city) ] = 0;	/* City */
+	state[ MakeAlphaString(2, 2, state) ] = 0;	/* State */
+	zip[ MakeNumberString(9, 9, zip) ] = 0;	/* Zip */
+}
+
+/*
+ * ==================================================================+ |
+ * ROUTINE NAME |      Error() | DESCRIPTION |      Handles an error from a
+ * SQL call. | ARGUMENTS
+ * +==================================================================
+ */
+void 
+Error(mysql_stmt)
+        MYSQL_STMT   *mysql_stmt;
+{
+    if(mysql_stmt) {
+	printf("\n%d, %s, %s", mysql_stmt_errno(mysql_stmt),
+	       mysql_stmt_sqlstate(mysql_stmt), mysql_stmt_error(mysql_stmt) );
+    }
+    printf("\n%d, %s, %s\n", mysql_errno(mysql), mysql_sqlstate(mysql), mysql_error(mysql) );
+
+    /*EXEC SQL WHENEVER SQLERROR CONTINUE;*/
+
+    /*EXEC SQL ROLLBACK WORK;*/
+    mysql_rollback(mysql);
+
+    /*EXEC SQL DISCONNECT;*/
+    mysql_close(mysql);
+
+	exit(-1);
+}

packages/tls/tpcc-mysql/src/main.c

+/*
+ * main.pc
+ * driver for the tpcc transactions
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <sys/time.h>
+#include <signal.h>
+#include <pthread.h>
+#include <fcntl.h>
+
+#include <mysql.h>
+
+#include "tpc.h"
+#include "trans_if.h"
+#include "spt_proc.h"
+#include "sequence.h"
+#include "rthist.h"
+#include "sb_percentile.h"
+
+/* Global SQL Variables */
+MYSQL **ctx;
+MYSQL_STMT ***stmt;
+
+#define DB_STRING_MAX 128
+#define MAX_CLUSTER_SIZE 128
+
+char connect_string[DB_STRING_MAX];
+
+char db_string[DB_STRING_MAX];
+char db_schemaid[DB_STRING_MAX];
+char db_host[DB_STRING_MAX];
+char db_socket[DB_STRING_MAX] = "";
+char db_user[DB_STRING_MAX];
+char db_password[DB_STRING_MAX];
+char report_file[DB_STRING_MAX]="";
+FILE *freport_file=NULL;
+char trx_file[DB_STRING_MAX]="";
+FILE *ftrx_file=NULL;
+
+int num_ware;
+int num_conn;
+int lampup_time;
+int measure_time;
+
+int num_node; /* number of servers that consists of cluster i.e. RAC (0:normal mode)*/
+#define NUM_NODE_MAX 8
+char node_string[NUM_NODE_MAX][DB_STRING_MAX];
+
+int time_count;
+int PRINT_INTERVAL=10;
+int multi_schema = 0;
+int multi_schema_offset = 0; 
+
+int success[5];
+int late[5];
+int retry[5];
+int failure[5];
+
+int* success2[5];
+int* late2[5];
+int* retry2[5];
+int* failure2[5];
+
+int success2_sum[5];
+int late2_sum[5];
+int retry2_sum[5];
+int failure2_sum[5];
+
+int prev_s[5];
+int prev_l[5];
+
+double max_rt[5];
+double total_rt[5];
+double cur_max_rt[5];
+
+double prev_total_rt[5];
+
+#define RTIME_NEWORD   5
+#define RTIME_PAYMENT  5
+#define RTIME_ORDSTAT  5
+#define RTIME_DELIVERY 80
+#define RTIME_SLEV     20
+
+int rt_limit[5] = {
+ RTIME_NEWORD,
+ RTIME_PAYMENT,
+ RTIME_ORDSTAT,
+ RTIME_DELIVERY,
+ RTIME_SLEV
+};
+
+sb_percentile_t local_percentile;
+
+int activate_transaction;
+int counting_on;
+
+long clk_tck;
+
+int is_local = 0; /* "1" mean local */
+int valuable_flg = 0; /* "1" mean valuable ratio */
+
+
+typedef struct
+{
+  int number;
+  int port;
+} thread_arg;
+int thread_main(thread_arg*);
+
+void alarm_handler(int signum);
+void alarm_dummy();
+
+
+int main( int argc, char *argv[] )
+{
+  int i, k, t_num, arg_offset, c;
+  long j;
+  float f;
+  pthread_t *t;
+  thread_arg *thd_arg;
+  timer_t timer;
+  struct itimerval itval;
+  struct sigaction  sigact;
+  int port= 3306;
+  int fd, seed;
+
+  printf("***************************************\n");
+  printf("*** ###easy### TPC-C Load Generator ***\n");
+  printf("***************************************\n");
+
+  /* initialize */
+  hist_init();
+  activate_transaction = 1;
+  counting_on = 0;
+
+  for ( i=0; i<5; i++ ){
+    success[i]=0;
+    late[i]=0;
+    retry[i]=0;
+    failure[i]=0;
+
+    prev_s[i]=0;
+    prev_l[i]=0;
+ 
+    prev_total_rt[i] = 0.0;
+    max_rt[i]=0.0;
+    total_rt[i]=0.0;
+  }
+
+  /* dummy initialize*/
+  num_ware = 1;
+  num_conn = 10;
+  lampup_time = 10;
+  measure_time = 20;
+  strcpy( db_string, "tpcc" );
+
+  /* number of node (default 0) */
+  num_node = 0;
+  arg_offset = 0;
+
+
+  clk_tck = sysconf(_SC_CLK_TCK);
+
+  /* Parse args */
+
+    while ( (c = getopt(argc, argv, "h:P:d:u:p:w:c:r:l:i:f:t:m:o:S:0:1:2:3:4:")) != -1) {
+        switch (c) {
+        case 'h':
+            printf ("option h with value '%s'\n", optarg);
+            strncpy(connect_string, optarg, DB_STRING_MAX);
+            break;
+        case 'd':
+            printf ("option d with value '%s'\n", optarg);
+            strncpy(db_string, optarg, DB_STRING_MAX);
+            break;
+        case 'u':
+            printf ("option u with value '%s'\n", optarg);
+            strncpy(db_user, optarg, DB_STRING_MAX);
+            break;
+        case 'p':
+            printf ("option p with value '%s'\n", optarg);
+            strncpy(db_password, optarg, DB_STRING_MAX);
+            break;
+        case 'f':
+            printf ("option f with value '%s'\n", optarg);
+            strncpy(report_file, optarg, DB_STRING_MAX);
+            break;
+        case 't':
+            printf ("option t with value '%s'\n", optarg);
+            strncpy(trx_file, optarg, DB_STRING_MAX);
+            break;
+        case 'w':
+            printf ("option w with value '%s'\n", optarg);
+            num_ware = atoi(optarg);
+            break;
+        case 'c':
+            printf ("option c with value '%s'\n", optarg);
+            num_conn = atoi(optarg);
+            break;
+        case 'r':
+            printf ("option r with value '%s'\n", optarg);
+            lampup_time = atoi(optarg);
+            break;
+        case 'l':
+            printf ("option l with value '%s'\n", optarg);
+            measure_time = atoi(optarg);
+            break;
+        case 'm':
+            printf ("option m (multiple schemas) with value '%s'\n", optarg);
+            multi_schema = atoi(optarg);
+            break;
+        case 'o':
+            printf ("option o (multiple schemas offset) with value '%s'\n", optarg);
+            multi_schema_offset = atoi(optarg);
+            break;
+        case 'i':
+            printf ("option i with value '%s'\n", optarg);
+            PRINT_INTERVAL = atoi(optarg);
+            break;
+        case 'P':
+            printf ("option P with value '%s'\n", optarg);
+            port = atoi(optarg);
+            break;
+        case 'S':
+            printf ("option S (socket) with value '%s'\n", optarg);
+            strncpy(db_socket, optarg, DB_STRING_MAX);
+            break;
+        case '0':
+            printf ("option 0 (response time limit for transaction 0) '%s'\n", optarg);
+            rt_limit[0] = atoi(optarg);
+            break;
+        case '1':
+            printf ("option 1 (response time limit for transaction 1) '%s'\n", optarg);
+            rt_limit[1] = atoi(optarg);
+            break;
+        case '2':
+            printf ("option 2 (response time limit for transaction 2) '%s'\n", optarg);
+            rt_limit[2] = atoi(optarg);
+            break;
+        case '3':
+            printf ("option 3 (response time limit for transaction 3) '%s'\n", optarg);
+            rt_limit[3] = atoi(optarg);
+            break;
+        case '4':
+            printf ("option 4 (response time limit for transaction 4) '%s'\n", optarg);
+            rt_limit[4] = atoi(optarg);
+            break;
+        case '?':
+    	    printf("Usage: tpcc_start -h server_host -P port -d database_name -u mysql_user -p mysql_password -w warehouses -c connections -r warmup_time -l running_time -i report_interval -f report_file -t trx_file\n");
+            exit(0);
+        default:
+            printf ("?? getopt returned character code 0%o ??\n", c);
+        }
+    }
+    if (optind < argc) {
+        printf ("non-option ARGV-elements: ");
+        while (optind < argc)
+            printf ("%s ", argv[optind++]);
+        printf ("\n");
+    }
+
+/*
+  if ((num_node == 0)&&(argc == 14)) { 
+    valuable_flg = 1;
+  }
+
+  if ((num_node == 0)&&(valuable_flg == 0)&&(argc != 9)) {
+    fprintf(stderr, "\n usage: tpcc_start [server] [DB] [user] [pass] [warehouse] [connection] [rampup] [measure]\n");
+    exit(1);
+  }
+
+  if ( strlen(argv[1]) >= DB_STRING_MAX ) {
+    fprintf(stderr, "\n server phrase is too long\n");
+    exit(1);
+  }
+  if ( strlen(argv[2]) >= DB_STRING_MAX ) {
+    fprintf(stderr, "\n DBname phrase is too long\n");
+    exit(1);
+  }
+  if ( strlen(argv[3]) >= DB_STRING_MAX ) {
+    fprintf(stderr, "\n user phrase is too long\n");
+    exit(1);
+  }
+  if ( strlen(argv[4]) >= DB_STRING_MAX ) {
+    fprintf(stderr, "\n pass phrase is too long\n");
+    exit(1);
+  }
+  if ((num_ware = atoi(argv[5 + arg_offset])) <= 0) {
+    fprintf(stderr, "\n expecting positive number of warehouses\n");
+    exit(1);
+  }
+  if ((num_conn = atoi(argv[6 + arg_offset])) <= 0) {
+    fprintf(stderr, "\n expecting positive number of connections\n");
+    exit(1);
+  }
+  if ((lampup_time = atoi(argv[7 + arg_offset])) < 0) {
+    fprintf(stderr, "\n expecting positive number of lampup_time [sec]\n");
+    exit(1);
+  }
+  if ((measure_time = atoi(argv[8 + arg_offset])) < 0) {
+    fprintf(stderr, "\n expecting positive number of measure_time [sec]\n");
+    exit(1);
+  }
+
+  if (parse_host_get_port(&port, argv[1]) < 0) {
+      fprintf(stderr, "cannot prase the host: %s\n", argv[1]);
+      exit(1);
+  }
+  strcpy( db_string, argv[2] );
+  strcpy( db_user, argv[3] );
+  strcpy( db_password, argv[4] );
+*/
+
+  if(strcmp(db_string,"l")==0){
+    is_local = 1;
+  }else{
+    is_local = 0;
+  }
+
+  if(valuable_flg==1){
+    if( (atoi(argv[9 + arg_offset]) < 0)||(atoi(argv[10 + arg_offset]) < 0)||(atoi(argv[11 + arg_offset]) < 0)
+	||(atoi(argv[12 + arg_offset]) < 0)||(atoi(argv[13 + arg_offset]) < 0) ) {
+      fprintf(stderr, "\n expecting positive number of ratio parameters\n");
+      exit(1);
+    }
+  }
+
+  if( num_node > 0 ){
+    if( num_ware % num_node != 0 ){
+      fprintf(stderr, "\n [warehouse] value must be devided by [num_node].\n");
+      exit(1);
+    }
+    if( num_conn % num_node != 0 ){
+      fprintf(stderr, "\n [connection] value must be devided by [num_node].\n");
+      exit(1);
+    }
+  }
+
+  if ( strlen(report_file) > 0 ) {
+    freport_file=fopen(report_file,"w+");
+  }
+
+  if ( strlen(trx_file) > 0 ) {
+    ftrx_file=fopen(trx_file,"w+");
+  }
+
+
+  printf("<Parameters>\n");
+  if(is_local==0) {
+    printf("     [server]: ");
+      printf("%s",  connect_string);
+    printf("\n");
+  }
+  if(is_local==0)printf("     [port]: %d\n", port);
+  printf("     [DBname]: %s\n", db_string);
+  printf("       [user]: %s\n", db_user);
+  printf("       [pass]: %s\n", db_password);
+
+  printf("  [warehouse]: %d\n", num_ware);
+  printf(" [connection]: %d\n", num_conn);
+  printf("     [rampup]: %d (sec.)\n", lampup_time);
+  printf("    [measure]: %d (sec.)\n", measure_time);
+
+  if(valuable_flg==1){
+    printf("      [ratio]: %d:%d:%d:%d:%d\n", atoi(argv[9 + arg_offset]), atoi(argv[10 + arg_offset]),
+	   atoi(argv[11 + arg_offset]), atoi(argv[12 + arg_offset]), atoi(argv[13 + arg_offset]) );
+  }
+
+  /* alarm initialize */
+  time_count = 0;
+  itval.it_interval.tv_sec = PRINT_INTERVAL;
+  itval.it_interval.tv_usec = 0;
+  itval.it_value.tv_sec = PRINT_INTERVAL;
+  itval.it_value.tv_usec = 0;
+  sigact.sa_handler = alarm_handler;
+  sigact.sa_flags = 0;
+  sigemptyset(&sigact.sa_mask);
+
+  /* setup handler&timer */
+  if( sigaction( SIGALRM, &sigact, NULL ) == -1 ) {
+    fprintf(stderr, "error in sigaction()\n");
+    exit(1);
+  }
+
+  fd = open("/dev/urandom", O_RDONLY);
+  if (fd == -1) {
+    fd = open("/dev/random", O_RDONLY);
+    if (fd == -1) {
+      struct timeval  tv;
+      gettimeofday(&tv, NULL);
+      seed = (tv.tv_sec ^ tv.tv_usec) * tv.tv_sec * tv.tv_usec ^ tv.tv_sec;
+    }else{
+      read(fd, &seed, sizeof(seed));
+      close(fd);
+    }
+  }else{
+    read(fd, &seed, sizeof(seed));
+    close(fd);
+  }
+  SetSeed(seed);
+
+  if(valuable_flg==0){
+    seq_init(10,10,1,1,1); /* normal ratio */
+  }else{
+    seq_init( atoi(argv[9 + arg_offset]), atoi(argv[10 + arg_offset]), atoi(argv[11 + arg_offset]),
+	      atoi(argv[12 + arg_offset]), atoi(argv[13 + arg_offset]) );
+  }
+
+  /* set up each counter */
+  for ( i=0; i<5; i++ ){
+      success2[i] = malloc( sizeof(int) * num_conn );
+      late2[i] = malloc( sizeof(int) * num_conn );
+      retry2[i] = malloc( sizeof(int) * num_conn );
+      failure2[i] = malloc( sizeof(int) * num_conn );
+      for ( k=0; k<num_conn; k++ ){
+	  success2[i][k] = 0;
+	  late2[i][k] = 0;
+	  retry2[i][k] = 0;
+	  failure2[i][k] = 0;
+      }
+  }
+
+  if (sb_percentile_init(&local_percentile, 100000, 1.0, 1e13))
+    return NULL;
+
+  /* set up threads */
+
+  t = malloc( sizeof(pthread_t) * num_conn );
+  if ( t == NULL ){
+    fprintf(stderr, "error at malloc(pthread_t)\n");
+    exit(1);
+  }
+  thd_arg = malloc( sizeof(thread_arg) * num_conn );
+  if( thd_arg == NULL ){
+    fprintf(stderr, "error at malloc(thread_arg)\n");
+    exit(1);
+  }
+
+  ctx = malloc( sizeof(MYSQL *) * num_conn );
+  stmt = malloc( sizeof(MYSQL_STMT **) * num_conn );
+  for( i=0; i < num_conn; i++ ){
+      stmt[i] = malloc( sizeof(MYSQL_STMT *) * 40 );
+  }
+
+  if ( ctx == NULL ){
+    fprintf(stderr, "error at malloc(sql_context)\n");
+    exit(1);
+  }
+
+  if (mysql_library_init(0, NULL, NULL)) {
+     fprintf(stderr, "could not initialize MySQL library\n");
+     exit(1);
+  }
+
+  /* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+  for( t_num=0; t_num < num_conn; t_num++ ){
+    thd_arg[t_num].port= port;
+    thd_arg[t_num].number= t_num;
+    pthread_create( &t[t_num], NULL, (void *)thread_main, (void *)&(thd_arg[t_num]) );
+  }
+
+
+  printf("\nRAMP-UP TIME.(%d sec.)\n",lampup_time);
+  fflush(stdout);
+  sleep(lampup_time);
+  printf("\nMEASURING START.\n\n");
+  fflush(stdout);
+
+  /* sleep(measure_time); */
+  /* start timer */
+
+#ifndef _SLEEP_ONLY_
+  if( setitimer(ITIMER_REAL, &itval, NULL) == -1 ) {
+    fprintf(stderr, "error in setitimer()\n");
+  }
+#endif
+
+  counting_on = 1;
+  /* wait signal */
+  for(i = 0; i < (measure_time / PRINT_INTERVAL); i++ ) {
+#ifndef _SLEEP_ONLY_
+    pause();
+#else
+    sleep(PRINT_INTERVAL);
+    alarm_dummy();
+#endif
+  }
+  counting_on = 0;
+
+#ifndef _SLEEP_ONLY_
+  /* stop timer */
+  itval.it_interval.tv_sec = 0;
+  itval.it_interval.tv_usec = 0;
+  itval.it_value.tv_sec = 0;
+  itval.it_value.tv_usec = 0;
+  if( setitimer(ITIMER_REAL, &itval, NULL) == -1 ) {
+    fprintf(stderr, "error in setitimer()\n");
+  }
+#endif
+
+  printf("\nSTOPPING THREADS");
+  activate_transaction = 0;
+
+  /* wait threads' ending and close connections*/
+  for( i=0; i < num_conn; i++ ){
+    pthread_join( t[i], NULL );
+  }
+
+  printf("\n");
+
+  free(ctx);
+  for( i=0; i < num_conn; i++ ){
+      free(stmt[i]);
+  }
+  free(stmt);
+
+  free(t);
+  free(thd_arg);
+
+  //hist_report();
+  if (freport_file != NULL)
+	  fclose(freport_file);
+
+  if (ftrx_file != NULL)
+	  fclose(ftrx_file);
+
+  printf("\n<Raw Results>\n");
+  for ( i=0; i<5; i++ ){
+    printf("  [%d] sc:%d lt:%d  rt:%d  fl:%d avg_rt: %.1f (%d)\n",
+           i, success[i], late[i], retry[i], failure[i],
+           total_rt[i] / (success[i] + late[i]), rt_limit[i]);
+  }
+  printf(" in %d sec.\n", (measure_time / PRINT_INTERVAL) * PRINT_INTERVAL);
+
+  printf("\n<Raw Results2(sum ver.)>\n");
+  for( i=0; i<5; i++ ){
+      success2_sum[i] = 0;
+      late2_sum[i] = 0;
+      retry2_sum[i] = 0;
+      failure2_sum[i] = 0;
+      for( k=0; k<num_conn; k++ ){
+	  success2_sum[i] += success2[i][k];
+	  late2_sum[i] += late2[i][k];
+	  retry2_sum[i] += retry2[i][k];
+	  failure2_sum[i] += failure2[i][k];
+      }
+  }
+  for ( i=0; i<5; i++ ){
+      printf("  [%d] sc:%d  lt:%d  rt:%d  fl:%d \n", i, success2_sum[i], late2_sum[i], retry2_sum[i], failure2_sum[i]);
+  }
+
+  printf("\n<Constraint Check> (all must be [OK])\n [transaction percentage]\n");
+  for ( i=0, j=0; i<5; i++ ){
+    j += (success[i] + late[i]);
+  }
+
+  f = 100.0 * (float)(success[1] + late[1])/(float)j;
+  printf("        Payment: %3.2f%% (>=43.0%%)",f);
+  if ( f >= 43.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)(success[2] + late[2])/(float)j;
+  printf("   Order-Status: %3.2f%% (>= 4.0%%)",f);
+  if ( f >= 4.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)(success[3] + late[3])/(float)j;
+  printf("       Delivery: %3.2f%% (>= 4.0%%)",f);
+  if ( f >= 4.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)(success[4] + late[4])/(float)j;
+  printf("    Stock-Level: %3.2f%% (>= 4.0%%)",f);
+  if ( f >= 4.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+
+  printf(" [response time (at least 90%% passed)]\n");
+  f = 100.0 * (float)success[0]/(float)(success[0] + late[0]);
+  printf("      New-Order: %3.2f%% ",f);
+  if ( f >= 90.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)success[1]/(float)(success[1] + late[1]);
+  printf("        Payment: %3.2f%% ",f);
+  if ( f >= 90.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)success[2]/(float)(success[2] + late[2]);
+  printf("   Order-Status: %3.2f%% ",f);
+  if ( f >= 90.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)success[3]/(float)(success[3] + late[3]);
+  printf("       Delivery: %3.2f%% ",f);
+  if ( f >= 90.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+  f = 100.0 * (float)success[4]/(float)(success[4] + late[4]);
+  printf("    Stock-Level: %3.2f%% ",f);
+  if ( f >= 90.0 ){
+    printf(" [OK]\n");
+  }else{
+    printf(" [NG] *\n");
+  }
+
+  printf("\n<TpmC>\n");
+  f = (float)(success[0] + late[0]) * 60.0
+    / (float)((measure_time / PRINT_INTERVAL) * PRINT_INTERVAL);
+  printf("                 %.3f TpmC\n",f);
+  exit(0);
+
+ sqlerr:
+  fprintf(stdout, "error at main\n");
+  error(ctx[i],0);
+  exit(1);
+
+}
+
+
+void alarm_handler(int signum)
+{
+  int i;
+  int s[5],l[5];
+  double rt90[5];
+  double trt[5];
+  double percentile_val;
+  double percentile_val99;
+
+  for( i=0; i<5; i++ ){
+    s[i] = success[i];
+    l[i] = late[i];
+    trt[i] = total_rt[i];
+    //rt90[i] = hist_ckp(i);
+  }
+
+  time_count += PRINT_INTERVAL;
+  percentile_val = sb_percentile_calculate(&local_percentile, 95);
+  percentile_val99 = sb_percentile_calculate(&local_percentile, 99);
+  sb_percentile_reset(&local_percentile);
+//  printf("%4d, %d:%.3f|%.3f(%.3f), %d:%.3f|%.3f(%.3f), %d:%.3f|%.3f(%.3f), %d:%.3f|%.3f(%.3f), %d:%.3f|%.3f(%.3f)\n",
+  printf("%4d, trx: %d, 95%: %.3f, 99%: %.3f, max_rt: %.3f, %d|%.3f, %d|%.3f, %d|%.3f, %d|%.3f\n",
+	 time_count,
+	 ( s[0] + l[0] - prev_s[0] - prev_l[0] ), percentile_val,percentile_val99,
+	 (double)cur_max_rt[0],
+	 ( s[1] + l[1] - prev_s[1] - prev_l[1] ),
+	 (double)cur_max_rt[1],
+	 ( s[2] + l[2] - prev_s[2] - prev_l[2] ),
+	 (double)cur_max_rt[2],
+	 ( s[3] + l[3] - prev_s[3] - prev_l[3] ),
+	 (double)cur_max_rt[3],
+	 ( s[4] + l[4] - prev_s[4] - prev_l[4] ),
+	 (double)cur_max_rt[4]
+	 );
+  fflush(stdout);
+
+  for( i=0; i<5; i++ ){
+    prev_s[i] = s[i];
+    prev_l[i] = l[i];
+    prev_total_rt[i] = trt[i];
+    cur_max_rt[i]=0.0;
+  }
+}
+
+void alarm_dummy()
+{
+  int i;
+  int s[5],l[5];
+  float rt90[5];
+
+  for( i=0; i<5; i++ ){
+    s[i] = success[i];
+    l[i] = late[i];
+    rt90[i] = hist_ckp(i);
+  }
+
+  time_count += PRINT_INTERVAL;
+  printf("%4d, %d(%d):%.2f, %d(%d):%.2f, %d(%d):%.2f, %d(%d):%.2f, %d(%d):%.2f\n",
+	 time_count,
+	 ( s[0] + l[0] - prev_s[0] - prev_l[0] ),
+	 ( l[0] - prev_l[0] ),
+	 rt90[0],
+	 ( s[1] + l[1] - prev_s[1] - prev_l[1] ),
+	 ( l[1] - prev_l[1] ),
+	 rt90[1],
+	 ( s[2] + l[2] - prev_s[2] - prev_l[2] ),
+	 ( l[2] - prev_l[2] ),
+	 rt90[2],
+	 ( s[3] + l[3] - prev_s[3] - prev_l[3] ),
+	 ( l[3] - prev_l[3] ),
+	 rt90[3],
+	 ( s[4] + l[4] - prev_s[4] - prev_l[4] ),
+	 ( l[4] - prev_l[4] ),
+	 rt90[4]
+	 );
+  fflush(stdout);
+
+  for( i=0; i<5; i++ ){
+    prev_s[i] = s[i];
+    prev_l[i] = l[i];
+  }
+}
+
+int thread_main (thread_arg* arg)
+{
+  int t_num= arg->number;
+  int port= arg->port;
+  int r,i;
+
+  char *db_string_ptr;
+  char db_string_full[DB_STRING_MAX*2];
+  MYSQL* resp;
+
+  db_string_ptr = db_string;
+
+  /* EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+  if(num_node > 0){ /* RAC mode */
+    db_string_ptr = node_string[((num_node * t_num)/num_conn)];
+  }
+
+  if (multi_schema) {
+	sprintf(db_string_full,"%s_%d",db_string, (t_num % multi_schema) + multi_schema_offset);
+  }else {
+	sprintf(db_string_full,"%s",db_string);
+  }
+
+  // printf("Using schema: %s\n", db_string_full);
+  
+  ctx[t_num] = mysql_init(NULL);
+
+  if(is_local==1){
+    /* exec sql connect :connect_string; */
+    resp = mysql_real_connect(ctx[t_num], "localhost", db_user, db_password, db_string_full, port, db_socket, 0);
+  }else{
+    /* exec sql connect :connect_string USING :db_string; */
+    resp = mysql_real_connect(ctx[t_num], connect_string, db_user, db_password, db_string_full, port, db_socket, 0);
+  }
+
+  if(resp) {
+    mysql_autocommit(ctx[t_num], 0);
+  } else {
+    mysql_close(ctx[t_num]);
+    goto sqlerr;
+  }
+
+  for(i=0;i<40;i++){
+      stmt[t_num][i] = mysql_stmt_init(ctx[t_num]);
+      if(!stmt[t_num][i]) goto sqlerr;
+  }
+
+  /* Prepare ALL of SQLs */
+  if( mysql_stmt_prepare(stmt[t_num][0], "SELECT c_discount, c_last, c_credit, w_tax FROM customer, warehouse WHERE w_id = ? AND c_w_id = w_id AND c_d_id = ? AND c_id = ?", 128) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][1], "SELECT d_next_o_id, d_tax FROM district WHERE d_id = ? AND d_w_id = ? FOR UPDATE", 80) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][2], "UPDATE district SET d_next_o_id = ? + 1 WHERE d_id = ? AND d_w_id = ?", 69) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][3], "INSERT INTO orders (o_id, o_d_id, o_w_id, o_c_id, o_entry_d, o_ol_cnt, o_all_local) VALUES(?, ?, ?, ?, ?, ?, ?)", 111) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][4], "INSERT INTO new_orders (no_o_id, no_d_id, no_w_id) VALUES (?,?,?)", 65) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][5], "SELECT i_price, i_name, i_data FROM item WHERE i_id = ?", 55) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][6], "SELECT s_quantity, s_data, s_dist_01, s_dist_02, s_dist_03, s_dist_04, s_dist_05, s_dist_06, s_dist_07, s_dist_08, s_dist_09, s_dist_10 FROM stock WHERE s_i_id = ? AND s_w_id = ? FOR UPDATE", 189) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][7], "UPDATE stock SET s_quantity = ? WHERE s_i_id = ? AND s_w_id = ?", 63) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][8], "INSERT INTO order_line (ol_o_id, ol_d_id, ol_w_id, ol_number, ol_i_id, ol_supply_w_id, ol_quantity, ol_amount, ol_dist_info) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?)", 159) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][9], "UPDATE warehouse SET w_ytd = w_ytd + ? WHERE w_id = ?", 53) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][10], "SELECT w_street_1, w_street_2, w_city, w_state, w_zip, w_name FROM warehouse WHERE w_id = ?", 91) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][11], "UPDATE district SET d_ytd = d_ytd + ? WHERE d_w_id = ? AND d_id = ?", 67) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][12], "SELECT d_street_1, d_street_2, d_city, d_state, d_zip, d_name FROM district WHERE d_w_id = ? AND d_id = ?", 105) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][13], "SELECT count(c_id) FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_last = ?", 79) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][14], "SELECT c_id FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_last = ? ORDER BY c_first", 89) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][15], "SELECT c_first, c_middle, c_last, c_street_1, c_street_2, c_city, c_state, c_zip, c_phone, c_credit, c_credit_lim, c_discount, c_balance, c_since FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_id = ? FOR UPDATE", 215) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][16], "SELECT c_data FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_id = ?", 72) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][17], "UPDATE customer SET c_balance = ?, c_data = ? WHERE c_w_id = ? AND c_d_id = ? AND c_id = ?", 90) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][18], "UPDATE customer SET c_balance = ? WHERE c_w_id = ? AND c_d_id = ? AND c_id = ?", 78) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][19], "INSERT INTO history(h_c_d_id, h_c_w_id, h_c_id, h_d_id, h_w_id, h_date, h_amount, h_data) VALUES(?, ?, ?, ?, ?, ?, ?, ?)", 120) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][20], "SELECT count(c_id) FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_last = ?", 79) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][21], "SELECT c_balance, c_first, c_middle, c_last FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_last = ? ORDER BY c_first", 121) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][22], "SELECT c_balance, c_first, c_middle, c_last FROM customer WHERE c_w_id = ? AND c_d_id = ? AND c_id = ?", 102) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][23], "SELECT o_id, o_entry_d, COALESCE(o_carrier_id,0) FROM orders WHERE o_w_id = ? AND o_d_id = ? AND o_c_id = ? AND o_id = (SELECT MAX(o_id) FROM orders WHERE o_w_id = ? AND o_d_id = ? AND o_c_id = ?)", 196) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][24], "SELECT ol_i_id, ol_supply_w_id, ol_quantity, ol_amount, ol_delivery_d FROM order_line WHERE ol_w_id = ? AND ol_d_id = ? AND ol_o_id = ?", 135) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][25], "SELECT COALESCE(MIN(no_o_id),0) FROM new_orders WHERE no_d_id = ? AND no_w_id = ?", 81) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][26], "DELETE FROM new_orders WHERE no_o_id = ? AND no_d_id = ? AND no_w_id = ?", 72) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][27], "SELECT o_c_id FROM orders WHERE o_id = ? AND o_d_id = ? AND o_w_id = ?", 70) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][28], "UPDATE orders SET o_carrier_id = ? WHERE o_id = ? AND o_d_id = ? AND o_w_id = ?", 79) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][29], "UPDATE order_line SET ol_delivery_d = ? WHERE ol_o_id = ? AND ol_d_id = ? AND ol_w_id = ?", 89) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][30], "SELECT SUM(ol_amount) FROM order_line WHERE ol_o_id = ? AND ol_d_id = ? AND ol_w_id = ?", 87) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][31], "UPDATE customer SET c_balance = c_balance + ? , c_delivery_cnt = c_delivery_cnt + 1 WHERE c_id = ? AND c_d_id = ? AND c_w_id = ?", 128) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][32], "SELECT d_next_o_id FROM district WHERE d_id = ? AND d_w_id = ?", 62) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][33], "SELECT DISTINCT ol_i_id FROM order_line WHERE ol_w_id = ? AND ol_d_id = ? AND ol_o_id < ? AND ol_o_id >= (? - 20)", 113) ) goto sqlerr;
+  if( mysql_stmt_prepare(stmt[t_num][34], "SELECT count(*) FROM stock WHERE s_w_id = ? AND s_i_id = ? AND s_quantity < ?", 77) ) goto sqlerr;
+
+  r = driver(t_num);
+
+  /* EXEC SQL COMMIT WORK; */
+  if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+
+  for(i=0;i<40;i++){
+      mysql_stmt_free_result(stmt[t_num][i]);
+      mysql_stmt_close(stmt[t_num][i]);
+  }
+
+  /* EXEC SQL DISCONNECT; */
+  mysql_close(ctx[t_num]);
+
+  printf(".");
+  fflush(stdout);
+
+  return(r);
+
+ sqlerr:
+  fprintf(stdout, "error at thread_main\n");
+  error(ctx[t_num],0);
+  return(0);
+
+}

packages/tls/tpcc-mysql/src/neword.c

+/*
+ * -*-C-*- 
+ * neword.pc 
+ * corresponds to A.1 in appendix A
+ */
+
+#include <stdio.h>
+#include <string.h>
+#include <time.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+#define pick_dist_info(ol_dist_info,ol_supply_w_id) \
+switch(ol_supply_w_id) { \
+case 1: strncpy(ol_dist_info, s_dist_01, 25); break; \
+case 2: strncpy(ol_dist_info, s_dist_02, 25); break; \
+case 3: strncpy(ol_dist_info, s_dist_03, 25); break; \
+case 4: strncpy(ol_dist_info, s_dist_04, 25); break; \
+case 5: strncpy(ol_dist_info, s_dist_05, 25); break; \
+case 6: strncpy(ol_dist_info, s_dist_06, 25); break; \
+case 7: strncpy(ol_dist_info, s_dist_07, 25); break; \
+case 8: strncpy(ol_dist_info, s_dist_08, 25); break; \
+case 9: strncpy(ol_dist_info, s_dist_09, 25); break; \
+case 10: strncpy(ol_dist_info, s_dist_10, 25); break; \
+}
+
+extern MYSQL **ctx;
+extern MYSQL_STMT ***stmt;
+
+extern FILE *ftrx_file;
+
+#define NNULL ((void *)0)
+
+/*
+ * the new order transaction
+ */
+int neword( int t_num,
+	    int w_id_arg,		/* warehouse id */
+	    int d_id_arg,		/* district id */
+	    int c_id_arg,		/* customer id */
+	    int o_ol_cnt_arg,	        /* number of items */
+	    int o_all_local_arg,	/* are all order lines local */
+	    int itemid[],		/* ids of items to be ordered */
+	    int supware[],		/* warehouses supplying items */
+	    int qty[]		        /* quantity of each item */
+)
+{
+
+	int            w_id = w_id_arg;
+	int            d_id = d_id_arg;
+	int            c_id = c_id_arg;
+	int            o_ol_cnt = o_ol_cnt_arg;
+	int            o_all_local = o_all_local_arg;
+	float           c_discount;
+	char            c_last[17];
+	char            c_credit[3];
+	float           w_tax;
+	int            d_next_o_id;
+	float           d_tax;
+	char            datetime[81];
+	int            o_id;
+	char            i_name[25];
+	float           i_price;
+	char            i_data[51];
+	int            ol_i_id;
+	int            s_quantity;
+	char            s_data[51];
+	char            s_dist_01[25];
+	char            s_dist_02[25];
+	char            s_dist_03[25];
+	char            s_dist_04[25];
+	char            s_dist_05[25];
+	char            s_dist_06[25];
+	char            s_dist_07[25];
+	char            s_dist_08[25];
+	char            s_dist_09[25];
+	char            s_dist_10[25];
+	char            ol_dist_info[25];
+	int            ol_supply_w_id;
+	float           ol_amount;
+	int            ol_number;
+	int            ol_quantity;
+
+	char            iname[MAX_NUM_ITEMS][MAX_ITEM_LEN];
+	char            bg[MAX_NUM_ITEMS];
+	float           amt[MAX_NUM_ITEMS];
+	float           price[MAX_NUM_ITEMS];
+	int            stock[MAX_NUM_ITEMS];
+	float           total = 0.0;
+
+	int            min_num;
+	int            i,j,tmp,swp;
+	int            ol_num_seq[MAX_NUM_ITEMS];
+
+	int             proceed = 0;
+ 	struct timespec tbuf1,tbuf_start;
+	clock_t clk1,clk_start;	
+
+
+	MYSQL_STMT*   mysql_stmt;
+        MYSQL_BIND    param[9];
+	MYSQL_BIND    column[12];
+
+	/* EXEC SQL WHENEVER NOT FOUND GOTO sqlerr;*/
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	/*EXEC SQL CONTEXT USE :ctx[t_num];*/
+
+        gettimestamp(datetime, STRFTIME_FORMAT, TIMESTAMP_LEN);
+	clk_start = clock_gettime(CLOCK_REALTIME, &tbuf_start );
+
+	proceed = 1;
+	/*EXEC_SQL SELECT c_discount, c_last, c_credit, w_tax
+		INTO :c_discount, :c_last, :c_credit, :w_tax
+	        FROM customer, warehouse
+	        WHERE w_id = :w_id 
+		AND c_w_id = w_id 
+		AND c_d_id = :d_id 
+		AND c_id = :c_id;*/
+	mysql_stmt = stmt[t_num][0];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &w_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &c_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+	memset(column, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_FLOAT;
+	column[0].buffer = &c_discount;
+	column[1].buffer_type = MYSQL_TYPE_STRING;
+	column[1].buffer = c_last;
+	column[1].buffer_length = sizeof(c_last);
+	column[2].buffer_type = MYSQL_TYPE_STRING;
+	column[2].buffer = c_credit;
+	column[2].buffer_length = sizeof(c_credit);
+	column[3].buffer_type = MYSQL_TYPE_FLOAT;
+	column[3].buffer = &w_tax;
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+	switch( mysql_stmt_fetch(mysql_stmt) ) {
+	    case 0: //SUCCESS
+	    case MYSQL_DATA_TRUNCATED:
+		break;
+	    case 1: //ERROR
+	    case MYSQL_NO_DATA: //NO MORE DATA
+	    default:
+		mysql_stmt_free_result(mysql_stmt);
+		goto sqlerr;
+	}
+	mysql_stmt_free_result(mysql_stmt);
+
+
+#ifdef DEBUG
+	printf("n %d\n",proceed);
+#endif
+
+	proceed = 2;
+	/*EXEC_SQL SELECT d_next_o_id, d_tax INTO :d_next_o_id, :d_tax
+	        FROM district
+	        WHERE d_id = :d_id
+		AND d_w_id = :w_id
+		FOR UPDATE;*/
+	mysql_stmt = stmt[t_num][1];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &d_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+	memset(column, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_LONG;
+	column[0].buffer = &d_next_o_id;
+	column[1].buffer_type = MYSQL_TYPE_FLOAT;
+	column[1].buffer = &d_tax;
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+	switch( mysql_stmt_fetch(mysql_stmt) ) {
+	    case 0: //SUCCESS
+	    case MYSQL_DATA_TRUNCATED:
+		break;
+	    case 1: //ERROR
+	    case MYSQL_NO_DATA: //NO MORE DATA
+	    default:
+		mysql_stmt_free_result(mysql_stmt);
+		goto sqlerr;
+	}
+	mysql_stmt_free_result(mysql_stmt);
+
+
+	proceed = 3;
+	/*EXEC_SQL UPDATE district SET d_next_o_id = :d_next_o_id + 1
+	        WHERE d_id = :d_id 
+		AND d_w_id = :w_id;*/
+	mysql_stmt = stmt[t_num][2];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &d_next_o_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	o_id = d_next_o_id;
+
+#ifdef DEBUG
+	printf("n %d\n",proceed);
+#endif
+
+	proceed = 4;
+	/*EXEC_SQL INSERT INTO orders (o_id, o_d_id, o_w_id, o_c_id,
+			             o_entry_d, o_ol_cnt, o_all_local)
+		VALUES(:o_id, :d_id, :w_id, :c_id, 
+		       :datetime,
+                       :o_ol_cnt, :o_all_local);*/
+	mysql_stmt = stmt[t_num][3];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 7); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &o_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &w_id;
+	param[3].buffer_type = MYSQL_TYPE_LONG;
+	param[3].buffer = &c_id;
+	param[4].buffer_type = MYSQL_TYPE_STRING;
+	param[4].buffer = datetime;
+	param[4].buffer_length = strlen(datetime);
+	param[5].buffer_type = MYSQL_TYPE_LONG;
+	param[5].buffer = &o_ol_cnt;
+	param[6].buffer_type = MYSQL_TYPE_LONG;
+	param[6].buffer = &o_all_local;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+#ifdef DEBUG
+	printf("n %d\n",proceed);
+#endif
+
+	proceed = 5;
+	/* EXEC_SQL INSERT INTO new_orders (no_o_id, no_d_id, no_w_id)
+	   VALUES (:o_id,:d_id,:w_id); */
+	mysql_stmt = stmt[t_num][4];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &o_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	/* sort orders to avoid DeadLock */
+	for (i = 0; i < o_ol_cnt; i++) {
+		ol_num_seq[i]=i;
+	}
+	for (i = 0; i < (o_ol_cnt - 1); i++) {
+		tmp = (MAXITEMS + 1) * supware[ol_num_seq[i]] + itemid[ol_num_seq[i]];
+		min_num = i;
+		for ( j = i+1; j < o_ol_cnt; j++) {
+		  if ( (MAXITEMS + 1) * supware[ol_num_seq[j]] + itemid[ol_num_seq[j]] < tmp ){
+		    tmp = (MAXITEMS + 1) * supware[ol_num_seq[j]] + itemid[ol_num_seq[j]];
+		    min_num = j;
+		  }
+		}
+		if ( min_num != i ){
+		  swp = ol_num_seq[min_num];
+		  ol_num_seq[min_num] = ol_num_seq[i];
+		  ol_num_seq[i] = swp;
+		}
+	}
+
+
+	for (ol_number = 1; ol_number <= o_ol_cnt; ol_number++) {
+		ol_supply_w_id = supware[ol_num_seq[ol_number - 1]];
+		ol_i_id = itemid[ol_num_seq[ol_number - 1]];
+		ol_quantity = qty[ol_num_seq[ol_number - 1]];
+
+		/* EXEC SQL WHENEVER NOT FOUND GOTO invaliditem; */
+		proceed = 6;
+		/*EXEC_SQL SELECT i_price, i_name, i_data
+			INTO :i_price, :i_name, :i_data
+		        FROM item
+		        WHERE i_id = :ol_i_id;*/
+		mysql_stmt = stmt[t_num][5];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &ol_i_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_FLOAT;
+		column[0].buffer = &i_price;
+		column[1].buffer_type = MYSQL_TYPE_STRING;
+		column[1].buffer = i_name;
+		column[1].buffer_length = sizeof(i_name);
+		column[2].buffer_type = MYSQL_TYPE_STRING;
+		column[2].buffer = i_data;
+		column[2].buffer_length = sizeof(i_data);
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+		    case MYSQL_DATA_TRUNCATED:
+			break;
+
+		    case MYSQL_NO_DATA: //NO MORE DATA
+			mysql_stmt_free_result(mysql_stmt);
+			goto invaliditem;
+
+		    case 1: //ERROR
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+		mysql_stmt_free_result(mysql_stmt);
+
+
+		price[ol_num_seq[ol_number - 1]] = i_price;
+		strncpy(iname[ol_num_seq[ol_number - 1]], i_name, 25);
+
+		/* EXEC SQL WHENEVER NOT FOUND GOTO sqlerr; */
+
+#ifdef DEBUG
+		printf("n %d\n",proceed);
+#endif
+
+		proceed = 7;
+		/*EXEC_SQL SELECT s_quantity, s_data, s_dist_01, s_dist_02,
+		                s_dist_03, s_dist_04, s_dist_05, s_dist_06,
+		                s_dist_07, s_dist_08, s_dist_09, s_dist_10
+			INTO :s_quantity, :s_data, :s_dist_01, :s_dist_02,
+		             :s_dist_03, :s_dist_04, :s_dist_05, :s_dist_06,
+		             :s_dist_07, :s_dist_08, :s_dist_09, :s_dist_10
+		        FROM stock
+		        WHERE s_i_id = :ol_i_id 
+			AND s_w_id = :ol_supply_w_id
+			FOR UPDATE;*/
+		mysql_stmt = stmt[t_num][6];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &ol_i_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &ol_supply_w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 12); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_LONG;
+		column[0].buffer = &s_quantity;
+		column[1].buffer_type = MYSQL_TYPE_STRING;
+		column[1].buffer = s_data;
+		column[1].buffer_length = sizeof(s_data);
+		column[2].buffer_type = MYSQL_TYPE_STRING;
+		column[2].buffer = s_dist_01;
+		column[2].buffer_length = sizeof(s_dist_01);
+		column[3].buffer_type = MYSQL_TYPE_STRING;
+		column[3].buffer = s_dist_02;
+		column[3].buffer_length = sizeof(s_dist_02);
+		column[4].buffer_type = MYSQL_TYPE_STRING;
+		column[4].buffer = s_dist_03;
+		column[4].buffer_length = sizeof(s_dist_03);
+		column[5].buffer_type = MYSQL_TYPE_STRING;
+		column[5].buffer = s_dist_04;
+		column[5].buffer_length = sizeof(s_dist_04);
+		column[6].buffer_type = MYSQL_TYPE_STRING;
+		column[6].buffer = s_dist_05;
+		column[6].buffer_length = sizeof(s_dist_05);
+		column[7].buffer_type = MYSQL_TYPE_STRING;
+		column[7].buffer = s_dist_06;
+		column[7].buffer_length = sizeof(s_dist_06);
+		column[8].buffer_type = MYSQL_TYPE_STRING;
+		column[8].buffer = s_dist_07;
+		column[8].buffer_length = sizeof(s_dist_07);
+		column[9].buffer_type = MYSQL_TYPE_STRING;
+		column[9].buffer = s_dist_08;
+		column[9].buffer_length = sizeof(s_dist_08);
+		column[10].buffer_type = MYSQL_TYPE_STRING;
+		column[10].buffer = s_dist_09;
+		column[10].buffer_length = sizeof(s_dist_09);
+		column[11].buffer_type = MYSQL_TYPE_STRING;
+		column[11].buffer = s_dist_10;
+		column[11].buffer_length = sizeof(s_dist_10);
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+			break;
+		    case 1: //ERROR
+		    case MYSQL_NO_DATA: //NO MORE DATA
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+		mysql_stmt_free_result(mysql_stmt);
+
+
+		pick_dist_info(ol_dist_info, d_id);	/* pick correct
+							 * s_dist_xx */
+
+		stock[ol_num_seq[ol_number - 1]] = s_quantity;
+
+		if ((strstr(i_data, "original") != NULL) &&
+		    (strstr(s_data, "original") != NULL))
+			bg[ol_num_seq[ol_number - 1]] = 'B';
+		else
+			bg[ol_num_seq[ol_number - 1]] = 'G';
+
+		if (s_quantity > ol_quantity)
+			s_quantity = s_quantity - ol_quantity;
+		else
+			s_quantity = s_quantity - ol_quantity + 91;
+
+#ifdef DEBUG
+		printf("n %d\n",proceed);
+#endif
+
+		proceed = 8;
+		/*EXEC_SQL UPDATE stock SET s_quantity = :s_quantity
+		        WHERE s_i_id = :ol_i_id 
+			AND s_w_id = :ol_supply_w_id;*/
+		mysql_stmt = stmt[t_num][7];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &s_quantity;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &ol_i_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &ol_supply_w_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+		ol_amount = ol_quantity * i_price * (1 + w_tax + d_tax) * (1 - c_discount);
+		amt[ol_num_seq[ol_number - 1]] = ol_amount;
+		total += ol_amount;
+
+#ifdef DEBUG
+		printf("n %d\n",proceed);
+#endif
+
+		proceed = 9;
+		/*EXEC_SQL INSERT INTO order_line (ol_o_id, ol_d_id, ol_w_id, 
+						 ol_number, ol_i_id, 
+						 ol_supply_w_id, ol_quantity, 
+						 ol_amount, ol_dist_info)
+			VALUES (:o_id, :d_id, :w_id, :ol_number, :ol_i_id,
+				:ol_supply_w_id, :ol_quantity, :ol_amount,
+				:ol_dist_info);*/
+		mysql_stmt = stmt[t_num][8];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 9); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &o_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &w_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &ol_number;
+		param[4].buffer_type = MYSQL_TYPE_LONG;
+		param[4].buffer = &ol_i_id;
+		param[5].buffer_type = MYSQL_TYPE_LONG;
+		param[5].buffer = &ol_supply_w_id;
+		param[6].buffer_type = MYSQL_TYPE_LONG;
+		param[6].buffer = &ol_quantity;
+		param[7].buffer_type = MYSQL_TYPE_FLOAT;
+		param[7].buffer = &ol_amount;
+		param[8].buffer_type = MYSQL_TYPE_STRING;
+		param[8].buffer = ol_dist_info;
+		param[8].buffer_length = strlen(ol_dist_info);
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+	}			/* End Order Lines */
+
+#ifdef DEBUG
+	printf("insert 3\n");
+	fflush(stdout);
+#endif
+
+	/*EXEC_SQL COMMIT WORK;*/
+	if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+	clk1 = clock_gettime(CLOCK_REALTIME, &tbuf1 );
+	if (ftrx_file) {
+		fprintf(ftrx_file,"t_num: %d finish: %lu %lu start: %lu %lu\n",t_num, tbuf1.tv_sec, tbuf1.tv_nsec,
+			tbuf_start.tv_sec, tbuf_start.tv_nsec);
+	}
+
+	return (1);
+
+invaliditem:
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+
+	/* printf("Item number is not valid\n"); */
+	return (1); /* OK? */
+
+sqlerr:
+	fprintf(stderr,"neword %d:%d\n",t_num,proceed);
+      	error(ctx[t_num],mysql_stmt);
+	/*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+sqlerrerr:
+	return (0);
+}
+

packages/tls/tpcc-mysql/src/ordstat.c

+/*
+ * -*-C-*- 
+ * ordstat.pc 
+ * corresponds to A.3 in appendix A
+ */
+
+#include <string.h>
+#include <stdio.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+extern MYSQL **ctx;
+extern MYSQL_STMT ***stmt;
+
+/*
+ * the order status transaction
+ */
+int ordstat( int t_num,
+	     int w_id_arg,		/* warehouse id */
+	     int d_id_arg,		/* district id */
+	     int byname,		/* select by c_id or c_last? */
+	     int c_id_arg,		/* customer id */
+	     char c_last_arg[]	        /* customer last name, format? */
+)
+{
+	int            w_id = w_id_arg;
+	int            d_id = d_id_arg;
+	int            c_id = c_id_arg;
+	int            c_d_id = d_id;
+	int            c_w_id = w_id;
+	char            c_first[17];
+	char            c_middle[3];
+	char            c_last[17];
+	float           c_balance;
+	int            o_id;
+	char            o_entry_d[25];
+	int            o_carrier_id;
+	int            ol_i_id;
+	int            ol_supply_w_id;
+	int            ol_quantity;
+	float           ol_amount;
+	char            ol_delivery_d[25];
+	int            namecnt;
+
+	int             n;
+	int             proceed = 0;
+
+	MYSQL_STMT*   mysql_stmt;
+        MYSQL_BIND    param[6];
+        MYSQL_BIND    column[5];
+
+	/*EXEC SQL WHENEVER NOT FOUND GOTO sqlerr;*/
+	/*EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	if (byname) {
+		strcpy(c_last, c_last_arg);
+		proceed = 1;
+		/*EXEC_SQL SELECT count(c_id)
+			INTO :namecnt
+		        FROM customer
+			WHERE c_w_id = :c_w_id
+			AND c_d_id = :c_d_id
+		        AND c_last = :c_last;*/
+		mysql_stmt = stmt[t_num][20];
+
+                memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+                param[0].buffer_type = MYSQL_TYPE_LONG;
+                param[0].buffer = &c_w_id;
+                param[1].buffer_type = MYSQL_TYPE_LONG;
+                param[1].buffer = &c_d_id;
+                param[2].buffer_type = MYSQL_TYPE_STRING;
+                param[2].buffer = c_last;
+                param[2].buffer_length = strlen(c_last);
+                if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+                if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+                if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+                memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+                column[0].buffer_type = MYSQL_TYPE_LONG;
+                column[0].buffer = &namecnt;
+                if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+                switch( mysql_stmt_fetch(mysql_stmt) ) {
+                    case 0: //SUCCESS
+                        break;
+                    case 1: //ERROR
+                    case MYSQL_NO_DATA: //NO MORE DATA
+                    default:
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto sqlerr;
+                }
+                mysql_stmt_free_result(mysql_stmt);
+
+
+		proceed = 2;
+		/*EXEC_SQL DECLARE c_byname_o CURSOR FOR
+		        SELECT c_balance, c_first, c_middle, c_last
+		        FROM customer
+		        WHERE c_w_id = :c_w_id
+			AND c_d_id = :c_d_id
+			AND c_last = :c_last
+			ORDER BY c_first;
+		proceed = 3;
+		EXEC_SQL OPEN c_byname_o;*/
+		mysql_stmt = stmt[t_num][21];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+                param[0].buffer = &c_w_id;
+                param[1].buffer_type = MYSQL_TYPE_LONG;
+                param[1].buffer = &c_d_id;
+                param[2].buffer_type = MYSQL_TYPE_STRING;
+                param[2].buffer = c_last;
+                param[2].buffer_length = strlen(c_last);
+                if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+                if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+                memset(column, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_FLOAT;
+		column[0].buffer = &c_balance;
+		column[1].buffer_type = MYSQL_TYPE_STRING;
+		column[1].buffer = c_first;
+		column[1].buffer_length = sizeof(c_first);
+		column[2].buffer_type = MYSQL_TYPE_STRING;
+		column[2].buffer = c_middle;
+		column[2].buffer_length = sizeof(c_middle);
+		column[3].buffer_type = MYSQL_TYPE_STRING;
+		column[3].buffer = c_last;
+		column[3].buffer_length = sizeof(c_last);
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+
+		if (namecnt % 2)
+			namecnt++;	/* Locate midpoint customer; */
+
+		for (n = 0; n < namecnt / 2; n++) {
+			proceed = 4;
+			/*EXEC_SQL FETCH c_byname_o
+			  INTO :c_balance, :c_first, :c_middle, :c_last;*/
+			switch( mysql_stmt_fetch(mysql_stmt) ) {
+			    case 0: //SUCCESS
+                            case MYSQL_DATA_TRUNCATED:
+				break;
+			    case 1: //ERROR
+			    case MYSQL_NO_DATA: //NO MORE DATA
+			    default:
+				mysql_stmt_free_result(mysql_stmt);
+				goto sqlerr;
+			}
+		}
+		proceed = 5;
+		/*EXEC_SQL CLOSE  c_byname_o;*/
+		mysql_stmt_free_result(mysql_stmt);
+
+
+	} else {		/* by number */
+		proceed = 6;
+		/*EXEC_SQL SELECT c_balance, c_first, c_middle, c_last
+			INTO :c_balance, :c_first, :c_middle, :c_last
+		        FROM customer
+		        WHERE c_w_id = :c_w_id
+			AND c_d_id = :c_d_id
+			AND c_id = :c_id;*/
+		mysql_stmt = stmt[t_num][22];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_w_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_FLOAT;
+		column[0].buffer = &c_balance;
+		column[1].buffer_type = MYSQL_TYPE_STRING;
+		column[1].buffer = c_first;
+		column[1].buffer_length = sizeof(c_first);
+		column[2].buffer_type = MYSQL_TYPE_STRING;
+		column[2].buffer = c_middle;
+		column[2].buffer_length = sizeof(c_middle);
+		column[3].buffer_type = MYSQL_TYPE_STRING;
+		column[3].buffer = c_last;
+		column[3].buffer_length = sizeof(c_last);
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+                    case MYSQL_DATA_TRUNCATED:
+			break;
+		    case 1: //ERROR
+		    case MYSQL_NO_DATA: //NO MORE DATA
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+		mysql_stmt_free_result(mysql_stmt);
+
+	}
+
+	/* find the most recent order for this customer */
+
+	proceed = 7;
+	/*EXEC_SQL SELECT o_id, o_entry_d, COALESCE(o_carrier_id,0)
+		INTO :o_id, :o_entry_d, :o_carrier_id
+	        FROM orders
+	        WHERE o_w_id = :c_w_id
+		AND o_d_id = :c_d_id
+		AND o_c_id = :c_id
+		AND o_id = (SELECT MAX(o_id)
+		    	    FROM orders
+		    	    WHERE o_w_id = :c_w_id
+		  	    AND o_d_id = :c_d_id
+		    	    AND o_c_id = :c_id);*/
+	mysql_stmt = stmt[t_num][23];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 6); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &c_w_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &c_d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &c_id;
+	param[3].buffer_type = MYSQL_TYPE_LONG;
+	param[3].buffer = &c_w_id;
+	param[4].buffer_type = MYSQL_TYPE_LONG;
+	param[4].buffer = &c_d_id;
+	param[5].buffer_type = MYSQL_TYPE_LONG;
+	param[5].buffer = &c_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+	memset(column, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_LONG;
+        column[0].buffer = &o_id;
+	column[1].buffer_type = MYSQL_TYPE_STRING;
+	column[1].buffer = o_entry_d;
+	column[1].buffer_length = sizeof(o_entry_d);
+	column[2].buffer_type = MYSQL_TYPE_LONG;
+        column[2].buffer = &o_carrier_id;
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+        switch( mysql_stmt_fetch(mysql_stmt) ) {
+            case 0: //SUCCESS
+                break;
+            case 1: //ERROR
+            case MYSQL_NO_DATA: //NO MORE DATA
+            default:
+                mysql_stmt_free_result(mysql_stmt);
+                goto sqlerr;
+        }
+        mysql_stmt_free_result(mysql_stmt);
+
+
+	/* find all the items in this order */
+	proceed = 8;
+	/*EXEC_SQL DECLARE c_items CURSOR FOR
+		SELECT ol_i_id, ol_supply_w_id, ol_quantity, ol_amount,
+                       ol_delivery_d
+		FROM order_line
+	        WHERE ol_w_id = :c_w_id
+		AND ol_d_id = :c_d_id
+		AND ol_o_id = :o_id;*/
+	mysql_stmt = stmt[t_num][24];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &c_w_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &c_d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &o_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+        memset(column, 0, sizeof(MYSQL_BIND) * 5); /* initialize */	
+	column[0].buffer_type = MYSQL_TYPE_LONG;
+        column[0].buffer = &ol_i_id;
+	column[1].buffer_type = MYSQL_TYPE_LONG;
+        column[1].buffer = &ol_supply_w_id;
+	column[2].buffer_type = MYSQL_TYPE_LONG;
+        column[2].buffer = &ol_quantity;
+	column[3].buffer_type = MYSQL_TYPE_FLOAT;
+        column[3].buffer = &ol_amount;
+	column[4].buffer_type = MYSQL_TYPE_STRING;
+        column[4].buffer = ol_delivery_d;
+        column[4].buffer_length = sizeof(ol_delivery_d);
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+
+	/*proceed = 9;
+	EXEC_SQL OPEN c_items;
+
+	EXEC SQL WHENEVER NOT FOUND GOTO done;*/
+
+	for (;;) {
+		proceed = 10;
+		/*EXEC_SQL FETCH c_items
+			INTO :ol_i_id, :ol_supply_w_id, :ol_quantity,
+			:ol_amount, :ol_delivery_d;*/
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+		    case MYSQL_DATA_TRUNCATED:
+			break;
+		    case MYSQL_NO_DATA: //NO MORE DATA
+			mysql_stmt_free_result(mysql_stmt);
+			goto done;
+		    case 1: //ERROR
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+	}
+
+done:
+	/*EXEC_SQL CLOSE c_items;*/
+        /*EXEC_SQL COMMIT WORK;*/
+	if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+
+	return (1);
+
+sqlerr:
+        fprintf(stderr, "ordstat %d:%d\n",t_num,proceed);
+	error(ctx[t_num],mysql_stmt);
+        /*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+sqlerrerr:
+	return (0);
+}
+

packages/tls/tpcc-mysql/src/parse_port.h

+inline void parse_host(char* host, const char* from)
+{
+  const char* port= rindex(from,':');
+  size_t length;
+  if(NULL == port)
+    length= strlen(from);
+  else
+    length= (port - from);
+  memcpy(host,from, length);
+  host[length] = '\0';
+}
+inline int parse_port(const char* from)
+{
+  const char* port= rindex(from,':');
+  if(NULL == port)
+    return 3306;
+  else
+  {
+    const char* end= NULL;
+    int result= strtol(port+1,&end,10);
+    if( (0 == *end) && (0 <= result) && (result <= 0xFFFF) )
+      return result;
+    else
+    {
+      printf(stderr,"Incorrect port value: %s\n",end);
+      exit(-1);
+    }
+  }
+}

packages/tls/tpcc-mysql/src/payment.c

+/*
+ * -*-C-*-  
+ * payment.pc 
+ * corresponds to A.2 in appendix A
+ */
+
+#include <string.h>
+#include <stdio.h>
+#include <time.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+extern MYSQL **ctx;
+extern MYSQL_STMT ***stmt;
+
+#define NNULL ((void *)0)
+
+/*
+ * the payment transaction
+ */
+int payment( int t_num,
+	     int w_id_arg,		/* warehouse id */
+	     int d_id_arg,		/* district id */
+	     int byname,		/* select by c_id or c_last? */
+	     int c_w_id_arg,
+	     int c_d_id_arg,
+	     int c_id_arg,		/* customer id */
+	     char c_last_arg[],	        /* customer last name */
+	     float h_amount_arg	        /* payment amount */
+)
+{
+	int            w_id = w_id_arg;
+	int            d_id = d_id_arg;
+	int            c_id = c_id_arg;
+	char            w_name[11];
+	char            w_street_1[21];
+	char            w_street_2[21];
+	char            w_city[21];
+	char            w_state[3];
+	char            w_zip[10];
+	int            c_d_id = c_d_id_arg;
+	int            c_w_id = c_w_id_arg;
+	char            c_first[17];
+	char            c_middle[3];
+	char            c_last[17];
+	char            c_street_1[21];
+	char            c_street_2[21];
+	char            c_city[21];
+	char            c_state[3];
+	char            c_zip[10];
+	char            c_phone[17];
+	char            c_since[20];
+	char            c_credit[4];
+	int            c_credit_lim;
+	float           c_discount;
+	float           c_balance;
+	char            c_data[502];
+	char            c_new_data[502];
+	float           h_amount = h_amount_arg;
+	char            h_data[26];
+	char            d_name[11];
+	char            d_street_1[21];
+	char            d_street_2[21];
+	char            d_city[21];
+	char            d_state[3];
+	char            d_zip[10];
+	int            namecnt;
+	char            datetime[81];
+
+	int             n;
+	int             proceed = 0;
+
+	MYSQL_STMT*   mysql_stmt;
+        MYSQL_BIND    param[8];
+        MYSQL_BIND    column[14];
+
+	/* EXEC SQL WHENEVER NOT FOUND GOTO sqlerr; */
+	/* EXEC SQL WHENEVER SQLERROR GOTO sqlerr; */
+
+	gettimestamp(datetime, STRFTIME_FORMAT, TIMESTAMP_LEN);
+
+	proceed = 1;
+	/*EXEC_SQL UPDATE warehouse SET w_ytd = w_ytd + :h_amount
+	  WHERE w_id =:w_id;*/
+	mysql_stmt = stmt[t_num][9];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_FLOAT;
+        param[0].buffer = &h_amount;
+        param[1].buffer_type = MYSQL_TYPE_LONG;
+        param[1].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+	proceed = 2;
+	/*EXEC_SQL SELECT w_street_1, w_street_2, w_city, w_state, w_zip,
+	                w_name
+	                INTO :w_street_1, :w_street_2, :w_city, :w_state,
+				:w_zip, :w_name
+	                FROM warehouse
+	                WHERE w_id = :w_id;*/
+	mysql_stmt = stmt[t_num][10];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+        param[0].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+        memset(column, 0, sizeof(MYSQL_BIND) * 6); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_STRING;
+        column[0].buffer = w_street_1;
+        column[0].buffer_length = sizeof(w_street_1);
+	column[1].buffer_type = MYSQL_TYPE_STRING;
+        column[1].buffer = w_street_2;
+        column[1].buffer_length = sizeof(w_street_2);
+	column[2].buffer_type = MYSQL_TYPE_STRING;
+        column[2].buffer = w_city;
+        column[2].buffer_length = sizeof(w_city);
+	column[3].buffer_type = MYSQL_TYPE_STRING;
+        column[3].buffer = w_state;
+        column[3].buffer_length = sizeof(w_state);
+	column[4].buffer_type = MYSQL_TYPE_STRING;
+        column[4].buffer = w_zip;
+        column[4].buffer_length = sizeof(w_zip);
+	column[5].buffer_type = MYSQL_TYPE_STRING;
+        column[5].buffer = w_name;
+        column[5].buffer_length = sizeof(w_name);
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+        switch( mysql_stmt_fetch(mysql_stmt) ) {
+            case 0: //SUCCESS
+                break;
+            case 1: //ERROR
+            case MYSQL_NO_DATA: //NO MORE DATA
+            default:
+                mysql_stmt_free_result(mysql_stmt);
+                goto sqlerr;
+        }
+        mysql_stmt_free_result(mysql_stmt);
+
+
+	proceed = 3;
+	/*EXEC_SQL UPDATE district SET d_ytd = d_ytd + :h_amount
+			WHERE d_w_id = :w_id 
+			AND d_id = :d_id;*/
+	mysql_stmt = stmt[t_num][11];
+
+        memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_FLOAT;
+        param[0].buffer = &h_amount;
+        param[1].buffer_type = MYSQL_TYPE_LONG;
+        param[1].buffer = &w_id;
+        param[2].buffer_type = MYSQL_TYPE_LONG;
+        param[2].buffer = &d_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+
+	proceed = 4;
+	/*EXEC_SQL SELECT d_street_1, d_street_2, d_city, d_state, d_zip,
+	                d_name
+	                INTO :d_street_1, :d_street_2, :d_city, :d_state,
+				:d_zip, :d_name
+	                FROM district
+	                WHERE d_w_id = :w_id 
+			AND d_id = :d_id;*/
+	mysql_stmt = stmt[t_num][12];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+        param[0].buffer = &w_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+        param[1].buffer = &d_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+        memset(column, 0, sizeof(MYSQL_BIND) * 6); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_STRING;
+        column[0].buffer = d_street_1;
+        column[0].buffer_length = sizeof(d_street_1);
+	column[1].buffer_type = MYSQL_TYPE_STRING;
+        column[1].buffer = d_street_2;
+        column[1].buffer_length = sizeof(d_street_2);
+	column[2].buffer_type = MYSQL_TYPE_STRING;
+        column[2].buffer = d_city;
+        column[2].buffer_length = sizeof(d_city);
+	column[3].buffer_type = MYSQL_TYPE_STRING;
+        column[3].buffer = d_state;
+        column[3].buffer_length = sizeof(d_state);
+	column[4].buffer_type = MYSQL_TYPE_STRING;
+        column[4].buffer = d_zip;
+        column[4].buffer_length = sizeof(d_zip);
+	column[5].buffer_type = MYSQL_TYPE_STRING;
+        column[5].buffer = d_name;
+        column[5].buffer_length = sizeof(d_name);
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+        switch( mysql_stmt_fetch(mysql_stmt) ) {
+            case 0: //SUCCESS
+                break;
+            case 1: //ERROR
+            case MYSQL_NO_DATA: //NO MORE DATA
+            default:
+                mysql_stmt_free_result(mysql_stmt);
+                goto sqlerr;
+        }
+        mysql_stmt_free_result(mysql_stmt);
+
+
+	if (byname) {
+		strcpy(c_last, c_last_arg);
+
+		proceed = 5;
+		/*EXEC_SQL SELECT count(c_id) 
+			INTO :namecnt
+		        FROM customer
+			WHERE c_w_id = :c_w_id
+			AND c_d_id = :c_d_id
+		        AND c_last = :c_last;*/
+		mysql_stmt = stmt[t_num][13];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_w_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_STRING;
+		param[2].buffer = c_last;
+		param[2].buffer_length = strlen(c_last);
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_LONG;
+		column[0].buffer = &namecnt;
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+			break;
+		    case 1: //ERROR
+		    case MYSQL_NO_DATA: //NO MORE DATA
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+		mysql_stmt_free_result(mysql_stmt);
+
+		/*EXEC_SQL DECLARE c_byname_p CURSOR FOR
+		        SELECT c_id
+		        FROM customer
+		        WHERE c_w_id = :c_w_id 
+			AND c_d_id = :c_d_id 
+			AND c_last = :c_last
+			ORDER BY c_first;
+
+			EXEC_SQL OPEN c_byname_p;*/
+		mysql_stmt = stmt[t_num][14];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_w_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_STRING;
+		param[2].buffer = c_last;
+		param[2].buffer_length = strlen(c_last);
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_LONG;
+		column[0].buffer = &c_id;
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+
+		if (namecnt % 2) 
+			namecnt++;	/* Locate midpoint customer; */
+		for (n = 0; n < namecnt / 2; n++) {
+		    /*EXEC_SQL FETCH c_byname_p
+		      INTO :c_id;*/
+		    switch( mysql_stmt_fetch(mysql_stmt) ) {
+			case 0: //SUCCESS
+			    break;
+			case 1: //ERROR
+			case MYSQL_NO_DATA: //NO MORE DATA
+			default:
+			    mysql_stmt_free_result(mysql_stmt);
+			    goto sqlerr;
+		    }
+		}
+
+		/*EXEC_SQL CLOSE c_byname_p; */
+		mysql_stmt_free_result(mysql_stmt);
+
+	}
+
+	proceed = 6;
+	/*EXEC_SQL SELECT c_first, c_middle, c_last, c_street_1,
+		        c_street_2, c_city, c_state, c_zip, c_phone,
+		        c_credit, c_credit_lim, c_discount, c_balance,
+		        c_since
+		INTO :c_first, :c_middle, :c_last, :c_street_1,
+		     :c_street_2, :c_city, :c_state, :c_zip, :c_phone,
+		     :c_credit, :c_credit_lim, :c_discount, :c_balance,
+		     :c_since
+		FROM customer
+	        WHERE c_w_id = :c_w_id 
+	        AND c_d_id = :c_d_id 
+		AND c_id = :c_id
+		FOR UPDATE;*/
+	mysql_stmt = stmt[t_num][15];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+        param[0].buffer = &c_w_id;
+        param[1].buffer_type = MYSQL_TYPE_LONG;
+        param[1].buffer = &c_d_id;
+        param[2].buffer_type = MYSQL_TYPE_LONG;
+        param[2].buffer = &c_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+        memset(column, 0, sizeof(MYSQL_BIND) * 14); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_STRING;
+        column[0].buffer = c_first;
+        column[0].buffer_length = sizeof(c_first);
+	column[1].buffer_type = MYSQL_TYPE_STRING;
+        column[1].buffer = c_middle;
+        column[1].buffer_length = sizeof(c_middle);
+	column[2].buffer_type = MYSQL_TYPE_STRING;
+        column[2].buffer = c_last;
+        column[2].buffer_length = sizeof(c_last);
+	column[3].buffer_type = MYSQL_TYPE_STRING;
+        column[3].buffer = c_street_1;
+        column[3].buffer_length = sizeof(c_street_1);
+	column[4].buffer_type = MYSQL_TYPE_STRING;
+        column[4].buffer = c_street_2;
+        column[4].buffer_length = sizeof(c_street_2);
+	column[5].buffer_type = MYSQL_TYPE_STRING;
+        column[5].buffer = c_city;
+        column[5].buffer_length = sizeof(c_city);
+	column[6].buffer_type = MYSQL_TYPE_STRING;
+        column[6].buffer = c_state;
+        column[6].buffer_length = sizeof(c_state);
+	column[7].buffer_type = MYSQL_TYPE_STRING;
+        column[7].buffer = c_zip;
+        column[7].buffer_length = sizeof(c_zip);
+	column[8].buffer_type = MYSQL_TYPE_STRING;
+        column[8].buffer = c_phone;
+        column[8].buffer_length = sizeof(c_phone);
+	column[9].buffer_type = MYSQL_TYPE_STRING;
+        column[9].buffer = c_credit;
+        column[9].buffer_length = sizeof(c_credit);
+	column[10].buffer_type = MYSQL_TYPE_LONG;
+        column[10].buffer = &c_credit_lim;
+	column[11].buffer_type = MYSQL_TYPE_FLOAT;
+        column[11].buffer = &c_discount;
+	column[12].buffer_type = MYSQL_TYPE_FLOAT;
+        column[12].buffer = &c_balance;
+	column[13].buffer_type = MYSQL_TYPE_STRING;
+        column[13].buffer = c_since;
+        column[13].buffer_length = sizeof(c_since);
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+        switch( mysql_stmt_fetch(mysql_stmt) ) {
+            case 0: //SUCCESS
+	    case MYSQL_DATA_TRUNCATED:
+                break;
+            case 1: //ERROR
+            case MYSQL_NO_DATA: //NO MORE DATA
+            default:
+                mysql_stmt_free_result(mysql_stmt);
+                goto sqlerr;
+        }
+        mysql_stmt_free_result(mysql_stmt);
+
+
+
+	c_balance = c_balance - h_amount;
+	c_credit[2] = '\0';
+	if (strstr(c_credit, "BC")) {
+		proceed = 7;
+		/*EXEC_SQL SELECT c_data 
+			INTO :c_data
+		        FROM customer
+		        WHERE c_w_id = :c_w_id 
+			AND c_d_id = :c_d_id 
+			AND c_id = :c_id; */
+		mysql_stmt = stmt[t_num][16];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_LONG;
+		param[0].buffer = &c_w_id;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_d_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+		if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+		memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column[0].buffer_type = MYSQL_TYPE_STRING;
+		column[0].buffer = c_data;
+		column[0].buffer_length = sizeof(c_data);
+		if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+		    case 0: //SUCCESS
+			break;
+		    case 1: //ERROR
+		    case MYSQL_NO_DATA: //NO MORE DATA
+		    default:
+			mysql_stmt_free_result(mysql_stmt);
+			goto sqlerr;
+		}
+		mysql_stmt_free_result(mysql_stmt);
+
+
+		sprintf(c_new_data, 
+			"| %4d %2d %4d %2d %4d $%7.2f %12c %24c",
+			c_id, c_d_id, c_w_id, d_id,
+			w_id, h_amount,
+			datetime, c_data);
+
+		strncat(c_new_data, c_data, 
+			500 - strlen(c_new_data));
+
+		c_new_data[500] = '\0';
+
+		proceed = 8;
+		/*EXEC_SQL UPDATE customer
+			SET c_balance = :c_balance, c_data = :c_new_data
+			WHERE c_w_id = :c_w_id 
+			AND c_d_id = :c_d_id 
+			AND c_id = :c_id;*/
+		mysql_stmt = stmt[t_num][17];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 5); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_FLOAT;
+		param[0].buffer = &c_balance;
+		param[1].buffer_type = MYSQL_TYPE_STRING;
+		param[1].buffer = c_data;
+		param[1].buffer_length = strlen(c_data);
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_w_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &c_d_id;
+		param[4].buffer_type = MYSQL_TYPE_LONG;
+		param[4].buffer = &c_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+	} else {
+		proceed = 9;
+		/*EXEC_SQL UPDATE customer 
+			SET c_balance = :c_balance
+			WHERE c_w_id = :c_w_id 
+			AND c_d_id = :c_d_id 
+			AND c_id = :c_id;*/
+		mysql_stmt = stmt[t_num][18];
+
+		memset(param, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+		param[0].buffer_type = MYSQL_TYPE_FLOAT;
+		param[0].buffer = &c_balance;
+		param[1].buffer_type = MYSQL_TYPE_LONG;
+		param[1].buffer = &c_w_id;
+		param[2].buffer_type = MYSQL_TYPE_LONG;
+		param[2].buffer = &c_d_id;
+		param[3].buffer_type = MYSQL_TYPE_LONG;
+		param[3].buffer = &c_id;
+		if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+		if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+	}
+	strncpy(h_data, w_name, 10);
+	h_data[10] = '\0';
+	strncat(h_data, d_name, 10);
+	h_data[20] = ' ';
+	h_data[21] = ' ';
+	h_data[22] = ' ';
+	h_data[23] = ' ';
+	h_data[24] = '\0';
+
+	proceed = 10;
+	/*EXEC_SQL INSERT INTO history(h_c_d_id, h_c_w_id, h_c_id, h_d_id,
+			                   h_w_id, h_date, h_amount, h_data)
+	                VALUES(:c_d_id, :c_w_id, :c_id, :d_id,
+		               :w_id, 
+			       :datetime,
+			       :h_amount, :h_data);*/
+	mysql_stmt = stmt[t_num][19];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 8); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &c_d_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &c_w_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &c_id;
+	param[3].buffer_type = MYSQL_TYPE_LONG;
+	param[3].buffer = &d_id;
+	param[4].buffer_type = MYSQL_TYPE_LONG;
+	param[4].buffer = &w_id;
+	param[5].buffer_type = MYSQL_TYPE_STRING;
+	param[5].buffer = datetime;
+	param[5].buffer_length = strlen(datetime);
+	param[6].buffer_type = MYSQL_TYPE_FLOAT;
+	param[6].buffer = &h_amount;
+	param[7].buffer_type = MYSQL_TYPE_STRING;
+	param[7].buffer = h_data;
+	param[7].buffer_length = strlen(h_data);
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+        if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	/*EXEC_SQL COMMIT WORK;*/
+	if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+
+	return (1);
+
+sqlerr:
+        fprintf(stderr, "payment %d:%d\n",t_num,proceed);
+	error(ctx[t_num],mysql_stmt);
+        /*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+sqlerrerr:
+	return (0);
+}

packages/tls/tpcc-mysql/src/rthist.c

+/*
+ * rthist.c
+ * RT-histgram
+ */
+
+#include <stdio.h>
+#include <sys/time.h>
+
+#define MAXREC      20
+#define REC_PER_SEC 1000
+
+extern double max_rt[];
+extern double cur_max_rt[];
+
+int total_hist[5][MAXREC * REC_PER_SEC];
+int cur_hist[5][MAXREC * REC_PER_SEC];
+
+/* initialize */
+void hist_init()
+{
+  int i,j;
+
+  for( i=0; i<5; i++){
+    for( j=0; j<(MAXREC * REC_PER_SEC); j++){
+      total_hist[i][j] = cur_hist[i][j] = 0;
+    }
+  }
+}
+
+/* incliment matched one */
+void hist_inc( int transaction, double rtclk )
+{
+  int i;
+
+  i = ( rtclk * (double)REC_PER_SEC );
+  if(i >= (MAXREC * REC_PER_SEC)){
+    i = (MAXREC * REC_PER_SEC) - 1;
+  }
+  if (rtclk > cur_max_rt[transaction]) cur_max_rt[transaction] = rtclk;
+  ++cur_hist[transaction][i];
+  //printf("In: %.3f, trx: %d, Added %d\n", rtclk, transaction, i);
+}
+
+/* check point, add on total histgram, return 90% line */
+double hist_ckp( int transaction )
+{
+  int i;
+  int total,tmp,line,line_set;
+
+  total = tmp = line_set = 0;
+  line = MAXREC * REC_PER_SEC;
+  for( i=0; i<(MAXREC * REC_PER_SEC); i++){
+    total += cur_hist[transaction][i];
+    //total += i;
+  }
+  for( i=0; i<(MAXREC * REC_PER_SEC); i++){
+    tmp += cur_hist[transaction][i];
+    //tmp += i;
+    total_hist[transaction][i] += cur_hist[transaction][i];
+    cur_hist[transaction][i] = 0;
+    if (( tmp  >= (total*99/100) ) && (line_set ==0)){
+      line = i;
+      line_set=1;
+    }
+  }
+  //printf("CKP: trx: %d line: %d total: %d tmp: %d ret: %.3f\n",  transaction, line, total, tmp,(double)(line)/(double)(REC_PER_SEC));
+  return ( (double)(line)/(double)(REC_PER_SEC) );
+}
+
+void hist_report()
+{
+  int i,j;
+  int total[5],tmp[5],line[5];
+
+  for( j=0; j<5; j++){
+    total[j] = tmp[j] = 0;
+    line[j] = MAXREC * REC_PER_SEC;
+    for( i=0; i<(MAXREC * REC_PER_SEC); i++){
+      total[j] += total_hist[j][i];
+    }
+    for( i=(MAXREC * REC_PER_SEC)-1; i >= 0 ; i--){
+      tmp[j] += total_hist[j][i];
+      if( (tmp[j] * 10) <= total[j] ){
+	line[j] = i;
+      }
+    }
+  }
+
+  printf("\n<RT Histogram>\n");
+
+  for( j=0; j<5; j++){
+    switch(j){
+    case 0:
+      printf("\n1.New-Order\n\n");
+      break;
+    case 1:
+      printf("\n2.Payment\n\n");
+      break;
+    case 2:
+      printf("\n3.Order-Status\n\n");
+      break;
+    case 3:
+      printf("\n4.Delivery\n\n");
+      break;
+    case 4:
+      printf("\n5.Stock-Level\n\n");
+    }
+    for( i=0; (i<(MAXREC * REC_PER_SEC))&&(i <= line[j]*4); i++){
+      printf("%3.2f, %6d\n",(double)(i+1)/(double)(REC_PER_SEC),total_hist[j][i]);
+    }
+    printf("\n");
+  }
+
+  printf("\n<90th Percentile RT (MaxRT)>\n");
+  for( j=0; j<5; j++){
+    switch(j){
+    case 0:
+      printf("   New-Order : ");
+      break;
+    case 1:
+      printf("     Payment : ");
+      break;
+    case 2:
+      printf("Order-Status : ");
+      break;
+    case 3:
+      printf("    Delivery : ");
+      break;
+    case 4:
+      printf(" Stock-Level : ");
+    }
+    printf("%3.2f  (%.2f)\n",(double)(line[j])/(double)(REC_PER_SEC),max_rt[j]);
+  }
+
+}
+
+
+
+

packages/tls/tpcc-mysql/src/rthist.h

+/*
+ * rthist.h
+ */
+
+void hist_init();
+void hist_inc( int transaction, double rtclk );
+double hist_ckp( int transaction );
+void hist_report();

packages/tls/tpcc-mysql/src/sb_percentile.c

+/* Copyright (C) 2011 Alexey Kopytov.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+#ifdef _WIN32
+#include "sb_win.h"
+#endif
+
+#include <stdlib.h>
+#include <string.h>
+#include <math.h>
+#include <pthread.h>
+
+#include "sb_percentile.h"
+
+int sb_percentile_init(sb_percentile_t *percentile,
+                       unsigned int size, double range_min, double range_max)
+{
+  percentile->values = (unsigned long long *)
+    calloc(size, sizeof(unsigned long long));
+  percentile->tmp = (unsigned long long *)
+    calloc(size, sizeof(unsigned long long));
+  if (percentile->values == NULL || percentile->tmp == NULL)
+  {
+    //log_text(LOG_FATAL, "Cannot allocate values array, size = %u", size);
+    return 1;
+  }
+
+  percentile->range_deduct = log(range_min);
+  percentile->range_mult = (size - 1) / (log(range_max) -
+                                         percentile->range_deduct);
+  percentile->range_min = range_min;
+  percentile->range_max = range_max;
+  percentile->size = size;
+  percentile->total = 0;
+
+  pthread_mutex_init(&percentile->mutex, NULL);
+
+  return 0;
+}
+
+void sb_percentile_update(sb_percentile_t *percentile, double value)
+{
+  unsigned int n;
+
+  if (value < percentile->range_min)
+    value= percentile->range_min;
+  else if (value > percentile->range_max)
+    value= percentile->range_max;
+
+  n = floor((log(value) - percentile->range_deduct) * percentile->range_mult
+            + 0.5);
+
+  pthread_mutex_lock(&percentile->mutex);
+  percentile->total++;
+  percentile->values[n]++;
+  pthread_mutex_unlock(&percentile->mutex);
+}
+
+double sb_percentile_calculate(sb_percentile_t *percentile, double percent)
+{
+  unsigned long long ncur, nmax;
+  unsigned int       i;
+
+  pthread_mutex_lock(&percentile->mutex);
+
+  if (percentile->total == 0)
+  {
+    pthread_mutex_unlock(&percentile->mutex);
+    return 0.0;
+  }
+
+  memcpy(percentile->tmp, percentile->values,
+         percentile->size * sizeof(unsigned long long));
+  nmax = floor(percentile->total * percent / 100 + 0.5);
+
+  pthread_mutex_unlock(&percentile->mutex);
+
+  ncur = percentile->tmp[0];
+  for (i = 1; i < percentile->size; i++)
+  {
+    ncur += percentile->tmp[i];
+    if (ncur >= nmax)
+      break;
+  }
+
+  return exp((i) / percentile->range_mult + percentile->range_deduct);
+}
+
+void sb_percentile_reset(sb_percentile_t *percentile)
+{
+  pthread_mutex_lock(&percentile->mutex);
+  percentile->total = 0;
+  memset(percentile->values, 0, percentile->size * sizeof(unsigned long long));
+  pthread_mutex_unlock(&percentile->mutex);
+}
+
+void sb_percentile_done(sb_percentile_t *percentile)
+{
+  pthread_mutex_destroy(&percentile->mutex);
+  free(percentile->values);
+  free(percentile->tmp);
+}

packages/tls/tpcc-mysql/src/sb_percentile.h

+/* Copyright (C) 2011 Alexey Kopytov.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+#ifndef SB_PERCENTILE_H
+#define SB_PERCENTILE_H
+
+#ifdef HAVE_PTHREAD_H
+# include <pthread.h>
+#endif
+
+typedef struct {
+  unsigned long long  *values;
+  unsigned long long  *tmp;
+  unsigned long long  total;
+  unsigned int        size;
+  double              range_min;
+  double              range_max;
+  double              range_deduct;
+  double              range_mult;
+  pthread_mutex_t     mutex;
+} sb_percentile_t;
+
+int sb_percentile_init(sb_percentile_t *percentile,
+                       unsigned int size, double range_min, double range_max);
+
+void sb_percentile_update(sb_percentile_t *percentile, double value);
+
+double sb_percentile_calculate(sb_percentile_t *percentile, double percent);
+
+void sb_percentile_reset(sb_percentile_t *percentile);
+
+void sb_percentile_done(sb_percentile_t *percentile);
+
+#endif

packages/tls/tpcc-mysql/src/sequence.c

+/*
+ * sequence.c
+ * manage sequence shared by threads
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <pthread.h>
+
+/* weight */
+static int no;
+static int py;
+static int os;
+static int dl;
+static int sl;
+static int total;
+
+static pthread_mutex_t mutex;
+static int *seq;
+static int next_num;
+
+static void shuffle()
+{
+  int i,j,rnd,tmp;
+
+  for( i=0, j=0; i < no ; i++, j++ ){
+    seq[j]=0;
+  }
+  for( i=0; i < py ; i++, j++){
+    seq[j]=1;
+  }
+  for( i=0; i < os ; i++, j++){
+    seq[j]=2;
+  }
+  for( i=0; i < dl ; i++, j++){
+    seq[j]=3;
+  }
+  for( i=0; i < sl ; i++, j++){
+    seq[j]=4;
+  }
+  for( i=0, j = total - 1; j>0; i++, j--){
+    rnd = rand()%(j+1);
+    tmp = seq[rnd+i];
+    seq[rnd+i] = seq[i];
+    seq[i] = tmp;
+  }
+}
+
+void seq_init( int n, int p, int o, int d, int s )
+{
+  pthread_mutex_init( &mutex, NULL );
+  no = n;
+  py = p;
+  os = o;
+  dl = d;
+  sl = s;
+  total = n + p + o + d + s;
+  seq = malloc( sizeof(int) * total );
+  shuffle();
+  next_num = 0;
+}
+
+
+int seq_get()
+{
+  int retval;
+
+  pthread_mutex_lock( &mutex );
+
+  if(next_num >= total){
+    shuffle();
+    next_num = 0;
+  }
+
+  retval = seq[next_num];
+  ++next_num;
+
+  pthread_mutex_unlock( &mutex );
+
+  return(retval);
+}

packages/tls/tpcc-mysql/src/sequence.h

+/*
+ * sequence.h
+ */
+
+void seq_init( int n, int p, int o, int d, int s );
+int seq_get();

packages/tls/tpcc-mysql/src/slev.c

+/*
+ * -*-C-*-
+ * slev.pc 
+ * corresponds to A.5 in appendix A
+ */
+
+#include <string.h>
+#include <stdio.h>
+
+#include <mysql.h>
+
+#include "spt_proc.h"
+#include "tpc.h"
+
+extern MYSQL **ctx;
+extern MYSQL_STMT ***stmt;
+
+/*
+ * the stock level transaction
+ */
+int slev( int t_num,
+	  int w_id_arg,		/* warehouse id */
+	  int d_id_arg,		/* district id */
+	  int level_arg		/* stock level */
+)
+{
+	int            w_id = w_id_arg;
+	int            d_id = d_id_arg;
+	int            level = level_arg;
+	int            d_next_o_id;
+	int            i_count;
+	int            ol_i_id;
+
+	MYSQL_STMT*   mysql_stmt;
+        MYSQL_BIND    param[4];
+        MYSQL_BIND    column[1];
+	MYSQL_STMT*   mysql_stmt2;
+        MYSQL_BIND    param2[3];
+        MYSQL_BIND    column2[1];
+
+	/*EXEC SQL WHENEVER NOT FOUND GOTO sqlerr;*/
+	/*EXEC SQL WHENEVER SQLERROR GOTO sqlerr;*/
+
+	/* find the next order id */
+#ifdef DEBUG
+	printf("select 1\n");
+#endif
+	/*EXEC_SQL SELECT d_next_o_id
+	                INTO :d_next_o_id
+	                FROM district
+	                WHERE d_id = :d_id
+			AND d_w_id = :w_id;*/
+	mysql_stmt = stmt[t_num][32];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 2); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &d_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &w_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+	memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_LONG;
+	column[0].buffer = &d_next_o_id;
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+	switch( mysql_stmt_fetch(mysql_stmt) ) {
+	    case 0: //SUCCESS
+		break;
+	    case 1: //ERROR
+	    case MYSQL_NO_DATA: //NO MORE DATA
+	    default:
+		mysql_stmt_free_result(mysql_stmt);
+		goto sqlerr;
+	}
+	mysql_stmt_free_result(mysql_stmt);
+
+	/* find the most recent 20 orders for this district */
+	/*EXEC_SQL DECLARE ord_line CURSOR FOR
+	                SELECT DISTINCT ol_i_id
+	                FROM order_line
+	                WHERE ol_w_id = :w_id
+			AND ol_d_id = :d_id
+			AND ol_o_id < :d_next_o_id
+			AND ol_o_id >= (:d_next_o_id - 20);
+
+	EXEC_SQL OPEN ord_line;
+
+	EXEC SQL WHENEVER NOT FOUND GOTO done;*/
+	mysql_stmt = stmt[t_num][33];
+
+	memset(param, 0, sizeof(MYSQL_BIND) * 4); /* initialize */
+	param[0].buffer_type = MYSQL_TYPE_LONG;
+	param[0].buffer = &w_id;
+	param[1].buffer_type = MYSQL_TYPE_LONG;
+	param[1].buffer = &d_id;
+	param[2].buffer_type = MYSQL_TYPE_LONG;
+	param[2].buffer = &d_next_o_id;
+	param[3].buffer_type = MYSQL_TYPE_LONG;
+	param[3].buffer = &d_next_o_id;
+	if( mysql_stmt_bind_param(mysql_stmt, param) ) goto sqlerr;
+	if( mysql_stmt_execute(mysql_stmt) ) goto sqlerr;
+
+	if( mysql_stmt_store_result(mysql_stmt) ) goto sqlerr;
+	memset(column, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+	column[0].buffer_type = MYSQL_TYPE_LONG;
+	column[0].buffer = &ol_i_id;
+	if( mysql_stmt_bind_result(mysql_stmt, column) ) goto sqlerr;
+
+	for (;;) {
+#ifdef DEBUG
+		printf("fetch 1\n");
+#endif
+		/*EXEC_SQL FETCH ord_line INTO :ol_i_id;*/
+		switch( mysql_stmt_fetch(mysql_stmt) ) {
+                    case 0: //SUCCESS
+                        break;
+                    case MYSQL_NO_DATA: //NO MORE DATA
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto done;
+                    case 1: //ERROR
+                    default:
+                        mysql_stmt_free_result(mysql_stmt);
+                        goto sqlerr;
+                }
+
+#ifdef DEBUG
+		printf("select 2\n");
+#endif
+
+		/*EXEC_SQL SELECT count(*) INTO :i_count
+			FROM stock
+			WHERE s_w_id = :w_id
+		        AND s_i_id = :ol_i_id
+			AND s_quantity < :level;*/
+		mysql_stmt2 = stmt[t_num][34];
+
+		memset(param2, 0, sizeof(MYSQL_BIND) * 3); /* initialize */
+		param2[0].buffer_type = MYSQL_TYPE_LONG;
+		param2[0].buffer = &w_id;
+		param2[1].buffer_type = MYSQL_TYPE_LONG;
+		param2[1].buffer = &ol_i_id;
+		param2[2].buffer_type = MYSQL_TYPE_LONG;
+		param2[2].buffer = &level;
+		if( mysql_stmt_bind_param(mysql_stmt2, param2) ) goto sqlerr2;
+		if( mysql_stmt_execute(mysql_stmt2) ) goto sqlerr2;
+
+		if( mysql_stmt_store_result(mysql_stmt2) ) goto sqlerr2;
+		memset(column2, 0, sizeof(MYSQL_BIND) * 1); /* initialize */
+		column2[0].buffer_type = MYSQL_TYPE_LONG;
+		column2[0].buffer = &i_count;
+		if( mysql_stmt_bind_result(mysql_stmt2, column2) ) goto sqlerr2;
+		switch( mysql_stmt_fetch(mysql_stmt2) ) {
+		    case 0: //SUCCESS
+			break;
+		    case 1: //ERROR
+		    case MYSQL_NO_DATA: //NO MORE DATA
+		    default:
+			mysql_stmt_free_result(mysql_stmt2);
+			goto sqlerr2;
+		}
+		mysql_stmt_free_result(mysql_stmt2);
+
+	}
+
+done:
+	/*EXEC_SQL CLOSE ord_line;*/
+	/*EXEC_SQL COMMIT WORK;*/
+	if( mysql_commit(ctx[t_num]) ) goto sqlerr;
+
+	return (1);
+
+sqlerr:
+        fprintf(stderr,"slev\n");
+	error(ctx[t_num],mysql_stmt);
+        /*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_rollback(ctx[t_num]);
+sqlerrerr:
+	return (0);
+
+sqlerr2:
+        fprintf(stderr,"slev\n");
+	error(ctx[t_num],mysql_stmt2);
+        /*EXEC SQL WHENEVER SQLERROR GOTO sqlerrerr;*/
+	/*EXEC_SQL ROLLBACK WORK;*/
+	mysql_stmt_free_result(mysql_stmt);
+	mysql_rollback(ctx[t_num]);
+	return (0);
+}

packages/tls/tpcc-mysql/src/spt_proc.c

+/*
+ * spt_proc.pc
+ * support routines for the proc tpcc implementation
+ */
+
+#include <mysql.h>
+
+#include <stdio.h>
+
+/*
+ * report error
+ */
+int error(
+    MYSQL        *mysql,
+    MYSQL_STMT   *mysql_stmt
+)
+{
+/*
+	if(mysql_stmt) {
+	    printf("\n%d, %s, %s", mysql_stmt_errno(mysql_stmt),
+		   mysql_stmt_sqlstate(mysql_stmt), mysql_stmt_error(mysql_stmt) );
+	}
+*/
+	if(mysql){
+	    fprintf(stderr, "%d, %s, %s\n", mysql_errno(mysql), mysql_sqlstate(mysql), mysql_error(mysql) );
+	}
+	return (0);
+}
+
+

packages/tls/tpcc-mysql/src/spt_proc.h

+int error(MYSQL *mysql, MYSQL_STMT *mysql_stmt);
+
+#define  TIMESTAMP_LEN  80
+#define  STRFTIME_FORMAT	"%Y-%m-%d %H:%M:%S"
+

packages/tls/tpcc-mysql/src/support.c

+/*
+ * support.c
+ * routines needed for the tpcc loading and transaction programs
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <time.h>
+#include <ctype.h>
+
+#include "tpc.h"
+
+static int nums[CUST_PER_DIST];
+static int perm_count;
+
+void SetSeed (int seed)
+{
+	srand(seed);
+}
+
+/*
+ * return number uniformly distributed b/w min and max, inclusive
+ */
+int RandomNumber (int min, int max)
+{
+	return min + (rand() % ((max - min) + 1));
+}
+
+/*
+ * non uniform random -- see p. 15
+ *
+ * the constant C depends on which value of A is passed, but the same
+ * value of C should be used for all calls with the same value of
+ * A.  however, we know in advance which values of A will be used.
+ */
+int NURand (unsigned A, unsigned x, unsigned y)
+{
+	static int first = 1;
+	unsigned C, C_255, C_1023, C_8191;
+
+	if (first) {
+		C_255 = RandomNumber(0, 255);
+		C_1023 = RandomNumber(0, 1023);
+		C_8191 = RandomNumber(0, 8191);
+		first = 0;
+	}
+
+	switch (A) {
+	case 255: C = C_255; break;
+	case 1023: C = C_1023; break;
+	case 8191: C = C_8191; break;
+	default:
+		fprintf(stderr,
+			"NURand: unexpected value (%d) of A used\n",
+			A);
+		abort();
+	}
+
+	return (int)
+	       (((RandomNumber(0, A) | RandomNumber(x, y)) + C) % (y-x+1)) + x;
+}
+
+/*
+ * p. 54
+ *
+ * make a ``random a-string'': a string of random alphanumeric
+ * characters of a random length of minimum x, maximum y, and
+ * mean (y+x)/2
+ */
+int MakeAlphaString (int x, int y, char str[])
+{
+	static char *alphanum = "0123456789"
+			        "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
+			        "abcdefghijklmnopqrstuvwxyz";
+	int arrmax = 61;  /* index of last array element */
+	register int i, len;
+
+	len = RandomNumber(x, y);
+
+	for (i = 0; i < len; i++)
+		str[i] = alphanum[RandomNumber(0, arrmax)];
+
+	return len;
+}
+
+/*
+ * like MakeAlphaString, only numeric characters only
+ */
+int MakeNumberString (int x, int y, char str[])
+{
+	static char *numeric = "0123456789";
+	int arrmax = 9;
+	register int i, len;
+
+	len = RandomNumber(x, y);
+
+	for (i = 0; i < len; i++)
+		str[i] = numeric[RandomNumber(0, arrmax)];
+
+	return len;
+}
+
+/*
+ * turn system time into database format
+ * the format argument should be a strftime() format string that produces
+ *   a datetime string acceptable to the database
+ */
+void gettimestamp (char str[], char *format, size_t len)
+{
+	time_t t;
+	struct tm *datetime;
+
+	t = time(NULL);
+	datetime = localtime(&t);
+
+	if ( !strftime(str, len, format, datetime) ) {
+		fprintf(stderr, "error writing timestamp to string\n");
+		abort();
+	}
+}
+
+/*
+ * permute the list of customer ids for the order table
+ */
+void InitPermutation (void)
+{
+	int *cur;
+	int i,j;
+
+	perm_count = 0;
+
+	/* initialize with consecutive values [1..ORD_PER_DIST] */
+	for (i = 0, cur = nums; i < ORD_PER_DIST; i++, cur++) {
+		*cur = i + 1;
+	}
+
+	/* now, shuffle */
+	for (i = 0; i < ORD_PER_DIST-1; i++) {
+		j = (int)RandomNumber(i+1, ORD_PER_DIST-1);
+		swap_int(nums[i], nums[j]);
+	}
+}
+
+int GetPermutation (void)
+{
+	if ( perm_count >= ORD_PER_DIST ) {
+		fprintf(stderr, "GetPermutation: past end of list!\n");
+		abort();
+	}
+	return nums[perm_count++];
+}
+
+/*==================================================================+
+ | ROUTINE NAME
+ |      Lastname
+ | DESCRIPTION
+ |      TPC-C Lastname Function.
+ | ARGUMENTS 
+ |      num  - non-uniform random number
+ |      name - last name string
+ +==================================================================*/
+void Lastname(num, name)
+  int num;
+  char *name;
+{
+  static char *n[] = 
+    {"BAR", "OUGHT", "ABLE", "PRI", "PRES", 
+     "ESE", "ANTI", "CALLY", "ATION", "EING"};
+ 
+  strcpy(name,n[num/100]);
+  strcat(name,n[(num/10)%10]);
+  strcat(name,n[num%10]);
+ 
+ return;
+}
+

packages/tls/tpcc-mysql/src/tpc.h

+/*
+ * tpc.h
+ * definitions for tpcc loading program && transactions
+ */
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+/*
+ * correct values
+ */
+#define MAXITEMS      100000 
+#define CUST_PER_DIST 3000 
+#define DIST_PER_WARE 10 
+#define ORD_PER_DIST  3000
+/*
+ */
+
+/* 
+ * small values
+
+#define MAXITEMS 	1000
+#define CUST_PER_DIST 	30
+#define DIST_PER_WARE	3
+#define ORD_PER_DIST	30
+
+ */ 
+
+/* definitions for new order transaction */
+#define MAX_NUM_ITEMS 15
+#define MAX_ITEM_LEN  24
+
+#define swap_int(a,b) {int tmp; tmp=a; a=b; b=tmp;}
+
+/*
+ * hack MakeAddress() into a macro so that we can pass Oracle
+ * VARCHARs instead of char *s
+ */
+#define MakeAddressMacro(str1,str2,city,state,zip) \
+{int tmp; \
+ tmp = MakeAlphaString(10,20,str1.arr); \
+ str1.len = tmp; \
+ tmp = MakeAlphaString(10,20,str2.arr); \
+ str2.len = tmp; \
+ tmp = MakeAlphaString(10,20,city.arr); \
+ city.len = tmp; \
+ tmp = MakeAlphaString(2,2,state.arr); \
+ state.len = tmp; \
+ tmp = MakeNumberString(9,9,zip.arr); \
+ zip.len = tmp;}
+
+/*
+ * while we're at it, wrap MakeAlphaString() and MakeNumberString()
+ * in a similar way
+ */
+#define MakeAlphaStringMacro(x,y,str) \
+{int tmp; tmp = MakeAlphaString(x,y,str.arr); str.len = tmp;}
+#define MakeNumberStringMacro(x,y,str) \
+{int tmp; tmp = MakeNumberString(x,y,str.arr); str.len = tmp;}
+
+/*
+ * likewise, for Lastname()
+ * counts on Lastname() producing null-terminated strings
+ */
+#define LastnameMacro(num,str) \
+{Lastname(num, str.arr); str.len = strlen(str.arr);}
+
+extern long count_ware;
+  
+/* Functions */
+    
+void         LoadItems();
+void         LoadWare();   
+void         LoadCust();
+void         LoadOrd();
+void         LoadNewOrd();   
+int          Stock();
+int          District();
+void         Customer();
+void         Orders();
+void         New_Orders();
+void         MakeAddress();
+void         Error();
+
+#ifdef __STDC__
+void SetSeed (int seed);
+int RandomNumber (int min, int max);
+int NURand (unsigned A, unsigned x, unsigned y);
+int MakeAlphaString (int x, int y, char str[]);
+int MakeNumberString (int x, int y, char str[]);
+void gettimestamp (char str[], char *format, size_t n);
+void InitPermutation (void);
+int GetPermutation (void);
+void Lastname(int num, char* name);
+
+#endif /* __STDC__ */
+    
+#ifdef __cplusplus
+}
+#endif

packages/tls/tpcc-mysql/src/trans_if.h

+/*
+ * trans_if.h
+ *
+ * prototypes for the transaction interface calls
+ */
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+int driver (int t_num);
+int neword (int t_num, int w_id_arg, int d_id_arg, int c_id_arg,
+	    int o_ol_cnt_arg, int o_all_local_arg, int itemid[],
+	    int supware[], int qty[]);
+int payment (int t_num, int w_id_arg, int d_id_arg, int byname,
+	     int c_w_id_arg, int c_d_id_arg,
+	     int c_id_arg, char c_last_arg[], float h_amount_arg);
+int ordstat (int t_num, int w_id, int d_id, int byname, int c_id,
+	     char c_last[]);
+int slev (int t_num, int w_id, int d_id, int level);
+int delivery (int t_num, int w_id_arg, int o_carrier_id_arg);
+
+#ifdef __cplusplus
+}
+#endif

parser/mysql_type_metadata.hh

@@ -134,7 +134,7 @@ public:
 template <enum enum_field_types id>
 class AbstractMySQLDecimalMetaData : public AbstractMySQLTypeMetaData {
 public:
-    bool encryptionSupported() const {return true;}
+    bool encryptionSupported() const {return false;}
     bool isNumeric() const {return true;}
     const std::string humanReadable(const Create_field &) const
         {return "DECIMAL";}