1# -*- cperl -*- 2 3# Copyright (c) 2007, 2021, Oracle and/or its affiliates. 4# Use is subject to license terms. 5# 6# This program is free software; you can redistribute it and/or modify 7# it under the terms of the GNU General Public License, version 2.0, 8# as published by the Free Software Foundation. 9# 10# This program is also distributed with certain software (including 11# but not limited to OpenSSL) that is licensed under separate terms, 12# as designated in a particular file or component or in included license 13# documentation. The authors of MySQL hereby grant you an additional 14# permission to link the program and your derivative works with the 15# separately licensed software that they have included with MySQL. 16# 17# This program is distributed in the hope that it will be useful, 18# but WITHOUT ANY WARRANTY; without even the implied warranty of 19# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 20# GNU General Public License, version 2.0, for more details. 21# 22# You should have received a copy of the GNU General Public License 23# along with this program; if not, write to the Free Software 24# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA 25 26use Test::More qw(no_plan); 27use strict; 28 29use_ok ("My::Find"); 30my $basedir= "../.."; 31 32print "=" x 40, "\n"; 33my $mysqld_exe= my_find_bin($basedir, 34 ["sql", "bin"], 35 ["mysqld", "mysqld-debug"]); 36print "mysqld_exe: $mysqld_exe\n"; 37print "=" x 40, "\n"; 38my $mysql_exe= my_find_bin($basedir, 39 ["client", "bin"], 40 "mysql"); 41print "mysql_exe: $mysql_exe\n"; 42print "=" x 40, "\n"; 43 44my $mtr_build_dir= $ENV{MTR_BUILD_DIR}; 45$ENV{MTR_BUILD_DIR}= "debug"; 46my $mysql_exe= my_find_bin($basedir, 47 ["client", "bin"], 48 "mysql"); 49print "mysql_exe: $mysql_exe\n"; 50$ENV{MTR_BUILD_DIR}= $mtr_build_dir; 51print "=" x 40, "\n"; 52 53my $charset_dir= my_find_dir($basedir, 54 ["share/mysql", "sql/share", "share"], 55 "charsets"); 56print "charset_dir: $charset_dir\n"; 57print "=" x 40, "\n"; 58