Added rofi menu scripts
This commit is contained in:
158
rofi_menu.pl
Executable file
158
rofi_menu.pl
Executable file
@@ -0,0 +1,158 @@
|
||||
#!/usr/bin/env perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use Data::Dumper;
|
||||
|
||||
# Launch this with 'rofi' with something like this:
|
||||
#
|
||||
# % rofi -show Select -modes "Select:~/bin/rofi_menu.pl"
|
||||
|
||||
my $selection = $ARGV[0];
|
||||
|
||||
my $app = {};
|
||||
|
||||
if (defined $selection) {
|
||||
select_option($app, $selection);
|
||||
} else {
|
||||
show_options($app);
|
||||
}
|
||||
|
||||
# -----------
|
||||
# Subroutines
|
||||
# -----------
|
||||
sub show_options {
|
||||
my ($app) = @_;
|
||||
|
||||
my @categories = qw(Apps Tools Settings);
|
||||
print join ("\n", @categories);
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub select_option {
|
||||
my ($app, $selection) = @_;
|
||||
|
||||
warn "Selected: $selection\n";
|
||||
|
||||
if ($selection eq 'Apps') {
|
||||
show_apps($app);
|
||||
} elsif ($selection eq 'Tools') {
|
||||
show_tools($app);
|
||||
} elsif ($selection eq 'Settings') {
|
||||
show_settings($app);
|
||||
} elsif (my ($sub_app) = $selection =~ /^Apps:(.*)/) {
|
||||
app_launch($app, $sub_app);
|
||||
} elsif (my ($sub_tool) = $selection =~ /^Tools:(.*)/) {
|
||||
tool_launch($app, $sub_tool);
|
||||
} elsif (my ($sub_setting) = $selection =~ /^Settings:(.*)/) {
|
||||
setting_launch($app, $sub_setting);
|
||||
}
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub show_apps {
|
||||
my ($app) = @_;
|
||||
my @apps = qw(Gimp VSCode Antigravity Chrome);
|
||||
|
||||
print join ("\n", map { "Apps:$_" } @apps);
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub show_tools {
|
||||
my ($app) = @_;
|
||||
my @apps = qw(Neovide Wezterm Calculator Audio);
|
||||
|
||||
print join ("\n", map { "Tools:$_" } @apps);
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub show_settings {
|
||||
my ($app) = @_;
|
||||
my @apps = qw(Neovim Ghostty Git MPD ncmpcpp);
|
||||
|
||||
print join ("\n", map { "Settings:$_" } @apps);
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub app_launch {
|
||||
my ($app, $sub_app) = @_;
|
||||
|
||||
if ($sub_app eq "Gimp") {
|
||||
launch_program($app, '/usr/bin/gimp');
|
||||
} elsif ($sub_app eq "Antigravity") {
|
||||
launch_program($app, '~/bin/dwl_antigravity');
|
||||
} elsif ($sub_app eq "VSCode") {
|
||||
launch_program($app, '/opt/vscode/VSCode-linux-x64/code',
|
||||
'--enable-features=UseOzonePlatform,WaylandWindowDecorations',
|
||||
'--ozone-platform-hint=auto',
|
||||
'--unity-launch');
|
||||
} elsif ($sub_app eq "Chrome") {
|
||||
launch_program($app, 'chromium',
|
||||
'--enable-features=UseOzonePlatform,WaylandWindowDecorations',
|
||||
'--ozone-platform=wayland',
|
||||
'--ozone-platform-hint=auto',
|
||||
'--unity-launch');
|
||||
}
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub tool_launch {
|
||||
my ($app, $sub_tool) = @_;
|
||||
|
||||
if ($sub_tool eq "Neovide") {
|
||||
launch_program($app, 'neovide', '--fork');
|
||||
} elsif ($sub_tool eq "Wezterm") {
|
||||
launch_program($app, 'wezterm');
|
||||
} elsif ($sub_tool eq "Calculator") {
|
||||
launch_program($app, 'gnome-calculator');
|
||||
} elsif ($sub_tool eq "Audio") {
|
||||
launch_program($app, 'rofi', '-show', 'menu',
|
||||
'-modes', 'menu:~/bin/rofi_sound.pl');
|
||||
}
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub setting_launch {
|
||||
my ($app, $sub_setting) = @_;
|
||||
|
||||
if ($sub_setting eq "Neovim") {
|
||||
launch_program($app, 'neovide', '--fork', '~/.config/nvim/init.lua');
|
||||
} elsif ($sub_setting eq "Ghostty") {
|
||||
launch_program($app, 'neovide', '--fork', '~/.config/ghostty/config');
|
||||
} elsif ($sub_setting eq "Git") {
|
||||
launch_program($app, 'neovide', '--fork', '~/.gitconfig');
|
||||
} elsif ($sub_setting eq "MPD") {
|
||||
launch_program($app, 'neovide', '--fork', '~/.config/mpd/mpd.conf');
|
||||
} elsif ($sub_setting eq "ncmpcpp") {
|
||||
launch_program($app, 'neovide', '--fork', '~/.config/ncmpcpp/config');
|
||||
}
|
||||
}
|
||||
|
||||
# -----------
|
||||
sub launch_program {
|
||||
my ($app, @program) = @_;
|
||||
|
||||
my $prog = join(' ', @program);
|
||||
system("nohup $prog > /dev/null 2>&1 &");
|
||||
|
||||
exit(0);
|
||||
|
||||
# my $pid = fork();
|
||||
|
||||
# die "launch_program: couldn't fork: $!" unless defined $pid;
|
||||
|
||||
# if ($pid == 0) {
|
||||
# # Child process
|
||||
# # Detach from the parent process's session to survive terminal closure
|
||||
# # (optional but recommended for complete daemonization)
|
||||
# # Use 'setsid()' if available/needed. A simple exit of the parent may suffice.
|
||||
|
||||
# # Execute the new program in place of the child process
|
||||
# exec(@program) or die "Couldn't exec your program: $!";
|
||||
# } else {
|
||||
# # Parent process
|
||||
# print "Launched child process with PID $pid\n";
|
||||
# # Parent can do other things here, or simply exit
|
||||
# exit(0); # Exit the parent script
|
||||
# }
|
||||
}
|
||||
Reference in New Issue
Block a user