svn commit: samba r9383 - in branches/SAMBA_4_0/testprogs/ejs: .

tridge at samba.org tridge at samba.org
Thu Aug 18 09:33:04 GMT 2005


Author: tridge
Date: 2005-08-18 09:33:03 +0000 (Thu, 18 Aug 2005)
New Revision: 9383

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=9383

Log:
remove unused file

Removed:
   branches/SAMBA_4_0/testprogs/ejs/winreg.js


Changeset:
Deleted: branches/SAMBA_4_0/testprogs/ejs/winreg.js
===================================================================
--- branches/SAMBA_4_0/testprogs/ejs/winreg.js	2005-08-18 07:06:19 UTC (rev 9382)
+++ branches/SAMBA_4_0/testprogs/ejs/winreg.js	2005-08-18 09:33:03 UTC (rev 9383)
@@ -1,72 +0,0 @@
-#!/usr/bin/env smbscript
-/*
-  test winreg calls from ejs
-*/	
-
-libinclude("base.js");
-libinclude("winreg.js");
-
-var options = new Object();
-
-ok = GetOptions(ARGV, options,
-		"POPT_AUTOHELP",
-		"POPT_COMMON_SAMBA",
-		"POPT_COMMON_CREDENTIALS");
-if (ok == false) {
-	println("Failed to parse options: " + options.ERROR);
-	return -1;
-}
-
-if (options.ARGV.length < 1) {
-	println("Usage: winreg.js <BINDING>");
-	return -1;
-}
-var binding = options.ARGV[0];
-reg = winreg_init();
-security_init(reg);
-
-print("Connecting to " + binding + "\n");
-status = reg.connect(binding);
-if (status.is_ok != true) {
-	print("Failed to connect to " + binding + " - " + status.errstr + "\n");
-	return -1;
-}
-
-function list_values(path) {
-	var list = winreg_enum_values(reg, path);
-	var i;
-	if (list == undefined) {
-		return;
-	}
-	for (i=0;i<list.length;i++) {
-		printf("\ttype=%2d size=%4d  '%s'\n", list[i].type, list[i].size, list[i].name);
-	}
-}
-
-function list_path(path) {
-	var list = winreg_enum_path(reg, path);
-	var i;
-	list_values(path);
-	for (i=0;i<list.length;i++) {
-		var npath;
-		if (path) {
-			npath = path + "\\" + list[i];
-		} else {
-			npath = list[i];
-		}
-		println(npath);
-		list_path(npath);
-	}
-}
-
-var root;
-
-if (options.ARGV.length > 1) {
-	root = options.ARGV[1];
-} else {
-	root = '';
-}
-
-printf("Listing registry tree '%s'\n", root);
-list_path(root);
-return 0;



More information about the samba-cvs mailing list