michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 14:13:29 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Cleanup forgotten password link files older than 1 day

Browse Source
This commit is contained in:
Jamie Cameron
2025-04-20 10:21:25 -07:00
parent 410d240e8b
commit 79e5d72393
3 changed files with 18 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
cron/cleanup.pl
View File

@@ -1,5 +1,5 @@
#!/usr/local/bin/perl #!/usr/bin/perl
# Clean up leftover Webmin temp files and locks, if configured # Manually run the temp files cleanup function
require './cron-lib.pl'; require './cron-lib.pl';
&cleanup_temp_files(); &cleanup_temp_files();

14
cron/cron-lib.pl
View File

@@ -1608,6 +1608,20 @@ closedir(DIR);
foreach (&get_miniserv_websockets_modules()) { foreach (&get_miniserv_websockets_modules()) {
&cleanup_miniserv_websockets(undef, $_); &cleanup_miniserv_websockets(undef, $_);
} }
# Delete forgot-password files older than 1 day
if (opendir(DIR, $main::forgot_password_link_dir)) {
my $cutoff = time() - 24*60*60;
foreach my $f (readdir(DIR)) {
next if ($f eq "." || $f eq "..");
my $path = $main::forgot_password_link_dir."/".$f;
my @st = stat($path);
if ($st[9] < $cutoff) {
&unlink_file($path);
}
}
closedir(DIR);
}
} }
=head2 list_cron_files() =head2 list_cron_files()

2
cron/postinstall.pl
View File

@@ -11,6 +11,8 @@ eval {
'func' => 'cleanup_temp_files', 'func' => 'cleanup_temp_files',
'interval' => 3600 }; 'interval' => 3600 };
&webmincron::create_webmin_cron($cron, $temp_delete_cmd); &webmincron::create_webmin_cron($cron, $temp_delete_cmd);
&create_wrapper($module_config_directory."/cleanup.pl",
$module_name, "cleanup.pl");
}; };
if ($@) { if ($@) {
print STDERR "Failed to setup /tmp cleanup cron job : $@\n"; print STDERR "Failed to setup /tmp cleanup cron job : $@\n";