实战MochiWeb

1. 安装erlang

sudo apt-get install erlang

2. check erlang mochiweb

svn checkout http://mochiweb.googlecode.com/svn/trunk/ mochiweb-read-only

好象已经迁移到这里了。git最近比较火。

http://github.com/mochi/mochiweb

lanhui&＃64;lanhui-desktop:~/mochiweb-read-only$ ls<br>deps ebin include Makefile README src<br>doc examples LICENSE priv scripts support

3. make

lanhui&＃64;lanhui-desktop:~/mochiweb-read-only$ make<br>(cd src;make all)<br>make[1]: Entering directory &＃96;/home/lanhui/mochiweb-read-only/src&＃39;<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochifmt.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochifmt_records.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochifmt_std.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiglobal.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochihex.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochijson2.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochijson.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochilists.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochilogfile2.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochinum.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochitemp.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiutf8.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_acceptor.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_app.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_charref.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_COOKIEs.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_cover.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_echo.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_headers.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_html.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_http.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_io.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_mime.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_multipart.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_request.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_response.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_skel.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_socket.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_socket_server.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_sup.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin mochiweb_util.erl<br>erlc -W -I ../include &＃43;debug_info -o ../ebin reloader.erl<br>../support/make_app.escript mochiweb.app.src ../ebin/mochiweb.app "" "mochifmt mochifmt_records mochifmt_std mochiglobal mochihex mochijson2 mochijson mochilists mochilogfile2 mochinum mochitemp mochiutf8 mochiweb_acceptor mochiweb_app mochiweb_charref mochiweb_COOKIEs mochiweb_cover mochiweb_echo mochiweb mochiweb_headers mochiweb_html mochiweb_http mochiweb_io mochiweb_mime mochiweb_multipart mochiweb_request mochiweb_response mochiweb_skel mochiweb_socket mochiweb_socket_server mochiweb_sup mochiweb_util reloader"<br>make[1]: Leaving directory &＃96;/home/lanhui/mochiweb-read-only/src&＃39;

4. 生成骨架

lanhui&＃64;lanhui-desktop:~/mochiweb-read-only$ escript scripts/new_mochiweb.erl test<br>./test/<br>./test/src/<br>skel.app<br>Makefile<br>skel_app.erl<br>skel_sup.erl<br>skel.hrl<br>skel_deps.erl<br>skel_web.erl<br>skel.erl<br>./test/include/<br>./test/support/<br>include.mk<br>run_tests.escript<br>Makefile<br>./test/priv/<br>./test/priv/www/<br>index.html<br>./test/doc/<br>start-dev.sh<br>start.sh<br>./test/deps/

看看生成的内容吧&＃xff1a;

lanhui&＃64;lanhui-desktop:~/mochiweb-read-only$ cd test/<br>lanhui&＃64;lanhui-desktop:~/mochiweb-read-only/test$ ls<br>deps doc ebin include Makefile priv src start-dev.sh start.sh support

这个还是要make一下

lanhui&＃64;lanhui-desktop:~/mochiweb-read-only/test$ make<br>(cd src;make all)<br>make[1]: Entering directory &＃96;/home/lanhui/mochiweb-read-only/test/src&＃39;<br>erlc -W -I ../include -I ../deps/mochiweb-src/include -pa ../deps/mochiweb-src/ebin &＃43;debug_info -o ../ebin test_app.erl<br>erlc -W -I ../include -I ../deps/mochiweb-src/include -pa ../deps/mochiweb-src/ebin &＃43;debug_info -o ../ebin test_deps.erl<br>erlc -W -I ../include -I ../deps/mochiweb-src/include -pa ../deps/mochiweb-src/ebin &＃43;debug_info -o ../ebin test.erl<br>erlc -W -I ../include -I ../deps/mochiweb-src/include -pa ../deps/mochiweb-src/ebin &＃43;debug_info -o ../ebin test_sup.erl<br>erlc -W -I ../include -I ../deps/mochiweb-src/include -pa ../deps/mochiweb-src/ebin &＃43;debug_info -o ../ebin test_web.erl<br>cp test.app ../ebin/test.app<br>make[1]: Leaving directory &＃96;/home/lanhui/mochiweb-read-only/test/src&＃39;

5. 测试一下&＃xff1a;

./start-dev.sh<br>(cd src;make all)<br>make[1]: Entering directory &＃96;/home/lanhui/mochiweb-read-only/test/src&＃39;<br>make[1]: Nothing to be done for &＃96;all&＃39;.<br>make[1]: Leaving directory &＃96;/home/lanhui/mochiweb-read-only/test/src&＃39;<br>Erlang R13B03 (erts-5.7.4) [source] [64-bit] [rq:1] [async-threads:0] [hipe] [kernel-poll:false]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>supervisor: {local,sasl_safe_sup}<br>started: [{pid,<0.36.0>},<br>{name,alarm_handler},<br>{mfa,{alarm_handler,start_link,[]}},<br>{restart_type,permanent},<br>shutdownown,2000},<br>{child_type,worker}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>supervisorlocalcal,sasl_safe_sup}<br>started: [{pid,&alt;lt;0.37.0>},<br>{name,overload},<br>{mfa,{overload,start_link,[]}},<br>{restart_type,permanent},<br>shutdownutdown,2000},<br>{child_type,worker}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>supervilocal{local,sasl_sup}<br>started: [{pid,&amltamp;lt;0.35.0>},<br>{name,sasl_safe_sup},<br>{mfa,<br>{supervisor,start_link,<br>local [{local,sasl_safe_sup},sasl,safe]}},<br>{restart_type,permanent},<br>shutdown{shutdown,infinity},<br>{child_type,supervisor}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>supelocalr: {local,sasl_sup}<br>started: [{pid,<mp;amp;lt;0.38.0>},<br>{name,release_handler},<br>{mfa,{release_handler,start_link,[]}},<br>{restart_type,permanent},<br>shutdown {shutdown,2000},<br>{child_type,worker}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>application: sasl<br>started_at: nonode&＃64;nohost<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>slocalisor: {local,kernel_safe_sup}<br>started: [{pid,<p;amp;amp;lt;0.43.0>},<br>{name,timer_server},<br>{mfa,{timer,start_link,[]}},<br>{restart_type,permanent},<br>shutdown {shutdown,1000},<br>{child_type,worker}]<br>** Found inname clashes in code paths<br>Eshell V5.7.4 (abort with ^G)<br>1><br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>localsupervisor: {local,crypto_sup}<br>started: [ltid,<0.52.0>},<br>{name,crypto_server},<br>{mfa,{crypto_server,start_link,[]}},<br>{restart_type,permanent},<br>shutdown {shutdown,2000},<br>{child_type,worker}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>application: crypto<br>started_at: nonode&＃64;nohost<br>** inund 0 name clashes in code paths<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;&＃61;<br>local supervisor: {local,test_sup}<br>startedlt[{pid,<0.57.0>},<br>{name,test_web},<br>{mfa,<br>{test_web,start,<br>"0.0.0.0" [[{ip,"0.0.0.0"},<br>{port,8000},<br>{docroot,<br>"/home/lanhui/mochiweb-read-only/test/priv/www"read-only/test/priv/www"}]]}},<br>{restart_type,permanent},<br>shutdown {shutdown,5000},<br>{child_type,worker}]<br>&＃61;PROGRESS REPORT&＃61;&＃61;&＃61;&＃61; 23-Aug-2010::11:57:10 &＃61;&＃61;test application: test<br>started_at: nonode&＃64;nohost

然后在浏览器地址栏中敲入&＃xff1a; http://localhost:8000,页面应当显示 MochiWeb running.

6. 小定制&＃xff1a;

case Path of<br>_ ->

代码中加入timer分支&＃xff1a;

case Path of<br>"timer" -><br>Response &＃61; Req:ok({"text/plain", chunked}), timer(Response);<br>_ -><br>Req:serve_file(Path, DocRoot)

get_option函数后增加