I'm trying to get JDebug to work - I've carefully gone down through the
manual, but when I attempt to launch a process:
1) Its *very* slow - on the (odd) occaision that its worked I seem to
have to wait forever for anything to happen
2) It usually times out thus:
(jde-dbo-error 1 "Gave up waiting for Emacs to connect to SIO port:
59690")
with a timeout of 30 seconds.
I can't understand why its so slow, which is why its subsequently timing
out. The machine is largely unused (it was bought as a group server, but
I snaggled it as a dev. machine), so its not like the machine can't
handle the load or somesuch! Any ideas as to how to proceed with the
problem characterisation/isolation/debug process would be greatly
appreciated.
Toby
Here're my installation details:
SunOS vortex-dev6 5.8 Generic_108528-13 sun4u sparc SUNW,Ultra-60, 1G
RAM
java version "1.4.0_01-ea"
JDE: 2.2.8
Physically I use the "standard" jde directory layout, although I do it
using symlinks:
bash-2.03$ (cd ~/emacs/site; ls -l eieio elib jde semantic speedbar)
lrwxrwxrwx 1 toby vortex-eng 29 Jul 31 14:36 eieio ->
/u/toby/emacs/site/eieio-0.16
lrwxrwxrwx 1 toby vortex-eng 27 Jul 31 14:36 elib ->
/u/toby/emacs/site/elib-1.0
lrwxrwxrwx 1 toby vortex-eng 33 Jul 31 14:36 jde ->
/u/toby/emacs/site/jde-2.2.8/lisp
lrwxrwxrwx 1 toby vortex-eng 36 Jul 31 14:36 semantic ->
/u/toby/emacs/site/semantic-1.4beta5
lrwxrwxrwx 1 toby vortex-eng 33 Jul 31 14:36 speedbar ->
/u/toby/emacs/site/speedbar-0.13a
bash-2.03$
Finally, my .emacs is attached.
(add-to-list 'load-path (expand-file-name "~/emacs"))
(add-to-list 'load-path (expand-file-name "~/emacs/site/xslide"))
(add-to-list 'load-path (expand-file-name "~/emacs/site/tdtd"))
(normal-erase-is-backspace-mode)
(load-library "jde-setup")
;(jde-version 'jde-2-2-5)
;(jde-version 'jde-2-2-9-beta-9-1)
(jde-version 'jde-2-2-8)
;(load-library "working")
(add-to-list 'load-path (expand-file-name "~/emacs/site/pcl-cvs-2.9.9"))
(load "pcl-cvs-startup")
(autoload 'speedbar-frame-mode "speedbar" "Popup a speedbar frame" t)
(autoload 'speedbar-get-focus "speedbar" "Jump to speedbar frame" t)
(setq user-full-name "Toby H Ferguson"
mail-host-address "vortexlnx1.red.iplanet.com"
user-mail-address "[EMAIL PROTECTED]")
(global-font-lock-mode t)
(column-number-mode t)
(auto-fill-mode t)
(auto-compression-mode t)
(display-time)
(require 'vc)
(require 'jde)
;; Save the desktop
;(desktop-load-default)
;(desktop-read)
;; XSL mode
(autoload 'xsl-mode "xslide" "Major mode for XSL stylesheets." t)
(defvar xsl-font-lock-face-attributes
(list
'(xsl-xsl-main-face "red4")
'(xsl-xsl-alternate-face "red4")
'(xsl-fo-main-face "PaleGreen")
'(xsl-fo-alternate-face "YellowGreen")
'(xsl-other-element-face "Coral"))
"*List of XSL-specific font lock faces and their attributes")
;; Turn on font lock when in XSL mode
(add-hook 'xsl-mode-hook
(lambda () (auto-fill-mode t))
'turn-on-font-lock)
(setq auto-mode-alist
(append
(list
'("\\.xml" . xsl-mode)
'("\\.xsl" . xsl-mode))
auto-mode-alist))
;; DTD mode
(autoload 'dtd-mode "tdtd" "Major mode for SGML and XML DTDs." t)
(autoload 'dtd-etags "tdtd"
"Execute etags on FILESPEC and match on DTD-specific regular expressions."
t)
(autoload 'dtd-grep "tdtd" "Grep for PATTERN in files matching FILESPEC." t)
;; Turn on font lock when in DTD mode
(add-hook 'dtd-mode-hooks
'turn-on-font-lock)
; could do this using nconc - saves the copy. Look into it later.
(setq auto-mode-alist
(append
(list
'("\\.dcl$" . dtd-mode)
'("\\.dec$" . dtd-mode)
'("\\.dtd$" . dtd-mode)
'("\\.ele$" . dtd-mode)
'("\\.ent$" . dtd-mode)
'("\\.mod$" . dtd-mode)
'("\\.war$" . archive-mode)
'("\\.ear$" . archive-mode))
auto-mode-alist))
;; To use resize-minibuffer-mode, uncomment this and include in your .emacs:
;;(resize-minibuffer-mode)
(add-hook 'text-mode-hook
'turn-on-auto-fill)
;; Makefile mode
(add-hook 'makefile-mode-hook
'turn-on-auto-fill)
(global-font-lock-mode 1)
;; cc-mode customization
(defconst my-c-style
'((c-tab-always-indent . t)
(c-comment-only-line-offset . 4)
(c-hanging-braces-alist . ((substatement-open after)
(defun-open after)
(defun-close before after)
(inline-open after)
(inline-close before after)
(brace-list-open)
(brace-entry-open)
(block-close . c-snug-do-while)
(extern-lang-open after)
(inexpr-class-open after)
(inexpr-class-close before)))
(c-hanging-colons-alist . ((member-init-intro before)
(inher-intro)
(case-label after)
(label after)
(access-label after)))
(c-cleanup-list . (scope-operator
empty-defun-braces
defun-close-semi
brace-else-brace
brace-elseif-brace
))
(c-offsets-alist . ((arglist-close . c-lineup-arglist)
(inline-open . 0)
(statement-cont . 0)
(substatement-open . 0)
(case-label . 4)
(block-open . 0)
(knr-argdecl-intro . -)))
(c-echo-syntactic-information-p . t)
)
"My C Programming Style")
(defun my-c-mode-common-hook ()
;; add my personal style and set it for the current buffer
(c-add-style "PERSONAL" my-c-style t)
;; other customizations
()
(setq tab-width 4
;; this will make sure tabs are used instead of spaces
indent-tabs-mode t)
;; we like auto-newline and hungry-delete
(c-toggle-auto-hungry-state 1)
;; keybindings for all supported languages. We can put these in
;; c-mode-base-map because c-mode-map, c++-mode-map, objc-mode-map,
;; java-mode-map, and idl-mode-map inherit from it.
;; This will force return to act like C-j
(define-key c-mode-base-map "\C-m" 'newline-and-indent)
)
(add-hook 'c-mode-common-hook 'my-c-mode-common-hook 'turn-on-font-lock)
;;; JDE stuff
;; Sets the basic indentation for Java source files
;; to two spaces.
(defun my-jde-mode-hook ()
(setq c-basic-offset 2)
(auto-fill-mode t)
(setq jde-jdk-doc-url "file:///jdk/docs/api/index.html"))
(add-hook 'jde-mode-hook 'my-jde-mode-hook 'my-c-mode-common-hook)
(setq shell-dirstack-query "pwd")
(add-hook 'comint-output-filter-functions
'comint-watch-for-password-prompt)
;;; Auto insert when finding new files
(require 'autoinsert)
(auto-insert-mode t)
(setq auto-insert-alist
(append
(list
'("\\.xsl\\'" . "xsl-insert")
'("\\.xml\\'" . "xml-insert")
'("\\.dtd\\'" . "dtd-insert"))
auto-insert-alist))
(setq auto-insert-query nil)
(put 'narrow-to-region 'disabled nil)
(put 'downcase-region 'disabled nil)
;; emacs 21.1
(and (boundp 'browse-url-new-window-flag)
(setq browse-url-new-window-p browse-url-new-window-flag))
(setq enable-recursive-minibuffers t)
(custom-set-variables
;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
'(auto-compression-mode t nil (jka-compr))
'(case-fold-search t)
'(current-language-environment "Latin-1")
'(cvs-parse-ignored-messages (quote ("Executing ssh-askpass to query the password.*$"
".*Remote host denied X11 forwarding.*$" ".*[Uu]pdating.*$" ".*: scheduling.*$" ".*:
use.*commit.*$" ".*(any longer).*$" ".*New directory.*$")))
'(debug-on-error nil)
'(default-input-method "latin-1-prefix")
'(global-font-lock-mode t nil (font-lock))
'(jde-bug-jdk-directory "/share/builds/components/jdk/1.4.0/SunOS/")
'(jde-bug-jpda-directory "/share/builds/components/jdk/1.4.0/SunOS/")
'(jde-bug-vm-includes-jpda-p t)
'(jde-db-debugger (quote ("JDEbug" "" . "Executable")) t)
'(jde-project-name "default")
'(save-place t)
'(scroll-bar-mode (quote right))
'(show-paren-mode t nil (paren))
'(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
'(transient-mark-mode t)
'(vc-comment-alist (quote ((nroff-mode ".\\\"" "") (xsl-mode "<!--" "-->")))))
(custom-set-faces
;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
)
(setq minibuffer-max-depth nil)
(put 'set-goal-column 'disabled nil)
