(not part of client build) moving to mozilla from jsdse_branch of ns/js/jsd/corba. This code constitutes the server side of the Corba/iiop based remote JavaScript debugging system. There is not currently a build system for the C++ code in place

js/jsd/corba/.cvsignore

@@ -0,0 +1,3 @@
+class
+cpp
+java

js/jsd/corba/idl/.cvsignore

@@ -0,0 +1,2 @@
+ifaces_original.idl
+temp.idl

js/jsd/corba/idl/ifaces.idl

@@ -0,0 +1,190 @@
+struct Thing {
+  string s;
+  long i;
+};
+interface StringReciever {
+  void recieveString(
+    in string arg0
+  );
+  void bounce(
+    in long arg0
+  );
+};
+interface TestInterface {
+  string getFirstAppInList();
+  void getAppNames(
+    in ::StringReciever arg0
+  );
+  typedef sequence<::Thing> sequence_of_Thing;
+  ::TestInterface::sequence_of_Thing getThings();
+  void callBounce(
+    in ::StringReciever arg0,
+    in long arg1
+  );
+};
+interface ISourceTextProvider {
+  typedef sequence<string> sequence_of_string;
+  ::ISourceTextProvider::sequence_of_string getAllPages();
+  void refreshAllPages();
+  boolean hasPage(
+    in string arg0
+  );
+  boolean loadPage(
+    in string arg0
+  );
+  void refreshPage(
+    in string arg0
+  );
+  string getPageText(
+    in string arg0
+  );
+  long getPageStatus(
+    in string arg0
+  );
+  long getPageAlterCount(
+    in string arg0
+  );
+};
+struct IScriptSection {
+  long base;
+  long extent;
+};
+typedef sequence<::IScriptSection> sequence_of_IScriptSection;
+struct IScript {
+  string url;
+  string funname;
+  long base;
+  long extent;
+  long jsdscript;
+  ::sequence_of_IScriptSection sections;
+};
+struct IJSPC {
+  ::IScript script;
+  long offset;
+};
+struct IJSSourceLocation {
+  long line;
+  ::IJSPC pc;
+};
+interface IJSErrorReporter {
+  long reportError(
+    in string arg0,
+    in string arg1,
+    in long arg2,
+    in string arg3,
+    in long arg4
+  );
+};
+interface IScriptHook {
+  void justLoadedScript(
+    in ::IScript arg0
+  );
+  void aboutToUnloadScript(
+    in ::IScript arg0
+  );
+};
+struct IJSStackFrameInfo {
+  ::IJSPC pc;
+  long jsdframe;
+};
+typedef sequence<::IJSStackFrameInfo> sequence_of_IJSStackFrameInfo;
+struct IJSThreadState {
+  ::sequence_of_IJSStackFrameInfo stack;
+  long continueState;
+  string returnValue;
+  long status;
+  long jsdthreadstate;
+  long id;
+};
+interface IJSExecutionHook {
+  void aboutToExecute(
+    in ::IJSThreadState arg0,
+    in ::IJSPC arg1
+  );
+};
+struct IExecResult {
+  string result;
+  boolean errorOccured;
+  string errorMessage;
+  string errorFilename;
+  long errorLineNumber;
+  string errorLineBuffer;
+  long errorTokenOffset;
+};
+interface IDebugController {
+  long getMajorVersion();
+  long getMinorVersion();
+  ::IJSErrorReporter setErrorReporter(
+    in ::IJSErrorReporter arg0
+  );
+  ::IJSErrorReporter getErrorReporter();
+  ::IScriptHook setScriptHook(
+    in ::IScriptHook arg0
+  );
+  ::IScriptHook getScriptHook();
+  ::IJSPC getClosestPC(
+    in ::IScript arg0,
+    in long arg1
+  );
+  ::IJSSourceLocation getSourceLocation(
+    in ::IJSPC arg0
+  );
+  ::IJSExecutionHook setInterruptHook(
+    in ::IJSExecutionHook arg0
+  );
+  ::IJSExecutionHook getInterruptHook();
+  ::IJSExecutionHook setDebugBreakHook(
+    in ::IJSExecutionHook arg0
+  );
+  ::IJSExecutionHook getDebugBreakHook();
+  ::IJSExecutionHook setInstructionHook(
+    in ::IJSExecutionHook arg0,
+    in ::IJSPC arg1
+  );
+  ::IJSExecutionHook getInstructionHook(
+    in ::IJSPC arg0
+  );
+  void setThreadContinueState(
+    in long arg0,
+    in long arg1
+  );
+  void setThreadReturnValue(
+    in long arg0,
+    in string arg1
+  );
+  void sendInterrupt();
+  void sendInterruptStepInto(
+    in long arg0
+  );
+  void sendInterruptStepOver(
+    in long arg0
+  );
+  void sendInterruptStepOut(
+    in long arg0
+  );
+  void reinstateStepper(
+    in long arg0
+  );
+  ::IExecResult executeScriptInStackFrame(
+    in long arg0,
+    in ::IJSStackFrameInfo arg1,
+    in string arg2,
+    in string arg3,
+    in long arg4
+  );
+  boolean isRunningHook(
+    in long arg0
+  );
+  boolean isWaitingForResume(
+    in long arg0
+  );
+  void leaveThreadSuspended(
+    in long arg0
+  );
+  void resumeThread(
+    in long arg0
+  );
+  void iterateScripts(
+    in ::IScriptHook arg0
+  );
+};

js/jsd/corba/ifaces_s.hh

@@ -0,0 +1,777 @@
+#ifndef _ifaces_s_hh
+#define _ifaces_s_hh
+
+#include "ifaces_c.hh"
+
+/************************************************************************/
+/*                                                                      */
+/* This file is automatically generated by ORBeline IDL compiler        */
+/* Do not modify this file.                                             */
+/*                                                                      */
+/* ORBeline (c) is copyrighted by PostModern Computing, Inc.            */
+/*                                                                      */
+/* The generated code conforms to OMG's IDL C++ mapping as              */
+/* specified in OMG Document Number: 94-9-14.                           */
+/*                                                                      */
+/************************************************************************/
+
+class _sk_StringReciever : public StringReciever
+{
+    protected:
+	_sk_StringReciever(const char *object_name = (const char *)NULL);
+	_sk_StringReciever(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_StringReciever() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual void recieveString(const char * arg0) = 0;
+	virtual void bounce(CORBA::Long arg0) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _recieveString(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _bounce(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_StringReciever : public StringReciever
+{
+    public:
+	_tie_StringReciever(T& t, const char *obj_name=(char*)NULL) : 
+			StringReciever(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_StringReciever(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_StringReciever() {}
+	void recieveString(const char * arg0) {
+		_ref.recieveString(
+		arg0);
+	}
+	void bounce(CORBA::Long arg0) {
+		_ref.bounce(
+		arg0);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_TestInterface : public TestInterface
+{
+    protected:
+	_sk_TestInterface(const char *object_name = (const char *)NULL);
+	_sk_TestInterface(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_TestInterface() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual char * getFirstAppInList() = 0;
+	virtual void getAppNames(StringReciever_ptr arg0) = 0;
+	virtual TestInterface::sequence_of_Thing * getThings() = 0;
+	virtual void callBounce(StringReciever_ptr arg0,
+			CORBA::Long arg1) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _getFirstAppInList(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getAppNames(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getThings(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _callBounce(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_TestInterface : public TestInterface
+{
+    public:
+	_tie_TestInterface(T& t, const char *obj_name=(char*)NULL) : 
+			TestInterface(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_TestInterface(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_TestInterface() {}
+	char * getFirstAppInList() {
+		return _ref.getFirstAppInList();
+	}
+	void getAppNames(StringReciever_ptr arg0) {
+		_ref.getAppNames(
+		arg0);
+	}
+	TestInterface::sequence_of_Thing * getThings() {
+		return _ref.getThings();
+	}
+	void callBounce(StringReciever_ptr arg0,
+		CORBA::Long arg1) {
+		_ref.callBounce(
+		arg0,
+		arg1);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_ISourceTextProvider : public ISourceTextProvider
+{
+    protected:
+	_sk_ISourceTextProvider(const char *object_name = (const char *)NULL);
+	_sk_ISourceTextProvider(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_ISourceTextProvider() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual ISourceTextProvider::sequence_of_string * getAllPages() = 0;
+	virtual void refreshAllPages() = 0;
+	virtual CORBA::Boolean hasPage(const char * arg0) = 0;
+	virtual CORBA::Boolean loadPage(const char * arg0) = 0;
+	virtual void refreshPage(const char * arg0) = 0;
+	virtual char * getPageText(const char * arg0) = 0;
+	virtual CORBA::Long getPageStatus(const char * arg0) = 0;
+	virtual CORBA::Long getPageAlterCount(const char * arg0) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _getAllPages(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _refreshAllPages(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _hasPage(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _loadPage(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _refreshPage(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getPageText(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getPageStatus(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getPageAlterCount(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_ISourceTextProvider : public ISourceTextProvider
+{
+    public:
+	_tie_ISourceTextProvider(T& t, const char *obj_name=(char*)NULL) : 
+			ISourceTextProvider(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_ISourceTextProvider(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_ISourceTextProvider() {}
+	ISourceTextProvider::sequence_of_string * getAllPages() {
+		return _ref.getAllPages();
+	}
+	void refreshAllPages() {
+		_ref.refreshAllPages();
+	}
+	CORBA::Boolean hasPage(const char * arg0) {
+		return _ref.hasPage(
+		arg0);
+	}
+	CORBA::Boolean loadPage(const char * arg0) {
+		return _ref.loadPage(
+		arg0);
+	}
+	void refreshPage(const char * arg0) {
+		_ref.refreshPage(
+		arg0);
+	}
+	char * getPageText(const char * arg0) {
+		return _ref.getPageText(
+		arg0);
+	}
+	CORBA::Long getPageStatus(const char * arg0) {
+		return _ref.getPageStatus(
+		arg0);
+	}
+	CORBA::Long getPageAlterCount(const char * arg0) {
+		return _ref.getPageAlterCount(
+		arg0);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_IJSErrorReporter : public IJSErrorReporter
+{
+    protected:
+	_sk_IJSErrorReporter(const char *object_name = (const char *)NULL);
+	_sk_IJSErrorReporter(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_IJSErrorReporter() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual CORBA::Long reportError(const char * arg0,
+			const char * arg1,
+			CORBA::Long arg2,
+			const char * arg3,
+			CORBA::Long arg4) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _reportError(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_IJSErrorReporter : public IJSErrorReporter
+{
+    public:
+	_tie_IJSErrorReporter(T& t, const char *obj_name=(char*)NULL) : 
+			IJSErrorReporter(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_IJSErrorReporter(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_IJSErrorReporter() {}
+	CORBA::Long reportError(const char * arg0,
+		const char * arg1,
+		CORBA::Long arg2,
+		const char * arg3,
+		CORBA::Long arg4) {
+		return _ref.reportError(
+		arg0,
+		arg1,
+		arg2,
+		arg3,
+		arg4);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_IScriptHook : public IScriptHook
+{
+    protected:
+	_sk_IScriptHook(const char *object_name = (const char *)NULL);
+	_sk_IScriptHook(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_IScriptHook() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual void justLoadedScript(const IScript& arg0) = 0;
+	virtual void aboutToUnloadScript(const IScript& arg0) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _justLoadedScript(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _aboutToUnloadScript(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_IScriptHook : public IScriptHook
+{
+    public:
+	_tie_IScriptHook(T& t, const char *obj_name=(char*)NULL) : 
+			IScriptHook(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_IScriptHook(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_IScriptHook() {}
+	void justLoadedScript(const IScript& arg0) {
+		_ref.justLoadedScript(
+		arg0);
+	}
+	void aboutToUnloadScript(const IScript& arg0) {
+		_ref.aboutToUnloadScript(
+		arg0);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_IJSExecutionHook : public IJSExecutionHook
+{
+    protected:
+	_sk_IJSExecutionHook(const char *object_name = (const char *)NULL);
+	_sk_IJSExecutionHook(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_IJSExecutionHook() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual void aboutToExecute(const IJSThreadState& arg0,
+			const IJSPC& arg1) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _aboutToExecute(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_IJSExecutionHook : public IJSExecutionHook
+{
+    public:
+	_tie_IJSExecutionHook(T& t, const char *obj_name=(char*)NULL) : 
+			IJSExecutionHook(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_IJSExecutionHook(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_IJSExecutionHook() {}
+	void aboutToExecute(const IJSThreadState& arg0,
+		const IJSPC& arg1) {
+		_ref.aboutToExecute(
+		arg0,
+		arg1);
+	}
+
+    private:
+	T& _ref;
+};
+class _sk_IDebugController : public IDebugController
+{
+    protected:
+	_sk_IDebugController(const char *object_name = (const char *)NULL);
+	_sk_IDebugController(const char *service_name, const CORBA::ReferenceData& data);
+	virtual ~_sk_IDebugController() {}
+    public:
+	static const CORBA::TypeInfo _skel_info;
+
+	// The following operations need to be implemented by the server.
+	virtual CORBA::Long getMajorVersion() = 0;
+	virtual CORBA::Long getMinorVersion() = 0;
+	virtual IJSErrorReporter_ptr setErrorReporter(IJSErrorReporter_ptr arg0) = 0;
+	virtual IJSErrorReporter_ptr getErrorReporter() = 0;
+	virtual IScriptHook_ptr setScriptHook(IScriptHook_ptr arg0) = 0;
+	virtual IScriptHook_ptr getScriptHook() = 0;
+	virtual IJSPC * getClosestPC(const IScript& arg0,
+			CORBA::Long arg1) = 0;
+	virtual IJSSourceLocation * getSourceLocation(const IJSPC& arg0) = 0;
+	virtual IJSExecutionHook_ptr setInterruptHook(IJSExecutionHook_ptr arg0) = 0;
+	virtual IJSExecutionHook_ptr getInterruptHook() = 0;
+	virtual IJSExecutionHook_ptr setDebugBreakHook(IJSExecutionHook_ptr arg0) = 0;
+	virtual IJSExecutionHook_ptr getDebugBreakHook() = 0;
+	virtual IJSExecutionHook_ptr setInstructionHook(IJSExecutionHook_ptr arg0,
+			const IJSPC& arg1) = 0;
+	virtual IJSExecutionHook_ptr getInstructionHook(const IJSPC& arg0) = 0;
+	virtual void setThreadContinueState(CORBA::Long arg0,
+			CORBA::Long arg1) = 0;
+	virtual void setThreadReturnValue(CORBA::Long arg0,
+			const char * arg1) = 0;
+	virtual void sendInterrupt() = 0;
+	virtual void sendInterruptStepInto(CORBA::Long arg0) = 0;
+	virtual void sendInterruptStepOver(CORBA::Long arg0) = 0;
+	virtual void sendInterruptStepOut(CORBA::Long arg0) = 0;
+	virtual void reinstateStepper(CORBA::Long arg0) = 0;
+	virtual IExecResult * executeScriptInStackFrame(CORBA::Long arg0,
+			const IJSStackFrameInfo& arg1,
+			const char * arg2,
+			const char * arg3,
+			CORBA::Long arg4) = 0;
+	virtual CORBA::Boolean isRunningHook(CORBA::Long arg0) = 0;
+	virtual CORBA::Boolean isWaitingForResume(CORBA::Long arg0) = 0;
+	virtual void leaveThreadSuspended(CORBA::Long arg0) = 0;
+	virtual void resumeThread(CORBA::Long arg0) = 0;
+	virtual void iterateScripts(IScriptHook_ptr arg0) = 0;
+	
+	// Skeleton Operations implemented automatically
+	
+	static void _getMajorVersion(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getMinorVersion(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setErrorReporter(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getErrorReporter(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setScriptHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getScriptHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getClosestPC(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getSourceLocation(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setInterruptHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getInterruptHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setDebugBreakHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getDebugBreakHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setInstructionHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _getInstructionHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setThreadContinueState(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _setThreadReturnValue(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _sendInterrupt(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _sendInterruptStepInto(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _sendInterruptStepOver(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _sendInterruptStepOut(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _reinstateStepper(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _executeScriptInStackFrame(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _isRunningHook(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _isWaitingForResume(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _leaveThreadSuspended(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _resumeThread(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+	static void _iterateScripts(void *obj,
+			CORBA::MarshalStream &strm,
+			CORBA::Principal_ptr principal,
+			const char *oper,
+			void *priv_data);
+	
+};
+template <class T>
+class _tie_IDebugController : public IDebugController
+{
+    public:
+	_tie_IDebugController(T& t, const char *obj_name=(char*)NULL) : 
+			IDebugController(obj_name), 
+			_ref(t) {
+		_object_name(obj_name);
+	}
+	_tie_IDebugController(T& t, const char *service_name,
+			const CORBA::ReferenceData& id)
+			:_ref(t) {
+		_service(service_name, id);
+	}
+	~_tie_IDebugController() {}
+	CORBA::Long getMajorVersion() {
+		return _ref.getMajorVersion();
+	}
+	CORBA::Long getMinorVersion() {
+		return _ref.getMinorVersion();
+	}
+	IJSErrorReporter_ptr setErrorReporter(IJSErrorReporter_ptr arg0) {
+		return _ref.setErrorReporter(
+		arg0);
+	}
+	IJSErrorReporter_ptr getErrorReporter() {
+		return _ref.getErrorReporter();
+	}
+	IScriptHook_ptr setScriptHook(IScriptHook_ptr arg0) {
+		return _ref.setScriptHook(
+		arg0);
+	}
+	IScriptHook_ptr getScriptHook() {
+		return _ref.getScriptHook();
+	}
+	IJSPC * getClosestPC(const IScript& arg0,
+		CORBA::Long arg1) {
+		return _ref.getClosestPC(
+		arg0,
+		arg1);
+	}
+	IJSSourceLocation * getSourceLocation(const IJSPC& arg0) {
+		return _ref.getSourceLocation(
+		arg0);
+	}
+	IJSExecutionHook_ptr setInterruptHook(IJSExecutionHook_ptr arg0) {
+		return _ref.setInterruptHook(
+		arg0);
+	}
+	IJSExecutionHook_ptr getInterruptHook() {
+		return _ref.getInterruptHook();
+	}
+	IJSExecutionHook_ptr setDebugBreakHook(IJSExecutionHook_ptr arg0) {
+		return _ref.setDebugBreakHook(
+		arg0);
+	}
+	IJSExecutionHook_ptr getDebugBreakHook() {
+		return _ref.getDebugBreakHook();
+	}
+	IJSExecutionHook_ptr setInstructionHook(IJSExecutionHook_ptr arg0,
+		const IJSPC& arg1) {
+		return _ref.setInstructionHook(
+		arg0,
+		arg1);
+	}
+	IJSExecutionHook_ptr getInstructionHook(const IJSPC& arg0) {
+		return _ref.getInstructionHook(
+		arg0);
+	}
+	void setThreadContinueState(CORBA::Long arg0,
+		CORBA::Long arg1) {
+		_ref.setThreadContinueState(
+		arg0,
+		arg1);
+	}
+	void setThreadReturnValue(CORBA::Long arg0,
+		const char * arg1) {
+		_ref.setThreadReturnValue(
+		arg0,
+		arg1);
+	}
+	void sendInterrupt() {
+		_ref.sendInterrupt();
+	}
+	void sendInterruptStepInto(CORBA::Long arg0) {
+		_ref.sendInterruptStepInto(
+		arg0);
+	}
+	void sendInterruptStepOver(CORBA::Long arg0) {
+		_ref.sendInterruptStepOver(
+		arg0);
+	}
+	void sendInterruptStepOut(CORBA::Long arg0) {
+		_ref.sendInterruptStepOut(
+		arg0);
+	}
+	void reinstateStepper(CORBA::Long arg0) {
+		_ref.reinstateStepper(
+		arg0);
+	}
+	IExecResult * executeScriptInStackFrame(CORBA::Long arg0,
+		const IJSStackFrameInfo& arg1,
+		const char * arg2,
+		const char * arg3,
+		CORBA::Long arg4) {
+		return _ref.executeScriptInStackFrame(
+		arg0,
+		arg1,
+		arg2,
+		arg3,
+		arg4);
+	}
+	CORBA::Boolean isRunningHook(CORBA::Long arg0) {
+		return _ref.isRunningHook(
+		arg0);
+	}
+	CORBA::Boolean isWaitingForResume(CORBA::Long arg0) {
+		return _ref.isWaitingForResume(
+		arg0);
+	}
+	void leaveThreadSuspended(CORBA::Long arg0) {
+		_ref.leaveThreadSuspended(
+		arg0);
+	}
+	void resumeThread(CORBA::Long arg0) {
+		_ref.resumeThread(
+		arg0);
+	}
+	void iterateScripts(IScriptHook_ptr arg0) {
+		_ref.iterateScripts(
+		arg0);
+	}
+
+    private:
+	T& _ref;
+};
+
+#endif
+

js/jsd/corba/java/.cvsignore

@@ -0,0 +1,2 @@
+com
+

js/jsd/corba/src/IDebugController.java

@@ -0,0 +1,68 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface IDebugController extends org.omg.CORBA.Object
+{
+    public int getMajorVersion();
+    public int getMinorVersion();
+
+    public IJSErrorReporter setErrorReporter(IJSErrorReporter er);
+    public IJSErrorReporter getErrorReporter();
+
+    public IScriptHook      setScriptHook(IScriptHook h);
+    public IScriptHook      getScriptHook();
+    
+    public IJSPC            getClosestPC(IScript script, int line);
+
+    public IJSSourceLocation getSourceLocation(IJSPC pc);
+
+    public IJSExecutionHook setInterruptHook(IJSExecutionHook hook);
+    public IJSExecutionHook getInterruptHook();
+
+    public IJSExecutionHook setDebugBreakHook(IJSExecutionHook hook);
+    public IJSExecutionHook getDebugBreakHook();
+
+    public IJSExecutionHook setInstructionHook(IJSExecutionHook hook, IJSPC pc);
+    public IJSExecutionHook getInstructionHook(IJSPC pc);
+
+    public void setThreadContinueState(int threadID, int state);
+    public void setThreadReturnValue(int threadID, String value);
+
+    public void sendInterrupt();
+
+    public void sendInterruptStepInto(int threadID);
+    public void sendInterruptStepOver(int threadID);
+    public void sendInterruptStepOut(int threadID);
+
+    public void reinstateStepper(int threadID);
+
+
+    public IExecResult executeScriptInStackFrame(int threadID,
+                                                 IJSStackFrameInfo frame,
+                                                 String text,
+                                                 String filename,
+                                                 int lineno);
+
+    public boolean isRunningHook(int threadID);
+    public boolean isWaitingForResume(int threadID);
+    public void leaveThreadSuspended(int threadID);
+    public void resumeThread(int threadID);
+
+    public void iterateScripts(IScriptHook h);
+}    
+

js/jsd/corba/src/IExecResult.java

@@ -0,0 +1,29 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IExecResult
+{
+    public String   result;
+    public boolean  errorOccured;
+    public String   errorMessage;
+    public String   errorFilename;
+    public int      errorLineNumber;
+    public String   errorLineBuffer;
+    public int      errorTokenOffset;
+}    
+

js/jsd/corba/src/IJSErrorReporter.java

@@ -0,0 +1,32 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface IJSErrorReporter extends org.omg.CORBA.Object
+{
+    /* keep these in sync with the numbers in jsdebug.h */
+    public static final int PASS_ALONG = 0;
+    public static final int RETURN     = 1;
+    public static final int DEBUG      = 2;
+
+    public int reportError( String msg,
+                            String filename,
+                            int    lineno,
+                            String linebuf,
+                            int    tokenOffset );
+}    
+

js/jsd/corba/src/IJSExecutionHook.java

@@ -0,0 +1,22 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface IJSExecutionHook extends org.omg.CORBA.Object
+{
+    public void aboutToExecute(IJSThreadState debug, IJSPC pc);
+}    

js/jsd/corba/src/IJSPC.java

@@ -0,0 +1,24 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IJSPC
+{
+    public IScript script;
+    public int     offset;
+}
+

js/jsd/corba/src/IJSSourceLocation.java

@@ -0,0 +1,23 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IJSSourceLocation
+{
+    public int      line;
+    public IJSPC    pc;
+}

js/jsd/corba/src/IJSStackFrameInfo.java

@@ -0,0 +1,23 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IJSStackFrameInfo
+{
+    public IJSPC pc;
+    public int   jsdframe;
+}    

js/jsd/corba/src/IJSThreadState.java

@@ -0,0 +1,65 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IJSThreadState
+{
+    /**
+     * partial list of thread states from sun.debug.ThreadInfo.
+     * XXX some of these don't apply.
+     */
+    public final static int THR_STATUS_UNKNOWN		= 0x01;
+    public final static int THR_STATUS_ZOMBIE		= 0x02;
+    public final static int THR_STATUS_RUNNING		= 0x03;
+    public final static int THR_STATUS_SLEEPING		= 0x04;
+    public final static int THR_STATUS_MONWAIT		= 0x05;
+    public final static int THR_STATUS_CONDWAIT		= 0x06;
+    public final static int THR_STATUS_SUSPENDED	= 0x07;
+    public final static int THR_STATUS_BREAK		= 0x08;
+
+
+    public final static int DEBUG_STATE_DEAD		= 0x01;
+
+    /**
+     * if the continueState is RUN, the thread will
+     * proceed to the next program counter value when it resumes.
+     */
+    public final static int DEBUG_STATE_RUN		= 0x02;
+
+    /**
+     * if the continueState is RETURN, the thread will
+     * return from the current method with the value in getReturnValue()
+     * when it resumes.
+     */
+    public final static int DEBUG_STATE_RETURN		= 0x03;
+
+    /**
+     * if the continueState is THROW, the thread will
+     * throw an exception (accessible with getException()) when it
+     * resumes.
+     */
+    public final static int DEBUG_STATE_THROW		= 0x04;
+
+
+    public IJSStackFrameInfo[]  stack;
+    public int                  continueState;
+    public String               returnValue;
+    public int                  status;
+    public int                  jsdthreadstate;
+    public int                  id;  // used for referencing this object
+}    
+

js/jsd/corba/src/IScript.java

@@ -0,0 +1,28 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IScript
+{
+    public String url;
+    public String funname;
+    public int    base;
+    public int    extent;
+    public int    jsdscript;
+    public IScriptSection[] sections;
+}
+

js/jsd/corba/src/IScriptHook.java

@@ -0,0 +1,24 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface IScriptHook extends org.omg.CORBA.Object
+{
+    public void justLoadedScript(IScript script);
+    public void aboutToUnloadScript(IScript script);
+}    
+

js/jsd/corba/src/IScriptSection.java

@@ -0,0 +1,23 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class IScriptSection
+{
+    public int base;
+    public int extent;
+}    

js/jsd/corba/src/ISourceTextProvider.java

@@ -0,0 +1,37 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface ISourceTextProvider extends org.omg.CORBA.Object
+{
+    /* these coorespond to jsdebug.h values - change in both places if anywhere */
+    public static final int INITED  = 0;
+    public static final int FULL    = 1;
+    public static final int PARTIAL = 2;
+    public static final int ABORTED = 3;
+    public static final int FAILED  = 4;
+    public static final int CLEARED = 5;
+
+    public String[] getAllPages();
+    public void     refreshAllPages();
+    public boolean  hasPage(String url);
+    public boolean  loadPage(String url);
+    public void     refreshPage(String url);
+    public String   getPageText(String url);
+    public int      getPageStatus(String url);
+    public int      getPageAlterCount(String url);
+}    

js/jsd/corba/src/README

@@ -0,0 +1,25 @@
+/* jband - 09/09/97 - readme for the dreaded js/jsd/corba system */
+
+This stuff in js/jsd/corba/src is used to generate corba source in IDL, Java,
+and C++. The raw source is all Java. The 'makefile' is mk.bat which is currently
+expected to run only on jband's NT box. All of the important output of this
+process should be checked in to cvs. mk.bat is only needed to regenerate new
+sources as the interfaces change. Those new sources should then be committed to
+cvs.
+
+The main scheme here is to use the Java code in js/jsd/corba/src as idl.
+mk.bat uses java2idl, orbeline, and idl2java to generate IDL and stubs and
+skeletons in C++ and Java. There are a few hacks to deal with limitations of
+these tools.
+
+The C++ output is copied to js/jsd/corba.
+The Java output is copied to 
+js/jsdj/classes/com/netscape/jsdebugging/remote/corba.
+
+Note that the files:
+
+    StringReciever.java  
+    TestInterface.java  
+    Thing.java
+
+are used only in test programs and are not part of the product

js/jsd/corba/src/StringReciever.java

@@ -0,0 +1,24 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface StringReciever extends org.omg.CORBA.Object
+{
+    public void recieveString(String s);
+    public void bounce(int count);
+}
+ 

js/jsd/corba/src/TestInterface.java

@@ -0,0 +1,26 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public interface TestInterface extends org.omg.CORBA.Object
+{
+    public String getFirstAppInList();
+    public void   getAppNames( StringReciever sr );
+    public Thing[] getThings();
+    public void   callBounce( StringReciever sr, int count );
+}
+ 

js/jsd/corba/src/Thing.java

@@ -0,0 +1,24 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+public final class Thing
+{
+    public String s;
+    public int    i;
+}
+ 

js/jsd/corba/src/bogus0.java

@@ -0,0 +1,31 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+//
+// This class only exist to force a forward declaration in the outputed
+// idl file.
+//
+// It should be handed to java2idl after IScriptSection.class but before
+// IScript.class
+//
+
+public final class bogus0
+{
+    public IScriptSection[] bogus;
+}    
+

js/jsd/corba/src/bogus1.java

@@ -0,0 +1,31 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+ *
+ * The contents of this file are subject to the Netscape Public License
+ * Version 1.0 (the "NPL"); you may not use this file except in
+ * compliance with the NPL.  You may obtain a copy of the NPL at
+ * http://www.mozilla.org/NPL/
+ *
+ * Software distributed under the NPL is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+ * for the specific language governing rights and limitations under the
+ * NPL.
+ *
+ * The Initial Developer of this code under the NPL is Netscape
+ * Communications Corporation.  Portions created by Netscape are
+ * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+ * Reserved.
+ */
+
+//
+// This class only exist to force a forward declaration in the outputed
+// idl file.
+//
+// It should be handed to java2idl after IJSStackFrameInfo.class but before
+// IJSThreadState.class
+//
+
+public final class bogus1
+{
+    public IJSStackFrameInfo[] bogus;
+}    
+

js/jsd/corba/src/cutlines.awk

@@ -0,0 +1,43 @@
+# -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
+#
+# The contents of this file are subject to the Netscape Public License
+# Version 1.0 (the "NPL"); you may not use this file except in
+# compliance with the NPL.  You may obtain a copy of the NPL at
+# http://www.mozilla.org/NPL/
+#
+# Software distributed under the NPL is distributed on an "AS IS" basis,
+# WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
+# for the specific language governing rights and limitations under the
+# NPL.
+#
+# The Initial Developer of this code under the NPL is Netscape
+# Communications Corporation.  Portions created by Netscape are
+# Copyright (C) 1998 Netscape Communications Corporation.  All Rights
+# Reserved.
+
+#
+# see usage...
+#
+
+BEGIN {
+    skiplines_left = 0
+    if( 0 == lines || 0 == pat )
+    {
+# show usage...        
+        print "\n"
+        print "strips some lines when first line contains pattern\n"
+        print "\tusage -v pat=\"pattern\" -v lines=3"
+    }
+}
+
+{
+    if( skiplines_left )
+        skiplines_left--;
+    else
+    {
+        if( match($0, pat) != 0 )
+            skiplines_left = lines-1;
+        else
+            print $0;
+    }
+}

js/jsd/corba/src/mk.bat

@@ -0,0 +1,143 @@
+@echo off
+REM
+REM This needs to be run from the src dir. It generates sibling dirs and their
+REM contents.
+REM
+
+set base_package=com.netscape.jsdebugging.remote.corba
+set base_packslash=com\netscape\jsdebugging\remote\corba
+set jsdj_classes_dir=..\..\..\jsdj\classes
+set DELAY=6
+
+rem -------------------------------------------------------------------------
+rem -- show settings
+echo.
+echo commandline: %0 %1 %2 %3 %4 %5 %6 %7 %8 %9
+echo.
+echo ES3_ROOT           = %ES3_ROOT%
+echo base_package       = %base_package% // set in this file
+echo jsdj_classes_dir   = %jsdj_classes_dir% // set in this file
+echo.
+rem -------------------------------------------------------------------------
+
+rem -- check for environment settings
+if "%ES3_ROOT%"         == "" goto usage
+
+set jc=sj.exe
+set cp=.;%ES3_ROOT%\wai\java\nisb.zip;%ES3_ROOT%\wai\java\WAI.zip;%ES3_ROOT%\plugins\Java\classes\serv3_0.zip
+set old_classpath=%CLASSPATH%
+set CLASSPATH=%CLASSPATH%;%ES3_ROOT%\wai\java\nisb.zip;%ES3_ROOT%\wai\java\WAI.zip
+echo.
+echo creating output dirs
+if not exist ..\class\NUL mkdir ..\class
+if not exist ..\idl\NUL   mkdir ..\idl
+if not exist ..\java\NUL  mkdir ..\java
+if not exist ..\cpp\NUL   mkdir ..\cpp
+
+echo.
+echo compiling raw Java interfaces
+%jc% -classpath %cp% *.java -d ..\class
+
+
+..\src\wait %DELAY%
+cd ..\class
+echo.
+echo.
+echo generating idl
+echo.
+REM
+REM THESE ARE HAND ORDERED TO DEAL WITH DEPENDENCIES
+REM
+%ES3_ROOT%\wai\bin\java2idl Thing.class StringReciever.class TestInterface.class ISourceTextProvider.class IScriptSection.class bogus0.class IScript.class IJSPC.class IJSSourceLocation.class IJSErrorReporter.class IScriptHook.class IJSStackFrameInfo.class bogus1.class IJSThreadState.class IJSExecutionHook.class IExecResult.class IDebugController.class > ..\idl\ifaces.idl
+
+
+..\src\wait %DELAY%
+cd ..\idl
+echo.
+echo.
+echo stripping lines from idl which were added to correctly order declarations
+echo.
+copy ifaces.idl ifaces_original.idl
+REM
+REM since we currenly have 2 of these, we can avoid the copy 
+REM
+gawk -v pat="struct bogus0" -v lines=3 -f ..\src\cutlines.awk < ifaces.idl > temp.idl
+gawk -v pat="struct bogus1" -v lines=3 -f ..\src\cutlines.awk < temp.idl > ifaces.idl
+REM copy temp.idl ifaces.idl
+
+REM ..\src\wait %DELAY%
+cd ..\cpp
+echo.
+echo.
+echo generating cpp
+echo.
+%ES3_ROOT%\wai\bin\orbeline ..\idl\ifaces.idl
+
+
+..\src\wait %DELAY%
+cd ..\java
+echo.
+echo.
+echo generating java
+echo.
+%ES3_ROOT%\wai\bin\idl2java ..\idl\ifaces.idl -package %base_package% -no_examples -no_tie -no_comments
+
+
+..\src\wait %DELAY%
+cd ..\src
+echo.
+echo. copying generated files
+echo.
+REM
+REM preserve generated java, but put ours in the outdir
+REM
+xcopy /Q ..\java\%base_packslash%\*.java ..\java\%base_packslash%\_unused\*.jav
+REM
+REM *****CUSTOMIZE HERE AS NEW INTERFACES WITH static ints ARE ADDED*****
+REM
+copy ..\src\package_header.h+..\src\ISourceTextProvider.java ..\java\%base_packslash%\ISourceTextProvider.java
+copy ..\src\package_header.h+..\src\IJSErrorReporter.java ..\java\%base_packslash%\IJSErrorReporter.java
+copy ..\src\package_header.h+..\src\IJSThreadState.java ..\java\%base_packslash%\IJSThreadState.java
+copy ..\src\package_header.h+..\src\IDebugController.java ..\java\%base_packslash%\IDebugController.java
+REM
+REM
+xcopy /Q ..\cpp\ifaces_c.hh ..\
+xcopy /Q ..\cpp\ifaces_s.hh ..\
+xcopy /Q ..\cpp\ifaces_c.cc ..\ifaces_c.cpp
+xcopy /Q ..\cpp\ifaces_s.cc ..\ifaces_s.cpp
+
+if "%jsdj_classes_dir%" == "" goto done
+if not exist %jsdj_classes_dir%\NUL  goto done
+xcopy /Q /S ..\java\*.java %jsdj_classes_dir%
+
+goto done
+
+:usage
+echo.
+echo usage:
+echo  mk
+echo.
+echo See "readme.txt" for details...
+echo.
+echo Rules:
+echo.
+echo These must be defined in environment:
+echo  ES3_ROOT      // location of Enterprise Server (e.g. e:\Netscape\SuiteSpot)
+echo.
+
+:done
+..\src\wait %DELAY%
+cd ..\src
+
+set base_package=
+set base_packslash=
+set jsdj_classes_dir=
+set cp=
+set jc=
+set DELAY=
+set CLASSPATH=%old_classpath%
+set old_classpath=
+echo.
+echo.
+echo done
+echo.

js/jsd/corba/src/package_header.h

@@ -0,0 +1,3 @@
+
+package com.netscape.jsdebugging.remote.corba;
+