svn commit: samba r8234 - in branches/SAMBA_4_0/testprogs/ejs: .
tridge at samba.org
tridge at samba.org
Fri Jul 8 08:20:00 GMT 2005
Author: tridge
Date: 2005-07-08 08:19:59 +0000 (Fri, 08 Jul 2005)
New Revision: 8234
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=8234
Log:
started on testing samr calls from ejs. So far it only does samr_Connect()
Added:
branches/SAMBA_4_0/testprogs/ejs/samr.js
Modified:
branches/SAMBA_4_0/testprogs/ejs/echo.js
Changeset:
Modified: branches/SAMBA_4_0/testprogs/ejs/echo.js
===================================================================
--- branches/SAMBA_4_0/testprogs/ejs/echo.js 2005-07-08 08:18:52 UTC (rev 8233)
+++ branches/SAMBA_4_0/testprogs/ejs/echo.js 2005-07-08 08:19:59 UTC (rev 8234)
@@ -1,5 +1,5 @@
/*
- demonstrate access to rpc calls from ejs
+ test echo pipe calls from ejs
*/
Added: branches/SAMBA_4_0/testprogs/ejs/samr.js
===================================================================
--- branches/SAMBA_4_0/testprogs/ejs/samr.js 2005-07-08 08:18:52 UTC (rev 8233)
+++ branches/SAMBA_4_0/testprogs/ejs/samr.js 2005-07-08 08:19:59 UTC (rev 8234)
@@ -0,0 +1,60 @@
+/*
+ test samr calls from ejs
+*/
+
+
+/*
+ helper function to setup a rpc io object, ready for input
+*/
+function irpcObj()
+{
+ var o = new Object();
+ o.input = new Object();
+ return o;
+}
+
+/*
+ check that a status result is OK
+*/
+function check_status_ok(status)
+{
+ if (status.is_ok != true) {
+ printVars(status);
+ }
+ assert(status.is_ok == true);
+}
+
+/*
+ test the samr_Connect interface
+*/
+function test_Connect(conn)
+{
+ var io = irpcObj();
+
+ print("Testing samr_Connect\n");
+
+ io.input.system_name = NULL;
+ io.input.access_mask = 0;
+ status = dcerpc_samr_Connect(conn, io);
+ printVars(io);
+ check_status_ok(status);
+}
+
+if (ARGV.length == 0) {
+ print("Usage: samr.js <RPCBINDING>\n");
+ exit(0);
+}
+
+var binding = ARGV[0];
+var conn = new Object();
+
+print("Connecting to " + binding + "\n");
+status = rpc_connect(conn, binding, "samr");
+if (status.is_ok != true) {
+ print("Failed to connect to " + binding + " - " + status.errstr + "\n");
+ return;
+}
+
+test_Connect(conn);
+
+print("All OK\n");
More information about the samba-cvs
mailing list