From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/12595 Path: main.gmane.org!not-for-mail From: Stefan Waldherr Newsgroups: gmane.emacs.gnus.general Subject: Using gnus and ssh instead of rsh Date: 12 Oct 1997 21:56:08 -0400 Organization: Carnegie Mellon University -- Computer Science Department Sender: swa+@mind.learning.cs.cmu.edu Message-ID: Reply-To: Stefan Waldherr NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by tm-edit 7.106) Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1035152103 4636 80.91.224.250 (20 Oct 2002 22:15:03 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:15:03 +0000 (UTC) Cc: ding@gnus.org Return-Path: Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16]) by altair.xemacs.org (8.8.7/8.8.7) with ESMTP id UAA11735 for ; Sun, 12 Oct 1997 20:00:09 -0700 Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2]) by xemacs.org (8.8.5/8.8.5) with SMTP id VAA19632 for ; Sun, 12 Oct 1997 21:52:23 -0500 (CDT) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) id for ; Mon, 13 Oct 1997 03:56:53 +0200 Original-Received: (qmail 3091 invoked by uid 504); 13 Oct 1997 01:56:51 -0000 Original-Received: (qmail 3088 invoked from network); 13 Oct 1997 01:56:51 -0000 Original-Received: from mind.learning.cs.cmu.edu (128.2.185.27) by claymore.vcinet.com with SMTP; 13 Oct 1997 01:56:51 -0000 Original-To: Lars Magne Ingebrigtsen X-Newsreader: Gnus v5.4.66/XEmacs 19.15 X-Url: http://mind.learning.cs.cmu.edu/ X-Face: "-=6){9J':KXui`/fiH#,g(pr\2Rv'7{dSci>!;1r2zpWB*qcI6gH^LoLQjSSNSg@ee_n~dV]|;5T7=d6_FNPEvqKDk`OWLB[CKOkG.M6{J.??WB*1Wk`y?de2[56)Iv"y#tg@p]~%_3>&;;PQ-{A)UcZ_?nj@b(FN]!Sq6QS9YuGJZ3qkdPq(h-olTvcq0,TS%?i]ddP2E'&^ud Xref: main.gmane.org gmane.emacs.gnus.general:12595 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:12595 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)