⚝
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
Eksekusi
Dir :
~
/
usr
/
share
/
webmin
/
useradmin
/
View File Name :
export_form.cgi
#!/usr/bin/perl # export_form.cgi # Display a form for exporting a batch file require './user-lib.pl'; $access{'export'} || &error($text{'export_ecannot'}); &ui_print_header(undef, $text{'export_title'}, "", "export"); print "$text{'export_desc'}<p>\n"; print &ui_form_start("export_exec.cgi"); print &ui_table_start($text{'export_header'}, undef, 2); # Destination if ($access{'export'} == 2) { # Can be to a file print &ui_table_row($text{'export_to'}, &ui_radio_table("to", 0, [ [ 0, $text{'export_show'} ], [ 1, $text{'export_file'}, &ui_filebox("file", undef, 30) ] ])); } else { # Always in browser print &ui_table_row($text{'export_to'}, $text{'export_show'}); } # Export type $pft = &passfiles_type(); print &ui_table_row($text{'export_pft'}, &ui_select("pft", $pft, [ map { [ $_, $text{'pft_'.$_} ] } map { /^pft_(\d+)$/ ? ( $1 ) : ( ) } sort { $a cmp $b } (keys %text) ])); # Users to include print &ui_table_row($text{'export_who'}, &ui_radio_table("mode", 0, [ [ 0, $text{'export_who'} ], [ 2, $text{'acl_uedit_only'}, &ui_textbox("can", undef, 40)." ". &user_chooser_button("can", 1) ], [ 3, $text{'acl_uedit_except'}, &ui_textbox("cannot", undef, 40)." ". &user_chooser_button("cannot", 1) ], [ 4, $text{'acl_uedit_uid'}, &ui_textbox("uid", undef, 6)." - ". &ui_textbox("uid2", undef, 6) ], [ 5, $text{'acl_uedit_group'}, &ui_textbox("group", undef, 40)." ". &group_chooser_button("group", 1)."<br>". &ui_checkbox("sec", 1, $text{'acl_uedit_sec'}, 0) ], [ 8, $text{'acl_uedit_gid'}, &ui_textbox("gid", undef, 6)." - ". &ui_textbox("gid2", undef, 6) ], ])); print &ui_table_end(); print &ui_form_end([ [ undef, $text{'export_ok'} ] ]); &ui_print_footer("", $text{'index_return'});