One Hat Cyber Team

Your IP: 216.73.216.93
Server IP: 65.108.141.171
Server: Linux server.heloix.com 5.4.0-214-generic #234-Ubuntu SMP Fri Mar 14 23:50:27 UTC 2025 x86_64
Server Software: Apache
PHP Version: 7.4.33
Buat File | Buat Folder

Edit File: save_categories.cgi

#!/usr/bin/perl
# save_categories.cgi

require './usermin-lib.pl';
$access{'categories'} || &error($text{'acl_ecannot'});
&get_usermin_miniserv_config(\%miniserv);
&read_file("$miniserv{'root'}/lang/en", \%utext);
&read_file("$miniserv{'root'}/ulang/en", \%utext);
&ReadParse();
&error_setup($text{'categories_err'});

# Save built-in categories
foreach $t (keys %utext) {
	$t =~ s/^category_// || next;
	$field = $t || "other";
	if (!$in{$field."_def"}) {
		$in{$field} ||
			&error(&text('categories_edesc', $t ? $t : 'other'));
		$catnames{$t} = &filter_javascript($in{$field});
		}
	}

# Save custom categories
for($i=0; defined($in{"cat_$i"}); $i++) {
	if ($in{"cat_$i"} && $in{"desc_$i"}) {
		$realcat{$in{"cat_$i"}} &&
			&error(&text('categories_ecat', $in{"cat_$i"}));
		$catnames{$in{"cat_$i"}} = $in{"desc_$i"};
		}
	}

&lock_file("$config{'usermin_dir'}/webmin.catnames");
&write_file("$config{'usermin_dir'}/webmin.catnames", \%catnames);
&unlock_file("$config{'usermin_dir'}/webmin.catnames");
&webmin_log("categories", undef, undef, \%in);
&flush_modules_cache();
&redirect("");