Default page

Your IP: 216.73.216.124
Server IP: 50.28.103.30
Server: Linux host.jcukjv-lwsites.com 4.18.0-553.22.1.el8_10.x86_64 #1 SMP Tue Sep 24 05:16:59 EDT 2024 x86_64
Server Software: nginx/1.28.0
PHP Version: 8.3.12
Buat File | Buat Folder

Dir : ~/www/server/mysql/mysql-test/suite/ndb/include/

View File Name : ndb_get_blob_tables.inc

#
# ndb_get_blob_tables.inc - get blob tables names for all blob columns
#
# Usage:
# let ndb_database= <table database>;
# let ndb_table= <table name>;
# --source suite/ndb/include/ndb_get_blob_tables.inc
#
# For each blob column where will be a variable
#   $bt_<table database>_<table_name>_<column_name>
# with the blob table name (with escaped $)
#

let ndb_get_blob_tables_result_file= $MYSQLTEST_VARDIR/tmp/ndb_get_blob_tables_result.inc;
--perl
my $db = $ENV{ndb_database} or die "Missing ndb_database in environment";
my $tbl = $ENV{ndb_table} or die "Missing ndb_table in environment";
my $cmd = "$ENV{NDB_DESC} -d$db $tbl";

open RUN, "$cmd|";
open RES, ">$ENV{ndb_get_blob_tables_result_file}";
while (<RUN>)
{
  if (/(\w+) .* BT=(NDB.BLOB_\d+_\d+).*/)
  {
    my $column = $1;
    my $blob_table = $2;
    $blob_table =~ s/\$/\\\$/g;
    print RES "let \$bt_${db}_${tbl}_${column} = ".$blob_table.";\n";
  }
}
close RES;
close RUN;
EOF

let ndb_database=;
let ndb_table=;

--source $ndb_get_blob_tables_result_file
--remove_file $ndb_get_blob_tables_result_file