diff --git a/WebminCore.pm b/WebminCore.pm index 4f9418bae..728c8ebae 100644 --- a/WebminCore.pm +++ b/WebminCore.pm @@ -23,7 +23,7 @@ $main::export_to_caller = 1; # Add functions in web-lib-funcs.pl # Generated with : # grep -h "^sub " web-lib-funcs.pl ui-lib.pl | sed -e 's/sub //' | xargs echo -@EXPORT = qw(read_file read_file_cached read_file_cached_with_stat write_file html_escape html_unescape html_strip quote_escape quote_javascript tempname_dir tempname transname transname_timestamped trunc indexof indexoflc sysprint check_ipaddress check_ip6address generate_icon urlize un_urlize include copydata ReadParseMime ReadParse read_fully read_parse_mime_callback read_parse_mime_javascript PrintHeader header get_html_title get_html_framed_title get_html_status_line popup_header footer popup_footer load_module_preferences load_theme_library redirect kill_byname kill_byname_logged find_byname error error_stderr popup_error register_error_handler call_error_handlers error_setup wait_for fast_wait_for has_command make_date file_chooser_button popup_window_button popup_window_link read_acl acl_filename acl_check get_miniserv_config_file get_miniserv_config put_miniserv_config restart_miniserv reload_miniserv check_os_support http_download complete_http_download http_post ftp_download ftp_upload no_proxy open_socket download_timeout ftp_command to_ipaddress to_ip6address to_hostname icons_table replace_meta replace_file_line read_file_lines flush_file_lines unflush_file_lines unix_user_input unix_group_input hlink user_chooser_button group_chooser_button foreign_check foreign_exists foreign_available foreign_require foreign_call foreign_config foreign_installed foreign_defined get_system_hostname get_webmin_version get_webmin_version_release get_webmin_full_version get_module_acl get_group_module_acl save_module_acl save_group_module_acl init_config load_language_auto load_language text_subs text encode_base64 decode_base64 encode_base32 decode_base32 get_module_info get_all_module_infos list_themes get_theme_info list_locales list_languages safe_language read_env_file write_env_file lock_file unlock_file test_lock unlock_all_files can_lock_file webmin_log additional_log var_dump webmin_debug_log system_logged backquote_logged backquote_with_timeout backquote_command kill_logged rename_logged rename_file symlink_logged symlink_file link_file make_dir make_dir_recursive set_ownership_permissions unlink_logged unlink_file copy_permissions_source_dest copy_source_dest move_source_dest remote_session_name remote_foreign_require remote_foreign_call remote_foreign_check remote_foreign_config remote_eval remote_write remote_read remote_finished remote_error_setup remote_rpc_call remote_multi_callback remote_multi_callback_error serialise_variable unserialise_variable other_groups date_chooser_button help_file read_help_file seed_random disk_usage_kb recursive_disk_usage help_search_link make_http_connection validate_ssl_connection read_http_connection write_http_connection close_http_connection clean_environment reset_environment clean_language progress_callback switch_to_remote_user switch_to_unix_user eval_as_unix_user create_user_config_dirs create_missing_homedir filter_javascript resolve_links simplify_path same_file flush_webmin_caches list_usermods available_usermods get_available_module_infos get_visible_module_infos get_visible_modules_categories is_under_directory parse_http_url check_clicks_function load_entities_map entities_to_ascii get_product_name get_charset get_display_hostname save_module_config save_user_module_config nice_size get_perl_path get_goto_module select_all_link select_invert_link select_rows_link check_pid_file get_mod_lib module_root_directory list_mime_types guess_mime_type open_tempfile close_tempfile print_tempfile is_selinux_enabled get_clear_file_attributes reset_file_attributes cleanup_tempnames open_lock_tempfile END month_to_number number_to_month get_rbac_module_acl supports_rbac supports_ipv6 use_rbac_module_acl execute_command open_readfile open_execute_command translate_filename translate_command register_filename_callback register_command_callback capture_function_output capture_function_output_tempfile modules_chooser_button substitute_template substitute_pattern running_in_zone running_in_vserver running_in_xen running_in_openvz list_categories is_readonly_mode command_as_user list_osdn_mirrors convert_osdn_url get_current_dir supports_users supports_symlinks quote_path get_windows_root read_file_contents write_file_contents read_file_contents_limit unix_crypt split_quoted_string write_to_http_cache check_in_http_cache supports_javascript get_module_name get_module_variable clear_time_locale reset_time_locale callers_package web_libs_package get_userdb_string connect_userdb disconnect_userdb split_userdb_string uniquelc list_combined_webmin_menu list_modules_webmin_menu module_to_menu_item list_combined_system_info shell_is_bash compare_version_numbers convert_to_json convert_from_json print_json get_referer_relative get_webmin_email_url get_webmin_browser_url trim ui_link ui_help ui_img ui_link_button ui_table_start ui_table_end ui_table_row ui_table_hr ui_table_span ui_columns_start ui_columns_row ui_columns_header ui_checked_columns_row ui_radio_columns_row ui_columns_end ui_columns_table ui_form_columns_table ui_form_elements_wrapper ui_form_start ui_form_end ui_textbox ui_filebox ui_bytesbox ui_upload ui_password ui_hidden ui_select ui_multi_select ui_multi_select_javascript ui_radio ui_yesno_radio ui_checkbox ui_oneradio ui_textarea ui_user_textbox ui_users_textbox ui_group_textbox ui_groups_textbox ui_opt_textbox ui_submit ui_reset ui_button ui_date_input ui_buttons_start ui_buttons_end ui_buttons_row ui_buttons_hr ui_post_header ui_pre_footer ui_print_header ui_print_unbuffered_header ui_print_footer ui_config_link ui_print_endpage ui_subheading ui_links_row ui_hidden_javascript ui_hidden_start ui_hidden_end ui_hidden_table_row_start ui_hidden_table_row_end ui_hidden_table_start ui_hidden_table_end ui_tabs_start ui_tabs_end ui_tabs_start_tab ui_tabs_start_tabletab ui_tabs_end_tab ui_tabs_end_tabletab ui_max_text_width ui_radio_selector ui_radio_selector_javascript ui_grid_table ui_radio_table ui_up_down_arrows ui_hr ui_nav_link ui_confirmation_form ui_text_color ui_alert_box js_disable_inputs ui_page_flipper js_checkbox_disable js_redirect ui_webmin_link ui_line_break_double ui_page_refresh ui_details ui_div_row ui_space ui_newline ui_text_wrap ui_element_inline ui_paginations ui_hide_outside_of_viewport ui_read_file_contents_limit get_python_cmd get_buffer_size get_buffer_size_binary get_webprefix get_sub_ref_name setvar getvar delvar print_call_stack webmin_user_can_rpc webmin_user_login_mode webmin_user_is_admin webmin_user_is get_current_theme_info_cached miniserv_using_default_cert is_int float is_float parse_accepted_language get_default_system_locale get_http_redirect get_http_cookie create_wrapper); +@EXPORT = qw(read_file read_file_cached read_file_cached_with_stat write_file html_escape html_unescape html_strip quote_escape quote_javascript tempname_dir tempname transname transname_timestamped trunc indexof indexoflc sysprint check_ipaddress check_ip6address generate_icon urlize un_urlize include copydata ReadParseMime ReadParse read_fully read_parse_mime_callback read_parse_mime_javascript PrintHeader header get_html_title get_html_framed_title get_html_status_line popup_header footer popup_footer load_module_preferences load_theme_library redirect kill_byname kill_byname_logged find_byname error error_stderr popup_error register_error_handler call_error_handlers error_setup wait_for fast_wait_for has_command make_date file_chooser_button popup_window_button popup_window_link read_acl acl_filename acl_check get_miniserv_config_file get_miniserv_config put_miniserv_config restart_miniserv reload_miniserv check_os_support http_download complete_http_download http_post ftp_download ftp_upload no_proxy open_socket download_timeout ftp_command to_ipaddress to_ip6address to_hostname icons_table replace_meta replace_file_line read_file_lines flush_file_lines unflush_file_lines unix_user_input unix_group_input hlink user_chooser_button group_chooser_button foreign_check foreign_exists foreign_available foreign_require foreign_call foreign_config foreign_installed foreign_defined get_system_hostname get_webmin_version get_webmin_version_release get_webmin_full_version get_module_acl get_group_module_acl save_module_acl save_group_module_acl init_config load_language_auto load_language text_subs text encode_base64 decode_base64 encode_base32 decode_base32 get_module_info get_all_module_infos list_themes get_theme_info list_locales list_languages safe_language read_env_file write_env_file lock_file unlock_file test_lock unlock_all_files can_lock_file webmin_log additional_log var_dump webmin_debug_log system_logged backquote_logged backquote_with_timeout backquote_command kill_logged rename_logged rename_file symlink_logged symlink_file link_file make_dir make_dir_recursive set_ownership_permissions unlink_logged unlink_file copy_permissions_source_dest copy_source_dest move_source_dest remote_session_name remote_foreign_require remote_foreign_call remote_foreign_check remote_foreign_config remote_eval remote_write remote_read remote_finished remote_error_setup remote_rpc_call remote_multi_callback remote_multi_callback_error serialise_variable unserialise_variable other_groups date_chooser_button help_file read_help_file seed_random disk_usage_kb recursive_disk_usage help_search_link make_http_connection validate_ssl_connection read_http_connection write_http_connection close_http_connection clean_environment reset_environment clean_language progress_callback switch_to_remote_user switch_to_unix_user eval_as_unix_user create_user_config_dirs create_missing_homedir filter_javascript resolve_links simplify_path same_file flush_webmin_caches list_usermods available_usermods get_available_module_infos get_visible_module_infos get_visible_modules_categories is_under_directory parse_http_url check_clicks_function load_entities_map entities_to_ascii get_product_name get_charset get_display_hostname save_module_config save_user_module_config nice_size get_perl_path get_goto_module select_all_link select_invert_link select_rows_link check_pid_file get_mod_lib module_root_directory list_mime_types guess_mime_type open_tempfile close_tempfile print_tempfile is_selinux_enabled get_clear_file_attributes reset_file_attributes cleanup_tempnames open_lock_tempfile END month_to_number number_to_month get_rbac_module_acl supports_rbac supports_ipv6 use_rbac_module_acl execute_command open_readfile open_execute_command translate_filename translate_command register_filename_callback register_command_callback capture_function_output capture_function_output_tempfile modules_chooser_button substitute_template substitute_pattern running_in_zone running_in_vserver running_in_xen running_in_openvz list_categories is_readonly_mode command_as_user list_osdn_mirrors convert_osdn_url get_current_dir supports_users supports_symlinks quote_path get_windows_root read_file_contents write_file_contents read_file_contents_limit unix_crypt split_quoted_string write_to_http_cache check_in_http_cache supports_javascript get_module_name get_module_variable clear_time_locale reset_time_locale callers_package web_libs_package get_userdb_string connect_userdb disconnect_userdb split_userdb_string uniquelc list_combined_webmin_menu list_modules_webmin_menu module_to_menu_item list_combined_system_info shell_is_bash compare_version_numbers convert_to_json convert_from_json print_json get_referer_relative get_webmin_email_url get_webmin_browser_url trim ui_link ui_help ui_img ui_link_button ui_table_start ui_table_end ui_table_row ui_table_hr ui_table_span ui_columns_start ui_columns_row ui_columns_header ui_checked_columns_row ui_radio_columns_row ui_columns_end ui_columns_table ui_form_columns_table ui_form_elements_wrapper ui_form_start ui_form_end ui_textbox ui_filebox ui_bytesbox ui_upload ui_password ui_hidden ui_select ui_multi_select ui_multi_select_javascript ui_radio ui_yesno_radio ui_checkbox ui_oneradio ui_textarea ui_user_textbox ui_users_textbox ui_group_textbox ui_groups_textbox ui_opt_textbox ui_submit ui_reset ui_button ui_date_input ui_buttons_start ui_buttons_end ui_buttons_row ui_buttons_hr ui_post_header ui_pre_footer ui_print_header ui_print_unbuffered_header ui_print_footer ui_config_link ui_print_endpage ui_subheading ui_links_row ui_hidden_javascript ui_hidden_start ui_hidden_end ui_hidden_table_row_start ui_hidden_table_row_end ui_hidden_table_start ui_hidden_table_end ui_tabs_start ui_tabs_end ui_tabs_start_tab ui_tabs_start_tabletab ui_tabs_end_tab ui_tabs_end_tabletab ui_max_text_width ui_radio_selector ui_radio_selector_javascript ui_switch_theme_javascript ui_grid_table ui_radio_table ui_up_down_arrows ui_hr ui_nav_link ui_confirmation_form ui_text_color ui_alert_box js_disable_inputs ui_page_flipper js_checkbox_disable js_redirect ui_webmin_link ui_line_break_double ui_page_refresh ui_details ui_div_row ui_space ui_newline ui_text_wrap ui_element_inline ui_paginations ui_hide_outside_of_viewport ui_read_file_contents_limit get_python_cmd get_buffer_size get_buffer_size_binary get_webprefix get_sub_ref_name setvar getvar delvar print_call_stack webmin_user_can_rpc webmin_user_login_mode webmin_user_is_admin webmin_user_is get_current_theme_info_cached miniserv_using_default_cert is_int float is_float parse_accepted_language get_default_system_locale get_http_redirect get_http_cookie create_wrapper); # Add global variables in web-lib.pl push(@EXPORT, qw(&unique)); diff --git a/gray-theme/index.cgi b/gray-theme/index.cgi index 68af4e847..99695935e 100755 --- a/gray-theme/index.cgi +++ b/gray-theme/index.cgi @@ -96,6 +96,7 @@ if ($current_lang_info->{'rtl'} || $current_lang eq "ar") { # Page header print "\n"; print "\n"; +print &ui_switch_theme_javascript(); print "$title\n"; my $imgdir = "@{[&get_webprefix()]}/images"; my $prod = 'webmin'; diff --git a/gray-theme/left.cgi b/gray-theme/left.cgi index f4001070e..7e592a16e 100755 --- a/gray-theme/left.cgi +++ b/gray-theme/left.cgi @@ -84,7 +84,7 @@ if (@has > 1) { } print ""; } - +print &ui_switch_theme_javascript(); print "
\n"; print "
\n"; diff --git a/gray-theme/right.cgi b/gray-theme/right.cgi index a331c58b8..1a5de97e3 100755 --- a/gray-theme/right.cgi +++ b/gray-theme/right.cgi @@ -44,7 +44,7 @@ my @linkshtml = map { print "
\n"; print &ui_links_row(\@linkshtml); print "
\n"; - +print &ui_switch_theme_javascript(); if (foreign_available("server-manager")) { print ''; } diff --git a/makedist.pl b/makedist.pl index 5e0cb6153..eb977b2ef 100755 --- a/makedist.pl +++ b/makedist.pl @@ -60,6 +60,7 @@ $vers || usage(); "webmin-search-lib.pl", "WebminCore.pm", "record-login.pl", "record-logout.pl", "record-failed.pl", "robots.txt", "unauthenticated", "bin", "html-editor-lib.pl", + "switch_theme.cgi", ); if ($min) { # Only those required by others diff --git a/switch_theme.cgi b/switch_theme.cgi new file mode 100755 index 000000000..68d6ca4fe --- /dev/null +++ b/switch_theme.cgi @@ -0,0 +1,45 @@ +#!/usr/local/bin/perl +# switch_theme.cgi +# Change the theme for the current user if allowed + +BEGIN { push(@INC, "."); }; +use WebminCore; + +&init_config(); +&ReadParse(); +my $err = sub { + &PrintHeader(); + print("Cannot change theme : $_[0]\n"); + exit(1); + }; +# Check if in debug mode +&$err("Debug mode is not enabled!") + if (!$gconfig{'debug_enabled'} && + !$gconfig{'debug_theme_switcher'}); +# Check if allowed to change theme, +# otherwise throw an error +if (!&foreign_available('theme') && + !&foreign_available('change-user') && + !&foreign_available('webmin') && + !&foreign_available('acl')) { + &$err("You are not allowed to change themes!"); + } +# Check if the theme is known +&$err("Theme identification is not known!") + if (!$in{'theme'} || $in{'theme'} !~ /^[123]$/); +# Check if the remote user is known +&$err("Remote user is not known!") if (!$remote_user); +# Define the theme +my $themes = { + '1' => 'authentic-theme', + '2' => 'gray-theme', + '3' => '' }; +my $theme = $themes->{$in{'theme'}}; +# Change the theme +&foreign_require('acl'); +my @users = &acl::list_users(); +my ($user) = grep { $_->{'name'} eq $remote_user } @users; +$user->{'theme'} = $theme; +&acl::modify_user($user->{'name'}, $user); +&restart_miniserv(); +&redirect(&get_webprefix() . "/"); diff --git a/ui-lib.pl b/ui-lib.pl index f0e87d261..ed009a962 100755 --- a/ui-lib.pl +++ b/ui-lib.pl @@ -2280,6 +2280,31 @@ for(var i=0; i\n"; +return $switch_script; +} + ####################### grid layout functions =head2 ui_grid_table(&elements, columns, [width-percent], [&tds], [tabletags], [title]) diff --git a/unauthenticated/switch_theme.js b/unauthenticated/switch_theme.js new file mode 100644 index 000000000..8ac18b3c2 --- /dev/null +++ b/unauthenticated/switch_theme.js @@ -0,0 +1,31 @@ +(function () { + let firstCombinationPressed = false; + document.addEventListener("keydown", function (event) { + // Check for Ctrl+Alt+T or Control+Option+T + if (event.ctrlKey && event.altKey && event.keyCode === 84) { + firstCombinationPressed = true; + + // Set a timeout to reset the state after a short period (e.g., 1 seconds) + setTimeout(() => { + firstCombinationPressed = false; + }, 1000); + } + if (firstCombinationPressed && event.shiftKey && + (event.keyCode === 65 || event.keyCode === 71 || event.keyCode === 76)) { + const theme = + // Shift + A : Authentic theme + event.keyCode === 65 ? 1 : + // Shift + G : Gray theme + event.keyCode === 71 ? 2 : + // Shift + L : Legacy theme. + event.keyCode === 76 ? 3 : null; + firstCombinationPressed = false; + try { + top.document.documentElement.style.filter = 'grayscale(100%) blur(0.5px) brightness(0.75) opacity(0.5)'; + top.document.documentElement.style.cursor = 'wait'; + top.document.documentElement.style.pointerEvents = 'none'; + } catch (error) {} + top.location.href = __webmin_webprefix__ + "/switch_theme.cgi?theme=" + theme + ""; + } + }); +})(); diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl index 3b43f9004..89c75527a 100755 --- a/web-lib-funcs.pl +++ b/web-lib-funcs.pl @@ -1119,6 +1119,7 @@ my $text = defined($tconfig{'cs_text'}) ? $tconfig{'cs_text'} : my $bgimage = defined($tconfig{'bgimage'}) ? "background=$tconfig{'bgimage'}" : ""; my $dir = $current_lang_info->{'dir'} ? "dir=\"$current_lang_info->{'dir'}\"" : ""; my $html_body = "\n"; +print &ui_switch_theme_javascript(); $html_body =~ s/\s+\>/>/g; print $html_body; print "\n"; @@ -4449,10 +4450,16 @@ Returns the version of Webmin currently being run, such as 1.450. =cut sub get_webmin_version { +my ($str) = @_; if (!$get_webmin_version) { $get_webmin_version = &read_file_contents("$root_directory/version"); $get_webmin_version =~ s/\r|\n//g; } +if ($str) { + my $get_webmin_version_str = $get_webmin_version; + $get_webmin_version_str =~ s/\.//g; + return $get_webmin_version_str; + } return $get_webmin_version; }