================================================================
Dear Bug Team!
The efs package apparently doesn't like certain kinds of FTP servers.
For example, when trying to access a remote file located on an IRIX
6.5.19f server, I get the following errors:
(1) (error/warning) Error in process filter: (error Unable to identify server code.)
(2) (error/warning) Error in process filter: (ftp-error FTP Error: DIR failed: 229
Entering Extended Passive Mode (|||40487|))
(3) (error/warning) Error in process filter: (error Unable to identify server code.)
(4) (error/warning) Error in process filter: (error Unable to identify server code.)
(5) (error/warning) Error in process filter: (error Unable to identify server code.)
(6) (error/warning) Error in process filter: (error Unable to identify server code.)
(7) (error/warning) Error in process filter: (ftp-error FTP Error: CWD 229 Entering
Extended Passive Mode (|||15938|) failed: )
(8) (error/warning) Error in process filter: (error Unable to identify server code.)
(9) (error/warning) Error in process filter: (ftp-error FTP Error: DIR failed: 229
Entering Extended Passive Mode (|||22662|))
I'm not sure if this is the proper fix but I've worked around the
problem by changing:
(defvar efs-cmd-ok-msgs
;; RFC959 compliant
"^200 \\|^227 ")
to:
(defvar efs-cmd-ok-msgs
;; RFC959 compliant
"^200 \\|^227 \\|^229 ")
in efs.el
Here's the backtrace:
Signaling: (error "Unable to identify server code.")
signal(error ("Unable to identify server code."))
cerror("Unable to identify server code.")
apply(cerror "Unable to identify server code." nil)
error("Unable to identify server code.")
efs-process-scream-and-yell("229 Entering Extended Passive Mode (|||51943|)")
efs-process-handle-line("229 Entering Extended Passive Mode (|||51943|)"
#<process "*ftp long@ibis*" pid 51364 state:run>)
efs-process-filter(#<process "*ftp long@ibis*" pid 51364 state:run>
"229 Entering Extended Passive Mode (|||51943|)\n")
accept-process-output(#<process "*ftp long@ibis*" pid 51364 state:run>)
byte-code("..." [efs-process-nowait efs-process-busy proc process-status (run
open) accept-process-output] 2)
efs-raw-send-cmd(#<process "*ftp long@ibis*" pid 51364 state:run>
"ls \"-al\" /tmp/root/efslNLWL3" "Listing
/long@ibis:/usr/people/long/" nil (#<compiled-function (result line cont-lines
host user proc cmd msg pre-cont cont nowait noretry) "...(177)" [line result cmd
nowait cont retry fatal efs-send-cmd t 1 2 failed ... quote stor match-data ... nil
string-match efs-write-recover efs-host-type efs-call-cont host afsc-result afsc-line
afsc-cont-lines cont-lines noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> "ibis" "long" #<process "*ftp
long@ibis*" pid 51364 state:run> (dir "" "/tmp/root/efslNLWL3"
"-al") "Listing /long@ibis:/usr/people/long/" nil
(#<compiled-function ... "...(267)" ... 13> unix unix:unknown
"ibis" "long" "/tmp/root/efslNLWL3"
"/usr/people/long/" "-al" "/long@ibis:/usr/people/long/"
"-al" parse t nil t nil nil) nil nil) nil)
efs-send-cmd("ibis" "long" (dir ""
"/tmp/root/efslNLWL3" "-al") "Listing
/long@ibis:/usr/people/long/" nil (#<compiled-function (result line cont-lines
host-type listing-type host user temp-file path switches file lsargs noparse parse noerror
msg nowait cont) "...(267)" [user listing cont temp-file lsargs host get-buffer
efs-ftp-process-buffer ... ascii ... efs-ls-dumb-check unknown unix:unknown efs-call-cont
nil efs-error "DIR failed: " efs-ftp-path efs-add-file-entry efs-host-type
fundamental-mode get-buffer-create erase-buffer file-readable-p sleep-for
insert-file-contents format "list data file %s not readable" efs-set-files
efs-parse-listing buffer-string efs-add-to-ls-cache efs-get-ls-converter assoc
char-to-string 0 file conv listing-type buff line path noerror nowait listing-result parse
switches saved-buff efs-process-client-altered-xfer-type ...] 13> unix unix:unknown
"ibis" "long" "/tmp/root/efslNLWL3"
"/usr/people/long/" "-al" "/long@ibis:/usr/people/long/"
"-a!
l" parse t nil t nil nil) nil)
#<compiled-function (result line cont-lines host-type listing-type host user temp
temp-file path switches file lsargs noparse parse noerror msg nowait cont nlist)
"...(93)" [path noerror msg user host cont efs-call-cont nil efs-error format
"CWD %s failed: " efs-send-cmd nlist dir file-name-nondirectory t "Listing
%s" efs-relativize-filename #<compiled-function ... "...(267)" ...
13> lsargs file nowait result line temp host-type listing-type temp-file switches
noparse parse] 22>(nil "250 CWD command successful." "" unix
unix:unknown "ibis" "long" ("/tmp/root/efslNLWL3" .
"/tmp/root/efslNLWL3") "/tmp/root/efslNLWL3"
"/usr/people/long/" "-al" "/long@ibis:/usr/people/long/"
"-al" parse t nil t nil nil nil)
apply(#<compiled-function (result line cont-lines host-type listing-type host user
temp temp-file path switches file lsargs noparse parse noerror msg nowait cont nlist)
"...(93)" [path noerror msg user host cont efs-call-cont nil efs-error format
"CWD %s failed: " efs-send-cmd nlist dir file-name-nondirectory t "Listing
%s" efs-relativize-filename #<compiled-function ... "...(267)" ...
13> lsargs file nowait result line temp host-type listing-type temp-file switches
noparse parse] 22> (nil "250 CWD command successful." "" unix
unix:unknown "ibis" "long" ("/tmp/root/efslNLWL3" .
"/tmp/root/efslNLWL3") "/tmp/root/efslNLWL3"
"/usr/people/long/" "-al" "/long@ibis:/usr/people/long/"
"-al" parse t nil t nil nil nil))
efs-call-cont((#<compiled-function (result line cont-lines host-type listing-type
host user temp temp-file path switches file lsargs noparse parse noerror msg nowait cont
nlist) "...(93)" [path noerror msg user host cont efs-call-cont nil efs-error
format "CWD %s failed: " efs-send-cmd nlist dir file-name-nondirectory t
"Listing %s" efs-relativize-filename #<compiled-function ...
"...(267)" ... 13> lsargs file nowait result line temp host-type listing-type
temp-file switches noparse parse] 22> unix unix:unknown "ibis"
"long" ("/tmp/root/efslNLWL3" . "/tmp/root/efslNLWL3")
"/tmp/root/efslNLWL3" "/usr/people/long/" "-al"
"/long@ibis:/usr/people/long/" "-al" parse t nil t nil nil nil) nil
"250 CWD command successful." "")
#<compiled-function (result line cont-lines host user proc cmd msg pre-cont cont
nowait noretry) "...(177)" [line result cmd nowait cont retry fatal efs-send-cmd
t 1 2 failed (append rename put) quote stor match-data (...) nil string-match
efs-write-recover efs-host-type efs-call-cont host afsc-result afsc-line afsc-cont-lines
cont-lines noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12>(nil "250 CWD command successful." ""
"ibis" "long" #<process "*ftp long@ibis*" pid 51364
state:run> (cwd "/usr/people/long/") "CWD'ing to
/long@ibis:/usr/people/long/" nil (#<compiled-function (result line cont-lines
host-type listing-type host user temp temp-file path switches file lsargs noparse parse
noerror msg nowait cont nlist) "...(93)" [path noerror msg user host cont
efs-call-cont nil efs-error format "CWD %s failed: " efs-send-cmd nlist dir
file-name-nondirectory t "Listing %s" efs-relativize-filename
#<compiled-function ... "...(267)" ... !
13> lsargs file nowait result line temp host-type listing-type temp-file switches
noparse parse] 22> unix unix:unknown "ibis" "long"
("/tmp/root/efslNLWL3" . "/tmp/root/efslNLWL3")
"/tmp/root/efslNLWL3" "/usr/people/long/" "-al"
"/long@ibis:/usr/people/long/" "-al" parse t nil t nil nil nil) nil
nil)
apply(#<compiled-function (result line cont-lines host user proc cmd msg pre-cont
cont nowait noretry) "...(177)" [line result cmd nowait cont retry fatal
efs-send-cmd t 1 2 failed (append rename put) quote stor match-data (...) nil string-match
efs-write-recover efs-host-type efs-call-cont host afsc-result afsc-line afsc-cont-lines
cont-lines noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> (nil "250 CWD command successful." ""
"ibis" "long" #<process "*ftp long@ibis*" pid 51364
state:run> (cwd "/usr/people/long/") "CWD'ing to
/long@ibis:/usr/people/long/" nil (#<compiled-function ... "...(93)" ...
22> unix unix:unknown "ibis" "long"
("/tmp/root/efslNLWL3" . "/tmp/root/efslNLWL3")
"/tmp/root/efslNLWL3" "/usr/people/long/" "-al"
"/long@ibis:/usr/people/long/" "-al" parse t nil t nil nil nil) nil
nil))
efs-call-cont((#<compiled-function (result line cont-lines host user proc cmd msg
pre-cont cont nowait noretry) "...(177)" [line result cmd nowait cont retry
fatal efs-send-cmd t 1 2 failed ... quote stor match-data ... nil string-match
efs-write-recover efs-host-type efs-call-cont host afsc-result afsc-line afsc-cont-lines
cont-lines noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> "ibis" "long" #<process "*ftp
long@ibis*" pid 51364 state:run> (cwd "/usr/people/long/")
"CWD'ing to /long@ibis:/usr/people/long/" nil (#<compiled-function ...
"...(93)" ... 22> unix unix:unknown "ibis" "long"
("/tmp/root/efslNLWL3" . "/tmp/root/efslNLWL3")
"/tmp/root/efslNLWL3" "/usr/people/long/" "-al"
"/long@ibis:/usr/people/long/" "-al" parse t nil t nil nil nil) nil
nil) nil "250 CWD command successful." "")
efs-process-filter(#<process "*ftp long@ibis*" pid 51364 state:run>
"250 CWD command successful.\nftp> ")
accept-process-output(#<process "*ftp long@ibis*" pid 51364 state:run>)
byte-code("..." [efs-process-nowait efs-process-busy proc process-status (run
open) accept-process-output] 2)
efs-raw-send-cmd(#<process "*ftp long@ibis*" pid 51364 state:run>
"quote cwd /usr/people/long/." "CWD'ing to
/long@ibis:/usr/people/long/" nil (#<compiled-function (result line cont-lines
host user proc cmd msg pre-cont cont nowait noretry) "...(177)" [line result cmd
nowait cont retry fatal efs-send-cmd t 1 2 failed ... quote stor match-data ... nil
string-match efs-write-recover efs-host-type efs-call-cont host afsc-result afsc-line
afsc-cont-lines cont-lines noretry user msg pre-cont case-fold-search cfs buff match-data
efs-write-protect-msgs] 12> "ibis" "long" #<process "*ftp
long@ibis*" pid 51364 state:run> (cwd "/usr/people/long/")
"CWD'ing to /long@ibis:/usr/people/long/" nil (#<compiled-function ...
"...(93)" ... 22> unix unix:unknown "ibis" "long"
("/tmp/root/efslNLWL3" . "/tmp/root/efslNLWL3")
"/tmp/root/efslNLWL3" "/usr/people/long/" "-al"
"/long@ibis:/usr/people/long/" "-al" parse t nil t nil nil nil) nil
nil) nil)
efs-send-cmd("ibis" "long" (cwd "/usr/people/long/")
"CWD'ing to /long@ibis:/usr/people/long/" nil (#<compiled-function
(result line cont-lines host-type listing-type host user temp temp-file path switches file
lsargs noparse parse noerror msg nowait cont nlist) "...(93)" [path noerror msg
user host cont efs-call-cont nil efs-error format "CWD %s failed: " efs-send-cmd
nlist dir file-name-nondirectory t "Listing %s" efs-relativize-filename
#<compiled-function ... "...(267)" ... 13> lsargs file nowait result line
temp host-type listing-type temp-file switches noparse parse] 22> unix unix:unknown
"ibis" "long" ("/tmp/root/efslNLWL3" .
"/tmp/root/efslNLWL3") "/tmp/root/efslNLWL3"
"/usr/people/long/" "-al" "/long@ibis:/usr/people/long/"
"-al" parse t nil t nil nil nil) nil)
efs-ls("/long@ibis:/usr/people/long/" "-al" t parse nil)
efs-get-files("/long@ibis:/usr/people/long/")
efs-get-file-entry("/long@ibis:/usr/people/long/.tcshrc/")
#<compiled-function (path) "...(43)" [file-ent path parsed efs-ftp-path 2
"/" efs-get-file-entry efs-internal-file-name-as-directory efs-host-type
efs-internal-file-directory-p nil efs-chase-symlinks efs-internal-directory-file-name]
6>("/long@ibis:/usr/people/long/.tcshrc")
apply(#<compiled-function (path) "...(43)" [file-ent path parsed
efs-ftp-path 2 "/" efs-get-file-entry efs-internal-file-name-as-directory
efs-host-type efs-internal-file-directory-p nil efs-chase-symlinks
efs-internal-directory-file-name] 6> "/long@ibis:/usr/people/long/.tcshrc")
efs-internal-file-directory-p(unix "/long@ibis:/usr/people/long/.tcshrc")
efs-file-directory-p("/long@ibis:/usr/people/long/.tcshrc")
apply(efs-file-directory-p "/long@ibis:/usr/people/long/.tcshrc")
efs-file-handler-function(file-directory-p
"/long@ibis:/usr/people/long/.tcshrc")
file-directory-p("/long@ibis:/usr/people/long/.tcshrc")
apply(file-directory-p "/long@ibis:/usr/people/long/.tcshrc")
dired-handler-fn(file-directory-p "/long@ibis:/usr/people/long/.tcshrc")
file-directory-p("/long@ibis:/usr/people/long/.tcshrc")
find-file-noselect("/long@ibis:/usr/people/long/.tcshrc")
default-dir-real-find-file("/long@ibis:/usr/people/long/.tcshrc")
#<compiled-function (file &optional coding-system) "...(4)" [file
default-dir-real-find-file] 2 "Edit file FILENAME.\nSwitch to a buffer visiting file
FILENAME,\ncreating one if none already exists.\nUnder XEmacs/Mule, optional second
argument specifies the\ncoding system to use when decoding the file. Interactively,\nwith
a prefix argument, you will be prompted for the coding system.\n\nNote: This function has
been modified to work with default-dir." (list (expand-file-name
...))>("/long@ibis:/usr/people/long/.tcshrc")
call-interactively(find-file)
Jeff Long
================================================================
System Info to help track down your bug:
---------------------------------------
uname -a: IRIX humu 6.5 06260706 IP22
../configure '--prefix=/usr/freeware' '--infopath=/usr/freeware/info'
'--with-mule=no' '--pdump'
XEmacs 21.4.3 "Academic Rigor" configured for `mips-sgi-irix6.5'.
Compilation / Installation:
Source code location:
/xlv1/freeware/2001.Aug/xemacs/21.4.3/xemacs-21.4.3.diffbuild
Installation prefix: /usr/freeware
Operating system description file: `s/irix6-0.h'
Machine description file: `m/iris6d.h'
Compiler:
/hosts/babylon.engr/usr/dist/new_toolroots/6.5/products/freeware/latest/ptoolroot/usr/bin/cc
-n32 -mips3 -nostdinc -I.
-I/xlv1/freeware/2001.Aug/xemacs/21.4.3-root/usr/freeware/include
-I/xlv1/freeware/2001.Aug/xemacs/21.4.3-root/usr/include -O2 -OPT:Olimit=0:space=ON
Relocating allocator for buffers: yes
GNU version of malloc: yes
Window System:
Compiling in support for the X window system:
- X Windows headers location:
- X Windows libraries location:
- Handling WM_COMMAND properly.
Using Lucid menubars.
Using Lucid scrollbars.
Using Motif dialog boxes.
Using Motif native widgets.
TTY:
Images:
Compiling in support for GIF images (builtin).
Compiling in support for XPM images.
WARNING: -----------------------------------------------------------
WARNING: Compiling without PNG image support.
WARNING: You should strongly consider installing the PNG libraries.
WARNING: Otherwise certain images and glyphs may not display.
WARNING: (a copy may be found in
ftp://ftp.xemacs.org/pub/xemacs/aux)
WARNING: -----------------------------------------------------------
Sound:
Compiling in support for sound (native).
Databases:
Compiling in support for Berkeley database.
Compiling in support for GNU DBM.
Internationalization:
Mail:
Compiling in support for "dot-locking" mail spool file locking method.
Other Features:
Compiling in support for dynamic shared object modules.
Using the new portable dumper.
Load-Path Lisp Shadows:
----------------------
nil
Installed XEmacs Packages:
-------------------------
((xslt-process:version 1.11 :type regular)
(xslide :version 1.08 :type regular)
(xemacs-devel :version 1.58 :type single-file)
(xemacs-base :version 1.81 :type regular)
(x-symbol :version 1.05 :type regular)
(viper :version 1.36 :type regular)
(view-process :version 1.12 :type regular)
(vc :version 1.37 :type regular)
(tramp :version 1.16 :type regular)
(time :version 1.13 :type regular)
(textools :version 1.14 :type regular)
(text-modes :version 1.66 :type single-file)
(texinfo :version 1.24 :type regular)
(strokes :version 1.09 :type regular)
(speedbar :version 1.26 :type regular)
(sounds-wav :version 1.11 :type regular)
(sounds-au :version 1.11 :type regular)
(slider :version 1.14 :type regular)
(sh-script :version 1.17 :type regular)
(sgml :version 1.09 :type regular)
(semantic :version 1.17 :type regular)
(scheme :version 1.13 :type regular)
(reftex :version 1.32 :type regular)
(python-modes :version 1.02 :type single-file)
(psgml-dtds :version 1.02 :type regular)
(psgml :version 1.41 :type regular)
(ps-print :version 1.08 :type regular)
(prog-modes
:version
1
.89
:type
single-file)
(perl-modes :version 1.04 :type single-file)
(pcomplete :version 1.02 :type regular)
(pcl-cvs :version 1.64 :type regular)
(pc :version 1.25 :type single-file)
(os-utils :version 1.32 :type single-file)
(oo-browser :version 1.03 :type regular)
(net-utils :version 1.32 :type single-file)
(mmm-mode :version 1.0 :type regular)
(mail-lib :version 1.62 :type regular)
(jde :version 1.45 :type regular)
(ispell :version 1.24 :type regular)
(ilisp :version 1.32 :type regular)
(igrep :version 1.11 :type regular)
(ibuffer :version 1.08 :type regular)
(hm--html-menus :version 1.21 :type regular)
(gnus :version 1.71 :type regular)
(gnats :version 1.15 :type regular)
(fsf-compat :version 1.12 :type single-file)
(frame-icon :version 1.1 :type regular)
(fortran-modes :version 1.02 :type single-file)
(eudc :version 1.38 :type regular)
(eterm :version 1.14 :type regular)
(eshell :version 1.05 :type regular)
(emerge :version 1.1 :type regular)
(elib :version 1.1 :type single-file)
(eieio :version 1.04 :type regular)
(efs :version 1.31 :type regular)
(edit-utils :version 2.07 :type single-file)
(ediff :version 1.47 :type regular)
(edebug :version 1.19 :type regular)
(docbookide :version 0.06 :type regular)
(dired :version 1.14 :type regular)
(debug :version 1.16 :type regular)
(cc-mode :version 1.4 :type regular)
(c-support :version 1.17 :type single-file)
(auctex :version 1.35 :type regular))
Installed Modules:
-----------------
Features:
--------
(mail-abbrevs debug xemacsbug shadow sendmail rfc822 sh-script
skeleton executable env passwd efs-dired efs-netrc efs-defun comint
ring efs fast-lock timer lazy-lock lazy-shot paren blink-paren mwheel
scroll-in-place rsz-minibuf func-menu font-lock filladapt crypt
crypt++ view-less view default-dir efs-cu efs-x19.15 efs-fnh efs-ovwrt
efs-auto cus-face dired-faces dired-xemacs dired
xslt-process-autoloads xslide-autoloads xemacs-devel-autoloads
xemacs-base-autoloads x-symbol-autoloads viper-autoloads
view-process-autoloads vc-autoloads tramp-autoloads time-autoloads
textools-autoloads text-modes-autoloads texinfo-autoloads
strokes-autoloads speedbar-autoloads sounds-wav-autoloads
sounds-au-autoloads slider-autoloads sh-script-autoloads
sgml-autoloads semantic-autoloads scheme-autoloads reftex-autoloads
python-modes-autoloads psgml-dtds-autoloads psgml-autoloads
ps-print-autoloads prog-modes-autoloads perl-modes-autoloads
pcomplete-autoloads pcl-cvs-autoloads pc-autoloads os-utils-autoloads
oo-browser-autoloads net-utils-autoloads mmm-mode-autoloads
mail-lib-autoloads jde-autoloads ispell-autoloads ilisp-autoloads
igrep-autoloads ibuffer-autoloads hm--html-menus-autoloads
gnus-autoloads gnats-autoloads fsf-compat-autoloads
frame-icon-autoloads fortran-modes-autoloads eudc-autoloads
eterm-autoloads eshell-autoloads emerge-autoloads elib-autoloads
eieio-autoloads efs-autoloads edit-utils-autoloads ediff-autoloads
edebug-autoloads docbookide-autoloads dired-autoloads debug-autoloads
cc-mode-autoloads c-support-autoloads auctex-autoloads lisp-autoloads
loadhist auto-show fontl-hooks x-iso8859-1 gutter-items menubar-items
x-menubar mode-motion mouse itimer auto-save lisp-mode easymenu
iso8859-1 page buff-menu lib-complete help-nomule cus-file derived
frame text-props obsolete cus-start custom widget cl-extra mini-cl cl
cl-19 packages backquote very-early-lisp lucid-scrollbars cut-buffer
lucid-menubars motif-dialogs x c-balloon-help tty-frames tty toolbar
native-sound scrollbar unix-processes multicast network-streams
subprocesses modules menu-accelerator-support menubar berkeley-db dbm
md5 xemacs gutter gif xpm xbm lisp-float-type irix dialog devices
window-system base64)
Recent keystrokes:
-----------------
C-x C-f C-a C-k / h e r o n : . t c s h r c RET misc-user
e f s SPC d o e s n ' t SPC a h d n BS BS BS BS h a
n d l e SPC 2 2 9 SPC r e BS BS F T P SPC r e s p o
n s e kp-enter button1 button1up button1 button1up
RET button1 button1up C-x 1 misc-user ESC x r e p o
r t - x e m TAB RET
Recent messages (most recent first):
-----------------------------------
Entering debugger...
Not over a window.
Entering debugger...
Loading debug...done
Loading debug...
Loading xemacsbug...done
Loading xemacsbug...
Loading sh-script...done
Loading sh-script...
Retrieving /long@heron:/usr/people3/long/.tcshrc...done
Retrieving /long@heron:/usr/people3/long/.tcshrc...100% (58.8 KB/s)
Retrieving /long@heron:/usr/people3/long/.tcshrc...
Listing /long@heron:/usr/people3/long/...done
Listing /long@heron:/usr/people3/long/...
CWD'ing to /long@heron:/usr/people3/long/...done
CWD'ing to /long@heron:/usr/people3/long/...
CWD'ing to /long@heron:/usr/people3/long/.tcshrc/...
Getting pwd...done
Getting pwd...
Logging in as user long...done