Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
Toggle between root and non-root users
(defun toggle-alternate-file-as-root (&optional filename)
"Toggle between the current file as the default user and as root."
(let* ((filename (or filename (buffer-file-name)))
(parsed (when (tramp-tramp-file-p filename)
(coerce (tramp-dissect-file-name filename)
(unless filename
(error "No file in this buffer."))
(if (equal '("sudo" "root") (butlast parsed 2))
;; As non-root
(if (or
(string= "localhost" (nth 2 parsed))
(string= (system-name) (nth 2 parsed)))
(nth -1 parsed)
(apply 'tramp-make-tramp-file-name
(append (list tramp-default-method nil) (cddr parsed))))
;; As root
(if parsed
(apply 'tramp-make-tramp-file-name
(append '("sudo" "root") (cddr parsed)))
(tramp-make-tramp-file-name "sudo" "root" "localhost" filename))))))

haxney commented Jan 26, 2011

I created a fork which makes a round-trip to and from root on "/etc/passwd" work, at leas for me on Emacs on Ubuntu 10.10.


ieure commented Jan 26, 2011

Excellent, thank you.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment