[mew-dist 18577] race condition about immknmz

[Koga Youichirou]

すでに obsolete かもしれない IM の話ですが、namazu を使っていて
immknmz を使っている人はまだまだいると思うので。

immknmz では一時ファイルとして /tmp/immknmz_temporary_file を使って
いますが、この扱いに race condition の問題があります、きっと。

ということで、暫定パッチです。

--- immknmz.in.ORG	Mon Feb 28 12:54:19 2000
+++ immknmz.in	Mon Aug 27 14:19:52 2001
@@ -31,6 +31,7 @@
 use IM::Config;
 use IM::Util;
 use IM::Folder;
+use IO::File;
 use strict;
 use vars qw($Prog $EXPLANATION @OptConfig $opt_help $opt_gcnmz $opt_verbose);
 
@@ -115,7 +116,8 @@
 	}
 
 	if ( scalar(@filelist) > 0 ){
-	    im_open(\*TEMPFILE,">$tempfile");
+	    sysopen(\*TEMPFILE, "$tempfile", O_CREAT|O_EXCL|O_RDWR, 0600) || die;
+	    binmode(\*TEMPFILE);
 	    foreach ( @filelist ){
 		if (!-d "$msgdir/$_"){
 		    if ((&win95p() || &os2p()) && !&namazuv2()){

----
先週から namazu 使い始めた こがよういちろう