Lines Matching refs:localname
144 ;; UNC file names like "//host/share/localname".
1160 (defcustom tramp-localname-regexp
1175 "\\(" tramp-localname-regexp "\\)")
1273 tramp-postfix-host-regexp "\\(" tramp-localname-regexp "\\)")
1289 the paren pair which matches the localname (pathname) on the remote host.
1300 (integer :tag "Paren pair to match localname")))
1335 LOCALNAME says how to construct the localname (pathname).
1342 In LOCALNAME, `%%' means `%' and `%p' means the localname.
1349 method name, followed by all the hops, and the localname must come
2058 `foo-user', `foo-host', `foo-localname'.
2064 `method', `user', `host', `localname' to the components."
2074 (,(if var (intern (concat (symbol-name var) "-localname")) 'localname)
2075 (tramp-file-name-localname ,(or var 'v))))
2146 the symlink. If LINKNAME is a Tramp file, only the localname component is
2149 If LINKNAME is a Tramp file and the localname component is relative, then
2150 it is expanded first, before the localname component is taken. Note that
2155 (cwd (file-name-directory l-localname)))
2169 l-localname)))))
2170 (signal 'file-already-exists (list "File already exists" l-localname))
2173 ;; If FILENAME is a Tramp name, use just the localname component.
2175 (setq filename (tramp-file-name-localname
2188 l-localname)
2229 ;; Run the command on the localname portion only.
2231 multi-method method user host (file-name-directory (or localname "")))))
2236 (file-name-nondirectory localname)))
2241 (let* ((steps (tramp-split-string localname "/"))
2243 (file-name-as-directory localname)))
2244 (is-dir (string= localname localnamedir))
2299 (setq symlink-target localname)))
2332 (tramp-shell-quote-argument localname)))))))
2356 localname id-format)
2358 localname id-format)))))))
2361 (multi-method method user host localname &optional id-format)
2369 multi-method method user host localname))
2375 (tramp-shell-quote-argument localname)))
2446 (multi-method method user host localname &optional id-format)
2451 multi-method method user host localname))
2457 (tramp-shell-quote-argument localname) id-format))
2485 (tramp-shell-quote-argument localname)))
2536 (tramp-shell-quote-argument localname)))
2553 (tramp-shell-quote-argument localname))))
2658 (tramp-shell-quote-argument localname))
2725 ;; If localname component of filename is "/", leave it unchanged.
2726 ;; Otherwise, remove any trailing slash from localname component.
2730 (if (and (not (zerop (length localname)))
2731 (eq (aref localname (1- (length localname))) ?/)
2732 (not (string= localname "/")))
2746 (concat "cd " (tramp-shell-quote-argument localname))
2750 (tramp-shell-quote-argument localname))
2801 (tramp-shell-quote-argument localname)
2837 (format "cd %s" (tramp-shell-quote-argument localname))
2840 (tramp-shell-quote-argument localname))
2913 (format "%s %s %s" ln (tramp-shell-quote-argument v1-localname)
2914 (tramp-shell-quote-argument v2-localname))
2971 v1-multi-method v1-method v1-user v1-host v1-localname
2972 v2-multi-method v2-method v2-user v2-host v2-localname)
2983 v1-localname l-localname))
2984 (setq v1-localname filename))
2991 v2-localname l-localname))
2992 (setq v2-localname newname))
3007 v1-localname v2-localname keep-date))
3135 v1-multi-method v1-method v1-user v1-host v1-localname
3136 v2-multi-method v2-method v2-user v2-host v2-localname
3149 v1-localname l-localname
3161 (setq v1-localname filename))
3169 v2-localname l-localname
3181 (setq v2-localname newname))
3186 (setq source v1-localname)
3193 (tramp-shell-quote-argument v1-localname))))
3196 (setq target v2-localname)
3203 (tramp-shell-quote-argument v2-localname))))
3279 (tramp-shell-quote-argument localname))
3292 (tramp-shell-quote-argument localname)))
3303 (tramp-shell-quote-argument localname))))
3314 ;; run a shell command 'rm -r <localname>'
3322 (format "rm -r %s" (tramp-shell-quote-argument localname)))
3336 (format "cd %s" (tramp-shell-quote-argument localname))
3339 (tramp-shell-quote-argument localname))
3380 (if (string-match (car (car suffixes)) localname)
3391 (concat (nth 2 suffix) " " localname)))
3403 (concat "gzip -f " localname)))
3446 (setq wildcard (file-name-nondirectory localname))
3447 (setq localname (file-name-directory localname)))
3464 localname
3465 (tramp-shell-quote-argument (concat localname ".")))))
3469 (file-name-directory localname)))
3472 (tramp-shell-quote-argument (file-name-directory localname)))
3479 localname
3480 (if (zerop (length (file-name-nondirectory localname)))
3483 (file-name-nondirectory localname)))))))
3549 If the localname part of the given filename starts with \"/../\" then
3562 (unless (file-name-absolute-p localname)
3563 (setq localname (concat "~/" localname)))
3569 (when (string-match "\\`\\(~[^/]*\\)\\(.*\\)\\'" localname)
3570 (let ((uname (match-string 1 localname))
3571 (fname (match-string 2 localname)))
3593 (setq localname (concat uname fname))
3597 (while (string-match "//" localname)
3598 (setq localname (replace-match "/" t t localname)))
3612 (list localname))))))))))
3616 ;; ;; Look if localname starts with "/../" construct. If this is
3618 ;; (if (string-match "^/\\.\\./" localname)
3619 ;; (expand-file-name (substring localname 3))
3629 ;; (list localname))))))))))
3675 (format "cd %s" (tramp-shell-quote-argument localname))
3678 (tramp-shell-quote-argument localname))
3814 (concat rem-enc " < " (tramp-shell-quote-argument localname))
3877 :localname ""))))
4139 (tramp-shell-quote-argument localname)))
4360 ((and completion (zerop (length localname))
4504 ;;- (format "echo %s" (comint-quote-filename localname)))
4507 (format "echo %s" localname))
4512 (if (string-equal localname bufstr)
4615 (localname (tramp-file-name-localname car))
4621 localname) ;; Nothing to complete
4683 ;; completions. If "multi-method" or "localname" is non-nil it means there
4765 remote host and localname (filename on remote host)."
4779 :localname nil)
4784 (localname (and (nth 4 structure)
4791 :localname localname)))))))
5100 (tramp-shell-quote-argument (tramp-file-name-localname v)))))))
5117 (localname1 (tramp-file-name-localname v1))
5118 (localname2 (tramp-file-name-localname v2)))
5156 (tramp-shell-quote-argument localname))
6980 (defstruct tramp-file-name multi-method method user host localname)
6993 localname (file name on remote host)."
7012 (localname (match-string (nth 4 tramp-file-name-structure) name)))
7018 :localname localname))))))
7047 (localname-index (nth 3 tramp-multi-file-name-structure))
7052 method hops len hop-methods hop-users hop-hosts localname)
7058 (when (< localname-index 0) (incf localname-index len))
7059 (setq localname (match-string localname-index name))
7074 :localname localname)))
7076 (defun tramp-make-tramp-file-name (multi-method method user host localname)
7079 (tramp-make-tramp-multi-file-name multi-method method user host localname)
7085 (when localname (concat "%p")))
7086 `((?m . ,method) (?u . ,user) (?h . ,host) (?p . ,localname)))))
7090 (defun tramp-make-tramp-multi-file-name (multi-method method user host localname)
7096 (localname-format (nth 2 tramp-make-multi-tramp-file-format))
7099 (localname (format-spec localname-format `((?p . ,localname))))
7107 (concat prefix hops localname)))
7109 (defun tramp-make-copy-program-file-name (user host localname)
7112 (format "%s@%s:%s" user host localname)
7113 (format "%s:%s" host localname)))
7472 ;; (defadvice efs-ftp-path (around dont-match-tramp-localname activate protect)
7473 ;; "Cause efs-ftp-path to fail when the path is a TRAMP localname."
7494 (if (string-match "[[*?]" (tramp-file-name-localname v))