1
0
mirror of https://github.com/samba-team/samba.git synced 2025-03-09 08:58:35 +03:00
Andrew Bartlett f8573766bc r24985: Start to revert us back to the old-style SWAT, while trying not to
loose some of the fixes in the meantime.

Andrew Bartlett
(This used to be commit 13acff5ed259e7b5859fd2324ea7740b8f9e5fd7)
2007-10-10 15:05:21 -05:00

37 lines
809 B
Plaintext

<% 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(); %>