Air724ugLora/demo/socketSsl/shortConnectionFlymode/socketTask.lua

--- 模块功能：socket ssl短连接飞行模式功能测试
-- @author openLuat
-- @module socketSslShortConnectionFlymode.socketTask
-- @license MIT
-- @copyright openLuat
-- @release 2018.03.27

module(...,package.seeall)

require"socket"
require"ntp"

--同步网络时间，因为证书校验时会用到系统时间
ntp.timeSync()
--启动socket客户端任务
sys.taskInit(
    function()
        while true do
            if not socket.isReady() then
                --等待网络环境准备就绪，超时时间是5分钟
                sys.waitUntil("IP_READY_IND",300000)
            end

            if socket.isReady() then
                --单向认证测试时，此变量设置为false；双向认证测试时，此变量设置为true
                local mutualAuth = false
                local connectCnt,socketClient = 0

                --双向认证测试
                if mutualAuth then                   
                    --创建一个socket ssl tcp客户端
                    socketClient = socket.tcp(true,{caCert="ca.crt",clientCert="client.crt",clientKey="client.key"})
                    --阻塞执行socket connect动作，直至成功
                    while not socketClient:connect("36.7.87.100","4434") do
                        connectCnt = connectCnt+1
                        sys.wait(2000)
                        if connectCnt==3 then break end
                    end                
                --单向认证测试
                else
                    --创建一个socket ssl tcp客户端
                    socketClient = socket.tcp(true,{caCert="ca.crt"})
                    --阻塞执行socket connect动作，直至成功
                    while not socketClient:connect("36.7.87.100","4433") do
                        connectCnt = connectCnt+1
                        sys.wait(2000)
                        if connectCnt==3 then break end
                    end
                end
                
                if connectCnt~=3 then
                    if socketClient:send("GET / HTTP/1.1\r\nHost: 36.7.87.100\r\nConnection: keep-alive\r\n\r\n") then
                        result,data = socketClient:recv(5000)
                        if result then
                            --TODO：处理收到的数据data
                            log.info("socketTask.recv",data)
                        end
                    end
                end

                --断开socket连接
                socketClient:close()
                sys.wait(2000)
            end
            
            --进入飞行模式，20秒之后，退出飞行模式
            net.switchFly(true)
            sys.wait(20000)
            net.switchFly(false)
        end
    end
)