idmapd/index.cgi

   1 #!/usr/local/bin/perl
   2 # index.cgi
   3
   4 require './idmapd-lib.pl';
   5
   6 # Check if rpc.idmapd is installed
   7 @st = stat($config{'idmapd_path'});
   8 if (!@st) {
   9         &ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0,
  10                 &help_search_link("idmapd", "man"));
  11         print &text('index_eidmapd', "<tt>$config{'idmapd_path'}</tt>",
  12                   "$gconfig{'webprefix'}/config.cgi?$module_name"),"<p>\n";
  13         &ui_print_footer("/", $text{'index'});
  14         exit;
  15         }
  16
  17 &ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0,
  18                  &help_search_link("idmapd", "man"));
  19 %conf = &get_config();
  20
  21 print "<form action=\"save.cgi\">\n";
  22 print "<table border width=100%>\n";
  23 print "<tr $cb> <td><table>\n";
  24 print "<tr $tb> <td colspan=4><b>$text{'general'}</b></td> </tr>\n";
  25
  26 print "<tr $cb> <td>",&hlink("<b>$text{'pipefs_dir'}</b>","pipefsdir"),"</td>\n";
  27 print "<td><input name=pipefsdir size=40 value=\"$conf{'Pipefs-Directory'}\">",
  28     &file_chooser_button("pipefsdir", 1), "</td></tr>\n";
  29
  30 print "<tr> <td>",&hlink("<b>$text{'domain'}</b>","domain"),"</td>\n";
  31 print "<td><input name=domain size=40 value=\"$conf{'Domain'}\"> </td></tr>\n";
  32
  33 print "<tr $tb> <td colspan=3><b>$text{'mapping'}</b></td> </tr>\n";
  34
  35 print "<tr> <td>",&hlink("<b>$text{'nobody_user'}</b>","nobody_user"),"</td>\n";
  36 print "<td><input name=nobody_user size=40 value=\"$conf{'Nobody-User'}\">",
  37     &user_chooser_button("nobody_user", 0), "</td></tr>\n";
  38
  39 print "<tr> <td>",&hlink("<b>$text{'nobody_group'}</b>","nobody_group"),"</td>\n";
  40 print "<td><input name=nobody_group size=40 value=\"$conf{'Nobody-Group'}\">",
  41     &group_chooser_button("nobody_group", 0), "</td></tr>\n";
  42
  43 print "</table></td></tr></table>\n";
  44 print "<input type=submit value=\"$text{'save'}\"></form>\n";
  45
  46 &ui_print_footer("/", $text{'index'});