pam/pam_rhosts_auth.so.pl

   1 # display args for pam_rhosts_auth.so
   2
   3 # display_args(&service, &module, &args)
   4 sub display_module_args
   5 {
   6 print &ui_table_row($text{'rhosts_equiv'},
   7         &ui_radio("equiv", defined($_[2]->{'no_hosts_equiv'}) ? 1 : 0,
   8                   [ [ 0, $text{'yes'} ], [ 1, $text{'no'} ] ]));
   9
  10 print &ui_table_row($text{'rhosts_rhosts'},
  11         &ui_radio("rhosts", defined($_[2]->{'no_hosts'}) ? 1 : 0,
  12                   [ [ 0, $text{'yes'} ], [ 1, $text{'no'} ] ]));
  13
  14 print &ui_table_row($text{'rhosts_promiscuous'},
  15         &ui_yesno_radio("promiscuous",defined($_[2]->{'promiscuous'}) ? 1 : 0));
  16
  17 print &ui_table_row($text{'rhosts_suppress'},
  18         &ui_radio("suppress", defined($_[2]->{'supress'}) ? 1 : 0,
  19                   [ [ 0, $text{'yes'} ], [ 1, $text{'no'} ] ]));
  20 }
  21
  22 # parse_module_args(&service, &module, &args)
  23 sub parse_module_args
  24 {
  25 if ($in{'equiv'}) { $_[2]->{'no_hosts_equiv'} = ''; }
  26 else { delete($_[2]->{'no_hosts_equiv'}); }
  27
  28 if ($in{'rhosts'}) { $_[2]->{'no_rhosts'} = ''; }
  29 else { delete($_[2]->{'no_rhosts'}); }
  30
  31 if ($in{'promiscuous'}) { $_[2]->{'promiscuous'} = ''; }
  32 else { delete($_[2]->{'promiscuous'}); }
  33
  34 if ($in{'suppress'}) { $_[2]->{'suppress'} = ''; }
  35 else { delete($_[2]->{'suppress'}); }
  36 }