Initial revision

This commit is contained in:
Akinori Ito
2001-11-08 05:14:08 +00:00
commit 68a07bf03b
305 changed files with 104639 additions and 0 deletions

75
w3m-doc/README.html Normal file
View File

@@ -0,0 +1,75 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>w3m $B%I%-%e%a%s%H@0Hw$NJ}?K(B</TITLE>
</HEAD>
<BODY>
<DIV ALIGN="center">
w3m $B%I%-%e%a%s%H@0Hw$NJ}?K(B
</DIV>
<DIV ALIGN="right">
Yoshinobu Sakane February 15, 2001
</DIV>
<OL>
<H1><LI>$BJ}?K(B</H1>
<DIV>
<P>
w3m$B$K4X$9$k%I%-%e%a%s%HN`$r0J2<$NJ}?K$G@0Hw$7$?$$$H9M$($F$$$^$9!#(B
<P>
<UL>
<LI>$B8=;~E@(B(w3m-0.1.11-pre)$B$G;6J8$7$F$$$k%I%-%e%a%s%H$r0lDj$N%k!<%k$N$b$H$K$^$H$a$k(B
<LI>$BF~LgDxEY$N%I%-%e%a%s%H$H?<$_$K$O$a$k(B:-)$B$?$a$N%I%-%e%a%s%H$rMQ0U$9$k(B
<LI>HTML$BHG$H%W%l%$%s%F%-%9%HHG$rMQ0U$9$k!#$?$@$7!"%=!<%9$H$J$k%I%-%e%a%s%H$O0l$D(B
</UL>
</DIV>
<BR>
<H1><LI>$B9|AH$_%I%-%e%a%s%H$N@bL@(B</H1>
<DIV>
<P>
<TABLE BORDER>
<CAPTION>$B!T%3%s%F%s%D!U(B</CAPTION>
<TR>
<TD><A HREF="w3mdoc.pl">w3mdoc.pl</A></TD>
<TD><A HREF="http://www2u.biglobe.ne.jp/~hsaka/">$B:dK\$5$s(B</A>$B$46`@=$N(Bperl$B%9%/%j%W%H(B</TD>
<TR>
<TD><A HREF="mkdocs">mkdocs</A></TD>
<TD>$B%I%-%e%a%s%H@07AMQ%7%'%k%9%/%j%W%H(B</TD>
<TR>
<TD>README.html</TD>
<TD>$B$3$N%U%!%$%k(B</TD>
<TR>
<TD>*.html.in</TD>
<TD>$B3F>O!?@aKh$N%I%-%e%a%s%H%=!<%9(B</TD>
<TR>
<TD>*.wd</TD>
<TD>$B3F<oDj5A%U%!%$%k(B</TD>
</TABLE>
<P>
w3mdoc.pl$B$N;H$$J}$K$D$$$F$O!":dK\$5$s$,=q$+$l$?(B<A HREF="sample/README">README</A>$B!"5Z$S!"%5%s%W%k%=!<%9$r;2>H$7$F$/$@$5$$!#(B<br>
</DIV>
<BR>
<H1><LI>$B%I%-%e%a%s%H@0Hw$N?J$aJ}(B</H1>
<DIV>
<P>
<UL>
<LI>$BM-;V(B($B0J9_!"(B<B>w3m-doc$B%a%s%P(B</B>$B$H5-$9(B)$B$K$h$kJ,3d:n6H(B
<LI>$BJ,3d$NC10L$O(Bw3m-doc$B%a%s%P4V$GD4@0(B
<LI>$B:#2s<($99|AH$_$O$"$/$^$G;X?K!#>u67!?ET9g$K$h$j(Bw3m-doc$B%a%s%P4V$GD4@0$7JQ99$9$k(B
<LI>$B$^$:$OF|K\8lHG$N%I%-%e%a%s%H$r:n$j!">u67$r8+$F1QLu$9$k(B
<LI>$B$"$kDxEY$G$-$?$H$3$m$+$i!"C`<!!"(Bw3m-dev ML$B%a%s%P$N%l%S%e!<$r<u$1$k(B
</UL>
<P>
$B$H!"9M$($F$$$^$9!#(B
</DIV>
</OL>
</BODY>
</HTML>

45
w3m-doc/community.html.in Normal file
View File

@@ -0,0 +1,45 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>W3M&nbsp;COMMUNITY&nbsp;-w3m$B%3%_%e%K%F%#(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">w3m$B%3%_%e%K%F%#(B</A></H1>
<DIV>
<!-- w3m$B%3%_%e%K%F%#$K4X$7$F(B -->
</DIV>
<UL>
<LI><A HREF="#ML">$B%a!<%j%s%0%j%9%H(B</A>
<LI><A HREF="#links">$B4XO"(BWeb</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="ML">$B%a!<%j%s%0%j%9%H(B</A></H2>
<!-- w3m-dev, w3m-dev-en ML$B$N>R2p(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="links">$B4XO"(BWeb</A><H2>
<!-- w3m$B$K4X78$7$F$$$k(BWeb -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

View File

@@ -0,0 +1,90 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>CONFIGURATION&nbsp;-$B3F<o@_Dj(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">$B3F<o@_Dj(B</A></H1>
<DIV>
<!-- w3m$B$N3F<o@_Dj$N>\:Y$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#option">$B5/F0%*%W%7%g%s(B</A>
<LI><A HREF="#environment">$B4D6-JQ?t(B</A>
<LI><A HREF="#bookmark">bookmark$B%U%!%$%k(B</A>
<LI><A HREF="#option_panel">$B%*%W%7%g%s%Q%M%k(B</A>
<UL>
<LI><A HREF="#external_viewer">$B30It%S%e!<%"$NJT=8(B</A>
</UL>
<LI><A HREF="#other_customize">$B$=$NB>%+%9%?%^%$%:(B</A>
<UL>
<LI><A HREF="#keymap">keymap</A>
<LI><A HREF="#menu">menu</A>
</UL>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="option">$B5/F0%*%W%7%g%s(B</A></H2>
<!-- $B%*%W%7%g%s$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="environment">$B4D6-JQ?t(B</A><H2>
<!-- w3m$B$,;2>H$9$k4D6-JQ?t$K$D$$$F(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="bookmark">bookmark$B%U%!%$%k(B</A><H2>
<!-- bookmark$B%U%!%$%k$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="option_panel">$B%*%W%7%g%s%Q%M%k(B</A><H2>
<!-- $B%*%W%7%g%s%Q%M%k$K$D$$$F$N@bL@(B -->
<H3><A NAME="external_viewer">$B30It%S%e!<%"$NJT=8(B</A></H3>
<!-- $B30It%S%e!<%"$NJT=8$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="other_customize">$B$=$NB>%+%9%?%^%$%:(B</A><H2>
<!-- $B$=$NB>$N%+%9%?%^%$%:9`L\$K$D$$$F$N@bL@(B -->
<H3><A NAME="keymap">keymap</A></H3>
<!-- keymap$B$N%+%9%?%^%$%:$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H3><A NAME="menu">menu</A></H3>
<!-- menu$B$N%+%9%?%^%$%:$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

14
w3m-doc/contain.wd Normal file
View File

@@ -0,0 +1,14 @@
@define
DOC.index index.html
DOC.prologue prologue.html
DOC.copyright copyright.html
DOC.outline outline.html
DOC.detail detail.html
DOC.install install.html
DOC.operation operation.html
DOC.configuration configuration.html
DOC.function function.html
DOC.FAQ faq.html
DOC.developement developement.html
DOC.community community.html
@end

45
w3m-doc/copyright.html.in Normal file
View File

@@ -0,0 +1,45 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>COPYRIGHT&nbsp;-Copyright-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">Copyright</A></H1>
<DIV>
<!-- w3m$B$N(BCopyright$B$K4X$7$F(B -->
</DIV>
<UL>
<LI><A HREF="#copyright">$BCx:n8"!"%i%$%;%s%9(B</A>
<LI><A HREF="#thanks">$B<U<-(B</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="copyright">$BCx:n8"!"%i%$%;%s%9(B</A></H2>
<!-- w3m$B$NCx:n8"!"%i%$%;%s%9$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="thanks">$B<U<-(B</A><H2>
<!-- $B<U<-(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

4
w3m-doc/define.wd Normal file
View File

@@ -0,0 +1,4 @@
@define
W3M.version 0.1.11-pre+kokb24+test1
W3M.author Akinori ITO
@end

32
w3m-doc/detail.html.in Normal file
View File

@@ -0,0 +1,32 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>DETAIL&nbsp;-$B>\:YJT(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">$B>\:YJT(B</A></H1>
<DIV>
<!-- w3m$B$N3F<o5!G=$K$D$$$F$N>\:Y$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="@DOC.install@">$B%$%s%9%H!<%k$N>\:Y(B</A>
<LI><A HREF="@DOC.operation@">w3m$BA`:nK!(B</A> <!-- $B%-!<A`:n@bL@(B -->
<LI><A HREF="@DOC.configuration@">$B3F<o@_Dj(B</A>
<LI><A HREF="@DOC.function@">$B5!G=>\:Y(B</A>
<LI><A HREF="@DOC.FAQ@">FAQ</A>
<LI><A HREF="@DOC.developement@">$B3+H/%I%-%e%a%s%H(B</A>
<LI><A HREF="@DOC.community@">w3m $B%3%_%e%K%F%#(B</A>
<LI><A HREF="@DOC.copyright@">Copiright</A>
</UL>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

View File

@@ -0,0 +1,77 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>DEVELOPEMENT&nbsp;-$B3+H/%I%-%e%a%s%H(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">w3m$B3+H/%I%-%e%a%s%H(B</A></H1>
<DIV>
<!-- w3m$B$N3+H/$K4X$7$F$$$m$$$m$H5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#story">w3m$B$N3+H/$K$D$$$F(B</A>
<LI><A HREF="#known_bugs">$B8=:_H=L@$7$F$$$k%P%0(B</A>
<LI><A HREF="#ToDo">ToDo</A>
<LI><A HREF="#history">$BMzNr(B</A>
<LI><A HREF="#policy">$B3+H/%]%j%7!<(B</A>
<LI><A HREF="#tips">$B3+H/<T8~$1(BTips</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="story">w3m$B$N3+H/$K$D$$$F(B</A></H2>
<!-- doc-jp/STORY.html$B$+$i0zMQ(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="known_bugs">$B8=:_H=L@$7$F$$$k%P%0(B</A><H2>
<!-- $B8=:_H=L@$7$F$$$k%P%0(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="ToDo">ToDo</A><H2>
<!-- $B$d$i$M$P$J$i$s$3$H!?$d$m$&$+$J$!$J$3$H(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="history">$BMzNr(B</A><H2>
<!-- w3m$B3+H/MzNr(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="policy">$B3+H/%]%j%7!<(B</A><H2>
<!-- w3m$B$NL\;X$9$3$H!?3+H/>e$N$3$@$o$j(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="tips">$B3+H/<T8~$1(BTips</A><H2>
<!-- w3m$B$r3+H/$9$k$&$($G$N>.5;(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

45
w3m-doc/faq.html.in Normal file
View File

@@ -0,0 +1,45 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>FAQ&nbsp;-FAQ-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">FAQ</A></H1>
<DIV>
<!-- w3m$B$K4X$7$FNI$/J9$+$l$k(B($B$G$"$m$&(B)$B<ALd$H$=$NEz$(!"$*$h$S!"(BTips$B$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#faq">$B$h$/J9$+$l$k<ALd$H$=$NEz$((B</A>
<LI><A HREF="#tips">Tips</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="faq">$B$h$/J9$+$l$k<ALd$H$=$NEz$((B</A></H2>
<!-- w3m$B$K4X$7$FNI$/J9$+$l$k<ALd$H$=$NEz$($K$D$$$F(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="tips">Tips</A><H2>
<!-- Tips($B>.5;(B) -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

71
w3m-doc/function.html.in Normal file
View File

@@ -0,0 +1,71 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>FUNCTION&nbsp;-$B5!G=>\:Y(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">$B5!G=>\:Y(B</A></H1>
<DIV>
<!-- w3m$B$N3F5!G=$K$D$$$F$N>\:Y@bL@$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#url">$BBP1~$7$F$$$k(BURL</A>
<LI><A HREF="#html">$BBP1~$7$F$$$k(BHTML</A>
<LI><A HREF="#ssl">SSL</A>
<LI><A HREF="#cookie">cookie</A>
<LI><A HREF="#local_CGI">$B%m!<%+%k(BCGI$B5!G=(B</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="url">$BBP1~$7$F$$$k(BURL</A></H2>
<!-- w3m$B$,2r<a2DG=$J(BURL$B$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="html">$BBP1~$7$F$$$k(BHTML</A><H2>
<!-- w3m$B$,BP1~$7$F$$$k(BHTML$B$K$D$$$F(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="ssl">SSL</A><H2>
<!-- SSL$B$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="cookie">cookie</A><H2>
<!-- cookie$B$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="local_CGI">$B%m!<%+%k(BCGI$B5!G=(B</A><H2>
<!-- $B%m!<%+%k(BCGI$B5!G=$K$D$$$F$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

113
w3m-doc/index.html.in Normal file
View File

@@ -0,0 +1,113 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>THE DOCUMENTS FOR W3M</TITLE>
</HEAD>
<BODY>
<!-- $B$3$N$"$?$j$K(B w3m$B$N%m%4(B($B$C$F$J$$$+!)(B) $B$H$+(B -->
<!-- w3m: WWW wo Miru Tool version @W3M.version@ $B$H$+(B -->
<!-- (C) Copyright by @W3M.author@ March 23, 1999 $B$H$+(B -->
<!-- $B$rF~$l$F$*$/$Y$-$+$J!)(B -->
<H1><A NAME="index">$B:w0z(B</A></H1>
<OL>
<LI><A HREF="@DOC.prologue@" NAME="prologue">$B$O$8$a$K(B</A> <!-- README $B$N!H(B1. $B$O$8$a$K!I$NItJ,(B -->
<UL>
<LI><A HREF="@DOC.prologue@#summary">w3m$B$H$O(B</A>
<LI><A HREF="@DOC.prologue@#glossary">$BMQ8l$N@bL@(B</A>
<LI><A HREF="@DOC.prologue@#disclaimer">$BCm0U;v9`(B</A>
<LI><A HREF="@DOC.copyright@">$BCx:n8"!"%i%$%;%s%9(B</A>
<LI><A HREF="@DOC.prologue@#confirmation">$BF0:n3NG'(BOS</A>
</UL>
<LI><A HREF="@DOC.outline@" NAME="outline">$B35MWJT(B</A>
<UL>
<LI><A HREF="@DOC.outline@#install">$B%$%s%9%H!<%k$N35MW(B</A> <!-- $B35MW$N$_!%>\:Y$OJL$N>O$G(B -->
<LI><A HREF="@DOC.outline@#operation">$BA`:nJ}K!$N35MW(B</A> <!-- $B35MW$N$_!%>\:Y$OJL$N>O$G(B -->
<UL>
<LI><A HREF="@DOC.outline@#display">$BI=<(FbMF$N@bL@(B</A>
<LI><A HREF="@DOC.outline@#basic">$B4pK\E*$J;H$$J}(B</A>
<LI><A HREF="@DOC.outline@#help">$B%X%k%W$N;2>H(B</A>
</UL>
</UL>
<LI><A HREF="@DOC.detail@" NAME="detail">$B>\:YJT(B</A>
<UL>
<LI><A HREF="@DOC.install@" NAME="install">$B%$%s%9%H!<%k$N>\:Y(B</A>
<UL>
<LI><A HREF="@DOC.install@#get_w3m">w3m$BF~<jJ}K!(B</A>
<UL>
<LI><A HREF="@DOC.install@#w3m_home">w3m home</A>
<LI><A HREF="@DOC.install@#BBS">aito$BO"MmD"(B</A>
</UL>
<LI><A HREF="@DOC.install@#require">$BI,MW$JJ*(B</A>
<LI><A HREF="@DOC.install@#configure">configure$B$K$D$$$F(B</A>
<LI><A HREF="@DOC.install@#config_h">config.h$B$K$D$$$F(B</A>
<LI><A HREF="@DOC.install@#make">make$B$K$D$$$F(B</A>
<LI><A HREF="@DOC.install@#tips">$BB>$N(BOS$B$G%$%s%9%H!<%k$9$k:]$N(BTips</A>
</UL>
<LI><A HREF="@DOC.operation@" NAME="operation">w3m$BA`:nK!(B</A> <!-- $B%-!<A`:n@bL@(B -->
<UL>
<LI><A HREF="@DOC.operation@#buffer">$B%P%C%U%!A`:n(B</A>
<LI><A HREF="@DOC.operation@#mouse">$B%^%&%9A`:n(B</A>
<LI><A HREF="@DOC.operation@#line_edit">$B:G2<9TF~NO(B</A>
<LI><A HREF="@DOC.operation@#menu">$B%a%K%e!<A`:n(B</A>
</UL>
<LI><A HREF="@DOC.configuration@" NAME="configuration">$B3F<o@_Dj(B</A>
<UL>
<LI><A HREF="@DOC.configuration@#option">$B5/F0%*%W%7%g%s(B</A>
<LI><A HREF="@DOC.configuration@#environment">$B4D6-JQ?t(B</A>
<LI><A HREF="@DOC.configuration@#bookmark">bookmark$B%U%!%$%k(B</A>
<LI><A HREF="@DOC.configuration@#option_panel">$B%*%W%7%g%s%Q%M%k(B</A>
<UL>
<LI><A HREF="@DOC.configuration@#external_viewer">$B30It%S%e!<%"$NJT=8(B</A>
</UL>
<LI><A HREF="@DOC.configuration@#other_customize">$B$=$NB>%+%9%?%^%$%:(B</A>
<UL>
<LI><A HREF="@DOC.configuration@#keymap">keymap</A>
<LI><A HREF="@DOC.configuration@#menu">menu</A>
</UL>
</UL>
<LI><A HREF="@DOC.function@" NAME="function">$B5!G=>\:Y(B</A>
<UL>
<LI><A HREF="@DOC.function@#url">$BBP1~$7$F$$$k(BURL</A>
<LI><A HREF="@DOC.function@#html">$BBP1~$7$F$$$k(BHTML</A>
<LI><A HREF="@DOC.function@#ssl">SSL</A>
<LI><A HREF="@DOC.function@#cookie">cookie</A>
<LI><A HREF="@DOC.function@#local_CGI">$B%m!<%+%k(BCGI$B5!G=(B</A>
</UL>
<LI><A HREF="@DOC.FAQ@" NAME="faq">FAQ</A>
<UL>
<LI><A HREF="@DOC.FAQ@#faq">$B$h$/J9$+$l$k<ALd$H$=$NEz$((B</A>
<LI><A HREF="@DOC.FAQ@#tips">Tips</A>
</UL>
<LI><A HREF="@DOC.developement@" NAME="developement">$B3+H/%I%-%e%a%s%H(B</A>
<UL>
<LI><A HREF="@DOC.developement@#story">w3m$B$N3+H/$K$D$$$F(B</A>
<LI><A HREF="@DOC.developement@#known_bugs">$B8=:_H=L@$7$F$$$k%P%0(B</A>
<LI><A HREF="@DOC.developement@#ToDo">ToDo</A>
<LI><A HREF="@DOC.developement@#history">$BMzNr(B</A>
<LI><A HREF="@DOC.developement@#policy">$B3+H/%]%j%7!<(B</A>
<LI><A HREF="@DOC.developement@#tips">$B3+H/<T8~$1(BTips</A>
</UL>
<LI><A HREF="@DOC.community@" NAME="community">w3m$B%3%_%e%K%F%#(B</A>
<UL>
<LI><A HREF="@DOC.community@#ML">$B%a!<%j%s%0%j%9%H(B</A>
<LI><A HREF="@DOC.community@#links">$B4XO"(BWeb</A>
</UL>
<LI><A HREF="@DOC.copyright@" NAME="copyright">Copyright</A>
<UL>
<LI><A HREF="@DOC.copyright@#copyright">$BCx:n8"!"%i%$%;%s%9(B</A>
<LI><A HREF="@DOC.copyright@#thanks">$B<U<-(B</A>
</UL>
</UL>
</OL>
</BODY>
</HTML>

88
w3m-doc/install.html.in Normal file
View File

@@ -0,0 +1,88 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>INSTALL&nbsp;-$B%$%s%9%H!<%k$N>\:Y(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">$B%$%s%9%H!<%k$N>\:Y(B</A></H1>
<DIV>
<!-- w3m$B$N%$%s%9%H!<%k$N>\:Y$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#get_w3m">w3m$BF~<jJ}K!(B</A>
<UL>
<LI><A HREF="#w3m_home">w3m home</A>
<LI><A HREF="#BBS">aito$BO"MmD"(B</A>
</UL>
<LI><A HREF="#require">$BI,MW$JJ*(B</A>
<LI><A HREF="#configure">configure$B$K$D$$$F(B</A>
<LI><A HREF="#config_h">config.h$B$K$D$$$F(B</A>
<LI><A HREF="#make">make$B$K$D$$$F(B</A>
<LI><A HREF="#tips">$BB>$N(BOS$B$G%$%s%9%H!<%k$9$k:]$N(BTips</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="get_w3m">w3m$BF~<jJ}K!(B</A></H2>
<!-- w3m$BF~<jJ}K!(B -->
<H3><A NAME="w3m_home">w3m home</A><H3>
<!-- w3m HOME page$B$K$D$$$F(B -->
<H3><A NAME="BBS">aito$BO"MmD"(B</A><H3>
<!-- aito$BO"MmD"!"$=$NB>7G<(HD(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="require">$BI,MW$JJ*(B</A></H2>
<!-- w3m$B$r(Bmake$B$9$k$&$($GI,MW$JJ*!?$"$l$PNI$$J*(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="configure">configure$B$K$D$$$F(B</A></H2>
<!-- configure$B<B9T;~$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="config_h">config.h$B$K$D$$$F(B</A></H2>
<!-- config.h$B$G(Bdefine$B$9$k$b$NEy$K$D$$$F(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="make">make$B$K$D$$$F(B</A></H2>
<!-- make$B;~$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="tips">$BB>$N(BOS$B$G%$%s%9%H!<%k$9$k:]$N(BTips</A><H2>
<!-- $B3F<o(BOS$B>e$G(Bw3m$B$r%$%s%9%H!<%k$9$k:]$N(BTips -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

32
w3m-doc/mkdocs Executable file
View File

@@ -0,0 +1,32 @@
#!/bin/sh
W3MDOC="./w3mdoc.pl"
W3M="$HOME/bin/pre_w3m"
#W3M="w3m"
NKF="/usr/local/bin/nkf"
SED="/usr/bin/sed"
TR="/usr/bin/tr"
HTML_JP_DIR="html-jp"
DOC_JP_DIR="doc-jp"
#HTML_DIR="html"
#DOC_DIR="doc"
if [ ! -d ${HTML_JP_DIR} ]; then
mkdir ${HTML_JP_DIR}
fi
if [ ! -d ${DOC_JP_DIR} ]; then
mkdir ${DOC_JP_DIR}
fi
for SRC in *.in
do
HTML=`echo ${SRC} | ${SED} 's/\.in$//p'`
DOC=`echo ${HTML} | ${SED} 's/\.html$//p' | ${TR} '[a-z]' '[A-Z]'`
echo "converting ${SRC} to ${HTML_JP_DIR}/${HTML} ... \c"
${NKF} -e ${SRC} | ${SED} -e 's/¡£/¡¥/gp' -e 's/¡¢/¡¤/gp' | ${NKF} -j | ${W3MDOC} > ${HTML_JP_DIR}/${HTML}
echo "done.\nconverting ${HTML} to ${DOC_JP_DIR}/${DOC} ... \c"
${W3M} -dump -e ${HTML_JP_DIR}/${HTML} > ${DOC_JP_DIR}/${DOC}
echo "done."
done

50
w3m-doc/operation.html.in Normal file
View File

@@ -0,0 +1,50 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>OPERATION&nbsp;-w3m$BA`:nK!(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">w3m$BA`:nK!(B</A></H1>
<DIV>
<!-- w3m$B$rA`:n$9$k>e$G$N>\:Y$r5-$9(B -->
</DIV>
<UL>
<LI><A HREF="#buffer">$B%P%C%U%!A`:n(B</A>
<LI><A HREF="#mouse">$B%^%&%9A`:n(B</A>
<LI><A HREF="#line_edit">$B:G2<9TF~NO(B</A>
<LI><A HREF="#menu">$B%a%K%e!<(B</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="buffer">$B%P%C%U%!A`:n(B</A></H2>
<!-- $B%P%C%U%!A`:n;~$N@bL@(B -->
<H3><A NAME="mouse">$B%^%&%9A`:n(B</A><H3>
<!-- $B%^%&%9A`:n;~$N@bL@(B -->
<H3><A NAME="line_edit">$B:G2<9TF~NO(B</A><H3>
<!-- $B:G2<9TF~NO;~$NA`:n$K$D$$$F$N@bL@(B -->
<H3><A NAME="menu">$B%a%K%e!<A`:n(B</A><H3>
<!-- $B%a%K%e!<A`:n;~$N@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z!<%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

61
w3m-doc/outline.html.in Normal file
View File

@@ -0,0 +1,61 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>OUTLINE&nbsp;-$B35MWJT(B-</TITLE>
</HEAD>
<BODY>
<H1><A NAME="index">$B35MWJT(B</A></H1>
<UL>
<LI><A HREF="#install">$B%$%s%9%H!<%k$N35MW(B</A>
<LI><A HREF="#operation">$BA`:nJ}K!$N35MW(B</A>
<UL>
<LI><A HREF="#display">$BI=<(FbMF$N@bL@(B</A>
<LI><A HREF="#basic">$B4pK\E*$J;H$$J}(B</A>
<LI><A HREF="#help">$B%X%k%W$N;2>H(B</A>
</UL>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="install">$B%$%s%9%H!<%k$N35MW(B</A><H2>
<!-- $B%$%s%9%H!<%k$N35MW(B -->
<DIV>
<A HREF="index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="operation">$BA`:nJ}K!$N35MW(B</A><H2>
<!-- $BA`:nJ}K!$N35MW(B -->
<H3><A NAME="display">$BI=<(FbMF$N@bL@(B</A></H3>
<!-- $BI=<(FbMF$N@bL@(B -->
<H3><A NAME="basic">$B4pK\E*$J;H$$J}(B</A></H3>
<!-- $B4pK\E*$J;H$$J}(B -->
<H3><A NAME="help">$B%X%k%W$N;2>H(B</A></H3>
<!-- $B%X%k%W$N;2>H(B -->
<DIV>
<A HREF="index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
</BODY>
</HTML>

69
w3m-doc/prologue.html.in Normal file
View File

@@ -0,0 +1,69 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
@include define.wd
@include contain.wd
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-2022-jp">
<TITLE>PROLOGUE&nbsp;-$B$O$8$a$K(B-</title>
</HEAD>
<BODY>
<H1><A NAME="index">$B$O$8$a$K(B</A></H1>
<UL>
<LI><A HREF="#summary">w3m$B$H$O(B</A>
<LI><A HREF="#glossary">$BMQ8l$N@bL@(B</A>
<LI><A HREF="#disclaimer">$BCm0U;v9`(B</A>
<LI><A HREF="@DOC.copyright@">$BCx:n8"!"%i%$%;%s%9(B</A>
<LI><A HREF="#confirmation">$BF0:n3NG'(BOS</A>
</UL>
<DIV>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="summary">w3m$B$H$O(B</A></H2>
<!-- w3m$B$H$O(B -->
<DIV>
<A HREF="#index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="glossary">$BMQ8l@bL@(B</A></H2>
<!-- $BMQ8l@bL@(B -->
<DIV>
<A HREF="#index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="disclaimer">$BCm0U;v9`(B</A></H2>
<!-- $BCm0U;v9`(B -->
<DIV>
<A HREF="#index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2>$BCx:n8"!"%i%$%;%s%9(B</H2>
<DIV>
<A HREF="@DOC.copyright@">$BCx:n8"!"%i%$%;%s%9(B</A>$B$r;2>H$/$@$5$$!#(B
</DIV>
<DIV>
<A HREF="#index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<H2><A NAME="confirmation">$BF0:n3NG'(BOS</A></H2>
<!-- $BF0:n3NG'(BOS -->
<DIV>
<A HREF="#index">$B$3$N%Z%$%8$N@hF,$KLa$k(B</A>
</DIV>
<HR>
<A HREF="@DOC.index@">$B%H%C%W%Z%$%8$KLa$k(B</A>
</BODY>
</HTML>

41
w3m-doc/sample/README Normal file
View File

@@ -0,0 +1,41 @@
使い方
perl w3mdoc.pl sample.wd > sample.html
展開されるもの
* @xxx.yyy@
@define @end 内で定義された値に展開される。
* @YYY(xxx)@
@code @end 内で定義された関数を呼び出して展開される。
例)
URL(xxx) xxx.url
LINK(xxx) <A HREF="xxx.url">xxx.title</A>
MAILTO(xxx) <A HREF="mailto:xxx.address">xxx.name</A>
コマンド一覧
* 定義
@define
xxx.yyy zzz
@end
xxx.yyy を zzz と定義する。xxx は以下の関数の引数にもなる。
例は define.wd を参照。
* コード(関数定義)
@code
コード
@end
w3mdoc を実装している言語のコードを直接書く。とりあえず perl5。
例は html.wd を参照。
* インクルード
@include file
ファイルを include する。

4
w3m-doc/sample/define.wd Normal file
View File

@@ -0,0 +1,4 @@
@define
hsaka.url http://www2u.biglobe.ne.jp/~hsaka/
hsaka.title 坂本浩則のホームページ
@end

18
w3m-doc/sample/html.wd Normal file
View File

@@ -0,0 +1,18 @@
@code
sub URL {
$_[0]->CHECK(qw(url));
$_[0]->{url};
}
sub LINK {
$_[0]->CHECK(qw(url title));
"<A HREF=\"$_[0]->{url}\">$_[0]->{title}</A>";
}
sub LINK_SEC {
$_[0]->CHECK(qw(url section title));
"<A HREF=\"$_[0]->{url}\">$_[0]->{section} $_[0]->{title}</A>";
}
sub MAILTO {
$_[0]->CHECK(qw(address name));
"<A HREF=\"mailto:$_[0]->{address}\">$_[0]->{name}</A>";
}
@end

268
w3m-doc/sample/keymap.cgi Executable file
View File

@@ -0,0 +1,268 @@
#!/usr/local/bin/perl
$QUERY = $ENV{'QUERY_STRING'};
$KEYMAP = "$ENV{'HOME'}/.w3m/keymap";
if ($QUERY) {
# &write_keymap($QUERY);
print <<EOF;
Content-Type: text/html
w3m-control: DELETE_PREVBUF
w3m-control: BACK
EOF
exit;
}
&init_func();
@key = ();
@func = ();
@data = ();
open(KEYMAP, $KEYMAP);
while (<KEYMAP>) {
s/^keymap\s+// || next;
(($k, $_) = &getQWord($_)) || next;
(($f, $_) = &getWord($_)) || next;
$FUNC_EXIST{$f} || next;
($d, $_) = &getQWord($_);
push(@key, $k);
push(@func, $f);
push(@data, $d);
}
close(KEYMAP);
$N = @key;
print <<EOF;
Content-Type: text/html
<head><title>Keymap Setting</title></head>
<h1>Keymap Setting</h1>
<form action="file:///\$LIB/keymap.cgi">
<table>
<tr><td>&nbsp;Key<td>&nbsp;Command<td>&nbsp;Argument
<tr><td><input name=k_$N size=6>
<td><select name=f_$N>
EOF
&print_func();
print <<EOF;
</select>
<td><input name=d_$N>
<td><input type=submit name=ok value=Ok>
<tr><td colspan=4><hr>
EOF
$i = 0;
while(@key) {
$k = &Q(shift @key);
$f = shift @func;
$d = &Q(shift @data);
print <<EOF;
<tr><td><input type=hidden name=k_$i value=\"$k\">&nbsp;$k
<td><select name=f_$i>
EOF
&print_func($f);
print <<EOF;
</select>
<td><input name=d_$i value=\"$d\">
<td><input type=checkbox name=del_$i>Delete
EOF
$i++;
}
print <<EOF;
</table>
</form>
EOF
sub write_keymap {
local($query) = @_;
@key = ();
@func = ();
@data = ();
for $q (split('&', $query)) {
($_, $d) = split('=', $q);
if (s/^k_//) {
$key[$_] = $d;
} elsif (s/^f_//) {
$func[$_] = $d;
} elsif (s/^d_//) {
$data[$_] = $d;
} elsif (s/^del_//) {
$del[$_] = 1;
}
}
open(KEYMAP, "> ${KEYMAP}") || next;
while(@key) {
$k = &UQ(shift @key);
$f = shift @func;
$d = &UQ(shift @data);
($f =~ /^\w/) || next;
(shift @del) && next;
print KEYMAP "keymap\t$k\t$f";
if ($d ne '') {
if ($d =~ /[\"\'\\\s]/) {
$d =~ s/([\"\\])/\\$1/g;
print KEYMAP "\t\t\"$d\"";
} else {
$d =~ s/([\"\\])/\\$1/g;
print KEYMAP "\t\t$d";
}
}
print KEYMAP "\n";
}
close(KEYMAP);
}
sub UQ {
local($_) = @_;
s/\+/ /g;
s/%([\da-f][\da-f])/pack('c', hex($1))/egi;
return $_;
}
sub Q {
local($_) = @_;
s/\&/\&amp;/g;
s/\</\&lt;/g;
s/\>/\&gt;/g;
s/\"/\&quot;/g;
return $_;
}
sub getQWord {
local($_) = @_;
local($x) = '';
s/^\s+//;
while($_ ne '') {
if (s/^\'(([^\'\\]|\\.)*)\'// ||
s/^\"(([^\"\\]|\\.)*)\"// ||
s/^([^\'\"\\\s]+)// || s/^\\(.)//) {
$x .= $1;
} else {
last;
}
}
return ($x, $_);
}
sub getWord {
local($_) = @_;
s/^\s+//;
s/^(\S+)// || return ();
return ($1, $_);
}
sub print_func {
local($f) = @_;
for(@FUNC_LIST) {
if ($f eq $_) {
print "<option selected>$_\n";
} else {
print "<option>$_\n";
}
}
}
sub init_func {
@FUNC_LIST = ();
%FUNC_EXIST = ();
while(<DATA>) {
chop;
push(@FUNC_LIST, $_);
$FUNC_EXIST{$_} = 1;
}
}
__END__
- - - - - - -
ABORT
ADD_BOOKMARK
BACK
BEGIN
BOOKMARK
CENTER_H
CENTER_V
COOKIE
DELETE_PREVBUF
DICT_WORD
DICT_WORD_AT
DOWN
DOWNLOAD
EDIT
EDIT_SCREEN
END
ESCBMAP
ESCMAP
EXEC_SHELL
EXIT
EXTERN
EXTERN_LINK
FRAME
GOTO
GOTO_LINE
GOTO_LINK
HELP
HISTORY
INFO
INIT_MAILCAP
INTERRUPT
LEFT
LINE_BEGIN
LINE_END
LINE_INFO
LINK_BEGIN
LINK_END
LOAD
MAIN_MENU
MARK
MARK_MID
MARK_URL
MENU
MOUSE
MOUSE_TOGGLE
MOVE_DOWN
MOVE_LEFT
MOVE_RIGHT
MOVE_UP
NEXT_LINK
NEXT_MARK
NEXT_PAGE
NEXT_WORD
NOTHING
NULL
OPTIONS
PCMAP
PEEK
PEEK_LINK
PIPE_SHELL
PREV_LINK
PREV_MARK
PREV_PAGE
PREV_WORD
PRINT
QUIT
READ_SHELL
REDRAW
REG_MARK
RELOAD
RIGHT
SAVE
SAVE_IMAGE
SAVE_LINK
SAVE_SCREEN
SEARCH
SEARCH_BACK
SEARCH_FORE
SEARCH_NEXT
SEARCH_PREV
SELECT
SHELL
SHIFT_LEFT
SHIFT_RIGHT
SOURCE
SUSPEND
UP
VIEW
VIEW_BOOKMARK
VIEW_IMAGE
WHEREIS
WRAP_TOGGLE

8
w3m-doc/sample/s.wd Normal file
View File

@@ -0,0 +1,8 @@
@include html.wd
@include define.wd
これはサンプルです。
<P>
\@hsaka.url\@ = @hsaka.url@
<BR>
\@LINK(hsaka)\@ = @LINK(hsaka)@

View File

@@ -0,0 +1,6 @@
これはサンプルです。
<P>
@hsaka.url@ = http://www2u.biglobe.ne.jp/~hsaka/
<BR>
@LINK(hsaka)@ = <A HREF="http://www2u.biglobe.ne.jp/~hsaka/">坂本浩則のホームページ</A>

11
w3m-doc/sample/sample.wd Normal file
View File

@@ -0,0 +1,11 @@
@include html.wd
@define
hsaka.url http://www2u.biglobe.ne.jp/~hsaka/
hsaka.title 坂本浩則のホームページ
@end
これはサンプルです。
<P>
\@hsaka.url\@ = @hsaka.url@
<BR>
\@LINK(hsaka)\@ = @LINK(hsaka)@

102
w3m-doc/sample/w3mdoc.pl Executable file
View File

@@ -0,0 +1,102 @@
#!/usr/local/bin/perl
package w3mdoc;
sub CHECK {
my($a, @b) = @_;
for(@b) {
defined($a->{$_}) || die("\"$a->{id}.$_\" is not defined.\n");
}
}
sub DEF {
my($a, $b, $c) = @_;
if (! defined($data->{$a})) {
$data->{$a} = bless { id => $a };
}
$data->{$a}{$b} = $c;
}
sub SUB {
local($_) = @_;
my($a, $b);
if (/^\@(\w+)\.(\w+)\@$/) {
($a, $b) = ($1, $2);
defined($data->{$a}) || die("\"$a.$b\" is not defined.\n");
$data->{$a}->CHECK($b);
return $data->{$a}{$b};
}
if (/^\@(\w+)\((\w+)\)\@$/) {
($a, $b) = ($1, $2);
defined(&{$a}) || die("\"$a()\" is not defined.\n");
defined($data->{$b}) || die("\"$a($b)\" is not defined.\n");
return $data->{$b}->$a();
}
return '@';
}
package main;
@ARGV || unshift(@ARGV, "-");
while(@ARGV) {
$file = shift @ARGV;
&make_doc($file);
}
sub make_doc {
my($file) = @_;
my($in_def, $in_code, $code, $a, $b);
local(*F);
local($_);
open(F, $file) || die("$file: $!\n");
$in_def = 0;
$in_code = 0;
while(<F>) {
if ($in_def) {
if (/^\@end/) {
$in_def = 0;
next;
}
s/^\s+//;
s/^(\w+)\.(\w+)// || next;
($a, $b) = ($1, $2);
s/^\s+//;
s/\s+$//;
&w3mdoc::DEF($a, $b, $_);
next;
}
if ($in_code) {
if (/^\@end/) {
eval "package w3mdoc; $code";
$in_code = 0;
next;
}
$code .= $_;
next;
}
if (/^\@define/) {
$in_def = 1;
next;
}
if (/^\@code/) {
$in_code = 1;
$code = "";
next;
}
if (s/^\@include\s+//) {
s/\s+$//;
&make_doc($_);
next;
}
if (/^\@/) {
die("unknown command: $_");
}
s/(\\@|\@(\w+(\.\w+|\(\w+\)))\@)/&w3mdoc::SUB($1)/eg;
print;
}
close(F);
}

102
w3m-doc/w3mdoc.pl Executable file
View File

@@ -0,0 +1,102 @@
#!/usr/local/bin/perl
package w3mdoc;
sub CHECK {
my($a, @b) = @_;
for(@b) {
defined($a->{$_}) || die("\"$a->{id}.$_\" is not defined.\n");
}
}
sub DEF {
my($a, $b, $c) = @_;
if (! defined($data->{$a})) {
$data->{$a} = bless { id => $a };
}
$data->{$a}{$b} = $c;
}
sub SUB {
local($_) = @_;
my($a, $b);
if (/^\@(\w+)\.(\w+)\@$/) {
($a, $b) = ($1, $2);
defined($data->{$a}) || die("\"$a.$b\" is not defined.\n");
$data->{$a}->CHECK($b);
return $data->{$a}{$b};
}
if (/^\@(\w+)\((\w+)\)\@$/) {
($a, $b) = ($1, $2);
defined(&{$a}) || die("\"$a()\" is not defined.\n");
defined($data->{$b}) || die("\"$a($b)\" is not defined.\n");
return $data->{$b}->$a();
}
return '@';
}
package main;
@ARGV || unshift(@ARGV, "-");
while(@ARGV) {
$file = shift @ARGV;
&make_doc($file);
}
sub make_doc {
my($file) = @_;
my($in_def, $in_code, $code, $a, $b);
local(*F);
local($_);
open(F, $file) || die("$file: $!\n");
$in_def = 0;
$in_code = 0;
while(<F>) {
if ($in_def) {
if (/^\@end/) {
$in_def = 0;
next;
}
s/^\s+//;
s/^(\w+)\.(\w+)// || next;
($a, $b) = ($1, $2);
s/^\s+//;
s/\s+$//;
&w3mdoc::DEF($a, $b, $_);
next;
}
if ($in_code) {
if (/^\@end/) {
eval "package w3mdoc; $code";
$in_code = 0;
next;
}
$code .= $_;
next;
}
if (/^\@define/) {
$in_def = 1;
next;
}
if (/^\@code/) {
$in_code = 1;
$code = "";
next;
}
if (s/^\@include\s+//) {
s/\s+$//;
&make_doc($_);
next;
}
if (/^\@/) {
die("unknown command: $_");
}
s/(\\@|\@(\w+(\.\w+|\(\w+\)))\@)/&w3mdoc::SUB($1)/eg;
print;
}
close(F);
}