# insert and write performance
print "Begin insertions...\n\n";
my $iov_seed = time;
my $logic_id = 9999;
                                                                                
my $count=0;
my $MAXCOUNT = 1000;
my $total=0;
my $start = gettimeofday;
my $commit_cnt = 0;
my $commit_size = 100;
                                                                                
$sql = qq[ SELECT logic_id, since, till FROM $cond_name
             WHERE logic_id = ?
             AND ((since >= ? AND since < ?)
             OR (till  >  ? AND till  < ?)
             OR (? >= since AND ? < till))
             LIMIT 1 ];
my $overlap_check_h = $dbh->prepare_cached($sql);
                                                                                
# $sql = qq[INSERT INTO $cond_name SET logic_id = ?,
#                                    since = ?,
#                                    till = ?,
#                                    value = ?];
$sql = qq[ INSERT INTO $cond_name VALUES (?, ?, ?, ?) ];
my $insert_h = $dbh->prepare_cached($sql);
                                                                                
$dbh->do( qq[ SET FOREIGN_KEY_CHECKS=0 ] );
for (0..10000) {
  my ($t1, $t2) = make_iov();
  $overlap_check_h->bind_param(1, $logic_id, SQL_INTEGER);
  $overlap_check_h->bind_param(2, $t1, SQL_DATETIME);
  $overlap_check_h->bind_param(3, $t2, SQL_DATETIME);
  $overlap_check_h->bind_param(4, $t1, SQL_DATETIME);
  $overlap_check_h->bind_param(5, $t2, SQL_DATETIME);
  $overlap_check_h->bind_param(6, $t1, SQL_DATETIME);
  $overlap_check_h->bind_param(7, $t2, SQL_DATETIME);
  $overlap_check_h->execute();
  my @overlap = $overlap_check_h->fetchrow_array();
  if (@overlap) { print "OVERLAP!  That's impossible!\n"; }
  else {
    $insert_h->bind_param(1, $logic_id, SQL_INTEGER);
    $insert_h->bind_param(2, $t1, SQL_DATETIME);
    $insert_h->bind_param(3, $t2, SQL_DATETIME);
    $insert_h->bind_param(4, 3.1415, SQL_FLOAT);
    $insert_h->execute();
    $count++;
    $commit_cnt++;
    if ($commit_cnt == $commit_size) {
      $dbh->commit();
      $commit_cnt = 0;
    }
    if ($count == $MAXCOUNT) { report(); }
  }
}
$dbh->do( qq[ SET FOREIGN_KEY_CHECKS=1 ] );
$dbh->commit();
$dbh->disconnect();