[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Print FTP directory list when dump_extra option is set
dump_extra オプションを指定して ftp://... にアクセスした場合に，そのディ
レクトリのファイルリストを出力するようにするパッチです．例えば，以下の
ような出力が得られるようになります．
% w3m -dump_extra ftp://ftp.m17n.org/
W3m-current-url: ftp://ftp.m17n.org/
W3m-document-charset: EUC-JP (internal)
<html><head><title>ftp://ftp.m17n.org/</title></head><body><h1>Index of ftp://ftp.m17n.org/</h1>
<pre><a href="ftp://ftp.m17n.org/">[Upper Directory]</a>
<a href="ftp://ftp.m17n.org/bin">bin@</a>. . . . Mar 29 2001 -
<a href="ftp://ftp.m17n.org/dev">dev/</a>. . . . Mar 29 2001 -
<a href="ftp://ftp.m17n.org/etc">etc/</a>. . . . Mar 29 2001 -
<a href="ftp://ftp.m17n.org/pub">pub/</a>. . . . Nov 5 13:46 -
<a href="ftp://ftp.m17n.org/usr">usr/</a>. . . . Mar 29 2001 -
<a href="ftp://ftp.m17n.org/welcome.msg">welcome.msg</a> Mar 29 2001 0
</pre></body></html>
この変更をして頂けると，emacs-w3m で ftp にアクセスする必要が生じた場
合に大変便利なので，是非，採用の検討をお願いします．
Index: main.c
===================================================================
RCS file: /cvsroot/w3m/w3m/main.c,v
retrieving revision 1.56
diff -u -u -r1.56 main.c
--- main.c 2002/01/10 15:39:21 1.56
+++ main.c 2002/01/11 04:39:36
@@ -996,6 +996,13 @@
{
FILE *f;
char c;
+ if ((w3m_dump & DUMP_EXTRA) && (buf->real_scheme == SCM_FTPDIR)) {
+ extern Str FTPDIRtmp;
+ if (FTPDIRtmp->length > 0) {
+ Strfputs(FTPDIRtmp, stdout);
+ }
+ return;
+ }
if (buf->sourcefile == NULL)
return;
f = fopen(buf->sourcefile, "r");
--
土屋 雅稔 ( TSUCHIYA Masatoshi )