mirror of
https://github.com/webmin/webmin.git
synced 2025-07-20 16:48:46 +00:00
4565a3ff4d
Fix for: Failed to update modules : You must enter an email address if only showing what would be updated. Usermin Configuration ->Upgrade Usermin -> Scheduled update
78 lines
2.0 KiB
Perl
Executable File
78 lines
2.0 KiB
Perl
Executable File
#!/usr/local/bin/perl
|
|
# update_sched.cgi
|
|
# Schedule the auto-updating of usermin modules
|
|
|
|
require './usermin-lib.pl';
|
|
$access{'upgrade'} || &error($text{'acl_ecannot'});
|
|
&foreign_require("cron", "cron-lib.pl");
|
|
&ReadParse();
|
|
&error_setup($text{'update_err'});
|
|
|
|
# Validate inputs
|
|
&lock_file("$module_config_directory/config");
|
|
if ($in{'source'} == 0) {
|
|
$config{'upsource'} = undef;
|
|
}
|
|
else {
|
|
$in{'other'} =~ /^http:\/\/([^:\/]+)(:(\d+))?(\/\S+)$/ ||
|
|
&error($text{'update_eurl'});
|
|
$config{'upsource'} = $in{'other'};
|
|
}
|
|
$config{'update'} = $in{'enabled'};
|
|
if ($config{'cron_mode'} == 0) {
|
|
$in{'hour'} =~ /^\d+$/ && $in{'hour'} < 24 ||
|
|
&error($text{'update_ehour'});
|
|
$config{'uphour'} = $in{'hour'};
|
|
$in{'days'} =~ /^\d+$/ ||
|
|
&error($text{'update_edays'});
|
|
$config{'updays'} = $in{'days'};
|
|
}
|
|
$config{'upshow'} = $in{'show'};
|
|
$config{'upmissing'} = $in{'missing'};
|
|
$config{'upquiet'} = $in{'quiet'};
|
|
$config{'upemail'} = $in{'upemail'};
|
|
!$in{'show'} || $in{'upemail'} || &error($text{'update_eemail'});
|
|
&write_file("$module_config_directory/config", \%config);
|
|
&unlock_file("$module_config_directory/config");
|
|
|
|
# Setup the cron job
|
|
@jobs = &cron::list_cron_jobs();
|
|
$job = &find_cron_job(\@jobs);
|
|
&lock_file($cron_cmd);
|
|
if ($job) {
|
|
&cron::delete_cron_job($job);
|
|
unlink($cron_cmd);
|
|
}
|
|
if ($in{'enabled'}) {
|
|
# Create the program that cron calls
|
|
&cron::create_wrapper($cron_cmd, $module_name, "update.pl");
|
|
|
|
$njob = { 'user' => 'root', 'active' => 1,
|
|
'command' => $cron_cmd };
|
|
if ($config{'cron_mode'} == 0) {
|
|
# Setup the actual cron job, simply
|
|
if ($in{'days'} == 1) {
|
|
@days = ( "*" );
|
|
}
|
|
else {
|
|
for($i=1; $i<=31; $i+=$in{'days'}) {
|
|
push(@days, $i);
|
|
}
|
|
}
|
|
$njob->{'mins'} = $in{'mins'};
|
|
$njob->{'hours'} = $in{'hour'};
|
|
$njob->{'days'} = join(",",@days);
|
|
$njob->{'months'} = '*';
|
|
$njob->{'weekdays'} = '*';
|
|
}
|
|
else {
|
|
# Create complex cron job
|
|
&cron::parse_times_input($njob, \%in);
|
|
}
|
|
&foreign_call("cron", "create_cron_job", $njob);
|
|
}
|
|
&unlock_file($cron_cmd);
|
|
&redirect("");
|
|
|
|
|