Function: tramp-sshfs-handle-process-file

tramp-sshfs-handle-process-file is a byte-compiled function defined in tramp-sshfs.el.gz.

Signature

(tramp-sshfs-handle-process-file PROGRAM &optional INFILE DESTINATION DISPLAY &rest ARGS)

Documentation

Like process-file for Tramp files.

Source Code

;; Defined in /usr/src/emacs/lisp/net/tramp-sshfs.el.gz
(defun tramp-sshfs-handle-process-file
  (program &optional infile destination display &rest args)
  "Like `process-file' for Tramp files."
  ;; STDERR is not impelmemted.
  (when (consp destination)
    (setcdr destination `(,tramp-cache-undefined)))
  (tramp-skeleton-process-file program infile destination display args
    (let ((coding-system-for-read 'utf-8-dos)) ; Is this correct?

      (setq command
	   (format
	    "cd %s && exec %s"
	    (tramp-unquote-shell-quote-argument localname)
	    (mapconcat #'tramp-shell-quote-argument (cons program args) " ")))
      (when input (setq command (format "%s <%s" command input)))

      (setq ret
	    (apply
	     #'tramp-call-process
	     v (tramp-get-method-parameter v 'tramp-login-program)
	     nil outbuf display
	     (tramp-expand-args
	      v 'tramp-login-args nil
	      ?h (or (tramp-file-name-host v) "")
	      ?u (or (tramp-file-name-user v) "")
	      ?p (or (tramp-file-name-port v) "")
	      ?a "-t" ?l command))))))