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