VladPolskiy/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2025-08-01 15:36:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

First cut of the new package updates module

Browse Source
This commit is contained in:
Jamie Cameron
2009-10-01 14:09:36 -07:00
parent 3aa486b925
commit 136a04a61c
32 changed files with 1638 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

61
package-updates/save_sched.cgi Executable file
View File

@ -0,0 +1,61 @@
#!/usr/local/bin/perl
# Save scheduled checking options
require './package-updates-lib.pl';
&ReadParse();
&lock_file($module_config_file);
$config{'sched_email'} = $in{'email'};
$config{'sched_action'} = $in{'action'};
&save_module_config();
&unlock_file($module_config_file);
$oldjob = $job = &find_cron_job();
if ($in{'sched_def'}) {
if ($job) {
&lock_file(&cron::cron_file($job));
&cron::delete_cron_job($job);
&unlock_file(&cron::cron_file($job));
}
$msg = $text{'sched_no'};
}
else {
$job ||= { 'user' => 'root',
'active' => 1,
'command' => $cron_cmd };
$job->{'mins'} = $job->{'hours'} = $job->{'days'} =
$job->{'months'} = $job->{'weekdays'} = '*';
if ($in{'sched'} eq 'h') {
$job->{'mins'} = '0';
}
elsif ($in{'sched'} eq 'd') {
$job->{'mins'} = '0';
$job->{'hours'} = '0';
}
elsif ($in{'sched'} eq 'w') {
$job->{'mins'} = '0';
$job->{'hours'} = '0';
$job->{'weekdays'} = '0';
}
&lock_file(&cron::cron_file($job));
if ($oldjob) {
&cron::change_cron_job($job);
}
else {
&cron::create_cron_job($job);
}
&unlock_file(&cron::cron_file($job));
&lock_file($cron_cmd);
&cron::create_wrapper($cron_cmd, $module_name, "update.pl");
&unlock_file($cron_cmd);
$msg = $text{'sched_yes'};
}
# Tell the user
&ui_print_header(undef, $text{'sched_title'}, "");
print "$msg<p>\n";
&ui_print_footer("", $text{'index_return'});
&webmin_log("sched", undef, $in{'sched_def'} ? 0 : 1);