tramp-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

tramp (2.0.1); Can't save remote files.


From: Steve Youngs
Subject: tramp (2.0.1); Can't save remote files.
Date: Sat, 20 Jul 2002 16:15:42 +1000
User-agent: Gnus/5.090007 (Oort Gnus v0.07) XEmacs/21.5 (broccoflower, i686-pc-linux)

The subject pretty well says it all.  I tried to copy a file to a
remote machine, and I got...

"Not a tramp file name: /home/steve/upload/build-1.06-pkg.tar.gz"

That was the local file.  The remote file was going to be:

/[sm/address@hidden/build-1.06-pkg.tar.gz

I also get the same error if I edit a remote file and then try to save
it, but in that case Tramp complains about the "autosave" file not
being a Tramp filename.

I haven't looked too deeply into this yet, hopefully I'll get a chance
late tonight or tomorrow night.

Kai, you don't think that this is in some way related to the "\\'" I
was messing with yesterday do you?

Stuff that could be pertinent: (You did say "Include as much info as
=============================   possible." :-P)

Lisp Backtrace:
--------------
  # bind (standard-output stack-trace-on-signal debug-on-signal 
stack-trace-on-error debug-on-error)
  # (unwind-protect ...)
  signal(error ("Not a tramp file name: 
/home/steve/upload/build-1.06-pkg.tar.gz"))
  # bind (args datum)
  cerror("Not a tramp file name: %s" "/home/steve/upload/build-1.06-pkg.tar.gz")
  apply(cerror "Not a tramp file name: %s" 
"/home/steve/upload/build-1.06-pkg.tar.gz")
  # bind (args datum)
  error("Not a tramp file name: %s" "/home/steve/upload/build-1.06-pkg.tar.gz")
  (if (string-match (nth 0 tramp-file-name-structure) name) nil (error "Not a 
tramp file name: %s" name))
  (unless (string-match (nth 0 tramp-file-name-structure) name) (error "Not a 
tramp file name: %s" name))
  (progn (unless (string-match (nth 0 tramp-file-name-structure) name) (error 
"Not a tramp file name: %s" name)) (setq method (match-string (nth 1 
tramp-file-name-structure) name)) (if (and method (member method 
tramp-multi-methods)) (tramp-dissect-multi-file-name name) (let ((user 
(match-string (nth 2 tramp-file-name-structure) name)) (host (match-string (nth 
3 tramp-file-name-structure) name)) (path (match-string (nth 4 
tramp-file-name-structure) name))) (when (not method) (setq method 
(tramp-find-default-method user host))) (make-tramp-file-name :multi-method nil 
:method method :user (or user nil) :host host :path path))))
  # (unwind-protect ...)
  (unwind-protect (progn (unless (string-match (nth 0 
tramp-file-name-structure) name) (error "Not a tramp file name: %s" name)) 
(setq method (match-string (nth 1 tramp-file-name-structure) name)) (if (and 
method (member method tramp-multi-methods)) (tramp-dissect-multi-file-name 
name) (let ((user (match-string (nth 2 tramp-file-name-structure) name)) (host 
(match-string (nth 3 tramp-file-name-structure) name)) (path (match-string (nth 
4 tramp-file-name-structure) name))) (when (not method) (setq method 
(tramp-find-default-method user host))) (make-tramp-file-name :multi-method nil 
:method method :user (or user nil) :host host :path path)))) (store-match-data 
match-data))
  # bind (match-data)
  (let ((match-data (match-data))) (unwind-protect (progn (unless (string-match 
(nth 0 tramp-file-name-structure) name) (error "Not a tramp file name: %s" 
name)) (setq method (match-string (nth 1 tramp-file-name-structure) name)) (if 
(and method (member method tramp-multi-methods)) (tramp-dissect-multi-file-name 
name) (let ((user (match-string (nth 2 tramp-file-name-structure) name)) (host 
(match-string (nth 3 tramp-file-name-structure) name)) (path (match-string (nth 
4 tramp-file-name-structure) name))) (when (not method) (setq method 
(tramp-find-default-method user host))) (make-tramp-file-name :multi-method nil 
:method method :user (or user nil) :host host :path path)))) (store-match-data 
match-data)))
  (save-match-data (unless (string-match (nth 0 tramp-file-name-structure) 
name) (error "Not a tramp file name: %s" name)) (setq method (match-string (nth 
1 tramp-file-name-structure) name)) (if (and method (member method 
tramp-multi-methods)) (tramp-dissect-multi-file-name name) (let ((user 
(match-string (nth 2 tramp-file-name-structure) name)) (host (match-string (nth 
3 tramp-file-name-structure) name)) (path (match-string (nth 4 
tramp-file-name-structure) name))) (when (not method) (setq method 
(tramp-find-default-method user host))) (make-tramp-file-name :multi-method nil 
:method method :user (or user nil) :host host :path path))))
  # bind (method)
  (let (method) (save-match-data (unless (string-match (nth 0 
tramp-file-name-structure) name) (error "Not a tramp file name: %s" name)) 
(setq method (match-string (nth 1 tramp-file-name-structure) name)) (if (and 
method (member method tramp-multi-methods)) (tramp-dissect-multi-file-name 
name) (let ((user (match-string (nth 2 tramp-file-name-structure) name)) (host 
(match-string (nth 3 tramp-file-name-structure) name)) (path (match-string (nth 
4 tramp-file-name-structure) name))) (when (not method) (setq method 
(tramp-find-default-method user host))) (make-tramp-file-name :multi-method nil 
:method method :user (or user nil) :host host :path path)))))
  # bind (name)
  tramp-dissect-file-name("/home/steve/upload/build-1.06-pkg.tar.gz")
  (let* ((v1 (tramp-dissect-file-name filename)) (v1-multi-method 
(tramp-file-name-multi-method v1)) (v1-method (tramp-file-name-method v1)) 
(v1-user (tramp-file-name-user v1)) (v1-host (tramp-file-name-host v1)) 
(v1-path (tramp-file-name-path v1))) (with-parsed-tramp-file-name newname v2 
(when (and (tramp-ange-ftp-file-name-p v1-multi-method v1-method) 
(tramp-ange-ftp-file-name-p v2-multi-method v2-method)) (tramp-invoke-ange-ftp 
(if (eq op (quote copy)) (quote copy-file) (quote rename-file)) filename 
newname ok-if-already-exists keep-date)) (let* ((mmeth 
(tramp-file-name-multi-method (or v1 v2))) (meth (tramp-file-name-method (or v1 
v2))) (rcp-program (tramp-get-rcp-program mmeth meth)) (rcp-args 
(tramp-get-rcp-args mmeth meth)) (trampbuf (get-buffer-create "*tramp 
output*"))) (if (and v1-method v2-method (equal v1-multi-method 
v2-multi-method) (equal v1-method v2-method) (equal v1-host v2-host) (equal 
v1-user v2-user)) (tramp-do-copy-or-rename-file-directly op v1-multi-method 
v1-method v1-user v1-host v1-path v2-path keep-date) (if rcp-program (let ((f1 
(if (not v1) filename (tramp-make-rcp-program-file-name v1-user v1-host 
(tramp-shell-quote-argument v1-path)))) (f2 (if (not v2) newname 
(tramp-make-rcp-program-file-name v2-user v2-host (tramp-shell-quote-argument 
v2-path)))) (default-directory (if (tramp-tramp-file-p default-directory) 
(tramp-temporary-file-directory) default-directory))) (when keep-date 
(add-to-list (quote rcp-args) (tramp-get-rcp-keep-date-arg mmeth meth))) 
(save-excursion (set-buffer trampbuf) (erase-buffer)) (unless (equal 0 (apply 
(function call-process) (tramp-get-rcp-program mmeth meth) nil trampbuf nil 
(append rcp-args (list f1 f2)))) (pop-to-buffer trampbuf) (error (concat 
"tramp-do-copy-or-rename-file: %s" " didn't work, see buffer `%s' for details") 
(tramp-get-rcp-program mmeth meth) trampbuf))) (when keep-date (tramp-message 1 
(concat "Warning: cannot preserve file time stamp" " with inline copying across 
machines"))) (save-excursion (set-buffer trampbuf) (erase-buffer) 
(insert-file-contents-literally filename) (let ((coding-system-for-write (quote 
no-conversion))) (write-region (point-min) (point-max) newname)))) (unless (eq 
op (quote copy)) (delete-file filename))))))
  (with-parsed-tramp-file-name filename v1 (with-parsed-tramp-file-name newname 
v2 (when (and (tramp-ange-ftp-file-name-p v1-multi-method v1-method) 
(tramp-ange-ftp-file-name-p v2-multi-method v2-method)) (tramp-invoke-ange-ftp 
(if (eq op (quote copy)) (quote copy-file) (quote rename-file)) filename 
newname ok-if-already-exists keep-date)) (let* ((mmeth 
(tramp-file-name-multi-method (or v1 v2))) (meth (tramp-file-name-method (or v1 
v2))) (rcp-program (tramp-get-rcp-program mmeth meth)) (rcp-args 
(tramp-get-rcp-args mmeth meth)) (trampbuf (get-buffer-create "*tramp 
output*"))) (if (and v1-method v2-method (equal v1-multi-method 
v2-multi-method) (equal v1-method v2-method) (equal v1-host v2-host) (equal 
v1-user v2-user)) (tramp-do-copy-or-rename-file-directly op v1-multi-method 
v1-method v1-user v1-host v1-path v2-path keep-date) (if rcp-program (let ((f1 
(if (not v1) filename (tramp-make-rcp-program-file-name v1-user v1-host 
(tramp-shell-quote-argument v1-path)))) (f2 (if (not v2) newname 
(tramp-make-rcp-program-file-name v2-user v2-host (tramp-shell-quote-argument 
v2-path)))) (default-directory (if (tramp-tramp-file-p default-directory) 
(tramp-temporary-file-directory) default-directory))) (when keep-date 
(add-to-list (quote rcp-args) (tramp-get-rcp-keep-date-arg mmeth meth))) 
(save-excursion (set-buffer trampbuf) (erase-buffer)) (unless (equal 0 (apply 
(function call-process) (tramp-get-rcp-program mmeth meth) nil trampbuf nil 
(append rcp-args (list f1 f2)))) (pop-to-buffer trampbuf) (error (concat 
"tramp-do-copy-or-rename-file: %s" " didn't work, see buffer `%s' for details") 
(tramp-get-rcp-program mmeth meth) trampbuf))) (when keep-date (tramp-message 1 
(concat "Warning: cannot preserve file time stamp" " with inline copying across 
machines"))) (save-excursion (set-buffer trampbuf) (erase-buffer) 
(insert-file-contents-literally filename) (let ((coding-system-for-write (quote 
no-conversion))) (write-region (point-min) (point-max) newname)))) (unless (eq 
op (quote copy)) (delete-file filename))))))
  # bind (keep-date ok-if-already-exists newname filename op)
  tramp-do-copy-or-rename-file(copy "/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  (if (or (tramp-tramp-file-p filename) (tramp-tramp-file-p newname)) 
(tramp-do-copy-or-rename-file (quote copy) filename newname 
ok-if-already-exists keep-date) (tramp-run-real-handler (quote copy-file) (list 
filename newname ok-if-already-exists keep-date)))
  # bind (keep-date ok-if-already-exists newname filename)
  tramp-handle-copy-file("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  apply(tramp-handle-copy-file ("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t))
  (progn (apply (cdr fn) args))
  # (unwind-protect ...)
  (unwind-protect (progn (apply (cdr fn) args)) (store-match-data match-data))
  # bind (match-data)
  (let ((match-data (match-data))) (unwind-protect (progn (apply (cdr fn) 
args)) (store-match-data match-data)))
  (save-match-data (apply (cdr fn) args))
  # (catch tramp-forward-to-ange-ftp ...)
  (catch (quote tramp-forward-to-ange-ftp) (save-match-data (apply (cdr fn) 
args)))
  (if fn (catch (quote tramp-forward-to-ange-ftp) (save-match-data (apply (cdr 
fn) args))) (tramp-run-real-handler operation args))
  # bind (fn)
  (let ((fn (assoc operation tramp-file-name-handler-alist))) (if fn (catch 
(quote tramp-forward-to-ange-ftp) (save-match-data (apply (cdr fn) args))) 
(tramp-run-real-handler operation args)))
  # bind (args operation)
  tramp-file-name-handler(copy-file "/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  copy-file("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  apply(copy-file ("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t))
  # bind (inhibit-file-name-handlers inhibit-file-name-operation args op)
  dired-handler-fn(copy-file "/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  copy-file("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil t)
  # bind (ok-flag to from)
  dired-copy-file("/home/steve/upload/build-1.06-pkg.tar.gz" 
"/[sm/xemacs-ftp]/home/youngs/pkgtmp/build-1.06-pkg.tar.gz" nil)
  # bind (dired-unhandle-add-files)
  byte-code("..." [dired-overwrite-confirmed from file-creator 
dired-unhandle-add-files success-count to message "%s: %d of %d" dired-add-file 
implicit-to operation total actual-marker-char] 5)
  # (condition-case ... . ((file-error (byte-code "Å!B.ÆÇp!È\n       &.‡" 
[err to operation failures from dired-make-relative dired-log buffer-name "%s 
`%s' to `%s' failed:\n%s\n"] 7))))
  # bind (actual-marker-char dired-overwrite-confirmed overwrite to from)
  #<compiled-function (from) "...(121)" [overwrite query marker-char to skipped 
from dired-log buffer-name "Cannot %s to same file: %s\n" dired-make-relative 
nil file-exists-p (format "Type SPC or `y' to overwrite file `%s',\nDEL or `n' 
to skip to next,\nESC or `q' to not overwrite any of the remaining files,\n`!' 
to overwrite all remaining files with no more questions." to) dired-query 
overwrite-query "Overwrite %s?" characterp dired-file-marker err (byte-code "
B.    «.\n    \".ª.\n        
#.T.ÆÇ.\n.$.È
.\")." [dired-overwrite-confirmed from file-creator dired-unhandle-add-files 
success-count to message "%s: %d of %d" dired-add-file implicit-to operation 
total actual-marker-char] 5) ((file-error (byte-code "Å!B.ÆÇp!È\n &.‡" [err 
to operation failures from dired-make-relative dired-log buffer-name "%s `%s' 
to `%s' failed:\n%s\n"] 7))) dired-overwrite-confirmed name-constructor 
operation jka-compr-enabled help-form actual-marker-char] 
6>("/home/steve/upload/build-1.06-pkg.tar.gz")
  mapcar(#<compiled-function (from) "...(121)" [overwrite query marker-char to 
skipped from dired-log buffer-name "Cannot %s to same file: %s\n" 
dired-make-relative nil file-exists-p (format "Type SPC or `y' to overwrite 
file `%s',\nDEL or `n' to skip to next,\nESC or `q' to not overwrite any of the 
remaining files,\n`!' to overwrite all remaining files with no more questions." 
to) dired-query overwrite-query "Overwrite %s?" characterp dired-file-marker 
err (byte-code "
B.    «.\n    \".ª.\n        
#.T.ÆÇ.\n.$.È
.\")." [dired-overwrite-confirmed from file-creator dired-unhandle-add-files 
success-count to message "%s: %d of %d" dired-add-file implicit-to operation 
total actual-marker-char] 5) ((file-error (byte-code "Å!B.ÆÇp!È\n &.‡" [err 
to operation failures from dired-make-relative dired-log buffer-name "%s `%s' 
to `%s' failed:\n%s\n"] 7))) dired-overwrite-confirmed name-constructor 
operation jka-compr-enabled help-form actual-marker-char] 6> 
("/home/steve/upload/build-1.06-pkg.tar.gz"))
  # (unwind-protect ...)
  # bind (bolm fnlp offset-bol success-count total failures skipped 
overwrite-query implicit-to query marker-char name-constructor fn-list 
operation file-creator)
  efs-real-dired-create-files(dired-copy-file "Copy [-p]" 
("/home/steve/upload/build-1.06-pkg.tar.gz") (lambda (from) (expand-file-name 
(file-name-nondirectory from) "/[sm/xemacs-ftp]/home/youngs/pkgtmp/")) ?C nil 
nil)
  # bind (implicit-to query marker-char name-constructor fn-list operation 
file-creator)
  dired-create-files(dired-copy-file "Copy [-p]" 
("/home/steve/upload/build-1.06-pkg.tar.gz") (lambda (from) (expand-file-name 
(file-name-nondirectory from) "/[sm/xemacs-ftp]/home/youngs/pkgtmp/")) ?C)
  # bind (into-dir target cdir fn-count fn-list how-to prompter marker-char arg 
operation file-creator op-symbol)
  dired-do-create-files(copy dired-copy-file "Copy [-p]" nil ?C)
  # bind (arg)
  dired-do-copy(nil)
  # bind (command-debug-status)
  call-interactively(dired-do-copy)
  # (condition-case ... . error)
  # (catch top-level ...)


Recent minibuffer messages (most recent first):

Not a tramp file name: /home/steve/upload/build-1.06-pkg.tar.gz
tramp: Checking to see if encoding/decoding commands work on remote host...done
tramp: Checking to see if encoding/decoding commands work on remote host...
tramp: Sending the Perl `file-attributes' implementation.
tramp: Using remote command `/bin/ls' for getting directory listings
tramp: Testing remote command `/bin/ls' for -n...okay
tramp: Testing remote command `/bin/ls' for -n...
tramp: Checking remote `/bin/ls' command for `-n' option
tramp: Checking remote `/home/youngs/bin/ls' command for `-n' option
tramp: Checking remote `/home/youngs/tools/ls' command for `-n' option
tramp: Finding a suitable `ls' command
tramp: Finding command to check if file exists
tramp: Remote `/bin/sh' groks tilde expansion, good
tramp: Waiting for remote `/bin/sh' to come up...done
tramp: Waiting for remote `/bin/sh' to come up...
tramp: Setting shell prompt
tramp: Waiting 30s for `unset CDPATH'
tramp: Waiting 30s for `unset MAIL MAILCHECK MAILPATH'
tramp: Waiting 30s for `set +o vi +o emacs'
tramp: Waiting 30s for `HISTFILE=$HOME/.tramp_history; HISTSIZE=1'
tramp: Determining coding system
tramp: Setting up remote shell environment
tramp: Waiting 30s for remote `/bin/sh' to come up...
tramp: Initializing remote shell
tramp: Waiting 60s for shell or passwd prompt from xemacs-ftp
tramp: Opening connection at xemacs-ftp using sm...


---Contents of Tramp debug buffer---

# Opening connection at xemacs-ftp using sm...
# Waiting 60s for shell or passwd prompt from xemacs-ftp
Last login: Fri Jul 19 19:28:33 2002 from ess-p-144-138-77-130.mega.tmns.net.au
Gwyn.Tux.Org is being relocated.  The exact date and time will be
determined this week, and the outage should last only a few hours.

More information will be distributed as plans firm up.

Please mail address@hidden if you have any issues.
Wed Jun 12 14:47:39 EDT 2002
$ # Initializing remote shell
$ exec /bin/sh
# Waiting 30s for remote `/bin/sh' to come up...
bash$ # Setting up remote shell environment
bash$ bash$ # Determining coding system
foo
bar
bash$ # Waiting 30s for `HISTFILE=$HOME/.tramp_history; HISTSIZE=1'
bash$ # Waiting 30s for `set +o vi +o emacs'
set: not in vi editing mode
bash$ # Waiting 30s for `unset MAIL MAILCHECK MAILPATH'
bash$ # Waiting 30s for `unset CDPATH'
bash$ # Setting shell prompt
$ PS1='
/////
'; PS2=''; PS3=''
$ echo hello
# Waiting for remote `/bin/sh' to come up...
hello
# Waiting for remote `/bin/sh' to come up...done
$ echo ~root
/root
# Remote `/bin/sh' groks tilde expansion, good
# Finding command to check if file exists
$ ls -d / 2>/dev/null; echo tramp_exit_status $? 
/
tramp_exit_status 0
$ ls -d /\ this\ file\ does\ not\ exist\  2>/dev/null; echo tramp_exit_status 
$? 
tramp_exit_status 1
# Finding a suitable `ls' command
# Checking remote `/home/youngs/tools/ls' command for `-n' option
$ test -x /home/youngs/tools/ls 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
# Checking remote `/home/youngs/bin/ls' command for `-n' option
$ test -x /home/youngs/bin/ls 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
# Checking remote `/bin/ls' command for `-n' option
$ test -x /bin/ls 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 0
# Testing remote command `/bin/ls' for -n...
$ /bin/ls -lnd / >/dev/null 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 0
# Testing remote command `/bin/ls' for -n...okay
# Using remote command `/bin/ls' for getting directory listings
$ tramp_set_exit_status () {
return $1
}
$ ls -d /home/youngs/tools 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /home/youngs/bin 2>/dev/null; echo tramp_exit_status $? 
/home/youngs/bin
tramp_exit_status 0
$ ( test -d /home/youngs/bin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /bin 2>/dev/null; echo tramp_exit_status $? 
/bin
tramp_exit_status 0
$ ( test -d /bin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /usr/bin 2>/dev/null; echo tramp_exit_status $? 
/usr/bin
tramp_exit_status 0
$ ( test -d /usr/bin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /usr/local/bin 2>/dev/null; echo tramp_exit_status $? 
/usr/local/bin
tramp_exit_status 0
$ ( test -d /usr/local/bin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /opt/bin 2>/dev/null; echo tramp_exit_status $? 
/opt/bin
tramp_exit_status 0
$ ( test -d /opt/bin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /pack/openssh/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /pack/openssl/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /coll/local/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /sbin 2>/dev/null; echo tramp_exit_status $? 
/sbin
tramp_exit_status 0
$ ( test -d /sbin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /usr/sbin 2>/dev/null; echo tramp_exit_status $? 
/usr/sbin
tramp_exit_status 0
$ ( test -d /usr/sbin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /usr/local/sbin 2>/dev/null; echo tramp_exit_status $? 
/usr/local/sbin
tramp_exit_status 0
$ ( test -d /usr/local/sbin 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /usr/ccs/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /local/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /local/freeware/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /local/gnu/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /usr/freeware/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /usr/pkg/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /usr/contrib/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /home/users/y/yo/youngs/bin 2>/dev/null; echo tramp_exit_status $? 
tramp_exit_status 1
$ 
PATH=/home/youngs/bin:/bin:/usr/bin:/usr/local/bin:/opt/bin:/sbin:/usr/sbin:/usr/local/sbin;
 export PATH
$ LC_TIME=C; export LC_TIME; echo huhu
huhu
$ mesg n; echo huhu
huhu
$ biff n ; echo huhu
huhu
$ unalias ls; echo huhu
unalias: `ls' not an alias
huhu
$ ( test / -nt / )
$ tramp_test_nt () {
test -n "`find $1 -prune -newer $2 -print`"
}
$ while read d; do if test -x $d/perl5 -a -f $d/perl5; then echo 
tramp_executable $d/perl5; break; fi; done <<'EOF'
$ /home/youngs/tools
$ /home/youngs/bin
$ /bin
$ /usr/bin
$ /usr/local/bin
$ /opt/bin
$ /pack/openssh/bin
$ /pack/openssl/bin
$ /coll/local/bin
$ /sbin
$ /usr/sbin
$ /usr/local/sbin
$ /usr/ccs/bin
$ /local/bin
$ /local/freeware/bin
$ /local/gnu/bin
$ /usr/freeware/bin
$ /usr/pkg/bin
$ /usr/contrib/bin
$ /home/users/y/yo/youngs/bin
$ EOF
$ while read d; do if test -x $d/perl -a -f $d/perl; then echo tramp_executable 
$d/perl; break; fi; done <<'EOF'
$ /home/youngs/tools
$ /home/youngs/bin
$ /bin
$ /usr/bin
$ /usr/local/bin
$ /opt/bin
$ /pack/openssh/bin
$ /pack/openssl/bin
$ /coll/local/bin
$ /sbin
$ /usr/sbin
$ /usr/local/sbin
$ /usr/ccs/bin
$ /local/bin
$ /local/freeware/bin
$ /local/gnu/bin
$ /usr/freeware/bin
$ /usr/pkg/bin
$ /usr/contrib/bin
$ /home/users/y/yo/youngs/bin
$ EOF
tramp_executable /usr/bin/perl
# Sending the Perl `file-attributes' implementation.
$ tramp_file_attributes () {
/usr/bin/perl -e '$f = $ARGV[0];
@s = lstat($f);
if (($s[2] & 0170000) == 0120000) { $l = readlink($f); $l = "\"$l\""; }
elsif (($s[2] & 0170000) == 040000) { $l = "t"; }
else { $l = "nil" };
printf("(%s %u %u %u (%u %u) (%u %u) (%u %u) %u %u t (%u . %u) (%u %u))\n",
$l, $s[3], $s[4], $s[5], $s[8] >> 16 & 0xffff, $s[8] & 0xffff,
$s[9] >> 16 & 0xffff, $s[9] & 0xffff, $s[10] >> 16 & 0xffff, $s[10] & 0xffff,
$s[7], $s[2], $s[1] >> 16 & 0xffff, $s[1] & 0xffff, $s[0] >> 16 & 0xffff, $s[0] 
& 0xffff);' $1 2>/dev/null
}
$ while read d; do if test -x $d/ln -a -f $d/ln; then echo tramp_executable 
$d/ln; break; fi; done <<'EOF'
$ /home/youngs/tools
$ /home/youngs/bin
$ /bin
$ /usr/bin
$ /usr/local/bin
$ /opt/bin
$ /pack/openssh/bin
$ /pack/openssl/bin
$ /coll/local/bin
$ /sbin
$ /usr/sbin
$ /usr/local/sbin
$ /usr/ccs/bin
$ /local/bin
$ /local/freeware/bin
$ /local/gnu/bin
$ /usr/freeware/bin
$ /usr/pkg/bin
$ /usr/contrib/bin
$ /home/users/y/yo/youngs/bin
$ EOF
tramp_executable /bin/ln
# Checking to see if encoding/decoding commands work on remote host...
$ echo xyzzy | mimencode -b | mimencode -u -b
xyzzy
# Checking to see if encoding/decoding commands work on remote host...done
$ cd ~; pwd
/home/youngs
$ ( test -d /home/youngs/pkgtmp 2>/dev/null; echo tramp_exit_status $? )
tramp_exit_status 0
$ ls -d /home/youngs/pkgtmp/build-1.06-pkg.tar.gz 2>/dev/null; echo 
tramp_exit_status $? 
tramp_exit_status 1
$ ls -d /home/youngs/pkgtmp/build-1.06-pkg.tar.gz 2>/dev/null; echo 
tramp_exit_status $? 
tramp_exit_status 1

-----------------------------------------------------------
uname -a: Linux eicq 2.4.18 #2 Sun Apr 21 00:09:16 EST 2002 i686 unknown

./configure  '--extra-verbose' '--dynamic=yes' '--with-gtk=no' 
'--with-gnome=no' '--with-toolbars=yes' '--with-wmcommand=yes' 
'--with-athena=next' '--with-menubars=lucid' '--with-scrollbars=athena' 
'--with-dialogs=athena' '--with-widgets=athena' '--with-png=yes' 
'--with-sound=native,noesd' '--with-modules' '--with-site-lisp=yes' 
'--with-site-modules=yes' '--pdump' '--with-mule' '--debug' 
'--error-checking=all' '--memory-usage-stats' '--use-union-type' 
'--with-clash-detection' '--site-libraries=/usr/local/pgsql/lib' '--rel-alloc'


XEmacs 21.5-b7 "broccoflower" configured for `i686-pc-linux'.


Compilation / Installation:
  Source code location:              /usr/local/src/xemacs
  Installation prefix:               /usr/local
  Additional libraries:              /usr/local/pgsql/lib
  Operating system description file: `s/linux.h'
  Machine description file:          `m/intel386.h'
  Compiler:                          gcc -ggdb3 -Wall -Wchar-subscripts 
-Wunused -Wundef -Wshadow -Wsign-compare -Wmissing-declarations 
-Wunreachable-code -march=athlon
  Relocating allocator for buffers:  yes
  GNU version of malloc:             yes
    - Using Doug Lea's new malloc from the GNU C Library.

Window System:
  Compiling in support for the X window system:
    - X Windows headers location:                 /usr/X11R6/include
    - X Windows libraries location:               /usr/X11R6/lib
    - Handling WM_COMMAND properly.
  Compiling in support for the Athena widget set:
    - Athena headers location:                    X11/neXtaw
    - Athena library to link:                     neXtaw
  Using Lucid menubars.
  Using Athena scrollbars.
  Using Athena dialog boxes.
  Using Athena native widgets.

TTY:
  Compiling in support for ncurses.
  Compiling in support for GPM (General Purpose Mouse).

Images:
  Compiling in support for GIF  images (builtin).
  Compiling in support for XPM  images.
  Compiling in support for PNG  images.
  Compiling in support for JPEG images.
  Compiling in support for TIFF images.
  Compiling in support for X-Face message headers.

Sound:
  Compiling in support for sound (native).

Databases:
  Compiling in support for Berkeley database.
  Compiling in support for GNU DBM.
  Compiling in support for PostgreSQL.
    - Using PostgreSQL header file:  pgsql/libpq-fe.h
    - Using PostgreSQL V7 bindings.

Internationalization:
  Compiling in support for Mule (multi-lingual Emacs).
  Compiling in support for XIM (X11R5+ I18N input method).
    - Using raw Xlib to provide XIM support.

Mail:
  Compiling in support for "dot-locking" mail spool file locking method.

Other Features:
  Inhibiting IPv6 canonicalization at startup.
  Compiling in support for dynamic shared object modules.
  Using the union type for Lisp_Objects.
  Using the new portable dumper.
  Compiling in support for extra debugging code.
  WARNING: ---------------------------------------------------------
  WARNING: Compiling in support for runtime error checking.
  WARNING: XEmacs will run noticeably more slowly as a result.
  WARNING: Error checking is on by default for XEmacs beta releases.
  WARNING: ---------------------------------------------------------

Installed XEmacs Packages:
=========================

((ada :version 1.1 :type regular)
 (apel :version 1.24 :type regular)
 (auctex :version 1.32 :type regular)
 (build :version 1.05 :type regular)
 (c-support :version 1.16 :type single-file)
 (calc :version 1.23 :type regular)
 (calendar :version 1.18 :type regular)
 (cc-mode :version 1.28 :type regular)
 (clearcase :version 1.04 :type regular)
 (cookie :version 1.14 :type regular)
 (crisp :version 1.12 :type regular)
 (debug :version 1.15 :type regular)
 (dictionary :version 1.11 :type regular)
 (dired :version 1.12 :type regular)
 (edebug :version 1.14 :type regular)
 (edict :version 1.13 :type regular)
 (ediff :version 1.41 :type regular)
 (edit-utils :version 1.89 :type single-file)
 (edt :version 1.12 :type regular)
 (efs :version 1.29 :type regular)
 (egg-its :version 1.26 :type regular)
 (eieio :version 1.02 :type regular)
 (elib :version 1.1 :type single-file)
 (emerge :version 1.09 :type regular)
 (eshell :version 1.03 :type regular)
 (ess :version 1.02 :type regular)
 (eterm :version 1.13 :type regular)
 (eudc :version 1.36 :type regular)
 (footnote :version 1.15 :type regular)
 (frame-icon :version 1.09 :type regular)
 (fsf-compat :version 1.11 :type single-file)
 (games :version 1.13 :type regular)
 (gnats :version 1.15 :type regular)
 (haskell-mode :version 1.03 :type regular)
 (hm--html-menus :version 1.18 :type regular)
 (ibuffer :version 1.08 :type regular)
 (idlwave :version 1.25 :type regular)
 (igrep :version 1.08 :type regular)
 (ilisp :version 1.27 :type regular)
 (ispell :version 1.24 :type regular)
 (jde :version 1.35 :type regular)
 (latin-unity :version 1.05 :type regular)
 (leim :version 1.18 :type regular)
 (liece :version 1.07 :type regular)
 (locale :version 1.18 :type regular)
 (lookup :version 1.12 :type regular)
 (mail-lib :version 1.47 :type regular)
 (mailcrypt :version 2.11 :type regular)
 (mh-e :version 1.14 :type regular)
 (mine :version 1.14 :type regular)
 (misc-games :version 1.15 :type single-file)
 (mmm-mode :version 1.0 :type regular)
 (mule-base :version 1.42 :type regular)
 (mule-ucs :version 1.04 :type regular)
 (net-utils :version 1.27 :type single-file)
 (os-utils :version 1.28 :type single-file)
 (pc :version 1.25 :type single-file)
 (pcl-cvs :version 1.63 :type regular)
 (pcomplete :version 1.01 :type regular)
 (prog-modes :version 1.60 :type single-file)
 (ps-print :version 1.04 :type regular)
 (psgml :version 1.28 :type regular)
 (reftex :version 1.25 :type regular)
 (rmail :version 1.13 :type regular)
 (scheme :version 1.11 :type regular)
 (semantic :version 1.12 :type regular)
 (sgml :version 1.08 :type regular)
 (sh-script :version 1.15 :type regular)
 (sieve :version 1.07 :type regular)
 (skk :version 1.22 :type regular)
 (slider :version 1.13 :type regular)
 (sounds-au :version 1.1 :type regular)
 (sounds-wav :version 1.1 :type regular)
 (speedbar :version 1.23 :type regular)
 (strokes :version 1.08 :type regular)
 (supercite :version 1.19 :type regular)
 (texinfo :version 1.2 :type regular)
 (text-modes :version 1.48 :type single-file)
 (textools :version 1.12 :type regular)
 (time :version 1.11 :type regular)
 (tm :version 1.34 :type regular)
 (tooltalk :version 1.13 :type regular)
 (tpu :version 1.12 :type regular)
 (vc :version 1.33 :type regular)
 (vc-cc :version 1.21 :type regular)
 (vhdl :version 1.15 :type regular)
 (view-process :version 1.11 :type regular)
 (viper :version 1.34 :type regular)
 (vm :version 7.07 :type regular)
 (w3 :version 1.25 :type regular)
 (xemacs-base :version 1.66 :type regular)
 (xemacs-devel :version 1.47 :type single-file)
 (xslide :version 1.01 :type regular)
 (xslt-process :version 1.1 :type regular)
 (zenirc :version 1.13 :type regular))



Features:
--------

(find-func ispell sh-script skeleton executable gnus-topic nndraft
nnmh gnus-cache nnfolder sort nnml gnus-demon patch-keywords
supercite-steve boxquote rect nnspool nntp messkeyw earcon gnus-audio
gnus-score score-mode gnus-picon gnus-ml gnus-msg gnus-diary nndiary
reporter efs-dired dired-faces dired-xemacs dired efs-x19.15 efs-fnh
efs-ovwrt efs-netrc efs-defun efs efs-dump url mm mule-sysdp url-parse
url-vars view-less view holidays lunar solar cal-dst cal-persia
cal-julian diary-lib time appt calendar bbdb-w3 bbdb-sc supercite regi
bbdb-gnus gnus-art mm-uu mm-view gnus-sum nnoo gnus-group gnus-undo
nnmail mail-source gnus-start gnus-range gnus-spec gnus-int gnus-win
gnus gnus-ems gnus-xmas bbdb-snarf bbdb-com bbdb-pgp mailcrypt bbdb
reftex reftex-vars latex tex tex-site cperl-mode ffap tramp
byte-optimize shell format-spec diff-mode ediff-merg ediff-diff
ediff-tbar ediff-wind ediff-help ediff-util ediff-mult ediff-init
ediff vc-hooks balloon-help func-menu lazy-shot efs-cu eicq-wharf
eicq-toolbar eicq bytecomp byte-compile smiley annotations goto-addr
overlay thingatpt timezone outline browse-url sb-texinfo sb-info info
speedbar sb-image dframe assoc filladapt footnote paren blink-paren
pending-del scroll-in-place redo savehist backup-dir edmacro iswitchb
message messagexmas mml mml-sec mml-smime smime comint ring dig
mml1991 mml2015 gpg timer mm-decode mm-bodies mm-encode mailcap
mail-parse rfc2045 rfc2231 mail-abbrevs sendmail rfc822 mailheader
canlock crypt crypt++ recent-files font-lock pkg-build gnuserv
blink-cursor cus-edit cus-load wid-edit latin-unity-tables
latin-unity-latin9 latin-unity-vars latin-unity ell working avltree
stack-m elib-node ps-bdf ps-mule ps-print lpr from rfc2047 gnus-util
netrc nnheader nnheaderxm mail-utils ietf-drums time-date qp mm-util
mail-prsvr parse-time mail-extr ibuffer dired-tar compile time-stamp
big-menubar advice advice-preload x-compose font disp-table
color-theme cus-face zenirc-autoloads xslt-process-autoloads
xslide-autoloads xemacs-devel-autoloads xemacs-base-autoloads
w3-autoloads vm-autoloads viper-autoloads view-process-autoloads
vhdl-autoloads vc-cc-autoloads vc-autoloads tpu-autoloads
tooltalk-autoloads tm-autoloads time-autoloads textools-autoloads
text-modes-autoloads texinfo-autoloads supercite-autoloads
strokes-autoloads speedbar-autoloads sounds-wav-autoloads
sounds-au-autoloads slider-autoloads sieve-autoloads
sh-script-autoloads sgml-autoloads semantic-autoloads scheme-autoloads
rmail-autoloads reftex-autoloads psgml-autoloads ps-print-autoloads
prog-modes-autoloads pcomplete-autoloads pcl-cvs-autoloads
pc-autoloads os-utils-autoloads net-utils-autoloads mmm-mode-autoloads
misc-games-autoloads mine-autoloads mh-e-autoloads mailcrypt-autoloads
mail-lib-autoloads liece-autoloads jde-autoloads ispell-autoloads
ilisp-autoloads igrep-autoloads idlwave-autoloads ibuffer-autoloads
hm--html-menus-autoloads haskell-mode-autoloads gnats-autoloads
games-autoloads fsf-compat-autoloads frame-icon-autoloads
footnote-autoloads eudc-autoloads eterm-autoloads ess-autoloads
eshell-autoloads emerge-autoloads elib-autoloads eieio-autoloads
efs-autoloads edt-autoloads edit-utils-autoloads ediff-autoloads
edebug-autoloads dired-autoloads dictionary-autoloads debug-autoloads
crisp-autoloads cookie-autoloads clearcase-autoloads cc-mode-autoloads
calendar-autoloads calc-autoloads c-support-autoloads build-autoloads
auctex-autoloads apel-autoloads ada-autoloads skk-autoloads
mule-ucs-autoloads mule-base-autoloads lookup-autoloads
locale-autoloads leim-autoloads latin-unity-autoloads
egg-its-autoloads edict-autoloads x-symbol-autoloads x-face-autoloads
tramp-autoloads misc-autoloads lisp-autoloads eicq-autoloads
bbdb-autoloads src-autoloads loadhist rsz-minibuf auto-show
fontl-hooks x-iso8859-1 tibetan lao devanagari indian slovenian czech
romanian ccl code-cmds gutter-items menubar-items x-menubar
mode-motion mouse behavior itimer auto-save lisp-mode easymenu
iso8859-1 page buff-menu lib-complete cus-file derived env text-props
frame obsolete cus-start custom widget cl-extra mini-cl cl cl-19
packages backquote very-early-lisp postgresqlv7 postgresql unicode
athena-scrollbars cut-buffer lucid-menubars athena-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 xim mule
gutter tiff png gif jpeg xface xpm xbm lisp-float-type file-coding
linux dialog devices window-system base64)


Emacs  : XEmacs 21.5  (beta7) "broccoflower" [Lucid] (i686-pc-linux, Mule) of 
Tue Jul 16 2002 on eicq
Package: tramp (2.0.1)

current state:
==============
(setq
 tramp-ls-command nil
 tramp-test-groks-nt nil
 tramp-file-exists-command nil
 tramp-current-multi-method nil
 tramp-current-method nil
 tramp-current-user nil
 tramp-current-host nil
 tramp-auto-save-directory "~/.autosave/"
 tramp-default-method "sm"
 tramp-rsh-end-of-line "\n"
 tramp-remote-path '("/home/youngs/tools" "/home/youngs/bin" "/bin" "/usr/bin"
                     "/usr/local/bin" "/opt/bin" "/pack/openssh/bin"
                     "/pack/openssl/bin" "/coll/local/bin" "/sbin" "/usr/sbin"
                     "/usr/local/sbin" "/usr/ccs/bin" "/local/bin"
                     "/local/freeware/bin" "/local/gnu/bin" "/usr/freeware/bin"
                     "/usr/pkg/bin" "/usr/contrib/bin"
                     "/home/users/y/yo/youngs/bin")
 tramp-login-prompt-regexp ".*ogin: *$"
 tramp-password-prompt-regexp "^.*\\([pP]assword\\|passphrase.*\\):.? *$"
 tramp-wrong-passwd-regexp "^.*\\(Permission denied.\\|Login 
[Ii]ncorrect\\|Received signal [0-9]+\\|Connection 
\\(refused\\|closed\\)\\|Sorry, try again.\\|Name or service not known\\).*$"
 tramp-temp-name-prefix "tramp."
 tramp-file-name-structure 
'("\\`/\\[\\(\\([a-zA-Z0-9]+\\)/\\)?\\(\\([-a-zA-Z0-9_#/:]+\\)@\\)?\\([-a-zA-Z0-9_#/:@.]+\\)\\]\\(.*\\)\\'"
 2 4 5 6)
 tramp-file-name-regexp "\\`/\\[.*\\]"
 tramp-multi-file-name-structure 
'("\\`/\\[\\(\\([a-z0-9]+\\)?\\)\\(\\(%s\\)+\\)\\]\\(.*\\)\\'" 2 3 -1)
 tramp-multi-file-name-hop-structure 
'("/\\([a-z0-9_]+\\):\\([a-z0-9_]+\\)@\\([a-z0-9.-]+\\)" 1 2 3)
 tramp-multi-methods '("multi" "multiu")
 tramp-multi-connection-function-alist '(("telnet" tramp-multi-connect-telnet
                                          "telnet %h%n")
                                         ("rsh" tramp-multi-connect-rlogin
                                          "rsh %h -l %u%n")
                                         ("ssh" tramp-multi-connect-rlogin
                                          "ssh %h -l %u%n")
                                         ("su" tramp-multi-connect-su "su - 
%u%n")
                                         ("sudo" tramp-multi-connect-su
                                          "sudo -u %u -s%n")
                                         )
 tramp-make-tramp-file-format "/[%m/address@hidden"
 tramp-end-of-output "/////"
 shell-prompt-pattern "^[^#$%>\n]*[#$%>] *"
 backup-by-copying nil
 backup-by-copying-when-linked nil
 backup-by-copying-when-mismatch nil
 nil nil
 file-name-handler-alist '(("^/[^/:]+:" . efs-file-handler-function)
                           ("^/$" . efs-root-handler-function)
                           ("\\`/\\[.*\\]" . tramp-file-name-handler)
                           ("\\(^\\|[^$]\\)\\(\\$\\$\\)*\\$[{a-zA-Z0-9]" .
                            efs-sifn-handler-function)
                           )
 )

-- 
|---<Steve Youngs>---------------<GnuPG KeyID: 10D5C9C5>---|
|            XEmacs - It's not just an editor.             |
|                    It's a way of life.                   |
|------------------------------------<address@hidden>---|



reply via email to

[Prev in Thread] Current Thread [Next in Thread]