diff -Nrc oneko/COPYRIGHTS oneko-2.0b-pop/COPYRIGHTS
*** oneko/COPYRIGHTS	Thu Jan  1 09:00:00 1970
--- oneko-2.0b-pop/COPYRIGHTS	Sat Aug  9 16:55:33 1997
***************
*** 0 ****
--- 1,88 ----
+ COPYRIGTHS of oneko-2.0
+ oneko-2.0 の 版権について
+ Aug 9,1997
+ Nobuyuki Sasaki <sasaki@thinkfree.co.jp>
+ 
+ 
+ このパッチを公開するにあたって、
+ oneko-2.0 の版権について確認しておきます。
+ 
+ 
+ ＜猫に歴史あり＞
+ 
+ oneko-2.0 は、
+ Tatsuya Kato <kato@ntts.co.jp>, 1990,1991.
+ さんによって作られました。
+ これは、xneko をベースに作成されました。
+ xneko オリジナルのコードを含んでいませんが、
+ 猫の絵のビットマップは、xneko のものをほぼそのまま使用しています。
+ 
+ xneko は 
+ 古場 正行さん
+ Masayuki Koba <masa-k@sag.hitachi-sk.co.jp>, 1990.
+ によって作られました。
+ この時に使用された猫の絵は、
+ マッキントッシュで動作する neko DA というソフトウエアのものです。
+ 
+ neko DA は、
+ 後藤 寿庵さん
+ juan@super.win.or.jp
+ によって作成されました。
+ この時に猫の絵は後藤さんによって誕生しました。
+ 猫の絵柄は、後藤さんのオリジナルです。
+ 
+ 
+ ＜版権の確認＞
+ 
+ 猫の絵の作者である後藤 寿庵さんからは、
+ 「絵の使用に関しては完全にフリーである。
+   フリーウエア作家が使用することは制限しない」
+ ことの確認を頂きました。(Aug 7, 1997)
+ 
+ xneko の作者である古場 正行さんからは、
+ 「猫の絵をビットマップ化したこと
+   ／猫の絵のアニメーションの切り替えタイミングをプログラム化したこと
+   に対する古場の権利は、放棄する」
+ ことの確認を頂きました。(Aug 7, 1997)
+ 
+ oneko の作者である Tatsuya Kato さんからは、
+ 「少なくとも、私の著作物（プログラム、ドキュメント）については、
+   著作人格権を行使いたしません。
+  （つまり、使用、改造、再配布等についてフリーです）」
+ ことの確認を頂きました。(Aug 6, 1997)
+ 
+ POP パッチの作者である ささき は、
+ 「パッチ部分については著作権を主張しません。
+   猫の声を含め配布、改造は自由ですが、できればパッチ全てを配布してください」
+ と宣言します。(aug 6, 1997)
+ 
+ 
+ つまり、ここに oneko-2.0 および POP パッチについては、
+ 絵柄・猫の鳴き声を含め、
+ 使用・配布・改造について全く自由であることが確認されました、
+ 
+ 
+ ＜お願いがあります＞
+ 
+ ここに示した oneko に関わる版権については、
+ 全て ささき が著作者に確認を取りました。
+ その結果フリーであることが確認されたわけですが、
+ 著作権者がその権利を行使しないことを宣言しても、
+ その著作権は著作者にあります。
+ 
+ そこでお願いです。
+ (強制するものではありませんし、できるものでもありませんが)
+ 
+ oneko を使用するときに、
+  ＜猫に歴史あり＞
+ に記載された著作者がいることを忘れないでください。
+ また、それぞれの製作に関わった、さまざまな人がいることも忘れないでください。
+ 
+ そして、もし oneko に改造等を加えて再配布する場合、
+ oneko の歴史に触れて欲しいのです。
+ 
+ これまでの猫の歴史に敬意を表し、ささやかなお願いです。
+ 
+ 
+ ささきのぶゆき  <sasaki@thinkfree.co.jp>
+ 
diff -Nrc oneko/Imakefile oneko-2.0b-pop/Imakefile
*** oneko/Imakefile	Tue Mar 17 23:08:48 1992
--- oneko-2.0b-pop/Imakefile	Wed Aug  6 18:01:01 1997
***************
*** 15,24 ****
    SYS_LIBRARIES = -lm
          DEPLIBS = $(DEPXLIB)
      CDEBUGFLAGS = -g
!         DEFINES = -DSHAPE -DONEKODIR=¥"$(ONEKOLIBDIR)¥" -DLIBDIR=¥"$(LIBDIR)¥"
  #       DEFINES = -DONEKODIR=¥"$(ONEKOLIBDIR)¥" -DLIBDIR=¥"$(LIBDIR)¥"
!            SRCS = oneko.c event.c init.c mail.c resource.c state.c
!            OBJS = oneko.o event.o init.o mail.o resource.o state.o
  
  ComplexProgramTarget(oneko)
  
--- 15,24 ----
    SYS_LIBRARIES = -lm
          DEPLIBS = $(DEPXLIB)
      CDEBUGFLAGS = -g
!         DEFINES = -DPOP -DMAILACTION -DSHAPE -DONEKODIR=¥"$(ONEKOLIBDIR)¥" -DLIBDIR=¥"$(LIBDIR)¥"
  #       DEFINES = -DONEKODIR=¥"$(ONEKOLIBDIR)¥" -DLIBDIR=¥"$(LIBDIR)¥"
!            SRCS = oneko.c event.c init.c mail.c resource.c state.c action.c
!            OBJS = oneko.o event.o init.o mail.o resource.o state.o action.o
  
  ComplexProgramTarget(oneko)
  
diff -Nrc oneko/README.pop oneko-2.0b-pop/README.pop
*** oneko/README.pop	Thu Jan  1 09:00:00 1970
--- oneko-2.0b-pop/README.pop	Fri Aug 15 01:59:09 1997
***************
*** 0 ****
--- 1,211 ----
+ 		oneko - Neko runs over the windows.
+ 		‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾
+ 			   Version 2.0 beta
+ 			    March 3rd 1992
+ 
+ 			    Aug 9th 1997	(pop-1.1.1)
+ 			    POP by Nobuyuki Sasaki (sasaki@thinkfree.co.jp)
+ 
+ 
+ これは oneko 2.0 にある biff 機能を POP 対応にしたものです。
+ また、同時にメール到着時にコマンドを起動する機能を付け加えてあります。
+ 
+ オリジナルのソースパッケージは、
+  Niftyserve UNIXフォーラム LIB 9 (X Window Contrib) #96 
+ に登録されています。
+ また、私の WEBページ
+  http://www02.so-net.or.jp/‾nsasaki/oneko/
+ にも置いておきます。
+ 
+ 私が追加した機能 (POP 対応、コマンド実行) についての問い合わせを、
+ sasaki@thinkfree.co.jp 以外に送ることはおやめ下さい。
+ 
+ このパッチは、猫の鳴き声を含め改造・再配布自由とします。
+ できるだけパッチ全てを配布してください。
+ 特に私に連絡していただく必要はありません。
+ # おもしろい改造・バグフィックスをしたなら、知らせて頂けると喜びます。
+ 
+ oneko には、深い歴史があります。
+ オリジナルについての版権を再確認した、
+ COPYRIGHTS も参照してください。
+ 
+ 
+ ＜なにが新しいのか？＞
+ 
+ Aug 9th 1997	(pop-1.1.1)
+ ・オリジナルの版権について確認し、COPYRIGHTS を書き足しました
+   (つまるところドキュメントの改版だけなんです…)
+ 
+ Aug 5th 1997	(pop-1.1)
+ ・メールチェック時のタイマ動作を見直し、アボートしなくなりました。
+ ・メールチェックの間隔を実用上問題ないだけ長く設定できるようになりました。
+ ・再配布について書き足しました
+ 
+ May 30th 1997	(pop-1.0)
+ ・あの名作 oneko が、pop な oneko になりました。
+   遠いところのメールも調べてきます。
+   鳴いて知らせることもできます。
+ 
+ 
+ ＜patch の方法＞
+ 
+ 0. このファイルにふくまれているものを確認してください
+ 	README.pop		(このファイル)
+ 	oneko-2.0b-pop1.1.patch	(パッチファイル)
+ 	oneko2.au		(於吉の鳴き声 sun 8bit-law)
+ 
+ 1. oneko のオリジナルソースを適当なディレクトリに展開してください。
+ 
+ 2. oneko の見えるディレクトリで、パッチをあててください。
+ 	patch -p < oneko-2.0b-pop1.1.patch
+ 
+ 
+ 
+ ＜make の方法＞
+ 
+ make の方法は基本的にオリジナルと同様です。
+ オリジナルは SunOS4.x, FreeBSD 等で動作するようになってます。
+ 
+ Imakefile の DEFINES に、次のものを指定することができます。
+ -DPOP:		POP 機能を有効にします。
+ -DMAILACTION:	メール到着時のコマンド起動機能を有効にします。
+ 
+ define しなければ、機能的にはオリジナルと全く変わりません。
+ 
+ 適当な DEFINES を指定した後、オリジナル同様に make してください。
+ -DPOP -DMAILACTION は、パッチをあてると自動的に定義されます。
+ 
+ 
+ 
+ ＜使用方法＞
+ 
+ 追加されているリソースがあります。
+ 
+ Oneko.Popserver:        hostname
+ Oneko.Mailaction:       command arg1 arg2 ...
+ 
+ Popserver には、POP サーバー名を指定します。
+ これを指定すると、POP 経由でのみ、メールチェックを行います。
+ 指定しなければ、オリジナル同様メールボックスディレクトリをチェックします。
+ 
+ Mailaction には、メール到着時に起動したいコマンドを指定します。
+ 引数がある場合でも、リテラルで囲む必要はありません。
+ # とゆーか、書くと動きません。
+ 
+ これらはデフォルトの Oneko.ad には含めてありません。
+ 各自の .Xdefaults 内で指定するか、
+ デフォルトのリソースファイルに書き足してください。
+ 
+ 私が Solaris2.4 上で指定しているものを例として記述しておきます。
+ 
+ Oneko*Popserver:	pop.thinkfree.co.jp
+ Oneko*Mailaction:	/usr/bin/audioplay -v30 /usr/local/lib/oneko/oneko2.au
+ 
+ 
+ メールチェックの間隔はオリジナル同様 Update リソースに設定します。
+ POP 経由の場合、メールチェックのたびに認証を行うため、
+ サーバーに負荷がかかりやすくなります。
+ 
+ Oneko.Update:        180
+ 
+ くらいを指定しておくほうが良いかもしれません。
+ (＜認識している問題＞も参照してください)
+ 
+ 
+ POP サーバーに対する認証ユーザー情報は、
+  $HOME/.netrc 
+ に記述します。
+ ftp 等でも使用するファイルです。
+ machine popserver login myname password mypassword
+ のように記述します。
+ account と macdef タグは無視するようにしたつもりですが、確認していません。
+ 
+ このファイルのパーミッションは 0600 でなければなりません。
+ 
+ 詳細は man netrc してください。
+ 
+ 
+ 
+ POP サーバーのサービスポートとして、"pop3" または "pop" を探します。
+ 名前からポートが引けない場合、ワーニングを出しメールチェックをしません。
+ 
+ 
+ 
+ ＜認識している問題＞
+ 
+ Oneko.Update の値は、オリジナルでは、
+  1800 とかの値にすると内部での計算時に変数の格納範囲を越え、
+ 正しく動作しませんでした。
+ これをある程度の範囲で正常に動作するようにしました。
+ 86400 秒 (24時間) 以上に設定できますので、実用上問題ないはずです。
+ しかし、オリジナルのコードに対しいい加減なつじつま合わせをしているため、
+  Oneko.Intervaltime
+ の値を 1000マイクロ秒以下にできません。
+  Oneko.Intervaltime > 1000 
+ という制限が新たに加わってしまいました。
+ (実用上の問題にはならないと思ってますが)
+ 
+ メールチェック時、インターバルタイマを止めているため、
+  oneko はちょっとだけ止まるかもしれません。
+ 
+ .netrc による認証方法は、好ましいものではありません。
+ APOP とかを実装すべきかもしれません。
+ IMAP ってのもいいかもしれません。
+ 
+ 
+ 
+ ＜追記＞
+ 
+ 製作の動機は「oneko に鳴いてもらおう」ということでした。
+ 
+ そのため、数年前に鳴く部分だけを書きました。
+ 当時仕事で SPARCstation の AUDIO デバイスをいぢっていたこともあり、
+ SPARCstation に依存した音声出力ルーチンを書いて実装していました。
+ 
+ ある日、会社のメールサーバーを POP 経由のみに統一化したため、
+ NFS マウントでチェックしていた oneko は鳴かなくなってしまいました。
+ 
+ ついでに FreeBSD を使いはじめたこともあり、
+ どちらでも鳴くようにしたいと思い、
+ 音声出力を外部化し、POP の実装に至ったわけです。
+ 
+ そのため、動作の確認は 
+  Solaris2.4 + gcc-2.6.3
+  FreeBSD2.1.5 + gcc2.6.3
+ でしか行っていません。
+ POP サーバーとして使ったのは qpopper-2.1.4R のみです。
+ それ以外の環境では試していません。
+ 
+ 猫の鳴き声は「於吉(おきち)」という名前の現在 7歳の猫の声です。
+ 大変な内弁慶猫なので、声だけでもいろいろなところを旅行してほしいのです…
+ 
+ こんなパッチで楽しんで頂ければ本望です。
+ 
+ 
+ ＜謝辞＞
+ 
+ 今まで xneko, oneko の開発に携わった方々、楽しませて頂いています。
+ ありがとうございます。
+ 
+ neko DA 原作の後藤さん <juan@super.win.or.jp> には、
+ 猫の絵の使用について助言を頂きました。
+ 
+ xneko 原作の古場さん <masa-k@sag.hitachi-sk.co.jp> には、
+ 猫の歴史について助言を頂きました。
+ 
+ oneko 原作の加藤さん <kato@lemon.ifnet.or.jp> は、
+ oneko-2.0 オリジナルの再配布を快諾してくださいました。
+ 
+ 山田 泰司さん <taiji@aihara.co.jp> には、
+ pop 動作時のサーバーへの接続不具合、更新タイマ不具合について助言を頂き、
+ 試験に協力して頂きました。
+ ありがとうございました。
+ 
+  
+ ＜作ったひと＞
+ 
+ 佐々木伸幸(ささきのぶゆき)
+ 	saaski@thinkfree.co.jp
+ 	nsasaki@da2.so-net.or.jp
+ 	HAG05226@niftyserve.or.jp
+ 
diff -Nrc oneko/action.c oneko-2.0b-pop/action.c
*** oneko/action.c	Thu Jan  1 09:00:00 1970
--- oneko-2.0b-pop/action.c	Sun Jun  1 00:45:32 1997
***************
*** 0 ****
--- 1,61 ----
+ /*
+ *	execute command when mail arrived
+ *
+ */
+ #ifdef	MAILACTION
+ #include <stdio.h>
+ #include <errno.h>
+ #include <stdlib.h>
+ #include <signal.h>
+ #include <string.h>
+ 
+ 
+ char	*MailActionCmd = NULL;
+ 
+ void	sigchld_handler()
+ {
+ 	int	stat;
+ 
+ 	wait(&stat);
+ 	signal(SIGCHLD, sigchld_handler);
+ 	return;
+ }
+ 
+ 
+ void	MailAction(void)
+ {
+ 	int	pid;
+ 	char	*argv[20];
+ 	int	argc = 0;
+ 	char	buf[256];
+ 	char	*p;
+ 
+ 	if ( MailActionCmd==NULL )	return;
+ 
+ 	signal(SIGCHLD, sigchld_handler);
+ 
+ 	if ( (pid=fork())<0 )		return;
+ 	else if ( pid>0 )		return;
+ 
+ 
+ 	strcpy(buf, MailActionCmd);
+ 
+ 	argc = 0;
+ 
+ 	for(p=strtok(buf, " ¥t"); p; p=strtok(NULL, " ¥t") ){
+ 		argv[argc++] = p;
+ 	}
+ 
+ 	if ( argc>0 ){
+ 		argv[argc++] = NULL;
+         	pid = execv(argv[0], argv);
+ 		if ( pid<0 ){
+ 			fprintf(stderr,"%s: cannot exec¥n", argv[0]); 
+ 		}
+ 	}
+ 
+ 
+ 	exit(0);
+ }
+ 
+ #endif
diff -Nrc oneko/mail.c oneko-2.0b-pop/mail.c
*** oneko/mail.c	Wed Jun  9 18:24:14 1993
--- oneko-2.0b-pop/mail.c	Wed Aug  6 18:01:01 1997
***************
*** 15,20 ****
--- 15,30 ----
  #include <sys/types.h>
  #include <sys/stat.h>
  
+ #ifdef	POP
+ #include <stdlib.h>
+ #include <string.h>
+ #include <ctype.h>
+ #include <errno.h>
+ #include <sys/socket.h>
+ #include <netinet/in.h>
+ #include <netdb.h>
+ #endif
+ 
  #include "oneko.h"
  
  #ifndef MAILBOX_DIRECTORY
***************
*** 33,42 ****
--- 43,67 ----
  #endif /* i386 */
  #endif /* MAILBOX_DIRECTORY */
  
+ #ifdef	POP
+ static int  popClose(int);
+ static int  popOpen(char *hostname);
+ static int  popAuth(int s, char *user, char *pass);
+ static int  popStat(int s);
+ static int  popQuit(int s);
+ static int  popNetrc(char *hostname, char *user, char *pass);
+ static int  fgetw(char *buf, FILE *fp);
+ static int  getServer(int fd, char *buf, int n);
+ static int  putServer(int fd, char *buf);
+ #endif
+ 
  long            MailCount;
  long            UpdateTime;
  Bool            MailArrive = False;
  char           *MailFile;
+ #ifdef	POP
+ char           *PopServer = NULL;
+ #endif
  
  
  void
***************
*** 62,77 ****
  MailCheck()
  {
      struct stat     file_stat;
  
      if (--MailCount > 0) {
  	return;
      }
  
!     MailCount = (int) ((UpdateTime * 1000000) / IntervalTime);
  
!     if ((stat(MailFile, &file_stat) == 0)
! 	&& (file_stat.st_size != 0)) {
  	if (MailArrive == False) {
  	    ToyAppear(&Post, Post.x, Post.y);
  	}
  	MailArrive = True;
--- 87,139 ----
  MailCheck()
  {
      struct stat     file_stat;
+     struct itimerval value;
+ 
  
      if (--MailCount > 0) {
  	return;
      }
  
!     MailCount = (int) ( (UpdateTime*1000) / (IntervalTime/1000) );
! 
!     /* clear interval timer	*/
!     timerclear(&value.it_interval);
!     timerclear(&value.it_value);
!     (void) setitimer(ITIMER_REAL, &value, (struct itimerval *) 0);
  
! #ifdef	POP
!     if ( (!PopServer) 
! 	&& (stat(MailFile, &file_stat) == 0) 
! 	&& (file_stat.st_size != 0) ){
! 	if (MailArrive == False) {
! #ifdef	MAILACTION
! 	    MailAction();
! #endif
! 	    ToyAppear(&Post, Post.x, Post.y);
! 	}
! 	MailArrive = True;
!     }
!     else if ( PopServer && popMailCheck()>0 ){ 
! 	if (MailArrive == False) {
! #ifdef	MAILACTION
! 	    MailAction();
! #endif
! 	    ToyAppear(&Post, Post.x, Post.y);
! 	}
! 	MailArrive = True;
!     }
!     else {
! 	if (MailArrive == True) {
! 	    ToyDisappear(&Post);
! 	}
! 	MailArrive = False;
!     }
! #else	/* POP	*/
!     if ((stat(MailFile, &file_stat) == 0) && (file_stat.st_size != 0)) {
  	if (MailArrive == False) {
+ #ifdef	MAILACTION
+ 	    MailAction();
+ #endif
  	    ToyAppear(&Post, Post.x, Post.y);
  	}
  	MailArrive = True;
***************
*** 82,85 ****
--- 144,568 ----
  	}
  	MailArrive = False;
      }
+ #endif	/* POP	*/
+ 
+ 
+     /* reset interval timer	*/
+     value.it_interval.tv_usec = IntervalTime;
+     value.it_value.tv_usec = IntervalTime;
+     (void) setitimer(ITIMER_REAL, &value, (struct itimerval *) 0);
+ 
+ }
+ 
+ 
+ #ifdef	POP
+ int	popMailCheck()
+ {
+ 	int	s;
+ 	char	user[64];
+ 	char	pass[64];
+ 	int	nmail = 0;
+ 
+ 	if ( popNetrc(PopServer, user, pass)<0 ){
+ 		return(0);
+ 	}
+ 
+ 	if ( (s=popOpen(PopServer))<0 ){
+ 		return(0);
+ 	}
+ 
+ 	if ( popAuth(s, user, pass)<0 ){
+ 		popQuit(s);
+ 		popClose(s);
+ 		return(0);
+ 	}
+ 
+ 	nmail=popStat(s);
+ 
+ 	popQuit(s);
+ 	popClose(s);
+ 
+ 	return(nmail);
+ }
+ 
+ static int  popClose(s)
+ int	s;
+ {
+ 	if ( s>=0 ){
+ #ifdef	POPDEBUG
+ 		fprintf(stderr, "popClose: closed(%d)¥n", s);
+ 		fflush(stderr);
+ #endif
+ 		close(s);
+ 	}
+ 	return(0);
+ }
+ 
+ static	int	popOpen(hostname)
+ char	*hostname;
+ {
+ 	struct	sockaddr_in	addr;
+ 	struct	servent		*servent;
+ 	struct	hostent		*hostent;
+ 	long			inaddr;
+ 	int			s;
+ 
+ 	if ( !hostname || !*hostname ){
+ 		fprintf(stderr, "oneko: no POP server name¥n");
+ 		return(-1);
+ 	}
+ 
+ 	/* POP����������IP��������������	*/
+ 	memset(&addr, 0, sizeof(addr));
+ 	addr.sin_family = AF_INET;
+ 	if ( isdigit(*hostname) ){
+ 		if ( (inaddr=inet_addr(hostname))==(-1) ){
+ 			fprintf(stderr, "oneko: %s: illegal address¥n",
+ 								hostname);
+ 			return(-1);
+ 		}
+ 		memcpy(&addr.sin_addr, &inaddr, sizeof(inaddr));
+ 	}
+ 	else {
+ 		extern	int	h_errno;
+ 		if ( !(hostent=gethostbyname(hostname)) ){
+ 			fprintf(stderr, "oneko: %s: unknown host: err(%d)¥n", 
+ 							hostname, h_errno);
+ 			return(-1);
+ 		}
+ 		memcpy(&addr.sin_addr, hostent->h_addr, hostent->h_length);
+ 		addr.sin_family = hostent->h_addrtype;
+ 	}
+ 
+ 	/* pop������������������������	*/
+ 	if ( (servent=getservbyname("pop3", "tcp"))==NULL ){
+ 		if ( (servent=getservbyname("pop", "tcp"))==NULL ){
+ 			fprintf(stderr, "oneko: pop: unknown service.¥n");
+ 			return(-1);
+ 		}
+ 	}
+ 	addr.sin_port = servent->s_port;
+ 
+ 	/* ������	*/
+ 	if ( (s=socket(AF_INET, SOCK_STREAM, 0))<0 ){
+ 		perror("socket");
+ 		return(-1);
+ 	}
+ 
+ 	/* ������	*/
+ 	if ( connect(s, (struct sockaddr *)&addr, sizeof(addr))<0 ){
+ 		perror("connect");
+ 		close(s);
+ 		return(-1);
+ 	}
+ 
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "popOpen: connected %s(%d)¥n", hostname, s);
+ 	fflush(stdout);
+ #endif
+ 	return(s);
+ }
+ 
+ static int  popAuth(s, user, pass)
+ int	s;
+ char	*user, *pass;
+ {
+ 	char	buf[256];
+ 
+ 	if ( getServer(s, buf, sizeof(buf))<0 ){
+ 		return(-1);
+ 	}
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "%s¥n", buf);
+ 	fflush(stderr);
+ #endif
+ 
+ 	sprintf(buf, "USER %s", user);
+ 	if ( putServer(s, buf)<0 ){
+ 		return(-1);
+ 	}
+ 	if ( getServer(s, buf, sizeof(buf))<0 ){
+ 		return(-1);
+ 	}
+ 	if ( strncmp(buf, "-ER", 3)==0 ){
+ 		fprintf(stderr, "%s: unknown user¥n", user);
+ 		return(-1);
+ 	}
+ 
+ 	sprintf(buf, "PASS %s", pass);
+ 	if ( putServer(s, buf)<0 ){
+ 		return(-1);
+ 	}
+ 	if ( getServer(s, buf, sizeof(buf))<0 ){
+ 		return(-1);
+ 	}
+ 	if ( strncmp(buf, "-ER", 3)==0 ){
+ 		fprintf(stderr, "%s: auth failed¥n", user);
+ 		return(-1);
+ 	}
+ 
+ 	return(0);
+ }
+ 
+ static int  popStat(s)
+ int	s;
+ {
+ 	char	buf[128];
+ 	char	*p;
+ 
+ 	sprintf(buf, "STAT");
+ 	if ( putServer(s, buf)<0 ){
+ 		return(-1);
+ 	}
+ 	if ( getServer(s, buf, sizeof(buf))<0 ){
+ 		return(-1);
+ 	}
+ 	if ( strncmp(buf, "-ER", 3)==0 ){
+ 		return(-1);
+ 	}
+ 
+ 	if ( (p=strtok(buf," ¥t¥r¥n"))==NULL ){
+ 		return(-2);
+ 	}
+ 	if ( (p=strtok(NULL," ¥t¥r¥n"))==NULL ){
+ 		return(-2);
+ 	}
+ 
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "popStat: %d mails¥n", atoi(p));
+ 	fflush(stderr);
+ #endif
+ 
+ 	return(atoi(p));
+ }
+ 
+ static int  popQuit(s)
+ int	s;
+ {
+ 	char	buf[128];
+ 	char	*p;
+ 
+ 	sprintf(buf, "QUIT");
+ 	if ( putServer(s, buf)<0 ){
+ 		return(-1);
+ 	}
+ 	if ( getServer(s, buf, sizeof(buf))<0 ){
+ 		return(-1);
+ 	}
+ 	if ( strncmp(buf, "-ER", 3)==0 ){
+ 		return(-1);
+ 	}
+ 
+ 	return(0);
+ }
+ 
+ 
+ static int  popNetrc(hostname, user, pass)
+ char	*hostname, *user, *pass;
+ {
+ 	struct stat     file_stat;
+ 	FILE	*fp;
+ 	char	path[128];
+ 	char	mach[128];
+ 	char	defmach[128], defu[64], defp[64];
+ 	char	c;
+ 	char	*env; 
+ 
+ 	if ( !hostname || !*hostname ){
+ 		fprintf(stderr, "oneko: no POP server name¥n");
+ 		return(-1);
+ 	}
+ 	if ( (env = getenv("HOME"))==NULL ){
+ 		fprintf(stderr, "oneko: cannot find HOME directory¥n");
+ 		return(-1);
+ 	}
+ 
+ 	sprintf(path, "%s/.netrc", env);
+ 	if ( stat(path, &file_stat)<0 ){ 
+ 		return(-1);
+ 	}
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "popNetrc: %s: status(%08x)¥n", 
+ 					path, file_stat.st_mode);
+ #endif
+ 	if ( file_stat.st_mode & (S_IRWXG|S_IRWXO) ){ 
+ 		fprintf(stderr, "oneko: authinfo: dangerous permission.¥n");
+ 		return(-1);
+ 	}
+ 
+ 	if ( !(fp=fopen(path,"r")) ){
+ 		perror(path);
+ 		return(-1);
+ 	}
+ 
+ 	*user = *pass = *mach = '¥0';
+ 	*defu = *defp = '¥0';
+ 
+ 	while( fgetw(path, fp) ){
+ 		if ( strcmp("default", path)==0 ){
+ 			*user = *pass = *mach = '¥0';
+ 			strcpy(mach, "_default");
+ 		}
+ 		else if ( strcmp("machine", path)==0 ){
+ 			*user = *pass = *mach = '¥0';
+ 			if ( !fgetw(path, fp) ){
+ 				break;
+ 			}
+ 			if ( strcmp(hostname, path)==0 ){
+ 				strcpy(mach, path);
+ 			}
+ 		}
+ 		else if ( strcmp("login", path)==0 ){
+ 			if ( !fgetw(user, fp) ){
+ 				break;
+ 			}
+ 		}
+ 		else if ( strcmp("password", path)==0 ){
+ 			if ( !fgetw(pass, fp) ){
+ 				break;
+ 			}
+ 		}
+ 		else if (  strcmp("account", path)==0 
+ 			 ||strcmp("macdef", path)==0 ){
+ 			if ( !fgetw(path, fp) ){
+ 				break;
+ 			}
+ 		}
+ 
+ 		if ( *user && *pass && *mach ){
+ 			if ( strcmp(mach, "_default")==0 ){
+ 				strcpy(defu, user);
+ 				strcpy(defp, pass);
+ 				*user = *pass = *mach = '¥0';
+ 				continue;
+ 			}
+ 			break;
+ 		}
+ 	}
+ 	fclose(fp);
+ 
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "popNetrc: mach[%s] u[%s] p[%s] du[%s] dp[%s]s¥n", 
+ 					mach, user, pass, defu, defp);
+ #endif
+ 	if ( *mach && *user && *pass ){
+ 		return(0);
+ 	}
+ 	else if ( *defu && *defp ){
+ 		strcpy(user, defu);
+ 		strcpy(pass, defp);
+ 		return(0);
+ 	}
+ 
+ 	*user = *pass = *mach = '¥0';
+ 
+ 	fprintf(stderr, "oneko: %s: cannot get authinfo¥n", hostname);
+ 	return(-1);
+ }
+ 
+ static int  fgetw(buf, fp)
+ char	*buf;
+ FILE	*fp;
+ {
+ 	char	c;
+ 	int	inword = 0;
+ 
+ 	while( (c=fgetc(fp))!=EOF ){
+ 		if ( isspace(c) ){
+ 			if ( inword ){
+ 				break;
+ 			}
+ 			continue;
+ 		}
+ 		*buf = c;
+ 		buf++;
+ 		inword++;
+ 	}
+ 	*buf = '¥0';
+ 	return(inword);
+ }
+ 
+ 
+ static int  getServer (fd, buf, n)
+ int	fd;
+ char	*buf;
+ int	n;
+ {
+ 	char   *p;
+ 	int	len;
+ 	char	c;
+ 
+ 	p = buf;
+ 	while (1){
+ 		len = read(fd, &c, 1);
+ 		if ( len<0 ){
+ 			if ( errno==EINTR ) {
+ 				continue;
+ 			}
+ 			else {
+ 				perror("getServer");
+ 				return(-1);
+ 			}
+ 		}
+ 		else if ( len==0 ){
+ 			fprintf(stderr, "connection closed by foreign host¥n");
+ 			return(-1);
+ 		}
+ 		*p = c;
+ 		p++;
+ 		if ( c=='¥n' ){
+ 			break;
+ 		}
+ 	}
+ 
+ 	*p = '¥0';
+ 	len = strlen(buf);
+ 
+ 	if (*--p == '¥n'){
+ 		*p = '¥0';
+ 	}
+ 	if (*--p == '¥r'){
+ 		*p = '¥0';
+ 	}
+ 
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "getServer(%d): [%s]¥n", len, buf);
+ 	fflush(stdout);
+ #endif
+ 
+ 	return(len);
+ }
+ 
+ 
+ static  int  putServer (fd, buf)
+ int	fd;
+ char	*buf;
+ {
+ 	char	command[128];
+ 	int	len;
+ 
+ 	sprintf(command, "%s¥r¥n", buf);
+ 
+ 	while ( (len=write(fd, command, strlen(command)))<0 ){
+ 		if ( errno==EINTR ){
+ 			continue;
+ 		}
+ 		else {
+ 			perror("putServer");
+ 			return(-1);
+ 		}
+ 	}
+ 
+ 	if (len == 0) {
+ 		fprintf(stderr, "connection closed by foreign host¥n");
+ 		return(-1);
+ 	}
+ 
+ #ifdef	POPDEBUG
+ 	fprintf(stderr, "putServer(%d): [%s]¥n", len, buf);
+ 	fflush(stdout);
+ #endif
+ 
+ 	return(len);
  }
+ #endif	/* POP	*/
diff -Nrc oneko/oneko.h oneko-2.0b-pop/oneko.h
*** oneko/oneko.h	Tue Mar 17 23:09:38 1992
--- oneko-2.0b-pop/oneko.h	Mon May 19 19:40:46 1997
***************
*** 95,100 ****
--- 95,108 ----
  extern Bool     AutoRaise;		/* auto raise		 */
  extern char    *Geometry;		/* post geometry	 */
  
+ #ifdef	MAILACTION
+ extern char    *MailActionCmd;		/* mail action command	 */
+ #endif
+ 
+ #ifdef	POP
+ extern char    *PopServer;		/* pop service hostname	 */
+ #endif
+ 
  extern Toy      Toys[];			/* 0 := Post, 1 := Kotatsu */
  
  extern Pixmap   NekoSave;		/* copy neko pixmap	 */
diff -Nrc oneko/patchlevel.h oneko-2.0b-pop/patchlevel.h
*** oneko/patchlevel.h	Tue Mar 17 23:09:45 1992
--- oneko-2.0b-pop/patchlevel.h	Wed Aug  6 18:01:01 1997
***************
*** 1,4 ****
  /* $Id: patchlevel.h,v 1.9 1992/03/17 14:08:41 kato Exp kato $ */
  #define VERSION 2
! #define MINOR_VERSION "00 beta"
  #define PATCHLEVEL 5
--- 1,4 ----
  /* $Id: patchlevel.h,v 1.9 1992/03/17 14:08:41 kato Exp kato $ */
  #define VERSION 2
! #define MINOR_VERSION "00 beta with pop1.1"
  #define PATCHLEVEL 5
diff -Nrc oneko/resource.c oneko-2.0b-pop/resource.c
*** oneko/resource.c	Tue Mar 17 23:09:52 1992
--- oneko-2.0b-pop/resource.c	Fri May 30 19:12:19 1997
***************
*** 11,17 ****
  #include <stdio.h>
  #include <ctype.h>
  #include <string.h>
! #ifndef SYSV
  #include <strings.h>
  #endif /* SYSV */
  #include <sys/param.h>
--- 11,17 ----
  #include <stdio.h>
  #include <ctype.h>
  #include <string.h>
! #if	(!defined(SYSV) && !defined(SVR4))
  #include <strings.h>
  #endif /* SYSV */
  #include <sys/param.h>
***************
*** 21,27 ****
  #include "oneko.h"
  #include "patchlevel.h"
  
! #ifdef SYSV
  #define	rindex(a, b)	strrchr(a, b)
  #endif /* SYSV */
  
--- 21,27 ----
  #include "oneko.h"
  #include "patchlevel.h"
  
! #if	(defined(SYSV) || defined(SVR4))
  #define	rindex(a, b)	strrchr(a, b)
  #endif /* SYSV */
  
***************
*** 117,122 ****
--- 117,128 ----
      {"+autoraise", ".autoraise", XrmoptionNoArg, (caddr_t) "off"},
      {"-file", ".file", XrmoptionSepArg, (caddr_t) NULL},
      {"-geometry", ".post.geometry", XrmoptionSepArg, (caddr_t) NULL},
+ #ifdef	MAILACTION
+     {"-mailaction", ".mailaction", XrmoptionSepArg, (caddr_t) NULL},
+ #endif
+ #ifdef	POP
+     {"-popserver", ".popserver", XrmoptionSepArg, (caddr_t) NULL},
+ #endif
  };
  
  #define optionNum (sizeof optionRec / sizeof optionRec[0])
***************
*** 187,192 ****
--- 193,204 ----
      {"file", "File", type_string, NULL, (caddr_t *) &MailFile},
      {"post.geometry", "Post.Geometry", type_string, GEOMETRY,
  						(caddr_t *) &Geometry},
+ #ifdef	MAILACTION
+     {"mailaction", "Mailaction", type_string, NULL, (caddr_t *) &MailActionCmd},
+ #endif
+ #ifdef	POP
+     {"popserver", "Popserver", type_string, NULL, (caddr_t *) &PopServer},
+ #endif
  };
  
  #define NARGVARS (sizeof resourceValuses / sizeof resourceValuses[0])