svn commit: samba r9160 - in branches/SAMBA_4_0/testprogs/ejs: .
tridge at samba.org
tridge at samba.org
Sat Aug 6 01:11:16 GMT 2005
Author: tridge
Date: 2005-08-06 01:11:16 +0000 (Sat, 06 Aug 2005)
New Revision: 9160
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=9160
Log:
use the winreg lib in the test program
Modified:
branches/SAMBA_4_0/testprogs/ejs/winreg.js
Changeset:
Modified: branches/SAMBA_4_0/testprogs/ejs/winreg.js
===================================================================
--- branches/SAMBA_4_0/testprogs/ejs/winreg.js 2005-08-06 01:09:27 UTC (rev 9159)
+++ branches/SAMBA_4_0/testprogs/ejs/winreg.js 2005-08-06 01:11:16 UTC (rev 9160)
@@ -3,6 +3,9 @@
test winreg calls from ejs
*/
+libinclude("base.js");
+libinclude("winreg.js");
+
var options = new Object();
ok = GetOptions(ARGV, options,
@@ -31,66 +34,24 @@
return -1;
}
-
-
-function list(handle, path, name) {
- var io = irpcObj();
- var wtime = new Object();
- wtime.low = 2147483647;
- wtime.high = 2147483647;
- var keyname = new Object();
- keyname.unknown = 522;
- keyname.key_name = NULL;
-
- var idx = 0;
- for (idx=0;idx >= 0;idx++) {
- io.input.handle = handle;
- io.input.enum_index = idx;
- io.input.key_name_len = 0;
- io.input.unknown = 1044;
- io.input.in_name = keyname;
- io.input.class = "";
- io.input.last_changed_time = wtime;
- var status = reg.winreg_EnumKey(io);
- if (!status.is_ok) return;
- var out = io.output;
- if (out.result != "WERR_OK") {
- return;
- }
- printf("%s\\%s\n", path, out.out_name.name);
-
- io = irpcObj();
- io.input.handle = handle;
- io.input.keyname = out.out_name.name;
- io.input.unknown = 0;
- io.input.access_mask = reg.SEC_FLAG_MAXIMUM_ALLOWED;
- status = reg.winreg_OpenKey(io);
- if (!status.is_ok) return;
- assert(io.output.result == "WERR_OK");
-
- list(io.output.handle,
- path + "\\" + out.out_name.name,
- out.out_name.name);
+function list_path(path) {
+ var list = winreg_enum_path(reg, path);
+ var i;
+ if (list == undefined) {
+ return;
}
+ for (i=0;i<list.length;i++) {
+ var npath = path + "\\" + list[i];
+ println(npath);
+ list_path(npath);
+ }
}
-function list_tree(name) {
- var io = irpcObj();
- io.input.system_name = NULL;
- io.input.access_required = reg.SEC_FLAG_MAXIMUM_ALLOWED;
- status = reg.winreg_OpenHKLM(io);
- assert(status.is_ok);
-
- var handle = io.output.handle;
-
- list(handle, "", NULL);
-}
-
var trees = new Array("HKCR", "HKLM", "HKPD", "HKU");
for (i=0;i<trees.length;i++) {
printf("Listing tree '%s'\n", trees[i]);
- list_tree(trees[i]);
+ list_path(trees[i]);
}
print("All OK\n");
More information about the samba-cvs
mailing list