swat/esptest/loadparm.esp

   1 <% page_header("columns", "ESP loadparm test"); %>
   2
   3 <h1>Samba4 loadparm test</h1>
   4
   5 <%
   6 var f = FormObj("LoadparmTest", 2, 1);
   7 f.element[0].label = "Share";
   8 f.element[1].label = "Parameter";
   9 f.submit[0] = "OK";
  10
  11 display_form(f);
  12
  13 function stringVar(v) {
  14         var type = typeof(v);
  15         var ret = "";
  16         if (type == "object") {
  17                 for (val in v) {
  18                         ret = ret + " " + v[val];
  19                 }
  20         } else {
  21                 ret = ret + v;
  22         }
  23         return ret;
  24 }
  25
  26 function showValue(name, v) {
  27         write("parameter:" + name + "<br>\n");
  28         write("Type  is: " + typeof(v) + "<br>\n");
  29         write("Value is: " + stringVar(v) + "<p>\n");
  30 }
  31
  32
  33 if (request['REQUEST_METHOD'] == "POST") {
  34         /* if they cancelled then take them back to the list of tests */
  35         if (form['submit'] == "Cancel") {
  36                 redirect("/");
  37         }
  38
  39         var v;
  40
  41         share = form['Share'];
  42         name  = form['Parameter'];
  43         if (share && name) {
  44                 v = lpGet(share, name);
  45         } else if (name) {
  46                 v = lpGet(name);
  47         }
  48
  49         showValue(name, v);
  50 }
  51 %>
  52
  53 Here are some commonly used parameters:<p>
  54
  55 <%
  56
  57 showValue("defined services", lpServices());
  58
  59 function showParameter(name) {
  60         showValue(name, lpGet(name));
  61 }
  62
  63 showParameter("server services");
  64 showParameter("netbios name");
  65 showParameter("security");
  66 showParameter("workgroup");
  67 showParameter("log level");
  68 showParameter("server signing");
  69 showParameter("interfaces");
  70 %>
  71
  72 <% page_footer(); %>