From: Stefan Waldherr <swa@cs.cmu.edu>
Cc: ding@gnus.org
Subject: Using gnus and ssh instead of rsh
Date: 12 Oct 1997 21:56:08 -0400 [thread overview]
Message-ID: <upkoh4umnnq.fsf@mind.learning.cs.cmu.edu> (raw)
Hi,
the following diff to nntp.el allows people to use ssh instead of rsh (in fact
any arbitrary command instead of rsh). I've added a variable
nntp-rlogin-command that is the obvious.
If you want to use gnus and ssh to get your news from a remote server do
the following:
* apply the patch to nntp.el
* put (setq nntp-rlogin-command "ssh" ) into you .gnus.el
* in the group buffer add a server, method is nntp, name
should be something like ssh:foobar.com
* edit `{nntp:ssh:foobar.com} (closed)' to be something like
(nntp "ssh:foobar.com"
(nntp-address "foobar.com")
(nntp-open-connection-function nntp-open-rlogin)
(nntp-end-of-line "\n")
(nntp-rlogin-parameters
("telnet" "remote-news-server" "nntp")))
* authorize yourself with ssh-add in an xterm
* browse the server `ssh:foobar' and go wild.
cu
Stefan.
*** nntp.el.orig Sat Aug 16 14:47:10 1997
--- nntp.el Sun Oct 12 21:13:35 1997
***************
*** 79,88 ****
`nntp-open-telnet' which telnets to a remote system, logs in and does
the same.")
(defvoo nntp-rlogin-parameters '("telnet" "-8" "${NNTPSERVER:=news}" "nntp")
"*Parameters to `nntp-open-login'.
That function may be used as `nntp-open-connection-function'. In that
! case, this list will be used as the parameter list given to rsh.")
(defvoo nntp-rlogin-user-name nil
"*User name on remote system when using the rlogin connect method.")
--- 79,92 ----
`nntp-open-telnet' which telnets to a remote system, logs in and does
the same.")
+ (defvoo nntp-rlogin-command '("rsh")
+ "*Command that is used to perform the remote shell. This defaults
+ to rsh. If you want to use ssh, simply change it to ssh.")
+
(defvoo nntp-rlogin-parameters '("telnet" "-8" "${NNTPSERVER:=news}" "nntp")
"*Parameters to `nntp-open-login'.
That function may be used as `nntp-open-connection-function'. In that
! case, this list will be used as the parameter list given to nntp-rlogin-command.")
(defvoo nntp-rlogin-user-name nil
"*User name on remote system when using the rlogin connect method.")
***************
*** 143,150 ****
If can be used to set up a server remotely, for instance. Say you
have an account at the machine \"other.machine\". This machine has
access to an NNTP server that you can't access locally. You could
! then use this hook to rsh to the remote machine and start a proxy NNTP
! server there that you can connect to. See also `nntp-open-connection-function'")
(defvoo nntp-warn-about-losing-connection t
"*If non-nil, beep when a server closes connection.")
--- 147,155 ----
If can be used to set up a server remotely, for instance. Say you
have an account at the machine \"other.machine\". This machine has
access to an NNTP server that you can't access locally. You could
! then use this hook to nntp-rlogin-command (typically rsh) to the
! remote machine and start a proxy NNTP server there that you can
! connect to. See also `nntp-open-connection-function'")
(defvoo nntp-warn-about-losing-connection t
"*If non-nil, beep when a server closes connection.")
***************
*** 1087,1101 ****
proc)))
(defun nntp-open-rlogin (buffer)
! "Open a connection to SERVER using rsh."
(let ((proc (if nntp-rlogin-user-name
(start-process
! "nntpd" buffer "rsh"
nntp-address "-l" nntp-rlogin-user-name
(mapconcat 'identity
nntp-rlogin-parameters " "))
(start-process
! "nntpd" buffer "rsh" nntp-address
(mapconcat 'identity
nntp-rlogin-parameters " ")))))
(set-buffer buffer)
--- 1092,1106 ----
proc)))
(defun nntp-open-rlogin (buffer)
! "Open a connection to SERVER using nntp-rlogin-command."
(let ((proc (if nntp-rlogin-user-name
(start-process
! "nntpd" buffer nntp-rlogin-command
nntp-address "-l" nntp-rlogin-user-name
(mapconcat 'identity
nntp-rlogin-parameters " "))
(start-process
! "nntpd" buffer nntp-rlogin-command nntp-address
(mapconcat 'identity
nntp-rlogin-parameters " ")))))
(set-buffer buffer)
next reply other threads:[~1997-10-13 1:56 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
1997-10-13 1:56 Stefan Waldherr [this message]
1997-10-13 19:24 ` Stefan Waldherr
1997-10-20 20:36 ` Lars Magne Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=upkoh4umnnq.fsf@mind.learning.cs.cmu.edu \
--to=swa@cs.cmu.edu \
--cc=ding@gnus.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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 NNTP newsgroup(s).