Invoke Ange-FTP from within Tramp

Invoke Ange-FTP from within Tramp

[Kai Großjohann]

How to implement this feature?

My current idea is as follows:

* Create a function which, given an operation, a list of arguments,
  and a list of indices, invokes Ange-FTP.  (Call it tramp-run-ange-ftp.)

  The list of indices specifies where in the arg list you can find
  Ange-FTP filenames.  These arguments are then rewritten from Tramp
  format to Ange-FTP format.  Then ange-ftp-hook-function is invoked
  with the operation and those arguments.

* Change all tramp-handle-foo functions (foo are names of operations)
  to check whether Ange-FTP should be invoked, and have them signal
  `tramp-run-ange-ftp' with the list of indices (where to find
  filenames in the arg list) as argument.

* Change tramp-file-name-handler (the function mentioned in
  file-name-handler-alist) so that it catches the tramp-run-ange-ftp
  signal and invokes the tramp-run-ange-ftp function.

Other alternatives:

* Use throw/catch instead of signal/condition-case.  I have no idea
  which one to use.

* Put the invocation of Ange-FTP directly in the functions.  This
  means that all of the functions will get an additional conditional
  around it and the meat of the function is in the else part.

What do you think?  Is this the right way to do it?

kai
-- 
A large number of young women don't trust men with beards.  (BFBS Radio)

Re: Invoke Ange-FTP from within Tramp

[Kim F. Storm]

Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) writes:

> How to implement this feature?
> 
> 
> * Put the invocation of Ange-FTP directly in the functions.  This
>   means that all of the functions will get an additional conditional
>   around it and the meat of the function is in the else part.

Couldn't this be done with a suitable defmacro ?

        (deftramp find-file (arg...)
           code)

expands to

        (defun tramp-find-file (arg...)
          (if (activate-ange-ftp ...)
             (ange-ftp-find-file arg...)
            code))


-- 
Kim F. Storm <storm@cua.dk> http://www.cua.dk

Re: Invoke Ange-FTP from within Tramp

[Richard Stallman]

    Couldn't this be done with a suitable defmacro ?

	    (deftramp find-file (arg...)
	       code)

    expands to

	    (defun tramp-find-file (arg...)

If the actual function is called tramp-find-file, then the symbol that
appears in the code should be tramp-find-file, not find-file.
This is for the sake of etags, and C-s, and grep, etc.

Re: Invoke Ange-FTP from within Tramp

[Richard Stallman]

If you are programming the nonlocal control transfer,
it is better to use catch and throw, rather than errors.
(See the Emacs Lisp Manual.)

Since I have not studied the code, I don't have an opinion
about the third alternative.

Re: Invoke Ange-FTP from within Tramp

[Kai Großjohann]

Richard Stallman <rms@gnu.org> writes:

> If you are programming the nonlocal control transfer,
> it is better to use catch and throw, rather than errors.
> (See the Emacs Lisp Manual.)

Okay, I will do that.  Note that I did look in the Emacs Lisp Manual,
but I didn't see anything which told me which variant to use.  That's
why I asked here.

Is there some kind of rule?

> Since I have not studied the code, I don't have an opinion
> about the third alternative.

I tried to do it, but then I decided to use the nonlocal control
transfer.  Having most of the function inside the `else' part of a
conditional appeared too ugly (to me).

kai
-- 
A large number of young women don't trust men with beards.  (BFBS Radio)

Re: Invoke Ange-FTP from within Tramp

[Richard Stallman]

In the node Errors:

      Resist the temptation to use error handling to transfer control from
    one part of the program to another; use @code{catch} and @code{throw}
    instead.  @xref{Catch and Throw}.