#!/usr/local/cpanel/3rdparty/bin/perl # gniza4cp WHM Plugin — Main Config Editor use strict; use warnings; use lib '/usr/local/cpanel/whostmgr/docroot/cgi/gniza4cp-whm/lib'; use Whostmgr::HTMLInterface (); use Cpanel::Form (); use Gniza4cpWHM::Config; use Gniza4cpWHM::Validator; use Gniza4cpWHM::UI; my $CONFIG_FILE = '/etc/gniza4cp/gniza4cp.conf'; my $form = Cpanel::Form::parseform(); my $method = $ENV{'REQUEST_METHOD'} // 'GET'; my $action = $form->{'action'} // ''; # ── Handle SMTP Test (JSON) ────────────────────────────────── if ($action eq 'test_smtp') { print "Content-Type: application/json\r\n\r\n"; unless ($method eq 'POST' && Gniza4cpWHM::UI::verify_csrf_token($form->{'gniza4cp_csrf'})) { print qq({"success":false,"message":"Invalid or expired token. Please reload and try again."}); exit; } # Generate fresh token after consuming the old one my $new_csrf = Gniza4cpWHM::UI::generate_csrf_token(); my $host = $form->{'SMTP_HOST'} // ''; my $port = $form->{'SMTP_PORT'} || '587'; my $user = $form->{'SMTP_USER'} // ''; my $password = $form->{'SMTP_PASSWORD'} // ''; my $from = $form->{'SMTP_FROM'} // ''; my $security = $form->{'SMTP_SECURITY'} || 'tls'; my $to = $form->{'NOTIFY_EMAIL'} // ''; if ($host eq '') { print qq({"success":false,"message":"SMTP Host is required.","csrf":"$new_csrf"}); exit; } if ($to eq '') { print qq({"success":false,"message":"Notification email is required for test.","csrf":"$new_csrf"}); exit; } my ($ok, $err) = Gniza4cpWHM::UI::test_smtp_connection( host => $host, port => $port, user => $user, password => $password, from => $from, security => $security, to => $to, ); if ($ok) { print qq({"success":true,"message":"Test email sent successfully. Check your inbox.","csrf":"$new_csrf"}); } else { $err //= 'Unknown error'; $err =~ s/\\/\\\\/g; $err =~ s/"/\\"/g; $err =~ s/\n/\\n/g; $err =~ s/\r/\\r/g; $err =~ s/\t/\\t/g; $err =~ s/[\x00-\x1f]//g; print qq({"success":false,"message":"SMTP test failed: $err","csrf":"$new_csrf"}); } exit; } # ── Handle POST ────────────────────────────────────────────── my @errors; my $saved = 0; if ($method eq 'POST') { unless (Gniza4cpWHM::UI::verify_csrf_token($form->{'gniza4cp_csrf'})) { push @errors, 'Invalid or expired form token. Please try again.'; } if (!@errors) { my %data; for my $key (@Gniza4cpWHM::Config::MAIN_KEYS) { $data{$key} = $form->{$key} // ''; } my $validation_errors = Gniza4cpWHM::Validator::validate_main_config(\%data); if (@$validation_errors) { @errors = @$validation_errors; } else { my ($ok, $err) = Gniza4cpWHM::Config::save($CONFIG_FILE, \%data, \@Gniza4cpWHM::Config::MAIN_KEYS); if ($ok) { Gniza4cpWHM::UI::set_flash('success', 'Configuration saved successfully.'); print "Status: 302 Found\r\n"; print "Location: settings.cgi\r\n\r\n"; exit; } else { push @errors, "Failed to save config: $err"; } } } } # ── Render Page ────────────────────────────────────────────── print "Content-Type: text/html\r\n\r\n"; Whostmgr::HTMLInterface::defheader('GNIZA4CP Backup Manager — Settings', '', '/cgi/gniza4cp-whm/settings.cgi'); print Gniza4cpWHM::UI::page_header('Settings'); print Gniza4cpWHM::UI::render_nav('settings.cgi'); print Gniza4cpWHM::UI::render_flash(); if (@errors) { print Gniza4cpWHM::UI::render_errors(\@errors); } # Load current config (or use POST data if validation failed) my $conf; if (@errors && $method eq 'POST') { $conf = {}; for my $key (@Gniza4cpWHM::Config::MAIN_KEYS) { $conf->{$key} = $form->{$key} // ''; } } else { $conf = Gniza4cpWHM::Config::parse($CONFIG_FILE, 'main'); } # Helper to output a text field row sub field_text { my ($key, $label, $hint, $extra, $tip) = @_; $extra //= ''; my $val = Gniza4cpWHM::UI::esc($conf->{$key} // ''); my $hint_html = $hint ? qq{ } . Gniza4cpWHM::UI::esc($hint) . qq{} : ''; my $tip_html = $tip ? qq{ ⓘ} : ''; print qq{