add lazysql menu action
This commit is contained in:
@ -415,7 +415,8 @@ rec {
|
|||||||
mariadb.client
|
mariadb.client
|
||||||
# dbeaver-bin
|
# dbeaver-bin
|
||||||
# beekeeper-studio
|
# beekeeper-studio
|
||||||
tableplus
|
# tableplus
|
||||||
|
lazysql
|
||||||
iwasm
|
iwasm
|
||||||
wamrc
|
wamrc
|
||||||
fail-bin
|
fail-bin
|
||||||
|
|||||||
@ -255,8 +255,7 @@ sub select_experiment {
|
|||||||
}
|
}
|
||||||
|
|
||||||
my @selected_experiments =
|
my @selected_experiments =
|
||||||
TUI::select_from_list( "Select Archived Experiment to Open",
|
TUI::select_from_list( "Select Experiment", $multi, @exp_with_notes );
|
||||||
$multi, @exp_with_notes );
|
|
||||||
die "No experiment selected" unless @selected_experiments;
|
die "No experiment selected" unless @selected_experiments;
|
||||||
|
|
||||||
map { s/(.*?)\s+\(Note:.+\)$/$1/ } @selected_experiments;
|
map { s/(.*?)\s+\(Note:.+\)$/$1/ } @selected_experiments;
|
||||||
|
|||||||
@ -41,6 +41,10 @@ my $resultbrowser = 'resultbrowser.py';
|
|||||||
my $remote_root = '/home/lab/smchurla/Documents/failnix';
|
my $remote_root = '/home/lab/smchurla/Documents/failnix';
|
||||||
my $remote_builds_dir = "$remote_root/builds";
|
my $remote_builds_dir = "$remote_root/builds";
|
||||||
|
|
||||||
|
my $db_host = "127.0.0.1";
|
||||||
|
my $db_port = "3306";
|
||||||
|
my $db_user = "smchurla";
|
||||||
|
|
||||||
my %handlers = (
|
my %handlers = (
|
||||||
'01. Build Experiments' => sub { do "$local_scripts_dir/build.pl"; },
|
'01. Build Experiments' => sub { do "$local_scripts_dir/build.pl"; },
|
||||||
|
|
||||||
@ -238,7 +242,18 @@ my %handlers = (
|
|||||||
"--port=$resultbrowser_port" );
|
"--port=$resultbrowser_port" );
|
||||||
},
|
},
|
||||||
|
|
||||||
'14. Compare Experiment Results' => sub {
|
'14. Open Database in LazySQL' => sub {
|
||||||
|
my $experiment =
|
||||||
|
Util::select_experiment(0) =~ s/T(\d\d)-(\d\d)-(\d\d)/T$1:$2:$3/r;
|
||||||
|
my $ssh = Mars::ssh_connect();
|
||||||
|
my $db_password = Mars::read_db_password_file();
|
||||||
|
|
||||||
|
system( 'lazysql', '-read-only',
|
||||||
|
"mariadb://$db_user:$db_password\@$db_host:$db_port/${db_user}_$experiment"
|
||||||
|
);
|
||||||
|
},
|
||||||
|
|
||||||
|
'15. Compare Experiment Results' => sub {
|
||||||
|
|
||||||
my @selected_experiments = Util::select_experiment(1);
|
my @selected_experiments = Util::select_experiment(1);
|
||||||
|
|
||||||
@ -304,7 +319,7 @@ my %handlers = (
|
|||||||
0, @entries );
|
0, @entries );
|
||||||
},
|
},
|
||||||
|
|
||||||
'15. Plot Results' => sub {
|
'16. Plot Results' => sub {
|
||||||
|
|
||||||
# Generate R ggplot2 charts
|
# Generate R ggplot2 charts
|
||||||
my @experiments = Util::find_subdirs($local_archive_dir);
|
my @experiments = Util::find_subdirs($local_archive_dir);
|
||||||
@ -341,7 +356,7 @@ my %handlers = (
|
|||||||
}
|
}
|
||||||
},
|
},
|
||||||
|
|
||||||
'16. Run Build in GDB' => sub {
|
'17. Run Build in GDB' => sub {
|
||||||
my @builds = grep { /linux/ } Util::find_subdirs($local_builds_dir);
|
my @builds = grep { /linux/ } Util::find_subdirs($local_builds_dir);
|
||||||
my @selected_builds =
|
my @selected_builds =
|
||||||
TUI::select_from_list( "Select Build to Run in GDB", 0, @builds );
|
TUI::select_from_list( "Select Build to Run in GDB", 0, @builds );
|
||||||
|
|||||||
Reference in New Issue
Block a user