File manager - Edit - /usr/local/usermin-1.860/htaccess/change_files.cgi
Back
#!/usr/bin/perl # change_files.cgi # Modify or delete a <Files> clause in a .htaccess file require './htaccess-lib.pl'; &ReadParse(); $hconf = &get_htaccess_config($in{'file'}); $d = $hconf->[$in{'idx'}]; $lref = &read_file_lines($d->{'file'}); if ($in{'delete'}) { # deleting a directive $gap = $d->{'eline'} - $d->{'line'} + 1; splice(@$lref, $d->{'line'}, $d->{'eline'} - $d->{'line'} + 1); splice(@$hconf, $in{'idx'}, 1); &renumber($hconf, $d->{'line'}, $d->{'file'}, -$gap); } else { # changing a directive if ($in{'regexp'}) { if ($httpd_modules{'core'} >= 1.3) { $newdir = "<FilesMatch \"$in{'path'}\">"; $enddir = "</FilesMatch>"; } else { $newdir = "<Files ~ \"$in{'path'}\">"; $enddir = "</Files>"; } } else { $newdir = "<Files \"$in{'path'}\">"; $enddir = "</Files>"; } $lref->[$d->{'line'}] = $newdir; $lref->[$d->{'eline'}] = $enddir; } &flush_file_lines(); &redirect("htaccess_index.cgi?file=".&urlize($in{'file'}));
| ver. 1.4 |
Github
|
.
| PHP 7.4.33 | Generation time: 0.43 |
proxy
|
phpinfo
|
Settings