Newsgroups: fj.lang.awk,fj.lang.perl,fj.questions.unix
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!news.iij.ad.jp!gw.omronsoft.co.jp!yamasita
From: yamasita@omronsoft.co.jp (Yasunari GON Yamashita)
Subject: Re: Offline newsreader
In-Reply-To: hosokawa@mt.cs.keio.ac.jp's message of 9 May 1995 19:36:49 JST
Message-ID: <D8yEw4.JHn@gw.omronsoft.co.jp>
Sender: news@gw.omronsoft.co.jp (News Manager)
Nntp-Posting-Host: hsp254.sp.kyoto.omronsoft.co.jp
Organization: OMRON SOFTWARE Co., Ltd. Kyoto, Japan.
X-Newsreader: gnspool [Version 1.32 beta Jan.11,1995 (DOS)]
References: <D7sxv9.97B@isspsun.issp.u-tokyo.ac.jp>
	<3olk04$esf@t-server.t.u-tokyo.ac.jp> <3ongk1$apb@glock.mt.cs.keio.ac.jp>
Date: Mon, 22 May 1995 00:33:40 GMT
Lines: 175
Xref: galaxy.trc.rwcp.or.jp fj.lang.awk:93 fj.lang.perl:112 fj.questions.unix:3113
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=112&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.


$B%*%`%m%s%=%U%H%&%'%"$N;32<$G$9!#(B
$B2q<R$G$O(B gnspool + gn or GNUS $B$r;H$C$F!"(B
$BDL6PESCf$*$h$S<+Bp$G$O%M%C%H%o!<%/%3!<%I$N$J$$(B gn $B$r;H$C$F(B
$B%*%U%i%$%s$G(B NetNews $B$rFI$s$G$$$^$9!#(B

From article <3ongk1$apb@glock.mt.cs.keio.ac.jp>
by hosokawa@mt.cs.keio.ac.jp

> $B$3$s$J5-;v$rFI$s$G$$$F3Z$7$=$&$J$N$G!"(BFreeBSD-current $B$N>e$G(B mnews +
> gnspool $B$N(B offline $B$N%K%e!<%94D6-$r:n$C$A$c$$$^$7$?!#$"$H$O%K%e!<%9$N(B
> $B%]%9%H$@$1$G$9!#(B
> 
> mnews + gnspool $B$G(B inews $B$NBe$o$j$r$7$F$/$l$k(B Perl $B$N%9%/%j%W%H$J$s$F(B
> $B:n$C$??M$$$^$;$s$+!)(B

Perl $B$G$J$/$C$F?=Lu$J$$$N$G$9$,!"!"!"!"(B
GNUS $B$H(B gnspool $B$rAH$_9g$o$;$F;H$&$?$a(B
$B!&(Binews $B$b$I$-$N%W%m%0%i%`(B gninews $B$N%=!<%9(B
$B!&(BGNUS $B$H(B gnspool $B$rAH$_9g$o$;$F;H$&$?$a$N%I%-%e%a%s%H(B
$B$r%]%9%H$7$^$9!#(B
mnews + gnspool $B$G$N%]%9%H$N;29M$K$J$l$P9,$$$G$9!#(B

$B$I$A$i$b!"<!4|%P!<%8%g%s$N(B gn $B$KE:IU$9$kM=Dj$N$b$N$G$9!#(B
$B=>Mh$N(B gn $B$N%=!<%9$HAH$_9g$o$;$F%3%s%Q%$%k$7$h$&$H$9$k$H!"(B
DEFAULT_NEWSSPOOL $B$"$?$j$r2?$H$+$7$J$$$H$$$1$J$$$G$7$g$&!#(B
src/gninews.c---------------------------------------------------------

/*
 * @(#)gninews.c1.32 Apr.12,1995
 *
 * $BCx:n8"$OJ|4~$7$^$;$s!#$?$@$7!"1DMxL\E*0J30$N;HMQ!?G[I[$K@)8B$O@_$1$^$;$s!#(B
 * (C) yamasita@omronsoft.co.jp
 */

#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <time.h>

extern unsigned char *getenv();

#include"nntp.h"
#include"gn.h"
#include"config.h"

unsigned char *newsspool = DEFAULT_NEWSSPOOL;

main()
{
  FILE *rp;
  unsigned char resp[NNTP_STRLEN+1];
  unsigned char buf[NNTP_STRLEN+1];
  struct stat stat_buf;
  char *env;

  if ( (env = getenv("NEWSSPOOL")) != 0 )
    newsspool = env;

  strcpy(buf,newsspool);
  strcat(buf,SLASH_STR);
  strcat(buf,"news.out");
  if ( stat(buf,&stat_buf) != 0 ) {
    if ( MKDIR(buf) != 0 ) {
      fprintf(stderr,"mkdir(%s):fail\n",buf);
      return(-1);
    }
  }
  strcat(buf,SLASH_STR);
  strcat(buf,"gnXXXXXX");
  mktemp(&buf[0]);
  if ( ( rp = fopen(buf,"w") ) == NULL ){
    perror(buf);
    return(-1);
  }
  while (gets(resp,NNTP_STRLEN) != NULL )
    fprintf(rp, "%s\n", resp);
  fclose(rp);
  return(0);
}
----------------------------------------------------------------------
docs.jp/gnus----------------------------------------------------------

gnspool $B$G<h$j4s$;$?5-;v$r(B-*- mode: indented-text -*-
$B!&(BUnix + Nemacs/Mule + GNUS
$B!&(BDOS + Demacs + GNUS 
$B$GFI$`J}K!(B


gnspool $B$,:n@.$9$k%U%!%$%k$O!"4pK\E*$K(B C news $B$N%5%V%;%C%H$G$9!#(B
$B$h$C$F%m!<%+%k%9%W!<%k$r8+$k@_Dj$r$*$3$J$C$?(B GNUS $B$r;H$C$F(B NetNews $B$K(B
$B%"%/%;%9$9$k$3$H$b2DG=$G$9!#(B

$B#1!K(Bgnspool $B$N<B9T(B
gnspool $B$r<B9T$7!"5-;v$r%m!<%+%k%G%#%9%/$K<h$j4s$;$^$9!#(B

$B#2!K(BGNUS $B$N@_Dj(B
 $B4pK\E*$J(B GNUS $B$N@_Dj$O40N;$7$F$$$k$3$H$rA0Ds$H$7$^$9!#(B

 $B0J2<$N$h$&$J%3!<%I$r(B .emacs $B$KDI2C$7$^$9!#(B

 (defun gnus-gnspool ()
   "GNUS (with gnspool)"
     (interactive)
     (setq gnus-nntp-server nil)
     (setq gnus-nntp-service nil)
     (gnus))

$B#3!K(BGNUS $B$N<B9T(B
M-x gnus-gnspool<CR>
$B$r<B9T$7$^$9!#(B

$B#4!K%G%#%l%/%H%j$NJQ99(B
gnspool $B$O!"(B
$B!&%K%e!<%9$N5-;vMQ$K(B /usr/spool/news $B$r!"(B
$B!&%K%e!<%9$N4IM}MQ$K(B /usr/lib/news $B$r(B
$B;H$$$^$9!#(B
$BJQ99$7$?$$>l9g$O(B gnrc $B$G(B NEWSLIB NEWSSPOOL$B$r;XDj$7$^$9!#(B

$BNc!K(B
$B%K%e!<%9$N5-;vMQ$K(B /var/spool/news $B$r!"(B
$B%K%e!<%9$N4IM}MQ$K(B /var/lib/news $B$r;H$&(B
NEWSSPOOL/var/spool/news
NEWSLIB/var/lib/news

NEWSLIB$B!"(BNEWSSPOOL $B$rJQ99$7$?>l9g$O!"(BGNUS $BB&$bF1$8%G%#%l%/%H%j(B
$B$r8+$k$h$&$K@_Dj$,I,MW$G$9!#(B
$B>\$7$/$O(B nnspool.el $B$N$O$8$a$NItJ,$r$4Mw2<$5$$!#(B

$BNc!K(B
(setq nnspool-spool-directory "/var/spool/news")
(setq nnspool-active-file "/var/lib/news/active")
(setq nnspool-newsgroups-file "/var/lib/news/newsgroups")
(setq nnspool-history-file "/var/lib/news/history")

$B#5!K%]%9%H!?%U%)%m!<(B
src $B$K(B gninews.c $B$H$$$&(B gnspool $BMQ(B inews $B$b$I$-$N%=!<%9$r$*(B
$B$$$F$"$j$^$9!#$3$N%=!<%9$r%3%s%Q%$%k$7!"(B
/usr/local/bin/gninews $BEy$H$7$FCV$-!"(B
$B$=$N%Q%9$r(B news-inews-program $B$K@_Dj$7$^$9!#(B
$BNc!K(B
(setq news-inews-program "/usr/local/bin/gninews")

$B%K%e!<%9$N5-;vMQ$N%G%#%l%/%H%j$r(B /usr/spool/news $B0J30$K$7$F$$(B
$B$k>l9g$O!"$"$i$+$8$a4D6-JQ?t(B NEWSSPOOL $B$X@_Dj$,I,MW$G$9!#(B
$BNc!K(B
setenv NEWSSPOOL /var/spool/news

$B#6!K%j%W%i%$!?%a%$%k(B
$B%a%$%k$rAw$k>l9g$O!"(Bsendmail.el $B$d(B mh-e $B$r;HMQ$7$^$9!#(B
$B%*%U%i%$%s$G$O;HMQ$G$-$^$;$s!#(B
$B%*%U%i%$%s$N>l9g!"%j%W%i%$$7$?$/$J$C$?$i!"(B
gnus-summary-mark-as-unread-forward (u) $B$7$F$*$$$F!"8e$G%M%C%H(B
$B%o!<%/$K$D$J$$$@;~$K%j%W%i%$$7$^$9!#(B

inews $B$HF1$8$h$&$K!"(Bsendmail $B$b$I$-$r:n$C$F$b$$$$$N$G$9$,!"(B
Nemacs/mule $B$N%a!<%i$,(B sendmail $B$r;H$&$H$b8B$i$J$$$N$G!"!"!"(B

rmail(sendmail.el) $B$J$i!"(B
$B!&(Bgninews.c $B$r(B gnmail.c $B$K%3%T!<(B
$B!&%=!<%9$N0lIt=$@5(B
   strcat(buf,"news.out");
         |     ~~~~
 V
   strcat(buf,"mail.out");
                       ~~~~
$B!&%3%s%Q%$%k(B
$B!&=PMh>e$,$C$?(B a.out $B$r(B /usr/local/bin/gnmail $B$H$9$k(B
$B!&(B(setq sendmail-program "/usr/local/bin/gnmail")
$B$G!"$G$-$k$H;W$$$^$9$,!"!"!"!"(B

(C) yamasita@omronsoft.co.jp
May.10,1995
$BCx:n8"$OJ|4~$7$^$;$s!#$?$@$7!"1DMxL\E*0J30$N;HMQ!?G[I[$K@)8B$O@_$1$^$;$s!#(B
----------------------------------------------------------------------
