Pete Forman <[EMAIL PROTECTED]> writes:
Hi Pete,
> I'm trying to get Tramp working using XEmacs 21.5.17 on XP native,
> plink + pageant 0.59, connecting to RedHat 9.2. This had Tramp 2.0.36
> but that failed in various ways which looked to be related to
> incomplete remote output.
2.0.36 is way old. The current stable version is 2.0.55, and I shall
package 2.0.56 when I find the time for it.
> I've installed 2.1.9 plus timer-funcs.el 1.3 from the CVS xemacs-base
> package. I also needed to provide a dummy definition for
> set-buffer-multibyte which is missing but unnecessary on XEmacs.
>
> There have been a number of problems along the way but I've managed to
> connect to a Solaris box and create, read and write files.
As I said already, I'm an XEmacs rookie. If you could provide your
patches, and if they are small enough (not more than ~15 lines at
all), I will be glad to apply them. If it isn't such tiny, we would
need paperwork, or I would need to write the patches by myself given
on the symptoms you report. Anyway, I would appreciate all your
suggestions.
> Linux remains a problem. The tail of a debug buffer is
>
> 11:25:56 tramp-send-command-and-read (1) # File error: "`/usr/bin/stat
> -c '((\"%N\") %h %u %g %X.0 %Y.0 %Z.0 %s \"%A\" t %i -1)'
> /home/pforman' does not return a valid Lisp expression:
> `((\"`/home/pforman'\") 88 25434 102 1132651180.0 1176365745.0
> 1176365745.0 24576 \"drwxr-x--x\" t 1967553028 -1)
> '"
>
> The inode number (1967553028) is causing an overflow when trying to
> read it as a Lisp integer. I note that (file-attributes
> "/home/pforman") in XEmacs on the Linux box gives -179930620 for the
> inode number. In other words it can handle the overflow by forcing it
> into a signed number.
I see. For the inode number we could apply the same trick as we have
for the date: treat it as real number, and convert later. Could you,
please, check whether the appended patch works for you?
Best regards, Michael.
*** /tmp/tramp.el.~1~ Thu Apr 12 15:18:21 2007
--- /tmp/tramp.el Thu Apr 12 15:18:21 2007
***************
*** 2371,2377 ****
(tramp-send-command-and-read
vec
(format
! "%s -c '((\"%%N\") %%h %s %s %%X.0 %%Y.0 %%Z.0 %%s \"%%A\" t %%i -1)' %s"
(tramp-get-remote-stat vec)
(if (eq id-format 'integer) "%u" "\"%U\"")
(if (eq id-format 'integer) "%g" "\"%G\"")
--- 2371,2377 ----
(tramp-send-command-and-read
vec
(format
! "%s -c '((\"%%N\") %%h %s %s %%X.0 %%Y.0 %%Z.0 %%s \"%%A\" t %%i.0 -1)' %s"
(tramp-get-remote-stat vec)
(if (eq id-format 'integer) "%u" "\"%U\"")
(if (eq id-format 'integer) "%g" "\"%G\"")
***************
*** 2690,2696 ****
(format
(concat
"cd %s; echo \"(\"; (%s -ab | xargs "
! "%s -c '(\"%%n\" (\"%%N\") %%h %s %s %%X.0 %%Y.0 %%Z.0 %%s \"%%A\" t %%i -1)'); "
"echo \")\"")
(tramp-shell-quote-argument localname)
(tramp-get-ls-command vec)
--- 2690,2696 ----
(format
(concat
"cd %s; echo \"(\"; (%s -ab | xargs "
! "%s -c '(\"%%n\" (\"%%N\") %%h %s %s %%X.0 %%Y.0 %%Z.0 %%s \"%%A\" t %%i.0 -1)'); "
"echo \")\"")
(tramp-shell-quote-argument localname)
(tramp-get-ls-command vec)
***************
*** 6178,6183 ****
--- 6178,6186 ----
(not (string-equal
(nth 3 attr)
(tramp-get-remote-gid vec 'string)))))
+ ;; Convert inode.
+ (setcar (nthcdr 10 attr)
+ (floor (mod (nth 10 attr) 65536)))
;; Set virtual device number.
(setcar (nthcdr 11 attr)
(tramp-get-device vec))
_______________________________________________
Tramp-devel mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/tramp-devel
