易语言轻量级web服务
仅调用精易模块,其中做了多线程处理,可以用于简单的web服务,例如简单的API接口
.版本 2
.支持库 EThread
.支持库 spec
.子程序 _服务器1_数据到达
.局部变量 线程参数, 线程参数
线程参数.客户IP = 服务器1.取回客户 ()
线程参数.请求内容 = 服务器1.取回数据 ()
线程参数.服务器 = 服务器1
启动线程 (&线程_处理服务器数据, 取变量地址 (线程参数), )
延时 (100)
系统_处理事件 ()
.子程序 线程_处理服务器数据
.参数 变量地址, 整数型
.局部变量 request, request
.局部变量 response, response
.局部变量 rtjson, 文本型
.局部变量 线程参数, 线程参数
.局部变量 json, 文本型
交换_变量交地址ASM (线程参数, 变量地址)
request.初始化 (线程参数.请求内容)
response.初始化 (线程参数.服务器, 线程参数.客户IP)
json = request.取PostJson () ' post就取post数据,get就取表单数据,这里已经处理好了的
log (request.取请求路径 () + “|” + json)
response.write (到字节集 (编码_gb2312到utf8 (json)), request.取请求类型 (), #正常访问)
整个就几m