使用erlang连接php的cgi处理方式,构建强大的web开发平台

Question

2. -module(test).
3. -export([cgi_worker/0]).
6. cgi_worker() ->
7.     Env = [{"SERVER_SOFTWARE","test web server"},
8.       {"SERVER_NAME","localhost"},
9.       {"HTTP_HOST","localhost"},
10.       {"GATEWAY_INTERFACE","CGI/1.1"},
11.       {"SERVER_PROTOCOL","HTTP/1.1"},
12.       {"SERVER_PORT","8080"},
13.       {"REQUEST_METHOD","GET"},
14.       {"REQUEST_URI","/t.php"},
15.       {"DOCUMENT_ROOT","d:/www"},
16.       {"DOCUMENT_ROOT_MOUNT","/"},
17.       {"SCRIPT_FILENAME","d:/www/t.php"},
18.       {"PATH_INFO",[]},
19.       {"PATH_TRANSLATED",[]},
20.       {"SCRIPT_NAME","/t.php"},
21.       {"REMOTE_ADDR","127.0.0.1"},
22.       {"REMOTE_HOST","127.0.0.1"},
23.       {"SERVER_ADDR","127.0.0.1"},
24.       {"LOCAL_ADDR","127.0.0.1"},
25.       {"QUERY_STRING",[]},
26.       {"HTTP_ACCEPT",
27.        "application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,i
28. mage/png,*/*;q=0.5"},
29.       {"HTTP_USER_AGENT",
30.        "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/532.0 (KHTML
31. , like Gecko) Chrome/4.0.206.1 Safari/532.0"},
32.       {"HTTP_ACCEPT_CHARSET","GBK,utf-8;q=0.7,*;q=0.3"},
33.       {"HTTP_ACCEPT_LANGUAGE","zh-CN,zh;q=0.8"},
34.       {"HTTP_ACCEPT_ENCODING","gzip,deflate,sdch"},
35.       {"HTTP_CACHE_CONTROL","max-age=0"}],%%构造http访问相关配置
36.    
37.     CGIPort = open_port({spawn, "f:/PHP/php-cgi.exe"},%%Port方式对外交互
38.                         [{env, Env},
39.                          {cd, "d:/www"},
40.                          exit_status,
41.                          binary]),
42. cgi_get_line({start, CGIPort}).
45. %%获取结果
46. cgi_get_line({start, Port}) ->
47.     receive
48.         {Port, {data,Data}} ->
49. io:fwrite("DATA:~p~n", [Data]);
50.         {Port, {exit_status, 0}} ->
51.             io:fwrite("~p~n", [{exit_status, 0}]);
52.         {Port, {exit_status, Status}} when Status /=0 ->
53.             io:fwrite("~p~n", [{exit_status, Status}]);
54.         _Other ->
55.             io:fwrite("~p~n", [_Other])
56.     end.

复制代码

php脚本

2. <?php
3. echo 'ello php-cgi!';
4. ?>

复制代码

以上纯粹直接构造，使用时请根据每个人环境加以修改，编译后运行如下：

67> c(test).         
{ok,test}
68> test:cgi_worker().
DATA:<<"X-Powered-By: PHP/5.2.6rnContent-type: text/htmlrnrnhello php-cgi!">>
ok

说明连接并执行成功，erlang以其强悍的网络并发处理(并非只谈性能)能力，加上php的脚本的简便，相信他们可以成为很好的互补。

Answer 1

楼主，我觉得你真的太厉害了~~~！