Private

Server IP : 195.201.23.43 / Your IP : 3.147.104.221
Web Server : Apache
System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64
User : kdecoratie ( 1041)
PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1
Disable Function : 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,
MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON
Directory : /usr/share/webmin/nis/

Upload File :

[ HOME SHELL ]

Current File : /usr/share/webmin/nis/edit_switch.cgi

#!/usr/bin/perl
# Show a form for editing an LDAP switch

if (-r 'ldap-client-lib.pl') {
	require './ldap-client-lib.pl';
	}
else {
	require './nis-lib.pl';
	}
require './switch-lib.pl';
&ReadParse();
&ui_print_header(undef, $text{'eswitch_title'}, "");

# Get the current service
$conf = &get_nsswitch_config();
($switch) = grep { $_->{'name'} eq $in{'name'} } @$conf;
$switch || &error($text{'eswitch_egone'});

print &ui_form_start("save_switch.cgi", "post");
print &ui_hidden("name", $in{'name'}),"\n";
print &ui_table_start($text{'eswitch_header'}, undef, 2);

# Show service name
$desc = $text{'desc_'.$switch->{'name'}};
print &ui_table_row($text{'eswitch_name'},
		    $desc ? "$desc ($switch->{'name'})" : $switch->{'name'});

# Show sources in order, with fallback modes for each
$i = 0;
($allsrcs, $allowed) = &list_switch_sources();
foreach $s (@{$switch->{'srcs'}}, { }) {
	@cansrcs = grep { !$allowed->{$_} ||
			  &indexof($switch->{'name'}, @{$allowed->{$_}}) >= 0 }
			@$allsrcs;
	$stable = &ui_select("src_$i", $s->{'src'},
		[ [ "", "&lt;$text{'eswitch_none'}&gt;" ],
		  map { [ $_, $text{'order_'.$_} || $_ ] } @cansrcs ],
		1, 0, 1)."<br>\n";
	$stable .= "<table>\n";
	foreach $st (&list_switch_statuses()) {
		$stable .= "<tr> <td>".$text{'eswitch_'.$st}."</td>\n";
		@acts = &list_switch_actions($st);
		$stable .= "<td>".&ui_select(
			"status_".$st."_".$i, $s->{$st},
			[ [ "", "&lt;$text{'default'}&gt;" ],
			  map { [ $_, $text{'eswitch_'.$_} ] } @acts ]).
			   "</td> </tr>\n";		 
		}
	$stable .= "</table>\n";
	print &ui_table_row($text{'eswitch_'.$i} ||
			    &text('eswitch_nth', $i+1), $stable);
	$i++;
	}

print &ui_table_end();
print &ui_form_end([ [ "save", $text{'save'} ] ]);

&ui_print_footer("list_switches.cgi", $text{'switch_return'});

Private