summaryrefslogtreecommitdiff
path: root/swat.obsolete/esptest/samr.esp
blob: a60a02e7c8580bd6933706c2c91a2aa70e262e5c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
<% page_header("columns", "ESP samr test", "esptest"); 

  libinclude("base.js");
  libinclude("samr.js");
%>

<h1>Samba4 samr rpc test</h1>

<%
var conn  = samr_init();
var binding = "ncalrpc:";
status = conn.connect(binding);
check_status_ok(status);

handle = samrConnect(conn);

domains = samrEnumDomains(conn, handle);

for (i=0;i<domains.length;i++) {
    write("<h2>Domain " + domains[i].name + "</h2>\n");
    sid = samrLookupDomain(conn, handle, domains[i].name);
    dom_handle = samrOpenDomain(conn, handle, sid);
    users = samrEnumDomainUsers(conn, dom_handle);
    samrFillUserInfo(conn, dom_handle, users, 3);
    if (users.length == 0) {
	    write("no users in domain<br>\n");
    } else {
	    multi_table(users, "name");
    }
    samrClose(conn, dom_handle);
}

%>


<% page_footer(); %>