* bug#6019: 23.1; ange-ftp with VAX
@ 2010-04-23 21:09 ` Carroll, Tom
2010-05-02 11:22 ` Michael Albinus
2011-08-31 11:39 ` bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1 Michael Albinus
0 siblings, 2 replies; 6+ messages in thread
From: Carroll, Tom @ 2010-04-23 21:09 UTC (permalink / raw)
To: 6019
[-- Attachment #1: Type: text/plain, Size: 3605 bytes --]
This is a problem with Emacs 23.1, and NOT with 22.1.1.
Attempting to perform a find-file on a VAX no longer works. Looking
into the ftp buffer
reveals what appears to be the problem: the syntax of a directory
command is incorrect.
Note that this does not cause Emacs to crash - just to fail to access
remote files.
For example: in connecting to a machine called Pine (not the email
program! - we
have a tree motif here) with the user tcarroll results in the following:
dir [.".AP:.TCARROLL]"
c:/DOCUME~1/tcarroll/LOCALS~1/Temp/ange-ftp3268PtF
The correct syntax is created by Emacs 22.1:
dir AP:[TCARROLL] c:/DOCUME~1/tcarroll/LOCALS~1/Temp/ange-ftp2724gSG
I hope you understand VAX file syntax - VAX stuff is pretty far out of
date these days.
By the way, Emacs is fantastic, and as a technology professional I live
half my life in
this software.
Thanks!
Tom
In GNU Emacs 23.1.1 (i386-mingw-nt5.1.2600)
of 2009-07-30 on SOFT-MJASON
Windowing system distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (4.4)'
Important settings:
value of $LC_ALL: nil
value of $LC_COLLATE: nil
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: ENU
value of $XMODIFIERS: nil
locale-coding-system: cp1252
default-enable-multibyte-characters: t
Major mode: Fundamental
Minor modes in effect:
shell-dirtrack-mode: t
tooltip-mode: t
mouse-wheel-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
blink-cursor-mode: t
global-auto-composition-mode: t
auto-encryption-mode: t
auto-compression-mode: t
column-number-mode: t
line-number-mode: t
transient-mark-mode: t
Recent input:
<return> <f11> <up> <up> <up> <up> <up> <up> <up> <up>
<up> <up> <up> <up> <up> <up> <up> C-SPC C-e <escape>
w <help-echo> <help-echo> <help-echo> <down-mouse-1>
<mouse-1> C-x C-f C-a C-k <help-echo> <help-echo> <help-echo>
<down-mouse-1> <mouse-1> <S-insert> <return> <down-mouse-1>
<mouse-1> <escape> x e m a c s SPC r e p o r t SPC
b <backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> C-g C-h a r e p
o r t SPC b u g <return> <escape> x r e p o r t SPC
e m a c s SPC b u g <return>
Recent messages:
Listing /tcarroll@pine:/AP:/... [2 times]
Listing /tcarroll@pine:/AP:/TCARROLL/... [2 times]
Listing /tcarroll@pine:/AP:/... [2 times]
Listing /tcarroll@pine:/AP:/TCARROLL/... [2 times]
byte-code: FTP Error: DIR failed: 550 %RMS-F-SYN, file specification
syntax error
Mark set
Listing /tcarroll@pine:/AP:/TCARROLL/DOC/... [6 times]
byte-code: FTP Error: DIR failed: 550 %RMS-F-SYN, file specification
syntax error
Quit
Type C-x 4 C-o RET to restore the other window. *** E-Mail body has
been placed on clipboard, please paste them here! ***
The information contained in this communication is intended for the use
of the designated recipients named above. If the reader of this
communication is not the intended recipient, you are hereby notified
that you have received this communication in error, and that any review,
dissemination, distribution or copying of this communication is strictly
prohibited. If you have received this communication in error, please
notify The Associated Press immediately by telephone at +1-212-621-1898
and delete this e-mail. Thank you.
[IP_US_DISC]
msk dccc60c6d2c3a6438f0cf467d9a4938
[-- Attachment #2: Type: text/html, Size: 7041 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#6019: 23.1; ange-ftp with VAX
2010-04-23 21:09 ` bug#6019: 23.1; ange-ftp with VAX Carroll, Tom
@ 2010-05-02 11:22 ` Michael Albinus
2011-07-11 21:39 ` Glenn Morris
2011-08-31 11:39 ` bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1 Michael Albinus
1 sibling, 1 reply; 6+ messages in thread
From: Michael Albinus @ 2010-05-02 11:22 UTC (permalink / raw)
To: Carroll, Tom; +Cc: 6019
"Carroll, Tom" <TCarroll@ap.org> writes:
Hi,
> Attempting to perform a find-file on a VAX no longer works. Looking
> into the ftp buffer
> reveals what appears to be the problem: the syntax of a directory
> command is incorrect.
>
> Note that this does not cause Emacs to crash - just to fail to access
> remote files.
>
> For example: in connecting to a machine called Pine (not the email
> program! - we
> have a tree motif here) with the user tcarroll results in the following:
>
> dir [.".AP:.TCARROLL]"
> c:/DOCUME~1/tcarroll/LOCALS~1/Temp/ange-ftp3268PtF
>
> The correct syntax is created by Emacs 22.1:
>
> dir AP:[TCARROLL] c:/DOCUME~1/tcarroll/LOCALS~1/Temp/ange-ftp2724gSG
>
> I hope you understand VAX file syntax - VAX stuff is pretty far out of
> date these days.
I have no access to a VAX any longer (for 15 years or so), and from
reading the sources in ange-ftp.el I cannot find the problem.
Could you, please, apply the following:
(require 'ange-ftp)
(require 'trace)
(dolist (elt (all-completions "ange-ftp-" obarray 'functionp))
(trace-function-background (intern elt)))
Then rerun your test and show the contents of the buffers
*ftp ...*
*trace-output*
Check the buffers, that they do not contain sensitive information like
your password, before sending.
> Thanks!
>
> Tom
Best regards, Michael.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#6019: 23.1; ange-ftp with VAX
2010-05-02 11:22 ` Michael Albinus
@ 2011-07-11 21:39 ` Glenn Morris
0 siblings, 0 replies; 6+ messages in thread
From: Glenn Morris @ 2011-07-11 21:39 UTC (permalink / raw)
To: 6019-done
This bug is being closed because it could not be reproduced and there
was no response to a request for more information.
If you still see the problem with the latest Emacs release, 23.3,
please reply with the requested information and it can be reopened if needed.
You can view the whole report at http://debbugs.gnu.org/BUGNUMBER
Michael Albinus wrote:
> I have no access to a VAX any longer (for 15 years or so), and from
> reading the sources in ange-ftp.el I cannot find the problem.
>
> Could you, please, apply the following:
>
> (require 'ange-ftp)
> (require 'trace)
> (dolist (elt (all-completions "ange-ftp-" obarray 'functionp))
> (trace-function-background (intern elt)))
>
> Then rerun your test and show the contents of the buffers
>
> *ftp ...*
> *trace-output*
>
> Check the buffers, that they do not contain sensitive information like
> your password, before sending.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1
2011-08-17 13:24 bug#9315: " Alan.Grunwald
@ 2011-08-30 8:57 ` Michael Albinus
0 siblings, 0 replies; 6+ messages in thread
From: Michael Albinus @ 2011-08-30 8:57 UTC (permalink / raw)
To: Alan.Grunwald; +Cc: 6019
Alan.Grunwald@tatasteel.com writes:
Hi Alan,
> I know next-to no emacs LISP, but I am an experienced programmer and
> I've had a go at debugging this by sprinkling (message ... ...) calls
> around the code. As far as I can make out, something outside amg-ftp is
> calling ange-ftp-send-cmd with the command "dir /$DISK1!/". I believe it
> is that that is casuing the problem, but I can't work out why this
> command is being attempted.
>
> For what it's worth, if I connect to machin from a DOS box and type PWD,
> the response is
>
> "$DISK1:[GRUNWALD]" is current directory.
>
> It seems to me that the exclamation mark between DISK1 and the slash is
> causing the problem, but I've no idea where it's coming from.
I have no access to a VAX any longer (for 15 years or so), and from
reading the sources in ange-ftp.el I cannot find the problem.
Could you, please, apply the following:
(require 'ange-ftp)
(require 'trace)
(dolist (elt (all-completions "ange-ftp-" obarray 'functionp))
(trace-function-background (intern elt)))
Then rerun your test and show the contents of the buffers
*ftp ...*
*trace-output*
Check the buffers, that they do not contain sensitive information like
your password, before sending.
> Thanks,
> Alan
Best regards, Michael.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1
2010-04-23 21:09 ` bug#6019: 23.1; ange-ftp with VAX Carroll, Tom
2010-05-02 11:22 ` Michael Albinus
@ 2011-08-31 11:39 ` Michael Albinus
2011-08-31 12:41 ` Alan.Grunwald
1 sibling, 1 reply; 6+ messages in thread
From: Michael Albinus @ 2011-08-31 11:39 UTC (permalink / raw)
To: Alan.Grunwald; +Cc: 6019
Alan.Grunwald@tatasteel.com writes:
> Michael,
Hi Alan,
> Please find attached the contents of the *trace-output* and *ftp
> grunwald@confid* buffers afetr I executed
>
> C-x C-f /grunwald@confid:login.com
>
> Best of luck :-)
Thanks, it helps :-)
The following call is guilty:
8 -> ange-ftp-fix-name-for-vms: name="\"/$DISK1!/GRUNWALD/\"" reverse=nil
8 <- ange-ftp-fix-name-for-vms: "[.\".$DISK1!.GRUNWALD]\""
This reminds me, that we have changed the quoting for file names a while
ago. This results in surrounding a file name under Windows by '"', like
"/$DISK1!/GRUNWALD/". Obviously, ange-ftp-fix-name-for-vms must be
aware of it.
Could you, please, check whether the following patch helps?
--8<---------------cut here---------------start------------->8---
*** /home/albinus/src/emacs-23/lisp/net/ange-ftp.el.~100624~ 2011-08-31 13:30:47.905559520 +0200
--- /home/albinus/src/emacs-23/lisp/net/ange-ftp.el 2011-08-31 13:28:25.395350494 +0200
***************
*** 5017,5023 ****
dir (and dir "/")
file))
(error "name %s didn't match" name))
! (let (drive dir file tmp)
(if (string-match "\\`/[^:]+:/" name)
(setq drive (substring name 1
(1- (match-end 0)))
--- 5017,5027 ----
dir (and dir "/")
file))
(error "name %s didn't match" name))
! (let (drive dir file tmp quote)
! (if (string-match "\\`\".+\"\\'" name)
! (setq name (substring name 1 -1)
! quote "\"")
! (setq quote ""))
(if (string-match "\\`/[^:]+:/" name)
(setq drive (substring name 1
(1- (match-end 0)))
***************
*** 5026,5034 ****
(if tmp
(setq dir (subst-char-in-string ?/ ?. (substring tmp 0 -1) t)))
(setq file (file-name-nondirectory name))
! (concat drive
(and dir (concat "[" (if drive nil ".") dir "]"))
! file)))))
;; (ange-ftp-fix-name-for-vms "/PUB$:/ANONYMOUS/SDSCPUB/NEXT/Readme.txt;1")
;; (ange-ftp-fix-name-for-vms "/PUB$:[ANONYMOUS.SDSCPUB.NEXT]Readme.txt;1" t)
--- 5030,5038 ----
(if tmp
(setq dir (subst-char-in-string ?/ ?. (substring tmp 0 -1) t)))
(setq file (file-name-nondirectory name))
! (concat quote drive
(and dir (concat "[" (if drive nil ".") dir "]"))
! file quote)))))
;; (ange-ftp-fix-name-for-vms "/PUB$:/ANONYMOUS/SDSCPUB/NEXT/Readme.txt;1")
;; (ange-ftp-fix-name-for-vms "/PUB$:[ANONYMOUS.SDSCPUB.NEXT]Readme.txt;1" t)
--8<---------------cut here---------------end--------------->8---
> Alan
Best regards, Michael.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1
2011-08-31 11:39 ` bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1 Michael Albinus
@ 2011-08-31 12:41 ` Alan.Grunwald
0 siblings, 0 replies; 6+ messages in thread
From: Alan.Grunwald @ 2011-08-31 12:41 UTC (permalink / raw)
To: Michael Albinus; +Cc: 6019
Michael,
> > Please find attached the contents of the *trace-output* and *ftp
> > grunwald@confid* buffers afetr I executed
> >
> > C-x C-f /grunwald@confid:login.com
> >
> > Best of luck :-)
>
> Thanks, it helps :-)
>
> The following call is guilty:
>
> 8 -> ange-ftp-fix-name-for-vms: name="\"/$DISK1!/GRUNWALD/\"" reverse=nil
> 8 <- ange-ftp-fix-name-for-vms: "[.\".$DISK1!.GRUNWALD]\""
>
> This reminds me, that we have changed the quoting for file names a while
> ago. This results in surrounding a file name under Windows by '"', like
> "/$DISK1!/GRUNWALD/". Obviously, ange-ftp-fix-name-for-vms must be
> aware of it.
>
> Could you, please, check whether the following patch helps?
>
> --8<---------------cut here---------------start------------->8---
> *** /home/albinus/src/emacs-23/lisp/net/ange-ftp.el.~100624~
> 2011-08-31 13:30:47.905559520 +0200
> --- /home/albinus/src/emacs-23/lisp/net/ange-ftp.el 2011-08-31 13:
> 28:25.395350494 +0200
> ***************
> *** 5017,5023 ****
> dir (and dir "/")
> file))
> (error "name %s didn't match" name))
> ! (let (drive dir file tmp)
> (if (string-match "\\`/[^:]+:/" name)
> (setq drive (substring name 1
> (1- (match-end 0)))
> --- 5017,5027 ----
> dir (and dir "/")
> file))
> (error "name %s didn't match" name))
> ! (let (drive dir file tmp quote)
> ! (if (string-match "\\`\".+\"\\'" name)
> ! (setq name (substring name 1 -1)
> ! quote "\"")
> ! (setq quote ""))
> (if (string-match "\\`/[^:]+:/" name)
> (setq drive (substring name 1
> (1- (match-end 0)))
> ***************
> *** 5026,5034 ****
> (if tmp
> (setq dir (subst-char-in-string ?/ ?. (substring tmp 0 -1) t)))
> (setq file (file-name-nondirectory name))
> ! (concat drive
> (and dir (concat "[" (if drive nil ".") dir "]"))
> ! file)))))
>
> ;; (ange-ftp-fix-name-for-vms "/PUB
$:/ANONYMOUS/SDSCPUB/NEXT/Readme.txt;1")
> ;; (ange-ftp-fix-name-for-vms "/PUB$:[ANONYMOUS.SDSCPUB.NEXT]
> Readme.txt;1" t)
> --- 5030,5038 ----
> (if tmp
> (setq dir (subst-char-in-string ?/ ?. (substring tmp 0 -1) t)))
> (setq file (file-name-nondirectory name))
> ! (concat quote drive
> (and dir (concat "[" (if drive nil ".") dir "]"))
> ! file quote)))))
>
> ;; (ange-ftp-fix-name-for-vms "/PUB
$:/ANONYMOUS/SDSCPUB/NEXT/Readme.txt;1")
> ;; (ange-ftp-fix-name-for-vms "/PUB$:[ANONYMOUS.SDSCPUB.NEXT]
> Readme.txt;1" t)
> --8<---------------cut here---------------end--------------->8---
>
I haven't got access to a handy method to convert the changes listing
above into a new file - could you send me a full ang-ftp.el please?
Thanks,
Alan
**********************************************************************
This transmission is confidential and must not be used or disclosed by anyone other than the intended recipient. Neither Tata Steel Europe Limited nor any of its subsidiaries can accept any responsibility for any use or misuse of the transmission by anyone.
For address and company registration details of certain entities within the Tata Steel Europe group of companies, please visit http://www.tatasteeleurope.com/entities
**********************************************************************
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2011-08-31 12:41 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
[not found] <OF7CF6E26D.4255F847-ON802578FD.0031AD64-802578FD.00326650@LocalDomain>
2010-04-23 21:09 ` bug#6019: 23.1; ange-ftp with VAX Carroll, Tom
2010-05-02 11:22 ` Michael Albinus
2011-07-11 21:39 ` Glenn Morris
2011-08-31 11:39 ` bug#6019: 23.3; Can't visit VMS file from Windows Emacs 23.3.1 Michael Albinus
2011-08-31 12:41 ` Alan.Grunwald
2011-08-17 13:24 bug#9315: " Alan.Grunwald
2011-08-30 8:57 ` bug#6019: " Michael Albinus
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).