r7056: added links to ejs and esp info pages
[samba.git] / swat / esptest / loadparm.esp
1 <HTML>
2 <TITLE>
3 Samba4 ESP test
4 </TITLE>
5 <BODY>
6 <h1>Samba4 loadparm test</h1>
7
8 <form name="LoadparmTest" method="POST" action="@@request['SCRIPT_NAME']"> 
9     Share:      <input name="Share" type="text" value=""><br>
10     Parameter:  <input name="Name"  type="text" value=""><br>
11     <input name="submit" type="submit" value="OK">
12     <input name="submit" type="submit" value="Cancel"><br>
13 </form>
14
15 <%
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("index.esp");
41         }
42         
43         var v;
44
45         share = form['Share'];
46         name  = form['Name'];
47         if (share && name) {
48                 v = lpGet(share, name);
49         } else if (name) {
50                 v = lpGet(name);
51         }
52
53         showValue(name, v);
54 }
55 %>
56
57 Here are some commonly used parameters:<p>
58
59 <%
60
61 showValue("defined services", lpServices());
62
63 function showParameter(name) {
64         showValue(name, lpGet(name));
65 }
66
67 showParameter("server services");
68 showParameter("netbios name");
69 showParameter("security");
70 showParameter("workgroup");
71 showParameter("log level");
72 showParameter("server signing");
73 showParameter("interfaces");
74 %>
75
76 </BODY>
77 </HTML>