cluster-useradmin/sync_form.cgi

   1 #!/usr/local/bin/perl
   2 # sync_form.cgi
   3 # Display a form for creating some or all missing users and groups on
   4 # some or all servers
   5
   6 require './cluster-useradmin-lib.pl';
   7 &ui_print_header(undef, $text{'sync_title'}, "");
   8
   9 print "$text{'sync_desc'}<p>\n";
  10 print "<form action=sync.cgi>\n";
  11 print "<table>\n";
  12
  13 print "<tr> <td valign=top><b>$text{'sync_hosts'}</b></td> <td>\n";
  14 &create_on_input(undef, 1, 1);
  15 print "</td> </tr>\n";
  16
  17 print "<tr> <td valign=top><b>$text{'sync_users'}</b></td> <td>\n";
  18 print "<input type=radio name=users_mode value=1> ",
  19       "$text{'sync_uall'}&nbsp;&nbsp;\n";
  20 print "<input type=radio name=users_mode value=0 checked> ",
  21       "$text{'sync_unone'}<br>\n";
  22 print "<input type=radio name=users_mode value=2> ",
  23       "$text{'sync_usel'}\n";
  24 print "<input name=usel size=30> ",&user_chooser_button("usel", 1),"<br>\n";
  25 print "<input type=radio name=users_mode value=3> ",
  26       "$text{'sync_unot'}\n";
  27 print "<input name=unot size=30> ",&user_chooser_button("unot", 1),"<br>\n";
  28 print "<input type=radio name=users_mode value=4> ",
  29       "$text{'sync_uuid'}\n";
  30 print "<input name=uuid1 size=6> - <input name=uuid2 size=6><br>\n";
  31 print "<input type=radio name=users_mode value=5> ",
  32       "$text{'sync_ugid'}\n";
  33 print &unix_group_input("ugid"),"<br>\n";
  34 print "</td> </tr>\n";
  35
  36 print "<tr> <td valign=top><b>$text{'sync_groups'}</b></td> <td>\n";
  37 print "<input type=radio name=groups_mode value=1> ",
  38       "$text{'sync_gall'}&nbsp;&nbsp;\n";
  39 print "<input type=radio name=groups_mode value=0 checked> ",
  40       "$text{'sync_gnone'}<br>\n";
  41 print "<input type=radio name=groups_mode value=2> ",
  42       "$text{'sync_gsel'}\n";
  43 print "<input name=gsel size=30> ",&group_chooser_button("gsel", 1),"<br>\n";
  44 print "<input type=radio name=groups_mode value=3> ",
  45       "$text{'sync_gnot'}\n";
  46 print "<input name=gnot size=30> ",&group_chooser_button("gnot", 1),"<br>\n";
  47 print "<input type=radio name=groups_mode value=4> ",
  48       "$text{'sync_ggid'}\n";
  49 print "<input name=ggid1 size=6> - <input name=ggid2 size=6><br>\n";
  50 print "</td> </tr>\n";
  51
  52 print "<tr> <td><b>$text{'sync_test'}</b></td>\n";
  53 print "<td><input type=radio name=test value=1> $text{'yes'}\n";
  54 print "<input type=radio name=test value=0 checked> $text{'no'}</td> </tr>\n";
  55
  56 print "<tr> <td><b>$text{'sync_makehome'}</b></td>\n";
  57 print "<td><input type=radio name=makehome value=1 checked> $text{'yes'}\n";
  58 print "<input type=radio name=makehome value=0> $text{'no'}</td>\n";
  59 print "</tr>\n";
  60
  61 print "<tr> <td><b>$text{'sync_copy'}</b></td>\n";
  62 print "<td><input type=radio name=copy_files value=1 checked> $text{'yes'}\n";
  63 print "<input type=radio name=copy_files value=0> $text{'no'}</td>\n";
  64 print "</tr>\n";
  65
  66 print "<tr> <td><b>$text{'sync_others'}</b></td>\n";
  67 print "<td><input type=radio name=others value=1 checked> $text{'yes'}\n";
  68 print "<input type=radio name=others value=0> $text{'no'}</td> </tr>\n";
  69
  70 print "</table>\n";
  71 print "<input type=submit value='$text{'sync_ok'}'></form>\n";
  72
  73 &ui_print_footer("", $text{'index_return'});
  74