r9434: moved the registry editor into a common js library. Deryck, does this
[jra/samba/.git] / swat / esptest / samr.esp
1 <% page_header("columns", "ESP samr test", "esptest"); 
2
3   libinclude("base.js");
4   libinclude("samr.js");
5 %>
6
7 <h1>Samba4 samr rpc test</h1>
8
9 <%
10 var conn  = samr_init();
11 var binding = "ncalrpc:";
12 status = conn.connect(binding);
13 check_status_ok(status);
14
15 handle = samrConnect(conn);
16
17 domains = samrEnumDomains(conn, handle);
18
19 for (i=0;i<domains.length;i++) {
20     write("<h2>Domain " + domains[i].name + "</h2>\n");
21     sid = samrLookupDomain(conn, handle, domains[i].name);
22     dom_handle = samrOpenDomain(conn, handle, sid);
23     users = samrEnumDomainUsers(conn, dom_handle);
24     samrFillUserInfo(conn, dom_handle, users, 3);
25     if (users.length == 0) {
26             write("no users in domain<br>\n");
27     } else {
28             multi_table(users, "name");
29     }
30     samrClose(conn, dom_handle);
31 }
32
33 %>
34
35
36 <% page_footer(); %>