namazu-ml(avocado)

[Toshiaki Tanaka <toshiaki@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>]

　まいど、田中＠東芝です。

Ken-ichi Hirose <hirose@xxxxxxxxxxxxxxxxxxxx> writes:

> ちなみに 
> $ perl c:/local/namazu/bin/mknmz ./
>                                  ^^^ 
> とやるとどうなります？

　ご想像通り変わりませんです、ハイ。

　で、昨夜の調査報告です。
[結果]
　perlとbashの組合せ(On Windows95?)が怪しいような気がする。
そうでなければ、のろわれた環境を作った私の脳みそ :-P 。
# WindowsNTで動くんなら、perl/bashとWin95の相性か？

[調査経過(長いです)]
　Flist作った時点でその内容をファイルにはかせてみるとドライ
ブレターの大小文字くらいしか差がありません。
# ちなみに、DOSでは大文字/bashでは小文字。

---ttt.bin---
0000000 3a64 615c 6372 6968 6576 6c5c 636f 6c61
         d  :  \  a  r  c  h  i  v  e  \  l  o  c  a  l
0000020 725c 6366 6a2d 5c61 6672 3163 3139 2d38
         \  r  f  c  -  j  a  \  r  f  c  1  9  1  8  -
0000040 706a 742e 7478 640a 5c3a 7261 6863 7669
         j  p  .  t  x  t \n  d  :  \  a  r  c  h  i  v
　　　：
　　　：
---END---

---Flistをファイルにかき出す---
@@ -1002,6 +1008,13 @@
 	print "No files to index.\n";
 	exit;
     }
+
+### toshiaki
+open( TOS, ">ttt.bin") || die;
+binmode(TOS);
+print TOS @FList;
+close(TOS);
+
     $file_segment = &appendprepare if -e $REGLIST;
     unless ($mode) {       # パスを削除する
 	my ($tmp);
---END---

　ところが、メインループ中のnamazu_coreを呼び出す直前で対象
ファイル名を表示させると、最後のファイルの時のみファイル名が
なくなります(改行の仕方も変)！！次の例では、上記の出力ファイ
ルにはthreads.htmlが対象として含まれているのですが、下記実行
ログではファイル名すら表示されません。

---実行ログ---
mainloop: .\index.html

0 /d|/archive/html/ml.1998/index.html is MHonArc's index
          file! skipped.

mainloop: .\msg00000.html

0 /d|/archive/html/ml.1998/msg00000.html
mainloop: .\msg00001.html

1 /d|/archive/html/ml.1998/msg00001.html
mainloop: .\msg00002.html
　　　：
　　　：
75 /d|/archive/html/ml.1998/msg00075.html
mainloop: ←←←←←←←ここ！！
76  is 0 size! skipped.
---END---

---対象ファイル名の表示---
@@ -323,6 +323,8 @@
     $swap = 1;
     $file_count = 0;
     foreach $cfile (@FList) {
+### toshiaki
+printf("mainloop: %s\n", $cfile);
 	# 各ファイルの処理を行い、エラーなら @FList の登録を削除すべし
 	$cfile_size = &namazu_core($cfile, $file_count, $file_segment);
 	unless ($cfile_size) {
---END---

　perlとbashの組合せ(On Windows95?)が問題なのかもしれません
ね。ということで、完全に諦めました。
                  ^^^^^^^^^^^^^^^^--手の出しようがない...。

　ということで、一件落着(?)とします。お騒がせしました。
--
Toshiaki Tanaka<toshiaki@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>
   TEL: +81-78-435-3015, FAX: +81-78-435-3156