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