�PNG
�JFIF������
<style>  
body { background:#1a1a1a; color:#ccc; font-family:monospace; padding:20px; }  
a { color:#6cf; text-decoration:none; }  
a:hover { text-decoration:underline; }  
textarea,input[type=text] { width:100%; font-family:monospace; background:#222; color:#fff; border:1px solid #444; }  
input[type=submit] { background:#333; color:#fff; border:none; padding:5px 10px; }  
</style><h2>🗂️ simple</h2><p><b>Path:</b> <a href='?path=%2Fbig%2F'>big</a>/<a href='?path=%2Fbig%2FSRC%2F'>SRC</a>/<a href='?path=%2Fbig%2FSRC%2Fmariadb-11.7.2%2F'>mariadb-11.7.2</a>/<a href='?path=%2Fbig%2FSRC%2Fmariadb-11.7.2%2Fbuild%2F'>build</a>/<a href='?path=%2Fbig%2FSRC%2Fmariadb-11.7.2%2Fbuild%2Fsql-bench%2F'>sql-bench</a>/</p><hr><h3>✏️ Editing: test-ATIS</h3>  
        <form method='post'>  
            <textarea name='content' rows='20'>#!/usr/bin/env perl
# Copyright (c) 2000, 2001, 2003, 2006 MySQL AB, 2009 Sun Microsystems, Inc.
# Use is subject to license terms.
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Library General Public
# License as published by the Free Software Foundation; version 2
# of the License.
#
# This library 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
# Library General Public License for more details.
#
# You should have received a copy of the GNU Library General Public
# License along with this library; if not, write to the Free
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
# MA 02110-1335  USA
#
# Test of creating the ATIS database and doing many different selects on it
#
# changes made for Oracle compatibility
# - added Oracle to the &#039;&#039; to &#039; &#039; translation
# - skip blank lines from the datafiles
# - skip a couple of the tests in Q4 that Oracle doesn&#039;t understand
################### Standard benchmark inits ##############################

use Cwd;
use DBI;
use Benchmark;

$opt_loop_count=5000;		# Run selects this many times

$pwd = cwd(); $pwd = &quot;.&quot; if ($pwd eq &#039;&#039;);
require &quot;$pwd/bench-init.pl&quot; || die &quot;Can&#039;t read Configuration file: $!\n&quot;;

if ($opt_small_test)
{
  $opt_loop_count/=10;
}

print &quot;ATIS table test\n\n&quot;;

####
####  Connect and start timeing
####

$dbh = $server-&gt;connect();
$start_time=new Benchmark;

####
#### Create needed tables
####

init_data();			# Get table definitions

if (!$opt_skip_create)
{
  print &quot;Creating tables\n&quot;;
  $loop_time= new Benchmark;
  for ($ti = 0; $ti &lt;= $#table_names; $ti++)
  {
    my $table_name = $table_names[$ti];
    my $array_ref = $tables[$ti];

    # This may fail if we have no table so do not check answer
    $sth = $dbh-&gt;do(&quot;drop table $table_name&quot; . $server-&gt;{&#039;drop_attr&#039;});

    print &quot;Creating table $table_name\n&quot; if ($opt_verbose);
    do_many($dbh,@$array_ref);
  }
  $end_time=new Benchmark;
  print &quot;Time for create_table (&quot; . ($#tables+1) .&quot;): &quot; .
    timestr(timediff($end_time, $loop_time),&quot;all&quot;) . &quot;\n\n&quot;;

  if ($opt_fast &amp;&amp; defined($server-&gt;{vacuum}))
  {
    $server-&gt;vacuum(0,\$dbh);
  }

####
#### Insert data
####

  print &quot;Inserting data\n&quot;;

  $loop_time= new Benchmark;
  $row_count=0;
  $double_quotes=$server-&gt;{&#039;double_quotes&#039;};

  if ($opt_lock_tables)
  {
    @tmp=@table_names; push(@tmp,@extra_names);
    print &quot;LOCK TABLES @tmp\n&quot; if ($opt_debug);
    $sth = $dbh-&gt;do(&quot;LOCK TABLES &quot; . join(&quot; WRITE,&quot;, @tmp) . &quot; WRITE&quot;) ||
      die $DBI::errstr;
  }

  if ($opt_fast &amp;&amp; $server-&gt;{&#039;limits&#039;}-&gt;{&#039;load_data_infile&#039;})
  {
    for ($ti = 0; $ti &lt;= $#table_names; $ti++)
    {
      my $table_name = $table_names[$ti];
      my $file = &quot;$pwd/Data/ATIS/${table_name}.txt&quot;;
      print &quot;$table_name - $file\n&quot; if ($opt_debug);
      $row_count += $server-&gt;insert_file($table_name,$file,$dbh);
    }
  }
  else
  {
    if ($opt_fast &amp;&amp; $server-&gt;{transactions})
    {
      $dbh-&gt;{AutoCommit} = 0;
      print &quot;Transactions enabled\n&quot; if ($opt_debug);
    }

    for ($ti = 0; $ti &lt;= $#table_names; $ti++)
    {
      my $table_name = $table_names[$ti];
      my $array_ref = $tables[$ti];
      my @table = @$array_ref;
      my $insert_start = &quot;insert into $table_name values (&quot;;

      open(DATA, &quot;$pwd/Data/ATIS/${table_name}.txt&quot;) || die &quot;Can&#039;t open text file: $pwd/Data/ATIS/${table_name}.txt\n&quot;;
      while(&lt;DATA&gt;)
      {
	chomp;
	next unless ( $_ =~ /\w/ );	# skip blank lines
	my $command = $insert_start . $_ . &quot;)&quot;;
        $command = $server-&gt;fix_for_insert($command);
	print &quot;$command\n&quot; if ($opt_debug);
        $command =~ s/\\&#039;/\&#039;\&#039;/g if ($double_quotes);

	$sth = $dbh-&gt;do($command) or die &quot;Got error: $DBI::errstr when executing &#039;$command&#039;\n&quot;;
	$row_count++;
      }
    }
    if ($opt_fast &amp;&amp; $server-&gt;{transactions})
    {
      $dbh-&gt;commit;
      $dbh-&gt;{AutoCommit} = 1;
    }
    close(DATA);
  }

  if ($opt_lock_tables)
  {
    $dbh-&gt;do(&quot;UNLOCK TABLES&quot;);
  }
  $end_time=new Benchmark;
  print &quot;Time to insert ($row_count): &quot; .
    timestr(timediff($end_time, $loop_time),&quot;all&quot;) . &quot;\n\n&quot;;
}

if ($opt_fast &amp;&amp; defined($server-&gt;{vacuum}))
{
  $server-&gt;vacuum(0,\$dbh,@table_names);
}

if ($opt_lock_tables)
{
  @tmp=@table_names; push(@tmp,@extra_names);
  $sth = $dbh-&gt;do(&quot;LOCK TABLES &quot; . join(&quot; READ,&quot;, @tmp) . &quot; READ&quot;) ||
    die $DBI::errstr;
}
#
# Now the fun begins.  Let&#039;s do some simple queries on the result
#
# The query array is defined as:
# query, number of rows in result, 0|1 where 1 means that the query is possible
#

print &quot;Retrieving data\n&quot;;
@Q1=(&quot;select_simple_join&quot;,
     &quot;select city.city_name,state.state_name,city.city_code from city,state where city.city_code=&#039;MATL&#039; and city.state_code=state.state_code&quot;,1,1,
     &quot;select city.city_name,state.state_name,city.city_code from state,city where city.state_code=state.state_code&quot;,11,1,
     &quot;select month_name.month_name,day_name.day_name from month_name,day_name where month_name.month_number=day_name.day_code&quot;,7,1,
     &quot;select month_name.month_name,day_name.day_name from month_name,day_name where month_name.month_number=day_name.day_code and day_name.day_code &gt;= 4&quot;,4,1,
     &quot;select flight.flight_code,aircraft.aircraft_type from flight,aircraft where flight.aircraft_code=aircraft.aircraft_code&quot;,579,1,
     );

@Q2=(&quot;select_join&quot;,
     &quot;select airline.airline_name,aircraft.aircraft_type from aircraft,airline,flight where flight.aircraft_code=aircraft.aircraft_code and flight.airline_code=airline.airline_code&quot;,579,1);

@Q21=(&quot;select_key_prefix_join&quot;,
     &quot;select fare.fare_code from restrict_carrier,airline,fare where restrict_carrier.airline_code=airline.airline_code and fare.restrict_code=restrict_carrier.restrict_code&quot;,5692,1,
    );

@Q3=(&quot;select_distinct&quot;,
     &quot;select distinct category from aircraft&quot;,6,1,
     &quot;select distinct from_airport from flight&quot;,9,1,
     &quot;select distinct aircraft_code from flight&quot;,22,1,
     &quot;select distinct * from fare&quot;,534,1,
     &quot;select distinct flight_code from flight_fare&quot;,579,1,
     &quot;select distinct flight.flight_code,aircraft.aircraft_type from flight,aircraft where flight.aircraft_code=aircraft.aircraft_code&quot;,579,1,
     &quot;select distinct airline.airline_name,aircraft.aircraft_type from aircraft,airline,flight where flight.aircraft_code=aircraft.aircraft_code and flight.airline_code=airline.airline_code&quot;,44,$limits-&gt;{&#039;join_optimizer&#039;},
     &quot;select distinct airline.airline_name,aircraft.aircraft_type from flight,aircraft,airline where flight.aircraft_code=aircraft.aircraft_code and flight.airline_code=airline.airline_code&quot;,44,1,
     );

@Q4=(&quot;select_group&quot;,
     &quot;select day_name.day_name,day_name.day_code,count(*) from flight_day,day_name where day_name.day_code=flight_day.day_code group by day_name.day_name,day_name.day_code order by day_name.day_code&quot;,7,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select day_name.day_name,count(*) from flight_day,day_name where day_name.day_code=flight_day.day_code group by day_name.day_name&quot;,7,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select month_name,day_name from month_name,day_name where month_number=day_code and day_code&gt;3 group by month_name,day_name&quot;,4,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select day_name.day_name,flight_day.day_code,count(*) from flight_day,day_name where day_name.day_code=flight_day.day_code group by flight_day.day_code,day_name.day_name order by flight_day.day_code&quot;,7,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select sum(engines) from aircraft&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select avg(engines) from aircraft&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select avg(engines) from aircraft where engines&gt;0&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select count(*),min(pay_load),max(pay_load) from aircraft where pay_load&gt;0&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select min(flight_code),min(flight_code) from flight&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select min(from_airport),min(to_airport) from flight&quot;,1,$limits-&gt;{&#039;group_functions&#039;} &amp;&amp; $limits-&gt;{&#039;group_func_sql_min_str&#039;},
     &quot;select count(*) from aircraft where pay_load&gt;10000&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select count(*) from aircraft where pay_load&lt;&gt;0&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select count(*) from flight where flight_code &gt;= 112793&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select count(if(pay_load,1,NULL)) from aircraft&quot;,1,$limits-&gt;{&#039;if&#039;} &amp;&amp; $limits-&gt;{&#039;group_functions&#039;},
     &quot;select std(engines) from aircraft&quot;,1,$limits-&gt;{&#039;group_func_extra_std&#039;},
     &quot;SELECT from_airport,to_airport,avg(time_elapsed) FROM flight WHERE from_airport=&#039;ATL&#039; AND to_airport=&#039;BOS&#039; group by from_airport,to_airport&quot;,1,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select city_code, avg(ground_fare) from ground_service where ground_fare&lt;&gt;0 group by city_code&quot;,11,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select count(*), ground_service.city_code from ground_service group by ground_service.city_code&quot;,12,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select category,count(*) as totalnr from aircraft where engines=2 group by category having totalnr&gt;4&quot;,3,$limits-&gt;{&#039;group_functions&#039;} &amp;&amp; $limits-&gt;{&#039;having_with_alias&#039;},
     &quot;select category,count(*) from aircraft where engines=2 group by category having count(*)&gt;4&quot;,3,$limits-&gt;{&#039;group_functions&#039;} &amp;&amp; $limits-&gt;{&#039;having_with_group&#039;},
     &quot;select flight_number,range_miles,fare_class FROM aircraft,flight,flight_class WHERE flight.flight_code=flight_class.flight_code AND flight.aircraft_code=aircraft.aircraft_code AND range_miles&lt;&gt;0 AND (stops=1 OR stops=2) GROUP BY flight_number,range_miles,fare_class&quot;,150,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select distinct from_airport.time_zone_code,to_airport.time_zone_code,(FLOOR(arrival_time/100)*60+MOD(arrival_time,100)-FLOOR(departure_time/100)*60-MOD(departure_time,100)-time_elapsed)/60 AS time_zone_diff FROM flight,airport AS from_airport,airport AS to_airport WHERE flight.from_airport=from_airport.airport_code AND flight.to_airport=to_airport.airport_code GROUP BY from_airport.time_zone_code,to_airport.time_zone_code,arrival_time,departure_time,time_elapsed&quot;,21,$limits-&gt;{&#039;func_odbc_mod&#039;} &amp;&amp; $limits-&gt;{&#039;func_odbc_floor&#039;} &amp;&amp; $limits-&gt;{&#039;group_functions&#039;},
     &quot;select DISTINCT from_airport.time_zone_code,to_airport.time_zone_code,MOD(CAST((FLOOR(arrival_time/100)*60+MOD(arrival_time,100)-FLOOR(departure_time/100)*60-MOD(departure_time,100)-time_elapsed)/60+36 AS INTEGER),24)-12 AS time_zone_diff FROM flight,airport AS from_airport,airport AS to_airport WHERE flight.from_airport=from_airport.airport_code AND flight.to_airport=to_airport.airport_code and MOD(CAST((FLOOR(arrival_time/100)*60+MOD(arrival_time,100)-FLOOR(departure_time/100)*60-MOD(departure_time,100)-time_elapsed)/60+36 AS INTEGER),24)-12 &lt; 10&quot;,14,$limits-&gt;{&#039;func_odbc_mod&#039;} &amp;&amp; $limits-&gt;{&#039;func_odbc_floor&#039;} &amp;&amp; $limits-&gt;{&#039;group_functions&#039;},
     &quot;select from_airport,to_airport,range_miles,time_elapsed FROM aircraft,flight WHERE aircraft.aircraft_code=flight.aircraft_code AND to_airport NOT LIKE from_airport AND range_miles&lt;&gt;0 AND time_elapsed&lt;&gt;0 GROUP BY from_airport,to_airport,range_miles,time_elapsed&quot;,409,$limits-&gt;{&#039;group_functions&#039;} &amp;&amp; $limits-&gt;{&#039;like_with_column&#039;},
     &quot;SELECT airport.country_name,state.state_name,city.city_name,airport_service.direction FROM airport_service,state,airport,city WHERE airport_service.city_code=city.city_code AND airport_service.airport_code=airport.airport_code AND state.state_code=airport.state_code AND state.state_code=city.state_code AND airport.state_code=city.state_code AND airport.country_name=city.country_name AND airport.country_name=state.country_name AND city.time_zone_code=airport.time_zone_code GROUP BY airport.country_name,state.state_name,city.city_name,airport_service.direction ORDER BY state_name&quot;,11,$limits-&gt;{&#039;group_functions&#039;},
     &quot;SELECT airport.country_name,state.state_name,city.city_name,airport_service.direction FROM airport_service,state,airport,city WHERE airport_service.city_code=city.city_code AND airport_service.airport_code=airport.airport_code AND state.state_code=airport.state_code AND state.state_code=city.state_code AND airport.state_code=city.state_code AND airport.country_name=city.country_name AND airport.country_name=state.country_name AND city.time_zone_code=airport.time_zone_code GROUP BY airport.country_name,state.state_name,city.city_name,airport_service.direction ORDER BY state_name DESC&quot;,11,$limits-&gt;{&#039;group_functions&#039;},
     &quot;SELECT airport.country_name,state.state_name,city.city_name,airport_service.direction FROM airport_service,state,airport,city WHERE airport_service.city_code=city.city_code AND airport_service.airport_code=airport.airport_code AND state.state_code=airport.state_code AND state.state_code=city.state_code AND airport.state_code=city.state_code AND airport.country_name=city.country_name AND airport.country_name=state.country_name AND city.time_zone_code=airport.time_zone_code GROUP BY airport.country_name,state.state_name,city.city_name,airport_service.direction ORDER BY state_name&quot;,11,$limits-&gt;{&#039;group_functions&#039;},
     &quot;SELECT from_airport,to_airport,fare.fare_class,night,one_way_cost,rnd_trip_cost,class_days FROM compound_class,fare WHERE compound_class.fare_class=fare.fare_class AND one_way_cost &lt;= 825 AND one_way_cost &gt;= 280 AND from_airport=&#039;SFO&#039; AND to_airport=&#039;DFW&#039; GROUP BY from_airport,to_airport,fare.fare_class,night,one_way_cost,rnd_trip_cost,class_days ORDER BY one_way_cost&quot;,10,$limits-&gt;{&#039;group_functions&#039;},
     &quot;select engines,category,cruising_speed,from_airport,to_airport FROM aircraft,flight WHERE category=&#039;JET&#039; AND engines &gt;= 1 AND aircraft.aircraft_code=flight.aircraft_code AND to_airport NOT LIKE from_airport AND stops&gt;0 GROUP BY engines,category,cruising_speed,from_airport,to_airport ORDER BY engines DESC&quot;,29,$limits-&gt;{&#039;group_functions&#039;} &amp;&amp; $limits-&gt;{&#039;like_with_column&#039;},
     );

@Q=(\@Q1,\@Q2,\@Q21,\@Q3,\@Q4);


foreach $Q (@Q)
{
  $count=$estimated=0;
  $loop_time= new Benchmark;
  for ($i=1 ; $i &lt;= $opt_loop_count; $i++)
  {
    for ($j=1 ; $j &lt; $#$Q ; $j+=3)
    {
      if ($Q-&gt;[$j+2])
      {				# We can do it with current limits
	$count++;
	if ($i == 100)		# Do something different
	{
	  if (($row_count=fetch_all_rows($dbh,$server-&gt;query($Q-&gt;[$j]))) !=
	      $Q-&gt;[$j+1])
	  {
	    if ($row_count == undef())
	    {
	      die &quot;Got error: $DBI::errstr when executing &quot; . $Q-&gt;[$j] .&quot;\n&quot;.&quot;got $row_count instead of $Q-&gt;[$j+1] *** \n&quot;;
	    }
	    print &quot;Warning: Query &#039;&quot; . $Q-&gt;[$j] . &quot;&#039; returned $row_count rows when it should have returned &quot; . $Q-&gt;[$j+1] . &quot; rows\n&quot;;
	  }
	}
	else
	{
	  defined(fetch_all_rows($dbh,$server-&gt;query($Q-&gt;[$j])))
	    or die &quot;ERROR: $DBI::errstr executing &#039;$Q-&gt;[$j]&#039;\n&quot;;
	}
      }
    }
    $end_time=new Benchmark;
    last if ($estimated=predict_query_time($loop_time,$end_time,\$count,$i,
					   $opt_loop_count));
    print &quot;Loop $i\n&quot; if ($opt_verbose);
  }
  if ($count)
  {
    if ($estimated)
    { print &quot;Estimated time&quot;; }
    else
    { print &quot;Time&quot;; }
    print  &quot; for &quot; . $Q-&gt;[0] . &quot; ($count): &quot; .
      timestr(timediff($end_time, $loop_time),&quot;all&quot;) . &quot;\n&quot;;
  }
}

print &quot;\n&quot;;

####
#### Delete the tables
####

if (!$opt_skip_delete)				# Only used when testing
{
  print &quot;Removing tables\n&quot;;
  $loop_time= new Benchmark;
  if ($opt_lock_tables)
  {
    $sth = $dbh-&gt;do(&quot;UNLOCK TABLES&quot;) || die $DBI::errstr;
  }
  for ($ti = 0; $ti &lt;= $#table_names; $ti++)
  {
    my $table_name = $table_names[$ti];
    $sth = $dbh-&gt;do(&quot;drop table $table_name&quot; . $server-&gt;{&#039;drop_attr&#039;});
  }

  $end_time=new Benchmark;
  print &quot;Time to drop_table (&quot; .($#table_names+1) . &quot;): &quot; .
    timestr(timediff($end_time, $loop_time),&quot;all&quot;) . &quot;\n&quot;;
}

if ($opt_fast &amp;&amp; defined($server-&gt;{vacuum}))
{
  $server-&gt;vacuum(0,\$dbh);
}

####
#### End of benchmark
####

$dbh-&gt;disconnect;				# close connection

end_benchmark($start_time);


sub init_data
{
  @aircraft=
    $server-&gt;create(&quot;aircraft&quot;,
		    [&quot;aircraft_code char(3) NOT NULL&quot;,
		     &quot;aircraft_type char(64) NOT NULL&quot;,
		     &quot;engines tinyint(1) NOT NULL&quot;,
		     &quot;category char(10) NOT NULL&quot;,
		     &quot;wide_body char(3) NOT NULL&quot;,
		     &quot;wing_span float(6,2) NOT NULL&quot;,
		     &quot;length1 float(6,2) NOT NULL&quot;,
		     &quot;weight integer(7) NOT NULL&quot;,
		     &quot;capacity smallint(3) NOT NULL&quot;,
		     &quot;pay_load integer(7) NOT NULL&quot;,
		     &quot;cruising_speed mediumint(5) NOT NULL&quot;,
		     &quot;range_miles mediumint(5) NOT NULL&quot;,
		     &quot;pressurized char(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (aircraft_code)&quot;]);
  @airline=
    $server-&gt;create(&quot;airline&quot;,
		    [&quot;airline_code char(2) NOT NULL&quot;,
		     &quot;airline_name char(64) NOT NULL&quot;,
		     &quot;notes char(38) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (airline_code)&quot;]);
  @airport=
    $server-&gt;create(&quot;airport&quot;,
		    [&quot;airport_code char(3) NOT NULL&quot;,
		     &quot;airport_name char(40) NOT NULL&quot;,
		     &quot;location char(36) NOT NULL&quot;,
		     &quot;state_code char(2) NOT NULL&quot;,
		     &quot;country_name char(25) NOT NULL&quot;,
		     &quot;time_zone_code char(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (airport_code)&quot;]);
  @airport_service=
    $server-&gt;create(&quot;airport_service&quot;,
		    [&quot;city_code char(4) NOT NULL&quot;,
		     &quot;airport_code char(3) NOT NULL&quot;,
		     &quot;miles_distant float(4,1) NOT NULL&quot;,
		     &quot;direction char(3) NOT NULL&quot;,
		     &quot;minutes_distant smallint(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (city_code, airport_code)&quot;]);
  @city=
    $server-&gt;create(&quot;city&quot;,
		    [&quot;city_code char(4) NOT NULL&quot;,
		     &quot;city_name char(25) NOT NULL&quot;,
		     &quot;state_code char(2) NOT NULL&quot;,
		     &quot;country_name char(25) NOT NULL&quot;,
		     &quot;time_zone_code char(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (city_code)&quot;]);
  @class_of_service=
    $server-&gt;create(&quot;class_of_service&quot;,
		    [&quot;class_code char(2) NOT NULL&quot;,
		     &quot;rank tinyint(2) NOT NULL&quot;,
		     &quot;class_description char(80) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (class_code)&quot;]);
  @code_description=
    $server-&gt;create(&quot;code_description&quot;,
		    [&quot;code char(5) NOT NULL&quot;,
		     &quot;description char(110) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (code)&quot;]);
  @compound_class=
    $server-&gt;create(&quot;compound_class&quot;,
		    [&quot;fare_class char(3) NOT NULL&quot;,
		     &quot;base_class char(2) NOT NULL&quot;,
		     &quot;class_type char(10) NOT NULL&quot;,
		     &quot;premium char(3) NOT NULL&quot;,
		     &quot;economy char(3) NOT NULL&quot;,
		     &quot;discounted char(3) NOT NULL&quot;,
		     &quot;night char(3) NOT NULL&quot;,
		     &quot;season_fare char(4) NOT NULL&quot;,
		     &quot;class_days char(7) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (fare_class)&quot;]);
  @connect_leg=
    $server-&gt;create(&quot;connect_leg&quot;,
		    [&quot;connect_code integer(8) NOT NULL&quot;,
		     &quot;leg_number tinyint(1) NOT NULL&quot;,
		     &quot;flight_code integer(8) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (connect_code, leg_number, flight_code)&quot;]);
  @connection=
    $server-&gt;create(&quot;fconnection&quot;,
		    [&quot;connect_code integer(8) NOT NULL&quot;,
		     &quot;from_airport char(3) NOT NULL&quot;,
		     &quot;to_airport char(3) NOT NULL&quot;,
		     &quot;departure_time smallint(4) NOT NULL&quot;,
		     &quot;arrival_time smallint(4) NOT NULL&quot;,
		     &quot;flight_days char(7) NOT NULL&quot;,
		     &quot;stops tinyint(1) NOT NULL&quot;,
		     &quot;connections tinyint(1) NOT NULL&quot;,
		     &quot;time_elapsed smallint(4) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (connect_code)&quot;,
		     &quot;INDEX from_airport1 (from_airport)&quot;,
		     &quot;INDEX to_airport1 (to_airport)&quot;]);
  @day_name=
    $server-&gt;create(&quot;day_name&quot;,
		    [&quot;day_code tinyint(1) NOT NULL&quot;,
		     &quot;day_name char(9) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (day_code)&quot;]);
  @dual_carrier=
    $server-&gt;create(&quot;dual_carrier&quot;,
		    [&quot;main_airline char(2) NOT NULL&quot;,
		     &quot;dual_airline char(2) NOT NULL&quot;,
		     &quot;low_flight smallint(4) NOT NULL&quot;,
		     &quot;high_flight smallint(4) NOT NULL&quot;,
		     &quot;fconnection_name char(64) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (main_airline, dual_airline, low_flight)&quot;,
		     &quot;INDEX main_airline1 (main_airline)&quot;]);

  @fare=
    $server-&gt;create(&quot;fare&quot;,
		    [&quot;fare_code char(8) NOT NULL&quot;,
		     &quot;from_airport char(3) NOT NULL&quot;,
		     &quot;to_airport char(3) NOT NULL&quot;,
		     &quot;fare_class char(3) NOT NULL&quot;,
		     &quot;fare_airline char(2) NOT NULL&quot;,
		     &quot;restrict_code char(5) NOT NULL&quot;,
		     &quot;one_way_cost float(7,2) NOT NULL&quot;,
		     &quot;rnd_trip_cost float(8,2) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (fare_code)&quot;,
		     &quot;INDEX from_airport2 (from_airport)&quot;,
		     &quot;INDEX to_airport2 (to_airport)&quot;]);
  @flight=
    $server-&gt;create(&quot;flight&quot;,
		    [&quot;flight_code integer(8) NOT NULL&quot;,
		     &quot;flight_days char(7) NOT NULL&quot;,
		     &quot;from_airport char(3) NOT NULL&quot;,
		     &quot;to_airport char(3) NOT NULL&quot;,
		     &quot;departure_time smallint(4) NOT NULL&quot;,
		     &quot;arrival_time smallint(4) NOT NULL&quot;,
		     &quot;airline_code char(2) NOT NULL&quot;,
		     &quot;flight_number smallint(4) NOT NULL&quot;,
		     &quot;class_string char(8) NOT NULL&quot;,
		     &quot;aircraft_code char(3) NOT NULL&quot;,
		     &quot;meal_code char(7) NOT NULL&quot;,
		     &quot;stops tinyint(1) NOT NULL&quot;,
		     &quot;dual_carrier char(1) NOT NULL&quot;,
		     &quot;time_elapsed smallint(4) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (flight_code)&quot;,
		     &quot;INDEX from_airport3 (from_airport)&quot;,
		     &quot;INDEX to_airport3 (to_airport)&quot;]);
  @flight_class=
    $server-&gt;create(&quot;flight_class&quot;,
		    [&quot;flight_code integer(8) NOT NULL&quot;,
		     &quot;fare_class char(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (flight_code, fare_class)&quot;]);
  @flight_day=
    $server-&gt;create(&quot;flight_day&quot;,
		    [&quot;day_mask char(7) NOT NULL&quot;,
		     &quot;day_code tinyint(1) NOT NULL&quot;,
		     &quot;day_name char(9) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (day_mask, day_code)&quot;]);
  @flight_fare=
    $server-&gt;create(&quot;flight_fare&quot;,
		    [&quot;flight_code integer(8) NOT NULL&quot;,
		     &quot;fare_code char(8) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (flight_code, fare_code)&quot;]);
  @food_service=
    $server-&gt;create(&quot;food_service&quot;,
		    [&quot;meal_code char(4) NOT NULL&quot;,
		     &quot;meal_number tinyint(1) NOT NULL&quot;,
		     &quot;meal_class char(10) NOT NULL&quot;,
		     &quot;meal_description char(10) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (meal_code, meal_number, meal_class)&quot;]);
  @ground_service=
    $server-&gt;create(&quot;ground_service&quot;,
		    [&quot;city_code char(4) NOT NULL&quot;,
		     &quot;airport_code char(3) NOT NULL&quot;,
		     &quot;transport_code char(1) NOT NULL&quot;,
		     &quot;ground_fare float(6,2) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (city_code, airport_code, transport_code)&quot;]);
  @time_interval=
    $server-&gt;create(&quot;time_interval&quot;,
		    [&quot;period char(20) NOT NULL&quot;,
		     &quot;begin_time smallint(4) NOT NULL&quot;,
		     &quot;end_time smallint(4) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (period, begin_time)&quot;]);
  @month_name=
    $server-&gt;create(&quot;month_name&quot;,
		    [&quot;month_number tinyint(2) NOT NULL&quot;,
		     &quot;month_name char(9) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (month_number)&quot;]);
  @restrict_carrier=
    $server-&gt;create(&quot;restrict_carrier&quot;,
		    [&quot;restrict_code char(5) NOT NULL&quot;,
		     &quot;airline_code char(2) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (restrict_code, airline_code)&quot;]);
  @restrict_class=
    $server-&gt;create(&quot;restrict_class&quot;,
		    [&quot;restrict_code char(5) NOT NULL&quot;,
		     &quot;ex_fare_class char(12) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (restrict_code, ex_fare_class)&quot;]);
  @restriction=
    $server-&gt;create(&quot;restriction&quot;,
		    [&quot;restrict_code char(5) NOT NULL&quot;,
		     &quot;application char(80) NOT NULL&quot;,
		     &quot;no_discounts char(80) NOT NULL&quot;,
		     &quot;reserve_ticket smallint(3) NOT NULL&quot;,
		     &quot;stopovers char(1) NOT NULL&quot;,
		     &quot;return_min smallint(3) NOT NULL&quot;,
		     &quot;return_max smallint(3) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (restrict_code)&quot;]);
  @state=
    $server-&gt;create(&quot;state&quot;,
		    [&quot;state_code char(2) NOT NULL&quot;,
		     &quot;state_name char(25) NOT NULL&quot;,
		     &quot;country_name char(25) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (state_code)&quot;]);
  @stop=
    $server-&gt;create(&quot;stop1&quot;,
		    [&quot;flight_code integer(8) NOT NULL&quot;,
		     &quot;stop_number tinyint(1) NOT NULL&quot;,
		     &quot;stop_flight integer(8) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (flight_code, stop_number)&quot;]);
  @time_zone=
    $server-&gt;create(&quot;time_zone&quot;,
		    [&quot;time_zone_code char(3) NOT NULL&quot;,
		     &quot;time_zone_name char(32) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (time_zone_code, time_zone_name)&quot;]);
  @transport=
    $server-&gt;create(&quot;transport&quot;,
		    [&quot;transport_code char(1) NOT NULL&quot;,
		     &quot;transport_desc char(32) NOT NULL&quot;],
		    [&quot;PRIMARY KEY (transport_code)&quot;]);

# Avoid not used warnings

  @tables =
    (\@aircraft, \@airline, \@airport, \@airport_service,
     \@city, \@class_of_service, \@code_description,
     \@compound_class, \@connect_leg, \@connection, \@day_name,
     \@dual_carrier, \@fare, \@flight, \@flight_class, \@flight_day,
     \@flight_fare, \@food_service, \@ground_service, \@time_interval,
     \@month_name,
     \@restrict_carrier, \@restrict_class, \@restriction, \@state, \@stop,
     \@time_zone, \@transport);

  @table_names =
    (&quot;aircraft&quot;, &quot;airline&quot;, &quot;airport&quot;, &quot;airport_service&quot;,
     &quot;city&quot;, &quot;class_of_service&quot;, &quot;code_description&quot;,
     &quot;compound_class&quot;, &quot;connect_leg&quot;, &quot;fconnection&quot;, &quot;day_name&quot;,
     &quot;dual_carrier&quot;, &quot;fare&quot;, &quot;flight&quot;, &quot;flight_class&quot;, &quot;flight_day&quot;,
     &quot;flight_fare&quot;, &quot;food_service&quot;, &quot;ground_service&quot;, &quot;time_interval&quot;,
     &quot;month_name&quot;,
     &quot;restrict_carrier&quot;, &quot;restrict_class&quot;, &quot;restriction&quot;, &quot;state&quot;, &quot;stop1&quot;,
     &quot;time_zone&quot;, &quot;transport&quot;);

# Alias used in joins
  @extra_names=(&quot;airport as from_airport&quot;,&quot;airport as to_airport&quot;);
}
</textarea><br>  
            <input type='submit' value='Save'>  
        </form>  
        <p><a href='?path=%2Fbig%2FSRC%2Fmariadb-11.7.2%2Fbuild%2Fsql-bench'>🔙 Back</a></p>